Histórico da Página

...

field nm-ponto-chamada-cpc             as char format "x(15)"
field in-evento-programa                   as char format "x(06)"
field nr-cpf                                      like     like preserv.nr-cgc-cpf
field nr-prestador                             as  as char format "x(20)"
field cd-unidade-lote                          like like preserv.cd-unidade
field cd-prestador-lote                        like like preserv.cd-prestador.

Definição campo a campo da tabela de entrada

...

field lg-erro                                as logical
field ds-mensagem                   as char format "x(75)"
field nr-cpf                                 like preserv.nr-cgc-cpf
field cd-unidade-prestador     like    like preserv.cd-unidade
field cd-prestador                     like  like preserv.cd-prestador.

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

...