cpc-rc0512n1.p0

Rotina chamada no programa para buscar as moedas de acordo com o necessitado;
Localização
rc0512n1.p;
Ponto de Utilização
"HORA-URGENCIA"
"APOS-BUSCA-TAB"
Include das definições das tabelas temporárias
cpc- rc0512n1.i
Tabelas de entrada e saída
Tabela de entrada tmp-cpc-rc0512n1-entrada
def temp-table tmp-cpc-rc0512n1-entrada no-undo
field in-evento-programa as char format "x(06)"
field nm-ponto-chamada-cpc as char format "x(15)"
field cd-movto as int format '99999999'
field nr-rowid-usuario as rowid
field nr-rowid-out-uni as rowid
field cd-unidade-carteira like car-ide.cd-unimed
field cd-unidade-executante like preserv.cd-unidade
field cd-prestador-executante like preserv.cd-prestador
field lg-urgencia as log
field cd-procedimento like moviproc.cd-procedimento
field cd-grupo-proc-amb like moviptmp.cd-grupo-proc-amb
field int-12 like moviproc.int-12
field int-13 like moviproc.int-13
field cd-unimed like paramecp.cd-unimed
field nr-rowid-proposta as rowid
field cd-modulo like moviproc.cd-modulo
field dt-realizacao like moviproc.dt-realizacao
field cd-tab-preco-pagto like precproc.cd-tab-preco.
Definição campo a campo da tabela de entrada
in-evento-programa – Evento do programa que chama a cpc-rc0512n1d.
nm-ponto-chamada-cpc – Nome do ponto de chamada.
cd-movto – Código do movimento atual.
cd-unidade-carteira – Código da Carteira do beneficiário.
cd-unidade-executante – Código da unidade do Prestador Executante.
cd-prestador-executante – Código do prestador Executante.
lg-urgencia – Log que informa se o movimento é de urgência.
cd-procedimento – Código do procedimento.
cd-grupo-proc-amb – Código do grupo do procedimento.
int-12 – Unidade do prestador origem.
int-13 – Prestador origem.
cd-unimed – Código da Unidade.
nr-rowid-proposta – Identificador da proposta.
cd-modulo – Módulo.
dt-realizacao – Data da realização.
cd-tab-preco-pagto – Tabela de preço.
Tabela de saída tmp-cpc-rc0512n1-saida
def temp-table tmp-cpc-rc0512n1-saida no-undo
field lg-undo-retry as log
field ds-mensagem as char format "x(75)"
field lg-urgencia as log
field cd-tab-preco-pagto like precproc.cd-tab-preco.
Definição campo a campo da tabela de saída
lg-undo-retry - Variável que controla se erros aconteceram dentro da CPC deve retornar SIM se erros aconteceram e NÃO se o processo foi concluído por completo.
ds-mensagem – Deve conter mensagem de saída.
lg-urgencia – Log que informa se o movimento é de urgência.
cd-tab-preco-pagto - Tabela de preço.