Histórico da Página

#INCLUDE "'TOTVS.CH"'

/*/{Protheus.doc} FA473005
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çaoconciliação bancária
 
@type       User Function
@author     TOTVS
@since      18/11/2020
@return     lRet, retorno lógico da rotina
/*/

User Function FA473005
    Local oModel		:= 
	FWModelActive()
    Local oModeloModelDet		:= paramixboModel:GetModel("CONDETAIL")
    Local lretlRet          := .T.
    
  	If Len(oModel:AERRORMESSAGE[6]) > 0
		lRet := .F.      
        MsgAlertIf oModelDet:GetValue("Erro : " + oModel:AERRORMESSAGE[6])IG_DTEXTR") > dDATABASE
    Else
        lRet          := .TF.
          MsgAlert("Nenhum erro encontrado"  Help("",1,"FA473005",,"A data do titulo não pode ser superior a data do sistema " )
    EndIf
    End

  Return(lRet)
  lRet