Árvore de páginas

Versões comparadas

Chave

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

...

Tabela de entrada tmp-cpc-rc0310a-entrada

def temp-table tmp-cpc-rc0310a-entrada no-undo

field in-evento-programa                    as as char format "x(06)"
field nm-ponto-chamada-cpc             as char format "x(15)"
field tp-movto                                    as as char
field r-docrecon                                  as as recid
field r-movto                                      as recidas recid
field row-docrecon as rowid
field cd-tipo-cobranca as int
field cd-cod-glo                                  like like codiglos.cd-cod-glo.

Definição campo a campo da tabela de entrada

  • in-evento-programa – Evento do programa que chama a cpc-rc0310a.p. Os valores desse campo pode ser:
  • "INCLUI" OU "ANTES-COBRANCA"
  • nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa rc0310a.i:
  • "GLOSA-MANUAL"
  • tp-movto – Tipo do movimento que está sofrendo a Glosa Manual. Poderá ser igual a "documento", "procedimento" ou "insumo".
  • r-docrecon – Recid do documento (DOCRECON). Será o recid da tabela DOCRECON quando tp-movto for igual a "documento".
  • r-movto – Recid do movimento. Será o recid da tabela MOVIPROC quando tp-movto for igual a "procedimento" e será o recid da tabela MOV-INSU quando tp-movto for igual a "insumo";
  • row-docrecon
  • cd-tipo-cobranca
  • cd-cod-glo – Código da glosa manual, informada pelo usuário.


Tabela de saída tmp-cpc-rc030a-saida

def temp-table tmp-cpc-rc0310a-saida no-undo

field lg-undo-retry                            as as log
field lg-atualiza                                atualiza as log
field listafield lista-tipo-cob                            cob as char
field ds-mensagem                         as char format "x(75)".

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

...