O ponto de entrada FA430SE2 permite posicionar a tabela contas a pagar.

01. DADOS GERAIS

02. DESCRIÇÃO

O ponto de entrada FA430SE2 tem como objetivo permitir posicionar a tabela SE2 (Contas a Pagar) para que seja efetivada a
baixa via retorno de comunicação bancária contas a pagar.

IMPORTANTE

• Caso o ponto de entrada retorne falso, ou não tenha retorno, a baixa do título não será efetivada.

03. PARÂMETROS

aValores => array de 16 posições

aValores[01]  = Identificador do título.
aValores[02]  = Data da baixa/pagamento
aValores[03]  = Tipo do título/nota
aValores[04]  = Nosso número
aValores[05]  = Valor da despesa bancária
aValores[06]  = Valor do desconto
aValores[07]  = Valor do abatimento
aValores[08]  = Valor do pagamento
aValores[09]  = Valor do juros
aValores[10]  = Valor da multa
aValores[11]  = Código do fornecedor
aValores[12]  = Código da ocorrência
aValores[13]  = CGC
aValores[14]  = Valor da correção monetária
aValores[15]  = Código de rejeição
aValores[16]  = Linha atual do arquivo de retorno

04. RETORNO

05. EXEMPLO DE UTILIZAÇÃO

#INCLUDE "PROTHEUS.CH"

User Function FA430SE2()
    Local lRet       := .F.
    Local aSE2       := SE2->(GetArea())
    Local cIdCnab    := ParamIxb[1,1]
	Local nTamIdCnab := TamSX3("E2_IDCNAB")[1]
	
    SE2->(dbSetOrder(13))

    If !(lRet := SE2->(DbSeek(Substr(cIdCnab, 1, nTamIdCnab))))
        RestArea(aSE2)
        lRet := Nil
    EndIf
Return lRet