Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

CPC-ATAPI023.p

Produto:

Gestão de Planos de Saúde

Módulo:Todos
Versão:12.x.x
Assuntos:

cpc-atapi023.p

  • Rotina utilizada no recebimento de autorizações eletrônicas (intercâmbio eletrônico).
  • Rotina utilizada para permitir a mudança nos valores dos campos recebidos dos sistemas conectados ao intercâmbio eletrônico.
  • Rotina utilizada para permitir alterar a ação do intercâmbio, conforme classe de erro.
  • Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.
  • Rotina utilizada para permitir alterar a observação da guia recebida nas autorizações eletrônicas (intercâmbio eletrônico).
  • 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.
  • Essa cpc possui uma particularidade que é a utilização de temp de input-output na passagem de parâmetros.
  • Rotina utilizada para alterar o status da guia após o retorno da cpc no ponto de chamada status-rthiguia. Sempre quando retornado uma guia com status 8 Negada e com status 2 Autorizada será desconsiderada qualquer outra atualização de status feita pelo sistema. A guia com status 8-Negada terá seu status alterado para 1-Digitada pelo ponto de cpc status-rthiguia.
  • Não existe função de utilização, pois essa cpc tem a funcionalidade de converter quaisquer dados que por ventura o cliente ache necessário para o bom funcionamento da montagem da resposta das solicitações.

 


Localização

  • Dentro do atapi023.p no início do processo de recebimento e montagem da resposta da solicitação.

Ponto de Utilização

  • "CONVALTERA-SERIOUS-IESTATUS"
  • "TRATADPS-SITENC-RESPSOLIC"
  • "ALTERA-STATUSGLOSA"
  • "ALTERA-GLOSAOBS"
  • "ALTERAANTES-CRIA-OBSGUIA"
  • "ANTESDPS-CRIA-GUIA"
  • "STATUS-RTHIGUIA"
  • "REGRAFINAL-AUTOSEG-CUST500"

Include das definições das tabelas temporárias

  • cpc-atapi023.i

...

  • "CONV-SERIOUS-IE"
  • "TRATA-SIT-RESP"
  • "STATUS-AUDIT"
  • "TROCA-STS-AUT"
  • "TROCA-STS-GN"
  • "REGRA-ALTO-CUST"
  • "ANT-EXP-PACOTE" - ponto disponível  partir da versão 12.1.2403
  • "INI-ATZ-PACOTE" - ponto disponível  partir da versão 12.1.2403
  • "ANT-REG-URG-BXR" - ponto disponível a partir da versão 12.1.2407
  • "ANT-REGRA-URG" - ponto disponível a partir da versão 12.1.2407

Include das definições das tabelas temporárias

  • cpc-atapi023.i


Tabelas de entrada e saída

Tabela de entrada e saída tmp-campos-layout-recebido – Dados do documento

def temp-table tmp-campos-layout-recebido no-undo

field cd-transacao-ptu

Tabela de entrada e saída tmp-campos-layout-recebido – Dados do documento

def temp-table tmp-campos-layout-recebido no-undo

field cd-transacao-ptu                        as char format "x(05)"
field tp-cliente                                     as char format "x(15)"
field cd-unidade-origem                     as char format "x(04)"
field cd-unidade-destino                     as char format "x(04)"
field nr-ident-origem                           as  as char format "x(1005)"
field nr-ident-destino tp-cliente                                     as char format "x(1015)"
field cd-unidade-origem                       as char format "x(04)"
field cd-unidade-destino                as       as char format "x(04)"
field id-beneficiario   nr-ident-origem                           as char format "x(1310)"
field nr-viaident-cartao   destino                             as char format "x(0210)"
field cd-cid         unidade                                  as char format "x(04)"
field id-alto-custo beneficiario                                as as char format "x(0113)"
field nm-prestador nr-via-cartao                                as as char format "x(2502)"
field ds-observacao-1 cd-cid                                          as char format "x(4004)"
field dsid-observacao-2 alto-custo                                as char format "x(4001)"
field ds-observacao-3 nm-prestador                              as char format "x(4025)"
field cdds-unidade-prestador-req observacao-1                        as char format "x(0440)"
field cdds-prestadorobservacao-req 2                        as char format "x(0840)"
field cdds-unidade-prestador observacao-3                        as char format "x(0440)"
field cd-unidade-prestador-req          as char format "x(04)"
field cd-prestador-req                        as char format "x(08)"
field cd-especialidadeunidade-prestador                as char format "x(0304)"
field ds-linha-origem cd-prestador                             as  as char format "x(25608)"
field incd-classeespecialidade-nota prestador      as char format "x(03)"
field ds-linha-origem                          as as char format "x(256)"
field in-classe-nota                            as char format "x(02)"
index i-campos                                  is unique primary
cd-transacao-ptu.

