Árvore de páginas

Rotina que permitira à operadora desconsiderar a via da carteira do beneficiário no processo de consistência da carteira e via da carteira do beneficiário, desde que exista uma outra via ativa no sistema, para a carteira do beneficiário.
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 rotina RTAPI022.P, no ponto de consitencia da via da carteira do beneficiário.
Ponto de Utilização
"CONS-VIA-CART"
Include das definições das tabelas temporárias
RTAPI022.P
Tabelas de entrada e saída
Tabela de entrada tmp-cpc-rtapi022-entrada
def temp-table tmp-cpc-rtapi022-entrada no-undo
field in-evento-programa as char format "x(10)"
field nm-ponto-chamada-cpc as char format "x(15)"
field in-entidade as char format "x(02)"
field cd-unidade-carteira like car-ide.cd-unimed
field cd-carteira like car-ide.cd-carteira-inteira
field nr-via-carteira like car-ide.nr-carteira.
Definição campo a campo da tabela de entrada tmp-cpc-rtapi022-entrada
in-evento-programa – Evento do programa que chama a CPC-RTAPI022.P.
nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa/rotina que a utiliza. Para a rotina RTAPI022.P : "CONS-VIA-CART".
in-entidade – Identifica o modulo do sistema SERIOUS que esta efetuando acesso a rotina;
cd-unidade-carteira – Código da unidade da carteira do beneficiário;
cd-carteira – Código da carteira do beneficiário
nr-via-carteira – Número da via da carteira do beneficiário

Tabela de saida tmp-cpc-rtapi022-saida
def temp-table tmp-cpc-rtapi022-saida no-undo
field nr-via-carteira like car-ide.nr-carteira
field lg-undo-retry as log
field ds-erro as char.
Definição campo a campo das tabelas de saida tmp-cpc-rtapi058-saida e tmp-rtapi058-saida
nr-via-carteira – Número da via da carteira do beneficiário RETORNADO PELA ROTINA, CONFORME LÓGICA ESPECIFICA DO CLIENTE.
lg-undo-retry – Variável que controla se erros aconteceram dentro da CPC. Deve retornar SIM se erros acontecerem e NÃO se o processo foi concluído por completo.
ds-erro – Variável que retornar mensagem de erro, se ocorrido (lg-undo-retry = YES).

  • Sem rótulos