CPC-API-TISSSOLICITACAOPROCEDIMENTO.p

• Rotina utilizada para permitir a operadora substituir o conteúdo da TAG referente a observação do procedimento autorizado.
• Rotina utilizada para permitir a operadora criar regra especifica, quando recebida uma solicitação de Autorização, onde este ponto de chamada de CPC permitira basear a reposta da solicitação em uma Guia de Atendimento já existente na base.
• Rotina utilizada para permitir a operadora definir se o código do movimentos recebido será considerado como sendo um procedimento ou um insumo.
• Rotina utilizada para permitir a operadora substituir o conteúdo da TAG referente a observação de guias de simulação.
• Rotina utilizada para permitir a operadora indicar se irá gerar erro ou não caso não encontre o usuário de outra unidade.
• Rotina utilizada para permitir a operadora personalizar a resposta para a operadora origem caso a guia seja negada.
• Caso receba um valor de procedimento com 10 posições, gravará o registro como sendo um insumo.
• 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. Caso possuir mais de um registro um erro será reportado.

Localização

• Dentro da api-tisssolicitacaoprocedimento.p .

Ponto de Utilização

• "OBS-PROCED"
• "GUIA-AUT"
• "TIPO-MOVTO"
• "GERA-SIMULACAO"
• "INCLUI-INSUMO"
• "ANTES-OUT-UNI"
• "APÓS-BUSCA-GUIA"
• "TRATA-ODONTO"
• "GUIA-PRORROGA"

Include das definições das tabelas temporárias

• cpc-api- tisssolicitacaoprocedimento.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-api-tisssolpro-entrada

def temp-table tmp-cpc-api-tisssolpro-entrada no-undo

field in-evento-programa                     as char format "x(10)"
field nm-ponto-chamada-cpc              as char format "x(15)"
field nr-guiautor                                  as rowid
field nr-procguia                                 as rowid
field cd-unidade-carteira                     like guiautor.cd-unidade-carteira
field cd-carteira-usuario                      like guiautor.cd-carteira-usuario
field cd-unidade-principal                   like guiautor.cd-unidade-principal
field cd-prestador-principal                 like guiautor.cd-prestador-principal
field cd-servico                                   as int format "99999999"
field tp-tabela                                    as int format "99"
field ds-observacao                           as char
field cd-codigo                                   as char
field tp-tipoTransacao                       as char
field cd-unidade-prestador-exec        like preserv.cd-unidade
field cd-prestador-exec                      like preserv.cd-prestador
field cd-esp-prest-executante            like previesp.cd-especialid
field in-carater-internacao                 as char
field qt-servico                                  as char
field qt-us                                         as char
field nm-prest-exec-compl                like guiainod.nm-prest-exec-compl
field char-3                                       like guiainod.char-2
field nr-registro                                 like guiainod.nr-conse-prest-exec-compl
field uf-conselho                              like guiainod.uf-conse-prest-exec-compl
field char-2                                      like guiainod.char-2
field nr-versao                                  as char

field lg-odonto                                  as log

field nr-guia-prestador                     like guiautor.nr-guia-atendimento
field nr-guia-operadora                    as char.

Definição campo a campo da tabela de entrada

• • in-evento-programa – Evento do programa que chama CPC-API-TISSSOLICITACAOPROCEDIMENTO.P. 
  • nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. 
  • nr-guiautor – Rowid da tabela Guiautor;
  • nr-procguia – Rowid da tabela Procguia;
  • cd-unidade-carteira – Código da Unidade da Carteira do Beneficiario
  • cd-carteira-usuario – Código da Carteira do Beneficiario
  • cd-unidade-principal – Código da Unidade do prestador principal da solicitacao
  • cd-prestador-principal – Código do prestador principal da solicitação
  • cd-servico – Código do movimento recebido no arquivo XML com tamanho de oito caracteres;
  • tp-tabela – Código do tipo de tabela relacionada ao movimento recebido no arquivo XML. Este campo possui tamanho dois caracteres numéricos.
  • Ds-observação – Campo de observação
  • cd-codigo – Código do prcedimento/movimento
  • tp-tipoTransacao – tipo de transação
  • cd-unidade-prestador-exec – código da unidade do prestador executante
  • cd-prestador-exec - Código do prestador executante
  • cd-esp-prest-executante – código da espécie do prestador executante
  • in-carater-itnernação – caráter da internação
  • qt-servico – quantidade de procedimentos/movimentos
  • qt-us – Quantidade de US
  • nm-prestador-exec-compl – nome do prestador executante
  • char-3 – Código do conselho do executante
  • nr-registro – Numero do registro
  • uf-conselho – Estado do conselho do prestador executante
  • char-2 – Código do CBOS
  • nr-versao – Versão da TISS
  • lg-odonto - Indica se a guia é odontológica;
  • nr-guia-prestador - Número da guia prestador
  • nr-guia-operadora - Número da guia operadora

