Static Function ModelDef()

Local oCommit :=  TC790EVENT():New()

oModel:InstallEvent(" TC790EVENT", /*cOwner*/, oCommit)

Return(oModel)

Class TC790EVENT FROM FWModelEvent
	Method New()
	Método chamados pelo MVC 
	Method Destroy() //limpar atributos como array,objetos da memória.
	Method After()  //quando ocorrer as ações do commit depois da gravação de cada submodelo (field ou cada linha de uma grid).
	Method Before() //quando ocorrer as ações do commit antes  da gravação de cada submodelo (field ou cada linha de uma grid).
	Method AfterTTS()  //quando ocorrer as ações do commit depois da transação.
	Method BeforeTTS() //quando ocorrer as ações do commit antes  da transação.
	Method InTTS() //quando ocorrer as ações do commit depois das gravações porém antes do final da transação.
	Method VldActivate() //quando ocorrer as ações de validação do Model.
	Method ModelPreVld() //quando ocorrer as ações de pre validação do Model.
	Method ModelPosVld() //quando ocorrer as ações de pos validação do Model.
	Method GridPosVld() //quando ocorrer as ações de pós validação do Grid.
	Method GridLinePreVld() //quando ocorrer as ações de pre validação da linha do Grid
	Method GridLinePosVld() //quando ocorrer as ações de pos validação da linha do Grid
	Method FieldPreVld() //quando ocorrer a ação de pré validação do Field
	Method FieldPosVld() //quando ocorrer a ação de pós validação do Field
End Class

Method New() Class  TC790EVENT
Return

Method Before(oSubModel, cModelId, cAlias, lNewRecord) Class TC790EVENT
Return

Method BeforeTTS(oSubModel, cModelId) Class TC790EVENT
Return