Histórico da Página

Exemplo:

...

User Function FT300ABR(

...

) 

Local oModel := PARAMIXB[1]
Local nOperation := oModel:GetOperation()
Local lRet               := .T.

If nOpertation nOperation == MODEL_OPERATION_UPDATE .And. oModel:GetValue(" AD1->AD1_STATUS ") == "93"
      lRet  lRet := .F.
      Help   Help( "" ,1, "FT300ABHelp",,STR001,1) // "A oportunidade não pode ser alterada, pois, já está Ganhasuspensa." 

EndIf    

, 1 )
EndIf

Return( lRet )