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 in-entidade                                 like      like evenimp.in-entidade
field cd-imposto                                 like      like evenimp.cd-imposto
field cd-evento                                     like    like evenimp.cd-evento
field dt-vigencia                                 like      like evenimp.dt-vigencia-ini
field cd-unidade-grupo                            like like evengrimp.cd-unidade-grupo
field cd-grupo-contratante                   like    like evengrimp.cd-grupo-contratante
field cd-compl-grupo-contrat                  like like evengrimp.cd-compl-grupo-contrat
field nr-insc-contratante                        like evenctrimp.nr-insc-contratante
field vl-base-imp                                    like fatueven.vl-evento.

...

field lg-undo-retry                            as   as log
field ds-mensagem                          as char
field lg-continua                                as log initial yes
field vl-base-imp                             like  like fatueven.vl-evento.

Definição campo a campo da tabela saída

...