CPC-AC0011R.p

• Rotina utlizada no momento da verificação de erro de sistema durante a gravação de procedimentos, após a verificação do controle de reconsulta pelo sistema e após a valorização do procedimento.
• 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.

Localização

• Dentro do programa ac0011r.p no momento da leitura da tabelas de erros do sistema onde através da tabela temporais de saída (tmp-cpc-ac0011r-saida) o campo "lg-continua" indicara o retorno ou não do processamento.
• Após o tratamento da reconsulta pelas rotinas do sistema. O campo cd-erro-sistema indicará o retorno do processamento da CPC.
• Após a valorização do procedimento. O campo lg-continua indicará se será verificado as regras de autorização com o valor de cobrança.

Pontos de Utilização

• "VERIFICA-ERRO".
• "TRATA-RECON",
• "VL-MINIMO-COB".
• "HORA-URGENCIA"

Include das definições das tabelas temporárias

• CPC-AC0011R.I

Tabelas de entrada e saída

Tabela de entrada tmp-cpcac0011r-entrada

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

field in-evento-programa                      as char format "x(06)
field nm-ponto-chamada-cpc                 as char format "x(15)
field cd-erro-sistema                            as int
field nr-rowid-usuario                           as rowid
field nr-rowid-out-uni                           as rowid
field cd-unidade                                  like previesp.cd-unidade
field cd-prestador                                like previesp.cd-prestador
field cd-vinculo                                    like previesp.cd-vinculo
field cd-especialid                                like previesp.cd-especialid
field cd-procedimento                           like ambcbhpm.cd-amb
field qt-procedimento                           as int format "9999"
field cd-uni-cli                                     like moviproc.cd-unidade-clinica
field cd-clinica                                     like moviproc.cd-clinica
field dt-realizacao                                as date format "99/99/9999"
field hr-realizacao                                as char format "x(08)"
field cd-unidade-prest-princ                   like paproins.cd-unidade
field cd-prestador-princ                         like paproins.cd-prestador
field cd-pacote                                     like paproins.cd-pacote
field aa-guia-atendimento                      like guiautor.aa-guia-atendimento
field nr-guia-atendimento                       like guiautor.nr-guia-atendimento
field r-beneficiario                                 as recid
field lg-urgencia                                    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 – pode assumir o valor " INCLUI";
• nm-ponto-chamada-cpc – "VERIFICA-ERRO", "APOS-VALIDACAO" e "VL-MINIMO-COB";
• cd-erro-sistema – Código gerado pelo sistema de erro de processamento. Esta variável somente terá conteúdo valido se o ponto de chamada da CPC for "VERIFICA-ERRO";
• nr-rowid-usuario - ROWID de acesso a tabela USUARIO, quando beneficiário da base. Esta variável somente terá conteúdo valido se o ponto de chamada da CPC for "APOS-VALIDACAO" ou "VERIFICA-ERRO" e o beneficiário for da base;
• nr-rowid-out-uni – ROWID de acesso a tabela OUT-UNI, quando beneficiário de intercâmbio. Esta variável somente terá conteúdo valido se o ponto de chamada da CPC for "APOS-VALIDACAO" ou "VERIFICA-ERRO" e o beneficiário for de intercâmbio.
• cd-unidade - Unidade do prestador executante. Esta variável somente terá conteúdo valido se o ponto de chamada da CPC for "APOS-VALIDACAO" ou "VERIFICA-ERRO".
• cd-prestador - Prestador executante. Esta variável somente terá conteúdo valido se o ponto de chamada da CPC for "APOS-VALIDACAO" ou "VERIFICA-ERRO".
• cd-vinculo - Vinculo do prestador executante. Esta variável somente terá conteúdo valido se o ponto de chamada da CPC for "APOS-VALIDACAO" ou "VERIFICA-ERRO".
• cd-especialid – Especialidade do prestador executante. Esta variável somente terá conteúdo valido se o ponto de chamada da CPC for "APOS-VALIDACAO" ou "VERIFICA-ERRO".
• cd-procedimento – Código do procedimento. Esta variável somente terá conteúdo valido se o ponto de chamada da CPC for "APOS-VALIDACAO" ou "VERIFICA-ERRO".
• qt-procedimento – Quantidade do procedimento. Esta variável somente terá conteúdo valido se o ponto de chamada da CPC for "APOS-VALIDACAO" ou "VERIFICA-ERRO".
• cd-uni-cli – Unidade da clínica onde esta sendo realizado o procedimento. Esta variável somente terá conteúdo valido se o ponto de chamada da CPC for "APOS-VALIDACAO" ou "VERIFICA-ERRO".
• cd-clinica – Código da clinica onde esta sendo realizado o procedimento. Esta variável somente terá conteúdo valido se o ponto de chamada da CPC for "APOS-VALIDACAO" ou "VERIFICA-ERRO".
• dt-realizacao – Data de realização do procedimento. . Esta variável somente terá conteúdo valido se o ponto de chamada da CPC for "APOS-VALIDACAO" ou "VERIFICA-ERRO".
• hr-realizacao - Hora de realização do procedimento. . Esta variável somente terá conteúdo valido se o ponto de chamada da CPC for "APOS-VALIDACAO" ou "VERIFICA-ERRO".
• cd-unidade-prest-princ – Código da unidade do prestador principal. Somente será diferente de zeros quando o ponto de chamada da CPC for "VERIFICA-ERRO".
• cd-prestador-princ – Código do prestador principal. Somente será diferente de zeros quando o ponto de chamada da CPC for "VERIFICA-ERRO".
• cd-pacote – Código do pacote. Somente será diferente de zeros quando o procedimento for oriundo de pacote e se o ponto de chamada da CPC for "VERIFICA-ERRO".
• aa-guia-atendimento – Ano da guia de atendimento (autorização). Somente será diferente de zeros quando uma guia for associada ao documento e o ponto de chamada da CPC for "VERIFICA-ERRO".
• nr-guia-atendimento – Número da guia de atendimento (autorização). Somente será diferente de zeros quando uma guia for associada ao documento e o ponto de chamada da CPC for "VERIFICA-ERRO".
• r-beneficiario – recID do beneficiário.
• lg-urgencia – Log que informa se é urgência ou não.

