Árvore de páginas

Versões comparadas

Chave

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

...

def temp-table tmp-cpc-dtvwaf0410a-entrada     no-undo
      field nm-ponto-chamada-cpc as char format "x(15)"
      field in-evento-programa        as char format "x(10)"
      field cd-unidade                      like prestdor-end-instit.cd-unidade
      field cd-prestador                   like prestdor-end-instit.cd-prestador
      field cod-instit                         like prestdor-end-instit.cod-instit
      field cdn-seq-ender                like prestdor-end-instit.cdn-seq-ender.h-handle-temporaria       as handle.

Definição campo a campo da tabela de entrada

    • nm-ponto-chamada-cpc  - Nome do ponto de chamada da cpc dentro do programa que a utiliza.
    • in-evento-programa        - Nome do evento de chamada da cpc dentro do programa que a utiliza. Evento: "MODIFICA-ESPEC"
    • cd-unidade                     - Código da unidade do prestador.
    • cd-prestador                   - Código do Prestador.
    • cod-instit                         - Instituição Acreditadora.
    • h-handle-temporaria       - Tabela temporária de modalidadescdn-seq-ender                - Sequencia Endereço.

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

def temp-table tmp-cpc-dtvwaf0410a-saida       no-undo
      field lg-undo-retry                    as log
      field ds-mensagem-retorno     as char format "x(75)"
      field cd-especialidade as integer.

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

    • lg-undo-retry    - Informa ao programa se deve continuar ou voltar e desfazer.
    • ds-mensagem-retorno - Mensagem de erro.cd-especialidade - Código da Especialidade.