]> git.llucax.com Git - z.facultad/75.06/emufs.git/blobdiff - emufs_gui/facturas.c
un poco mas de B+
[z.facultad/75.06/emufs.git] / emufs_gui / facturas.c
index 48ff1c9e0c399c1d27b4a847e1226593a4f65e17..bc1bd73f883fa2ec5af3d0074f164cd9c04be6bf 100644 (file)
@@ -5,6 +5,8 @@
 #include "menu.h"
 #include "lista.h"
 #include "articulos.h"
 #include "menu.h"
 #include "lista.h"
 #include "articulos.h"
+#include "base.h"
+#include "extsort.h"
 
 static t_LstFacturas *lst_facturas;
 
 
 static t_LstFacturas *lst_facturas;
 
@@ -19,6 +21,17 @@ static int agregar_nodo_factura(t_LstFacturas *lst, t_Reg_Factura *nodo);
 int eliminar_nodo_factura(t_LstFacturas *lst, t_Reg_Factura *nodo);
 #endif
 
 int eliminar_nodo_factura(t_LstFacturas *lst, t_Reg_Factura *nodo);
 #endif
 
+/* Tipo de dato a meter en el archivo para un ord. externo */
+typedef struct _ord_data_ {
+       int numero;
+       char emision[9];
+       char estado[3];
+       char fp[3];
+       float importe;
+} t_OrdExt_Data;
+
+int comparar_externo(void *it1, void *it2);
+
 /* Funciones para carga desde el XML */
 static t_Item *leer_items(xmlNode *, int *cant, int size);
 static char *leer_nota(xmlNode *, int max);
 /* Funciones para carga desde el XML */
 static t_Item *leer_items(xmlNode *, int *cant, int size);
 static char *leer_nota(xmlNode *, int max);
@@ -238,6 +251,10 @@ t_LstFacturas *fact_cargar(t_Parametros *param)
                emufs_agregar_indice(tmp->fp, "vto", IND_SELECCION, param->ind_fac[2].tipo_arbol, IDX_STRING, STRUCT_OFFSET(factura, emision), param->ind_fac[2].tam_bloque, 1);
                emufs_agregar_indice(tmp->fp, "emision", IND_EXAHUSTIVO, param->ind_fac[1].tipo_arbol, IDX_STRING, STRUCT_OFFSET(factura, emision), param->ind_fac[1].tam_bloque, 0);
                emufs_agregar_indice(tmp->fp, "numero", IND_PRIMARIO, param->ind_fac[0].tipo_arbol, IDX_INT, 0, param->ind_fac[0].tam_bloque, 0);
                emufs_agregar_indice(tmp->fp, "vto", IND_SELECCION, param->ind_fac[2].tipo_arbol, IDX_STRING, STRUCT_OFFSET(factura, emision), param->ind_fac[2].tam_bloque, 1);
                emufs_agregar_indice(tmp->fp, "emision", IND_EXAHUSTIVO, param->ind_fac[1].tipo_arbol, IDX_STRING, STRUCT_OFFSET(factura, emision), param->ind_fac[1].tam_bloque, 0);
                emufs_agregar_indice(tmp->fp, "numero", IND_PRIMARIO, param->ind_fac[0].tipo_arbol, IDX_INT, 0, param->ind_fac[0].tam_bloque, 0);
