CPC-AT0110C3.p

• Rotina utilizada pela operadora de saúde para efetuar a atualização da informação "Qt Rep.Cob" (Quantidade de vezes que cobra a tabela médica do beneficiário) quando da inclusão de procedimento, via manual, no módulo AT.
• Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.

Localização

• Quando da solicitação da informação "Qt Rep.Cob" (Quantidade de vezes que cobra a tabela médica do beneficiário), no processo de inclusão de procedimento do módulo AT, e o parâmetro "Muda qt.vezes tab." do tipo de Guia estiver definido igual a "Não".
• Após localizar RESTRICAO PRESTADOR PRINCIPAL X MOVIMENTO X PACOTE.

Ponto de Utilização

• "MUDA-QT-REPASSE"
• "ENTIDADE"
• "ANT-INC-PACOTE"
• "ALTERA-QTD-AUT"

Include das definições das tabelas temporárias

• CPC-AT0110C3.I

Tabelas de entrada e saída

Tabela de entrada tmp-cpc- at0110c3-entrada

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

field in-evento-programa                  as char format "x(10)"
field nm-ponto-chamada-cpc            as char format "x(15)"
field cd-modalidade                          like propost.cd-modalidade
field cd-plano                                   like propost.cd-plano
field cd-tipo-plano                             like propost.cd-tipo-plano
field qt-repasse-cob                         like procguia.qt-repasse-cob
field cd-unid-princ                            like presev.cd-unidade
field cd-prestador-princ                    like preserv.cd-prestador
field cd-unid-solic                             like presev.cd-unidade
field cd-prestador-solic                     like preserv.cd-prestador
field cd-unid-exec                            like presev.cd-unidade
field cd-prestador-exec                     like preserv.cd-prestador
field r-usuario                                   as rowid
field r-outuni                                     as rowid
field cd-procedimento                      as int format "99999999"
field nr-guia-atendimento                 like procguia.nr-guia-atendimento
field aa-guia-atendimento                like procguia.nr-guia-atendimento
field cd-proc-insu                             like presmovt.cd-proc-insu
field lg-inclui-pacote                         as log.

Definição campo a campo da tabela de entrada

• • in-evento-programa – Evento do programa que chama CPC-AT0110C3.P. O valor desse campo pode ser "INCLUI;
  • nm-ponto-chamada-cpc – " MUDA-QT-REPASSE ";
  • cd-modalidade – Código da modalidade de comercialização;
  • cd-plano – Código de identificação do Plano no produto;
  • cd-tipo-plano - Código de identificação do Tipo de Plano no produto;
  • qt-repasse-cob – Quantidade de vezes, default da parametrização do sistema, que cobra a tabela médica do beneficiário.
  • cd-unid-princ – Código da unidade do prestador principal;
  • cd-prestador-princ – Código do prestadoe principal;
  • cd-unid-solic – Código da unidade do prestador solicitante;
  • cd-prestador-solic – Código do prestadoe solicitante;
  • cd-unid-exec – Código da unidade do prestador executante;
  • cd-prestador-exex – Código do prestadoe executante;
  • r-usuario – Rowid da tabela USUARIO, caso o beneficiário for da base,
  • r-outuni – Rowid da tabela OUT-UNI, caso o beneficiário for de intercãmbio,
  • cd-procedimento – Código do procedimento que está sendo incluído.
  • nr-guia-atendimento – Número da Guia de Atendimento.
  • aa-guia-atendimento – Ano da Guia de Atendimento.
  • cd-proc-insu – código do Insumo.
  • lg-inclui-pacote - indica se o movimento está sendo incluído por um pacote.

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

def temp-table tmp-cpc-at0110c3-saida no-undo

field lg-erro                                     as log
field ds-mensagem                        as char format "x(75)"
field qt-repasse-cob                       like procguia.qt-repasse-cob
field lg-alt-qtd-aut                          as log
field lg-cpc-ant-inc-pacote-restr      as log
field lg-undo-retry                          as log.

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

• • lg-erro – Indica a ocorrência de erro no processamento da CPC;
  • ds-mensagem – E a mensagem que a operadora quer que seja apresentada ao usuário quando da ocorrência de erro no processamento da CPC;
  • qt-repasse-cob - Quantidade de vezes que cobra a tabela médica do beneficiário, definido pela operadora.
  • lg-alt-qtd-aut – Identifica se foi alterada a quantidade de autorizações.
  • lg-cpc-ant-inc-pacote-restr – indica se o movimento deve ser restringido.
  • lg-undo-retry – Indica se deve realizar undo, retry no retorno da cpc.