+/* Dejo el test para que no se pierda */
+void art_consultas_old(char *s)
+{
+ /* TEST DE LISTA! */
+ char txt[80];
+ int i;
+ 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 */
+ lista = lista_crear(3, win1, COLS-4, LINES-6);
+
+ /* Creo las 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);
+
+ /* Agrego unos datos a ver que pasa */
+ /* Pongo 100 y rezo */
+ for(i=0; i<100; i++) {
+ sprintf(txt, "Texto del item %d", i);
+ lista_agregar_fila(lista, i, txt, (rand()%100)/100.0f);
+ }
+ curs_set(0);
+ lista_ejecutar(lista);
+ curs_set(1);
+ wrefresh(win1);
+ wrefresh(win);
+ werase(win1);
+ werase(win);
+ wrefresh(win);
+ delwin(win);
+}
+
+void art_consultas_codigos(char *s)
+{
+ EMUFS_REG_ID dummy;
+ int desde_codigo, hasta_codigo;
+ int i;
+ t_Articulo *articulo;
+ 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, 51); /* desc */
+ lista_agregar_columna(lista, DATO_STR, 55, 9); /* existencia */
+ lista_agregar_columna(lista, DATO_STR, 65, 9); /* enim */
+
+ /* Leo los datos desde el archivo */
+ for(i=desde_codigo; i<=hasta_codigo; i++) {
+ articulo = art_obtener(lst_articulos, i, &dummy);
+ if (articulo != NULL) {
+ lista_agregar_fila(lista,
+ articulo->numero,
+ articulo->desc,
+ articulo->existencia,
+ articulo->emin
+ );
+ }
+ }
+
+ curs_set(0);
+ lista_ejecutar(lista);
+ curs_set(1);
+
+ wrefresh(win1);
+ wrefresh(win);
+ werase(win1);
+ werase(win);
+ wrefresh(win);
+ delwin(win);
+}
+
+void art_consultas_varias(char *nombre_indice, char *titulo)
+{
+ int i, cant, error;
+ char *desc, *tmp;
+ t_Articulo articulo;
+ t_Lista *lista;
+ t_Form *form;
+ INDICE_DATO *datos;
+ WINDOW *win, *win1;
+ CLAVE k;
+ EMUFS *fs;
+ EMUFS_REG_SIZE size;
+
+ fs = lst_articulos->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, 51); /* desc */
+ lista_agregar_columna(lista, DATO_STR, 55, 9); /* existencia */
+ lista_agregar_columna(lista, DATO_STR, 65, 9); /* enim */
+
+ /* 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_articulo(&articulo, tmp, size, lst_articulos);
+ lista_agregar_fila(lista,
+ articulo.numero,
+ articulo.desc,
+ articulo.existencia,
+ articulo.emin
+ );
+ 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);
+}
+