Histórico da Página

#INCLUDE 'TOTVS.CH'
#INCLUDE "PROTHEUS.CH"

/*/{Protheus.doc} F475AGRV 
Ponto de entrada executado após o commit de dados do modelo.         
ParamIxb[1] -  Recno na tabela SE5
ParamIxb[2] -  Processo que está invocando a gravação das tabelas FK5/SE5. 
@type       Function
@author     TOTVS
@return     Nil
/*/
User Function F475AGRV()
    
	Local nRecSE5  := Paramixb[1]
	Local cEfetiva := Paramixb[2]

	If cEfetiva == 'E'		//Efetivação
		//Aqui você realiza as gravações complementares da sua regra de negócio no processo de efetivação.   	
	ElseIf cEfetiva == 'C'		//Cancelamento da Efetivação
 		//Aqui você realiza as gravações complementares da sua regra de negócio no processo de cancelamento de efetivação.
	EndifEndIf

Return Nil