CPC-MC0210W.P

• Rotina utilizada para tratar de forma específica algumas informações no relatório de contratantes inadimplentes.
• 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

• Dentro do programa mc0210w. no cancelamento do termo, substituindo a regra do sistema.

Ponto de Utilização

• "CANCELA-TERMO"
• "TERMO-CANCELADO"

Include das definições das tabelas temporárias

• cpc-mc0210w.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-mc0210w-entrada

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

field in-evento-programa                        as char format "x(10)"
field nm-ponto-chamada-cpc                   as char format "x(15)"
field nr-insc-contratante                         like propost.nr-insc-contratante
field cd-modalidade                               like propost.cd-modalidade
field nr-proposta                                   like propost.nr-proposta
field cd-motivo-cancelamento                 as int format "999"
field in-tipo-pessoa                               like contrat.in-tipo-pessoa
field nr-dias-pf-cancelar                         as int format "999"
field nr-dias-pj-cancelar                         as int format "999"
field nr-dias-atraso                                as int format "99999"
field lg-inadimplente                             as log.

Definição campo a campo da tabela de entrada

• in-evento-programa – Indica o evento que deve ser "CANI"
• nm-ponto-chamada-cpc – Indica o ponto de chamada ;
• nr-insc-contratante – Número de inscrição do contratante;
• cd-modalidade – Código da modalidade de comercialização;
• nr-proposta – Número da proposta;
• cd-motivo-cancelamento - Código do motivo de cancelamento;
• in-tipo-pessoa – Indica Pessoa Fisica ou Juridica.
• nr-dias-pf-cancelar – numero de dias para cancelar contratante pessoa física
• nr-dias-pj-cancelar - numero de dias para cancelar contratante pessoa jurídica
• nr-dias-atraso - numero de dias de atraso para cancelar termo
• lg-inadimplente – indica se o contratante está inadimplente.

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

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

field lg-undo-retry                         as log
field ds-mensagem-retorno            as char format "x(75)".

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

• lg-undo-retry – Indica se ocorreu erro durante processamento da cpc.
• ds-mensagem-retorno – Mensagem de retorno da cpc.