CPC-MC0210O.P

Rotina utilizada para: 

• Processar atualização da lista de preço ou
• Alteração de dados no momento do reajuste da proposta
• 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

• Para o ponto "ATUALIZA-PROP", dentro do mc0210o.p ao atualizar as listas de preços.
• Para o ponto "ALTERA-DADOS", dentro do mc0210o.p quando da aplicação do reajuste na proposta.
• Para o ponto "MARCA-PROPOSTA", dentro do mc0210o.p quando da aplicação do reajuste na proposta, se o parâmetro "Informa Novo % de Reajuste" estiver marcado e quando não for Simulação.

Ponto de Utilização

• "ATUALIZA-PROP", "ALTERA-DADOS" e "MARCA-PROPOSTA"

Include das definições das tabelas temporárias

• cpc-mc0210o.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-mc0210o-entrada

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

field in-evento-programa                   as char format "x(10)"
field nm-ponto-chamada-cpc             as char format "x(15)"
field cd-modalidade                          like propost.cd-modalidade
field nr-proposta                              like propost.nr-proposta
field cd-tab-preco-ori                        like tabpremo.cd-tab-preco
field cd-tab-preco-des                       like tabpremo.cd-tab-preco
field aa-referencia                            like notaserv.aa-referencia
field mm-referencia                          like notaserv.mm-referencia
field pc-reajuste                               like histabpreco.pc-reajuste
field nr-ter-adesao                            like usuario.nr-ter-adesao.

Definição campo a campo da tabela de entrada

• in-evento-programa – Evento do programa
• nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza
• cd-modalidade – Código da modalidade de comercialização
• nr-proposta – Numero da proposta
• cd-tab-preco-ori – Código da tabela de preço origem da proposta
• cd-tab-preco-des – Código da tabela de preço destino
• aa-referencia – Ano de referencia
• mm-referencia – Mês de referencia
• pc-reajuste – Percentual de reajuste para a tabela de preço
• nr-ter-adesao – Número do termo de adesão do beneficiário

Tabela de saída tmp-cpc-mc0210o –saida

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

field lg-undo-retry                           as log
field ds-mensagem-retorno              as char format "x(75)"
field lg-reajustar                             as log
field pc-reajuste                             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
• ds-mensagem-retorno - Retorna a mensagem da cpc
• lg-reajustar – Parâmetro indicador para aplicar ou não reajuste na proposta
• pc-reajuste – Percentual de resjuste a ser aplicado na reajuste na proposta.