Histórico da Página

...

FOR EACH tt_log_erros_int_inc_bem_pat_1:
    MESSAGE "Descrição: " tt_integr_incorp_bem_pat_2.tta_des_incorp_bem_pat SKIP
            "Erro: " tt_log_erros_int_inc_bem_pat_1.ttv_num_erro SKIP   
            "Mensagem: " tt_log_erros_int_inc_bem_pat_1.ttv_des_msg_erro SKIP
            "Ajuda: " tt_log_erros_int_inc_bem_pat_1.ttv_des_msg_ajuda SKIP
            VIEW-AS ALERT-BOX.
END.

DELETE OBJECT v_hdl_program.
ASSIGN v_hdl_program = ?.

...