CPC-RC0110T.P

• Rotina chamada pelo botão funções do programa Manutenção Negociação entre Unidades - RC0110T
• 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

• CONS-CLIENTE chamada no botão de funções do RC0110T
• APOS-CONSULT chamada após a consulta de dados
• INICIO-F7: chamada no início da função "F7" (tabelas associadas)

Ponto de Utilização

• "CONS-CLIENTE"
• "APOS-CONSULT"
• "INICIO-F7"

Include das definições das tabelas temporárias

• cpc-rc0110t.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-rc0110t-entrada

def temp-table tmp-cpc-rc0110t-entrada

field nm-ponto-chamada-cpc                   as char format "x(15)"
field nm-evento                                         as char format "x(15)"
field cd-unidade                                        as int format "9999"
field dt-limite                                             as date format "99/99/9999".

Definição campo a campo da tabela de entrada

• nm-ponto-chamada-cpc – Ponto de chamada de cpc.
• Nm-evento– Identifica qual procedimento a cpc deve executar no momento que está sendo chamada
• cd-unidade – Código da unidade
• dt-limite – Data limite

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

def temp-table tmp-cpc-rc0110t-saida

field lg-erro                                          as log
field ds-mensagem                             as char format "x(100)"
field lg-continua                                  as logical initial yes.

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

• lg-erro – Variável que controla os erros que podem ocorrer na CPC.
• ds-mensagem – Variável que recebe a descrição dos erros que ocorreram na CPC.
• lg-continua - indica se deve fazer a lógica de produto da função "F7" (tabelas associadas).