Histórico da Página

...

field in-evento-programa                    as char format "x(10)"
field nm-ponto-chamada-cpc             as char format "x(15)"
field cd-modalidade                         like    like propost.cd-modalidade
field cd-plano                                     like  like propost.cd-plano
field cd-tipo-plano                               like propost.cd-tipo-plano
field qt-repasse-cob                           like  like procguia.qt-repasse-cob
field cd-unid-princ                              like presev.cd-unidade
field cd-prestador-princ                      like like preserv.cd-prestador
field cd-unid-solic                              like presev.cd-unidade
field cd-prestador-solic                    like   like preserv.cd-prestador
field cd-unid-exec                           like    like presev.cd-unidade
field cd-prestador-exec                      like like preserv.cd-prestador
field r-usuario                                 as    as rowid
field r-outuni                                   as    as rowid
field cd-procedimento                      as int format "99999999".
field nr-guia-atendimento                 like procguia.nr-guia-atendimento
field aa-guia-atendimento                like procguia.aa-guia-atendimento
field dt-emissao-guia                       like guiautor.dt-emissao-guia.

...

field lg-erro                           as log
field ds-mensagem              as char format "x(75)"
field qt-repasse-cob              like like procguia.qt-repasse-cob
field lg-alt-qtd-aut                  as as log.

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

...