Tabela de entrada tmp-cpc-ac0011r-insumo

def temp-table tmp-cpc-ac0011r-insumo no-undo

field cd-tipo-insumo             like pacinsu.cd-tipo-insumo
field cd-insumo                   like pacinsu.cd-insumo
field cd-pacote                    like pacinsu.cd-pacote.

Definição campo a campo da tabela de entrada "tmp-cpc-ac0011r-insumo"

• cd-tipo-insumo – Código do tipo de insumo;
• cd-insumo – Código do Insumo";
• cd-pacote – Código do pacote. Somente será diferente de zeros quando o insumo estiver sendo incluído através de pacote;

Observação: A Tabela de entrada tmp-cpc-ac0011r-insumo somente possuirá registros quando o documento incluído possuir insumos e o ponto de chamada da CPC for "VERIFICA-ERRO".

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

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

field lg-continua             as log
field lg-undo-retry           as log
field cd-erro-sistema       as int
field ds-mensagem         as char
field lg-urgencia             as log.

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

• lg-continua – Indica se o processamento deverá ou não prosseguir, a partir do código de erro passado para a CPC através da tabela temporária de entrada (cd-erro-sistema). Esta variável somente deverá retornar valor quando o ponto de chamada da CPC for igual a "VERIFICA-ERRO" ou "VL-MINIMO-COB".
• lg-undo-retry – Indica se erros ocorreram durante a execução da CPC-AC0011R.P.
• cd-erro-sistema - código de erro gerado pela lógica do cliente na CPC. Esta variável somente deverá retornar valor quando o ponto de chamada da CPC for igual a "APOS-VALIDACAO".
• ds-mensagem – Mensagem de retorno da rotina, quando da ocorrência de erro na execução da CPC-AC0011R.P.
• lg-urgencia – Log que informa se é urgência ou não.