void menu_estadisticas();
void menu_ver_registros();
void menu_ver_bloques();
+void menu_ver_indices();
void preguntar_nuevo_tipo(const char *title, int *tipo, int *tam_bloque, int *tam_reg);
-char *preguntar_file();
void ver_estadisticas(EMUFS *fp);
int leer_tipo_arbol(char *s) {
if (strcmp(s, "B") == 0) return 0;
- if (strcmp(s, "B*") == 0) return 1;
- if (strcmp(s, "B+") == 0) return 2;
+ if (strcmp(s, "BA") == 0) return 1;
/* Por defecto es un B */
return 0;
node = padre->children;
while (node) {
if (node->type == XML_ELEMENT_NODE) {
- nombre = xml_get_prop(node, "nombre");
-
- if (strcmp(nombre, "codigo")==0) {
- tmp = xml_get_prop(node, "tipo");
- param->ind_art[0].tipo_arbol = leer_tipo_arbol(tmp);
- free(tmp);
- tmp = xml_get_prop(node, "bloque");
- param->ind_art[0].tam_bloque = atoi(tmp);
- free(tmp);
- } else if (strcmp(nombre, "desc")==0) {
- tmp = xml_get_prop(node, "tipo");
- param->ind_art[1].tipo_arbol = leer_tipo_arbol(tmp);
- free(tmp);
- tmp = xml_get_prop(node, "bloque");
- param->ind_art[1].tam_bloque = atoi(tmp);
- free(tmp);
- } else if (strcmp(nombre, "presentacion")) {
- tmp = xml_get_prop(node, "tipo");
- param->ind_art[2].tipo_arbol = leer_tipo_arbol(tmp);
- free(tmp);
- tmp = xml_get_prop(node, "bloque");
- param->ind_art[2].tam_bloque = atoi(tmp);
- free(tmp);
+ if (strcmp(node->name, "indice")==0) {
+ PERR(" LEO INDICE");
+ nombre = xml_get_prop(node, "nombre");
+
+ if (strcmp(nombre, "codigo")==0) {
+ tmp = xml_get_prop(node, "tipo");
+ param->ind_art[0].tipo_arbol = leer_tipo_arbol(tmp);
+ free(tmp);
+ tmp = xml_get_prop(node, "bloque");
+ param->ind_art[0].tam_bloque = atoi(tmp);
+ free(tmp);
+ } else if (strcmp(nombre, "desc")==0) {
+ tmp = xml_get_prop(node, "tipo");
+ param->ind_art[1].tipo_arbol = leer_tipo_arbol(tmp);
+ free(tmp);
+ tmp = xml_get_prop(node, "bloque");
+ param->ind_art[1].tam_bloque = atoi(tmp);
+ free(tmp);
+ } else if (strcmp(nombre, "presentacion")==0) {
+ tmp = xml_get_prop(node, "tipo");
+ param->ind_art[2].tipo_arbol = leer_tipo_arbol(tmp);
+ free(tmp);
+ tmp = xml_get_prop(node, "bloque");
+ param->ind_art[2].tam_bloque = atoi(tmp);
+ free(tmp);
+ }
+ PERR(" LISTO");
+ free(nombre);
}
- free(nombre);
}
+ node = node->next;
}
}
node = padre->children;
while (node) {
if (node->type == XML_ELEMENT_NODE) {
- nombre = xml_get_prop(node, "nombre");
-
- if (strcmp(nombre, "numero")==0) {
- tmp = xml_get_prop(node, "tipo");
- param->ind_fac[0].tipo_arbol = leer_tipo_arbol(tmp);
- free(tmp);
- tmp = xml_get_prop(node, "bloque");
- param->ind_fac[0].tam_bloque = atoi(tmp);
- free(tmp);
- } else if (strcmp(nombre, "emision")==0) {
- tmp = xml_get_prop(node, "tipo");
- param->ind_fac[1].tipo_arbol = leer_tipo_arbol(tmp);
- free(tmp);
- tmp = xml_get_prop(node, "bloque");
- param->ind_fac[1].tam_bloque = atoi(tmp);
- free(tmp);
+ if (strcmp(node->name, "indice")==0) {
+ PERR(" LEO INDICE");
+ nombre = xml_get_prop(node, "nombre");
+
+ if (strcmp(nombre, "numero")==0) {
+ tmp = xml_get_prop(node, "tipo");
+ param->ind_fac[0].tipo_arbol = leer_tipo_arbol(tmp);
+ free(tmp);
+ tmp = xml_get_prop(node, "bloque");
+ param->ind_fac[0].tam_bloque = atoi(tmp);
+ free(tmp);
+ } else if (strcmp(nombre, "emision")==0) {
+ tmp = xml_get_prop(node, "tipo");
+ param->ind_fac[1].tipo_arbol = leer_tipo_arbol(tmp);
+ free(tmp);
+ tmp = xml_get_prop(node, "bloque");
+ param->ind_fac[1].tam_bloque = atoi(tmp);
+ free(tmp);
+ } else if (strcmp(nombre, "vto")==0) {
+ tmp = xml_get_prop(node, "tipo");
+ param->ind_fac[2].tipo_arbol = leer_tipo_arbol(tmp);
+ free(tmp);
+ tmp = xml_get_prop(node, "bloque");
+ param->ind_fac[2].tam_bloque = atoi(tmp);
+ free(tmp);
+ } else if (strcmp(nombre, "cheque")==0) {
+ tmp = xml_get_prop(node, "tipo");
+ param->ind_fac[3].tipo_arbol = leer_tipo_arbol(tmp);
+ free(tmp);
+ tmp = xml_get_prop(node, "bloque");
+ param->ind_fac[3].tam_bloque = atoi(tmp);
+ free(tmp);
+ } else if (strcmp(nombre, "ctacte")==0) {
+ tmp = xml_get_prop(node, "tipo");
+ param->ind_fac[4].tipo_arbol = leer_tipo_arbol(tmp);
+ free(tmp);
+ tmp = xml_get_prop(node, "bloque");
+ param->ind_fac[4].tam_bloque = atoi(tmp);
+ free(tmp);
+ }
+ PERR(" LISTO");
+ free(nombre);
}
- free(nombre);
}
+ node = node->next;
}
}
tmp = xml_get_prop(node, "bloque");
param->tam_bloque_art = atoi(tmp);
free(tmp);
- } else if (strcmp(node->name, "indices")) {
+ } else if (strcmp(node->name, "indices")==0) {
+ PERR("LEO INDICES")
leer_param_ind_art(param, node);
+ PERR("LISTO");
}
}
node = node->next;
tmp = xml_get_prop(nodo, "bloque");
param->tam_bloque_nota = atoi(tmp);
free(tmp);
+ } else if (strcmp(nodo->name, "indices")==0) {
+ PERR("LEO INDICES")
+ leer_param_ind_fact(param, nodo);
+ PERR("LISTO");
}
}
nodo = nodo->next;
}
}
+static t_Parametros parametros;
+
int main(int argc, char *argv[])
{
WINDOW *dialog;
- t_Parametros parametros;
if (argc != 2) {
print_help(argv[0]);
}
-
- param_xml(argv[1], ¶metros);
+
+ if (argc == 2)
+ param_xml(argv[1], ¶metros);
#ifdef DEBUG
printf("CUIDADO! - Uds esta a punto de ejecutar EMUFS Gui compilado con mensajes de debug (-DDEBUG). ");
attroff(COLOR_PAIR(2));
wrefresh(stdscr);
- dialog = msg_box(stdscr, COLS, LINES, "Generando archivos ...");
-
-/* if (parametros.xml_art != -1) {*/
+ if (argc == 2) {
+ dialog = msg_box(stdscr, COLS, LINES, "Generando archivos ...");
art_cargar(¶metros);
-/* } else {
- art_cargar(NULL);
- }
- if (parametros.xml_fact != -1) {*/
fact_cargar(¶metros);
-/* } else {
+ } else {
+ dialog = msg_box(stdscr, COLS, LINES, "Recuperando archivos ...");
+ art_cargar(NULL);
fact_cargar(NULL);
- }*/
+ }
msg_box_free(stdscr, dialog);
MENU_OPCION("Baja", "Elimina una factura existente."),
MENU_OPCION("Modificacion", "Modifica una factura existente."),
MENU_OPCION("Consultas", "Consulta varias de articulo."),
+ MENU_OPCION("Recorrer", "Recorrer el archivo por alguno de sus indices."),
MENU_OPCION("Volver", "Volver al menu anterior.")
};
int opt;
- while ((opt = menu_ejecutar(mi_menu, 5, "Menu Articulos")) != 4) {
+ while ((opt = menu_ejecutar(mi_menu, 6, "Menu Facturas")) != 5) {
switch (opt) {
case 0:
fact_agregar(NULL);
break;
case 2:
fact_modificar(NULL);
+ break;
case 3:
fact_consultas(NULL);
+ break;
+ case 4:
+ fact_recorrer();
}
}
}
MENU_OPCION("Baja", "Elimina un articulo existente."),
MENU_OPCION("Modificacion", "Modifica un articulo existente."),
MENU_OPCION("Consultas", "Consulta varias de articulo."),
+ MENU_OPCION("Recorrer", "Recorrer el archivo por alguno de sus indices."),
+ MENU_OPCION("Ver ventas", "Ver venta de articulos entre 2 fechas."),
MENU_OPCION("Volver", "Volver al menu anterior.")
};
int opt;
- while ((opt = menu_ejecutar(mi_menu, 5, "Menu Articulos")) != 4) {
+ while ((opt = menu_ejecutar(mi_menu, 7, "Menu Articulos")) != 6) {
switch (opt) {
case 0:
art_agregar(NULL);
break;
case 3:
art_consultas(NULL);
+ break;
+ case 4:
+ art_recorrer();
+ break;
+ case 5:
+ art_ver_ventas();
}
}
}
}
-int main_menu()
+void ver_indice(int arch, char *indice)
{
- int c, w, h;
+ INDICE *idx;
+ int w, h;
WINDOW *win;
+ switch (arch) {
+ case 0:
+ idx = emufs_buscar_indice_por_nombre(art_get_lst()->fp, indice);
+ break;
+ case 1:
+ idx = emufs_buscar_indice_por_nombre(fact_get_lst()->fp, indice);
+ }
+ h = LINES-4;
+ w = COLS-2;
+ win = newwin(h, w, 2, 1);
+
+ if ((idx != NULL) && (idx->tipo != IND_B_PLUS)) {
+ emufs_indice_b_ver(idx, win, w, h, 0);
+ } else {
+ if (idx != NULL) {
+ WINDOW *dlg;
+ dlg = msg_box(win, w, h, "El tipo de arbol B+ no esta soportado en el visor");
+ getch();
+ msg_box_free(win, dlg);
+ }
+ }
+ delwin(win);
+}
+
+void menu_ver_indices()
+{
+ int arch[8] = {0, 0, 0, 1, 1, 1, 1, 1};
+ char *nombres[8] = {"codigo", "desc", "presentacion",
+ "numero", "emision", "vto", "cheque", "ctacte"};
+ MENU(mi_menu) {
+ MENU_OPCION("Articulos->codigo",""),
+ MENU_OPCION("Articulos->desc",""),
+ MENU_OPCION("Articulos->presentacion",""),
+ MENU_OPCION("Facturas->numero",""),
+ MENU_OPCION("Facturas->emision",""),
+ MENU_OPCION("Facturas->vto",""),
+ MENU_OPCION("Facturas->cheque", ""),
+ MENU_OPCION("Facturas->ctacte", ""),
+ MENU_OPCION("Volver", "Volver al menu anterior.")
+ };
+ int c;
+
+ while ((c=menu_ejecutar(mi_menu, 9, "Menu Principal"))!=8) {
+ ver_indice(arch[c], nombres[c]);
+ }
+}
+
+int main_menu()
+{
+ int c;
MENU(mi_menu) {
MENU_OPCION("Articulos","Alta,baja,consulta y modificacion de articulos."),
MENU_OPCION("Facturas","Alta,baja,consulta y modificacion de facturas."),
MENU_OPCION("Ver Bloques","Ver bloques (en su contexto) de los archivos."),
MENU_OPCION("Estadisticas","Ver estadisticas de ocupacion de archivos."),
MENU_OPCION("Mantenimiento","Tareas de mantenimiento de los archivos."),
- MENU_OPCION("DEBUG", "Debug de Arbol B"),
+ MENU_OPCION("Ver Indices", "Permite ver y recorrer los indices"),
MENU_OPCION("Salir", "Salir del sistema.")
};
menu_mantenimiento();
break;
case 6:
- h = LINES-2;
- w = COLS-2;
- win = newwin(h, w, 1, 1);
- emufs_indice_b_ver(art_get_lst()->fp->indices, win, w, h, 0);
- delwin(win);
+ menu_ver_indices();
}
}
nuevo_tam_registro = -1; /* No permito cambiar el tamaño de registro */
preguntar_nuevo_tipo("Parametros para Articulos", &nuevo_tipo, &nuevo_tam_bloque, &nuevo_tam_registro);
dlg = msg_box(stdscr, COLS, LINES, "Cambiando el formato de archivo .... Aguarde");
- art_reformatear(nuevo_tipo, nuevo_tam_bloque, nuevo_tam_registro);
+ parametros.tipo_arch_art = nuevo_tipo;
+ parametros.tam_bloque_art = nuevo_tam_bloque;
+ art_reformatear(¶metros);
msg_box_free(stdscr, dlg);
break;
case 4:
mvwaddstr(win, 0, 1, title);
form = form_crear(win);
- form_agregar_widget(form, RADIO, "Tipo de archivo", 3, "T1,T2,T3");
+ form_agregar_widget(form, RADIO, "Tipo de archivo", 3, "T1,T2,T3,T4,T5");
form_ejecutar(form, 1,1);
s = form_obtener_valor_char(form, "Tipo de archivo");
if (strcmp(s, "T1") == 0) n = T1;
if (strcmp(s, "T2") == 0) n = T2;
if (strcmp(s, "T3") == 0) n = T3;
+ if (strcmp(s, "T4") == 0) n = T4;
+ if (strcmp(s, "T5") == 0) n = T5;
form_destruir(form);
if ((*tam_reg) != -1)
(*tam_reg) = form_obtener_valor_int(form, "Tamaño de registro");
form_destruir(form);
+ break;
+ case T4:
+ case T5:
+ form = form_crear(win);
+ form_agregar_widget(form, INPUT, "Tamaño de bloque", 8, "");
+ is_ok = 0;
+ do {
+ form_set_valor(form, "Tamaño de bloque", "");
+ form_ejecutar(form, 1,1);
+ if (form_obtener_valor_int(form, "Tamaño de bloque") > 0) is_ok = 1;
+ } while (!is_ok);
+ (*tam_bloque) = form_obtener_valor_int(form, "Tamaño de bloque");
+ form_destruir(form);
}
werase(win);
wrefresh(win);
form_destruir(form);
return t;
}
+