Localização
Dentro do programa rcapi022.P na inclusão de movimentos, de forma automatizada, no Revisão de Contas.

Ponto de Utilização
"SUBST-PRES-EXEC";
"DATA-BASE-MOVTO";
"TRATA-INSUMO".
"APÓS-VALORIZA"
"BLOQ-VAL-INSUMO"
"CONTR-QUANT"
Utilizado para indicar se será feito o controle quantitativo do movimento.
"COMPL-MOVTO"
Utilizado para criar complemento do movimento.
"ALT-VALOR-COB"
Utilizado para alterar o valor de cobrança do movimento.
Include das definições das tabelas temporárias
cpc-rcapi022.i
Tabelas de entrada e saída
Tabela de entrada tmp-cpc-rcapi022-entrada
def temp-table tmp-cpc-rcapi022-entrada no-undo
field in-evento-programa as char format "x(10)"
field nm-ponto-chamada-cpc as char format "x(15)"
field in-entidade as char format "x(02)"
field dt-realizacao like moviproc.dt-base-valor
field dt-emissao like moviproc.dt-base-valor
field r-recid-periodo as recid
field r-recid-transacao as recid
field cd-uni-cart-ben like previesp.cd-unidade
field cd-uni-pres-exec like previesp.cd-unidade
field cd-pres-exec like previesp.cd-prestador
field dt-base-valor like moviproc.dt-base-valor
field dt-informada like moviproc.dt-base-valor
field cd-unidade-executante like moviproc.cd-unidade-prestador
field cd-prestador-executante like moviproc.cd-prestador
field cd-tipo-insumo like insumos.cd-tipo-insumo
field cd-insumo like insumos.cd-insumo
field cd-unidade like docrecon.cd-unidade
field aa-guia-atendimento like docrecon.aa-guia-atendimento
field nr-guia-atendimento like docrecon.nr-guia-atendimento
field lg-trab-cooperado like tipovinc.lg-trabalho
field pc-taxa-acp like unicamco.pc-taxa-acp
field pc-taxa-aca like unicamco.pc-taxa-aca
field vl-insumo like mov-insu.vl-insumo
field vl-cobrado like mov-insu.vl-cobrado
field vl-taxa-out-insumo like mov-insu.vl-taxa-out-insumo
field cd-tab-preco like mov-insu.cd-tab-preco
field cd-unidade-prestadora like mov-insu.cd-unidade-prestadora
field cd-transacao like mov-insu.cd-transacao
field nr-serie-doc-original like mov-insu.nr-serie-doc-original
field nr-doc-original like mov-insu.nr-doc-original
field nr-doc-sistema like mov-insu.nr-doc-sistema
field nr-processo like mov-insu.nr-processo
field nr-seq-digitacao like mov-insu.nr-seq-digitacao
field vl-taxa-out-uni-cobrado like mov-insu.vl-taxa-out-uni-cobrado.
Definição campo a campo da tabela de entrada
in-evento-programa– Evento do programa que chama cpc-rcapi022.P.
"INCLUI".
nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa rcapi022.p poderá ser "SUBST-PRES-EXEC"; "DATA-BASE-MOVTO", "TRATA-INSUMO", "BLOQ-VAL-INSUMO", "CONTR-QUANT", "CRIA-COMPL-MOVTO" e "ALT-VALOR-COB".
in-entidade –
dt-realizaao – Data de realização do movimento;
dt-emissão – Data de emissão do documento;
r-recid-periodo – recid da tabela de período de movimentação a qual o movimento (documento) está associado;
r-recid-transacao – recid da tabela de transacao do a qual o movimento (documento) está associado;
cd-uni-cart-bem – código da unidade da carteira do beneficiário que utilizou/realizou o inusmo;
cd-uni-pres-exec – código da unidade do prestador que utilizou/realizou o inusmo;
cd-pres-exec – código do prestador que utilizou/realizou o inusmo;
dt-base-valor – data base de valorização do movimento em utilização;
dt-informada – data informada pelo usuário para valorização;
cd-unidade-executante - código da unidade do prestador que utilizou/realizou o inusmo;
cd-prestador-executante - código do prestador que utilizou/realizou o inusmo;
cd-tipo-insumo – código do tipo do insumo utilizado/realizado;
cd-insumo – código do insumo utilizado/realizado.
cd-unidade – código da unidade.
aa-guia-atendimento – ano da guia de atendimento.
nr-guia-atendimento – n° da guia de atendimento.
lg-trab-cooperado – parâmetro identificador de trabalho cooperado.
pc-taxa-acp – percentual da taxa principal
pc-taxa-aca – percentual da taxa auxiliar
vl-insumo – valor do insumo
vl-cobrado – valor cobrado do insumo
vl-taxa-out-insumo – valor da taxa insumo.
cd-tab-preco – Código da tabela de preço do insumo.
cd-unidade-prestadora – Código da Unidade Prestadora.
cd-transacao – Código da transação.
nr-serie-doc-original – Número de Série do Documento.
nr-doc-original – Número do documento Original
nr-doc-sistema – Número do documento no sistema
nr-processo – Número do processo do movimento
nr-seq-digitacao – Número seqüencial de digitação do movimento
vl-taxa-ou-uni-cobrado – Valor da taxa.
Tabela de saída tmp-cpc-rcapi022-saida
def temp-table tmp-cpc-rcapi022-saida no-undo
field dt-base-valor like moviproc.dt-base-valor
field lg-undo-retry as log
field ds-mensagem as char
field cd-unidade-encaminhamento like moviproc.cd-unidade-prestador
field cd-prestador-encaminhamento like moviproc.cd-prestador
field vl-insumo like mov-insu.vl-insumo
field vl-taxa-out-insumo like mov-insu.vl-taxa-out-insumo
field lg-manual as log
field cd-controla-quantitativo like mov-insu.cd-controla-quantitativo
field vl-cobrado like mov-insu.vl-cobrado
field vl-taxa-out-uni-cobrado like mov-insu.vl-taxa-out-uni-cobrado.
Definição campo a campo da tabela de saída
cd-unidade-encaminhamento – Unidade a ser substituída pela Unidade Executante
cd-prestador-encaminhamento – Prestador a ser substituído pelo Prestador Executante
lg-undo-retry – Variável que controla os erros que podem ocorrer na CPC.
ds-mensagem – Variável que retornar mensagem de erro, se ocorrido dentro da CPC.
dt-base-valor – data base para ser utilizada na valorização dos movimentos.
vl-insumo – valor do insumo.
vl-taxa-out-insumo – valor da taxa do insumo.
Lg-manual – indicador de preço manual do insumo.
Cd-controla-quantitativo – Indicador de controle quantitativo.
Vl-cobrado – Valor cobrado pelo movimento
Vl-taxa-out-uni-cobrado – Valor taxa.