CPC-FP0514I3.i

Âncora__RefHeading__23765_2053127524__RefHeading__23765_2053127524 Âncora__RefHeading__9920_486694287__RefHeading__9920_486694287 Âncora__RefHeading__5131_213273755__RefHeading__5131_213273755 Âncora__RefHeading__14529_644533341__RefHeading__14529_644533341 Âncora__RefHeading__90427_1756225838__RefHeading__90427_1756225838Localizaçã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;

...

__RefHeading__23767_2053127524__RefHeading__23767_2053127524 Âncora__RefHeading__9922_486694287__RefHeading__9922_486694287 Âncora__RefHeading__5133_213273755__RefHeading__5133_213273755 Âncora__RefHeading__14531_644533341__RefHeading__14531_644533341 Âncora__RefHeading__90429_1756225838__RefHeading__90429_1756225838Tabelas de entrada e saída
Âncora__RefHeading__23769_2053127524__RefHeading__23769_2053127524 Âncora__RefHeading__9924_486694287__RefHeading__9924_486694287 Âncora__RefHeading__5135_213273755__RefHeading__5135_213273755 Âncora__RefHeading__14533_644533341__RefHeading__14533_644533341 Âncora__RefHeading__90431_1756225838__RefHeading__90431_1756225838

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

...

...