CPC-RTCONTR1.P

• Rotina utilizada para consulta de dados específicos do contratante.
• 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 do programa rtcontr1.p, no evento F8.

Ponto de Utilização

"CONS-CONTRAT"

Include das definições das tabelas temporárias

• cpc-rtcontr1.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-rtcontr1-entrada

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

fields nm-ponto-chamada                           as char format "x(15)"
fields nr-insc-contratante                             like propost.nr-insc-contratante

Definição campo a campo da tabela de entrada

• • • nm-ponto-chamada – Nome do ponto de chamada que controla o tratamento específico.
    • nr-insc-contratante – Número da inscrição do contratante.
      
      

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

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

fields lg-erro                               as logical
fields ds-mensagem                 as char format "x(75)"

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

• • • lg-erro – Controla a ocorrência de erros na execução da cpc.
    • ds-mensagem – Controla a mensagem de retorno da cpc quando ocorrem erros.