X-Git-Url: https://git.llucax.com/z.facultad/75.06/emufs.git/blobdiff_plain/e50af225b6fcc10c4cfd18b4f3c1bb850558efc8..5bdca48a95afe59ffdb2ec4de0fff6ae29e8d54b:/emufs_gui/facturas.c?ds=sidebyside diff --git a/emufs_gui/facturas.c b/emufs_gui/facturas.c index f2ceeb2..be3ef3b 100644 --- a/emufs_gui/facturas.c +++ b/emufs_gui/facturas.c @@ -155,7 +155,7 @@ char *leer_nota(xmlNode *node) } -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 +205,10 @@ 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, "Notas : Tipo=%d Tam Bloque = %d\n", tipo_nota, 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) { @@ -474,6 +477,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 +753,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 +766,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 +800,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 +810,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 +852,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 +864,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; +} +