PERR("Voy a agregar un indice");
emufs_agregar_indice(tmp->fp, "presentacion", IND_EXAHUSTIVO, param->ind_art[2].tipo_arbol, IDX_STRING, STRUCT_OFFSET(un_articulo, desc), param->ind_art[2].tam_bloque, 1);
emufs_agregar_indice(tmp->fp, "desc", IND_EXAHUSTIVO, param->ind_art[1].tipo_arbol, IDX_STRING, STRUCT_OFFSET(un_articulo, desc), param->ind_art[1].tam_bloque, 0);
- emufs_agregar_indice(tmp->fp, "codigo", IND_PRIMARIO, param->ind_art[0].tipo_arbol, IDX_INT, 0, param->ind_art[0].tam_bloque, 0);
+
+ /* Para secuencial indexado el indice primario siempre es el B+ */
+ if ((param->tipo_arch_art != T4) && (param->tipo_arch_art != T5))
+ emufs_agregar_indice(tmp->fp, "codigo", IND_PRIMARIO, param->ind_art[0].tipo_arbol, IDX_INT, 0, param->ind_art[0].tam_bloque, 0);
+ else
+ emufs_agregar_indice(tmp->fp, "codigo", IND_PRIMARIO, IND_B_PLUS, IDX_INT, 0, param->ind_art[0].tam_bloque, 0);
if (!tmp->fp) {
PERR("NO SE PUDO CREAR ARCHIVO ARTICULOS");
free(tmp);
} else {
PERR("Voy a recuperar desde un archivo");
tmp->fp = emufs_abrir("articulos");
- fprintf(stderr, "PTR=%p %p\n", tmp, tmp->fp);
if (tmp->fp == NULL) {
PERR("No se pudo cargar archivo de articulos.");
free(tmp);
lst_articulos->primero = NULL;
emu = lst_articulos->fp = emufs_crear("articulos", param->tipo_arch_art, param->tam_bloque_art, sizeof(t_Articulo));
- fprintf(stderr, "NUEVO %s con tipo %d\n", emu->nombre, param->tipo_arch_art);
emufs_agregar_indice(emu, "presentacion", IND_EXAHUSTIVO, param->ind_art[2].tipo_arbol, IDX_STRING, STRUCT_OFFSET(un_articulo, desc), param->ind_art[2].tam_bloque, 1);
emufs_agregar_indice(emu, "desc", IND_EXAHUSTIVO, param->ind_art[1].tipo_arbol, IDX_STRING, STRUCT_OFFSET(un_articulo, desc), param->ind_art[1].tam_bloque, 0);
- emufs_agregar_indice(emu, "codigo", IND_PRIMARIO, param->ind_art[0].tipo_arbol, IDX_INT, 0, param->ind_art[0].tam_bloque, 0);
+ if ((param->tipo_arch_art != T4) && (param->tipo_arch_art != T5))
+ emufs_agregar_indice(emu, "codigo", IND_PRIMARIO, param->ind_art[0].tipo_arbol, IDX_INT, 0, param->ind_art[0].tam_bloque, 0);
+ else
+ emufs_agregar_indice(emu, "codigo", IND_PRIMARIO, IND_B_PLUS, IDX_INT, 0, param->ind_art[0].tam_bloque, 0);
PERR("Listo");
/* Ahora solo resta volver a meter todos los datos en el archivo */
fp = fopen(tmpfile, "rb");
k = menor;
if (k.i_clave > mayor.i_clave)
hasta_codigo = mayor.i_clave;
- fprintf(stderr, "k.i_clave = %d -- hasta_codigo = %d\n", k.i_clave, hasta_codigo);
+
while ((k.i_clave != -1) && (k.i_clave <= hasta_codigo)) {
PERR("BUSCO ARTICULO");
+ fprintf(stderr, "CLAVE = %d\n", k.i_clave);
articulo = art_obtener(lst_articulos, k.i_clave, &dummy);
PERR("LO TENGO");
if (articulo != NULL) {
PERR("AGREGO A LA LISTA");
- fprintf(stderr, "%d - %s\n", articulo->numero, articulo->desc);
lista_agregar_fila(lista,
articulo->numero,
articulo->desc,
}
PERR("OBTENGO SIGUIENTE CLAVE");
k = idx->obtener_sig_clave(idx, k);
- fprintf(stderr, "k.i_clave = %d -- hasta_codigo = %d\n", k.i_clave, hasta_codigo);
}
curs_set(0);
datos = idx->buscar_entradas(idx, k, &cant);
else
datos = emufs_buscar_registros(lst_articulos->fp, "desc", desc, &cant);
- fprintf(stderr, "obtuve %d claves para %s\n", cant, desc);
for(i=0; i<cant; i++) {
error = 1;
k1.i_clave = datos[i].id;
* claves con repeticion
*/
PERR("=== MODIFICANDO ===");
- fprintf(stderr, "Desc=%s , PVU=%s, Codigo=%d\n", articulo.desc, articulo.pvu, articulo.numero);
lst_articulos->fp->modificar_registro(lst_articulos->fp, k1, tmp, size, &error, datos[i]);
PERR("=== FIN ===");
}
free(art);
art = NULL;
} else {
- fprintf(stderr, "Tengo %d datos\n", cant);
error = 1;
k.i_clave = datos[0].id;
PERR("Leo el primer dato");
*/
PERR("Guardando modificacion de Stock");
error = 0;
- fprintf(stderr, "PTR=%p %p\n", lst_articulos, lst_articulos->fp);
fp = lst_articulos->fp;
PERR("Pase1");
- fprintf(stderr, "METODO : %p\n", fp->modificar_registro);
fp->modificar_registro(fp, k, tmp, size, &error, dummy1);
PERR("Pase2");
PERR("Listo");