Histórico da Página

...

• " DROP-SEQ-ORA"
• "GRAVA-GUIA"
• "AJUSTE-MOVTO"
• "ANTES-CRIA-PROC"
• "APOS-HIST-GUIA"

Include das definições das tabelas temporárias

...

                            field in-evento-programa           as char format "x(10)"
                            field nm-ponto-chamada           as chamada-cpc    as char format "x(15)"
                            field cd-tipo-guia                      like tip-guia.cd-tipo-guia
                            field cd-unidade-prin                like preserv.cd-unidade
                            field cd-prestador-prin              like preserv.cd-prestador
                            field cd-transacao                     like tranrevi.cd-transacao
                            field cd-local-autorizacao         like guiautor.cd-local-autorizacao
                            field aa-guia-atendimento-ant  like guiautor.aa-guia-atendimento-ant
                            field nr-guia-atendimento-ant   like guiautor.nr-guia-atendimento-ant
                            field r-guiautor                            as rowid

...

field lg-erro                as log
field cd-mensagem  like mensiste.cd-mensagem
field ds-mensagem   as char format "x(75)"
field cd-modulo        like procguia.cd-modulo

Definição campo a campo da tabela de movimento

...