cpc-rtabrapre.p0

• Rotina utilizada para permitir controlar/parametrizar a abrangência, conforme regra especifica da operadora, sobrepondo a regra de abrangência por prestador do Gestão de Planos.
• Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.
• Será permitido para esta CPC apenas um registro na tabela temporária de saída. Caso possuir mais de um registro um erro será reportado.

Localização
Dentro do programa rtabrapre.p antes da validação da abrangência por prestador.
Ponto de Utilização
"ABRA-PROCED"
"ABRA-USUARIO"
"BLOQ-ABRA-PROCE"
Include das definições das tabelas temporárias
cpc-rtabrapre.i
Tabelas de entrada e saída
Tabela de entrada tmp-cpc-rtabrapre-entrada
def temp-table tmp-cpc-rtabrapre-entrada no-undo
field in-evento-programa as char format "x(10)"
field nm-ponto-chamada-cpc as char format "x(15)"
field cd-unidade-destino like abrauni.cd-unidade-destino
field cd-abrangencia-plano like abrauni.cd-abrangencia-plano
field in-tipo-prestador like abrauni.in-tipo-prestador
field cd-unidade-prestador-exec like abrauni.cd-unidade-prestador-exec
field cd-prestador-exec like abrauni.cd-prestador-exec
field lg-mens-tela as log
field cd-procedimento like ambcbhpm.cd-amb
field r-usuario as recid
field lg-possui-abrapre-aux as log.
Definição campo a campo da tabela de entrada
in-evento-programa – Identifica qual procedimento a cpc deve executar no momento que está sendo chamada
nm-ponto-chamada-cpc – Ponto de chamada de cpc que deve ser "ABRA-PROCED"
cd-unidade-destino – Identifica a Unidade de Negociação.
cd-abrangencia-plano – Identifica o código da abrangência a ser considerado para permissão do prestador e procedimento.
in-tipo-prestador – Identifica se o prestador é 0=Executante, 1=Principal ou 2=Ambos.
cd-unidade-prestador-exec – – Identifica a unidade do prestador parametrizada para a abrangência por prestador e procedimento. Quando este campo possuir o conteúdo 0 (zero) serão consideradas todas as unidades de prestador para a validação de abrangência por prestador e procedimento.
cd-prestador-exec – Identifica o prestador parametrizado para a abrangência por prestador e procedimento. Quando este campo possuir o conteúdo 0 (zero) serão considerados todos os prestadores para a validação de abrangência por prestador e procedimento.
lg-mens-tela - Variável que indica se a mensagem pode ser exibida na tela ou não.
cd-procedimento – Identifica o procedimento parametrizado para a abrangência por prestador e procedimento. Quando este campo possuir o conteúdo 0 (zero) serão considerados todos os procedimentos para a validação de abrangência por prestador e procedimento.
R-usuario – recid da tabela usuário.
Lg-possui-abrapre-aux – Recebe valor lógico que informa se prestador possui abrangência.
Tabela de saída tmp-cpc-rtabrapre-saida
def temp-table tmp-cpc-rtabrapre-saida no-undo
field lg-undo-retry as log
field ds-mensagem as char format "x(75)"
field lg-achei-abrangencia as log
Field lg-possui-abrapre-ret as log.
Definição campo a campo da tabela de saída
lg-undo-retry – Variável que controla os erros que podem ocorrer na CPC.
ds-mensagem – Variável que recebe a descrição dos erros que ocorreram na CPC.
lg-abrapre-achei-abrangencia – Variável que indica se a rotina encontrou parametrização de Abrangência, conforme regra da operadora.
Lg-possui-abrapre-ret – Variável de retorno que indica se prestador possui abrangência ou não.