cpc-api-fp0002.p0

• Rotina utilizada para a alteração do valor dos insumos;
• 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 apenas um registro na tabela temporária de saída. Caso possuir mais de um registro um erro será reportado.

Localização
Dentro da api-fp0002.p, após a valorização dos insumos.
Ponto de Utilização
"APOSVALORIZAINS"
Include das definições das tabelas temporárias
cpc-api-fp0002.i
Tabelas de entrada e saída
Tabela de entrada tmp-cpc- api-fp0002-entrada
def temp-table tmp-cpc-api-fp0002-entrada no-undo
field in-evento-programa as char format "x(10)"
field nm-ponto-chamada-cpc as char format "x(20)"
field cd-modalidade like mov-insu.cd-modalidade
field nr-ter-adesao like mov-insu.nr-ter-adesao
field cd-tipo-insumo like mov-insu.cd-tipo-insumo
field cd-insumo like mov-insu.cd-insumo
field vl-calculo-aux as dec.
Definição campo a campo da tabela de entrada
in-evento-programa – Evento do programa que chama a cpc-api-fp0002.p. O valor desse campo pode ser:
"CALCULO".
nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa api-fp0002.p:
"APÓSVALORIZAINS"
cd-modalidade – Código da Modalidade.
nr-ter-adesao – Numero do termo de adesão.
cd-tipo-insumo – Código do Tipo de Insumo.
cd-insumo – Código do Insumo.
vl-calculo-aux – Valor do calculo do insumo
Tabela de saída tmp-cpc-api-fp0002 -saida
def temp-table tmp-cpc-api-fp0002-saida no-undo
field lg-undo-retry as logical
field ds-mensagem-relatorio as char format "x(75)"
field vl-calculo-aux as dec.
Definição campo a campo da tabela de saída
lg-undo-retry – Variável que controla se erros aconteceram dentro da CPC deve retornar SIM se erros acontecerem e NÃO se o processo foi concluído por completo.

• ds-mensagem-relatorio – Deve conter mensagem de erro ou qualquer outro tipo de mensagem.
• vl-calculo-aux – Valor do calculo do insumo