Histórico da Página

...

field nm-ponto-chamada-cpc                  as char format "x(06)"
field lg-mensagem-na-tela                     as  as log
field nr-rowid-proposta                            as rowid
field dt-base-valor                                    as date
field cd-modulo                                        as int format "999"
field nr-rowid-notaserv                            as rowid
field lg-prestador-cooperado                  as log
field in-entidade                                        like like evenimp.in-entidade
field cd-imposto                                       like evenimp.cd-imposto
field cd-evento                                         like evenimp.cd-evento
field dt-vigencia                                       like evenimp.dt-vigencia-ini
field cd-unidade-grupo                            like evengrimp.cd-unidade-grupo
field cd-grupo-contratante                       like evengrimp.cd-grupo-contratante
field cd-compl-grupo-contrat                  like evengrimp.cd-compl-grupo-contrat
field nr-insc-contratante                          like evenctrimp.nr-insc-contratante
field vl-base-imp                                    like   like fatueven.vl-evento
field qt-dias-inter                                     as int
field vl-mov                                             as dec
field dt-emissao                                   as    as date format "99/99/9999"
field r-ter-ade                                          as rowid.
field cd-modalidade                               like  like propost.cd-modalidade
field cd-plano                                          like propost.cd-plano
field cd-tipo-plano                                  like propost.cd-tipo-plano
field dt-validade                                      as date
field r-mov-insu                                   as    as rowid
field nr-proposta                                     like propost.nr-proposta
field vl-internacao                                 as  as dec
field vl-franq-internacao                       as  as dec.

Definição campo a campo da tabela de entrada

...

field qt-movto                                       like  like mov-insu.qt-insumo
field lg-undo-retry                                 as logical
field ds-mensagem-erro                         as  as char format "x(75)"
field lg-continua                                   as log initial yes
field vl-base-imp                                  like fatueven.vl-evento
field vl-franquia                                   as  as dec
field vl-real-pago                                  like mov-insu.vl-real-pago.

...