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-est-civil                                     like usuario.in-est-civil
field cd-grau-parentesco                      like usuario.cd-grau-parentesco
field cd-modalidade                             like propost.cd-modalidade
field nr-proposta                                like     like propost.nr-proposta
field cd-usuario                                 like    like usuario.cd-usuario
field nm-usuario                                    like like usuario.nm-usuario.

Definição campo a campo da tabela de entrada

...

field lg-undo-retry                                as   as logical
field ds-mensagem                              as char
field lg-continua                                  as   as logical initial yes.

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

...