CPC-TE0110I

• Rotina para viabilizar vizualização de dados no final do programa de Código.

Localização oNo

• No 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.

...