>#define CRLF CHR(13)+CHR(10) > >****MyProperty_Assign method: >LPARAMETERS tAssign >LOCAL aStck[1] >ASTACKINFO(aStck) >lcStr = CRLF+[New value ] + TRANSFORM(tAssign) >FOR lnFor = 1 TO ALEN(aStck,1) > lcStr = lcStr + CRLF +; > [Stack Level ] + TRANSFORM(aStck[lnFor,1])+CRLF+; > [Current program ] + TRANSFORM(aStck[lnFor,2])+CRLF+; > [Object ] + TRANSFORM(aStck[lnFor,3])+CRLF+; > [Object source ] + TRANSFORM(aStck[lnFor,4])+CRLF+; > [Line number ] + TRANSFORM(aStck[lnFor,5])+CRLF+; > [in the source ] + TRANSFORM(aStck[lnFor,6]) >NEXT >STRTOFILE(lcStr, [c:\TestLog.log], 1) >>(not tested)