Histórico da Página
Descrição
Este ponto epc permite alterar o estabelecimento utilizado para integração com o módulo Fiscal.
Ponto de Entrada - beforeEstFiscal
Descrição: | Permite alterar o estabelecimento utilizado para integração do SIGAGFE com o Fiscal Datasul. | ||||||||
Localização: | Antes da criação da tabela temporária "tt-doc-fiscal" | ||||||||
Eventos: | beforeEstFiscal | ||||||||
Programa Fonte: | cdp/cdf433.i2 | ||||||||
Função: | CD0433 - Monitor de Integração SIGAGFE X Datasul CD0433RP - Integração RPW SIGAGFE X Datasul CDF433 - Integração batch SIGAGFE X Datasul | ||||||||
Parâmetro: |
| ||||||||
Retorno: |
|
Exemplo:
IF p-ind-event = "beforeIntegMLA" THEN DO:
FIND FIRST tt-epc NO-LOCK
WHERE tt-epc.cod-event = "beforeEstFiscal":U
AND tt-epc.cod-parameter = "EstFiscal":U NO-ERROR.
IF NOT AVAIL tt-epc THEN
RETURN "NOK":U.
ASSIGN cTag = tt-epc.val-parameter .
IF cTag <> "" THEN DO:
ASSIGN iTam = NUM-ENTRIES(cTag,"|")
cFilDF = ENTRY(iTam - 1,cTag,"|").
CREATE tt-epc.
ASSIGN tt-epc.cod-event = "beforeEstFiscal"
tt-epc.cod-parameter = "estabel"
tt-epc.val-parameter = cFilDF.
Return "OK":U.
END .