...

  • cd-transacao-ptu – Código da transação PTU conforme manual PTU 2.8.
  • tp-cliente – Código definido no manual PTU 2.8 campo TP_CLIENTE
  • cd-unidade-origem – Código da unidade que originou a solicitação.
  • Cdcd-unidade-destino – Código da unidade que recebeu a solicitação.
  • Nrnr-ident-origem – Numero da solicitação da unidade que originou a solicitação.
  • Nrnr-ident-destino – Numero da guia de autorização da unidade que recebeu a solicitação.
  • Cdcd-unidade – Código da unidade do beneficiário.
  • Idid-beneficiario – Código de identificação do beneficiário.
  • Nrnr-via-cartao – Numero da via do documento de identificação do beneficiário.
  • Cdcd-cid – Código do CID.
  • Idid-ato-custo – campo ID_ALTO_CUSTO do PTU 2.8
  • Nmnm-prestador – Nome do prestador.
  • Dsds-observacao1, 2 e 3 – Observações gerais.
  • Cdcd-unidade-prestador-req – Código da unidade do prestasdor requisitante
  • Cdcd-prestador-req – Código do prestador requisitante
  • Cdcd-unidade-prestador – Código da unidade do prestador executante
  • Cdcd-prestador – Código do prestador executante
  • DsdDs-linha-origem – Descrição de observação oriunda da unidade que solicitou a autorização
  • Inin-classe-nota – Código da classe da nota para identificação do tipo da guia de autorização que deve ser gerada. Seu conteúdo pode ser:

01 – Consulta
02 – Exames SADT
03 – Atendimento Ambulatorial
04 – Internação Clínica
05 – Internação Cirúrgica
06 – Internação Obstétrica
07 – Odontologia
08 – Consulta em Emergência
09 - Internacao Hospital Dia
10 - Internacao Domiciliar
11 - Internacao Pediatrica
12 - Internacao Psiquiatrica
13 - Consultas Medicina Ocupacional
14 - Exames medicina ocupacional
15 - Remocao
16 - Pequena cirurgia
17 - Terapias
18 - Atendimento domiciliar
19 - SADT internado
20 - Quimioterapia
21 - Radioterapia
22 - TRS (terapia renal substitutiva)
23 - Consulta (primeira consulta)
24 - Consulta (seguimento)
25 - Consulta (pre-natal)

...


Tabela de entrada e saída tmp-campos- layout-bl-servic – Dados dos movimentos

...

  • nr-servico – Numero do serviço , na ordem de entrada da solicitação.
  • Tp-tabela – Tipo da tabela no manual PTU 2.8 TP_TABELA .
  • Cd-servico – Código do movimento.
  • Qt-servico – Quantidade do serviço solicitado.

 


Tabela de entrada e saída tmp-campos-layout-retorno – Dados dos movimentos

...

  • cd-unidade – Código da unidade do beneficiário.
  • id-beneficiario – Código de identificação do beneficiário.
  • nm-beneficiario – Nome do Beneficiario.
  • tp-sexo-beneficiario – Sexo do Beneficiário.
  • tp-inscr-beneficiario – Tipo de Inscricao do Beneficiario.
  • dt-nascimento – Data de Nascimento do Beneficiário.
  • tp-mens-geral-1, 2, 3, 4, 5 – Tipo de mensagem, conforme status do registro.
  • ds-mens-geral-1, 2, 3, 4, 5 – Descrição da Mensagem.
  • cd-mens-geral-1, 2, 3, 4, 5 – Codigo da Mensagem.
  • ds-observacao-1, 2, 3 – Observações gerais.
  • ds-linha-origem – Observações internas.

...


Tabela de entrada e saída tmp-campos-layout-ret-bl-servic – Dados dos movimentos

...

  • nr-servico – Numero do serviço , na ordem de entrada da solicitação.
  • tp-tabela – Tipo da tabela no manual PTU 2.8 TP_TABELA .
  • cd-servico – Código do movimento.
  • ds-servico – Descrição do movimento.
  • qt-servico – Quantidade do serviço solicitado.
  • id-autoriza – Status do registro.
  • tp-mens-espec-1, 2, 3, 4, 5 – Tipo de mensagem, conforme status do registro.
  • ds-mens-espec-1, 2, 3, 4, 5 – Descrição da Mensagem.
  • cd-mens-espec-1, 2, 3, 4, 5 – Codigo da Mensagem.

