Histórico da Página

#include "protheus.ch"

//-------------------------------------------------------------------
/*/{Protheus.doc}  FA090TIT 

 Ponto de entrada que permite confirmar ou negar a baixa de um título selecionado

@param Paramixb[1] – Banco
@param Paramixb[2] – Agencia
@param Paramixb[3] – Conta
@param Paramixb[4] – Cheque

//-------------------------------------------------------------------    

#include "protheus.ch"
     
User Function FA090TIT ()
    Local lRet := .T.
    Local cBcoPgto := PARAMIXB[1]
    Local cAgcPgto := PARAMIXB[2]
    Local cCtoPgto := PARAMIXB[3]
    Local cCheqPgto := Iif(!Empty(PARAMIXB[4]),PARAMIXB[4],"Não utilizou cheque")
    Local cTitulo   :=  SE2->E2_PREFIXO + SE2->E2_NUM
  

    	lRet:= MsgYesNo("Confirmar a baixa do título " + cTitulo + CRLF + CRLF + ;
        " No banco: " + cBcoPgto + CRLF + CRLF + ;
        "Agencia: " + cAgcPgto + CRLF + CRLF + ;
        "Conta: " + cCtoPgto + CRLF + CRLF +;
        "Com o cheque: " + cCheqPgto   ,"PE: FA090TIT")



Return lRet