Histórico da Página
...
def temp-table tmp-cpc-ac0011r-entrada no-undo
field in-evento-programa
...
as char format "x(06)"
field nm-ponto-chamada-cpc
...
as char format "x(15)"
field cd-erro-sistema as int
field nr-rowid-usuario
...
as rowid
field nr-rowid-out-uni
...
as rowid
field cd-unidade
...
like previesp.cd-unidade
field cd-prestador
...
like previesp.cd-prestador
field cd-vinculo
...
like previesp.cd-vinculo
field cd-especialid like previesp.cd-especialid
field cd-procedimento like ambcbhpm.cd-amb
field qt-procedimento as int
...
format "9999"
field cd-uni-cli
...
like moviproc.cd-unidade-clinica
field cd-clinica
...
like moviproc.cd-clinica
field dt-realizacao as date format "99/99/9999"
field hr-realizacao as char format "x(08)"
field cd-unidade-prest-princ
...
like paproins.cd-unidade
field cd-prestador-princ
...
like paproins.cd-prestador
field cd-pacote like paproins.cd-pacote
field aa-guia-atendimento
...
like guiautor.aa-guia-atendimento
field nr-guia-atendimento like guiautor.nr-guia-atendimento
field r-beneficiario
...
as recid
field r-docusos as recid
field lg-urgencia as log
field nr-processo as int
field nr-sequencia
...
as int
field lg-registro-atual as log
field ds-mensagem as char format "x(75)"
field cd-esp-amb
...
like ambproce.cd-esp-amb
field cd-grupo-proc-
...
amb like ambproce.cd-grupo-proc-
...
amb
field cd-procedimento-amb like ambproce.cd-procedimento
field dv-procedimento like ambproce.dv-procedimento
field cd-erro as char format "9999"
field in-tipo-movto as char format "x(01)"
field cd-glosa
...
as int
field cd-classe-erro
...
as int
field lg-reconsulta-aux as log
field cd-unidade-ant
...
like paproins.cd-
...
unidade
field cd-transacao-ant
...
like tranrevi.cd-transacao
field cd-unidade-prestadora-ant like moviproc.cd-unidade-prestadora
field nr-serie-doc-original-ant like moviproc.nr-serie-doc-original
field nr-doc-original-ant like moviproc.nr-doc-original
field nr-doc-sistema-ant
...
like moviproc.nr-doc-sistema
...
field lg-continua as log
field vl-cobrado
...
like procusos.vl-cobrado
field vl-taxa-out-uni-cobrado like procusos.vl-taxa-out-uni-
...
prin
field vl-taxa-out-principal like procusos.vl-taxa-out-uni-
...
prin
field vl-taxa-out-uni-auxi
...
like procusos.vl-taxa-out-uni-
...
auxi
field vl-principal
...
like procusos.vl
...
-principal
field vl-auxiliar like procusos.vl-auxiliar
field cd-unidade-prest-exec like preserv.cd-unidade
field cd-prestador-executante like preserv.cd-prestador
field cd-unidade-prestadora like procusos.cd-unidade-prestadora
field cd-transacao
...
like procusos.cd-transacao
field nr-serie-doc-original like procusos.nr-serie-doc-original
field nr-doc-original like procusos.nr-doc-original
field nr-doc
...
-sistema like procusos.nr-doc-sistema
field nr-seq-digitacao
...
like procusos.nr-seq-digitacao
field cd-local-atendimento
...
like locaaten.cd-local-atendimento
field vl-servico
...
like procusos.vl-principal
field h-mensagens as handle.
Definição campo a campo da tabela de entrada
- in-evento-programa – Identifica qual procedimento a cpc deve executar no momento que é chamada;
- nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc";
- cd-erro-sistema – Código gerado pelo sistema de erro de processamento. Esta variável somente terá conteúdo válido se o ponto de chamada da CPC for "VERIFICA-ERRO";
- nr-rowid-usuario - ROWID de acesso a tabela USUARIO, quando beneficiário da base. Esta variável somente terá conteúdo válido se o ponto de chamada da CPC for "APOS-VALIDACAO" ou "VERIFICA-ERRO" ou "HORA-URGENCIA" e o beneficiário for da base;
- nr-rowid-out-uni – ROWID de acesso a tabela OUT-UNI, quando o beneficiário de intercâmbio. Esta variável somente terá conteúdo válido se o ponto de chamada da CPC for "APOS-VALIDACAO" ou "VERIFICA-ERRO" ou "HORA-URGENCIA" e o beneficiário for de intercâmbio.
- cd-unidade - Unidade do prestador executante. Esta variável somente terá conteúdo válido se o ponto de chamada da CPC for "APOS-VALIDACAO" ou "VERIFICA-ERRO".
- cd-prestador - Prestador executante. Esta variável somente terá conteúdo válido se o ponto de chamada da CPC for "APOS-VALIDACAO" ou "VERIFICA-ERRO".
- cd-vinculo - Vínculo do prestador executante. Esta variável somente terá conteúdo válido se o ponto de chamada da CPC for "APOS-VALIDACAO" ou "VERIFICA-ERRO".
- cd-especialid – Especialidade do prestador executante. Esta variável somente terá conteúdo válido se o ponto de chamada da CPC for "APOS-VALIDACAO" ou "VERIFICA-ERRO".
- cd-procedimento – Código do procedimento. Esta variável somente terá conteúdo válido se o ponto de chamada da CPC for "APOS-VALIDACAO" ou "VERIFICA-ERRO".
- qt-procedimento – Quantidade do procedimento. Esta variável somente terá conteúdo válido se o ponto de chamada da CPC for "APOS-VALIDACAO" ou "VERIFICA-ERRO".
- cd-uni-cli – Unidade da clínica onde é realizado o procedimento. Esta variável somente terá conteúdo válido se o ponto de chamada da CPC for "APOS-VALIDACAO" ou "VERIFICA-ERRO".
- cd-clinica – Código da clínica onde é realizado o procedimento. Esta variável somente terá conteúdo válido se o ponto de chamada da CPC for "APOS-VALIDACAO" ou "VERIFICA-ERRO".
- dt-realizacao – Data de realização do procedimento. Esta variável somente terá conteúdo válido se o ponto de chamada da CPC for "APOS-VALIDACAO" ou "VERIFICA-ERRO".
- hr-realizacao - Hora de realização do procedimento. Esta variável somente terá conteúdo válido se o ponto de chamada da CPC for "APOS-VALIDACAO" ou "VERIFICA-ERRO".
- cd-unidade-prest-princ – Código da unidade do prestador principal. Somente será diferente de zeros quando o ponto de chamada da CPC for "VERIFICA-ERRO".
- cd-prestador-princ – Código do prestador principal. Somente será diferente de zeros quando o ponto de chamada da CPC for "VERIFICA-ERRO".
- cd-pacote – Código do pacote. Somente será diferente de zeros quando o procedimento for oriundo de pacote e se o ponto de chamada da CPC for "VERIFICA-ERRO".
- aa-guia-atendimento – Ano da guia de atendimento (autorização). Somente será diferente de zeros quando uma guia for associada ao documento e o ponto de chamada da CPC for "VERIFICA-ERRO".
- nr-guia-atendimento – Número da guia de atendimento (autorização). Somente será diferente de zeros quando uma guia for associada ao documento e o ponto de chamada da CPC for "VERIFICA-ERRO".
- r-beneficiario – recID do beneficiário.
- r-docusos - RecID do documento de usos.
- lg-urgencia – Log que informa se é urgência ou não.
- lg-reconsulta-aux - Log que informa se é reconsulta ou não.
- cd-unidade-ant - Código da unidade do documento anterior. Somente será informado quando o ponto de chamada da CPC for "VERIFICA-ERRO".
- cd-transacao-ant - Código da transação do documento anterior. Somente será informado quando o ponto de chamada da CPC for "VERIFICA-ERRO".
- cd-unidade-prestadora-ant - Código da unidade prestadora do documento anterior. Somente será informado quando o ponto de chamada da CPC for "VERIFICA-ERRO".
- nr-serie-doc-original-ant - Número da série do documento anterior. Somente será informado quando o ponto de chamada da CPC for "VERIFICA-ERRO".
- nr-doc-original-ant - Número do documento original anterior. Somente será informado quando o ponto de chamada da CPC for "VERIFICA-ERRO".
- nr-doc-sistema-ant - Número do documento sistema do documento anterior. Somente será informado quando o ponto de chamada da CPC for "VERIFICA-ERRO".
- lg-continua - Indicador recebido do programa ac0011r.p, indicando se o erro gerado pelo programa é restritivo ou não. Ou seja, quando recebe o valor "no" o erro gerado não permite o programa continuar, e quando recebe "yes" o erro é apenas um alerta. Somente será informado quando o ponto de chamada da CPC for "VERIFICA-ERRO".
vl-cobrado - Valor cobrado do movimento. Somente será informado quando o ponto de chamada da CPC for "ANTES-GRAVAR".
vl-taxa-out-uni-cobrado - Taxa cobrada do movimento. Somente será informado quando o ponto de chamada da CPC for "ANTES-GRAVAR".
vl-taxa-out-principal - Taxa principal do movimento. Somente será informado quando o ponto de chamada da CPC for "ANTES-GRAVAR".
vl-taxa-out-uni-auxi - Taxa auxiliar do movimento. Somente será informado quando o ponto de chamada da CPC for "ANTES-GRAVAR".
vl-principal - Valor principal do movimento. Somente será informado quando o ponto de chamada da CPC for "ANTES-GRAVAR".
vl-auxiliar - Valor auxiliar do movimento. Somente será informado quando o ponto de chamada da CPC for "ANTES-GRAVAR".
cd-unidade-prest-exec - Unidade do prestador executante . Somente será informado quando o ponto de chamada da CPC for "ANTES-GRAVAR".
cd-prestador-executante - Prestador executante. Somente será informado quando o ponto de chamada da CPC for "ANTES-GRAVAR".
cd-unidade-prestadora - Unidade prestadora. Somente será informado quando o ponto de chamada da CPC for "ANTES-GRAVAR".
cd-transacao - Código da transação. Somente será informado quando o ponto de chamada da CPC for "ANTES-GRAVAR".
nr-serie-doc-original - Série do documento. Somente será informado quando o ponto de chamada da CPC for "ANTES-GRAVAR".
nr-doc-original - Número do documento original. Somente será informado quando o ponto de chamada da CPC for "ANTES-GRAVAR".
nr-doc-sistema - Número do documento sistema. Somente será informado quando o ponto de chamada da CPC for "ANTES-GRAVAR".
nr-seq-digitacao - Número da sequência do documento. Somente será informado quando o ponto de chamada da CPC for "ANTES-GRAVAR".
- cd-local-atendimento - Local de atendimento.
- vl-servico - Valor do procedimento.
- h-mensagens - Tabela temporária referente as mensagens.
Tabela de entrada tmp-cpc-ac0011r-insumo
...