]> git.llucax.com Git - z.facultad/75.06/emufs.git/blobdiff - emufs_gui/facturas.c
Un poco mas de limpieza usando los codigos de error.
[z.facultad/75.06/emufs.git] / emufs_gui / facturas.c
index af01d26efdbc440305c9e438b8783a174e702626..00b5276371093b8394cb20887f044b4a12253d8c 100644 (file)
@@ -281,10 +281,16 @@ t_LstFacturas *fact_cargar(const char *filename, int tipo, int tam_bloque)
 
 int fact_liberar(t_LstFacturas *l)
 {
+       t_Reg_Factura *del;
        if (l == NULL) l = lst_facturas;
        if (l == NULL) return 1;
 
        emufs_destruir(l->fp);
+       while (l->primero) {
+               del = l->primero;
+               l->primero = l->primero->sig;
+               free(del);
+       }
        free(l);
 
        lst_facturas = NULL;
@@ -499,7 +505,6 @@ void fact_agregar(char *s)
        form_ejecutar(form, 1,1);
 
        fact.numero = form_obtener_valor_int(form, "Numero de Factura");
-       fprintf(stderr, "Agregando numero %d\n", fact.numero);
        strcpy(fact.emision, form_obtener_valor_char(form, "Fecha Emision"));
        strcpy(fact.vencimiento, form_obtener_valor_char(form, "Fecha Vto"));
        fact.numero_remito = form_obtener_valor_int(form, "Nro Remito");