* Se agregan compactar facturas y notas (notas no estoy seguro de tener

[z.facultad/75.06/emufs.git] / emufs_gui / gui.c

diff --git a/emufs_gui/gui.c b/emufs_gui/gui.c
index 4dca288fbc3a20cc1f0dd9eef275070ac4e1dbb7..d7095f764743eda5d620ef10aca40c9ca90f7221 100644 (file)
--- a/emufs_gui/gui.c
+++ b/emufs_gui/gui.c
@@ -406,13 +406,19 @@ void menu_mantenimiento()
        while ((opt = menu_ejecutar(mi_menu, 7, "Menu Mantenimiento")) != 6) {
                switch (opt) {
                        case 0:
+                               dlg = msg_box(stdscr, COLS, LINES, "Compactando archivo.... Aguarde");
                                art_get_lst()->fp->compactar(art_get_lst()->fp);
+                               msg_box_free(stdscr, dlg);
                        break;
                        case 1:
+                               dlg = msg_box(stdscr, COLS, LINES, "Compactando archivo.... Aguarde");
                                fact_get_lst()->fp->compactar(fact_get_lst()->fp);
+                               msg_box_free(stdscr, dlg);
                        break;
                        case 2:
+                               dlg = msg_box(stdscr, COLS, LINES, "Compactando archivo.... Aguarde");
                                fact_get_lst()->fp_texto->compactar(fact_get_lst()->fp_texto);
+                               msg_box_free(stdscr, dlg);
                        break;
                        case 3:
                                nuevo_tam_registro = -1; /* No permito cambiar el tamaño de registro */