Árvore de páginas

Versões comparadas

Chave

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

...

  • "ALTERA-STATUS"
  • "DPS-ENC-SOLIC"
  • "ALTERA-GLOSA"
  • "ALTERA-OBS"
  • "ANTES-CRIA-GUIA"
  • "DEPOISDPS-CRIA-GUIA"
  • "STATUS-RTHIGUIA"
  • "FINAL-SEG-500"
  • "CONV-SERIOUS-IE"
  • "TRATA-SIT-RESP"
  • "STATUS-AUDIT"
  • "TROCA-STS-AUT"
  • "TROCA-STS-GN"
  • "REGRA-ALTO-CUST"

Include das definições das tabelas temporárias

  • cpc-atapi023.i

...

  • "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                        as char format "x(05)"
field tp-cliente  

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 char format "x(10)"
field nr-ident-destino                           as char format "x(10)"
field cd-unidade                                  as char format "x(04)"
field id-beneficiario                             as char format "x(13)"
field nr-via-cartao                               as char format "x(02)"
field cd-cid                                          as char format "x(04)"
field id-alto-custo                                as char format "x(01)"
field nm-prestador                              as char format "x(25)"
field ds-observacao-1                        as char format "x(40)"
field ds-observacao-2                        as char format "x(40)"
field ds-observacao-3                        as char format "x(40)"
field cd-unidade-prestador-req          as char format "x(04)"
field cd-prestador-req                        as char format "x(08)"
field cd-unidade-prestador                as char format "x(04)"
field cd-prestador                              as char format "x(08)"
field cd-especialidade-prestador      as char format "x(03)"
field ds-linha-origem                         as char format "x(256)"
field in-classe-nota                            as char format "x(02)"
index i-campos                                  is unique primary
cd-transacao-ptu.

...

  • 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 char format "x(15)"
field ds-segmento-recebido as char format "x(8000)"
field ds-segmento-retorno as char format "x(8000)"
field r-guiautor as recid
field in-liberado-guias like guiautor.in-liberado-guias
field aa-guia-atendimento like guiautor.aa-guia-atendimento
field nr-guia-atendimento like guiautor.nr-guia-atendimento
field registro as rowid
field cd-classe-erro as int
field cd-unidade-principal 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 guiautor.cd-carteira-usuario
field nr-via-carteira like guiautor.nr-via-carteira
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.

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

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.

Definição campo a campo da tabela de saí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 char format "x(15)"
field ds-segmento-recebido as char format "x(8000)"
field ds-segmento-retorno as char format "x(8000)"
field r-guiautor as recid
field in-liberado-guias like guiautor.in-liberado-guias
field aa-guia-atendimento like guiautor.aa-guia-atendimento
field nr-guia-atendimento like guiautor.nr-guia-atendimento
field registro as rowid
field cd-classe-erro as int
field cd-unidade-principal 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 guiautor.cd-carteira-usuario
field nr-via-carteira like guiautor.nr-via-carteira
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
  • 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.

Tabela de saída tmp-ptu-servicos

...