Histórico da Página

...

• Dentro do programa ac1006d.p.

Ponto de Utilização

• "TRANS-PROCED"
• "PERMITE-SIMUL"
• "VERIFICA-ERRO"
• CON-DOC-ANT", "CON-PRETIP-DIVGUIA",
• "TRANSCON-DOC-PROCEDANT"
• , "VERIFICACON-PRE-DIV"
• -ERRO" , "PERMITE-SIMUL", "VALIDA-GUIA",
• "CONANTES-SOLIC"
• TIP-GUIA",  "PROCESSOFINAL" e
• "ANTES-EXCLUI".

Include das definições das tabelas temporárias

...

Tabela de entrada tmp-cpc-ac1006d-entrada

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

field in-evento-programa                    as as char format "x(10)"
field nm-ponto-chamada-cpc              as as char format "x(15)"
field cd-unidade                                  like like docusos.cd-unidade
field cd-unidade-prestadora                like like docusos.cd-unidade-prestadora
field cd-transacao                               like docusos.cd-transacao
field nr-serie-doc-original                    like like docusos.nr-serie-doc-original
field nr-doc-original                             like docusos.nr-doc-original
field nr-doc-sistema                            like like docusos.nr-doc-sistema
field cd-clinica                                     like docusos.cd-clinica
field cd-unidade-principal                    like like docusos.cd-unidade-principal
field cd-prestador                                like 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 like moviproc.cd-carteira-usuario
field cd-erro-sistema                           as int
field cd-uni-cli                                      like like clinpres.cd-unidade
field dt-realizacao                                as as date format "99/99/9999"
field hr-realizacao                                as as char format "x(08)"
field nr-recid-usuario                           as recid
field nr-recid-out-uni                            as as recid
field nr-recid-pres-exec                       as recid
field nr-recid-pres-sol                          as as recid
field nr-recid-pres-pri                          as as recid
field nr-recid-guia                               as recid
field nr-recid-docrecon as recid
field aa-guia-atendimento                  like 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 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. O valor 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 ac1006d.p. O valor desse campo pode ser: "DOCUMENTO-ANTERIOR" ou "DIVISAO-HONORARIO" ou "VALIDA-GUIA" e "PERMITE-SIMUL". 
• 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

...

• 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

...

• 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.