* Se agregan fclose faltantes .

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

diff --git a/emufs_gui/articulos.c b/emufs_gui/articulos.c
index e55b1b6b5795b21b19cec70c62fe920b3896bb81..f768dc204e0798ae532578be6bc64373b4f89d4b 100644 (file)
--- a/emufs_gui/articulos.c
+++ b/emufs_gui/articulos.c
@@ -104,14 +104,24 @@ t_LstArticulos *art_cargar(const char *filename, int tipo, int tam_bloque)
                        }
                        node = node->next;
                }
-
+#ifdef DEBUG
+               fprintf(stderr, "Articulos : Tipo=%d Bloque=%d\n", tipo-1, tam_bloque);
+#endif
                tmp->fp = emufs_crear("articulos", tipo-1, tam_bloque, sizeof(t_Articulo));
+               if (!tmp->fp) {
+                       PERR("NO SE PUDO CREAR ARCHIVO ARTICULOS");
+                       free(tmp);
+                       xmlFreeDoc(document);
+                       xmlCleanupParser();
+                       lst_articulos = NULL;
+                       return NULL;
+               }
                for (node=inicio ; node ; node = node->next) {
                        if (node->type == XML_ELEMENT_NODE) {
                                if (strcmp(node->name, "ARTICULO") == 0) {
                                        t_Articulo art;
                                        void *save;
-                                       memset(&art, '*', sizeof(t_Articulo));
+                                       memset(&art, 0, sizeof(t_Articulo));
                                        prop = xml_get_prop(node, "NroArtículo");
                                        art.numero = atoi(prop);
                                        xmlFree(prop);
@@ -121,7 +131,7 @@ t_LstArticulos *art_cargar(const char *filename, int tipo, int tam_bloque)
                                        art.presentacion[30] = '\0'; /* Me aseguro de que este */
                                        strncpy(art.existencia, prop = xml_get_prop(node, "Existencia"), 8); xmlFree(prop);
                                        art.existencia[8] = '\0'; /* Me aseguro de que este */
-                                       strncpy(art.ubicacion, prop = xml_get_prop(node, "Ubicacion"), 30); xmlFree(prop);
+                                       strncpy(art.ubicacion, prop = xml_get_prop(node, "Ubicación"), 30); xmlFree(prop);
                                        strncpy(art.pvu, prop = xml_get_prop(node, "PVU"), 8); xmlFree(prop);
                                        art.pvu[8] = '\0'; /* Me aseguro de que este */
                                        strncpy(art.emin, prop = xml_get_prop(node, "Emín"), 8); xmlFree(prop);
@@ -185,14 +195,14 @@ int art_liberar(t_LstArticulos *l)
        return 0;
 }
 
-t_Articulo *art_obtener(t_LstArticulos *lst, const char *numero, EMUFS_REG_ID *id)
+t_Articulo *art_obtener(t_LstArticulos *lst, int numero, EMUFS_REG_ID *id)
 {
        t_Articulo *art;
        t_Reg_Articulo *nodo;
        void *tmp;
        int error = 0;
        EMUFS_REG_SIZE size;
-       int n = atoi(numero);
+       int n = numero;
 
        if (lst == NULL) lst = lst_articulos;
        if (lst == NULL) return NULL;
@@ -232,7 +242,7 @@ t_Articulo *art_form_buscar(WINDOW *win, EMUFS_REG_ID *id)
        form = form_crear(win);
        form_agregar_widget(form, INPUT, "Numero de Artículo", 8, "");
        form_ejecutar(form, 1,1);
-       articulo = art_obtener(NULL, form_obtener_valor_char(form, "Numero de Artículo"), id);
+       articulo = art_obtener(NULL, form_obtener_valor_int(form, "Numero de Artículo"), id);
        form_destruir(form);
 
        return articulo;
@@ -591,3 +601,39 @@ void art_reformatear(int tipo, int tam_bloque, int tam_reg)
        PERR("==== TERMINE ====\n");
 }
 
+int art_exportar_xml(const char *filename)
+{
+       t_Reg_Articulo *nodo;
+       t_Articulo *art;
+       EMUFS_REG_ID id;
+       FILE *fp;
+
+       if (lst_articulos->primero == NULL) return 0;
+
+       nodo = lst_articulos->primero;
+
+       if (!(fp = fopen(filename, "wt"))) return 0;
+       
+       fprintf(fp, "<?xml version=\"1.0\" encoding=\"ISO-8859-1\" ?>\n\n");
+       fprintf(fp, "<ARTICULOS>\n");
+       while (nodo) {
+               art = art_obtener(lst_articulos, nodo->numero, &id);
+               if (art != NULL) {
+                       fprintf(fp, "\t<ARTICULO ");
+                       fprintf(fp, "NroArtículo=\"%d\" ", nodo->numero);
+                       fprintf(fp, "Descripción=\"%s\" ", art->desc);
+                       fprintf(fp, "Presentación=\"%s\" ", art->presentacion);
+                       fprintf(fp, "Ubicación=\"%s\" ", art->ubicacion);
+                       fprintf(fp, "Existencia=\"%s\" ", art->existencia);
+                       fprintf(fp, "PVU=\"%s\" ", art->pvu);
+                       fprintf(fp, "Emín=\"%s\" />\n", art->emin);
+                       free(art);
+               }
+               nodo = nodo->sig;
+       }
+       fprintf(fp, "</ARTICULOS>\n");
+
+       fclose(fp);
+       return 1;
+}
+