>WAIT WINDOW type( THIS.CheckSource ) >WAIT WINDOW vartype(poText) >*try >***===> evals okay >cContents = EVALUATE(THIS.CheckSource) >*catch >* WAIT WINDOW message() >*ENDTRY > >cSource = THIS.CheckSource >***===> macros okay >cContents = &cSource. > >cSource = THIS.CheckSource >***===> evals fails >cContents = EVALUATE(cSource) >>
* try cSource = THIS.CheckSource cContents = EVALUATE(m.cSource) * post ? FSIZE("cSource")=0 && check fields name not exists ? [cSource]=="cSource" && check include preprocess not exists