Histórico da Página

Ponto de Entrada - Acionado após a gravação da Proposta Comercial

Exemplo:

User Function FT600GRV()

Local oModel := PARAMIXB[1]
Local oMdlProd := oModel:GetModel( "ADZPRODUTO" )
Local oMdlAces := oModel:GetModel( "ADZACESSOR" )
Local nOperation := oModel:GetOperation()
Local lRet := .F.

If nOperation == MODEL_OPERATION_UPDATE
If oMdlProd:GetValue( "ADZ_QTDVEN" ) > 10 .Or. oMdlAces:GetValue( "ADZ_QTDVEN" ) > 2
lRet := .T.
Alert( "FT600GRV - Pos Gravação da Proposta" )
EndIf
EndIf

Return( lRet )