Árvore de páginas

Versões comparadas

Chave

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

CPC-AT1000.p

Produto:

Gestão de Planos de Saúde

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

cpc-at1000.p

 


  • Rotina utilizada para permitir a operadora alterar a situação da AIH, quando a mesma solicitada via portal WAC;
  • Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.

 

 


Localização

  • Após a criação da AIH, dentro do programa at1000.p. Ressalta-se que somente será chamada a CPC caso ela esteja ativa, no cadastro de CPC.
  • Antes da chamda chamada das APIS do Modulo de Atendimento, responsáveis pela criação da Guia de Atendimento. Permite consistir os movimentos antes da inclusão da Guia de Atendimento.
  • Antes da transação que cria a temporária da guiautor . (tmp-guiautor). Antes da chamadas das apis que realizam a criação da guia.

 

Ponto de Utilização

  • "ATUALIZA-STATUS": considera 2 eventos: "INCLUI" e "MOD".
  • "CONSISTE-MOVTOS"
  • "LOC-TIP-GUIA"
  • "ANTES-ENVIA-IE"
  • "AUT-AUTOMATICO"

...

  • "
  • "ALTERA-CART"
  • "CONS_ANEST"
  • "APOS-AUTOR-AUTO"
  • "LOC-TIP-GUIA"
  • "VALOR-GUIA"
  • "COMUNICA-INTERC"
  • "APOS-ATAPI020" - a partir da versão 12.1.2209
  • "TRATA-PROCED" - a partir da versão 12.1.2209 
  • "INI-TRAT-RET-AU" - a partir da versão 12.1.2305
  • "ANT-SOLIC-FOUND" - a partir da versão 12.1.23411

Include das definições das tabelas temporárias

...

Tabela de entrada tmp-cpc- at1000 -entrada

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

field in-evento-programa                       as char format "x(06)"
field nm-ponto-chamada-cpc                as char format "x(15)"
field cd-clinica                                   like      like clinpres.cd-clinica
field cd-unidade                                 like      like clinpres.cd-unidade
field cd-prestador                                   like clinpres.cd-prestador
field in-liberado-guias                           like  like guiautor.in-liberado-guias
field lg-glosa                                     as      as log
field cd-tipo-guia                                   like  like guiautor.cd-tipo-guia
field cd-unidade-carteira                       like car-ide.cd-unimed
field lg-sadt                                           as  as log
field lg-aih                                              as log
field cd-carteira-usuario                        as as decimal
field nr-rowid-guiaautor                        as rowid
field aa-guia-atendimento                   like  like guiautor.aa-guia-atendimento
field nr-guia-atendimento                      like like guiautor.nr-guia-atendimento
field lg-autoriza-aut                              as log.

Definição campo a campo da tabela de entrada

      • in-evento-programa – Evento do programa que chama a cpc-at1000.p. Os valores desse campo podem ser:
      • "Inclui".
      • nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa at1000.p:
      • "ATUALIZA-STATUS" ou "CONSISTE-MOVTOS"
      • cd-clinica – Código da clinica que está solicitando a AIH;
      • cd-unidade – Código da unidade do prestador executante dos procedimentos da AIH;
      • cd-prestador – Código do prestador executante dos procedimentos da AIH;
      • in-liberado-guias – Indicador da situação atual da AIH;
      • lg-glosa – Variável que indica se ocorreu glosa em algum movimento (procedimentos e insumos) da AIH.
      • Cd-tipo-guia – Código do tipo da guia vinculada a AIH solicitada.
      • cd-unidade-carteira - Código da unidade da carteira do beneficiário da GUIA.
      • lg-sadt - Indicador de que a Guia Solicitada trata-se de um SPSADT
      • lg-aih - Indicador de que a Guia Solicitada trata-se de uma Autorização de Internação Hospitalar
      • cd-carteira-usuario - Código da carteira do beneficiário da GUIA.
      • Nr-rowid-guiaautor – Ponteiro da tabela de Guias de Autorização (guiautor)

 


field lg-libera-aut                                  as log
field cd-transacao                                like guiautor.cd-transacao
field h-tmp-procguia                            as handle
field h-tmp-insuguia                            as handle
field cd-servico                                   as int
field h-tmp-guia                                  as handle
field h-tmp-servico                             as handle
field cd-local-autorizacao                   as int
field aa-guia-atendimento-ant            like guiautor.aa-guia-atendimento-ant
field nr-guia-atendimento-ant             like guiautor.nr-guia-atendimento-ant
field h-tmp-mensa-guiautor                as handle
field h-pacproce                                  as handle
field h-buffer-tmp-cabecalho-guia    as handle.

...

Tabela de entrada tmp-cpc- at1000 -movtos

def temp-table tmp-cpc-at1000-movtos no-undo

field cd-procedimento                   like ambcbhpm.cd-amb
field cd-tipo-insumo                      like insumos.cd-tipo-insumo
field cd-insumo                              like like insumos.cd-insumo.

Definição campo a campo da tabela de movtos

  • cd-procedimento – Código do procedimento que está associado a AIH.
  • Cd-tipo-insumo – Código do Tipo de Insumo solicitado na Guia de Autorização.
  • Cd-insumo – Código do Insumo solicitado na Guia de Autorização.


field cd-unidade                            like clinpres.cd-unidade
field cd-prestador                         like clinpres.cd-prestador
field qt-movimentos                      as int.

...

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

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

field lg-undo-retry                       as  as log.
field in-liberado-guias                 like guiautor.in-liberado-guias
field cd-erro-sistema                   like mensauto.cd-retorno
field lg-cria-guia                         as  as log
field lg-comunica-scs                  as as log
field ds-observ-guia                    as char
field cd-tipo-guia                         like guiautor.cd-tipo-guia
field cd-transacao                       like guiautor.cd-transacao
field ds-mensagem                     as char
field cd-unidade-carteira             like guiautor.cd-unidade-carteira.

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

  • lg-undo-retry – Variável que controla se erros aconteceram dentro da CPC. Se o retorno desta variável for igual a SIM, indicará que erros aconteceram e se o retorno for igual à NÃO, indicará que o processo foi concluído por completo.
  • In-liberado-guias – Variável que indicará a situação da AIH;
  • Cd-erro-sistema – Código do erro ocorrido no retorno da CPC, este erro sera utilizado para localizar a mensagem a ser apresentada em tela na Solicitação da Guia.
  • Lg-cria-guia – Indicador de retorno da CPC, sinalizando se após passar pela CPC a Guia de Atendimento será ou não criada.
  • Lg-comunica-scs – Indicador de que a Solicitação de Guia de Atendimento irá gerar uma comunicação SCS Intercambio Eletrônico
  • Ds-observ-guia – Campo de observações a ser gravado na Guia de Autorização.
  • Ds-mensagem – Descrição da mensagem
  • Cd-unidade-carteira – código da unidade da carteira.


field cd-carteira-usuario              like usuario.cd-identific-uni-destino
field lg-continua                          as log init yes
field cd-local-autorizacao           as int

field lg-retorno-trata-proc          as log..

...