CPC-FP0514I3.P

Localização

• Dentro do programa fp0514i3.p, anterior a leitura dos usuários;
• Antes de excluir a nota de serviço;
• Antes de excluir os valores por beneficiários;
• Antes de iniciar o processo de estorno;

Pontos: "ANTES-ESTORNO", "APAGA-NOTA", "LER-USUARIO" e "EXC-VLBENEF".

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-fp0514i3-entrada

def temp-table tmp-cpc-fp0514i3-entrada no-undo

field nm-ponto-chamada                       as char format "x(15)"
field in-evento-programa                       as char format "x(10)"
field r-propost                                         as rowid
field vl-total-nota                                    like notaserv.vl-total
field nr-rowid-usuario                            as rowid
field cd-modalidade                               like propost.cd-modalidade
field cd-contratante                                like propost.cd-contratante
field cd-contratante-origem                   like propost.nr-insc-contrat-origem
field nr-ter-adesao                                  like propost.nr-ter-adesao
field aa-referencia                                  as int format "9999"
field mm-referencia                               as int format "99"
field nr-sequencia                                   like vlbenef.nr-sequencia
field r-notaserv                                       as rowid.

Definição campo a campo da tabela de entrada

• nm-ponto-chamada-cpc – Ponto de chamada de cpc
• in-evento-programa – Identifica qual evento deve ser executado no momento que está sendo chamada
• r-proposta – Número do registro no banco da tabela referente a proposta
• vl-total-nota – Valor total da nota calculado até o momento
• nr-rowid-usuario – Número do registro no banco da tabela referente ao beneficiário
• cd-modalidade – Código da modalidade do beneficiário
• cd-contratante – Código do contratante da nota de serviço;
• cd-contratante-origem – Código do contratante origem da nota de serviço;
• nr-ter-adesao – Número do termo de adesão
• aa-referencia – Ano de referência
• mm-referencia – Mês de referência
• nr-sequencia – Sequencia da nota de serviço
• r-notaserv – Recid da nota de serviço

Tabela de saída tmp-cpc-fp0514i3-saida

def temp-table tmp-cpc-fp0514i3-saida no-undo

field lg-undo-retry                                     as log
field ds-mensagem-erro                          as char format "x(75)"
field lg-estrut-cad                                     as log
field in-cob-int-prop                                  as char format "x(01)"
field vl-total-nota                                       like notaserv.vl-total.

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

• lg-undo-retry – Controla os erros que podem ocorrer na CPC.
• ds-mensagem-erro – Recebe a descrição dos erros que ocorreram na CPC.
• lg-estrut-cad – 
• in-cob-int-nota – 
• Vl-total-nota – Valor total da nota calculado até o momento