CPC-RC0112E.P

• Rotina utilizada para inclusão do parâmetro de acréscimo/desconto do prestador.
• Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.
• Será permitido para esta CPC no máximo um registro na tabela temporária de saída.

Localização

• Final do Modifica.

Ponto de Utilização 

• "FINAL-MODIFICA

Include das definições das tabelas temporárias

• cpc-rc0112e.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-rc0112e-entrada

ddef temp-table tmp-cpc-rc0110e-entrada no-undo

field in-evento-programa                        as char format "x(10)"
field nm-ponto-chamada-cpc                  as char format "x(15)"
field r-preinpr                                          as rowid

Definição campo a campo da tabela de entrada

• in-evento-programa – Nome do evento do ponto de chamada dentro do programa que a utiliza. Para o programa rc0112e.p:
• "MODIFICA"
• nm-ponto-chamada – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa rc0112e.p:
• "FINAL-MODIFICA"
• r-preinpr - rowid da tabela preinpr

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

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

field lg-undo-retry                                as log
field ds-mensagem                              as char format "X(75)"
field lg-acres-desc-prest                       as log.

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

• lg-undo-retry – Variável que controla se erros aconteceram dentro da CPC. Se o retorno desta variável for igual a SIM, indicará que erros aconteceram e se o retorno for igual à NÃO, indicará que o processo foi concluído por completo.
• ds-mensagem – Variável que retornar mensagem de erro, se ocorrido dentro da CPC.
• Lg-acres-desc-presta – Variável retorna status do campo preinpr.log-1 da tabela PREINPR.