CPC-WAC0033A.P

Rotina utilizada para:

• Permitir visualizar o tipo de plano do beneficiário.
• Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.

...

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-wac0012a1wac0033a-entrada

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

    field in-evento-programa                      as char format "x(06)"
    field nm-ponto-chamada-cpc          as char format "x(15)"
    field  in-tipo-regra               as char format "x(15)"
field cd-modalidade 3)"     
    field  cd-local-atend              as int  format 999        
    field  cd-unid-benef               as int  format 9999       
    field  dt-nascimento               as date format 99/99/9999 
    field  cd-unid-exec                as int  format 9999       
    field  cd-prest-exec               as int  format 99999999   
    field  cd-esp-prest-exec           as int  format 999        
    field  cd-procedimento             as int  format 99999999
    field  dt-realizacao               as date format 99/99/9999 
    field cd-modalidade                 like propost.cd-modalidade
    field cd-plano                      like propost.cd-plano     
    field  cd-tipo-plano               like propost.cd-tipo-plano
    field cd-tipo-plano  nr-termo                    as int  format 999999     
    field  cd-usuario                  as int  format 999999
    field nr-rowid-mov                  as rowid
     like propost.cd-tipo-planofield r-out-uni                     as recid.

Definição campo a campo da tabela de entrada

• • • inr-evento-programa – Evento do programa que chama a cpc-wac0033a.p.
    • nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa wac0033a.w:
    • "TROCA-DESC".
    • cd-modalidade – código da modalidade do beneficiário.
    • cd-plano – código do plano do beneficiário.
    • cd-tipo-plano – código do tipo de plano do beneficiário.
    • out-uni  - Tabela de beneficiarios de intercambio disponivel na 12.1.2305

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

...

• • • lg-undo-retry – Variável que controla se erros aconteceram dentro da CPC. Se o retorno desta variável for igual a SIM, indicará que erros aconteceram e se o retorno for igual à NÃO, indicará que o processo foi concluído por completo.
    • ds-mensagem - Mensagem que deverá ser retornada ao usuário, quando indicação de ocorrência de erro.
    • ds-tipo-plano – descrição do tipo de plano do beneficiário.

...