+
+               /* Creo el indice externo por Nro Articulo */
+               tmp->fp->externo = emufs_indice_crear(tmp->fp, "articulo", IND_SELECCION, IND_B, IDX_INT, 0, 512, 0);
+
                tmp->fp_texto = emufs_crear("notas", param->tipo_arch_nota, param->tam_bloque_nota, 100);
                for (node=inicio ; node ; node = node->next) {
                        if (node->type == XML_ELEMENT_NODE) {
                tmp->fp_texto = emufs_crear("notas", param->tipo_arch_nota, param->tam_bloque_nota, 100);
                for (node=inicio ; node ; node = node->next) {
                        if (node->type == XML_ELEMENT_NODE) {
@@ -246,7 +263,6 @@ t_LstFacturas *fact_cargar(t_Parametros *param)
                                        void *save;
                                        memset(&fact, 0, sizeof(t_Factura));
                                        prop = xml_get_prop(node, "NroFac");
                                        void *save;
                                        memset(&fact, 0, sizeof(t_Factura));
                                        prop = xml_get_prop(node, "NroFac");
-                                       PERR(prop);
                                        fact.numero = atoi(prop); xmlFree(prop);
                                        prop = xml_get_prop(node, "PorcDoI");
                                        fact.procdoi = atof(prop); xmlFree(prop);
                                        fact.numero = atoi(prop); xmlFree(prop);
                                        prop = xml_get_prop(node, "PorcDoI");
                                        fact.procdoi = atof(prop); xmlFree(prop);
@@ -273,8 +289,21 @@ t_LstFacturas *fact_cargar(t_Parametros *param)
                                        fact.reg_nota = id;
                                        save = procesar_guardar_factura(&fact, lst_facturas, &size);
                                        if (save != NULL) {
                                        fact.reg_nota = id;
                                        save = procesar_guardar_factura(&fact, lst_facturas, &size);
                                        if (save != NULL) {
+                                               int i;
                                                error = 0;
                                                error = 0;
-                                               tmp->fp->grabar_registro(tmp->fp, save, size, &error);
+                                               id = tmp->fp->grabar_registro(tmp->fp, save, size, &error);
+                                       
+                                               /* Agrego los Items al indice externo */
+                                               for(i=0; i<fact.cant_items; i++) {
+                                                       if (fact.items[i].numero != 0) {
+                                                               CLAVE _k; /* HACK Para hacer mas rapido */
+                                                               INDICE_DATO _dato;
+                                                               _k.i_clave = fact.items[i].numero;
+                                                               _dato.id = id;
+                                                               tmp->fp->externo->agregar_entrada(tmp->fp->externo, _k, _dato);
+                                                       }
+                                               }
+                                               
                                                if (fact.items) {
                                                        free(fact.items);
                                                        fact.items = NULL;
                                                if (fact.items) {
                                                        free(fact.items);
                                                        fact.items = NULL;
@@ -291,8 +320,6 @@ t_LstFacturas *fact_cargar(t_Parametros *param)
                xmlFreeDoc(document);
                xmlCleanupParser();
        } else {
                xmlFreeDoc(document);
                xmlCleanupParser();
        } else {
-#ifdef NO_SE_USA_MAS
-               /* TODO RECUPERAR INDICES DESDE EL ARCHIVO */
                PERR("Voy a recuperar desde un archivo");
                tmp->fp = emufs_abrir("facturas");
                if (tmp->fp == NULL) {
                PERR("Voy a recuperar desde un archivo");
                tmp->fp = emufs_abrir("facturas");
                if (tmp->fp == NULL) {
@@ -309,21 +336,6 @@ t_LstFacturas *fact_cargar(t_Parametros *param)
                        lst_facturas = NULL;
                        return NULL;
                }
                        lst_facturas = NULL;
                        return NULL;
                }
-
-               /* Ahora trato de recuperar la info */
-               indices = emufs_idx_get(tmp->fp, &indices_cant);
-               for(i=0; i<indices_cant; i++) {
-                       t_Factura art;
-                       void *save;
-                       /* Leo el registro */
-                       save = tmp->fp->leer_registro(tmp->fp, indices[i], &size, &error);
-                       if (procesar_leer_factura(&art, save, size, tmp) == 1) {
-                               agregar_nodo_factura(tmp, crear_nodo_factura(indices[i], art.reg_nota, art.numero));
-                               free(save);
-                       }
-               }
-               free(indices);
-#endif
        }
 
        PERR("Facturas todo Ok");
        }
 
        PERR("Facturas todo Ok");
@@ -649,8 +661,9 @@ void fact_agregar(char *s)
                                cant++;
                                its = (t_Item *)realloc(its, cant*sizeof(t_Item));
                                if (its != NULL) {
                                cant++;
                                its = (t_Item *)realloc(its, cant*sizeof(t_Item));
                                if (its != NULL) {
+                                       art_actualizar_stock(atoi(entrada), atoi(cv));
                                        its[cant-1].numero = atoi(entrada);
                                        its[cant-1].numero = atoi(entrada);
-                                       strcpy(its[cant-1].cv, form_obtener_valor_char(form, "CV"));
+                                       strcpy(its[cant-1].cv, cv);
                                        strcpy(its[cant-1].pvu, art->pvu);
                                }
                                free(art);
                                        strcpy(its[cant-1].pvu, art->pvu);
                                }
                                free(art);
@@ -764,7 +777,6 @@ static int procesar_leer_factura(t_Factura *dst, void *src, EMUFS_REG_SIZE size,
                return 0;
        }
 
                return 0;
        }
 
-       fprintf(stderr, "TIPO = %d\n", lst->fp->tipo);
        switch (lst->fp->tipo) {
                case T1:
                case T2:
        switch (lst->fp->tipo) {
                case T1:
                case T2:
@@ -963,10 +975,8 @@ int fact_exportar_xml(const char *filename)
        
        fprintf(fp, "<?xml version=\"1.0\" encoding=\"ISO-8859-1\" ?>\n");
        fprintf(fp, "<FACTURAS>\n");
        
        fprintf(fp, "<?xml version=\"1.0\" encoding=\"ISO-8859-1\" ?>\n");
        fprintf(fp, "<FACTURAS>\n");
-       fprintf(stderr, "EXPORTAR : Menor Clave = %d\n", k.i_clave);
        while (k.i_clave != -1) {
                fact = fact_buscar(lst_facturas, k.i_clave, &id, &id1);
        while (k.i_clave != -1) {
                fact = fact_buscar(lst_facturas, k.i_clave, &id, &id1);
-               fprintf(stderr, "Lei factura numero %d y apunta a %p\n", k.i_clave, fact);
                if (fact != NULL) {
                        fprintf(fp, "\t<FACTURA NroFac=\"%08d\" ", fact->numero);
                        fprintf(fp, "FechaEmisiĆ³n=\"%s\" ", fact->emision);
                if (fact != NULL) {
                        fprintf(fp, "\t<FACTURA NroFac=\"%08d\" ", fact->numero);
                        fprintf(fp, "FechaEmisiĆ³n=\"%s\" ", fact->emision);
@@ -987,7 +997,6 @@ int fact_exportar_xml(const char *filename)
                        free(fact);
                }
                k = idx->obtener_sig_clave(idx, k);
                        free(fact);
                }
                k = idx->obtener_sig_clave(idx, k);
-               fprintf(stderr, "XXX Siguiente = %d\n", k.i_clave);
        }
        fprintf(fp, "\t</FACTURAS>\n");
 
        }
        fprintf(fp, "\t</FACTURAS>\n");
 
@@ -1026,6 +1035,7 @@ void fact_consultas_codigos(char *s)
        WINDOW *win, *win1;
        INDICE *idx;
        CLAVE k, menor, mayor;
        WINDOW *win, *win1;
        INDICE *idx;
        CLAVE k, menor, mayor;
+       int editar;
 
        idx = lst_facturas->fp->indices;
 
 
        idx = lst_facturas->fp->indices;
 
@@ -1083,9 +1093,15 @@ void fact_consultas_codigos(char *s)
        }
 
        curs_set(0);
        }
 
        curs_set(0);
-       lista_ejecutar(lista);
+       editar = lista_ejecutar(lista);
        curs_set(1);
        
        curs_set(1);
        
+       if (editar != -1) {
+               char cc[20];
+               sprintf(cc, "%d", editar);
+               fact_modificar(cc);
+       }
+       
        wrefresh(win1);
        wrefresh(win);
        werase(win1);
        wrefresh(win1);
        wrefresh(win);
        werase(win1);
@@ -1115,6 +1131,8 @@ void fact_consultas_fechas(char *s)
        WINDOW *win, *win1;
        INDICE *idx;
        CLAVE k_menor, k_mayor;
        WINDOW *win, *win1;
        INDICE *idx;
        CLAVE k_menor, k_mayor;
+       int todo=0;
+       int editar;
 
        win = newwin(LINES-4, COLS-2, 2, 1);
        win1 = derwin(win, LINES-6, COLS-4, 1, 1);
 
        win = newwin(LINES-4, COLS-2, 2, 1);
        win1 = derwin(win, LINES-6, COLS-4, 1, 1);
@@ -1140,19 +1158,70 @@ void fact_consultas_fechas(char *s)
        /* Si el usuario no ingreso alguno de los datos, lo obtengo del indice */
        idx = emufs_buscar_indice_por_nombre(lst_facturas->fp, "emision");
        if (idx==NULL) PERR("INDICE EMISION NO SE ENCUENTRA!!");
        /* Si el usuario no ingreso alguno de los datos, lo obtengo del indice */
        idx = emufs_buscar_indice_por_nombre(lst_facturas->fp, "emision");
        if (idx==NULL) PERR("INDICE EMISION NO SE ENCUENTRA!!");
+
+       /* XXX Politica de seleccion de uso de ord externo
+        *
+        * Se usa ordenamiento externo en alguno de estos 2 casos :
+        *   * Se requiere un listado de todo el rango de fechas
+        *   * Se requiere un listado de todos los Estados
+        *
+        *   Para cualquier otro caso, se ordena directamente
+        *   en la lista
+        */
        if (strlen(desde_fecha) == 0) {
                k_menor = idx->obtener_menor_clave(idx);
                emufs_indice_obtener_valor_desde_clave(idx, k_menor, desde_fecha);
                PERR("OBTUVE MENOR CLAVE DESDE EL INDICE");
                PERR(desde_fecha);
        if (strlen(desde_fecha) == 0) {
                k_menor = idx->obtener_menor_clave(idx);
                emufs_indice_obtener_valor_desde_clave(idx, k_menor, desde_fecha);
                PERR("OBTUVE MENOR CLAVE DESDE EL INDICE");
                PERR(desde_fecha);
+               todo++;
        }
        if (strlen(hasta_fecha) == 0) {
                k_mayor = idx->obtener_mayor_clave(idx);
                emufs_indice_obtener_valor_desde_clave(idx, k_mayor, hasta_fecha);
                PERR("OBTUVE MAYOR CLAVE DESDE EL INDICE");
                PERR(hasta_fecha);
        }
        if (strlen(hasta_fecha) == 0) {
                k_mayor = idx->obtener_mayor_clave(idx);
                emufs_indice_obtener_valor_desde_clave(idx, k_mayor, hasta_fecha);
                PERR("OBTUVE MAYOR CLAVE DESDE EL INDICE");
                PERR(hasta_fecha);
+               todo++;
+       }
+
+       if (strcmp(estado, "Todos") == 0) todo = 2;
+
+       if (todo == 2) {
+               /* Debo utilizar un ord, externo!! */
+               FILE *fp;
+               /* Creo el archivo a ordenar */
+               fp = fopen("tmp_ord.xxx", "w");
+               while (k_menor.i_clave != -1) {
+                       t_Factura fact;
+                       int error, cant, i;
+                       char *leo;
+                       t_OrdExt_Data ord;
+                       EMUFS_REG_SIZE size;
+                       INDICE_DATO *datos;
+                       CLAVE k1;
+                       datos = idx->buscar_entradas(idx, k_menor, &cant);
+                       for(i=0; i<cant; i++) {
+                               error = 1;
+                               k1.i_clave = datos[i].id;
+                               leo = lst_facturas->fp->leer_registro(lst_facturas->fp, k1, &size, &error);
+                               if (leo != NULL) {
+                                       procesar_leer_factura(&fact, leo, size, lst_facturas);
+                                       free(leo);
+                                       ord.numero = fact.numero;
+                                       strcpy(ord.emision, fact.emision);
+                                       strcpy(ord.estado, fact.estado);
+                                       strcpy(ord.fp, fact.fp);
+                                       ord.importe = get_importe_factura(fact.items, fact.cant_items, fact.procdoi);
+                                       fwrite(&ord, sizeof(t_OrdExt_Data), 1, fp);
+                               }
+                       }
+                       if (datos) free(datos);
+                       if (fact.items) free(fact.items);
+                       k_menor = idx->obtener_sig_clave(idx, k_menor);
+               }
+               fclose(fp);
+               /* Mando a ordenar */
+               extsort("tmp_ord.xxx", 4096, sizeof(t_OrdExt_Data), comparar_externo);
        }
        }
-       
        /* Creo la lista donde mostrar la consulta*/
        /* Muestro solo info relevante */
        lista = lista_crear(4, win1, COLS-4, LINES-6);
        /* Creo la lista donde mostrar la consulta*/
        /* Muestro solo info relevante */
        lista = lista_crear(4, win1, COLS-4, LINES-6);
@@ -1165,29 +1234,24 @@ void fact_consultas_fechas(char *s)
        lista_agregar_columna(lista, "Importe", DATO_FLOAT, 50, 8);   /* importe         */
 
        /* Leo los datos desde el archivo */
        lista_agregar_columna(lista, "Importe", DATO_FLOAT, 50, 8);   /* importe         */
 
        /* Leo los datos desde el archivo */
-       while (k_menor.i_clave != -1) {
-               t_Factura fact;
-               int error, cant, i;
-               char *leo;
-               EMUFS_REG_SIZE size;
-               INDICE_DATO *datos;
-               CLAVE k1;
-               datos = idx->buscar_entradas(idx, k_menor, &cant);
-               for(i=0; i<cant; i++) {
-                       error = 1;
-                       k1.i_clave = datos[i].id;
-                       leo = lst_facturas->fp->leer_registro(lst_facturas->fp, k1, &size, &error);
-                       if (leo != NULL) {
-                               procesar_leer_factura(&fact, leo, size, lst_facturas);
-                               free(leo);
-                               /*k.i_clave = fact->reg_nota;
-                               error = 0;
-                               fact->nota = lst->fp_texto->leer_registro(lst->fp_texto, k, &size, &error);
-                               */
-                       }
-                       if (strcmp(estado, "Todos") != 0) {
+       if (todo != 2) {
+               while (k_menor.i_clave != -1) {
+                       t_Factura fact;
+                       int error, cant, i;
+                       char *leo;
+                       EMUFS_REG_SIZE size;
+                       INDICE_DATO *datos;
+                       CLAVE k1;
+                       datos = idx->buscar_entradas(idx, k_menor, &cant);
+                       for(i=0; i<cant; i++) {
+                               error = 1;
+                               k1.i_clave = datos[i].id;
+                               leo = lst_facturas->fp->leer_registro(lst_facturas->fp, k1, &size, &error);
+                               if (leo != NULL) {
+                                       procesar_leer_factura(&fact, leo, size, lst_facturas);
+                                       free(leo);
+                               }
                                if (strcmp(estado, fact.estado) == 0) {
                                if (strcmp(estado, fact.estado) == 0) {
-                                       fprintf(stderr, "Agrego factura num=%d con %d items\n", fact.numero, fact.cant_items);
                                        lista_agregar_fila_ordenada(lista,
                                                fact.numero,
                                                fact.emision,
                                        lista_agregar_fila_ordenada(lista,
                                                fact.numero,
                                                fact.emision,
@@ -1197,15 +1261,59 @@ void fact_consultas_fechas(char *s)
                                        );
                                }
                        }
                                        );
                                }
                        }
+                       if (datos) free(datos);
+                       if (fact.items) free(fact.items);
                }
                }
-               if (datos) free(datos);
-               if (fact.items) free(fact.items);
                k_menor = idx->obtener_sig_clave(idx, k_menor);
                k_menor = idx->obtener_sig_clave(idx, k_menor);
-       }
+       } else {
+               /* Cargo la lista a partir del archivo ordenado externamente */
+               FILE *fp;
+               int j;
+               char st[3];
+               t_OrdExt_Data ord;
+               
+               j =( strcmp(estado, "Todos") == 0);
+               fp = fopen("tmp_ord.xxx", "r");
 
 
+               /* si j == 1 tengo que paginar por estado */
+               fread(&ord, sizeof(t_OrdExt_Data), 1, fp);
+               strcpy(st, ord.estado);
+               while (!feof(fp)) {
+                       lista_agregar_fila(lista,
+                               ord.numero,
+                               ord.emision,
+                               get_estado(ord.estado),
+                               get_forma_pago(ord.fp),
+                               ord.importe
+                       );
+                       strcpy(st, ord.estado);
+                       
+                       fread(&ord, sizeof(t_OrdExt_Data), 1, fp);
+                       /* Si el estado cambio y j == 1 */
+                       if ((strcmp(st, ord.estado) != 0) && (j == 1)) {
+                               /* Hago la pausa para mostrar lo que hay */
+                               editar = lista_ejecutar(lista);
+                               if (editar != -1) {
+                                       char cc[20];
+                                       sprintf(cc, "%d", editar);
+                                       fact_modificar(cc);
+                               }
+                               /* bue, ya miraron, ahora limpio y sigo con el resto */
+                               lista_clear(lista);
+                       }
+               }
+
+               /* Elimino el archivo temporal */
+               unlink("tmp_ord.xxx");
+       }
        curs_set(0);
        curs_set(0);
-       lista_ejecutar(lista);
+       editar = lista_ejecutar(lista);
        curs_set(1);
        curs_set(1);
+       if (editar != -1) {
+               char cc[20];
+               sprintf(cc, "%d", editar);
+               fact_modificar(cc);
+       }
        wrefresh(win1);
        wrefresh(win);
        werase(win1);
        wrefresh(win1);
        wrefresh(win);
        werase(win1);
@@ -1226,6 +1334,7 @@ void fact_consultas_varias(char *nombre_indice, char *titulo)
        CLAVE k;
        EMUFS *fs;
        EMUFS_REG_SIZE size;
        CLAVE k;
        EMUFS *fs;
        EMUFS_REG_SIZE size;
+       int editar;
 
        fs = lst_facturas->fp;
 
 
        fs = lst_facturas->fp;
 
@@ -1268,11 +1377,11 @@ void fact_consultas_varias(char *nombre_indice, char *titulo)
                if (tmp != NULL) {
                        procesar_leer_factura(&factura, tmp, size, lst_facturas);
                        lista_agregar_fila(lista,
                if (tmp != NULL) {
                        procesar_leer_factura(&factura, tmp, size, lst_facturas);
                        lista_agregar_fila(lista,
-                                                       factura.numero,
-                                                       factura.emision,
-                                                       get_estado(factura.estado),
-                                                       get_forma_pago(factura.fp)
-                                       );
+                               factura.numero,
+                               factura.emision,
+                               get_estado(factura.estado),
+                               get_forma_pago(factura.fp)
+                       );
                        free(tmp);
                } else {
                        PERR("NO SE PUDO RECUPERAR EL REGISTRO DE DATOS");
                        free(tmp);
                } else {
                        PERR("NO SE PUDO RECUPERAR EL REGISTRO DE DATOS");
@@ -1280,8 +1389,13 @@ void fact_consultas_varias(char *nombre_indice, char *titulo)
        }
 
        curs_set(0);
        }
 
        curs_set(0);
-       lista_ejecutar(lista);
+       editar = lista_ejecutar(lista);
        curs_set(1);
        curs_set(1);
+       if (editar != -1) {
+               char cc[20];
+               sprintf(cc, "%d", editar);
+               fact_modificar(cc);
+       }
        
        wrefresh(win1);
        wrefresh(win);
        
        wrefresh(win1);
        wrefresh(win);
@@ -1361,10 +1475,8 @@ void mostrar_fact(WINDOW *win, CLAVE k, char *s, INDICE *idx)
                        free(fact);
                        fact = NULL;
                } else {
                        free(fact);
                        fact = NULL;
                } else {
-                       fprintf(stderr, "Tengo %d datos\n", cant);
                        k.i_clave = datos[0].id;
                        PERR("Leo el primer dato");
                        k.i_clave = datos[0].id;
                        PERR("Leo el primer dato");
-                       fprintf(stderr, "ID = %ld en bloque %ld\n", datos[0].id, datos[0].bloque);
                        error = 1;
                        tmp = lst_facturas->fp->leer_registro(lst_facturas->fp, k, &size, &error);
                        if (tmp == NULL) {
                        error = 1;
                        tmp = lst_facturas->fp->leer_registro(lst_facturas->fp, k, &size, &error);
                        if (tmp == NULL) {
@@ -1478,3 +1590,36 @@ void fact_recorrer()
        }
 }
 
        }
 }
 
+int fact_hay_con_item(int numero)
+{
+       INDICE *idx;
+       CLAVE k;
+       INDICE_DATO dato;
+       /* Busco si existe alguna factura que contenga al articulo "numero" */
+       idx = lst_facturas->fp->externo;
+
+       k.i_clave = numero;
+       dato = idx->existe_entrada(idx, k);
+
+       if (dato.id == -1)
+               return 0; /* No existe factura que contenga este articulo!! */
+
+       return 1; /* Hay alguna factura que contiene el articulo */
+}
+
+int comparar_externo(void *it1, void *it2)
+{
+       t_OrdExt_Data *d1, *d2;
+       d1 = (t_OrdExt_Data *)it1;
+       d2 = (t_OrdExt_Data *)it2;
+
+       /* Primero veo de ordenar por Estado */
+       if (strcmp(d1->estado, d2->estado) == 0) {
+               /* Tienen el mismo estado, los ordeno por numero de fatura */
+               return d1->numero - d2->numero;
+       }
+
+       /* como no son iguales, comparo los estados */
+       return strcmp(d1->estado, d2->estado);
+}
+