...


Tabela de entrada tmp-cpc-atapi023-entrada

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

field nm-ponto-chamada-cpc      as as char format "x(15)"
field ds-segmento-recebido        as as char format "x(8000)"
field ds-segmento-retorno          as as char format "x(8000)"
field r-guiautor                            as recid
field cd-classe-erro                    as intas recid
field in-liberado-guias                 like guiautor.in-liberado-guias
field aa-guia-atendimento           like guiautor.aa-guia-atendimento
field nr-guia-atendimento            like like guiautor.nr-guia-atendimento
field registro                                as rowidas rowid
field cd-classe-erro as int
field cd-unidade-principal            like like guiautor.cd-unidade-principal
field cd-prestador as dec
field cd-unidade-prestador as int
field cd-unidade-carteira             like guiautor.cd-unidade-carteira
field cd-carteira-usuario              like like guiautor.cd-carteira-usuario
field nr-via-carteira                      like guiautor.nr-like guiautor.nr-via-carteira

Definição campo a campo da tabela de entrada

  • nm-ponto-chamada-cpc – Ponto de chamada da CPC.
  • ds-segmento-recebido – Segmento de solicitação recebido.
  • ds-segmento-retorno – Segmento da de solicitação de retorno.
  • r-guiautor – Recid da guiautor.
  • cd-classe-erro – Código da classe de erro.
  • In-liberado-guias – Situação da guia.
  • Aa-guia-atendimento – Ano de emissão da guia de autorização.
  • Nr-guia-atendimento – Numero da guia de autorização.
  • Registro – Rowid do registro.
  • Cd-unidade-principal – Unidade do prestador principal.
  • Cd-unidade-carteira – Código da unidade da carteira do beneficiario.
  • Cd-carteira-usuario – Documento de identificação do beneficiário
  • Nr-via-carteira – Numero da via da carteira.

 

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

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

field in-liberado-guias                   like guiautor.in-liberado-guias
field cd-local-autorizacao              like guiautor.cd-local-autorizacao
field lg-undo-retry                         as log
field ds-mensagem                      as char
field lg-id-autoriza                         as log
field ds-observacao-interna           like guiautor.ds-observacao-interna
field lg-desconsidera                     as log
field lg-alto-custo-tab-propria         as log

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

  • lg-undo-retry – Indica se foi gerado erro.
  • ds-mensagem – Mensagem de erro.
  • lg-id-autoriza – Variável que controla se o registro será autorizado ou não.
  • In-liberado-guias – Situação da guia
  • Cd-local-aturizacao – Local de autorização dos movimentos.
  • ds-observacao-interna - Campo que retorna as observações internas da guia.
  • Lg-desconsidera – Campo que desconsidera o status original da guia setado pelo sistema e grava o status retornadao pela cpc quando ativa.
  • lg-alto-custo-tab-propria - Campo utilizado para considerar ou não as regras de auto custo e tabela própria.

field cd-cla-hos as int
field cd-transacao as dec
field authorization-status as char
field cd-erro-retorno as char format "x(4)"
field status-guia-negada like guia-negada.char-1
field cd-tipo-insumo-ptu like ptuinsum.cd-tipo-insumo-serious
field cd-insumo-ptu like ptuinsum.cd-insumo-ptu
field token as char
field h-tmp-guiautor as handle.

Definição campo a campo da tabela de entrada

  • nm-ponto-chamada-cpc – Ponto de chamada da CPC.
  • ds-segmento-recebido – Segmento de solicitação recebido.
  • ds-segmento-retorno – Segmento da de solicitação de retorno.
  • r-guiautor – Recid da guiautor.
  • in-liberado-guias – Situação da guia.
  • aa-guia-atendimento – Ano de emissão da guia de autorização.
  • nr-guia-atendimento – Numero da guia de autorização.
  • registro – Rowid do registro.
  • cd-classe-erro – Código da classe de erro.
  • cd-unidade-principal – Unidade do prestador principal.
  • cd-prestador - Código do prestador.
  • cd-unidade-prestador - Unidade do prestador.
  • cd-unidade-carteira – Código da unidade da carteira do beneficiário.
  • cd-carteira-usuario – Documento de identificação do beneficiário
  • nr-via-carteira – Número da via da carteira.
  • cd-cla-hos - Código da classe hospitalar.
  • cd-transacao - Código da transação
  • authorization-status - Código do status da autorização
  • cd-erro-retorno - Código do erro
  • status-guia-negada - Código do status da guia
  • cd-tipo-insumo-ptu -  Código do tipo de insumo PTU
  • cd-insumo-ptu - Código do insumo PTU
  • token - Campo token do PTU
  • h-tmp-guiautor - handle da tabela temporaria guiautor.

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

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

