CPC-API-RECEBE-PTU91.p

• Rotina permite ao cliente efetuar processos específicos após a leitura dos dados do beneficiário.
• Rotina permite ao cliente alterar se a unimed origem tem ou não serious.
• 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

• Para o ponto de chamada "ANT-TEM-SERIOUS", dentro do programa API-RECEBE-PTU91.P antes de qualquer utilização da variável lg-tem-serious-aux;
• Para o ponto de chamada "ORDEM-SERVICO", dentro do programa API-RECEBE-PTU91.P;
• Para o ponto de chamada "APOS-CANCEL", dentro do programa API-RECEBE-PTU91.P;
• Para o ponto de chamada "DPS-TRATA-INS", dentro do programa API-RECEBE-PTU91.P;
• Para o ponto de chamada "DPS-CRIA-GUIA", dentro do programa API-RECEBE-PTU91.P;
• Para o ponto de chamada "DPS-TRATA-RESP", dentro do programa API-RECEBE-PTU91.P;
• Para o ponto de chamada "ATRIBUI-MENS", dentro do programa API-RECEBE-PTU91.P;
• Para o ponto de chamada "ANTE-CRIA-ORDEM", dentro do programa API-RECEBE-PTU91.P;
• Para o ponto de chamada "ALTERA-ALT-CUST", dentro do programa API-RECEBE-PTU91.P;
• Para o ponto de chamada "APOS-DADOS-BENE", dentro do programa API-RECEBE-PTU91.P após efetuar a leitura dos dados do beneficiário.
• Para o ponto de chamada "ALTERA-PREST", dentro do programa API-RECEBE-PTU91.P.

Ponto de Utilização

• "ANT-TEM-SERIOUS"

• "ORDEM-SERVICO"

• "APOS-CANCEL"

• "DPS-TRATA-INS"

• "DPS-CRIA-GUIA"

• "DPS-TRATA-RESP"

• "ATRIBUI-MENS"

• "ANTE-CRIA-ORDEM"

• "ALTERA-ALT-CUST"

• "APOS-DADOS-BENE"

• "ALTERA-PREST" -  a partir da versão 12.1.2311.

Include das definições das tabelas temporárias

• cpc-api-recebe-ptu91.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-api-recebe-ptu91-entrada

              def temp-table tmp-cpc-api-recebe-ptu91-entrada no-undo
                    field in-evento-programa            as char format "x(06)"                     
                    field nm-ponto-chamada-cpc          as char format "x(15)"
                   field cd-unidade                    like guiautor.cd-unidade
                   field aa-guia-atendimento           like guiautor.aa-guia-atendimento
                   field nr-guia-atendimento           like guiautor.nr-guia-atendimento
                   field cd-carteira-usuario           as dec
                   field lg-tem-serious                as log
                   field r-procguia                    as rowid
                   field ds-denial-mens                as char
                   field cd-prestador                  as int
                   field h-tmp-guiautor                as handle
                   field h-tmp-procguia                as handle
                   field h-tmp-insuguia                as handle
                   field h-buffer-tmp-guiautor         as handle.

Definição campo a campo da tabela de entrada

• • • in-evento-programa – Evento do programa que chama a cpc;
    • nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza;
    • cd-unidade – Código da unidade do prestador;
    • aa-guia-atendimento – Ano da guia de atendimento;
    • nr-guia-atendimento – Número da guia de atendimento;
    • cd-carteira-usuario - Documento de identificação do beneficiário
    • lg-tem-serious - Indica se a Unimed possui ou não serious; 
    • r-procguia - Identificador da tabela de procedimentos da guia
    • ds-denial-mens - Mensagem de retorno
    • cd-prestador - Código do prestador
    • h-tmp-guiautor - Tabela temporária de guias
    • h-tmp-procguia - Tabela temporária de procedimento da guia
    • h-tmp-insuguia - Tabela temporária de insumos da guia
    • h-buffer-tmp-guiautor - - Tabela temporária de guias

Tabela de saída tmp-cpc-api-recebe-ptu91-saida

              def temp-table tmp-cpc-api-recebe-ptu70-saida no-undo
                   field lg-undo-retry                 as logical
                   field ds-mensagem                   as char format "x(75)"
                   field lg-tem-serious                as log
                   field nm-grupo                      as char
                   field id-autoriza                   as int
                   field lg-alto-custo                 as log
                   field cd-prestador                  as int.

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;
    • lg-tem-serious – Indica se a Unimed possui serious ou não. 
    • nm-grupo - Nome do grupo do usuário do sistema
    • id-autoriza - Indicador de autorização: 1 Recusado 2 Autorizado, etc
    • lg-alto-custo - Indicador de alto custo
    • cd-prestador - Código do prestador.