Lectura de opciones desde el XML

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

diff --git a/emufs_gui/facturas.c b/emufs_gui/facturas.c
index a49389ff16a13b74b41d3add43d7fbd987f31313..f1ce517e9bf71181859da6bc2a098559c6e6079f 100644 (file)
--- a/emufs_gui/facturas.c
+++ b/emufs_gui/facturas.c
@@ -11,10 +11,12 @@ static t_LstFacturas *lst_facturas;
 static void *procesar_guardar_factura(t_Factura *f, t_LstFacturas *lst, EMUFS_REG_SIZE *size);
 static int procesar_leer_factura(t_Factura *dst, void *src, EMUFS_REG_SIZE size, t_LstFacturas *lst);
 
 static void *procesar_guardar_factura(t_Factura *f, t_LstFacturas *lst, EMUFS_REG_SIZE *size);
 static int procesar_leer_factura(t_Factura *dst, void *src, EMUFS_REG_SIZE size, t_LstFacturas *lst);
 

+#ifdef TP_PRIMER_ENTREGA

 /* Manejo de la lista en memoria */
 static t_Reg_Factura *crear_nodo_factura(EMUFS_REG_ID reg, EMUFS_REG_ID texto, unsigned int num);
 static int agregar_nodo_factura(t_LstFacturas *lst, t_Reg_Factura *nodo);
 int eliminar_nodo_factura(t_LstFacturas *lst, t_Reg_Factura *nodo);
 /* Manejo de la lista en memoria */
 static t_Reg_Factura *crear_nodo_factura(EMUFS_REG_ID reg, EMUFS_REG_ID texto, unsigned int num);
 static int agregar_nodo_factura(t_LstFacturas *lst, t_Reg_Factura *nodo);
 int eliminar_nodo_factura(t_LstFacturas *lst, t_Reg_Factura *nodo);

+#endif

 
 /* Funciones para carga desde el XML */
 static t_Item *leer_items(xmlNode *, int *cant, int size);
 
 /* Funciones para carga desde el XML */
 static t_Item *leer_items(xmlNode *, int *cant, int size);


@@ -38,6 +40,7 @@ char *xml_get_prop(xmlNode *node, char *nombre)
        return s;
 }
 
        return s;
 }
 

+#ifdef TP_PRIMER_ENTREGA

 int eliminar_nodo_factura(t_LstFacturas *lst, t_Reg_Factura *nodo)
 {
        if (nodo == NULL) return 0;
 int eliminar_nodo_factura(t_LstFacturas *lst, t_Reg_Factura *nodo)
 {
        if (nodo == NULL) return 0;


@@ -84,6 +87,7 @@ int agregar_nodo_factura(t_LstFacturas *lst, t_Reg_Factura *nodo)
        }
        return 1;
 }
        }
        return 1;
 }

+#endif /*TP_PRIMER_ENTREGA*/

 
 t_Item *leer_items(xmlNode *node, int *cant, int size)
 {
 
 t_Item *leer_items(xmlNode *node, int *cant, int size)
 {


@@ -176,7 +180,7 @@ char *leer_nota(xmlNode *node, int max)
 }
 
 
 }
 
 

