X-Git-Url: https://git.dogcows.com/gitweb?p=chaz%2Fhomebank;a=blobdiff_plain;f=src%2Frep_stats.c;fp=src%2Frep_stats.c;h=0000000000000000000000000000000000000000;hp=a9d85fa097ab8b990f4e4f84a3f43bfe4317b2ed;hb=a6c6b0df5492c2160ed97e3a376bdb2fe7c5ebc4;hpb=cd13d9691c46c2b2d6d459e9e6a76bed1c21b7a6 diff --git a/src/rep_stats.c b/src/rep_stats.c deleted file mode 100644 index a9d85fa..0000000 --- a/src/rep_stats.c +++ /dev/null @@ -1,2175 +0,0 @@ -/* HomeBank -- Free, easy, personal accounting for everyone. - * Copyright (C) 1995-2018 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 . - */ - - -#include "homebank.h" - -#include "rep_stats.h" - -#include "list_operation.h" -#include "gtk-chart.h" -#include "gtk-dateentry.h" - -#include "dsp_mainwindow.h" -#include "ui-account.h" -#include "ui-payee.h" -#include "ui-category.h" -#include "ui-filter.h" -#include "ui-transaction.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 ui_repdist_action_viewlist(GtkAction *action, gpointer user_data); -static void ui_repdist_action_viewbar(GtkAction *action, gpointer user_data); -static void ui_repdist_action_viewpie(GtkAction *action, gpointer user_data); -static void ui_repdist_action_detail(GtkAction *action, gpointer user_data); -static void ui_repdist_action_legend(GtkAction *action, gpointer user_data); -static void ui_repdist_action_rate(GtkAction *action, gpointer user_data); -static void ui_repdist_action_filter(GtkAction *action, gpointer user_data); -static void ui_repdist_action_refresh(GtkAction *action, gpointer user_data); - - -static GtkRadioActionEntry radio_entries[] = { - { "List" , ICONNAME_HB_VIEW_LIST , N_("List") , NULL, N_("View results as list"), 0 }, - { "Column" , ICONNAME_HB_VIEW_COLUMN , N_("Column") , NULL, N_("View results as column"), 1 }, - { "Donut" , ICONNAME_HB_VIEW_DONUT , N_("Donut") , NULL, N_("View results as donut"), 2 }, -}; -static guint n_radio_entries = G_N_ELEMENTS (radio_entries); - - -static GtkActionEntry entries[] = { - { "Filter" , ICONNAME_HB_FILTER , N_("Filter") , NULL, N_("Edit filter"), G_CALLBACK (ui_repdist_action_filter) }, - { "Refresh" , ICONNAME_REFRESH , N_("Refresh"), NULL, N_("Refresh results"), G_CALLBACK (ui_repdist_action_refresh) }, - - //{ "Export" , ICONNAME_HB_FILE_EXPORT , N_("Export") , NULL, N_("Export as CSV"), G_CALLBACK (ui_repdist_action_export) }, -}; -static guint n_entries = G_N_ELEMENTS (entries); - - -static GtkToggleActionEntry toggle_entries[] = { - { "Detail", ICONNAME_HB_OPE_SHOW, /* name, icon-name */ - N_("Detail"), NULL, /* label, accelerator */ - N_("Toggle detail"), /* tooltip */ - G_CALLBACK (ui_repdist_action_detail), - FALSE }, /* is_active */ - - { "Legend", ICONNAME_HB_SHOW_LEGEND, /* name, icon-name */ - N_("Legend"), NULL, /* label, accelerator */ - N_("Toggle legend"), /* tooltip */ - G_CALLBACK (ui_repdist_action_legend), - TRUE }, /* is_active */ - - { "Rate", ICONNAME_HB_SHOW_RATE, /* name, icon-name */ - N_("Rate"), NULL, /* label, accelerator */ - N_("Toggle rate"), /* tooltip */ - G_CALLBACK (ui_repdist_action_rate), - FALSE }, /* is_active */ - -}; -static guint n_toggle_entries = G_N_ELEMENTS (toggle_entries); - - - -static const gchar *ui_info = -"" -" " -" " -" " -" " -" " -" " -" " -" " -" " -" " -" " -" " -//" " -// replaced by a menubutton -" " -""; - - - -static void ui_repdist_date_change(GtkWidget *widget, gpointer user_data); -static void ui_repdist_range_change(GtkWidget *widget, gpointer user_data); -static void ui_repdist_detail(GtkWidget *widget, gpointer user_data); -static void ui_repdist_update(GtkWidget *widget, gpointer user_data); -static void ui_repdist_update_total(GtkWidget *widget, gpointer user_data); -static void ui_repdist_compute(GtkWidget *widget, gpointer user_data); -static void ui_repdist_sensitive(GtkWidget *widget, gpointer user_data); -static void ui_repdist_toggle_detail(GtkWidget *widget, gpointer user_data); -static void ui_repdist_toggle_legend(GtkWidget *widget, gpointer user_data); -static void ui_repdist_toggle_minor(GtkWidget *widget, gpointer user_data); -static void ui_repdist_toggle_rate(GtkWidget *widget, gpointer user_data); -static GtkWidget *ui_list_repdist_create(void); -static void ui_repdist_update_daterange(GtkWidget *widget, gpointer user_data); -static void ui_repdist_update_date_widget(GtkWidget *widget, gpointer user_data); - -static GString *ui_list_repdist_to_string(GtkTreeView *treeview, gboolean clipboard); -static gint ui_list_repdist_compare_func (GtkTreeModel *model, GtkTreeIter *a, GtkTreeIter *b, gpointer userdata); - - - -gchar *CYA_STATSELECT[] = { - N_("Category"), - N_("Subcategory"), - N_("Payee"), - N_("Tag"), - N_("Month"), - N_("Year"), - NULL -}; - -gchar *CYA_KIND2[] = { - N_("Exp. & Inc."), - N_("Expense"), - N_("Income"), - N_("Balance"), - NULL -}; - - -//extern gchar *CYA_FLT_SELECT[]; - -gchar *CYA_MONTHS[] = -{ -N_("January"), -N_("February"), -N_("March"), -N_("April"), -N_("May"), -N_("June"), -N_("July"), -N_("August"), -N_("September"), -N_("October"), -N_("November"), -N_("December"), -NULL -}; - -/* action functions -------------------- */ - -static void ui_repdist_action_viewlist(GtkAction *action, gpointer user_data) -{ -struct ui_repdist_data *data = user_data; - - gtk_notebook_set_current_page(GTK_NOTEBOOK(data->GR_result), 0); - ui_repdist_sensitive(data->window, NULL); -} - -static void ui_repdist_action_viewbar(GtkAction *action, gpointer user_data) -{ -struct ui_repdist_data *data = user_data; - - gtk_notebook_set_current_page(GTK_NOTEBOOK(data->GR_result), 1); - gtk_chart_set_type (GTK_CHART(data->RE_chart), CHART_TYPE_COL); - ui_repdist_sensitive(data->window, NULL); -} - -static void ui_repdist_action_viewpie(GtkAction *action, gpointer user_data) -{ -struct ui_repdist_data *data = user_data; -gint tmpview; - - gtk_notebook_set_current_page(GTK_NOTEBOOK(data->GR_result), 1); - - gtk_chart_set_type (GTK_CHART(data->RE_chart), CHART_TYPE_PIE); - ui_repdist_sensitive(data->window, NULL); - - tmpview = gtk_combo_box_get_active(GTK_COMBO_BOX(data->CY_view)); - - // ensure not exp & inc for piechart - if( tmpview == 0 ) - { - //g_signal_handler_block(data->CY_view, data->handler_id[HID_REPDIST_VIEW]); - gtk_combo_box_set_active(GTK_COMBO_BOX(data->CY_view), 1); - //g_signal_handler_unblock(data->CY_view, data->handler_id[HID_REPDIST_VIEW]); - } - -} - - -static void ui_repdist_action_mode (GtkRadioAction *action, GtkRadioAction *current, gpointer user_data) -{ -gint value; - - value = gtk_radio_action_get_current_value(GTK_RADIO_ACTION(action)); - switch( value ) - { - case 0: - ui_repdist_action_viewlist(GTK_ACTION(action), user_data); - break; - case 1: - ui_repdist_action_viewbar(GTK_ACTION(action), user_data); - break; - case 2: - ui_repdist_action_viewpie(GTK_ACTION(action), user_data); - break; - } -} - - -static void ui_repdist_action_detail(GtkAction *action, gpointer user_data) -{ -struct ui_repdist_data *data = user_data; - - ui_repdist_toggle_detail(data->window, NULL); -} - -static void ui_repdist_action_legend(GtkAction *action, gpointer user_data) -{ -struct ui_repdist_data *data = user_data; - - ui_repdist_toggle_legend(data->window, NULL); -} - -static void ui_repdist_action_rate(GtkAction *action, gpointer user_data) -{ -struct ui_repdist_data *data = user_data; - - ui_repdist_toggle_rate(data->window, NULL); -} - -static void ui_repdist_action_filter(GtkAction *action, gpointer user_data) -{ -struct ui_repdist_data *data = user_data; - - //debug - //create_deffilter_window(data->filter, TRUE); - - if(ui_flt_manage_dialog_new(data->window, data->filter, TRUE) != GTK_RESPONSE_REJECT) - { - ui_repdist_compute(data->window, NULL); - ui_repdist_update_date_widget(data->window, NULL); - ui_repdist_update_daterange(data->window, NULL); - - g_signal_handler_block(data->CY_range, data->handler_id[HID_REPDIST_RANGE]); - gtk_combo_box_set_active(GTK_COMBO_BOX(data->CY_range), FLT_RANGE_OTHER); - g_signal_handler_unblock(data->CY_range, data->handler_id[HID_REPDIST_RANGE]); - - } -} - -static void ui_repdist_action_refresh(GtkAction *action, gpointer user_data) -{ -struct ui_repdist_data *data = user_data; - - ui_repdist_compute(data->window, NULL); -} - -/*static void ui_repdist_action_export(GtkAction *action, gpointer user_data) -{ -struct ui_repdist_data *data = user_data; - - ui_repdist_export_csv(data->window, NULL); -}*/ - - - -/* ======================== */ - - - -/* -** ============================================================================ -*/ - - - - -/* -** return the month list position correponding to the passed date -*/ -static gint DateInPer(guint32 from, guint32 opedate) -{ -GDate *date1, *date2; -gint pos; - - //debug - // this return sometimes -1, -2 which is wrong - - date1 = g_date_new_julian(from); - date2 = g_date_new_julian(opedate); - - pos = ((g_date_get_year(date2) - g_date_get_year(date1)) * 12) + g_date_get_month(date2) - g_date_get_month(date1); - - //g_print(" from=%d-%d ope=%d-%d => %d\n", g_date_get_month(date1), g_date_get_year(date1), g_date_get_month(date2), g_date_get_year(date2), pos); - - g_date_free(date2); - g_date_free(date1); - - return(pos); -} - -/* -** return the year list position correponding to the passed date -*/ -static gint DateInYear(guint32 from, guint32 opedate) -{ -GDate *date; -gint year_from, year_ope, pos; - - date = g_date_new_julian(from); - year_from = g_date_get_year(date); - g_date_set_julian(date, opedate); - year_ope = g_date_get_year(date); - g_date_free(date); - - pos = year_ope - year_from; - - //g_print(" from=%d ope=%d => %d\n", year_from, year_ope, pos); - - return(pos); -} - - -static void ui_repdist_date_change(GtkWidget *widget, gpointer user_data) -{ -struct ui_repdist_data *data; - - DB( g_print("\n[repdist] 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_REPDIST_RANGE]); - gtk_combo_box_set_active(GTK_COMBO_BOX(data->CY_range), FLT_RANGE_OTHER); - g_signal_handler_unblock(data->CY_range, data->handler_id[HID_REPDIST_RANGE]); - - ui_repdist_compute(widget, NULL); - ui_repdist_update_daterange(widget, NULL); - -} - - -static void ui_repdist_range_change(GtkWidget *widget, gpointer user_data) -{ -struct ui_repdist_data *data; -gint range; - - DB( g_print("\n[repdist] 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 != FLT_RANGE_OTHER) - { - filter_preset_daterange_set(data->filter, range, 0); - - ui_repdist_update_date_widget(data->window, NULL); - - ui_repdist_compute(data->window, NULL); - ui_repdist_update_daterange(data->window, NULL); - } - else - { - if(ui_flt_manage_dialog_new(data->window, data->filter, TRUE) != GTK_RESPONSE_REJECT) - { - ui_repdist_update_date_widget(data->window, NULL); - ui_repdist_compute(data->window, NULL); - ui_repdist_update_daterange(data->window, NULL); - } - } -} - - - -static gint ui_repdist_result_get_pos(gint tmpfor, guint from, Transaction *ope) -{ -gint pos = 0; - - switch(tmpfor) - { - case BY_REPDIST_CATEGORY: - { - Category *catentry = da_cat_get(ope->kcat); - if(catentry) - pos = (catentry->flags & GF_SUB) ? catentry->parent : catentry->key; - } - break; - case BY_REPDIST_SUBCATEGORY: - pos = ope->kcat; - break; - case BY_REPDIST_PAYEE: - pos = ope->kpay; - break; - case BY_REPDIST_MONTH: - pos = DateInPer(from, ope->date); - break; - case BY_REPDIST_YEAR: - pos = DateInYear(from, ope->date); - break; - } - return pos; -} - - - - -static void ui_repdist_detail(GtkWidget *widget, gpointer user_data) -{ -struct ui_repdist_data *data; -guint active = GPOINTER_TO_INT(user_data); -guint tmpfor; -GList *list; -GtkTreeModel *model; -GtkTreeIter iter; - - data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data"); - - DB( g_print("\n[repdist] detail\n") ); - - /* clear and detach our model */ - model = gtk_tree_view_get_model(GTK_TREE_VIEW(data->LV_detail)); - gtk_list_store_clear (GTK_LIST_STORE(model)); - - if(data->detail) - { - tmpfor = gtk_combo_box_get_active(GTK_COMBO_BOX(data->CY_by)); - - g_object_ref(model); /* Make sure the model stays with us after the tree view unrefs it */ - gtk_tree_view_set_model(GTK_TREE_VIEW(data->LV_detail), NULL); /* Detach model from view */ - - /* fill in the model */ - list = g_queue_peek_head_link(data->txn_queue); - while (list != NULL) - { - Transaction *ope = list->data; - - if(filter_test(data->filter, ope) == 1) - { - guint i, pos = 0; - - if( tmpfor != BY_REPDIST_TAG ) - { - if( (tmpfor == BY_REPDIST_CATEGORY || tmpfor == BY_REPDIST_SUBCATEGORY) && ope->flags & OF_SPLIT ) - { - guint nbsplit = da_splits_count(ope->splits); - Split *split; - - for(i=0;isplits[i]; - switch(tmpfor) - { - case BY_REPDIST_CATEGORY: - { - Category *catentry = da_cat_get(split->kcat); - if(catentry) - pos = (catentry->flags & GF_SUB) ? catentry->parent : catentry->key; - } - break; - case BY_REPDIST_SUBCATEGORY: - pos = split->kcat; - break; - } - - if( pos == active ) - { - - gtk_list_store_append (GTK_LIST_STORE(model), &iter); - gtk_list_store_set (GTK_LIST_STORE(model), &iter, - LST_DSPOPE_DATAS, ope, - -1); - - break; - } - - } - } - else - { - pos = ui_repdist_result_get_pos(tmpfor, data->filter->mindate, ope); - if( pos == active ) - { - - gtk_list_store_append (GTK_LIST_STORE(model), &iter); - gtk_list_store_set (GTK_LIST_STORE(model), &iter, - LST_DSPOPE_DATAS, ope, - -1); - - } - } - - } - else - /* the TAG process is particular */ - { - if(ope->tags != NULL) - { - guint32 *tptr = ope->tags; - - while(*tptr) - { - pos = *tptr - 1; - - DB( g_print(" -> storing tag %d %.2f\n", pos, ope->amount) ); - - if( pos == active ) - { - gtk_list_store_append (GTK_LIST_STORE(model), &iter); - gtk_list_store_set (GTK_LIST_STORE(model), &iter, - LST_DSPOPE_DATAS, ope, - -1); - - } - - tptr++; - } - - } - } - - - - } - - list = g_list_next(list); - } - - /* Re-attach model to view */ - gtk_tree_view_set_model(GTK_TREE_VIEW(data->LV_detail), model); - g_object_unref(model); - - gtk_tree_view_columns_autosize( GTK_TREE_VIEW(data->LV_detail) ); - - } - -} - - -static void ui_repdist_update(GtkWidget *widget, gpointer user_data) -{ -struct ui_repdist_data *data; -gboolean byamount; -GtkTreeModel *model; -gint page, tmpfor, tmpkind, column; -gboolean xval; -gchar *title; - - DB( g_print("\n[repdist] update\n") ); - - data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data"); - - - model = gtk_tree_view_get_model(GTK_TREE_VIEW(data->LV_report)); - byamount = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(data->CM_byamount)); - tmpkind = gtk_combo_box_get_active(GTK_COMBO_BOX(data->CY_view)); - tmpfor = gtk_combo_box_get_active(GTK_COMBO_BOX(data->CY_by)); - - //debug option - DB( g_print(" option: byamount=%d tmpkind=%d '%s' tmpfor=%d '%s'\n\n", byamount, tmpkind, CYA_KIND2[tmpkind], tmpfor, CYA_STATSELECT[tmpfor]) ); - - // ensure not exp & inc for piechart - page = gtk_notebook_get_current_page(GTK_NOTEBOOK(data->GR_result)); - - if( page == 2 && tmpkind == 0 ) - { - g_signal_handler_block(data->CY_view, data->handler_id[HID_REPDIST_VIEW]); - gtk_combo_box_set_active(GTK_COMBO_BOX(data->CY_view), 1); - g_signal_handler_unblock(data->CY_view, data->handler_id[HID_REPDIST_VIEW]); - tmpkind = 1; - } - - // define view/sort column - column = LST_REPDIST_POS; - - if( byamount ) - { - switch( tmpkind ) - { - case 0: //Inc & Exp - case 3: - column = LST_REPDIST_BALANCE; - break; - case 1: - column = LST_REPDIST_EXPENSE; - break; - case 2: - column = LST_REPDIST_INCOME; - break; - } - } - - DB( g_print(" sort on column %d\n\n", column) ); - - gtk_tree_sortable_set_sort_column_id(GTK_TREE_SORTABLE(model), column, GTK_SORT_DESCENDING); - - gtk_chart_set_color_scheme(GTK_CHART(data->RE_chart), PREFS->report_color_scheme); - - ////TRANSLATORS: example 'Expense by Category' - title = g_strdup_printf(_("%s by %s"), _(CYA_KIND2[tmpkind]), _(CYA_STATSELECT[tmpfor]) ); - - /* update absolute or not */ - gboolean abs = (tmpkind == 1 || tmpkind == 2) ? TRUE : FALSE; - gtk_chart_set_absolute(GTK_CHART(data->RE_chart), abs); - - /* show xval for month/year and no by amount display */ - xval = FALSE; - - if( !byamount && (tmpfor == BY_REPDIST_MONTH || tmpfor == BY_REPDIST_YEAR) ) - { - xval = TRUE; - /*switch( tmpfor) - { - case BY_REPDIST_MONTH: - gtk_chart_set_every_xval(GTK_CHART(data->RE_chart), 4); - break; - case BY_REPDIST_YEAR: - gtk_chart_set_every_xval(GTK_CHART(data->RE_chart), 2); - break; - }*/ - } - - gtk_chart_show_xval(GTK_CHART(data->RE_chart), xval); - - - /* update bar chart */ - if( tmpkind == 0 ) //dual exp/inc - { - DB( g_print(" set bar to dual exp %d/inc %d\n\n", LST_REPDIST_EXPENSE, LST_REPDIST_INCOME) ); - gtk_chart_set_dualdatas(GTK_CHART(data->RE_chart), model, LST_REPDIST_EXPENSE, LST_REPDIST_INCOME, title, NULL); - } - else - { - column = LST_REPDIST_EXPENSE+(tmpkind-1)*2; - DB( g_print(" set bar to %d\n\n", column) ); - gtk_chart_set_datas(GTK_CHART(data->RE_chart), model, column, title, NULL); - } - - - g_free(title); - -} - - -static void ui_repdist_update_date_widget(GtkWidget *widget, gpointer user_data) -{ -struct ui_repdist_data *data; - - DB( g_print("\n[repdist] update date widget\n") ); - - data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data"); - - g_signal_handler_block(data->PO_mindate, data->handler_id[HID_REPDIST_MINDATE]); - g_signal_handler_block(data->PO_maxdate, data->handler_id[HID_REPDIST_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_REPDIST_MINDATE]); - g_signal_handler_unblock(data->PO_maxdate, data->handler_id[HID_REPDIST_MAXDATE]); - -} - - -static void ui_repdist_update_daterange(GtkWidget *widget, gpointer user_data) -{ -struct ui_repdist_data *data; -gchar *daterange; - - DB( g_print("\n[repdist] update daterange\n") ); - - data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data"); - - daterange = filter_daterange_text_get(data->filter); - gtk_label_set_markup(GTK_LABEL(data->TX_daterange), daterange); - g_free(daterange); -} - -static void ui_repdist_update_total(GtkWidget *widget, gpointer user_data) -{ -struct ui_repdist_data *data; -//gboolean minor; - - DB( g_print("\n[repdist] update total\n") ); - - data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data"); - - //minor = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(data->CM_minor)); - - hb_label_set_colvalue(GTK_LABEL(data->TX_total[0]), data->total_expense, GLOBALS->kcur, GLOBALS->minor); - hb_label_set_colvalue(GTK_LABEL(data->TX_total[1]), data->total_income, GLOBALS->kcur, GLOBALS->minor); - hb_label_set_colvalue(GTK_LABEL(data->TX_total[2]), data->total_expense + data->total_income, GLOBALS->kcur, GLOBALS->minor); - - -} - - -static void ui_repdist_export_result_clipboard(GtkWidget *widget, gpointer user_data) -{ -struct ui_repdist_data *data; -GtkClipboard *clipboard; -GString *node; - - DB( g_print("\n[repdist] export result clipboard\n") ); - - data = user_data; - //data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data"); - - node = ui_list_repdist_to_string(GTK_TREE_VIEW(data->LV_report), TRUE); - - clipboard = gtk_clipboard_get_default(gdk_display_get_default()); - gtk_clipboard_set_text(clipboard, node->str, node->len); - - g_string_free(node, TRUE); -} - - -static void ui_repdist_export_result_csv(GtkWidget *widget, gpointer user_data) -{ -struct ui_repdist_data *data; -gchar *filename = NULL; -GString *node; -GIOChannel *io; -gchar *name; -gint tmpfor; - - DB( g_print("\n[repdist] export result csv\n") ); - - data = user_data; - //data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data"); - - tmpfor = gtk_combo_box_get_active(GTK_COMBO_BOX(data->CY_by)); - name = g_strdup_printf("hb-repstat_%s.csv", CYA_STATSELECT[tmpfor]); - - 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) - { - node = ui_list_repdist_to_string(GTK_TREE_VIEW(data->LV_report), FALSE); - g_io_channel_write_chars(io, node->str, -1, NULL, NULL); - g_io_channel_unref (io); - g_string_free(node, TRUE); - } - g_free( filename ); - } - g_free(name); -} - - -static void ui_repdist_export_detail_clipboard(GtkWidget *widget, gpointer user_data) -{ -struct ui_repdist_data *data; -GtkClipboard *clipboard; -GString *node; - - DB( g_print("\n[repdist] export detail clipboard\n") ); - - data = user_data; - //data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data"); - - node = list_txn_to_string(GTK_TREE_VIEW(data->LV_detail), TRUE); - - clipboard = gtk_clipboard_get_default(gdk_display_get_default()); - gtk_clipboard_set_text(clipboard, node->str, node->len); - - g_string_free(node, TRUE); -} - - -static void ui_repdist_export_detail_csv(GtkWidget *widget, gpointer user_data) -{ -struct ui_repdist_data *data; -gchar *filename = NULL; -GString *node; -GIOChannel *io; -gchar *name; -gint tmpfor; - - DB( g_print("\n[repdist] export detail csv\n") ); - - data = user_data; - //data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data"); - - tmpfor = gtk_combo_box_get_active(GTK_COMBO_BOX(data->CY_by)); - name = g_strdup_printf("hb-repstat-detail_%s.csv", CYA_STATSELECT[tmpfor]); - - 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) - { - node = list_txn_to_string(GTK_TREE_VIEW(data->LV_detail), FALSE); - g_io_channel_write_chars(io, node->str, -1, NULL, NULL); - - g_io_channel_unref (io); - g_string_free(node, TRUE); - } - - g_free( filename ); - } - - g_free(name); -} - - -static void ui_repdist_compute(GtkWidget *widget, gpointer user_data) -{ -struct ui_repdist_data *data; -gint tmpfor, tmpkind; -guint32 from, to; -GtkTreeModel *model; -GtkTreeIter iter; -GList *list, *tmplist = NULL; -guint n_result, sortid; -guint i; -GDate *date1, *date2; -gdouble *tmp_income, *tmp_expense; -gdouble exprate, incrate, balrate; - - DB( g_print("\n[repdist] compute\n") ); - - data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data"); - - tmpfor = gtk_combo_box_get_active(GTK_COMBO_BOX(data->CY_by)); - tmpkind = gtk_combo_box_get_active(GTK_COMBO_BOX(data->CY_view)); - - - DB( g_print(" for=%d,kind=%d\n", tmpfor, tmpkind) ); - - //get our min max date - from = data->filter->mindate; - to = data->filter->maxdate; - if(to < from) return; - - - g_queue_free (data->txn_queue); - data->txn_queue = hbfile_transaction_get_partial(data->filter->mindate, data->filter->maxdate); - - DB( g_print(" nb-txn=%d\n", g_queue_get_length (data->txn_queue) ) ); - - /* count number or results */ - switch(tmpfor) - { - case BY_REPDIST_CATEGORY: - case BY_REPDIST_SUBCATEGORY: - n_result = da_cat_get_max_key() + 1; - tmplist = category_glist_sorted(1); - break; - case BY_REPDIST_PAYEE: - n_result = da_pay_get_max_key() + 1; - tmplist = payee_glist_sorted(1); - break; - case BY_REPDIST_TAG: - n_result = da_tag_length(); - tmplist = tag_glist_sorted(1); - break; - case BY_REPDIST_MONTH: - date1 = g_date_new_julian(from); - date2 = g_date_new_julian(to); - n_result = ((g_date_get_year(date2) - g_date_get_year(date1)) * 12) + g_date_get_month(date2) - g_date_get_month(date1) + 1; - g_date_free(date2); - g_date_free(date1); - break; - case BY_REPDIST_YEAR: - date1 = g_date_new_julian(from); - date2 = g_date_new_julian(to); - n_result = g_date_get_year(date2) - g_date_get_year(date1) + 1; - g_date_free(date2); - g_date_free(date1); - break; - default: - n_result = 0; - } - - DB( g_print(" %s :: n_result=%d\n", CYA_STATSELECT[tmpfor], n_result) ); - - /* allocate some memory */ - tmp_expense = g_malloc0((n_result+2) * sizeof(gdouble)); - tmp_income = g_malloc0((n_result+2) * sizeof(gdouble)); - - data->total_expense = 0.0; - data->total_income = 0.0; - - if(tmp_expense && tmp_income) - { - - DB( g_print(" - ok memory\n") ); - - /* compute the results */ - list = g_queue_peek_head_link(data->txn_queue); - while (list != NULL) - { - Transaction *ope = list->data; - - DB( g_print("** testing '%s', cat=%d==> %d\n", ope->memo, ope->kcat, filter_test(data->filter, ope)) ); - - if( (filter_test(data->filter, ope) == 1) ) - { - guint32 pos = 0; - gdouble trn_amount; - - DB( g_print(" - should insert\n") ); - - //trn_amount = ope->amount; - trn_amount = hb_amount_base(ope->amount, ope->kcur); - - //#1562372 in case of a split we need to take amount for filter categories only - if( ope->flags & OF_SPLIT ) - { - guint nbsplit = da_splits_count(ope->splits); - Split *split; - Category *catentry; - gint sinsert; - - trn_amount = 0.0; - - for(i=0;isplits[i]; - catentry = da_cat_get(split->kcat); - if(catentry == NULL) continue; - sinsert = ( catentry->filter == TRUE ) ? 1 : 0; - if(data->filter->option[FILTER_CATEGORY] == 2) sinsert ^= 1; - - DB( g_print(" split '%s' insert=%d\n",catentry->name, sinsert) ); - - if( (data->filter->option[FILTER_CATEGORY] == 0) || sinsert) - { - trn_amount += hb_amount_base(split->amount, ope->kcur); - } - } - - } - - - if( tmpfor != BY_REPDIST_TAG ) - { - if( (tmpfor == BY_REPDIST_CATEGORY || tmpfor == BY_REPDIST_SUBCATEGORY) && ope->flags & OF_SPLIT ) - { - guint nbsplit = da_splits_count(ope->splits); - Split *split; - Category *catentry; - gint sinsert; - - for(i=0;isplits[i]; - catentry = da_cat_get(split->kcat); - if(catentry == NULL) continue; - sinsert = ( catentry->filter == TRUE ) ? 1 : 0; - if(data->filter->option[FILTER_CATEGORY] == 2) sinsert ^= 1; - - DB( g_print(" split '%s' insert=%d\n",catentry->name, sinsert) ); - - if( (data->filter->option[FILTER_CATEGORY] == 0) || sinsert) - { - switch(tmpfor) - { - case BY_REPDIST_CATEGORY: - { - pos = (catentry->flags & GF_SUB) ? catentry->parent : catentry->key; - } - break; - case BY_REPDIST_SUBCATEGORY: - pos = split->kcat; - break; - } - - trn_amount = hb_amount_base(split->amount, ope->kcur); - //trn_amount = split->amount; - - if(trn_amount > 0.0) - { - tmp_income[pos] += trn_amount; - data->total_income += trn_amount; - } - else - { - tmp_expense[pos] += trn_amount; - data->total_expense += trn_amount; - } - - } - // end insert - - } - } - else - { - pos = ui_repdist_result_get_pos(tmpfor, from, ope); - if(trn_amount > 0.0) - { - tmp_income[pos] += trn_amount; - data->total_income += trn_amount; - } - else - { - tmp_expense[pos] += trn_amount; - data->total_expense += trn_amount; - } - } - } - else - /* the TAG process is particularly */ - { - if(ope->tags != NULL) - { - guint32 *tptr = ope->tags; - - while(*tptr) - { - pos = *tptr - 1; - - DB( g_print(" -> storing tag %d %s %.2f\n", pos, da_tag_get(*tptr)->name, trn_amount) ); - - if(trn_amount > 0.0) - { - tmp_income[pos] += trn_amount; - } - else - { - tmp_expense[pos] += trn_amount; - } - tptr++; - } - - //#1195859 - if(trn_amount > 0.0) - { - data->total_income += trn_amount; - } - else - { - data->total_expense += trn_amount; - } - - } - } - - // fix total according to selection - //if(tmpkind==0 && !tmp_expense[pos]) { data->total_income -= ope->amount; } - //if(tmpkind==1 && !tmp_income[pos] ) { data->total_expense -= ope->amount; } - - - } - - list = g_list_next(list); - } - - /* 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); /* Make sure the model stays with us after the tree view unrefs it */ - gtk_tree_view_set_model(GTK_TREE_VIEW(data->LV_report), NULL); /* Detach model from view */ - - /* insert into the treeview */ - for(i=0, sortid=0; ikey == 0 ? _("(no category)") : entry->name; - - sortid = g_list_index(tmplist, entry); - } - } - break; - - case BY_REPDIST_SUBCATEGORY: - { - Category *entry = da_cat_get(i); - if(entry != NULL) - { - if(entry->flags & GF_SUB) - { - Category *parent = da_cat_get(entry->parent); - - fullcatname = g_strdup_printf("%s : %s", parent->name, entry->name); - name = fullcatname; - } - else - name = entry->key == 0 ? _("(no category)") : entry->name; - - sortid = g_list_index(tmplist, entry); - } - } - break; - - case BY_REPDIST_PAYEE: - { - Payee *entry = da_pay_get(i); - if(entry != NULL) - { - name = entry->key == 0 ? _("(no payee)") : entry->name; - sortid = g_list_index(tmplist, entry); - } - } - break; - - case BY_REPDIST_TAG: - { - Tag *entry = da_tag_get(i+1); - name = entry->name; - sortid = g_list_index(tmplist, entry); - } - break; - - case BY_REPDIST_MONTH: - date = g_date_new_julian(from); - g_date_add_months(date, i); - //g_snprintf(buffer, 63, "%d-%02d", g_date_get_year(date), g_date_get_month(date)); - g_snprintf(buffer, 63, "%d-%s", g_date_get_year(date), _(CYA_MONTHS[g_date_get_month(date)-1])); - g_date_free(date); - name = buffer; - break; - - case BY_REPDIST_YEAR: - date = g_date_new_julian(from); - g_date_add_years(date, i); - g_snprintf(buffer, 63, "%d", g_date_get_year(date)); - g_date_free(date); - name = buffer; - break; - } - - DB( g_print(" inserting %2d, '%s', %9.2f %9.2f %9.2f\n", i, name, tmp_expense[i], tmp_income[i], tmp_expense[i] + tmp_income[i]) ); - - //compute rate - exprate = 0.0; - incrate = 0.0; - balrate = 0.0; - - if( data->total_expense ) - exprate = ABS((tmp_expense[i] * 100 / data->total_expense)); - - if( data->total_income ) - incrate = (tmp_income[i] * 100 / data->total_income); - - data->total_balance = ABS(data->total_expense) + data->total_income; - if( data->total_balance ) - balrate = (ABS(tmp_expense[i]) + tmp_income[i]) * 100 / data->total_balance; - - gtk_list_store_append (GTK_LIST_STORE(model), &iter); - gtk_list_store_set (GTK_LIST_STORE(model), &iter, - LST_REPDIST_POS, sortid++, - LST_REPDIST_KEY, i, - LST_REPDIST_NAME, name, - LST_REPDIST_EXPENSE, tmp_expense[i], - LST_REPDIST_INCOME , tmp_income[i], - LST_REPDIST_BALANCE, tmp_expense[i] + tmp_income[i], - LST_REPDIST_EXPRATE, exprate, - LST_REPDIST_INCRATE, incrate, - LST_REPDIST_BALRATE, balrate, - -1); - - g_free(fullcatname); - } - - /* update column 0 title */ - GtkTreeViewColumn *column = gtk_tree_view_get_column( GTK_TREE_VIEW(data->LV_report), 0); - gtk_tree_view_column_set_title(column, _(CYA_STATSELECT[tmpfor])); - - gtk_tree_view_columns_autosize (GTK_TREE_VIEW(data->LV_report)); - - /* Re-attach model to view */ - gtk_tree_view_set_model(GTK_TREE_VIEW(data->LV_report), model); - g_object_unref(model); - } - - /* free our memory */ - g_free(tmp_expense); - g_free(tmp_income); - - /* free tmplist (sort cat/pay) */ - g_list_free(tmplist); - - ui_repdist_update_total(widget,NULL); - - ui_repdist_update(widget, user_data); - -} - - - - - -/* -** update sensitivity -*/ -static void ui_repdist_sensitive(GtkWidget *widget, gpointer user_data) -{ -struct ui_repdist_data *data; -GtkAction *action; -gboolean visible, sensitive; -gint page; - - DB( g_print("\n[repdist] sensitive\n") ); - - data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data"); - - page = gtk_notebook_get_current_page(GTK_NOTEBOOK(data->GR_result)); - - visible = page == 0 ? TRUE : FALSE; - action = gtk_ui_manager_get_action(data->ui, "/ToolBar/Detail"); - gtk_action_set_visible (action, visible); - //sensitive = gtk_tree_selection_get_selected(gtk_tree_view_get_selection(GTK_TREE_VIEW(data->LV_report)), NULL, NULL); - //gtk_action_set_sensitive(action, sensitive); - //action = gtk_ui_manager_get_action(data->ui, "/ToolBar/Export"); - //gtk_action_set_visible (action, visible); - hb_widget_visible (data->BT_export, visible); - - - visible = page == 0 ? FALSE : TRUE; - //todo: don't display for pie chart (get the type form chart) - - hb_widget_visible(data->LB_zoomx, visible); - hb_widget_visible(data->RG_zoomx, visible); - - visible = page == 0 ? FALSE : TRUE; - gtk_action_set_visible(gtk_ui_manager_get_action(data->ui, "/ToolBar/Legend"), visible); - - visible = page == 0 ? TRUE : FALSE; - gtk_action_set_visible(gtk_ui_manager_get_action(data->ui, "/ToolBar/Rate"), visible); - - sensitive = gtk_tree_model_iter_n_children(gtk_tree_view_get_model(GTK_TREE_VIEW(data->LV_detail)), NULL) > 0 ? TRUE : FALSE; - gtk_widget_set_sensitive(data->MI_detailtoclip, sensitive); - gtk_widget_set_sensitive(data->MI_detailtocsv, sensitive); -} - - -static void ui_repdist_detail_onRowActivated (GtkTreeView *treeview, - GtkTreePath *path, - GtkTreeViewColumn *col, - gpointer userdata) -{ -struct ui_repdist_data *data; -Transaction *active_txn; -gboolean result; - - data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(GTK_WIDGET(treeview), GTK_TYPE_WINDOW)), "inst_data"); - - DB( g_print ("\n[repdist] A detail row has been double-clicked!\n") ); - - active_txn = list_txn_get_active_transaction(GTK_TREE_VIEW(data->LV_detail)); - if(active_txn) - { - Transaction *old_txn, *new_txn; - - old_txn = da_transaction_clone (active_txn); - new_txn = active_txn; - result = deftransaction_external_edit(GTK_WINDOW(data->window), old_txn, new_txn); - - if(result == GTK_RESPONSE_ACCEPT) - { - //#1640885 - GLOBALS->changes_count++; - ui_repdist_compute(data->window, NULL); - } - - da_transaction_free (old_txn); - } -} - - -static void ui_repdist_update_detail(GtkWidget *widget, gpointer user_data) -{ -struct ui_repdist_data *data; - - data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data"); - - if(GTK_IS_TREE_VIEW(data->LV_report)) - { - if(data->detail) - { - GtkTreeSelection *treeselection; - GtkTreeModel *model; - GtkTreeIter iter; - guint key; - - treeselection = gtk_tree_view_get_selection (GTK_TREE_VIEW(data->LV_report)); - - if (gtk_tree_selection_get_selected(treeselection, &model, &iter)) - { - gtk_tree_model_get(model, &iter, LST_REPDIST_KEY, &key, -1); - - DB( g_print(" - active is %d\n", key) ); - - ui_repdist_detail(GTK_WIDGET(gtk_tree_selection_get_tree_view (treeselection)), GINT_TO_POINTER(key)); - } - - - - gtk_widget_show(data->GR_detail); - } - else - gtk_widget_hide(data->GR_detail); - - } -} - - - - -static void ui_repdist_toggle_detail(GtkWidget *widget, gpointer user_data) -{ -struct ui_repdist_data *data; - - data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data"); - - data->detail ^= 1; - - DB( g_print("\n[repdist] toggledetail to %d\n", data->detail) ); - - ui_repdist_update_detail(widget, user_data); - -} - -/* -** change the chart legend visibility -*/ -static void ui_repdist_toggle_legend(GtkWidget *widget, gpointer user_data) -{ -struct ui_repdist_data *data; -//gint active; - - DB( g_print("\n[repdist] toggle legend\n") ); - - data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data"); - - data->legend ^= 1; - - gtk_chart_show_legend(GTK_CHART(data->RE_chart), data->legend, FALSE); - -} - -static void ui_repdist_zoomx_callback(GtkWidget *widget, gpointer user_data) -{ -struct ui_repdist_data *data; -gdouble value; - - DB( g_print("\n[repdist] zoomx\n") ); - - data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data"); - - value = gtk_range_get_value(GTK_RANGE(data->RG_zoomx)); - - DB( g_print(" + scale is %.2f\n", value) ); - - gtk_chart_set_barw(GTK_CHART(data->RE_chart), value); - -} - - -/* -** change the chart rate columns visibility -*/ -static void ui_repdist_toggle_rate(GtkWidget *widget, gpointer user_data) -{ -struct ui_repdist_data *data; -GtkTreeViewColumn *column; - - DB( g_print("\n[repdist] toggle rate\n") ); - - data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data"); - - data->rate ^= 1; - - if(GTK_IS_TREE_VIEW(data->LV_report)) - { - - column = gtk_tree_view_get_column (GTK_TREE_VIEW(data->LV_report), 2); - gtk_tree_view_column_set_visible(column, data->rate); - - column = gtk_tree_view_get_column (GTK_TREE_VIEW(data->LV_report), 4); - gtk_tree_view_column_set_visible(column, data->rate); - - column = gtk_tree_view_get_column (GTK_TREE_VIEW(data->LV_report), 6); - gtk_tree_view_column_set_visible(column, data->rate); - } - -} - -static void ui_repdist_toggle_minor(GtkWidget *widget, gpointer user_data) -{ -struct ui_repdist_data *data; - - DB( g_print("\n[repdist] toggle minor\n") ); - - data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data"); - - GLOBALS->minor = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(data->CM_minor)); - - ui_repdist_update_total(widget,NULL); - - //hbfile_update(data->LV_acc, (gpointer)4); - gtk_tree_view_columns_autosize (GTK_TREE_VIEW(data->LV_report)); - gtk_chart_show_minor(GTK_CHART(data->RE_chart), GLOBALS->minor); - -} - - -/* -** -*/ -static void ui_repdist_setup(struct ui_repdist_data *data) -{ - DB( g_print("\n[repdist] setup\n") ); - - data->txn_queue = g_queue_new (); - - data->filter = da_filter_malloc(); - filter_default_all_set(data->filter); - - - data->detail = PREFS->stat_showdetail; - data->legend = 1; - data->rate = PREFS->stat_showrate^1; - - - ui_repdist_toggle_rate(data->window, NULL); - - - - /* 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); - - ui_repdist_update_date_widget(data->window, NULL); - -} - - - -static void ui_repdist_selection(GtkTreeSelection *treeselection, gpointer user_data) -{ -GtkTreeModel *model; -GtkTreeIter iter; -guint key = -1; - - DB( g_print("\n[repdist] selection\n") ); - - if (gtk_tree_selection_get_selected(treeselection, &model, &iter)) - { - gtk_tree_model_get(model, &iter, LST_REPDIST_KEY, &key, -1); - } - - DB( g_print(" - active is %d\n", key) ); - - ui_repdist_detail(GTK_WIDGET(gtk_tree_selection_get_tree_view (treeselection)), GINT_TO_POINTER(key)); - ui_repdist_sensitive(GTK_WIDGET(gtk_tree_selection_get_tree_view (treeselection)), NULL); -} - - -/* -** -*/ -static gboolean ui_repdist_dispose(GtkWidget *widget, GdkEvent *event, gpointer user_data) -{ -struct ui_repdist_data *data = user_data; -struct WinGeometry *wg; - - DB( g_print("\n[repdist] dispose\n") ); - - g_queue_free (data->txn_queue); - - da_filter_free(data->filter); - - g_free(data); - - //store position and size - wg = &PREFS->sta_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 *ui_repdist_window_new(void) -{ -struct ui_repdist_data *data; -struct WinGeometry *wg; -GtkWidget *window, *mainvbox, *hbox, *vbox, *notebook, *treeview, *vpaned, *sw; -GtkWidget *label, *widget, *table, *entry; -gint row; -GtkUIManager *ui; -GtkActionGroup *actions; -GtkAction *action; -GError *error = NULL; - - DB( g_print("\n[repdist] new\n") ); - - - data = g_malloc0(sizeof(struct ui_repdist_data)); - if(!data) return NULL; - - //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), _("Statistics Report")); - - - //set the window icon - gtk_window_set_icon_name(GTK_WINDOW (window), ICONNAME_HB_REP_STATS); - - - //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(_("_View:")); - gtk_grid_attach (GTK_GRID (table), label, 1, row, 1, 1); - widget = make_cycle(label, CYA_KIND2); - data->CY_view = widget; - gtk_grid_attach (GTK_GRID (table), widget, 2, row, 1, 1); - - row++; - label = make_label_widget(_("_By:")); - gtk_grid_attach (GTK_GRID (table), label, 1, row, 1, 1); - widget = make_cycle(label, CYA_STATSELECT); - data->CY_by = widget; - gtk_grid_attach (GTK_GRID (table), data->CY_by, 2, row, 1, 1); - - row++; - widget = gtk_check_button_new_with_mnemonic (_("By _amount")); - data->CM_byamount = 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++; - label = make_label_widget(_("_Zoom X:")); - data->LB_zoomx = label; - gtk_grid_attach (GTK_GRID (table), label, 1, row, 1, 1); - widget = make_scale(label); - data->RG_zoomx = widget; - gtk_grid_attach (GTK_GRID (table), widget, 2, row, 1, 1); - - -/* - row++; - widget = gtk_check_button_new_with_mnemonic ("Legend"); - data->CM_legend = widget; - gtk_grid_attach (GTK_GRID (table), widget, 1, 2, row, row+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, TRUE); - 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_radio_actions (actions, radio_entries, n_radio_entries, 0, G_CALLBACK(ui_repdist_action_mode), data); - - gtk_action_group_add_actions (actions, entries, n_entries, data); - - gtk_action_group_add_toggle_actions (actions, - toggle_entries, n_toggle_entries, - data); - - - /* set which action should have priority in the toolbar */ - //action = gtk_action_group_get_action(actions, "List"); - //g_object_set(action, "is_important", TRUE, NULL); - - //action = gtk_action_group_get_action(actions, "Column"); - //g_object_set(action, "is_important", TRUE, NULL); - - //action = gtk_action_group_get_action(actions, "Donut"); - //g_object_set(action, "is_important", TRUE, NULL); - - action = gtk_action_group_get_action(actions, "Detail"); - //g_object_set(action, "is_important", TRUE, NULL); - g_object_set(action, "active", PREFS->stat_showdetail, NULL); - - action = gtk_action_group_get_action(actions, "Rate"); - g_object_set(action, "active", PREFS->stat_showrate, NULL); - - //action = gtk_action_group_get_action(actions, "Filter"); - //g_object_set(action, "is_important", TRUE, NULL); - - //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); - - //add export menu button - GtkToolItem *toolitem; - GtkWidget *menu, *menuitem, *image; - - menu = gtk_menu_new (); - //gtk_widget_set_halign (menu, GTK_ALIGN_END); - - menuitem = gtk_menu_item_new_with_mnemonic (_("_Result to clipboard")); - gtk_menu_shell_append (GTK_MENU_SHELL (menu), menuitem); - g_signal_connect (G_OBJECT (menuitem), "activate", G_CALLBACK (ui_repdist_export_result_clipboard), data); - - menuitem = gtk_menu_item_new_with_mnemonic (_("_Result to CSV")); - gtk_menu_shell_append (GTK_MENU_SHELL (menu), menuitem); - g_signal_connect (G_OBJECT (menuitem), "activate", G_CALLBACK (ui_repdist_export_result_csv), data); - - menuitem = gtk_menu_item_new_with_mnemonic (_("_Detail to clipboard")); - data->MI_detailtoclip = menuitem; - gtk_menu_shell_append (GTK_MENU_SHELL (menu), menuitem); - g_signal_connect (G_OBJECT (menuitem), "activate", G_CALLBACK (ui_repdist_export_detail_clipboard), data); - - menuitem = gtk_menu_item_new_with_mnemonic (_("_Detail to CSV")); - data->MI_detailtocsv = menuitem; - gtk_menu_shell_append (GTK_MENU_SHELL (menu), menuitem); - g_signal_connect (G_OBJECT (menuitem), "activate", G_CALLBACK (ui_repdist_export_detail_csv), data); - - gtk_widget_show_all (menu); - - widget = gtk_menu_button_new(); - data->BT_export = widget; - gtk_style_context_add_class (gtk_widget_get_style_context (GTK_WIDGET(widget)), GTK_STYLE_CLASS_FLAT); - - //gtk_menu_button_set_direction (GTK_MENU_BUTTON(widget), GTK_ARROW_DOWN); - //gtk_widget_set_halign (widget, GTK_ALIGN_END); - image = gtk_image_new_from_icon_name (ICONNAME_HB_FILE_EXPORT, GTK_ICON_SIZE_LARGE_TOOLBAR); - g_object_set (widget, "image", image, "popup", GTK_MENU(menu), NULL); - - toolitem = gtk_tool_item_new(); - gtk_container_add (GTK_CONTAINER(toolitem), widget); - gtk_toolbar_insert(GTK_TOOLBAR(data->TB_bar), GTK_TOOL_ITEM(toolitem), -1); - - - //infos + balance - hbox = gtk_box_new (GTK_ORIENTATION_HORIZONTAL, SPACING_SMALL); - gtk_container_set_border_width (GTK_CONTAINER(hbox), SPACING_SMALL); - gtk_box_pack_start (GTK_BOX (vbox), hbox, FALSE, FALSE, 0); - - widget = make_label(NULL, 0.5, 0.5); - gimp_label_set_attributes (GTK_LABEL (widget), PANGO_ATTR_SCALE, PANGO_SCALE_SMALL, -1); - data->TX_daterange = widget; - gtk_box_pack_start (GTK_BOX (hbox), widget, TRUE, TRUE, 0); - - entry = gtk_label_new(NULL); - data->TX_total[2] = entry; - gtk_box_pack_end (GTK_BOX (hbox), entry, FALSE, FALSE, 0); - label = gtk_label_new(_("Balance:")); - gtk_box_pack_end (GTK_BOX (hbox), label, FALSE, FALSE, 0); - - entry = gtk_label_new(NULL); - data->TX_total[1] = entry; - gtk_box_pack_end (GTK_BOX (hbox), entry, FALSE, FALSE, 0); - label = gtk_label_new(_("Income:")); - gtk_box_pack_end (GTK_BOX (hbox), label, FALSE, FALSE, 0); - - - entry = gtk_label_new(NULL); - data->TX_total[0] = entry; - gtk_box_pack_end (GTK_BOX (hbox), entry, FALSE, FALSE, 0); - label = gtk_label_new(_("Expense:")); - gtk_box_pack_end (GTK_BOX (hbox), label, FALSE, FALSE, 0); - - - /* report area */ - notebook = gtk_notebook_new(); - data->GR_result = notebook; - gtk_widget_show(notebook); - gtk_notebook_set_show_tabs(GTK_NOTEBOOK(notebook), FALSE); - gtk_notebook_set_show_border(GTK_NOTEBOOK(notebook), FALSE); - gtk_box_pack_start (GTK_BOX (vbox), notebook, TRUE, TRUE, 0); - - // page list/detail - vpaned = gtk_paned_new(GTK_ORIENTATION_VERTICAL); - gtk_notebook_append_page(GTK_NOTEBOOK(notebook), vpaned, NULL); - - // list - sw = gtk_scrolled_window_new (NULL, NULL); - gtk_scrolled_window_set_shadow_type (GTK_SCROLLED_WINDOW (sw), GTK_SHADOW_ETCHED_IN); - gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (sw), GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC); - treeview = ui_list_repdist_create(); - data->LV_report = treeview; - gtk_container_add (GTK_CONTAINER(sw), treeview); - gtk_paned_pack1 (GTK_PANED(vpaned), sw, TRUE, TRUE); - - //detail - sw = gtk_scrolled_window_new (NULL, NULL); - data->GR_detail = sw; - //gtk_scrolled_window_set_placement(GTK_SCROLLED_WINDOW (sw), GTK_CORNER_TOP_RIGHT); - gtk_scrolled_window_set_shadow_type (GTK_SCROLLED_WINDOW (sw), GTK_SHADOW_ETCHED_IN); - gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (sw), GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC); - treeview = create_list_transaction(LIST_TXN_TYPE_DETAIL, PREFS->lst_ope_columns); - data->LV_detail = treeview; - gtk_container_add (GTK_CONTAINER(sw), treeview); - gtk_paned_pack2 (GTK_PANED(vpaned), sw, TRUE, TRUE); - - //page: 2d bar /pie - widget = gtk_chart_new(CHART_TYPE_COL); - data->RE_chart = widget; - gtk_chart_set_minor_prefs(GTK_CHART(widget), PREFS->euro_value, PREFS->minor_cur.symbol); - gtk_chart_set_currency(GTK_CHART(widget), GLOBALS->kcur); - gtk_notebook_append_page(GTK_NOTEBOOK(notebook), widget, NULL); - - //todo: setup should move this - gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(data->CM_minor), GLOBALS->minor); - gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(data->CM_byamount), PREFS->stat_byamount); - - gtk_combo_box_set_active(GTK_COMBO_BOX(data->CY_view), 1); - - /* 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); - g_object_set_data(G_OBJECT(gtk_tree_view_get_model(GTK_TREE_VIEW(data->LV_detail))), "minor", (gpointer)data->CM_minor); - - /* signal connect */ - g_signal_connect (window, "delete-event", G_CALLBACK (ui_repdist_dispose), (gpointer)data); - - g_signal_connect (data->CM_minor, "toggled", G_CALLBACK (ui_repdist_toggle_minor), NULL); - - data->handler_id[HID_REPDIST_MINDATE] = g_signal_connect (data->PO_mindate, "changed", G_CALLBACK (ui_repdist_date_change), (gpointer)data); - data->handler_id[HID_REPDIST_MAXDATE] = g_signal_connect (data->PO_maxdate, "changed", G_CALLBACK (ui_repdist_date_change), (gpointer)data); - - data->handler_id[HID_REPDIST_RANGE] = g_signal_connect (data->CY_range, "changed", G_CALLBACK (ui_repdist_range_change), NULL); - - g_signal_connect (data->CY_by, "changed", G_CALLBACK (ui_repdist_compute), (gpointer)data); - data->handler_id[HID_REPDIST_VIEW] = g_signal_connect (data->CY_view, "changed", G_CALLBACK (ui_repdist_compute), (gpointer)data); - - g_signal_connect (data->RG_zoomx, "value-changed", G_CALLBACK (ui_repdist_zoomx_callback), NULL); - - - g_signal_connect (data->CM_byamount, "toggled", G_CALLBACK (ui_repdist_update), NULL); - - g_signal_connect (gtk_tree_view_get_selection(GTK_TREE_VIEW(data->LV_report)), "changed", G_CALLBACK (ui_repdist_selection), NULL); - - g_signal_connect (GTK_TREE_VIEW(data->LV_detail), "row-activated", G_CALLBACK (ui_repdist_detail_onRowActivated), NULL); - - //setup, init and show window - ui_repdist_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->sta_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); - - //gtk_widget_hide(data->GR_detail); - - - - ui_repdist_sensitive(window, NULL); - ui_repdist_update_detail(window, NULL); - - DB( g_print("range: %d\n", PREFS->date_range_rep) ); - - if( PREFS->date_range_rep != 0) - gtk_combo_box_set_active(GTK_COMBO_BOX(data->CY_range), PREFS->date_range_rep); - else - ui_repdist_compute(window, NULL); - - - return window; -} - -/* -** ============================================================================ -*/ - - -static GString *ui_list_repdist_to_string(GtkTreeView *treeview, gboolean clipboard) -{ -GString *node; -GtkTreeModel *model; -GtkTreeIter iter; -gboolean valid; -const gchar *format; - - node = g_string_new(NULL); - - // header - format = (clipboard == TRUE) ? "%s\t%s\t%s\t%s\n" : "%s;%s;%s;%s\n"; - g_string_append_printf(node, format, _("Result"), _("Expense"), _("Income"), _("Balance")); - - model = gtk_tree_view_get_model(treeview); - valid = gtk_tree_model_get_iter_first(GTK_TREE_MODEL(model), &iter); - while (valid) - { - gchar *name; - gdouble exp, inc, bal; - - gtk_tree_model_get (model, &iter, - //LST_REPDIST_KEY, i, - LST_REPDIST_NAME , &name, - LST_REPDIST_EXPENSE, &exp, - LST_REPDIST_INCOME , &inc, - LST_REPDIST_BALANCE, &bal, - -1); - - format = (clipboard == TRUE) ? "%s\t%.2f\t%.2f\t%.2f\n" : "%s;%.2f;%.2f;%.2f\n"; - g_string_append_printf(node, format, name, exp, inc, bal); - - //leak - g_free(name); - - valid = gtk_tree_model_iter_next(GTK_TREE_MODEL(model), &iter); - } - - //DB( g_print("text is:\n%s", node->str) ); - - return node; -} - - - - -static void ui_list_repdist_rate_cell_data_function (GtkTreeViewColumn *col, - GtkCellRenderer *renderer, - GtkTreeModel *model, - GtkTreeIter *iter, - gpointer user_data) - { - //GtkWidget *widget; - - //widget = g_object_get_data(G_OBJECT(model), "minor"); - - //todo g_assert here and null test - - gdouble tmp; - gchar buf[128]; - - gtk_tree_model_get(model, iter, GPOINTER_TO_INT(user_data), &tmp, -1); - - if(tmp != 0.0) - { - g_snprintf(buf, sizeof(buf), "%.2f %%", tmp); - g_object_set(renderer, "text", buf, NULL); - } - else - g_object_set(renderer, "text", "", NULL); - -} - - -static void ui_list_repdist_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, GPOINTER_TO_INT(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 *ui_list_repdist_amount_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, ui_list_repdist_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; -} - -static GtkTreeViewColumn *ui_list_repdist_rate_column(gint id) -{ -GtkTreeViewColumn *column; -GtkCellRenderer *renderer; - - column = gtk_tree_view_column_new(); - gtk_tree_view_column_set_title(column, "%"); - renderer = gtk_cell_renderer_text_new (); - g_object_set(renderer, "xalign", 1.0, "yalign", 1.0, "scale", 0.8, "scale-set", TRUE, NULL); - - gtk_tree_view_column_pack_start(column, renderer, TRUE); - //gtk_tree_view_column_add_attribute(column, renderer, "text", id); - gtk_tree_view_column_set_cell_data_func(column, renderer, ui_list_repdist_rate_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); - - //gtk_tree_view_column_set_visible(column, FALSE); - - return column; -} - -/* -** create our statistic list -*/ -static GtkWidget *ui_list_repdist_create(void) -{ -GtkListStore *store; -GtkWidget *view; -GtkCellRenderer *renderer; -GtkTreeViewColumn *column; - - /* create list store */ - store = gtk_list_store_new( - NUM_LST_REPDIST, - G_TYPE_INT, - G_TYPE_INT, - G_TYPE_STRING, - G_TYPE_DOUBLE, - G_TYPE_DOUBLE, - G_TYPE_DOUBLE, - G_TYPE_DOUBLE, - G_TYPE_DOUBLE, - G_TYPE_DOUBLE - ); - - //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: Name */ - column = gtk_tree_view_column_new(); - gtk_tree_view_column_set_title(column, _("Result")); - renderer = gtk_cell_renderer_text_new (); - gtk_tree_view_column_pack_start(column, renderer, TRUE); - //gtk_tree_view_column_set_cell_data_func(column, renderer, ope_result_cell_data_function, NULL, NULL); - gtk_tree_view_column_add_attribute(column, renderer, "text", LST_REPDIST_NAME); - //gtk_tree_view_column_set_sort_column_id (column, LST_REPDIST_NAME); - gtk_tree_view_column_set_resizable(column, TRUE); - gtk_tree_view_column_set_alignment (column, 0.5); - gtk_tree_view_append_column (GTK_TREE_VIEW(view), column); - - /* column: Expense */ - column = ui_list_repdist_amount_column(_("Expense"), LST_REPDIST_EXPENSE); - gtk_tree_view_append_column (GTK_TREE_VIEW(view), column); - column = ui_list_repdist_rate_column(LST_REPDIST_EXPRATE); - gtk_tree_view_append_column (GTK_TREE_VIEW(view), column); - - /* column: Income */ - column = ui_list_repdist_amount_column(_("Income"), LST_REPDIST_INCOME); - gtk_tree_view_append_column (GTK_TREE_VIEW(view), column); - column = ui_list_repdist_rate_column(LST_REPDIST_INCRATE); - gtk_tree_view_append_column (GTK_TREE_VIEW(view), column); - - /* column: Balance */ - column = ui_list_repdist_amount_column(_("Balance"), LST_REPDIST_BALANCE); - gtk_tree_view_append_column (GTK_TREE_VIEW(view), column); - column = ui_list_repdist_rate_column(LST_REPDIST_BALRATE); - 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); - - /* sort */ - gtk_tree_sortable_set_sort_func(GTK_TREE_SORTABLE(store), LST_REPDIST_POS , ui_list_repdist_compare_func, GINT_TO_POINTER(LST_REPDIST_POS), NULL); - gtk_tree_sortable_set_sort_func(GTK_TREE_SORTABLE(store), LST_REPDIST_EXPENSE, ui_list_repdist_compare_func, GINT_TO_POINTER(LST_REPDIST_EXPENSE), NULL); - gtk_tree_sortable_set_sort_func(GTK_TREE_SORTABLE(store), LST_REPDIST_INCOME , ui_list_repdist_compare_func, GINT_TO_POINTER(LST_REPDIST_INCOME), NULL); - gtk_tree_sortable_set_sort_func(GTK_TREE_SORTABLE(store), LST_REPDIST_BALANCE, ui_list_repdist_compare_func, GINT_TO_POINTER(LST_REPDIST_BALANCE), NULL); - - - return(view); -} - -static gint ui_list_repdist_compare_func (GtkTreeModel *model, GtkTreeIter *a, GtkTreeIter *b, gpointer userdata) -{ -gint sortcol = GPOINTER_TO_INT(userdata); -gint retval = 0; -gint pos1, pos2; -gdouble val1, val2; - - gtk_tree_model_get(model, a, - LST_REPDIST_POS, &pos1, - sortcol, &val1, - -1); - gtk_tree_model_get(model, b, - LST_REPDIST_POS, &pos2, - sortcol, &val2, - -1); - - switch(sortcol) - { - case LST_REPDIST_POS: - retval = pos2 - pos1; - break; - default: - retval = (ABS(val1) - ABS(val2)) > 0 ? 1 : -1; - break; - } - - //DB( g_print(" sort %d=%d or %.2f=%.2f :: %d\n", pos1,pos2, val1, val2, ret) ); - - return retval; - } -