preguntar_nuevo_tipo("Parametros para Facturas", &nuevo_tipo, &nuevo_tam_bloque, &nuevo_tam_registro);
preguntar_nuevo_tipo("Parametros para Notas", &nuevo_tipo1, &nuevo_tam_bloque1, &nuevo_tam_registro1);
dlg = msg_box(stdscr, COLS, LINES, "Cambiando el formato de archivo .... Aguarde");
- parametros.tipo_arch_art = nuevo_tipo;
+ parametros.tipo_arch_fact = nuevo_tipo;
parametros.tam_bloque_fact = nuevo_tam_bloque;
parametros.tipo_arch_nota = nuevo_tipo1;
parametros.tam_bloque_nota = nuevo_tam_bloque1;
/* Creo el indice externo por Nro Articulo */
emu->externo = emufs_indice_crear(emu, "articulo", IND_SELECCION, IND_B, IDX_INT, 0, 512, 0);
+ lst_facturas->fp_texto = emufs_crear("notas", param->tipo_arch_nota, param->tam_bloque_nota, 100);
PERR("Listo!");
- lst_facturas->fp_texto = emufs_crear("notas", param->tipo_arch_nota, param->tam_bloque_nota, 100);
fp = fopen(tmpfile, "r");
if (fp == NULL) PERR("Ciao!");
EMUFS_REG_ID id;
EMUFS_REG_SIZE size;
/* Leo la factura */
- if (fread(&factura, sizeof(t_Articulo), 1, fp) != 1) continue;
+ PERR("Leo registro");
+ if (fread(&factura, sizeof(t_Factura), 1, fp) != 1) continue;
factura.items = malloc(sizeof(t_Item)*factura.cant_items);
fread(factura.items, factura.cant_items, sizeof(t_Item), fp);
fread(&len, 1, sizeof(int), fp);
factura.nota = malloc(len*sizeof(char));
fread(factura.nota, 1, len, fp);
-
+ PERR(factura.nota);
+ PERR("Lo guardo");
/* Listo, ya lei, ahora agrego */
error = 0;
id = lst_facturas->fp_texto->grabar_registro(lst_facturas->fp_texto, factura.nota, (param->tipo_arch_nota==T3)?100:(strlen(factura.nota)+1), &error);