#include "idx.h"
#include "gui.h"
#include "common.h"
+#include "lista.h"
static t_LstArticulos *lst_articulos;
char *prop;
EMUFS_REG_SIZE size;
t_LstArticulos *tmp;
+ t_Articulo *un_articulo;
lst_articulos = NULL;
EMUFS_REG_ID id;
tmp->fp = emufs_crear("articulos", tipo-1, tam_bloque, sizeof(t_Articulo));
/* Agrego los indices */
PERR("Voy a agregar un indice");
+ emufs_agregar_indice(tmp->fp, "desc", IND_EXAHUSTIVO, IND_B, IDX_STRING, STRUCT_OFFSET(un_articulo, desc), 512);
emufs_agregar_indice(tmp->fp, "codigo", IND_PRIMARIO, IND_B, IDX_INT, 0, 512);
if (!tmp->fp) {
PERR("NO SE PUDO CREAR ARCHIVO ARTICULOS");
void *tmp;
int error = 0;
EMUFS_REG_SIZE size;
+ CLAVE k;
+
+ if (lst == NULL) lst = lst_articulos;
+ if (lst == NULL) return NULL;
(*id) = -1; /* XXX Ver que se hacia con esto */
art = (t_Articulo *)malloc(sizeof(t_Articulo));
/* Ya se cual tengo que retornar. Ahora veo si lo cargo desde el archivo */
error = 0;
- tmp = 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);
+ tmp = lst->fp->leer_registro(lst->fp, k, &size, &error);
if (error) {
free(art);
return NULL;
wrefresh(win);
if (s == NULL) {
+ PERR("Voy a buscar con el formulario");
articulo = art_form_buscar(win, &codigo);
+ PERR("Ya lo tengo!!!!!!");
} else {
codigo = atoi(s);
/* Leo el registro directamente */
{
WINDOW *win;
t_Articulo *articulo;
- t_Reg_Articulo *nodo;
EMUFS_REG_ID id;
+ CLAVE k;
win = newwin(8, COLS-2, 13, 1);
box(win, 0, 0);
wrefresh(win);
getch();
} else {
- nodo = lst_articulos->primero;
- while (nodo) {
- if (nodo->numero == articulo->numero) {
- lst_articulos->fp->borrar_registro(lst_articulos->fp, nodo->num_reg);
- eliminar_nodo_articulo(lst_articulos, nodo);
- break;
- }
- nodo = nodo->sig;
- }
+ k = emufs_indice_generar_clave_desde_valor(lst_articulos->fp->indices, (char *)&(articulo->numero));
+ lst_articulos->fp->borrar_registro(lst_articulos->fp, k);
free(articulo);
}
WINDOW *win;
t_Form *form;
t_Articulo art;
- t_Reg_Articulo *nuevo;
void *save;
int error = 0, existe;
EMUFS_REG_SIZE size;
EMUFS_REG_ID id;
+ INDICE_DATO dato;
+ CLAVE k;
win = newwin(9, COLS-2, 13, 1);
box(win, 0, 0);
art.numero = atoi(form_obtener_valor_char(form, "Numero de Artículo"));
existe = 0;
- nuevo = lst_articulos->primero;
- while (nuevo) {
- if (art.numero == nuevo->numero) {
- existe = 1;
- break;
- }
- nuevo = nuevo->sig;
- }
-
+ /* Me dijo que no existe el codigo */
+ k = emufs_indice_generar_clave_desde_valor(lst_articulos->fp->indices, (char *)&art.numero);
+ dato = lst_articulos->fp->indices->existe_entrada(lst_articulos->fp->indices, k);
+ if (dato.id != -1) existe = 1;
+
if (!existe) {
strcpy(art.desc, form_obtener_valor_char(form, "Descripción"));
strcpy(art.presentacion, form_obtener_valor_char(form, "Presentación"));
wattroff(win, COLOR_PAIR(COLOR_YELLOW));
wrefresh(win);
getch();
- } else {
- agregar_nodo_articulo(lst_articulos, crear_nodo_articulo(id, art.numero));
}
free(save);
}
return 1;
}
+void art_consultas(char *s)
+{
+ /* TEST DE LISTA! */
+ t_Lista *lista;
+ 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);
+
+ /* Creo la lista */
+ PERR("-- Creando");
+ lista = lista_crear(3, win1, COLS-4, LINES-6);
+ PERR("-- Creando DONE");
+
+ /* Creo las columnas */
+ PERR("-- Creando Columnas");
+ lista_agregar_columna(lista, DATO_INT, 0, 8);
+ lista_agregar_columna(lista, DATO_STR, 10, 45);
+ lista_agregar_columna(lista, DATO_FLOAT, 60, 10);
+ PERR("-- Creando DONE");
+
+ /* Agrego unos datos a ver que pasa */
+ PERR("Agregando Datos");
+ lista_agregar_fila(lista, 1, "Dato uno", 1.32f);
+ lista_agregar_fila(lista, 2, "Dato Algo", 1.332f);
+ lista_agregar_fila(lista, 3, "Dato Copado", 11.32f);
+ lista_agregar_fila(lista, 4, "Esto es de texto", 133.32f);
+ lista_agregar_fila(lista, 5, "Dato", 1.32f);
+ lista_agregar_fila(lista, 6, "Dato uno", 10.32f);
+ lista_agregar_fila(lista, 7, "Dato uno", 11.32f);
+ PERR("Agregando Datos DONE");
+ lista_ejecutar(lista);
+ wrefresh(win1);
+ wrefresh(win);
+ getch();
+}
+