Histórico da Página

...

• "ALTERA-STATUS"
• "DPS-ENC-SOLIC"
• "ALTERA-GLOSA"
• "ALTERA-OBS"
• "ANTES-CRIA-GUIA"
• "DPS-CRIA-GUIA"
• "STATUS-RTHIGUIA"
• "FINAL-SEG-500"
• "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
• "FIM-REGRA-AUDI" - ponto disponível a partir da versão 12.1.2503

Include das definições das tabelas temporárias

...

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
    field h-buffer-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.
• h-buffer-guiautor - handle do buffer do registro da tabela 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
    field in-autorizacao                                  as int.

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-autorizacao - indicador de autorizacao.

Tabela de saída tmp-ptu-servicos

...