FUNCTION CharValue( tuExpression ) RETURN IIF( VARTYPE( tuexpression ) == [O], ; [],; TRANSFORM( tuExpression, [] ) )Here is the test code that I used:
clear ? CharValue( [A] ) + [Text] ? CharValue( 123.57 )+ [Text] ? CharValue( DATE( ) )+ [Text] oForm = NEWOBJECT( [Form] ) ? CharValue( oForm )+ [Text] ? CharValue( .Null. )+ [Text]I am about follow the other instructions you gave, thanks for the info, and I will keep you informed on my progress.