Histórico da Página

...

field in-evento-programa                   as  as char format "x(10)"
field nm-ponto-chamada-cpc             as char format "x(15)"
field cd-unidade                                 like notapres.cd-unidade
field cd-unidade-prestador                 like notapres.cd-unidade-prestador
field cd-prestador                               like notapres.cd-prestador
field cd-unidade-seccional                 like  like preserv.cd-unidade-seccional.

...

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

field lg-undo-retry                           as log
field ds-mensagem                        as char.

...