Histórico da Página

...

field in-evento-programa                   as char format "x(06)"
field nm-ponto-chamada-cpc            as char format "x(15)"
field cd-unidade                                 like preserv.cd-unidade
field cd-prestador                             like  like preserv.cd-prestador
field nr-seq-endereco                        like like endpres.nr-seq-endereco
field nr-rowid-endpres                     as  as rowid
field lg-recebe-corresp                      as as log.

Definição campo a campo da tabela de entrada

...

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

field lg-erro                                     as log
field ds-mensagem                        as char format "x(80)"
field lg-permite-end-corresp            as log
field lg-permite-tipo-end                 as log
field nr-seq-endereco                     as int.

...