CPC-AT0110I.p

• 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 at0110i.p antes da validação da abrangência por prestador.

Ponto de Utilização

• "ABRA-PROCED".
• "PROC-PREST"

Include das definições das tabelas temporárias

...

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 cd-procedimento                      like ambcbhpm.cd-amb

field lg-cons-prest-exc                     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.
  • 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.

...

• • lg-cons-prest-exc - Considerar prestadores excluídos.

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

...

field lg-undo-retry                    as log
field ds-mensagem                 as char format "x(75)"
field lg-achei-abrangencia       as log

field cd-unidade                like preserv.cd-unidade
field cd-prestador              like preserv.cd-prestador
field cd-vinculo                like previesp.cd-vinculo       
field cd-especialid             like previesp.cd-especialid
field cd-local-atendimento      like locaaten.cd-local-atendimento
field tp-prestador              as char
field lg-acres-proced           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.
  • cd-unidade – Identifica a Unidade
  • cd-prestador - Identifica o prestador
  • cd-vinculo – Identifica o vínculo do prestador
  • cd-especialid – Identifica a especialidade do prestador
  • cd-local-atendimento – Identifica o local do atendimento
  • tp-prestador  – Identifica se o prestador é 0=Executante, 1=Principal ou 2=Ambos.
  • lg-acres-proced - Indicador que serve para adicionar ou retirar procedimentos, isto é, caso o indicador for SIM então aquele prestador naquela especialidade poderá executar o procedimento, porém o mesmo não deve estar cadastrado na Procedimento X Especialidade. Caso o Indicador for Não então aquele prestador naquela especialidade não poderá executar o procedimento, porém o cadastramento do mesmo no Procedimento X Especialidade é obrigatório.