Documento de API

Objetivo: Validar, gerar o XML de integração e enviar para o webservice do Siscomex.

Considerações Gerais:

Esta API irá receber o handle da tabela e realizar o envio de operadores estrangeiros para o Siscomex.

Sendo assim, os parâmetros passados para a API devem ser conforme abaixo.

    IF NOT VALID-HANDLE(h-cdapi177) THEN
        RUN cdp/cdapi177.p PERSISTENT SET h-cdapi177.

    IF NOT VALID-HANDLE(h-acomp) THEN
        RUN utp/ut-acomp.p PERSISTENT SET h-acomp.

    {utp/ut-liter.i "Integra‡Æo_Operador_Estrangeiro_Siscomex" *}
    RUN pi-inicializar  IN h-acomp (INPUT RETURN-VALUE).
    run pi-desabilita-cancela in h-acomp.

    RUN setAccompHandle IN h-cdapi177 (INPUT h-acomp).

    RUN executaEnvioSiscomex IN h-cdapi177 (INPUT INPUT FRAME fPage0 i-emit-ini,
                                            INPUT INPUT FRAME fPage0 i-emit-fim,
                                            INPUT INPUT FRAME fPage0 c-nome-abrev-ini,
                                            INPUT INPUT FRAME fPage0 c-nome-abrev-fim,
                                            INPUT INPUT FRAME fPage0 d-dat-refer,
                                            INPUT INPUT FRAME fPage0 l-gera,
                                            INPUT INPUT FRAME fPage0 c-diretorio-json).

Parâmetros da API:

    DEFINE INPUT PARAMETER pCodEmitenteIni         LIKE emitente.cod-emitente          NO-UNDO.
    DEFINE INPUT PARAMETER pCodEmitenteFim       LIKE emitente.cod-emitente          NO-UNDO.
    DEFINE INPUT PARAMETER pNomeAbrevIni           LIKE emitente.nome-abrev            NO-UNDO.
    DEFINE INPUT PARAMETER pNomeAbrevFim         LIKE emitente.nome-abrev            NO-UNDO.
    DEFINE INPUT PARAMETER pDatRefer                    LIKE emitente-siscomex.dat-refer  NO-UNDO.
    DEFINE INPUT PARAMETER plSomenteJsonLocal    AS LOGICAL                                   NO-UNDO.
    DEFINE INPUT PARAMETER pcDiretorioGeracao     AS CHARACTER                              NO-UNDO.