CPC-AC0001R.p

• Rotina utilizada para permitir a operadora bloquear o atendimento ao beneficiário (Base e Intercãmbio), a partir de regras especifica.
• Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.

...

• "FINAL-PROCESSO"
• "TESTA-LEITORA"
• "FIM-INC-ALT-OUT"

Include das definições das tabelas temporárias

...

Tabela de entrada tmp-cpc-ac0001r-entrada

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

field in-evento-programa             as char format "x(0610)"
field nm-ponto-chamada-cpc        as char format "x(15)"
field r-usuario                                as recid
field r-out-uni                                 as recid
field lg-mens-tela as log
field cd-clinica                                like clinicas.cd-clinica
field cd-unidade                           like like unimed.cd-unimed
field cd-prestador                          like preserv.cd-prestador.

Definição campo a campo da tabela de entrada

• • • in-evento-programa – Evento do programa que chama a cpc-ac0001r. Os valores desse campo podem ser:"Inclui". 
    • nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa ac0001r.p:
    • "PROCESSO-FINAL"
    • r-usuario – Recid da tabela USUARIO. Seu conteúdo será valido se o beneficiário que se estiver "consistindo" for da BASE.
    • r-out-uni – Recid da tabela OUT-UNI. Seu conteúdo será valido se o beneficiário que se estiver "consistindo" for de INTERCÂMBIO.
    • lg-mens-tela - Indica se a mensagem será listada na tela.
    • Cdcd-clinica – Código da clínica.
    • Cdcd-unidade – Código da unidade.
    • Cdcd-prestador – Código do prestador.

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

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

field cd-erro-sistema            as as char format "x(04)"
field ds-mensagem             as char format "x(40)"
field lg-cartao                      as as log
field lg-biometria                 as logas log
field lg-undo-retry as log.

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

• • • cd-erro-sistema – Indica o código do erro do sistema.
    • ds-mensagem – Mensagem que será visualizada pelo usuário, conforme a atuação da CPC.
    • Lglg-cartão – Desconsidera o uso da leitora de cartão.
    • Lglg-biometria – Desconsidera o uso da leitora biométrica.

...

• • • lg-undo-retry - Indica se houve erro na cpc.