*/
dummy.id = -1;
dato.id = b_insertar_dup_en_pos(idx, dummy, dato);
+ if (dato.id != -1)
+ PERR("NODO INSERTADO EN POS GENERADA NUEVA");
+ PERR("Ahora inserto");
+ fprintf(stderr, "Nombre del coso = %s\n", idx->nombre);
}
b_insertar_en_nodo(idx, clave, dato, nodo_id, nodo, -1, -1);
if ((i<header.cant) && (emufs_indice_es_igual(idx, claves[i].clave, clave))) {
ret = claves[i].dato;
free(nodo);
- PERR("CLAVE ENCONTRADA");
return ret;
} else {
tmp = nodo;
tmp_claves[i].clave = clave;
tmp_claves[i].dato = dato;
tmp_claves[i].hijo_derecho = hijo1;
- tmp_claves[i+1].hijo_derecho = hijo2;
+ if (i<nodo_header.cant)
+ tmp_claves[i+1].hijo_derecho = hijo2;
while (i < nodo_header.cant) {
tmp_claves[i+1] = claves[i];
i++;
}
/* Busco la clave en el arbol */
- PERR("Buscando clave");
dato = emufs_indice_b_buscar(idx, clave);
if (dato.id == -1) {
error = 0;
PERR("GRABADO REGISTRO NUEVO");
k.i_clave = idx->emu_mult->grabar_registro(idx->emu_mult,
- leido,
- cant*sizeof(INDICE_DATO)+sizeof(int),
- &error
- );
+ leido,
+ cant*sizeof(INDICE_DATO)+sizeof(int),
+ &error
+ );
+ if (k.i_clave == -1) PERR("ALGO NO GRABO BIEN!!");
} else {
/* Modifico el que ya existia! */
PERR("MODIFICANDO REGISTRO EXISTENTE");
error = 0;
idx->emu_mult->modificar_registro(idx->emu_mult,
- k.i_clave,
- leido,
- cant*sizeof(INDICE_DATO)+sizeof(int),
- &error
- );
+ k.i_clave,
+ leido,
+ cant*sizeof(INDICE_DATO)+sizeof(int),
+ &error
+ );
}
/* Clean up! */
free(leido);
* mas de 2 letras iguales, si no no gano nada y complica las cosas
*/
if (iguales > 1) {
- sprintf(salvar, "%d%s", iguales, resto);
+ sprintf(salvar, "%d|%s", iguales, resto);
free(actual);
error = 0;
idx->emu_string->modificar_registro(idx->emu_string, array[i].clave.i_clave, salvar, strlen(salvar)+1, &error);
for(i=1; i<header->cant; i++) {
actual = (char *)idx->emu_string->leer_registro(idx->emu_string, array[i].clave, &size, &error);
iguales = strtol(actual, &resto, 10);
- if (iguales > 0) {
+ if ((iguales > 0) && (*resto == '|')) {
+ fprintf(stderr, "%s %s %d\n", primera, actual, iguales);
strncpy(salvar, primera, iguales);
salvar[iguales] = '\0';
- strcat(salvar, resto);
+ strcat(salvar, resto+1); /* +1 para saltar el separador */
idx->emu_string->modificar_registro(idx->emu_string, array[i].clave.i_clave, salvar, strlen(salvar)+1, &error);
free(actual);
} else {
#include "facturas.h"
#include "idx.h"
#include "common.h"
+#include "menu.h"
+#include "lista.h"
static t_LstFacturas *lst_facturas;
char *prop;
EMUFS_REG_SIZE size;
t_LstFacturas *tmp;
+ t_Factura *factura;
EMUFS_REG_ID id;
lst_facturas = NULL;
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));
-#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
+ emufs_agregar_indice(tmp->fp, "emision", IND_EXAHUSTIVO, IND_B, IDX_STRING, STRUCT_OFFSET(factura, emision), 512);
+ emufs_agregar_indice(tmp->fp, "numero", IND_PRIMARIO, IND_B, IDX_INT, 0, 512);
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 (save != NULL) {
error = 0;
id = tmp->fp->grabar_registro(tmp->fp, save, size, &error);
- agregar_nodo_factura(tmp, crear_nodo_factura(id, fact.reg_nota, fact.numero));
if (fact.items) free(fact.items);
if (fact.nota) free(fact.nota);
free(save);
xmlCleanupParser();
} else {
#ifdef NO_SE_USA_MAS
+ /* TODO RECUPERAR INDICES DESDE EL ARCHIVO */
PERR("Voy a recuperar desde un archivo");
tmp->fp = emufs_abrir("facturas");
if (tmp->fp == NULL) {
char *leo;
EMUFS_REG_SIZE size;
int error;
+ CLAVE k;
if (lst == NULL) return NULL;
fact = NULL;
- leo = lst->fp->leer_registro(lst->fp,
- emufs_indice_generar_clave_desde_valor(lst->fp->indices, (char*)&numero), &size, &error);
+ k = emufs_indice_generar_clave_desde_valor(lst->fp->indices, (char*)&numero);
+ leo = lst->fp->leer_registro(lst->fp, k, &size, &error);
if (leo != NULL) {
fact = (t_Factura *)malloc(sizeof(t_Factura));
if (fact == NULL) {
(*id_texto) = reg->texto_reg;
*/
free(leo);
- //fact->nota = lst->fp_texto->leer_registro(lst->fp_texto, reg->texto_reg, &size, &error);
+ k.i_clave = fact->reg_nota;
+ fact->nota = lst->fp_texto->leer_registro(lst->fp_texto, k, &size, &error);
}
return fact;
{
WINDOW *win;
t_Factura *fact;
- t_Reg_Factura *nodo;
EMUFS_REG_ID id;
+ CLAVE k;
win = newwin(LINES-4, COLS-2, 2, 1);
box(win, 0, 0);
return;
}
- nodo = lst_facturas->primero;
- while (nodo) {
- if (nodo->numero == fact->numero) {
- /*lst_facturas->fp->borrar_registro(lst_facturas->fp, nodo->num_reg);*/
- /*lst_facturas->fp_texto->borrar_registro(lst_facturas->fp_texto, nodo->texto_reg);*/
- eliminar_nodo_factura(lst_facturas, nodo);
- break;
- }
- nodo = nodo->sig;
- }
+ k = emufs_indice_generar_clave_desde_valor(lst_facturas->fp->indices, (char *)(&fact->numero));
+ lst_facturas->fp->borrar_registro(lst_facturas->fp, k);
+ k.i_clave = fact->reg_nota;
+ lst_facturas->fp_texto->borrar_registro(lst_facturas->fp_texto, k);
free(fact->items);
free(fact);
char tmp_str[10];
void *entrada;
-
+ /* XXX XXX XXX TODO */
+ return;
+
win = newwin(LINES-4, COLS-2, 2, 1);
box(win, 0, 0);
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;
- }
+ fact = fact_buscar(lst_facturas, nodo->numero, &id, &id_texto);
}
if (fact == NULL) {
fact.cant_items = cant;
fact.nota = form_obtener_valor_char(form_nota, "");
+ id_texto = lst_facturas->fp_texto->grabar_registro(lst_facturas->fp_texto, fact.nota, strlen(fact.nota)+1, &error);
+ fact.reg_nota = id_texto;
+
entrada = procesar_guardar_factura(&fact,lst_facturas, &size);
if (entrada) {
error = 0;
- id = lst_facturas->fp->grabar_registro(lst_facturas->fp, entrada, size, &error);
- id_texto = lst_facturas->fp_texto->grabar_registro(lst_facturas->fp_texto, fact.nota, strlen(fact.nota)+1, &error);
+ lst_facturas->fp->grabar_registro(lst_facturas->fp, entrada, size, &error);
agregar_nodo_factura(lst_facturas, crear_nodo_factura(id, id_texto, fact.numero));
free(entrada);
}
return 1;
}
+void fact_consultas_codigos(char *s)
+{
+ EMUFS_REG_ID dummy;
+ int desde_codigo, hasta_codigo;
+ int i;
+ t_Factura *factura;
+ t_Lista *lista;
+ t_Form *form;
+ WINDOW *win, *win1;
+
+ win = newwin(LINES-4, COLS-2, 2, 1);
+ win1 = derwin(win, LINES-6, COLS-4, 1, 1);
+ werase(win);
+ box(win, 0, 0);
+ wrefresh(win);
+
+ /* El usuario ingresa rango a listar */
+ form = form_crear(win1);
+ form_agregar_widget(form, INPUT, "Desde Codigo", 8, "0");
+ form_agregar_widget(form, INPUT, "Hasta Codigo", 8, "99999999");
+
+ form_ejecutar(form, 2, 2);
+
+ desde_codigo = form_obtener_valor_int(form, "Desde Codigo");
+ hasta_codigo = form_obtener_valor_int(form, "Hasta Codigo");
+
+ form_destruir(form);
+ werase(win1);
+ wrefresh(win1);
+
+ /* Creo la lista donde mostrar la consulta*/
+ /* Muestro solo info relevante */
+ lista = lista_crear(4, win1, COLS-4, LINES-6);
+
+ /* Creo las columnas */
+ lista_agregar_columna(lista, DATO_INT, 0, 8); /* numero */
+ lista_agregar_columna(lista, DATO_STR, 10, 9); /* emision */
+ lista_agregar_columna(lista, DATO_STR, 20, 3); /* estado */
+ lista_agregar_columna(lista, DATO_STR, 25, 3); /* fp */
+
+ /* Leo los datos desde el archivo */
+ for(i=desde_codigo; i<=hasta_codigo; i++) {
+ factura = fact_buscar(lst_facturas, i, &dummy, &dummy);
+ if (factura != NULL) {
+ lista_agregar_fila(lista,
+ factura->numero,
+ factura->emision,
+ factura->estado,
+ factura->fp
+ );
+ }
+ }
+
+ curs_set(0);
+ lista_ejecutar(lista);
+ curs_set(1);
+
+ wrefresh(win1);
+ wrefresh(win);
+ werase(win1);
+ werase(win);
+ wrefresh(win);
+ delwin(win);
+}
+
+void fact_consultas_varias(char *nombre_indice, char *titulo)
+{
+ int i, cant, error;
+ char *desc, *tmp;
+ t_Factura factura;
+ t_Lista *lista;
+ t_Form *form;
+ INDICE_DATO *datos;
+ WINDOW *win, *win1;
+ CLAVE k;
+ EMUFS *fs;
+ EMUFS_REG_SIZE size;
+
+ fs = lst_facturas->fp;
+
+ win = newwin(LINES-4, COLS-2, 2, 1);
+ win1 = derwin(win, LINES-6, COLS-4, 1, 1);
+ werase(win);
+ box(win, 0, 0);
+ wrefresh(win);
+
+ /* El usuario ingresa rango a listar */
+ form = form_crear(win1);
+ form_agregar_widget(form, INPUT, titulo, 50, "");
+
+ form_ejecutar(form, 2, 2);
+
+ tmp = form_obtener_valor_char(form, titulo);
+ desc = malloc(sizeof(char)*(strlen(tmp)+1));
+ strcpy(desc, tmp);
+
+ form_destruir(form);
+ werase(win1);
+ wrefresh(win1);
+
+ /* Creo la lista donde mostrar la consulta*/
+ /* Muestro solo info relevante */
+ lista = lista_crear(4, win1, COLS-4, LINES-6);
+
+ /* Creo las columnas */
+ lista_agregar_columna(lista, DATO_INT, 0, 8); /* numero */
+ lista_agregar_columna(lista, DATO_STR, 10, 9); /* emision */
+ lista_agregar_columna(lista, DATO_STR, 20, 3); /* estado */
+ lista_agregar_columna(lista, DATO_STR, 25, 3); /* fp */
+
+ /* Leo los datos desde el archivo */
+ datos = emufs_buscar_registros(fs, nombre_indice, desc, &cant);
+ for(i=0; i<cant; i++) {
+ k.i_clave = datos[i].id;
+ error = 1;
+ tmp = (char *)fs->leer_registro(fs, k, &size, &error);
+ if (tmp != NULL) {
+ procesar_leer_factura(&factura, tmp, size, lst_facturas);
+ lista_agregar_fila(lista,
+ factura.numero,
+ factura.emision,
+ factura.estado,
+ factura.fp
+ );
+ free(tmp);
+ } else {
+ PERR("NO SE PUDO RECUPERAR EL REGISTRO DE DATOS");
+ }
+ }
+
+ curs_set(0);
+ lista_ejecutar(lista);
+ curs_set(1);
+
+ wrefresh(win1);
+ wrefresh(win);
+ werase(win1);
+ werase(win);
+ wrefresh(win);
+ delwin(win);
+}
+
+void fact_consultas(char *s)
+{
+ MENU(mi_menu) {
+ MENU_OPCION("por Codigos", "Consulta de Articulos por rango de codigo."),
+ MENU_OPCION("por Fecha de Emision", "Consulta por fecha unica"),
+ MENU_OPCION("por Presentacion", "Consulta por Presentacion"),
+ MENU_OPCION("Volver", "Volver al menu anterior.")
+ };
+ int opt;
+
+ while ((opt = menu_ejecutar(mi_menu, 4, "Consulta de Articulos")) != 3) {
+ switch (opt) {
+ case 0:
+ fact_consultas_codigos(s);
+ break;
+ case 1:
+ fact_consultas_varias("emision", "Fecha");
+ break;
+ case 2:
+ fact_consultas_varias("presentacion", "Presentacion");
+ }
+ }
+}
+
projects / z.facultad / 75.06 / emufs.git / commitdiff