Linha Microsiga Protheus

Árvore de páginas

Implementação do ponto de entrada FI040SE1

 

Linha de Produto:

Microsiga Protheus

Segmento:

Serviços

Módulo:

Financeiro

Função:

FINI040

Situação/Requisito:

Solicitação de novo ponto de entrada para rotina de integração do contas a receber (FINI040).

Solução/Implementação:

Realizada a criação do ponto de entrada "FI040SE1", para inclusão de novos campos a serem gravados ao título a receber incluído via mensagem única(INTEGRAÇÃO).

ISSUE's relacionadas:

MSERV-5314

 

FI040SE1 - Manipulação dos campos da SE1 via integração contas a receber(FINI040)

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Serviços

Módulo:

Financeiro

Rotina:

Rotina

Nome Técnico

FINI040

Integração EAI (AccountReceivableDocument)

Ponto de Entrada:

FI040SE1

ISSUE's Relacionadas

MSERV-5134

País(es):

Brasil

Banco(s) de Dados:

Todos

Tabelas Utilizadas:

TopConnect

Sistema(s) Operacional(is):

Todos

Descrição

Implementado ponto de entrada FI040SE1 para manipulação dos campos antes da execução da rotina automática do contas a receber, via integração.

Ponto de Entrada

Descrição:

Integração com o adapter EAI para envio e recebimento do título a receber.

Eventos:

AccountReceivableDocument

Programa Fonte:

FINI040

Função:

FINI040

Retorno:

Nome

Tipo

Descrição

Obrigatório

 aRet

Array

Retorna um array com as informações dos campos a serem gravados ao título a receber

Sim

 

Exemplo:

#Include 'Protheus.ch'

#include 'totvs.ch'

User Function FI040SE1()

Local aRet := PARAMIXB[1]
Local nOper := PARAMIXB[2]
Local nPos := 0


// Inclusão
If nOper == 3

     If nPos := aScan(aRet,{ |x| x[1] == "E1_HIST"}) > 0
          aRet[nPos] := {"E1_HIST","INTEG PE-FI040SE1",Nil}
     Else
          aAdd(aRet,{"E1_HIST","INTEG PE-FI040SE1",Nil})
     EndIf

EndIf

Return aRet