CPC-RTENDERE.P

• Rotina utilizada para consistir os dados de endereço do beneficiário conforme regra específica do cliente.
• 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 rtendere.p antes de iniciar qualquer consistência dos dados de endereço do beneficiário.

Ponto de Utilização

"cons-endereco"

Include das definições das tabelas temporárias

• cpc-rtendere.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-rtendere-entrada

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

field in-evento-programa                         as char format "x(06)"
field nm-ponto-chamada-cpc                  as char format "x(15)"
field r-proposta                                         as rowid
field in-modulo-sistema                           as char
field cd-cidade                                          like dzcidade.cd-cidade
field en-uf                                                  like dzestado.en-uf
field en-cep                                               as char
field en-rua                                                as char
field en-bairro                                           as char

Definição campo a campo da tabela de entrada

• • • in-evento-programa – Evento do programa que chama a cpc-rtendere. Os valores desse campo podem ser:
    • "CONSIS".
    • nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa rtendere.p:
    • "CONS-ENDERECO".
    • r-proposta – rowid da proposta acessada no momento.
    • In-modulo-sistema – módulo do sistema pelo qual a rotina foi chamada. Valores possíveis: CG, MC, VP e EB.
    • Cd-cidade – código da cidade no sistema.
    • Em-uf – sigla do estado.
    • Em-cep – cep recebido.
    • Em-rua – endereço recebido.
    • Em-bairro – bairro recebido.

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

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

field lg-undo-retry                              as logical
field ds-mensagem-relatorio            as char format "x(75)"
field lg-continua                                 as logical

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 aconteceram e NÃO se o processo foi concluído por completo.
    • ds-mensagem-relatorio – Deve conter mensagens de erro caso ocorram.
    • Lg-continua – indica se a rotina de consistência de endereços deve continuar o seu processamento normal na volta da CPC. Se este campo for ligado, a rotina continuará fazendo as consistências normais de endereço. Caso seja desligado, a rotina irá voltar sem continuar com as consistências.