-t_LstFacturas *fact_cargar(const char *filename, int tipo, int tam_bloque, int tipo_nota, int bloque_nota)
+t_LstFacturas *fact_cargar(t_Parametros *param)

 {
        xmlDocPtr document;
        xmlNode *node, *inicio;
 {
        xmlDocPtr document;
        xmlNode *node, *inicio;


@@ -194,9 +198,10 @@ t_LstFacturas *fact_cargar(const char *filename, int tipo, int tam_bloque, int t
        lst_facturas = tmp;
        tmp->primero = NULL;
 
        lst_facturas = tmp;
        tmp->primero = NULL;
 

-       if (filename != NULL) {
+       if (param != NULL) {

                PERR("Voy a cargar de un XML");
                PERR("Voy a cargar de un XML");

-               document = xmlReadFile(filename, "ISO-8859-1",0);
+               PERR(param->xml_fact);
+               document = xmlReadFile(param->xml_fact, "ISO-8859-1",0);

                if (document == NULL) {
                        PERR("Error al leer documento!!");
                        free(tmp);
                if (document == NULL) {
                        PERR("Error al leer documento!!");
                        free(tmp);


@@ -220,16 +225,16 @@ t_LstFacturas *fact_cargar(const char *filename, int tipo, int tam_bloque, int t
                /* En el registro no guardo los punteros de nota ni items. Si guardo la cantidad de items
                 * y los items al final del registro.
                 */
                /* En el registro no guardo los punteros de nota ni items. Si guardo la cantidad de items
                 * y los items al final del registro.
                 */

-               if ((tipo-1) == T3) {
+               if ((param->tipo_arch_fact) == T3) {

                        /* Limito a 10 items en el caso de registro constante! */
                        cant_items = 10;
                } else {
                        cant_items = 0;
                }
                        /* Limito a 10 items en el caso de registro constante! */
                        cant_items = 10;
                } else {
                        cant_items = 0;
                }

-               tmp->fp = emufs_crear("facturas", tipo-1, tam_bloque, sizeof(t_Factura)-sizeof(char *)-sizeof(t_Item*)+cant_items*sizeof(t_Item));
+               tmp->fp = emufs_crear("facturas", param->tipo_arch_fact, param->tam_bloque_fact, sizeof(t_Factura)-sizeof(char *)-sizeof(t_Item*)+cant_items*sizeof(t_Item));

                emufs_agregar_indice(tmp->fp, "emision", IND_EXAHUSTIVO, IND_B, IDX_STRING, STRUCT_OFFSET(factura, emision), 512);
                emufs_agregar_indice(tmp->fp, "numero", IND_PRIMARIO, IND_B, IDX_INT, 0, 512);
                emufs_agregar_indice(tmp->fp, "emision", IND_EXAHUSTIVO, IND_B, IDX_STRING, STRUCT_OFFSET(factura, emision), 512);
                emufs_agregar_indice(tmp->fp, "numero", IND_PRIMARIO, IND_B, IDX_INT, 0, 512);

-               tmp->fp_texto = emufs_crear("notas", tipo_nota-1, bloque_nota, 100);
+               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) {
                                if (strcmp(node->name, "FACTURA") == 0) {
                for (node=inicio ; node ; node = node->next) {
                        if (node->type == XML_ELEMENT_NODE) {
                                if (strcmp(node->name, "FACTURA") == 0) {


@@ -256,11 +261,11 @@ t_LstFacturas *fact_cargar(const char *filename, int tipo, int tam_bloque, int t
                                        strncpy(fact.cheque, prop = xml_get_prop(node, "NroCheque"), 18); xmlFree(prop);
                                        fact.cheque[18] = '\0';
 
                                        strncpy(fact.cheque, prop = xml_get_prop(node, "NroCheque"), 18); xmlFree(prop);
                                        fact.cheque[18] = '\0';
 

-                                       fact.nota = leer_nota(node, (((tipo-1)==T3)?100:-1));
-                                       fact.items = leer_items(node, &fact.cant_items, ((tipo-1)==T3)?10:-1);
+                                       fact.nota = leer_nota(node, ((param->tipo_arch_nota==T3)?100:-1));
+                                       fact.items = leer_items(node, &fact.cant_items, (param->tipo_arch_fact==T3)?10:-1);

 
                                        error = 0;
 
                                        error = 0;

-                                       id = tmp->fp_texto->grabar_registro(tmp->fp_texto, fact.nota, ((tipo-1)==T3)?100:(strlen(fact.nota)+1), &error);
+                                       id = tmp->fp_texto->grabar_registro(tmp->fp_texto, fact.nota, (param->tipo_arch_nota==T3)?100:(strlen(fact.nota)+1), &error);

                                        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) {


@@ -416,7 +421,8 @@ void fact_eliminar(char *s)
        k.i_clave = fact->reg_nota;
        lst_facturas->fp_texto->borrar_registro(lst_facturas->fp_texto, k);
 
        k.i_clave = fact->reg_nota;
        lst_facturas->fp_texto->borrar_registro(lst_facturas->fp_texto, k);
 

-       free(fact->items);
+       if (fact->items) free(fact->items);
+       if (fact->nota) free(fact->nota);

        free(fact);
 }
 
        free(fact);
 }
 


@@ -424,7 +430,6 @@ void fact_modificar(char *s)
 {
        WINDOW *win, *items, *nota, *subnota;
        t_Form *form, *form_nota;
 {
        WINDOW *win, *items, *nota, *subnota;
        t_Form *form, *form_nota;

-       t_Reg_Factura *nodo;

        t_Factura *fact;
        EMUFS_REG_SIZE size;
        EMUFS_REG_ID id, id_texto;
        t_Factura *fact;
        EMUFS_REG_SIZE size;
        EMUFS_REG_ID id, id_texto;


@@ -432,17 +437,13 @@ void fact_modificar(char *s)
        char tmp_str[10];
        void *entrada;
 
        char tmp_str[10];
        void *entrada;
 

-       /* XXX XXX XXX TODO */
-       return;
-       

        win = newwin(LINES-4, COLS-2, 2, 1);
        box(win, 0, 0);
        
        if (s == NULL) {
                fact = fact_form_buscar(win, &id, &id_texto);
        } else {
        win = newwin(LINES-4, COLS-2, 2, 1);
        box(win, 0, 0);
        
        if (s == NULL) {
                fact = fact_form_buscar(win, &id, &id_texto);
        } else {

-               id = atoi(s);
-               fact = fact_buscar(lst_facturas, nodo->numero, &id, &id_texto);
+               fact = fact_buscar(lst_facturas, atoi(s), &id, &id_texto);

        }
 
        if (fact == NULL) {
        }
 
        if (fact == NULL) {


@@ -511,8 +512,11 @@ void fact_modificar(char *s)
 
        entrada = procesar_guardar_factura(fact, lst_facturas, &size);
        if (entrada) {
 
        entrada = procesar_guardar_factura(fact, lst_facturas, &size);
        if (entrada) {

-               id = lst_facturas->fp->modificar_registro(lst_facturas->fp, id, entrada, size, &error);
-               id_texto = lst_facturas->fp_texto->modificar_registro(lst_facturas->fp_texto, id_texto, fact->nota, strlen(fact->nota)+1, &error);
+               CLAVE k;
+               k = emufs_indice_generar_clave_desde_valor(lst_facturas->fp->indices, (char *)&fact->numero);
+               lst_facturas->fp->modificar_registro(lst_facturas->fp, k, entrada, size, &error);
+               k.i_clave = id_texto;
+               id_texto = lst_facturas->fp_texto->modificar_registro(lst_facturas->fp_texto, k, fact->nota, strlen(fact->nota)+1, &error);

                free(entrada);
        }
 
                free(entrada);
        }
 


@@ -534,7 +538,7 @@ void fact_agregar(char *s)
        t_Item *its = NULL;
        t_Factura fact;
        EMUFS_REG_SIZE size;
        t_Item *its = NULL;
        t_Factura fact;
        EMUFS_REG_SIZE size;

-       EMUFS_REG_ID id, id_texto;
+       EMUFS_REG_ID id_texto;

        int y_actual, cant, error;
        char *entrada;
 
        int y_actual, cant, error;
        char *entrada;
 


@@ -646,7 +650,6 @@ void fact_agregar(char *s)
        if (entrada) {
                error = 0;
                lst_facturas->fp->grabar_registro(lst_facturas->fp, entrada, size, &error);
        if (entrada) {
                error = 0;
                lst_facturas->fp->grabar_registro(lst_facturas->fp, entrada, size, &error);

-               agregar_nodo_factura(lst_facturas, crear_nodo_factura(id, id_texto, fact.numero));

                free(entrada);
        }
                                                                        
                free(entrada);
        }
                                                                        


@@ -947,6 +950,27 @@ int fact_exportar_xml(const char *filename)
        return 1;
 }
 
        return 1;
 }
 

+char *get_estado(char *s)
+{
+       if (strcmp(s, "PN")==0) return "Pago Normal";
+       if (strcmp(s, "CD")==0) return "Credito al dia";
+       if (strcmp(s, "CM")==0) return "Credito en mora";
+       if (strcmp(s, "SF")==0) return "Cheque sin fondos";
+       if (strcmp(s, "PM")==0) return "Pagada con Mora";
+       if (strcmp(s, "NC")==0) return "No Cobrada";
+
+       return s;
+}
+
+char *get_forma_pago(char *s)
+{
+       if (strcmp(s, "CO") == 0) return "Contado";
+       if (strcmp(s, "CR") == 0) return "Credito";
+       if (strcmp(s, "CH") == 0) return "Cheque";
+
+       return s;
+}
+

 void fact_consultas_codigos(char *s)
 {
        EMUFS_REG_ID dummy;
 void fact_consultas_codigos(char *s)
 {
        EMUFS_REG_ID dummy;


@@ -982,10 +1006,10 @@ void fact_consultas_codigos(char *s)
        lista = lista_crear(4, win1, COLS-4, LINES-6);
 
        /* Creo las columnas */
        lista = lista_crear(4, win1, COLS-4, LINES-6);
 
        /* Creo las columnas */

-       lista_agregar_columna(lista, DATO_INT, 0, 8);    /* numero     */
-       lista_agregar_columna(lista, DATO_STR, 10, 9);   /* emision    */
-       lista_agregar_columna(lista, DATO_STR, 20, 3);   /* estado     */
-       lista_agregar_columna(lista, DATO_STR, 25, 3);   /* fp         */
+       lista_agregar_columna(lista, "Numero", DATO_INT, 0, 8);    /* numero     */
+       lista_agregar_columna(lista, "Fecha", DATO_STR, 10, 9);   /* emision    */
+       lista_agregar_columna(lista, "Estado", DATO_STR, 20, 19);  /* estado     */
+       lista_agregar_columna(lista, "Forma de Pago", DATO_STR, 40, 19);   /* fp         */

 
        /* Leo los datos desde el archivo */
        for(i=desde_codigo; i<=hasta_codigo; i++) {
 
        /* Leo los datos desde el archivo */
        for(i=desde_codigo; i<=hasta_codigo; i++) {


@@ -994,8 +1018,8 @@ void fact_consultas_codigos(char *s)
                        lista_agregar_fila(lista,
                                factura->numero,
                                factura->emision,
                        lista_agregar_fila(lista,
                                factura->numero,
                                factura->emision,

-                               factura->estado,
-                               factura->fp
+                               get_estado(factura->estado),
+                               get_forma_pago(factura->fp)

                        );
                }
        }
                        );
                }
        }


@@ -1052,10 +1076,10 @@ void fact_consultas_varias(char *nombre_indice, char *titulo)
        lista = lista_crear(4, win1, COLS-4, LINES-6);
 
        /* Creo las columnas */
        lista = lista_crear(4, win1, COLS-4, LINES-6);
 
        /* Creo las columnas */

-       lista_agregar_columna(lista, DATO_INT, 0, 8);    /* numero     */
-       lista_agregar_columna(lista, DATO_STR, 10, 9);   /* emision    */
-       lista_agregar_columna(lista, DATO_STR, 20, 3);   /* estado     */
-       lista_agregar_columna(lista, DATO_STR, 25, 3);   /* fp         */
+       lista_agregar_columna(lista, "Numero", DATO_INT, 0, 8);    /* numero     */
+       lista_agregar_columna(lista, "Fecha", DATO_STR, 10, 9);   /* emision    */
+       lista_agregar_columna(lista, "Estado", DATO_STR, 20, 19);  /* estado     */
+       lista_agregar_columna(lista, "Forma Pago", DATO_STR, 40, 19);   /* fp         */

 
        /* Leo los datos desde el archivo */
        datos = emufs_buscar_registros(fs, nombre_indice, desc, &cant);
 
        /* Leo los datos desde el archivo */
        datos = emufs_buscar_registros(fs, nombre_indice, desc, &cant);


@@ -1068,8 +1092,8 @@ void fact_consultas_varias(char *nombre_indice, char *titulo)
                        lista_agregar_fila(lista,
                                                        factura.numero,
                                                        factura.emision,
                        lista_agregar_fila(lista,
                                                        factura.numero,
                                                        factura.emision,

-                                                       factura.estado,
-                                                       factura.fp
+                                                       get_estado(factura.estado),
+                                                       get_forma_pago(factura.fp)

                                        );
                        free(tmp);
                } else {
                                        );
                        free(tmp);
                } else {