X-Git-Url: https://git.llucax.com/z.facultad/75.06/emufs.git/blobdiff_plain/e50af225b6fcc10c4cfd18b4f3c1bb850558efc8..73c32a90574f0fa6bfcf554d48c73e40e03b4dbb:/emufs_gui/facturas.c?ds=inline diff --git a/emufs_gui/facturas.c b/emufs_gui/facturas.c index f2ceeb2..0ac4861 100644 --- a/emufs_gui/facturas.c +++ b/emufs_gui/facturas.c @@ -8,11 +8,15 @@ static t_LstFacturas *lst_facturas; /* Procesa una factura antes de enviarla al archivo para guardarla */ 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); + +/* 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); + +/* Funciones para carga desde el XML */ static t_Item *leer_items(xmlNode *, int *cant, int size); -static char *leer_nota(xmlNode *); +static char *leer_nota(xmlNode *, int max); t_LstFacturas *fact_get_lst() { @@ -97,8 +101,10 @@ t_Item *leer_items(xmlNode *node, int *cant, int size) prop = xml_get_prop(node, "NroArtículo"); tmp[count-1].numero = atoi(prop); xmlFree(prop); - strcpy(tmp[count-1].cv, prop = xml_get_prop(node, "CV")); xmlFree(prop); - strcpy(tmp[count-1].pvu, prop = xml_get_prop(node, "PVU")); xmlFree(prop); + strncpy(tmp[count-1].cv, prop = xml_get_prop(node, "CV"), 8); xmlFree(prop); + tmp[count-1].cv[8] = '\0'; + strncpy(tmp[count-1].pvu, prop = xml_get_prop(node, "PVU"), 8); xmlFree(prop); + tmp[count-1].pvu[8] = '\0'; } } node = node->next; @@ -114,12 +120,14 @@ t_Item *leer_items(xmlNode *node, int *cant, int size) while (node) { if (node->type == XML_ELEMENT_NODE) { if (strcmp(node->name, "ITEMVENTA") == 0) { - memset(&tmp[count], '*', sizeof(t_Item)); + memset(&tmp[count], 0, sizeof(t_Item)); prop = xml_get_prop(node, "NroArtículo"); tmp[count].numero = atoi(prop); xmlFree(prop); - strcpy(tmp[count].cv, prop = xml_get_prop(node, "CV")); xmlFree(prop); - strcpy(tmp[count].pvu, prop = xml_get_prop(node, "PVU")); xmlFree(prop); + strncpy(tmp[count].cv, prop = xml_get_prop(node, "CV"), 8); xmlFree(prop); + tmp[count].cv[8] = '\0'; + strncpy(tmp[count].pvu, prop = xml_get_prop(node, "PVU"), 8); xmlFree(prop); + tmp[count].pvu[8] = '\0'; count++; } } @@ -130,7 +138,7 @@ t_Item *leer_items(xmlNode *node, int *cant, int size) return tmp; } -char *leer_nota(xmlNode *node) +char *leer_nota(xmlNode *node, int max) { xmlNode *tmp; char *salida; @@ -145,17 +153,28 @@ char *leer_nota(xmlNode *node) } if (tmp) { - salida = (char *)malloc(sizeof(char)*(strlen(XML_GET_CONTENT(tmp->children))+1)); - strcpy(salida, XML_GET_CONTENT(tmp->children)); + if (max == -1) { + salida = (char *)malloc(sizeof(char)*(strlen(XML_GET_CONTENT(tmp->children))+1)); + strcpy(salida, XML_GET_CONTENT(tmp->children)); + } else { + salida = (char *)malloc(sizeof(char)*max); + strncpy(salida, XML_GET_CONTENT(tmp->children), max-1); + salida[max-1] = '\0'; + } } else { - salida = (char *)malloc(sizeof(char)); - salida[0] = '\0'; + if (max == -1) { + salida = (char *)malloc(sizeof(char)); + salida[0] = '\0'; + } else { + salida = (char *)malloc(sizeof(char)*max); + memset(salida, 0, max); + } } return salida; } -t_LstFacturas *fact_cargar(const char *filename, int tipo, int tam_bloque) +t_LstFacturas *fact_cargar(const char *filename, int tipo, int tam_bloque, int tipo_nota, int bloque_nota) { xmlDocPtr document; xmlNode *node, *inicio; @@ -205,7 +224,11 @@ t_LstFacturas *fact_cargar(const char *filename, int tipo, int tam_bloque) 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_texto = emufs_crear("notas", 1, 100, 0); +#ifdef DEBUG + fprintf(stderr, "Facturas : Tipo=%d Tam Bloque = %d\n", tipo-1, tam_bloque); + fprintf(stderr, "Notas : Tipo=%d Tam Bloque = %d\n", tipo_nota-1, bloque_nota); +#endif + tmp->fp_texto = emufs_crear("notas", tipo_nota-1, bloque_nota, 100); for (node=inicio ; node ; node = node->next) { if (node->type == XML_ELEMENT_NODE) { if (strcmp(node->name, "FACTURA") == 0) { @@ -231,11 +254,11 @@ t_LstFacturas *fact_cargar(const char *filename, int tipo, int tam_bloque) strncpy(fact.cheque, prop = xml_get_prop(node, "NroCheque"), 18); xmlFree(prop); fact.cheque[18] = '\0'; - fact.nota = leer_nota(node); + fact.nota = leer_nota(node, (((tipo-1)==T3)?100:-1)); fact.items = leer_items(node, &fact.cant_items, ((tipo-1)==T3)?10:-1); error = 0; - id = tmp->fp_texto->grabar_registro(tmp->fp_texto, fact.nota, strlen(fact.nota)+1, &error); + id = tmp->fp_texto->grabar_registro(tmp->fp_texto, fact.nota, ((tipo-1)==T3)?100:(strlen(fact.nota)+1), &error); fact.reg_nota = id; save = procesar_guardar_factura(&fact, lst_facturas, &size); if (save != NULL) { @@ -399,6 +422,7 @@ void fact_modificar(char *s) { 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; @@ -410,11 +434,24 @@ void fact_modificar(char *s) win = newwin(LINES-4, COLS-2, 2, 1); box(win, 0, 0); - fact = fact_form_buscar(win, &id, &id_texto); + if (s == NULL) { + fact = fact_form_buscar(win, &id, &id_texto); + } else { + id = atoi(s); + fact = NULL; + nodo = lst_facturas->primero; + while (nodo) { + if (nodo->num_reg == id) { + fact = fact_buscar(lst_facturas, nodo->numero, &id, &id_texto); + break; + } + nodo = nodo->sig; + } + } if (fact == NULL) { wattron(win, COLOR_PAIR(COLOR_YELLOW)); - mvwaddstr(win, 2, 1, "No existe artículo con ese código. Abortando!"); + mvwaddstr(win, 2, 1, "No existe factura con ese código. Abortando!"); wattroff(win, COLOR_PAIR(COLOR_YELLOW)); wrefresh(win); getch(); @@ -474,6 +511,8 @@ void fact_modificar(char *s) free(fact->nota); fact->nota = form_obtener_valor_char(form_nota, ""); + form_destruir(form_nota); + entrada = procesar_guardar_factura(fact, lst_facturas, &size); if (entrada) { id = lst_facturas->fp->modificar_registro(lst_facturas->fp, id, entrada, size, &error); @@ -748,12 +787,12 @@ static int procesar_leer_factura(t_Factura *dst, void *src, EMUFS_REG_SIZE size, fin = (char *)src+size; memcpy(dst->items, ini, fin-ini); - dst->nota = lst->fp_texto->leer_registro(lst->fp_texto, dst->reg_nota, (EMUFS_REG_SIZE *)&dummy, &dummy); } else { dst->items = NULL; } - + dst->nota = lst->fp_texto->leer_registro(lst->fp_texto, dst->reg_nota, (EMUFS_REG_SIZE *)&dummy, &dummy); return 0; + break; case T3: /* Se que tengo 10 items */ /* TODO : Ver porque leer_registro_tipo3 tira mal el size */ @@ -761,11 +800,12 @@ static int procesar_leer_factura(t_Factura *dst, void *src, EMUFS_REG_SIZE size, memcpy(dst, src, size-sizeof(t_Item)*10); dst->items = (t_Item *)malloc(10*sizeof(t_Item)); memcpy(dst->items, src+size-sizeof(t_Item)*10, 10*sizeof(t_Item)); + dst->nota = lst->fp_texto->leer_registro(lst->fp_texto, dst->reg_nota, (EMUFS_REG_SIZE *)&dummy, &dummy); } return 0; } -void fact_reformatear(int tipo, int tam_bloque, int tam_reg) +void fact_reformatear(int tipo, int tam_bloque, int tam_reg, int nota_tipo, int nota_tam_bloque, int nota_tam_registro) { EMUFS *nuevo, *old; EMUFS_REG_ID *indices, id; @@ -794,6 +834,7 @@ void fact_reformatear(int tipo, int tam_bloque, int tam_reg) lst_nueva = (t_LstFacturas *)malloc(sizeof(t_LstFacturas)); lst_nueva->primero = NULL; lst_nueva->fp = nuevo; + lst_nueva->fp_texto = emufs_crear("nota_tmp", nota_tipo, nota_tam_bloque, nota_tam_registro); /* Leo los indices del archivo viejo */ PERR("Obtengo Indices\n"); @@ -803,21 +844,31 @@ void fact_reformatear(int tipo, int tam_bloque, int tam_reg) return; } - PERR("Proceso datos\n"); + PERR("Proceso datos"); for(i=0; ileer_registro(old, indices[i], &size, &error); if (procesar_leer_factura(&fact, save, size, lst_facturas) == 0) { + PERR("Procese Leer Ok"); free(save); /* Lei un registro Ok. Lo salvo en el archivo nuevo */ + + /* Actualizo el ID de la nota asociada */ + fact.reg_nota = lst_nueva->fp_texto->grabar_registro(lst_nueva->fp_texto, fact.nota, strlen(fact.nota)+1, &error); save = procesar_guardar_factura(&fact, lst_nueva, &size); + PERR("Procese Grabar Ok"); if (save) { error = 0; + PERR("Grabo el Registro"); id = nuevo->grabar_registro(nuevo, save, size, &error); + PERR("Lo agrego"); agregar_nodo_factura(lst_nueva, crear_nodo_factura(id, fact.reg_nota, fact.numero)); + PERR("Libero Memoria"); free(save); if (fact.items) free(fact.items); if (fact.nota) free(fact.nota); + PERR("Termine con este Item"); } } } @@ -835,6 +886,11 @@ void fact_reformatear(int tipo, int tam_bloque, int tam_reg) lst_facturas->fp->nombre = (char *)malloc(sizeof(char)*(strlen("facturas")+1)); strcpy(lst_facturas->fp->nombre, "facturas"); + /* Tambien actualizo el nombre para notas */ + free(lst_facturas->fp_texto->nombre); + lst_facturas->fp_texto->nombre = (char *)malloc(sizeof(char)*(strlen("notas")+1)); + strcpy(lst_facturas->fp_texto->nombre, "notas"); + /* Muevo los archivos! */ /* TODO : Poner en otro lugar mas generico! */ PERR("Renombre!!\n"); @@ -842,6 +898,52 @@ void fact_reformatear(int tipo, int tam_bloque, int tam_reg) rename("emufs_tmp.idx", "facturas.idx"); rename("emufs_tmp.fsc", "facturas.fsc"); rename("emufs_tmp.did", "facturas.did"); + rename("nota_tmp.dat", "notas.dat"); + rename("nota_tmp.idx", "notas.idx"); + rename("nota_tmp.fsc", "notas.fsc"); + rename("nota_tmp.did", "notas.did"); PERR("==== TERMINE ====\n"); } +int fact_exportar_xml(const char *filename) +{ + int j; + t_Reg_Factura *nodo; + t_Factura *fact; + EMUFS_REG_ID id, id1; + FILE *fp; + + if (lst_facturas->primero == NULL) return 0; + + nodo = lst_facturas->primero; + + if (!(fp = fopen(filename, "wt"))) return 0; + + fprintf(fp, "\n"); + fprintf(fp, "\n"); + while (nodo) { + fact = fact_buscar(lst_facturas, nodo->numero, &id, &id1); + fprintf(fp, "\tnumero); + fprintf(fp, "FechaEmisión=\"%s\" ", fact->emision); + fprintf(fp, "FechaVto=\"%s\" ", fact->vencimiento); + fprintf(fp, "NroRemito=\"%08d\" ", fact->numero_remito); + fprintf(fp, "FP=\"%s\" ", fact->fp); + fprintf(fp, "Estado=\"%s\" ", fact->estado); + fprintf(fp, "NroCheque=\"%s\" ", fact->cheque); + fprintf(fp, "PorcDoI=\"%.2f\" ", fact->procdoi); + fprintf(fp, "NroCtaCte=\"%s\" ", fact->ctacte); + fprintf(fp, ">\n"); + fprintf(fp, "\t\t%s\n", fact->nota); + for(j=0; jcant_items; j++) { + if (fact->items[j].numero != 0) + fprintf(fp, "\t\t\n", fact->items[j].numero, fact->items[j].cv, fact->items[j].pvu); + } + fprintf(fp, "\t\n"); + nodo = nodo->sig; + } + fprintf(fp, "\t\n"); + + fclose(fp); + return 1; +} +