CPC-VP0111V.P

• Rotina utilizada na atualização especial da proposta.
• Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.
• Será utilizado para esta CPC apenas um registro na tabela temporária de saída.

Localização

• INADIM: Dentro do programa vp0111v.p, antes de habilitar para alteração o campo "Trata Inadimplencia".
• FINAL-ATUALIZA: Dentro do programa vp0111v.p, após atualizar a proposta.
• FX-CONVENIO: Dentro do programa vp0111v.p, após confirmar a inclusão da faixa etária especial por convênio.
• REAJ-PROPOSTA: Dentro do programa vp0111v.p, após informar o Mês/Ano do último reajuste da proposta.
• PERFIL-USUARIO: Dentro do programa vp0111v.p, antes da alteração nos campos de percentual d desconto.
• VALIDA-VIGENCIA: Dentro do programa vp0111v.p, antes de validar o Mês/Ano de vigencia.
• INICIO-ATU: Dentro do programa vp0111v.p, no início da atualização da proposta - liberado a partir da versão 12.1.2403.

Ponto de Utilização

"INADIM", "FINAL-ATUALIZA", "FX-CONVENIO", "REAJ-PROPOSTA", "PERFIL-USUARIO", "VALIDA-VIGENCIA" e “INICIO-ATU”.

Include das definições das tabelas temporárias

• cpc-vp0111v.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-vp0111v-entrada

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

        field in-evento-programa       as char format "x(10)"
        field nm-ponto-chamada-cpc     as char format "x(15)"
        field r-propost                as recid
        field cd-userid                as char format "x(12)"
        field mm-aa-ult-reaj           as char format "99/9999"
        field cd-tipo-participacao     like tipopart.cd-tipo-participacao
        field in-campos                as char format "x(200)"
        field pc-ult-reajuste          like propost.pc-ult-reajuste.
"

Definição campo a campo da tabela de entrada 

• • • in-evento-programa – Indica o evento que ativa o ponto de chamada.
    • nm-ponto-chamada-cpc – Indica o ponto de chamada da CPC.
    • r-proposta – Identificação do registro da proposta.
    • cd-userid – Identifica usuário logado no sistema.
    • mm-aa-ult-reaj – Identifica o último mês/ano de reajuste.
    • cd-tipo-participacao - Identifica o tipo de participação da proposta.
    • in-campos - 
    • pc-ult-reajuste - Identifica o último percentual de reajuste da proposta.

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

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

field lg-undo-retry                 as log
field ds-mensagem              as char
field lg-permite-alterar          as log
field lg-continua                   as log

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

• • • lg-undo-retry – Indica se ocorreu erro durante processamento da cpc.
    • ds-mensagem – Retorna a descrição da mensagem de erro caso tenha ocorrido erro na cpc.
    • lg-permite-alterar – Retorna se é possível habilitar campo "Trata Inadimplencia" para alteração.
    • lg-continua – Retorna se é possível continuar com o processo que segue no código.