field in-liberado-guias like guiautor.in-liberado-guias
field cd-local-autorizacao like guiautor.cd-local-autorizacao
field lg-undo-retry as log
field ds-mensagem as char
field lg-id-autoriza as log
field ds-observacao-interna like guiautor.ds-observacao-interna
field lg-desconsidera as log
field cd-unidade-prestador as char format "x(04)"
field cd-prestador as char format "x(08)"
field in-classe-nota as char format "x(02)"
field cd-cla-hos as int
field authorization-status as char
field status-guia-negada like guia-negada.char-1
field cd-tipo-insumo-serious like ptuinsum.cd-tipo-insumo-serious
field cd-insumo-serious like ptuinsum.cd-insumo-serious
field lg-alto-custo-tab-propria as log
field lg-busca-insumo as logical initial yes
field lg-busca-tmp-lay-recebido as log
field lg-vincula-pacote as log initial yes
field lg-desvincula-movto as log initial yes
field lg-permite-guia-urg-pendente as logical
field lg-valida-regra-urg-eme as logical initial yes.

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

  • in-liberado-guias - Situação da guia.
  • cd-local-autorizacao – Local de autorização dos movimentos.
  • lg-undo-retry – Indica se foi gerado erro.
  • ds-mensagem – Mensagem de erro.
  • lg-id-autoriza – Variável que controla se o registro será autorizado ou não.
  • ds-observacao-interna - Campo que retorna as observações internas da guia.
  • lg-desconsidera – Campo que desconsidera o status original da guia setado pelo sistema e grava o status retornado pela cpc quando ativa.
  • cd-unidade-prestador - Unidade do prestador.
  • cd-prestador - Código do prestador.
  • in-classe-nota - Código da classe de nota
  • cd-cla-hos - Código da classe hospitalar.
  • authorization-status - Código do status da autorização
  • status-guia-negada - Código do status da guia
  • cd-tipo-insumo-serious - Código do tipo de insumo Serious
  • cd-insumo-serious - Código do insumo Serious
  • lg-alto-custo-tab-propria - Campo utilizado para considerar ou não as regras de auto custo e tabela própria.
  • lg-busca-insumo - Campo que indica a busca ou não de insumo
  • lg-busca-tmp-lay-recebido - busca o registro do layout.
  • lg-vincula-pacote - Verifica se o pacote será vinculado ao procedimento/insumo.
  • lg-desvincula-movto - Verifica se o pacote será desvinculado do movimento.
  • lg-permite-guia-urg-pendente - indica se permite que uma guia de urgência/emergência entre pendente ou se deve seguir a regra da mensagem de automação
  • lg-valida-regra-urg-eme - indica se valida a regra de urgência/emergência

Tabela de saída tmp-ptu-servicos

def temp-table tmp-ptu-servicos no-undo
      field nr-servico as int
      field tp-tabela as char format "x(01)"
      field cd-servico as char format "x(08)"
      field tp-tabela-recebido as char format "x(01)"
      field cd-servico-recebido as char format "x(08)"
      field qt-servico as char format "x(08)"
      field ds-opme as char format "x(80)"
      field vl-servico as char format "x(14)"
      index i-servico is unique primary
                nr-servico.

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

  • nr-servico - Número do serviço
  • tp-tabela - Tipo de tabela: 1 = Serviços Hospitalares / Taxas / Complementos ; 2 = TNUMM Materiais; 3 = TNUMM Medicamentos; 4 = Serviços com Custo Fechado / Pacote; 5 = TUSS Materiais; 6 = TUSS Medicamentos; 22 = Procedimento; etc.
  • cd-servico - Código do serviço
  • tp-tabela-recebido - Tipo de tabela: 2 = TNUMM Materiais; 5 = TUSS Materiais; etc.
  • cd-servico-recebido - Tipo de tabela: procedimento, pacote
  • qt-servico - Quantidade do serviço.
  • ds-opme - Descrição do serviço.
  • vl-servico - Valor do serviço

...