• 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.