CPC-AT0115C.p

Rotina utilizada para permitir a operadora:

• Controlar o grupo de usuários que repassa as guias (AIH) para a situação de "Pendente de Auditoria" ou "Pendente de Laudo Médico";
• Gravar o usuário que criou a Guia (AIH) em Status de Pendente;
• Retornar Guia (AIH) ao usuário que a criou e
• Definir, conforme suas regras de autorização, se será ou não disponibilizada as opções de autorização ("Imprime Autorizando" e "Autoriza sem Impressão") da GUIA (AIH);
• Gerar somente um código convertido de insumo, nas guias de intercâmbio eletrônico.
• Definir se guia de atendimento deve comunicar via intercâmbio eletrônico.
• Trocar a carteira do usuário antes da comunicação do intercâmbio eletrônico.
• Indicar se irá ser gerado erro caso não encontre a carteira do beneficiário de outra unidade.
• Rotina chamada no final da execução do programa at0115.p manutenção de autorização de guias.
• Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.

Localização

• Para o ponto de chamada "TRATA-USU-ATEND", dentro do programa AT0115C.p após o usuário informar a situação da GUIA (Status da AIH);
• Para o ponto de chamada "ANTES-OUT-UNI", dentro do programa AT0115C.p antes dos testes relacionados com a out-uni;
• Para o ponto de chamada "TRATA-USU-AUDIT", dentro do programa AT0115C.p quando o usuário está alterando a situação da guia (AIH) de "Pendente de Auditoria" ou "Pendente de Laudo Médico" para "Pendente de Liberação";
• Para o ponto de chamada " CONS-USU-AUDIT ", dentro do programa AT0115C.p, quando a guia for transferida (colocada) na situação de Pendente de Auditoria;
• Para o ponto de chamada "PERMITE-AUTOR", dentro do programa AT0115C.p, quando da abertura do ComboBox com as opções de situação da Guia possíveis de seleção;
• Para o ponto de chamada "SOLIC-TP-EXAME", dentro do programa AT0115C.p, que permite alterar a guia de Atendimento antes de sua impressão para beneficiários de intercâmbio.
• Para o ponto de chamada "IMP-ASO-PC", dentro do programa AT0115C.p, que permite alterar a guia de Atendimento antes de sua impressão, porem somente para Autorização de Guias.
• Para o ponto de chamada "CONV-INSUMO", dentro do programa AT0115C.p, que ao encontrar códigos de insumos convertidos iguais, gera somente um código para ser enviado via intercâmbio eletrônico.
• Para o ponto de chamda "ANTES-COMUNICA", dentro do programa AT0115C.p, que permite validar se guia de atendimento deve ser enviada via intercâmbio eletrônico.
• Para o ponto de chamda "APOS-ALT-GRUPO", dentro do programa AT0115C.p, que permite digitar mais de 700 caracteres no campo Motivo de Auditoria.
• Dentro do programa at0115c.p o ponto de chamada "FIM-EXEC-AUTOR", é chamado no final da execução da autorização de guias.

...

field in-evento-programa                 as char format "x(10)"
field nm-ponto-chamada-cpc          as char format "x(15)"
field r-guiautor                                 as recid
field in-lib-ant                                  as char format "x(02)"
field in-confirma-autor                    as char format "x(28)"
field cd-movimento                         as int format 99999999
field cd-pacote                                as int format 99999999
field ds-motivo-auditoria                 like guiautor.ds-motivo-auditoria
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 dt-guia-atendimento               as date format "99/99/9999"
field hr-guia-atendimento               as char format "x(8)"
field in-status                                 as char format "x(100)"

field nm-programa-chamador       as char.

Definição campo a campo da tabela de entrada

• • in-evento-programa – Evento do programa que chama CPC-AT0115C.P. Os valores desse campo podem ser "GRAVA" ou "MODIFICA";
  • nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa AT0115C.P: "CANCEL-GUIA-CPC", "CONS-USU-AUDIT", "CRIA-SEG-PACOTE", "GRAVA-AUT-NEG", "IMPRIME-POST", "PERMITE-AUTOR", "SITUACAO-GUIA", "TRATA-SITUACAO", "TRATA-USU-ATEND", "TRATA-USU-AUDIT", "CONV-INSUMO", "ANTES-COMUNICA" , "APOS-ALT-GRUPO" e "FIM-EXEC-AUTOR"
  • r-guiautor – RECID da Guia de Autorização;
  • in-lib-ant – Situação da AIH (Status) em momento anterior a sua atualização/modificação;
  • in-confirma-auditor – Indicador da confirmação da autorização
  • cd-movimento – código do procedimento.
  • cd-pacote –código do pacote.
  • ds-motivo-auditoria - campo motivo de auditoria.
  • cd-unidade – código da unidade.
  • aa-guia-atendimento – ano da guia atendimento.
  • nr-guia-atendimento – numero da guia atendimento.
  • dt-guia-atendimento - data da guia atendimento.
  • hr-guia-atendimento - hora da guia atendimento.
  • in-status – status da guia.

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

...

• • nm-grupo – Grupo do usuário que alterou a guia (AIH) para a situação de "Pendente de Auditoria" ou "Pendente de Laudo Médico";
  • nm-usuario - Nome do usuário que alterou a guia (AIH) para a situação de "Pendente de Auditoria" ou "Pendente de Laudo Médico";
  • in-liberado-guias – Indicador do status da guia;
  • lg-permite-autorizar – Parâmetro que permitirá indicar a possibilidade ou não disponibilizar as opções de autorização da guia (Autoriza sem Impressão e Imprime Autorizando);
  • nr-ano-guia-origem – Ano da guia origem;
  • nr-guia-origem – Número da guia origem
  • lg-erro – 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.
  • ds-mensagem - Mensagem que deverá ser retornada ao usuário, quando indicação de ocorrência de erro.
  • lg-mostra-mensagem - Campo que retorna se o programa chamador deve ou não mostrar a mensagem.

Tabela de entrada e saída tmp-movto

...

• tp-movimento – Indicador que representa o tipo do movimento ("P" – Procedimento ou "I" – Insumo).
• cd-tipo-insumo - Código do tipo do insumo.
• cd-movimento - Código do movimento.
• cd-pacote – Código do pacote.
• ds-movimento – Descrição do movimento.
• qt-movimento – Quantidade do movimento.
• in-situacao – Indica qual a situação do movimento.vl-movimento – Valor do movimento.

...