Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Bloco de código
titleTabela de entrada: tmp-cpc-processa-A500-entrada
def temp-table tmp-cpc-processa-a500-entrada no-undo
field nm-ponto-chamada-cpc          as char format "x(15)"
    field in-evento-programa            as char format "x(06)"
    field idi-tipo-arquivo-ptu          as integer
    field dt-realizacao                 as date
    field cd-movto                      as int
    field cd-tipo-tab                   as int.
Definição campo a campo da tabela de entrada
  • in-evento-programa - nome do evento (utilizado para pontos que possuem múltiplas chamadas);
  • nm-ponto-chamada-cpc - nome do ponto de chamada da CPC;
  • idi-tipo-arquivo-ptu - indicador do tipo de arquivo importado. Valores: 500 - PTU A500 Cobrança, 520 - PTU A500 Aviso.
  • dt-realizacao -
  • cd-movto -
  • cd-tipo-tab -


Bloco de código
titleTabela de saída: tmp-cpc-processa-A500-saida
def temp-table tmp-cpc-processa-a500-saida no-undo
field lg-undo-retry                 as log
    field cd-erro                       as integerint
    field ds-mensagem                   as char format "x(75)"
    field cd-movto-saida                as int
    field cd-tipo-tab-saida             as int.

Definição campo a campo da tabela de saída

  • lg-undo-retry - campo que indica se ocorreram erros na CPC. Deve retornar "yes" se ocorrer algum erro ou "no" se o processo for concluído sem erros;
  • cd-erro - código do erro, pode ser valor zero;
  • ds-mensagem - mensagem de erro que deve ser retornada para o programa chamador caso ocorra algum erro na CPC.
  • cd-movto-saida -
  • cd-tipo-tab-saida -
Informações

O retorno de um registro da tabela temporária de saída tmp-cpc-processa-a500-saida é obrigatório

...