CPC-BOATAUDITORY.p

Observação: Esta CPC somente é utilizada no Gestão de Planos 2.00.

• Rotina responsável por mostrar dados nos detalhes da guia.
• Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.

Localização

• Dentro da boatauditory.p.

Ponto de Utilização

• "FIM-DETALHES": Através desse ponto é possível mostrar mensagens em tela. Essas mensagens foram separadas em três tipos (retorno da CPC): Informativas ( tmp-cpc-boatauditory-saida.tp-mensagem = Info), Alertas ( tmp-cpc-boatauditory-saida.tp-mensagem = Warning) ou Erro ( tmp-cpc-boatauditory-saida.tp-mensagem = Error). 
  • Parâmetros de entrada aceitos além do nome do ponto:
    
    • aa-guia-atendimento
    • nr-guia-atendimento
• "APOS-PESSOA-UNI"
• "VALIDACAO"

Include das definições das tabelas temporárias

• cpc-boatauditory.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-boatauditory-entrada

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

field nm-ponto-chamada-cpc as char format "x(15)"
field in-evento-programa as char format "x(06)"
field h-tmp-benefs as handle
field id-pessoa as int.
field aa-guia-atendimento like guiautor.aa-guia-atendimento
field nr-guia-atendimento like guiautor.nr-guia-atendimento

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 – Evento do programa que chama CPC-boatauditory.P
  • tmp-benef - Temporária com informações do beneficiário
  • id-pessoa - Código da pessoa unificada
  • aa-guia-atendimento - Ano da guia de atendimento
  • nr-guia-atendimento  - Número da guia de atendimento

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

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

field lg-undo-retry                 as log
field ds-mensagem-retorno           as char format "x(75)"
field ds-mensagem-erro              as char format "x(75)"
field tp-mensagem                   as char /*Warning(maior prioridade) ou Info (menor prioridade).*/
field ds-help-mensagem              as char /* Mostrado como mais informacoes na tela */
field ds-parameters-mensagem        as char /* Mostrado como mais informacoes na tela */
field ds-observacao-interna         as char /* Mostrado como mais informacoes na tela */.

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

• • lg-undo-retry – Variável que desfaz o processo na CPC.
  • ds-mensagem-retorno – Variável que recebe a descrição de retorno da CPC.
  • ds-mensagem-erro -  Variável que recebe a descrição dos erros que ocorreram na CPC.
  • tp-mensagem -  Variável que indica o tipo da mensagem de retorno, que são: Warning (maior prioridade), Info (menor prioridade), ou Error (aborta o processo).
  • ds-help-mensagem -  Variável que recebe a descrição das mensagens que serão exibidas em tela (box superior).
  • ds-parameters-mensagem -  Variável que recebe a descrição das mensagens que serão exibidas em tela (box inferior).
  • ds-observacao-interna - Permite mudar a observação interna da guia.
    
    

   Tabela de saida tmp-cpc-boatauditory-dados

           def temp-table tmp-cpc-boatauditory-dados        no-undo
                   field cd-codigo                         as int
                   field ds-validacao                      as char.    

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

• • cd-codigo – .
  • ds-validacao – .