> IF NOT PEMSTATUS(THISFORM, [cntFILENOTE], 5) > THISFORM.NEWOBJECT([cntFILENOTE], [cntFILENOTE], FULLPATH([modules\vCPR5.vcx])) > THISFORM.cntFILENOTE.LEFT = 160 > THISFORM.cntFILENOTE.TOP = 264 > THISFORM.cntFILENOTE.HEIGHT = THISFORM.HEIGHT - 264 > THISFORM.cntFILENOTE.ANCHOR = 15 >*!* THISFORM.cntFILENOTE.REFRESH() > THISFORM.cntFILENOTE.VISIBLE = .T. > ENDIF > >>
>>>IF PEMSTATUS(THISFORM, [cntEmployer], 5) >>> thisform.cntEmployer.VISIBLE=.f. >>> thisform.RemoveObject([cntEmployer]) >>>ENDIF >>>>>>
>>SET ASSERT ON >>ASSERT PEMSTATUS(THISFORM, "cntEmployer", 5) MESSAGE "cntEmployer did not exists" >> >>IF PEMSTATUS(THISFORM, "cntEmployer", 5) >> thisform.cntEmployer.VISIBLE=.f. >> thisform.RemoveObject([cntEmployer]) >>ENDIF >>