Tabela de entrada tmp-cpc-api-tisssolpro-movtos 

def temp-table tmp-cpc-api-tisssolpro-movtos no-undo

         field cd-unidade                           like procguia.cd-unidade              
         field cd-unidade-prestador-exec  like procguia.cd-unidade-prestador    
         field cd-prestador-exec                like procguia.cd-prestador            
         field qt-servico                             like insuguia.qt-insumo
         field tp-servico                             as char format "x(1)"                 
         field cd-servico                            as int format "999999999"
         field tipo-insumo                          like mov-insu.cd-tipo-insumo.

Definição campo a campo da tabela de entrada

cd-unidade – código da unidade da base

cd-unidade-prestador-exec - código da unidade do prestador executante

cd-prestador-exec - Código do prestador executante

qt-servico - quantidade de procedimentos/movimentos

tp-servico - Tipo de serviço

cd-serviço - Código do serviço

tipo-insumo  - Tipo do insumo

Tabela de saida tmp-cpc-api-tisssolpro-saida

def temp-table tmp-cpc-api-tisssolpro-saida no-undo

field lg-undo-retry                      as log
field ds-mensagem                   as char
field aa-guia-atendimento         like guiautor.aa-guia-atendimento
field nr-guia-atendimento          like guiautor.nr-guia-atendimento.
field ds-observacao                   as char
field tp-movto                            as char format "x(01)"
field cd-tipo-insumo                   as int format "99"
field cd-servico                          as int format "99999999"
field lg-simulacao                      as log
field lg-retorno-erro                    as log
field lg-grava-erro                      as log
field lg-tem-serious                    as log.

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

• • lg-undo-retry – Variável que controla os erros que podem ocorrer na CPC;
  • ds-mensagem - Variável que recebe a descrição dos erros que ocorreram na CPC;
  • ds-observação – Variável que retorna o valor para ser utilizado na TAG de observação do procedimento.
  • aa-guia-atendimento – Ano da Guia de atendimento utilizada na resposta da autorização.
  • nr-guia-atendimento – Numero da Guia de atendimento utilizada na resposta da autorização.
  • tp-movto – Código do tipo do movimento que deverá ser considerado pelo Sistema. Se for retornado "I" (Insumo), então deverá ser informado valor para os campos cd-tipo-insumo e cd-servico referente ao insumo que deverá ser considerado pelo sistema, caso seja retornado "P" (Procedimento), então deverá ser informado valor para os campos cd-servico referente ao procedimento que deverá ser considerado pelo sistema.
  • cd-tipo-insumo – Campo que terá o conteúdo referente ao tipo do insumo, quando informado "I" (Insumo) para o campo tp-movto.
  • cd-serviço - Campo que terá o conteúdo referente ao procedimento ou insumo, de acordo com o valor retornado no campo tp-movto. Se for retornado "I" (Insumo), então no campo deverá ter o valor referente ao código do insumo e se retornado "P" então no campo deverá ter o valor referente ao código do proceidmento.
  • LG-simulacao – simulação de guias
  • LG-retorno-erro – Indica se deve retornar erro ou não
  • LG-grava-erro – Indica se irá gravar erro
  • LG-tem-serious – Indica se a operadora origem possui ou não serious.