Histórico da Página
CPC-AC1006D.p
Produto: | Gestão de Planos de Saúde |
| Módulo: | Todos |
| Versão: | 12.x.x |
| Assuntos: | cpc-ac1006d.p |
Rotina utilizada para:
- Verificar se o documento anterior, se informado, é de consulta;
...
- Indicar se deve ou não ser solicitado o prestador da Divisão de Honorários e;
...
- Permtir trocar o código do procedimento informado pelo usuário.
...
- Indicar se processamento do programa deve ou não continuar quando da ocorrência de erro/restrição.
...
- Permitir a operadora liberar o processo de simulação de registro de SP/SADT, quando da ocorrência de restrição por uso obrigatório de carteira do beneficiário. Ressalto que está CPC funciona em conjunto com a CPC-WAC0012A1 (Ponto de Chamada PERMITE-SIMUL), e que para o correto funcionamento da mesma as duas CPC deverão estar ativas em conjunto.
- 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.
...
- Validar o limite de quantidade de pacote por transação no ponto "PROCESSOFINAL", comparando a quantidade digitada pelo usuário e a quantidade cadastrada no banco (paproins.u-int-1).
Localização
- Dentro do programa ac1006d.p.
...
Ponto de Utilização
...
- "TRANS-PROCED"
- "PERMITE-SIMUL"
- "VERIFICA-ERRO"
- "CON-TIP-GUIA"
- "CON-DOC-ANT"
...
- "CON-PRE-DIV"
...
- "
...
- VALIDA-
...
- GUIA"
...
- "
...
- ANTES-
...
- SOLIC"
...
- "
...
- PROCESSOFINAL"
...
- "
...
- ANTES-
...
- EXCLUI".
Include das definições das tabelas temporárias
- cpc-ac1006d.i
...
Tabelas de entrada e saídaÂncora
Tabela de entrada tmp-cpc-ac1006d-entrada
def temp-table tmp-cpc-ac1006d-entrada no-undo
field in-evento-programa as char format "x(10)"
field nm-ponto-chamada-cpc as char format "x(15)"
field cd-unidade like docusos.cd-unidade
field cd-unidade-prestadora like docusos.cd-unidade-prestadora
field cd-transacao like docusos.cd-transacao
field nr-serie-doc-original like docusos.nr-serie-doc-original
field nr-doc-original like docusos.nr-doc-original
field nr-doc-sistema like docusos.nr-doc-sistema
field cd-clinica like docusos.cd-clinica
field cd-unidade-principal like docusos.cd-unidade-principal
field cd-prestador like docusos.cd-prestador-principal
field cd-procedimento like ambcbhpm.cd-amb
field cd-unidade-carteira like moviproc.cd-unidade-carteira
field cd-carteira-usuario like moviproc.cd-carteira-usuario
field cd-erro-sistema as int
field cd-uni-cli like clinpres.cd-unidade
field dt-realizacao as date format "99/99/9999"
field hr-realizacao as char format "x(08)"
field nr-recid-usuario as recid
field nr-recid-out-uni as recid
field nr-recid-pres-exec as recid
field nr-recid-pres-sol as recid
field nr-recid-pres-pri as recid
field nr-recid-guia as recid
field nr-recid-docrecon as recid
field aa-guia-atendimento like guiautor.aa-guia-atendimento
field nr-guia-atendimento like guiautor.nr-guia-atendimento
field lg-simulacao as log
...
field h-tmp-servico as handle
field nr-recid-paproins as recid
field in-tipo-proces as char format "x(01)"
field qt-servico like mov-insu.qt-insumo.
Definição campo a campo da tabela de entrada
- in-evento-programa – Evento do programa que chama a cpc-ac1006d.p.
...
- nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza.
...
- cd-unidade – Código da Unidade;
- cd-unidade-prestadora – Código da Unidade Prestadora;
- cd-transacao – Código da Transação;
- nr-serie-doc-original – Série do documento original;
- nr-doc-original – Número do documento original
- cd-clinica – Código da clinica;
- cd-unidade-principal – Código da unidade do prestador;
- cd-prestador – Código do prestador
- cd-procedimento – Código do procedimento.
- cd-unidade-carteira – Código da unidade da carteira do beneficiário;
- cd-carteira-beneficiário – Código da carteira do beneficiário.
- cd-erro-sistema – Código gerado pelo sistema de erro de processamento;
- cd-uni-cli – Unidade da clínica onde esta sendo utilizado o insumo;
- dt-realizacao – Data de realizacao;
- hr-realizacao – Hora de realização
- nr-recid-usuario – RECID de acesso a tabela USUARIO, quando beneficiário da base;
- nr-recid-out-uni – RECID de acesso a tabela OUT-UNI, quando beneficiário de intercâmbio;
- nr-recid-pres-exec – RECID de acesso a tabela PRESERV do prestador executante;
- nr-recid-pres-sol – RECID de acesso a tabela PRESERV do prestador solicitante;
- nr-recid-pres-pri – RECID de acesso a tabela PRESERV do prestador principal;
- nr-recid-guia – RECID de acesso a tabela GUIAUTOR;
- nr-recid-docrcon – RECID de acesso a tabela DOCRECON;
- aa-guia-atendimento – Ano da guia de atendimento (autorização);
- nr-guia-atendimento – Número da guia de atendimento (autorização)
...
- ;
- lg-simulacao – indicador de simulação ou não do processo de registro de SP/SADT
...
- ;
- nr-recid-paproins - RECID de acesso a tabela PAPROINS;
- in-tipo-proces - Indicador do tipo de processo, WAC = "W";
- qt-servico - Quantidade de serviços encaminhados no segmento de requisição.
...
Tabela de entrada-saída tmp-cpc-ac1006d-movto
def temp-table tmp-cpc-ac1006d-movto no-undo
field nr-processo
...
as int
field nr-sequencia
...
as int
field cd-procedimento
...
like ambcbhpm.cd-cbhpm.
...
- nr-processo – Número do processo, do documento;
- nr-sequencia – Número da seqüência, no documento;
- cd-procedimento – Código do procedimento. Quando utilizada no ponto de chamada "VERIFICA-ERRO" conterá o código do pacote e não o código do procedimento.
...
...
...
Tabela de saída tmp-cpc-ac1006d-saida
def temp-table tmp-cpc-ac1006d-saida no-undo
field lg-undo-retry
...
as log
field ds-mensagem
...
as char format "x(50)"
field cd-erro-sistema
...
as char format "x(04)"
field lg-aplica-divisao as log
field cd-procedimento-saida
...
like ambcbhpm.cd-cbhpm
field lg-continua as log initial yes
field lg-permite-simulacao as log
field cd-tipo-guia
...
like guiautor.cd-tipo-guia.
...
Definição campo a campo da tabela de saída
- lg-undo-retry – Indica se houve algum erro dentro da CPC;
- ds-mensagem – Indica a descrição da mensagem de erro;
- cd-erro-sistema – código do erro a ser apresentado caso o documento anterior não seja uma consulta.
- lg-aplica-divisao – Parâmetro que tem a função de indicar se deverá ou não ser solicitado o prestador da Divisão de Honorários;
- cd-procedimento-saida – Código do procedimento de saída (convertido);
- lg-continua – Indica se o processamento deverá ou não prosseguir, a partir do código de erro passado para a CPC através da tabela temporária de entrada (cd-erro-sistema). Esta variável somente deverá retornar valor quando o ponto de chamada da CPC for igual a "VERIFICA-ERRO";
- lg-permite-simulacao - Indica se o processo de simulação de registro de SP/SADT, quando da ocorrência de restrição por uso obrigatório de carteira do beneficiário poderá ou não ser realizado;
- cd-tipo-guia – Código do tipo da guia.
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas