Histórico da Página

#INCLUDE 'TOTVS.CH'

/*/{Protheus.doc} FA473001FA473005
Ponto de entrada para executar operações no final da rotina F473Concil após o controle de transação.
 
oModel - Modelo da rotina de conciliaçao bancária
 
@type       Function
@author     TOTVS
@since      18/11/2020
@return     @lRet
/*/

User Function FA473005
    Local oModel        := Paramixb
    Local oModelDet		:= oModel:GetModel("CONDETAIL")paramixb
    Local lRetlret          := .T.   
    oModel		:= FWModelActive()
    
    If oModel:isActive()

        oModelDet		:= oModel:GetModel("CONDETAIL")
        lRet          := .T.

        If Len(oModelDet:aLINESCHANGED) Len(oModel:AERRORMESSAGE[6]) > 0
            lRet          := .TF.
            MsgAlert("AteraçãoErro :  efetuada"+oModel:AERRORMESSAGE[6])
        Else
            lRet          := .FT.
            MsgAlert("Nenhum registroerro alteradoencontrado")
        EndIf
    
    Else
        MsgAlert("Modelo não foi ativado")
    Endif
Return(lRet)