Linha de Produto: | Microsiga Protheus | ||||
Segmento: | Serviços | ||||
Módulo: | Financeiro | ||||
Rotina: |
| ||||
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 |
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.
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: |
|
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
