CPC-BOSAUADDRESS.P

• Rotina utilizada para manutenção de endereços.
• Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC ativo como "não".
• Será permitido para essa CPC apenas um registro na tabela temporária de saída. Caso possua mais de um registro será reportado erro.

Localização

• Ponto "ANTES-END-EMS" - antes da chamada da rotina de validação do endereço no EMS2.

Ponto de Utilização

• "ANTES-END-EMS"

Include das definições das tabelas temporárias

• cpc-bosauaddress.i

Tabelas de entrada e de saída

Tabela de entrada tmp-cpc-bosauaddress-entrada

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

field nm-ponto-chamada-cpc as char format "x(15)"

field in-evento-programa as char format "x(15)"

field id-pessoa like pessoa-fisica.id-pessoa.

Definição campo a campo da tabela de entrada

• nm-ponto-chamada-cpc - nome do ponto de chamada da CPC dentro do programa que a utiliza;
• in-evento-programa - nome do evento que está chamando a CPC;
• id-pessoa - código da pessoa.

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

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

field lg-undo-retry as logical

field ds-mensagem as char

field lg-atualiza-end-ems as logical initial yes.

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

• lg-undo-retry - campo que indica se ocorreu algum erro na CPC;
• ds-mensagem - retorna uma mensagem da CPC;
• lg-atualiza-end-ems - retorna se deve ser chamada a rotina que valida o endereço no EMS. O valor padrão é "sim" (i. e. realiza o comportamento padrão do produto).