Histórico da Página

//-----------------------------------------
/*/{Protheus.doc} ModelDef
Definição do modelo de Dados
@author rodrigo.antonio
@version 1.0
/*/
//-----------------------------------------
Static Function ModelDef()
Local oModel
Local bCommit := {|oMld| MyCommit(oMld)}
Local oStr1:= Nil
oModel := MPFormModel():new("ID_MODEL",/*bPre*/,/*bPost*/,bCommit)
oModel:SetDescription('Teste')
oModel:addFields('FIELD1',,oStr1)
Return oModel
//-----------------------------------------
/*/{Protheus.doc} MyCommit
Commit do modelo
@author rodrigo.antonio
@version 1.0
/*/
//----------------------------------------
Static function MyCommit(oModel)
Local lRet 
//----------------------------------------
// Aqui podemos chamar funções antes do 
// Commit Padrão
//----------------------------------------
__FazAlgoAntesCommit()
//----------------------------------------
// Aqui temos a chamada da funcao padrão 
// de gravação do MVC
//----------------------------------------
lRet := fwformcommit(oModel)
//----------------------------------------
// Aqui podemos chamar funções depois do 
// Commit Padrão,verificando sempre se o 
//commit foi realizado.
//----------------------------------------
If lRet
	__FazAlgoDepoisCommit()
End if
Return lRet