>DO Form WITH MyPar TO MyVar >>
>Return MyValue
>
>>oForm = CreateObjec('MyClassForm') >oForm.Show(1) >Fala PCC..
_screen.addproperty("nO_valor_do_status",0) *** executa todos procedimentos... que mudará o valor da propriedade... (tipo _screen.nO_valor_do_status=3) *** depois if _screen.nO_valor_do_status=1 ** endif ** e por ai vaiHTH