cpc-mc0210w.p1

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.