]> Dogcows Code - chaz/homebank/blobdiff - src/rep-vehicle.c
import homebank-5.2.4
[chaz/homebank] / src / rep-vehicle.c
diff --git a/src/rep-vehicle.c b/src/rep-vehicle.c
new file mode 100644 (file)
index 0000000..e14981c
--- /dev/null
@@ -0,0 +1,1164 @@
+/*  HomeBank -- Free, easy, personal accounting for everyone.
+ *  Copyright (C) 1995-2019 Maxime DOYEN
+ *
+ *  This file is part of HomeBank.
+ *
+ *  HomeBank is free software; you can redistribute it and/or modify
+ *  it under the terms of the GNU General Public License as published by
+ *  the Free Software Foundation; either version 2 of the License, or
+ *  (at your option) any later version.
+ *
+ *  HomeBank is distributed in the hope that it will be useful,
+ *  but WITHOUT ANY WARRANTY; without even the implied warranty of
+ *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ *  GNU General Public License for more details.
+ *
+ *  You should have received a copy of the GNU General Public License
+ *  along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+
+#include "homebank.h"
+
+#include "rep-vehicle.h"
+
+#include "list-operation.h"
+#include "gtk-chart.h"
+#include "gtk-dateentry.h"
+
+#include "dsp-mainwindow.h"
+#include "ui-category.h"
+
+
+/****************************************************************************/
+/* Debug macros                                                             */
+/****************************************************************************/
+#define MYDEBUG 0
+
+#if MYDEBUG
+#define DB(x) (x);
+#else
+#define DB(x);
+#endif
+
+/* our global datas */
+extern struct HomeBank *GLOBALS;
+extern struct Preferences *PREFS;
+
+
+/* prototypes */
+static void repvehicle_action_refresh(GtkAction *action, gpointer user_data);
+static void repvehicle_action_export(GtkAction *action, gpointer user_data);
+
+static void repvehicle_export_csv(GtkWidget *widget, gpointer user_data);
+static void repvehicle_date_change(GtkWidget *widget, gpointer user_data);
+static void repvehicle_range_change(GtkWidget *widget, gpointer user_data);
+static void repvehicle_compute(GtkWidget *widget, gpointer user_data);
+static void repvehicle_update(GtkWidget *widget, gpointer user_data);
+static void repvehicle_toggle_minor(GtkWidget *widget, gpointer user_data);
+static void repvehicle_setup(struct repvehicle_data *data);
+static gboolean repvehicle_window_dispose(GtkWidget *widget, GdkEvent *event, gpointer user_data);
+static GtkWidget *create_list_repvehicle(void);
+
+
+static GtkActionEntry entries[] = {
+  { "Refresh" , ICONNAME_HB_REFRESH   , N_("Refresh"), NULL,   N_("Refresh results"), G_CALLBACK (repvehicle_action_refresh) },
+
+  { "Export" , ICONNAME_HB_FILE_EXPORT, N_("Export")  , NULL,   N_("Export as CSV"), G_CALLBACK (repvehicle_action_export) },
+};
+static guint n_entries = G_N_ELEMENTS (entries);
+
+static const gchar *ui_info =
+"<ui>"
+"  <toolbar name='ToolBar'>"
+"    <toolitem action='Refresh'/>"
+"      <separator/>"
+"    <toolitem action='Export'/>"
+"  </toolbar>"
+"</ui>";
+
+static void repvehicle_date_change(GtkWidget *widget, gpointer user_data)
+{
+struct repvehicle_data *data;
+
+       DB( g_print("(repvehicle) date change\n") );
+
+       data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
+
+       data->filter->mindate = gtk_date_entry_get_date(GTK_DATE_ENTRY(data->PO_mindate));
+       data->filter->maxdate = gtk_date_entry_get_date(GTK_DATE_ENTRY(data->PO_maxdate));
+
+       // set min/max date for both widget
+       gtk_date_entry_set_maxdate(GTK_DATE_ENTRY(data->PO_mindate), data->filter->maxdate);
+       gtk_date_entry_set_mindate(GTK_DATE_ENTRY(data->PO_maxdate), data->filter->mindate);
+
+       g_signal_handler_block(data->CY_range, data->handler_id[HID_REPVEHICLE_RANGE]);
+       gtk_combo_box_set_active(GTK_COMBO_BOX(data->CY_range), 11);
+       g_signal_handler_unblock(data->CY_range, data->handler_id[HID_REPVEHICLE_RANGE]);
+
+
+       repvehicle_compute(widget, NULL);
+
+}
+
+
+static void repvehicle_action_refresh(GtkAction *action, gpointer user_data)
+{
+struct repvehicle_data *data = user_data;
+
+       repvehicle_compute(data->window, NULL);
+}
+
+static void repvehicle_action_export(GtkAction *action, gpointer user_data)
+{
+struct repvehicle_data *data = user_data;
+
+       repvehicle_export_csv(data->window, NULL);
+}
+
+
+
+static void repvehicle_range_change(GtkWidget *widget, gpointer user_data)
+{
+struct repvehicle_data *data;
+gint range;
+
+       DB( g_print("(repvehicle) range change\n") );
+
+       data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
+
+       range = gtk_combo_box_get_active(GTK_COMBO_BOX(data->CY_range));
+
+       if(range != 11)
+       {
+               filter_preset_daterange_set(data->filter, range, 0);
+
+               g_signal_handler_block(data->PO_mindate, data->handler_id[HID_REPVEHICLE_MINDATE]);
+               g_signal_handler_block(data->PO_maxdate, data->handler_id[HID_REPVEHICLE_MAXDATE]);
+
+               gtk_date_entry_set_date(GTK_DATE_ENTRY(data->PO_mindate), data->filter->mindate);
+               gtk_date_entry_set_date(GTK_DATE_ENTRY(data->PO_maxdate), data->filter->maxdate);
+               
+               g_signal_handler_unblock(data->PO_mindate, data->handler_id[HID_REPVEHICLE_MINDATE]);
+               g_signal_handler_unblock(data->PO_maxdate, data->handler_id[HID_REPVEHICLE_MAXDATE]);
+
+               repvehicle_compute(widget, NULL);
+       }
+}
+
+static gint repvehicle_transaction_compare_func(CarCost *a, CarCost *b)
+{
+gint retval;
+
+       //retval = (gint)(a->ope->date - b->ope->date);
+       //if( retval == 0 )
+               retval = a->meter - b->meter;
+
+       return retval;
+}
+
+
+//#1277622
+static CarCost *repvehicle_eval_memofield(CarCost *item, gchar *text)
+{
+gchar *d, *v1, *v2;
+gint len;
+
+       if( text != NULL)
+       {
+               len = strlen(text);
+               d = g_strstr_len(text, len, "d=");
+               v1 = g_strstr_len(text, len, "v=");
+               v2 = g_strstr_len(text, len, "v~");
+               if(d && (v1 || v2))
+               {
+                       item->meter     = atol(d+2);
+                       if(v1)
+                       {
+                               item->fuel      = g_strtod(v1+2, NULL);
+                               item->partial = FALSE;
+                       }
+                       else
+                       {
+                               item->fuel      = g_strtod(v2+2, NULL);
+                               item->partial = TRUE;
+                       }
+               }
+       }
+       
+       return item;
+}
+
+
+static void repvehicle_export_csv(GtkWidget *widget, gpointer user_data)
+{
+struct repvehicle_data *data;
+GtkTreeModel *model;
+GtkTreeIter    iter;
+gboolean valid;
+gchar *filename = NULL;
+GIOChannel *io;
+gchar *outstr, *name;
+
+       DB( g_print("\n[repvehicle] export csv\n") );
+
+       data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
+
+       name = "hb-vehicle.csv";
+
+       if( ui_file_chooser_csv(GTK_WINDOW(data->window), GTK_FILE_CHOOSER_ACTION_SAVE, &filename, name) == TRUE )
+       {
+               DB( g_print(" + filename is %s\n", filename) );
+
+               io = g_io_channel_new_file(filename, "w", NULL);
+               if(io != NULL)
+               {
+                       // header
+                       outstr = g_strdup_printf("%s;%s;%s;%s;%s;%s;%s;%s\n", 
+                       _("Date"),
+                       _("Meter"),
+                       _("Fuel"),
+                       _("Price"),
+                       _("Amount"),
+                       _("Dist."),
+                       PREFS->vehicle_unit_100,
+                       PREFS->vehicle_unit_distbyvol
+                       );
+                       g_io_channel_write_chars(io, outstr, -1, NULL, NULL);
+
+
+                       model = gtk_tree_view_get_model(GTK_TREE_VIEW(data->LV_report));
+                       valid = gtk_tree_model_get_iter_first(GTK_TREE_MODEL(model), &iter);
+                       while (valid)
+                       {
+                       guint32 julian;
+                       gint meter, dist, distbyvol;
+                       gdouble fuel, price, amount, centkm;
+                       gboolean partial;
+                       gchar datebuf[16];
+
+                               gtk_tree_model_get (model, &iter,
+                                       LST_CAR_DATE    , &julian,
+                                       LST_CAR_METER   , &meter,
+                                       LST_CAR_FUEL    , &fuel,
+                                       LST_CAR_PRICE   , &price,
+                                       LST_CAR_AMOUNT  , &amount,
+                                       LST_CAR_DIST    , &dist,
+                                       LST_CAR_100KM   , &centkm,
+                                   LST_CAR_DISTBYVOL, &distbyvol,
+                                   LST_CAR_PARTIAL, &partial,
+                    -1);
+                               
+                               hb_sprint_date(datebuf, julian);
+
+                               outstr = g_strdup_printf("%s;%d;%.2f;%.2f;%.2f;%d;%.2f;%d;%d\n", 
+                                       datebuf, meter, fuel, price, amount, dist, centkm, distbyvol, partial);
+                               g_io_channel_write_chars(io, outstr, -1, NULL, NULL);
+
+                               DB( g_print("%s", outstr) );
+
+                               g_free(outstr);
+
+                               valid = gtk_tree_model_iter_next(GTK_TREE_MODEL(model), &iter);
+                       }
+
+                       g_io_channel_unref (io);
+               }
+
+               g_free( filename );
+       }
+}
+
+
+static void repvehicle_compute(GtkWidget *widget, gpointer user_data)
+{
+struct repvehicle_data *data;
+GList *list;
+guint32 catkey;
+
+       DB( g_print("(repvehicle) compute\n") );
+
+       data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
+
+       // clear the glist
+       da_vehiclecost_destroy(data->vehicle_list);
+       data->vehicle_list = NULL;
+
+       // get the category key
+       catkey = ui_cat_comboboxentry_get_key(GTK_COMBO_BOX(data->PO_cat));
+       
+       /* do nothing if cat is 0 */
+       if( catkey == 0 )
+               goto end1;
+
+       DB( g_print(" -> active cat is %d\n", catkey) );
+
+       g_queue_free (data->txn_queue);
+       data->txn_queue = hbfile_transaction_get_partial(data->filter->mindate, data->filter->maxdate);
+
+       // collect transactions
+       // the purpose here is to collect all cat transaction
+       // and precompute some datas
+       list = g_queue_peek_head_link(data->txn_queue);
+       while (list != NULL)
+       {
+       Transaction *ope = list->data;
+       Category *cat;
+       CarCost *item;
+
+               // eval normal transaction
+               if(!(ope->flags & OF_SPLIT))
+               {
+                       cat = da_cat_get(ope->kcat);
+                       if( cat && (cat->key == catkey || cat->parent == catkey) )
+                       {
+                               item = da_vehiclecost_malloc();
+                               item->date = ope->date;
+                               item->memo = ope->memo;
+                               // get amount in base currency
+                               //item->amount = ope->amount;
+                               item->amount = hb_amount_base(ope->amount, ope->kcur);
+
+                               item = repvehicle_eval_memofield(item, ope->memo);
+                               data->vehicle_list = g_list_append(data->vehicle_list, item);
+                               DB( g_print(" -> store acc=%d '%s' %.2f\n", ope->kacc, ope->memo, ope->amount) );
+                       }
+               }
+               // eval split transaction
+               else
+               {
+               guint i, nbsplit = da_splits_length(ope->splits);
+               Split *split;
+
+                       DB( g_print(" -> nb split %d\n", nbsplit) );
+                       
+                       for(i=0;i<nbsplit;i++)
+                       {
+                               split = da_splits_get(ope->splits, i);
+                               cat = da_cat_get(split->kcat);
+
+                               DB( g_print(" -> eval split '%s'\n", split->memo) );
+                               
+                               if( cat && (cat->key == catkey || cat->parent == catkey) )
+                               {
+                                       item = da_vehiclecost_malloc();
+                                       item->date = ope->date;
+                                       item->memo = split->memo;
+                                       // get amount in base currency
+                                       //item->amount = split->amount;
+                                       item->amount = hb_amount_base(split->amount, ope->kcur);
+
+                                       item = repvehicle_eval_memofield(item, split->memo);
+                                       data->vehicle_list = g_list_append(data->vehicle_list, item);
+                                       DB( g_print(" -> store split part acc=%d '%s' %.2f\n", ope->kacc, split->memo, split->amount) );
+                               }
+                       }
+               }
+
+               list = g_list_next(list);
+       }
+
+       // sort by meter #399170
+       data->vehicle_list = g_list_sort(data->vehicle_list, (GCompareFunc)repvehicle_transaction_compare_func);
+
+end1:
+       repvehicle_update(widget, NULL);
+}
+
+
+static void repvehicle_update(GtkWidget *widget, gpointer user_data)
+{
+struct repvehicle_data *data;
+GtkTreeModel *model;
+GtkTreeIter  iter;
+GList *list;
+gchar *buf;
+gint nb_refuel = 0;
+guint lastmeter = 0;
+
+       DB( g_print("(repvehicle) update\n") );
+
+       data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
+
+       // clear and detach our model
+       model = gtk_tree_view_get_model(GTK_TREE_VIEW(data->LV_report));
+       gtk_list_store_clear (GTK_LIST_STORE(model));
+       g_object_ref(model);
+       gtk_tree_view_set_model(GTK_TREE_VIEW(data->LV_report), NULL);
+
+       data->total_misccost = 0;
+       data->total_fuelcost = 0;
+       data->total_fuel         = 0;
+       data->total_dist         = 0;
+
+       gdouble partial_fuel = 0;
+       guint   partial_dist = 0;
+
+
+       list = g_list_first(data->vehicle_list);
+       while (list != NULL)
+       {
+       CarCost *item = list->data;
+       gint dist;
+       gdouble centkm;
+       guint distbyvol;
+       gdouble trn_amount;
+
+               if( (item->date >= data->filter->mindate) && (item->date <= data->filter->maxdate) )
+               {
+                       trn_amount = item->amount;
+
+                       if( item->meter == 0 )
+                       {
+                               data->total_misccost += trn_amount;
+                       }
+                       else
+                       {
+                               if(nb_refuel > 0 )
+                               {
+                                       //previtem = g_list_nth_data(data->vehicle_list, nb_refuel-1);
+                                       //if(previtem != NULL) previtem->dist = item->meter - previtem->meter;
+                                       //DB( g_print(" + previous item dist = %d\n", item->meter - previtem->meter) );
+                                       item->dist = item->meter - lastmeter;
+
+                                       //DB( g_print(" + last meter = %d\n", lastmeter) );
+
+                               }
+
+                               lastmeter = item->meter;
+                               nb_refuel++;
+
+                               DB( g_print(" eval : d=%d v=%4.2f $%8.2f dist=%d\n", item->meter, item->fuel, trn_amount, item->dist) );
+
+                               //bugfix #159066
+                               if(item->partial == FALSE)
+                               {
+                                       // full refuel after partial
+                                       if(partial_fuel && partial_dist)
+                                       {
+                                               DB( g_print(" + full refuel after partial\n") );
+                                               partial_fuel += item->fuel;
+                                               partial_dist += item->dist;
+                                               dist = item->dist;
+                                               centkm = partial_dist != 0 ? partial_fuel * 100 / partial_dist : 0;
+                                       }
+                                       else
+                                       {
+                                               DB( g_print(" + real full refuel\n") );
+                                               dist = item->dist;
+                                               centkm = item->dist != 0 ? item->fuel * 100 / item->dist : 0;
+                                       }
+                                       partial_fuel = 0;
+                                       partial_dist = 0;
+                               }
+                               // partial refuel
+                               else
+                               {
+                                       DB( g_print(" + partial refuel\n") );
+                                       partial_fuel += item->fuel;
+                                       partial_dist += item->dist;
+                                       dist = item->dist;
+                                       centkm = 0;
+                               }
+
+                               distbyvol = 0;
+                               if(centkm != 0)
+                                       distbyvol = hb_amount_round((1/centkm)*100, 0);
+
+                               DB( g_print(" + pf=%.2f pd=%d :: dbv=%d\n", partial_fuel, partial_dist, distbyvol) );
+
+
+
+                       gtk_list_store_append (GTK_LIST_STORE(model), &iter);
+
+                               gtk_list_store_set (GTK_LIST_STORE(model), &iter,
+                                       LST_CAR_DATE    , item->date,
+                                       LST_CAR_MEMO    , item->memo,
+                                       LST_CAR_METER   , item->meter,
+                                       LST_CAR_FUEL    , item->fuel,
+                                       LST_CAR_PRICE   , ABS(trn_amount) / item->fuel,
+                                       LST_CAR_AMOUNT  , trn_amount,
+                                       LST_CAR_DIST    , dist,
+                                       LST_CAR_100KM   , centkm,
+                                   LST_CAR_DISTBYVOL, distbyvol,
+                                   LST_CAR_PARTIAL, item->partial,
+                                       -1);
+
+                               DB( g_print(" + insert d=%d v=%4.2f $%8.2f %d %5.2f\n", item->meter, item->fuel, trn_amount, dist, centkm) );
+
+                               if(item->dist)
+                               {
+                                       data->total_fuelcost += trn_amount;
+                                       data->total_fuel     += item->fuel;
+                                       data->total_dist     += item->dist;
+                               }
+
+
+                       }
+               }
+               list = g_list_next(list);
+       }
+
+       gtk_tree_view_set_model(GTK_TREE_VIEW(data->LV_report), model);
+       g_object_unref(model);
+
+
+       gdouble coef = data->total_dist ? 100 / (gdouble)data->total_dist : 0;
+
+       GLOBALS->minor = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(data->CM_minor));
+
+
+               DB( g_print(" coef = 100 / %.2f = %.2f\n", (gdouble)data->total_dist, coef) );
+
+               // row 1 is for 100km
+               /*
+               gtk_label_set_text(GTK_LABEL(data->LA_total[1][1]), "1:1");     //Consumption
+               gtk_label_set_text(GTK_LABEL(data->LA_total[2][1]), "2:1");     //Fuel cost
+               gtk_label_set_text(GTK_LABEL(data->LA_total[3][1]), "3:1");     //Other cost
+               gtk_label_set_text(GTK_LABEL(data->LA_total[4][1]), "4:1");     //Total cost
+               */
+
+               // 100km fuel
+               buf = g_strdup_printf(PREFS->vehicle_unit_vol, data->total_fuel * coef);
+               gtk_label_set_text(GTK_LABEL(data->LA_avera[CAR_RES_FUEL]), buf);
+               g_free(buf);
+
+               // 100km fuelcost
+               //hb_label_set_colvaluecurr(GTK_LABEL(data->LA_avera[CAR_RES_FUELCOST]), data->total_fuelcost * coef, GLOBALS->kcur);
+               hb_label_set_colvalue(GTK_LABEL(data->LA_avera[CAR_RES_FUELCOST]), data->total_fuelcost * coef, GLOBALS->kcur, GLOBALS->minor);
+
+               // 100km other cost
+               //hb_label_set_colvaluecurr(GTK_LABEL(data->LA_avera[CAR_RES_OTHERCOST]), data->total_misccost * coef, GLOBALS->kcur);
+               hb_label_set_colvalue(GTK_LABEL(data->LA_avera[CAR_RES_OTHERCOST]), data->total_misccost * coef, GLOBALS->kcur, GLOBALS->minor);
+
+               // 100km cost
+               //hb_label_set_colvaluecurr(GTK_LABEL(data->LA_avera[CAR_RES_TOTALCOST]), (data->total_fuelcost + data->total_misccost) * coef, GLOBALS->kcur);
+               hb_label_set_colvalue(GTK_LABEL(data->LA_avera[CAR_RES_TOTALCOST]), (data->total_fuelcost + data->total_misccost) * coef, GLOBALS->kcur, GLOBALS->minor);
+
+
+               // row 2 is for total
+               /*
+               gtk_label_set_text(GTK_LABEL(data->LA_total[1][2]), "1:2");     //Consumption
+               gtk_label_set_text(GTK_LABEL(data->LA_total[2][2]), "2:2");     //Fuel cost
+               gtk_label_set_text(GTK_LABEL(data->LA_total[3][2]), "3:2");     //Other cost
+               gtk_label_set_text(GTK_LABEL(data->LA_total[4][2]), "4:2");     //Total
+               */
+
+               // total distance
+               buf = g_strdup_printf(PREFS->vehicle_unit_dist, data->total_dist);
+               gtk_label_set_text(GTK_LABEL(data->LA_total[CAR_RES_METER]), buf);
+               g_free(buf);
+
+               // total fuel
+               buf = g_strdup_printf(PREFS->vehicle_unit_vol, data->total_fuel);
+               gtk_label_set_text(GTK_LABEL(data->LA_total[CAR_RES_FUEL]), buf);
+               g_free(buf);
+
+               // total fuelcost
+               //hb_label_set_colvaluecurr(GTK_LABEL(data->LA_total[CAR_RES_FUELCOST]), data->total_fuelcost, GLOBALS->kcur);
+               hb_label_set_colvalue(GTK_LABEL(data->LA_total[CAR_RES_FUELCOST]), data->total_fuelcost, GLOBALS->kcur, GLOBALS->minor);
+
+               // total other cost
+               //hb_label_set_colvaluecurr(GTK_LABEL(data->LA_total[CAR_RES_OTHERCOST]), data->total_misccost, GLOBALS->kcur);
+               hb_label_set_colvalue(GTK_LABEL(data->LA_total[CAR_RES_OTHERCOST]), data->total_misccost, GLOBALS->kcur, GLOBALS->minor);
+
+               // total cost
+               //hb_label_set_colvaluecurr(GTK_LABEL(data->LA_total[CAR_RES_TOTALCOST]), data->total_fuelcost + data->total_misccost, GLOBALS->kcur);
+               hb_label_set_colvalue(GTK_LABEL(data->LA_total[CAR_RES_TOTALCOST]), data->total_fuelcost + data->total_misccost, GLOBALS->kcur, GLOBALS->minor);
+
+
+}
+
+static void repvehicle_toggle_minor(GtkWidget *widget, gpointer user_data)
+{
+struct repvehicle_data *data;
+
+       DB( g_print("(repvehicle) toggle\n") );
+
+       data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
+
+       repvehicle_update(widget, NULL);
+       gtk_tree_view_columns_autosize (GTK_TREE_VIEW(data->LV_report));
+
+
+       /*
+       statistic_update_total(widget,NULL);
+
+       //hbfile_update(data->LV_acc, (gpointer)4);
+       gtk_tree_view_columns_autosize (GTK_TREE_VIEW(data->LV_report));
+
+       minor = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(data->CM_minor));
+       gtk_chart_show_minor(GTK_CHART(data->RE_bar), minor);
+       gtk_chart_show_minor(GTK_CHART(data->RE_pie), minor);
+       */
+
+}
+
+/*
+**
+*/
+static void repvehicle_setup(struct repvehicle_data *data)
+{
+       DB( g_print("(repvehicle) setup\n") );
+
+       data->txn_queue = g_queue_new ();
+       data->vehicle_list = NULL;
+
+       data->filter = da_flt_malloc();
+       filter_reset(data->filter);
+
+       /* 3.4 : make int transfer out of stats */
+       data->filter->option[FILTER_PAYMODE] = 1;
+       data->filter->paymode[PAYMODE_INTXFER] = FALSE;
+
+       filter_preset_daterange_set(data->filter, PREFS->date_range_rep, 0);
+       
+       g_signal_handler_block(data->PO_mindate, data->handler_id[HID_REPVEHICLE_MINDATE]);
+       g_signal_handler_block(data->PO_maxdate, data->handler_id[HID_REPVEHICLE_MAXDATE]);
+
+       gtk_date_entry_set_date(GTK_DATE_ENTRY(data->PO_mindate), data->filter->mindate);
+       gtk_date_entry_set_date(GTK_DATE_ENTRY(data->PO_maxdate), data->filter->maxdate);
+
+       g_signal_handler_unblock(data->PO_mindate, data->handler_id[HID_REPVEHICLE_MINDATE]);
+       g_signal_handler_unblock(data->PO_maxdate, data->handler_id[HID_REPVEHICLE_MAXDATE]);
+
+
+       ui_cat_comboboxentry_populate(GTK_COMBO_BOX(data->PO_cat), GLOBALS->h_cat);
+
+       g_signal_handler_block(data->PO_cat, data->handler_id[HID_REPVEHICLE_VEHICLE]);
+       ui_cat_comboboxentry_set_active(GTK_COMBO_BOX(data->PO_cat), GLOBALS->vehicle_category);
+       g_signal_handler_unblock(data->PO_cat, data->handler_id[HID_REPVEHICLE_VEHICLE]);
+
+
+
+}
+
+
+/*
+**
+*/
+static gboolean repvehicle_window_dispose(GtkWidget *widget, GdkEvent *event, gpointer user_data)
+{
+struct repvehicle_data *data = user_data;
+struct WinGeometry *wg;
+
+       DB( g_print("(repvehicle) dispose\n") );
+
+       g_queue_free (data->txn_queue);
+       
+       da_vehiclecost_destroy(data->vehicle_list);
+
+       da_flt_free(data->filter);
+       
+       g_free(data);
+
+       //store position and size
+       wg = &PREFS->cst_wg;
+       gtk_window_get_position(GTK_WINDOW(widget), &wg->l, &wg->t);
+       gtk_window_get_size(GTK_WINDOW(widget), &wg->w, &wg->h);
+
+       DB( g_print(" window: l=%d, t=%d, w=%d, h=%d\n", wg->l, wg->t, wg->w, wg->h) );
+
+       //enable define windows
+       GLOBALS->define_off--;
+       ui_mainwindow_update(GLOBALS->mainwindow, GINT_TO_POINTER(UF_SENSITIVE));
+
+       return FALSE;
+}
+
+
+// the window creation
+GtkWidget *repcost_window_new(void)
+{
+struct repvehicle_data *data;
+struct WinGeometry *wg;
+GtkWidget *window, *mainvbox, *hbox, *vbox, *treeview;
+GtkWidget *label, *widget, *table;
+gint row, col;
+GtkUIManager *ui;
+GtkActionGroup *actions;
+//GtkAction *action;
+GError *error = NULL;
+
+       data = g_malloc0(sizeof(struct repvehicle_data));
+       if(!data) return NULL;
+
+       DB( g_print("(repvehicle) new\n") );
+
+       //disable define windows
+       GLOBALS->define_off++;
+       ui_mainwindow_update(GLOBALS->mainwindow, GINT_TO_POINTER(UF_SENSITIVE));
+
+    /* create window, etc */
+    window = gtk_window_new (GTK_WINDOW_TOPLEVEL);
+       data->window = window;
+
+       //store our window private data
+       g_object_set_data(G_OBJECT(window), "inst_data", (gpointer)data);
+       DB( g_print(" - new window=%p, inst_data=%p\n", window, data) );
+
+       gtk_window_set_title (GTK_WINDOW (window), _("Vehicle cost report"));
+
+       //set the window icon
+       gtk_window_set_icon_name(GTK_WINDOW (window), ICONNAME_HB_REP_CAR);
+
+
+
+       //window contents
+       mainvbox = gtk_box_new (GTK_ORIENTATION_VERTICAL, 0);
+       gtk_container_add (GTK_CONTAINER (window), mainvbox);
+
+       hbox = gtk_box_new(GTK_ORIENTATION_HORIZONTAL, 0);
+    gtk_box_pack_start (GTK_BOX (mainvbox), hbox, TRUE, TRUE, 0);
+
+       //control part
+       table = gtk_grid_new ();
+       gtk_widget_set_hexpand (GTK_WIDGET(table), FALSE);
+    gtk_box_pack_start (GTK_BOX (hbox), table, FALSE, FALSE, 0);
+
+       gtk_container_set_border_width (GTK_CONTAINER (table), SPACING_SMALL);
+       gtk_grid_set_row_spacing (GTK_GRID (table), SPACING_SMALL);
+       gtk_grid_set_column_spacing (GTK_GRID (table), SPACING_MEDIUM);
+
+       row = 0;
+       label = make_label_group(_("Display"));
+       gtk_grid_attach (GTK_GRID (table), label, 0, row, 3, 1);
+
+       row++;
+       label = make_label_widget(_("Vehi_cle:"));
+       gtk_grid_attach (GTK_GRID (table), label, 1, row, 1, 1);
+
+       widget = ui_cat_comboboxentry_new(label);
+       data->PO_cat = widget;
+       gtk_grid_attach (GTK_GRID (table), widget, 2, row, 1, 1);
+
+       row++;
+       widget = gtk_check_button_new_with_mnemonic (_("Euro _minor"));
+       data->CM_minor = widget;
+       gtk_grid_attach (GTK_GRID (table), widget, 2, row, 1, 1);
+
+       row++;
+       widget = gtk_separator_new(GTK_ORIENTATION_HORIZONTAL);
+       gtk_grid_attach (GTK_GRID (table), widget, 0, row, 3, 1);
+
+       row++;
+       label = make_label_group(_("Date filter"));
+       gtk_grid_attach (GTK_GRID (table), label, 0, row, 3, 1);
+
+       row++;
+       label = make_label_widget(_("_Range:"));
+       gtk_grid_attach (GTK_GRID (table), label, 1, row, 1, 1);
+       data->CY_range = make_daterange(label, FALSE);
+       gtk_grid_attach (GTK_GRID (table), data->CY_range, 2, row, 1, 1);
+
+       row++;
+       label = make_label_widget(_("_From:"));
+       gtk_grid_attach (GTK_GRID (table), label, 1, row, 1, 1);
+       data->PO_mindate = gtk_date_entry_new();
+       gtk_grid_attach (GTK_GRID (table), data->PO_mindate, 2, row, 1, 1);
+
+       row++;
+       label = make_label_widget(_("_To:"));
+       gtk_grid_attach (GTK_GRID (table), label, 1, row, 1, 1);
+       data->PO_maxdate = gtk_date_entry_new();
+       gtk_grid_attach (GTK_GRID (table), data->PO_maxdate, 2, row, 1, 1);
+
+
+       //part: info + report
+       vbox = gtk_box_new (GTK_ORIENTATION_VERTICAL, 0);
+    gtk_box_pack_start (GTK_BOX (hbox), vbox, TRUE, TRUE, 0);
+
+       //ui manager
+       actions = gtk_action_group_new ("default");
+
+       //as we use gettext
+       gtk_action_group_set_translation_domain(actions, GETTEXT_PACKAGE);
+
+       // data to action callbacks is set here (data)
+       gtk_action_group_add_actions (actions, entries, n_entries, data);
+
+       /* set which action should have priority in the toolbar */
+       //action = gtk_action_group_get_action(actions, "Refresh");
+       //g_object_set(action, "is_important", TRUE, NULL);
+
+
+       ui = gtk_ui_manager_new ();
+       gtk_ui_manager_insert_action_group (ui, actions, 0);
+       gtk_window_add_accel_group (GTK_WINDOW (window), gtk_ui_manager_get_accel_group (ui));
+
+       if (!gtk_ui_manager_add_ui_from_string (ui, ui_info, -1, &error))
+       {
+               g_message ("building UI failed: %s", error->message);
+               g_error_free (error);
+       }
+
+       data->ui = ui;
+       data->actions = actions;
+
+       //toolbar
+       data->TB_bar = gtk_ui_manager_get_widget (ui, "/ToolBar");
+       gtk_box_pack_start (GTK_BOX (vbox), data->TB_bar, FALSE, FALSE, 0);
+
+
+       // total
+       table = gtk_grid_new ();
+       gtk_widget_set_hexpand (GTK_WIDGET(table), FALSE);
+    gtk_box_pack_start (GTK_BOX (vbox), table, FALSE, FALSE, 0);
+
+       gtk_container_set_border_width (GTK_CONTAINER (table), SPACING_SMALL);
+       gtk_grid_set_row_spacing (GTK_GRID (table), SPACING_SMALL);
+       gtk_grid_set_column_spacing (GTK_GRID (table), SPACING_MEDIUM);
+
+       row = 0; col = 1;
+
+       label = make_label_widget(_("Meter:"));
+       gtk_grid_attach (GTK_GRID (table), label, col, row, 1, 1);
+
+       col++;
+       label = make_label_widget(_("Consumption:"));
+       gtk_grid_attach (GTK_GRID (table), label, col, row, 1, 1);
+
+       col++;
+       label = make_label_widget(_("Fuel cost:"));
+       gtk_grid_attach (GTK_GRID (table), label, col, row, 1, 1);
+
+       col++;
+       label = make_label_widget(_("Other cost:"));
+       gtk_grid_attach (GTK_GRID (table), label, col, row, 1, 1);
+
+       col++;
+       label = make_label_widget(_("Total cost:"));
+       gtk_grid_attach (GTK_GRID (table), label, col, row, 1, 1);
+
+       row++;
+       col = 0;
+       label = make_label_widget(PREFS->vehicle_unit_100);
+       gtk_grid_attach (GTK_GRID (table), label, col, row, 1, 1);
+
+       for(col = 1;col<MAX_CAR_RES;col++)
+       {
+               label = make_label(NULL, 1.0, 0.5);
+               gtk_grid_attach (GTK_GRID (table), label, col, row, 1, 1);
+               data->LA_avera[col] = label;
+       }
+
+       row++;
+       col = 0;
+       label = make_label_widget(_("Total"));
+       gtk_grid_attach (GTK_GRID (table), label, col, row, 1, 1);
+
+       for(col = 1;col<MAX_CAR_RES;col++)
+       {
+               label = make_label(NULL, 1.0, 0.5);
+               gtk_grid_attach (GTK_GRID (table), label, col, row, 1, 1);
+               data->LA_total[col] = label;
+       }
+       
+
+       //detail
+       widget = gtk_scrolled_window_new (NULL, NULL);
+       gtk_scrolled_window_set_shadow_type (GTK_SCROLLED_WINDOW (widget), GTK_SHADOW_ETCHED_IN);
+       gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (widget), GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC);
+
+       treeview = create_list_repvehicle();
+       data->LV_report = treeview;
+       gtk_container_add (GTK_CONTAINER(widget), treeview);
+    gtk_box_pack_start (GTK_BOX (vbox), widget, TRUE, TRUE, 0);
+
+
+       //todo:should move this
+       gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(data->CM_minor),GLOBALS->minor);
+
+
+
+       /* attach our minor to treeview */
+       g_object_set_data(G_OBJECT(gtk_tree_view_get_model(GTK_TREE_VIEW(data->LV_report))), "minor", (gpointer)data->CM_minor);
+
+
+
+       /* signal connect */
+    g_signal_connect (window, "delete-event", G_CALLBACK (repvehicle_window_dispose), (gpointer)data);
+
+       g_signal_connect (data->CM_minor, "toggled", G_CALLBACK (repvehicle_toggle_minor), NULL);
+
+    data->handler_id[HID_REPVEHICLE_MINDATE] = g_signal_connect (data->PO_mindate, "changed", G_CALLBACK (repvehicle_date_change), (gpointer)data);
+    data->handler_id[HID_REPVEHICLE_MAXDATE] = g_signal_connect (data->PO_maxdate, "changed", G_CALLBACK (repvehicle_date_change), (gpointer)data);
+
+       data->handler_id[HID_REPVEHICLE_RANGE] = g_signal_connect (data->CY_range, "changed", G_CALLBACK (repvehicle_range_change), NULL);
+
+       data->handler_id[HID_REPVEHICLE_VEHICLE] = g_signal_connect (data->PO_cat, "changed", G_CALLBACK (repvehicle_compute), NULL);
+
+
+       //setup, init and show window
+       repvehicle_setup(data);
+
+       /* toolbar */
+       /*
+       if(PREFS->toolbar_style == 0)
+               gtk_toolbar_unset_style(GTK_TOOLBAR(data->TB_bar));
+       else
+               gtk_toolbar_set_style(GTK_TOOLBAR(data->TB_bar), PREFS->toolbar_style-1);
+       */
+
+       //setup, init and show window
+       wg = &PREFS->cst_wg;
+       gtk_window_move(GTK_WINDOW(window), wg->l, wg->t);
+       gtk_window_resize(GTK_WINDOW(window), wg->w, wg->h);
+
+       gtk_widget_show_all (window);
+
+       //minor ?
+       if( PREFS->euro_active )
+               gtk_widget_show(data->CM_minor);
+       else
+               gtk_widget_hide(data->CM_minor);
+
+
+
+       if( PREFS->date_range_rep )
+               gtk_combo_box_set_active(GTK_COMBO_BOX(data->CY_range), PREFS->date_range_rep);
+       else
+               repvehicle_compute(window, NULL);
+
+       return(window);
+}
+
+/*
+** ============================================================================
+*/
+
+static void repvehicle_date_cell_data_function (GtkTreeViewColumn *col, GtkCellRenderer *renderer, GtkTreeModel *model, GtkTreeIter *iter, gpointer user_data)
+{
+GDate *date;
+guint32 julian;
+gchar buf[256];
+
+       gtk_tree_model_get(model, iter,
+               LST_CAR_DATE, &julian,
+               -1);
+
+       date = g_date_new_julian (julian);
+       g_date_strftime (buf, 256-1, PREFS->date_format, date);
+       g_date_free(date);
+
+       g_object_set(renderer, "text", buf, NULL);
+}
+
+static void repvehicle_distance_cell_data_function (GtkTreeViewColumn *col, GtkCellRenderer *renderer, GtkTreeModel *model, GtkTreeIter *iter, gpointer user_data)
+{
+guint distance;
+gchar *text;
+
+       gtk_tree_model_get(model, iter, user_data, &distance, -1);
+
+       if(distance != 0)
+       {
+               text = g_strdup_printf(PREFS->vehicle_unit_dist, distance);
+               g_object_set(renderer, "text", text, NULL);
+               g_free(text);
+       }
+       else
+               g_object_set(renderer, "text", "-", NULL);
+}
+
+static void repvehicle_volume_cell_data_function (GtkTreeViewColumn *col, GtkCellRenderer *renderer, GtkTreeModel *model, GtkTreeIter *iter, gpointer user_data)
+{
+gdouble volume;
+gboolean partial;
+gchar *text;
+
+       gtk_tree_model_get(model, iter, user_data, &volume, LST_CAR_PARTIAL, &partial, -1);
+
+       if(volume != 0)
+       {
+               text = g_strdup_printf(PREFS->vehicle_unit_vol, volume);
+               g_object_set(renderer, 
+                       "text", text,
+                   "style-set", TRUE,
+                       "style", partial ? PANGO_STYLE_ITALIC : PANGO_STYLE_NORMAL,   
+                   NULL);
+
+               g_free(text);
+       }
+       else
+               g_object_set(renderer, "text", "-", NULL);
+}
+
+static void repvehicle_amount_cell_data_function (GtkTreeViewColumn *col,
+                           GtkCellRenderer   *renderer,
+                           GtkTreeModel      *model,
+                           GtkTreeIter       *iter,
+                           gpointer           user_data)
+{
+gdouble  value;
+gchar *color;
+gchar buf[G_ASCII_DTOSTR_BUF_SIZE];
+
+       gtk_tree_model_get(model, iter,
+               user_data, &value,
+               -1);
+
+       if( value )
+       {
+               hb_strfmon(buf, G_ASCII_DTOSTR_BUF_SIZE-1, value, GLOBALS->kcur, GLOBALS->minor);
+
+               color = get_normal_color_amount(value);
+
+               g_object_set(renderer,
+                       "foreground",  color,
+                       "text", buf,
+                       NULL);  }
+       else
+       {
+               g_object_set(renderer, "text", "", NULL);
+       }
+}
+
+static GtkTreeViewColumn *volume_list_repvehicle_column(gchar *name, gint id)
+{
+GtkTreeViewColumn  *column;
+GtkCellRenderer    *renderer;
+
+       column = gtk_tree_view_column_new();
+       gtk_tree_view_column_set_title(column, name);
+       renderer = gtk_cell_renderer_text_new ();
+       g_object_set(renderer, "xalign", 1.0, NULL);
+       gtk_tree_view_column_pack_start(column, renderer, TRUE);
+       gtk_tree_view_column_set_cell_data_func(column, renderer, repvehicle_volume_cell_data_function, GINT_TO_POINTER(id), NULL);
+       gtk_tree_view_column_set_alignment (column, 0.5);
+       //gtk_tree_view_column_set_sort_column_id (column, id);
+       return column;
+}
+
+static GtkTreeViewColumn *distance_list_repvehicle_column(gchar *name, gint id)
+{
+GtkTreeViewColumn  *column;
+GtkCellRenderer    *renderer;
+
+       column = gtk_tree_view_column_new();
+       gtk_tree_view_column_set_title(column, name);
+       renderer = gtk_cell_renderer_text_new ();
+       g_object_set(renderer, "xalign", 1.0, NULL);
+       gtk_tree_view_column_pack_start(column, renderer, TRUE);
+       gtk_tree_view_column_set_cell_data_func(column, renderer, repvehicle_distance_cell_data_function, GINT_TO_POINTER(id), NULL);
+       gtk_tree_view_column_set_alignment (column, 0.5);
+       //gtk_tree_view_column_set_sort_column_id (column, id);
+       return column;
+}
+
+static GtkTreeViewColumn *amount_list_repvehicle_column(gchar *name, gint id)
+{
+GtkTreeViewColumn  *column;
+GtkCellRenderer    *renderer;
+
+       column = gtk_tree_view_column_new();
+       gtk_tree_view_column_set_title(column, name);
+       renderer = gtk_cell_renderer_text_new ();
+       g_object_set(renderer, "xalign", 1.0, NULL);
+       gtk_tree_view_column_pack_start(column, renderer, TRUE);
+       gtk_tree_view_column_set_cell_data_func(column, renderer, repvehicle_amount_cell_data_function, GINT_TO_POINTER(id), NULL);
+       gtk_tree_view_column_set_alignment (column, 0.5);
+       //gtk_tree_view_column_set_sort_column_id (column, id);
+       return column;
+}
+
+
+/*
+** create our statistic list
+*/
+static GtkWidget *create_list_repvehicle(void)
+{
+GtkListStore *store;
+GtkWidget *view;
+GtkCellRenderer    *renderer;
+GtkTreeViewColumn  *column;
+
+       /* create list store */
+       store = gtk_list_store_new(
+               NUM_LST_CAR,
+               G_TYPE_UINT,
+               G_TYPE_STRING,
+               G_TYPE_UINT,
+               G_TYPE_DOUBLE,
+               G_TYPE_DOUBLE,
+               G_TYPE_DOUBLE,
+               G_TYPE_UINT,
+               G_TYPE_DOUBLE,
+           G_TYPE_UINT,
+           G_TYPE_BOOLEAN              );
+
+       //treeview
+       view = gtk_tree_view_new_with_model(GTK_TREE_MODEL(store));
+       g_object_unref(store);
+
+       gtk_tree_view_set_grid_lines (GTK_TREE_VIEW (view), PREFS->grid_lines);
+
+       /* column date */
+       column = gtk_tree_view_column_new();
+       gtk_tree_view_column_set_title(column, _("Date"));
+       gtk_tree_view_append_column (GTK_TREE_VIEW(view), column);
+       renderer = gtk_cell_renderer_text_new();
+       g_object_set(renderer, "xalign", 1.0, NULL);
+       gtk_tree_view_column_pack_start(column, renderer, TRUE);
+       //gtk_tree_view_column_add_attribute(column, renderer, "text", LST_CAR_DATE);
+       gtk_tree_view_column_set_alignment (column, 0.5);
+       gtk_tree_view_column_set_cell_data_func(column, renderer, repvehicle_date_cell_data_function, NULL, NULL);
+
+/*
+       LST_CAR_DATE,
+       LST_CAR_MEMO,
+       LST_CAR_METER,
+       LST_CAR_FUEL,
+       LST_CAR_PRICE,
+       LST_CAR_AMOUNT,
+       LST_CAR_DIST,
+       LST_CAR_100KM
+
+*/
+
+       /* column: Memo */
+/*
+       column = gtk_tree_view_column_new();
+       gtk_tree_view_column_set_title(column, _("Memo"));
+       gtk_tree_view_append_column (GTK_TREE_VIEW(view), column);
+       renderer = gtk_cell_renderer_text_new();
+       gtk_tree_view_column_pack_start(column, renderer, TRUE);
+       gtk_tree_view_column_add_attribute(column, renderer, "text", LST_CAR_MEMO);
+       //gtk_tree_view_column_set_cell_data_func(column, renderer, repvehicle_text_cell_data_function, NULL, NULL);
+*/
+
+       /* column: Meter */
+       column = distance_list_repvehicle_column(_("Meter"), LST_CAR_METER);
+       gtk_tree_view_append_column (GTK_TREE_VIEW(view), column);
+
+       /* column: Fuel load */
+       column = volume_list_repvehicle_column(_("Fuel"), LST_CAR_FUEL);
+       gtk_tree_view_append_column (GTK_TREE_VIEW(view), column);
+
+       /* column: Price by unit */
+       column = amount_list_repvehicle_column(_("Price"), LST_CAR_PRICE);
+       gtk_tree_view_append_column (GTK_TREE_VIEW(view), column);
+
+       /* column: Amount */
+       column = amount_list_repvehicle_column(_("Amount"), LST_CAR_AMOUNT);
+       gtk_tree_view_append_column (GTK_TREE_VIEW(view), column);
+
+       /* column: Distance done */
+       column = distance_list_repvehicle_column(_("Dist."), LST_CAR_DIST);
+       gtk_tree_view_append_column (GTK_TREE_VIEW(view), column);
+
+       /* column: consumption for 100Km */
+       column = volume_list_repvehicle_column(PREFS->vehicle_unit_100, LST_CAR_100KM);
+       gtk_tree_view_append_column (GTK_TREE_VIEW(view), column);
+
+       /* column: km by liter (distance by volume */
+       column = distance_list_repvehicle_column(PREFS->vehicle_unit_distbyvol, LST_CAR_DISTBYVOL);
+       gtk_tree_view_append_column (GTK_TREE_VIEW(view), column);
+
+
+  /* column last: empty */
+       column = gtk_tree_view_column_new();
+       gtk_tree_view_append_column (GTK_TREE_VIEW(view), column);
+
+       return(view);
+}
This page took 0.040917 seconds and 4 git commands to generate.