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

Definição campo a campo da tabela de entrada

...

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

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

...