CPC-RTPACOTE.P

• Rotina utilizada para permitir a operadora visualizar somente a descrição auxiliar do pacote.
• Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.

...

Pontos de Utilização

"BROWSE-PACOTE"

"ANT-CRIA-TMPPAC"

Include das definições das tabelas temporárias

...

Tabela de entrada tmp-cpc-rtpacote-entrada

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

...

         field nm-ponto-chamada-cpc

...

as char format "x(15)"
         field cd-pacote like paproins.cd-pacote
         field cd-unidade like paproins.cd-unidade
         field cd-prestador like paproins.cd-prestador
         field cd-modalidade like paproins.cd-modalidade
         field cd-plano like paproins.cd-plano
         field cd-tipo-plano like paproins.cd-tipo-plano
         field dt-inicio-vigencia like paproins.dt-inicio-vigencia
         field dt-limite like paproins.dt-limite
         field cd-modalidade-benef like ti-pl-sa.cd-modalidade
         field cd-plano-benef like ti-pl-sa.cd-plano
         field cd-tipo-plano-benef like ti-pl-sa.cd-tipo-plano.

Definição campo a campo da tabela de entrada

• • • nm-ponto-chmadachamada-cpc – Ponto : nome do ponto de chamada da CPC."BROWSE-PACOTE".
    • cd-pacote: código do pacote
    • cd-unidade: unidade do prestador do pacote
    • cd-prestador: prestador do pacote
    • cd-modalidade: modalidade do pacote
    • cd-plano: plano do pacote
    • cd-tipo-plano: tipo de plano do pacote
    • dt-inicio-vigencia: início da vigência do pacote
    • dt-limite: fim da vigência do pacote
    • cd-modalidade-benef: modalidade do beneficiário
    • cd-plano-benef: plano do beneficiário
    • cd-tipo-plano-benef: tipo de plano do beneficiário
      
      

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

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

...

         field lg-erro as log
       

...

 field ds-mensagem

...

as char format "x(75)"

...

         field lg-desc-pacote as log
       

...

 field lg-continua as logical initial yes.

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

• • • lg-erro – Indica que : indica se ocorreu algum erro durante o processamento .da CPC
    • ds-mensagem – Retorna : retorna a mensagem da CPC.
    • brlg-desc-pacote – Variável que : indica se o browse-pacote estará visível ou não na tela.
    • lg-continua: indica se deve continuar o processamento