#include "common.h"
#include "lista.h"
#include "menu.h"
+#include "facturas.h"
static t_LstArticulos *lst_articulos;
getch();
} else {
INDICE_DATO dummy;
- k = emufs_indice_generar_clave_desde_valor(lst_articulos->fp->indices, (char *)&(articulo->numero));
- PERR("Borrando ARTICULO")
- lst_articulos->fp->borrar_registro(lst_articulos->fp, k, dummy);
- PERR("LISTO BORRADO");
+
+ /* Antes de borrar veo si existe alguna factura que contenga este articulo */
+ if (fact_hay_con_item(articulo->numero) == 0) {
+ k = emufs_indice_generar_clave_desde_valor(lst_articulos->fp->indices, (char *)&(articulo->numero));
+ PERR("Borrando ARTICULO")
+ lst_articulos->fp->borrar_registro(lst_articulos->fp, k, dummy);
+ PERR("LISTO BORRADO");
+ } else {
+ wattron(win, COLOR_PAIR(COLOR_YELLOW));
+ mvwaddstr(win, 6, 4, "No se pudo eliminar Articulo porque hay una factura que lo referencia.");
+ wattroff(win, COLOR_PAIR(COLOR_YELLOW));
+ wrefresh(win);
+ getch();
+ }
free(articulo);
}
emufs_agregar_indice(tmp->fp, "vto", IND_SELECCION, param->ind_fac[2].tipo_arbol, IDX_STRING, STRUCT_OFFSET(factura, emision), param->ind_fac[2].tam_bloque, 1);
emufs_agregar_indice(tmp->fp, "emision", IND_EXAHUSTIVO, param->ind_fac[1].tipo_arbol, IDX_STRING, STRUCT_OFFSET(factura, emision), param->ind_fac[1].tam_bloque, 0);
emufs_agregar_indice(tmp->fp, "numero", IND_PRIMARIO, param->ind_fac[0].tipo_arbol, IDX_INT, 0, param->ind_fac[0].tam_bloque, 0);
+
+ /* Creo el indice externo por Nro Articulo */
+ tmp->fp->externo = emufs_indice_crear(tmp->fp, "articulo", IND_SELECCION, IND_B, IDX_INT, 0, 512, 0);
+
tmp->fp_texto = emufs_crear("notas", param->tipo_arch_nota, param->tam_bloque_nota, 100);
for (node=inicio ; node ; node = node->next) {
if (node->type == XML_ELEMENT_NODE) {
fact.reg_nota = id;
save = procesar_guardar_factura(&fact, lst_facturas, &size);
if (save != NULL) {
+ int i;
error = 0;
- tmp->fp->grabar_registro(tmp->fp, save, size, &error);
+ id = tmp->fp->grabar_registro(tmp->fp, save, size, &error);
+
+ /* Agrego los Items al indice externo */
+ for(i=0; i<fact.cant_items; i++) {
+ if (fact.items[i].numero != 0) {
+ CLAVE _k; /* HACK Para hacer mas rapido */
+ INDICE_DATO _dato;
+ _k.i_clave = fact.items[i].numero;
+ _dato.id = id;
+ tmp->fp->externo->agregar_entrada(tmp->fp->externo, _k, _dato);
+ }
+ }
+
if (fact.items) {
free(fact.items);
fact.items = NULL;
}
}
+int fact_hay_con_item(int numero)
+{
+ INDICE *idx;
+ CLAVE k;
+ INDICE_DATO dato;
+ /* Busco si existe alguna factura que contenga al articulo "numero" */
+ idx = lst_facturas->fp->externo;
+
+ k.i_clave = numero;
+ dato = idx->existe_entrada(idx, k);
+
+ if (dato.id == -1)
+ return 0; /* No existe factura que contenga este articulo!! */
+
+ return 1; /* Hay alguna factura que contiene el articulo */
+}
+