Histórico da Página

...

field ds-segmento-retorno          as char format "x(8000)"
field r-guiautor                            as recid
field cd-classe-erro                    as int
field in-liberado-guias                 like guiautor.in-liberado-guias
field aa-guia-atendimento           like guiautor.aa-guia-atendimento
field nr-guia-atendimento            like guiautor.nr-guia-atendimento
field registro                                as rowid
field cd-unidade-principal            like guiautor.cd-unidade-principal
field cd-unidade-carteira             like guiautor.cd-unidade-carteira
field cd-carteira-usuario              like guiautor.cd-carteira-usuario
field nr-via-carteira                      like guiautor.nr-via-carteira.

Definição campo a campo da tabela de entrada

...

field in-liberado-guias                   like guiautor.in-liberado-guias
field cd-local-autorizacao             like  like guiautor.cd-local-autorizacao
field lg-undo-retry                          as as log
field ds-mensagem                       as  as char
field lg-id-autoriza                         as log
field ds-observacao-interna            like like guiautor.ds-observacao-interna
field lg-desconsidera                     as log
field lg-alto-custo-tab-propria        propria         as log.

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

...