Histórico da Página
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.
...
Localização
...
- Dentro do programa ac0001r.p e após a consistência da carteira do beneficiário. Ressalta-se que somente será chamada a CPC caso ela esteja ativa, no cadastro de CPC, e não tenha ocorrido nenhum erro na consistência da carteira do cliente.
Âncora
- "FINAL-PROCESSO"
- "TESTA-LEITORA"
...
- cpc-ac0001r.i
Âncora
anchor
Tabela de entrada tmp-cpc-ac0001r-entrada
def temp-table tmp-cpc-ac0001r-entrada no-undo
field in-evento-programa as char format "x(06)"
field nm-ponto-chamada-cpc as char format "x(15)"
field r-usuario as recid
field r-out-uni as recid
field cd-clinica like clinicas.cd-clinica
field cd-unidade
...
like unimed.cd-unimed
field cd-prestador like preserv.cd-prestador.
...
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.
- Cd-clinica – Código da clínica;
- Cd-unidade – Código da unidade;
- Cd-prestador – Código do prestador;
...
def temp-table tmp-cpc-ac0001r-saida no-undo
field cd-erro-sistema as char format "x(04)"
field ds-mensagem as char format "x(40)"
field lg-cartao
...
as log
field lg-biometria
...
as log.
Âncora
- 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.
- Lg-cartão – Desconsidera o uso da leitora de cartão.
- Lg-biometria – Desconsidera o uso da leitora biométrica.