CPC-FP0210J.p

• Rotina que possibilita a mudança da observação de contestação genérica dos movimentos.

...

Ponto de Utilização

• "DEP-GRAVA-MOVTO"
• "INI-LEIT-FATURA" - liberação a partir da 12.1.2301

Include das definições das tabelas temporárias

• cpc-fp0210j.i

...

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-fp0210j-entrada

def temp-table tmp-cpc-fp0210j-entrada no-undo
    field nm-ponto-chamada

...

as char format "x(20)"
    field tp-movimento-par

...

as char format "x(1)"
    field rowid-movto    

...

 as rowid
    field cd-cod-glo-par

...

  like movrcglo.cd-cod-glo
    field ds-observacao    like moviproc.ds-observacao
    field r-notapres      

...

as rowid.

Definição campo a campo da tabela de entrada

• nm-ponto-chamada – Ponto de chamada da CPC;
• tp-movimento-par – Tipo de movimento – P para procedimento e I para insumo;
• rowid-movto – RowID da tabela moviproc caso tp-movimento-par seja procedimento ou RowID da tabela mov-insu caso tp-movimento-par seja insumo.;
• cd-cod-glo-par – Código da glosa para o movimento sendo analisado;
• ds-observacao – A observação informada no sistema;
• r-notapres - RowID da tabela notapres.

Tabela de saida tmp-cpc-fp0210j-saida

def temp-table tmp-cpc-fp0210j-saida no-undo
    field lg-erro          as log
   

...

field ds-mensagem-erro

...

as char format "x(50)" 
    field lg-undo-retry  

...

 as log
    field ds-observacao

...

   like moviproc.ds

...

-observacao 
    field lg-continua      as log.

Definição campo a campo da tabela de saída

• lg-erro – Indica se ocorreu algum erro na CPC;
• ds-mensagem-erro – Aponta a mensagem de erro que ocorreu na CPC.
• lg-undo-retry – Indica se ocorreu algum erro na CPC;
• ds-observacao – A observação retornada da CPC. Será colocada como observação da contestação do movimento;

...

• lg-continua – Indica se o processo deve ou não continuar.