Árvore de páginas

Rotina para viabilizar vizualização de dados no final do programa de Código.
Localização
oNo final do programa.
Ponto de Utilização
o "FINAL-CODIGO".
Include das definições das tabelas temporárias
o cpc-te0110l.i
Tabelas de entrada e saída
Tabela de entrada tmp-cpc-te0110l-entrada
def temp-table tmp-cpc-te0110l-entrada no-undo
field nm-ponto-chamada as char format "x(15)"
field in-evento-cpc as char format "x(20)"
field nm-ponto-chamada-cpc-aux like dzlibprx.nm-ponto-chamada-cpc
field nm-programa like dzlibprx.nm-programa.
Definição campo a campo da tabela de entrada
o nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza.
in-evento-cpc – Evento do programa.
nm-ponto-chamada-cpc-aux – Nome auxiliar do ponto de chamada.
nm-programa – Nome do programa relacionado.
Tabela de saída tmp-cpc-te0110l-saida
def temp-table tmp-cpc-te0110l-saida no-undo
field lg-erro as log
field ds-mensagem as char format "x(75)"
field ds-opcao-menu as char format "x(20)".
Definição campo a campo da tabela de saída
o lg-erro – 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.
o ds-mensagem – Deve conter mensagens de erro ou qualquer outro tipo de mensagem. Utilizado em conjunto com lg-undo-retry.
o ds-opcao-menu – Armazena mensagens da opcao de menu.

  • Sem rótulos