Rotina utilizada para deletar os movimentos da tabela movpagto atrelados a movipres.
Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.
Será utilizado para esta CPC apenas um registro na tabela temporária de saída.
Localização
Dentro do programa pp0413c.p.
Ponto de Utilização
"ANTES-ELIMINA"
Include das definições das tabelas temporárias
cpc-pp0413c.i
Tabelas de entrada e saída
Tabela de entrada tmp-cpc-pp0412c-entrada
def temp-table tmp-cpc-pp0413c-entrada no-undo
field nm-ponto-chamada-cpc as char format "x(15)"
field r-movipres as rowid.
Definição campo a campo da tabela de entrada
nm-ponto-chamada-cpc – Indica o ponto de chamada da CPC.
r-movipres - Ponteiro (rowid) da tabela de Eventos Extras (movipres).
Tabela de saída tmp-cpc-pp0412c-saida
def temp-table tmp-cpc-pp0413c-saida no-undo
field lg-undo-retry as log
field ds-mensagem as char.
Definição campo a campo da tabela saída
lg-undo-retry – Indica se ocorreu erro durante processamento da cpc.
ds-mensagem – Descrição de mensagem de erro que sera mostrada caso o lg-undo-retry = yes.