CPC-RTAPI026.P

• Rotina utilizada para:
• Tratar a obrigatoriedade da autorização de acordo com lógica específica do cliente.
• Tratar o responsável pela autorização de acordo com lógica específica do cliente.
• 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.

...

"AUTORIZACAO"
"RESP-AUTORIZA"

"ANTES-AUT-AUDIT"

Include das definições das tabelas temporárias

...

Tabela de entrada tmp-cpc-rtapi026-entrada

def temp-table tmp-cpc-rtapi026-entrada no-undo

field nm-ponto-chamada-cpc                             as char format "x(15)"
field cd-local-atendimento                                  as int format '999'
field cd-modalidade                                           as int format '99'
field cd-plano                                                     as int format '99'
field cd-tipo-plano                                              as int format '99'
field cd-unidade-prestador                                 as int format '9999'
field cd-prestador                                               as int format '99999999'
field cd-procedimento                                        as int format '99999999'
field cd-modulo                                                  as int format '99'
field cd-grau-parentesco                                    as    as int format '99'

field in-tipo                                                         as char format "x(30)".

Definição campo a campo da tabela de entrada 

• • nm-ponto-chmada-cpc – Ponto de chamada da CPC."AUTORIZACAO".
  • "RESP-AUTORIZA".
  • cd-local-atendimetno atendimento – Código do local de atendimento.
  • cd-modalidade – Código da modalidade.
  • cd-plano – Código do plano.
  • cd-tipo-plano – Código do tipo de plano.
  • cd-unidade-prestador – Código da unidade do prestador executante.
  • cd-prestador – Código do prestador executante.
  • cd-procedimento – Código do procedimento (8 dígitos).
  • cd-modulo – Código do módulo de cobertura.
  • cd-grau-parentesco – Código do grau de parentesco.
  • in-tipo - Tipo de beneficiário: "BENEF-BASE" ou "BENEF-FORA-BASE"

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

...

field lg-erro                                                        as logical
field ds-mensagem-erro                                    as char format "x(100)"
field lg-autoriza                                                 as log
field in-responsavel-autorizacao                        as as char format "x(1)"

field lg-valida-aut-audit                                     as logical initial yes.

Definição campo a campo da tabela de saída

• lg-erro – indica que ocorreu algum erro durante o processamento.
• ds-mensagem-erro – Retorna a mensagem de errro.
• lg-autoriza – indica se a autorização não é obrigatória (quando Yes).
• in-responsavel-autorizacao – Responsável pela autorização, E – Empresa, U – Unidade, A - Ambos, N - Não Necessário.
• lg-valida-aut-audit - Log que indica se deve validar a necessidade de responsável de autorização pelo AT.