static void *procesar_guardar_factura(t_Factura *f, t_LstFacturas *lst, EMUFS_REG_SIZE *size);
static int procesar_leer_factura(t_Factura *dst, void *src, EMUFS_REG_SIZE size, t_LstFacturas *lst);
+#ifdef TP_PRIMER_ENTREGA
/* Manejo de la lista en memoria */
static t_Reg_Factura *crear_nodo_factura(EMUFS_REG_ID reg, EMUFS_REG_ID texto, unsigned int num);
static int agregar_nodo_factura(t_LstFacturas *lst, t_Reg_Factura *nodo);
int eliminar_nodo_factura(t_LstFacturas *lst, t_Reg_Factura *nodo);
+#endif
/* Funciones para carga desde el XML */
static t_Item *leer_items(xmlNode *, int *cant, int size);
return s;
}
+#ifdef TP_PRIMER_ENTREGA
int eliminar_nodo_factura(t_LstFacturas *lst, t_Reg_Factura *nodo)
{
if (nodo == NULL) return 0;
}
return 1;
}
+#endif /*TP_PRIMER_ENTREGA*/
t_Item *leer_items(xmlNode *node, int *cant, int size)
{
}
-t_LstFacturas *fact_cargar(const char *filename, int tipo, int tam_bloque, int tipo_nota, int bloque_nota)
+t_LstFacturas *fact_cargar(t_Parametros *param)
{
xmlDocPtr document;
xmlNode *node, *inicio;
lst_facturas = tmp;
tmp->primero = NULL;
- if (filename != NULL) {
+ if (param != NULL) {
PERR("Voy a cargar de un XML");
- document = xmlReadFile(filename, "ISO-8859-1",0);
+ PERR(param->xml_fact);
+ document = xmlReadFile(param->xml_fact, "ISO-8859-1",0);
if (document == NULL) {
PERR("Error al leer documento!!");
free(tmp);
/* En el registro no guardo los punteros de nota ni items. Si guardo la cantidad de items
* y los items al final del registro.
*/
- if ((tipo-1) == T3) {
+ if ((param->tipo_arch_fact) == T3) {
/* Limito a 10 items en el caso de registro constante! */
cant_items = 10;
} else {
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));
- /*emufs_agregar_indice(tmp->fp, "emision", IND_EXAHUSTIVO, IND_B, IDX_STRING, STRUCT_OFFSET(factura, emision), 512);*/
+ tmp->fp = emufs_crear("facturas", param->tipo_arch_fact, param->tam_bloque_fact, sizeof(t_Factura)-sizeof(char *)-sizeof(t_Item*)+cant_items*sizeof(t_Item));
+ 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);
+ 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) {
if (strcmp(node->name, "FACTURA") == 0) {
strncpy(fact.cheque, prop = xml_get_prop(node, "NroCheque"), 18); xmlFree(prop);
fact.cheque[18] = '\0';
- fact.nota = leer_nota(node, (((tipo-1)==T3)?100:-1));
- fact.items = leer_items(node, &fact.cant_items, ((tipo-1)==T3)?10:-1);
+ fact.nota = leer_nota(node, ((param->tipo_arch_nota==T3)?100:-1));
+ fact.items = leer_items(node, &fact.cant_items, (param->tipo_arch_fact==T3)?10:-1);
error = 0;
- id = tmp->fp_texto->grabar_registro(tmp->fp_texto, fact.nota, ((tipo-1)==T3)?100:(strlen(fact.nota)+1), &error);
+ id = tmp->fp_texto->grabar_registro(tmp->fp_texto, fact.nota, (param->tipo_arch_nota==T3)?100:(strlen(fact.nota)+1), &error);
fact.reg_nota = id;
save = procesar_guardar_factura(&fact, lst_facturas, &size);
if (save != NULL) {
k.i_clave = fact->reg_nota;
lst_facturas->fp_texto->borrar_registro(lst_facturas->fp_texto, k);
- free(fact->items);
+ if (fact->items) free(fact->items);
+ if (fact->nota) free(fact->nota);
free(fact);
}
{
WINDOW *win, *items, *nota, *subnota;
t_Form *form, *form_nota;
- t_Reg_Factura *nodo;
t_Factura *fact;
EMUFS_REG_SIZE size;
EMUFS_REG_ID id, id_texto;
char tmp_str[10];
void *entrada;
- /* XXX XXX XXX TODO */
- return;
-
win = newwin(LINES-4, COLS-2, 2, 1);
box(win, 0, 0);
if (s == NULL) {
fact = fact_form_buscar(win, &id, &id_texto);
} else {
- id = atoi(s);
- fact = fact_buscar(lst_facturas, nodo->numero, &id, &id_texto);
+ fact = fact_buscar(lst_facturas, atoi(s), &id, &id_texto);
}
if (fact == NULL) {
entrada = procesar_guardar_factura(fact, lst_facturas, &size);
if (entrada) {
- id = lst_facturas->fp->modificar_registro(lst_facturas->fp, id, entrada, size, &error);
- id_texto = lst_facturas->fp_texto->modificar_registro(lst_facturas->fp_texto, id_texto, fact->nota, strlen(fact->nota)+1, &error);
+ CLAVE k;
+ k = emufs_indice_generar_clave_desde_valor(lst_facturas->fp->indices, (char *)&fact->numero);
+ lst_facturas->fp->modificar_registro(lst_facturas->fp, k, entrada, size, &error);
+ k.i_clave = id_texto;
+ id_texto = lst_facturas->fp_texto->modificar_registro(lst_facturas->fp_texto, k, fact->nota, strlen(fact->nota)+1, &error);
free(entrada);
}
t_Item *its = NULL;
t_Factura fact;
EMUFS_REG_SIZE size;
- EMUFS_REG_ID id, id_texto;
+ EMUFS_REG_ID id_texto;
int y_actual, cant, error;
char *entrada;
if (entrada) {
error = 0;
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;
}
+char *get_estado(char *s)
+{
+ if (strcmp(s, "PN")==0) return "Pago Normal";
+ if (strcmp(s, "CD")==0) return "Credito al dia";
+ if (strcmp(s, "CM")==0) return "Credito en mora";
+ if (strcmp(s, "SF")==0) return "Cheque sin fondos";
+ if (strcmp(s, "PM")==0) return "Pagada con Mora";
+ if (strcmp(s, "NC")==0) return "No Cobrada";
+
+ return s;
+}
+
+char *get_forma_pago(char *s)
+{
+ if (strcmp(s, "CO") == 0) return "Contado";
+ if (strcmp(s, "CR") == 0) return "Credito";
+ if (strcmp(s, "CH") == 0) return "Cheque";
+
+ return s;
+}
+
void fact_consultas_codigos(char *s)
{
EMUFS_REG_ID dummy;
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 */
+ lista_agregar_columna(lista, "Numero", DATO_INT, 0, 8); /* numero */
+ lista_agregar_columna(lista, "Fecha", DATO_STR, 10, 9); /* emision */
+ lista_agregar_columna(lista, "Estado", DATO_STR, 20, 19); /* estado */
+ lista_agregar_columna(lista, "Forma de Pago", DATO_STR, 40, 19); /* fp */
/* Leo los datos desde el archivo */
for(i=desde_codigo; i<=hasta_codigo; i++) {
lista_agregar_fila(lista,
factura->numero,
factura->emision,
- factura->estado,
- factura->fp
+ get_estado(factura->estado),
+ get_forma_pago(factura->fp)
);
}
}
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 */
+ lista_agregar_columna(lista, "Numero", DATO_INT, 0, 8); /* numero */
+ lista_agregar_columna(lista, "Fecha", DATO_STR, 10, 9); /* emision */
+ lista_agregar_columna(lista, "Estado", DATO_STR, 20, 19); /* estado */
+ lista_agregar_columna(lista, "Forma Pago", DATO_STR, 40, 19); /* fp */
/* Leo los datos desde el archivo */
datos = emufs_buscar_registros(fs, nombre_indice, desc, &cant);
lista_agregar_fila(lista,
factura.numero,
factura.emision,
- factura.estado,
- factura.fp
+ get_estado(factura.estado),
+ get_forma_pago(factura.fp)
);
free(tmp);
} else {