Histórico da Página

...

field in-evento-programa                 as  as char format "x(10)"
field nm-ponto-chamada-cpc           as char format "x(15)"
field cd-clinica                                   like clinpres.cd-clinica
field in-liberado-guias                       like guiautor.in-liberado-guias
field lg-glosa                                     as log
field cd-tipo-guia                               like guiautor.cd-tipo-guia
field cd-unidade-solicitante             like  like guiautor.cd-unidade-solicitante
field cd-prestador-solicitante           like guiautor.cd-prestador-solicitante
field cd-unidade-principal                 like guiautor.cd-unidade-principal
field cd-prestador-principal             like  like guiautor.cd-prestador-principal
field cd-unidade-carteira                 like  like guiautor.cd-unidade-carteira
field cd-carteira-usuario                    like like guiautor.cd-carteira-usuario
field r-guiautor                                  as rowid.

...

field cd-procedimento            like ambcbhpm.cd-amb
field cd-tipo-insumo               like insumos.cd-tipo-insumo
field cd-insumo                     like  like insumos.cd-insumo
field cd-unidade                      like like insuguia.cd-unidade-prestador
field cd-prestador                 like  like insuguia.cd-prestador
field lg-glosa                       as    as log.

Definição campo a campo da tabela de movtos

...

field lg-undo-retry                    as   as log
field in-liberado-guias              like guiautor.in-liberado-guias
field cd-erro-sistema                like like mensauto.cd-retorno
field cd-tipo-guia                     like  like guiautor.cd-tipo-guia
field ds-mensagem                  as as char
field cd-unidade-carteira          like like guiautor.cd-unidade-carteira.

...