Histórico da Página

...

field in-evento-programa                   as char format "x(15)"
field nm-ponto-chamada-cpc            as char format "x(15)"
field cd-tip-guia                             like      like tip-guia.cd-tipo-guia
field lg-obrig-lay-tiss                         as log.

Definição campo a campo da tabela de entrada

...

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

field lg-erro                         as log
field ds-mensagem            as char format "x(75)"
field lg-obrig-lay-tiss          as log
field lg-retorna-inicio         as  as log.

Definição campo a campo da tabela de saída tmp-cpc-at0111a-saida

...