Árvore de páginas

Versões comparadas

Chave

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

...

  • Rotina utilizada para permitir alterar especialidade campo específico por Prestadores x Inst. Acreditadora.
  • Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.
  • Será permitido para esta CPC apenas um registro na tabela temporária de saída.

...

def temp-table tmp-cpc-cg0312s-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.

...

    • 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.
    • cdn-seq-ender                - Sequencia Endereço.

...

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

...