Histórico da Página

...

field in-evento-programa                       as  as char format "x(06)"
field nm-ponto-chamada-cpc                 as char format "x(15)"
field r-evenfatu                                        as rowid.

Definição campo a campo da tabela de entrada

...

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

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

...