+++ /dev/null
-/* HomeBank -- Free, easy, personal accounting for everyone.
- * Copyright (C) 1995-2014 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_budget.h"
-
-#include "list_operation.h"
-#include "gtk-chart.h"
-#include "gtk-dateentry.h"
-
-#include "dsp_mainwindow.h"
-
-
-
-/****************************************************************************/
-/* Debug macros */
-/****************************************************************************/
-#define MYDEBUG 0
-
-#if MYDEBUG
-#define DB(x) (x);
-#else
-#define DB(x);
-#endif
-
-enum {
- HID_MINDATE,
- HID_MAXDATE,
- HID_RANGE,
- MAX_HID
-};
-
-/* our global datas */
-extern struct HomeBank *GLOBALS;
-extern struct Preferences *PREFS;
-
-
-struct repbudget_data
-{
- GtkWidget *window;
- GtkUIManager *ui;
-
- GtkWidget *TB_bar;
-
- GtkWidget *TX_info;
- GtkWidget *TX_daterange;
- GtkWidget *CM_minor;
- GtkWidget *CY_for;
- GtkWidget *CY_kind;
- GtkWidget *CY_view;
- GtkWidget *RG_zoomx;
- GtkWidget *LV_report;
-
- GtkWidget *PO_mindate, *PO_maxdate;
-
- GtkWidget *CY_range;
- GtkWidget *GR_result;
-
- GtkWidget *TX_total[3];
-
- GtkWidget *RE_bar;
- GtkWidget *RE_pie;
-
- GtkWidget *GR_detail;
- GtkWidget *LV_detail;
-
- Filter *filter;
-
- gdouble total_spent;
- gdouble total_budget;
-
- gboolean detail;
- gboolean legend;
-
- gulong handler_id[MAX_HID];
-};
-
-/* prototypes */
-static void repbudget_action_viewlist(GtkAction *action, gpointer user_data);
-static void repbudget_action_viewbar(GtkAction *action, gpointer user_data);
-static void repbudget_action_detail(GtkAction *action, gpointer user_data);
-static void repbudget_action_legend(GtkAction *action, gpointer user_data);
-static void repbudget_action_refresh(GtkAction *action, gpointer user_data);
-
-enum
-{
- BUDG_CATEGORY,
- BUDG_SUBCATEGORY,
-};
-
-gchar *CYA_BUDGSELECT[] = { N_("Category"), N_("Subcategory"), NULL };
-
-gchar *CYA_KIND[] = { N_("Exp. & Inc."), N_("Expense"), N_("Income"), NULL };
-
-gchar *CYA_BUDGETSELECT[] = { N_("Spent & Budget"), N_("Spent"), N_("Budget"), N_("Result"), NULL };
-
-
-//extern gchar *CYA_FLT_SELECT[];
-
-static GtkActionEntry entries[] = {
- { "List" , "hb-view-list" , N_("List") , NULL, N_("View results as list"), G_CALLBACK (repbudget_action_viewlist) },
- { "Bar" , "hb-view-bar" , N_("Bar") , NULL, N_("View results as bars"), G_CALLBACK (repbudget_action_viewbar) },
- { "Refresh" , GTK_STOCK_REFRESH, N_("Refresh"), NULL, N_("Refresh results"), G_CALLBACK (repbudget_action_refresh) },
-};
-static guint n_entries = G_N_ELEMENTS (entries);
-
-
-static GtkToggleActionEntry toggle_entries[] = {
- { "Detail", "hb-ope-show", /* name, stock id */
- N_("Detail"), NULL, /* label, accelerator */
- N_("Toggle detail"), /* tooltip */
- G_CALLBACK (repbudget_action_detail),
- FALSE }, /* is_active */
-
- { "Legend", "hb-legend", /* name, stock id */
- N_("Legend"), NULL, /* label, accelerator */
- N_("Toggle legend"), /* tooltip */
- G_CALLBACK (repbudget_action_legend),
- TRUE }, /* is_active */
-
-};
-static guint n_toggle_entries = G_N_ELEMENTS (toggle_entries);
-
-
-static const gchar *ui_info =
-"<ui>"
-" <toolbar name='ToolBar'>"
-" <toolitem action='List'/>"
-" <toolitem action='Bar'/>"
-" <separator/>"
-" <toolitem action='Detail'/>"
-" <toolitem action='Legend'/>"
-" <separator/>"
-" <toolitem action='Refresh'/>"
-" </toolbar>"
-"</ui>";
-
-/* list stat */
-enum
-{
- LST_BUDGET_POS,
- LST_BUDGET_KEY,
- LST_BUDGET_NAME,
- LST_BUDGET_SPENT,
- LST_BUDGET_BUDGET,
- LST_BUDGET_RESULT,
- NUM_LST_BUDGET
-};
-
-/* prototypes */
-
-static void repbudget_date_change(GtkWidget *widget, gpointer user_data);
-static void repbudget_range_change(GtkWidget *widget, gpointer user_data);
-static void repbudget_toggle_detail(GtkWidget *widget, gpointer user_data);
-static void repbudget_detail(GtkWidget *widget, gpointer user_data);
-static void repbudget_compute(GtkWidget *widget, gpointer user_data);
-static void repbudget_update_total(GtkWidget *widget, gpointer user_data);
-static void repbudget_sensitive(GtkWidget *widget, gpointer user_data);
-static void repbudget_toggle_legend(GtkWidget *widget, gpointer user_data);
-static void repbudget_toggle(GtkWidget *widget, gpointer user_data);
-static GtkWidget *create_list_budget(void);
-static void repbudget_update_detail(GtkWidget *widget, gpointer user_data);
-static void repbudget_update_daterange(GtkWidget *widget, gpointer user_data);
-
-/* action functions -------------------- */
-static void repbudget_action_viewlist(GtkAction *action, gpointer user_data)
-{
-struct repbudget_data *data = user_data;
-
- gtk_notebook_set_current_page(GTK_NOTEBOOK(data->GR_result), 0);
- repbudget_sensitive(data->window, NULL);
-}
-
-static void repbudget_action_viewbar(GtkAction *action, gpointer user_data)
-{
-struct repbudget_data *data = user_data;
-
- gtk_notebook_set_current_page(GTK_NOTEBOOK(data->GR_result), 1);
- repbudget_sensitive(data->window, NULL);
-}
-
-static void repbudget_action_detail(GtkAction *action, gpointer user_data)
-{
-struct repbudget_data *data = user_data;
-
- repbudget_toggle_detail(data->window, NULL);
-}
-
-static void repbudget_action_legend(GtkAction *action, gpointer user_data)
-{
-struct repbudget_data *data = user_data;
-
- repbudget_toggle_legend(data->window, NULL);
-}
-
-static void repbudget_action_refresh(GtkAction *action, gpointer user_data)
-{
-struct repbudget_data *data = user_data;
-
- repbudget_compute(data->window, NULL);
-}
-
-
-
-/* ======================== */
-
-
-static gint getmonth(guint date)
-{
-GDate *date1;
-gint month;
-
- date1 = g_date_new_julian(date);
- month = g_date_get_month(date1);
-
- #if MYDEBUG == 1
- gchar buffer1[128];
- g_date_strftime (buffer1, 128-1, "%x", date1);
- g_print(" date is '%s'\n", buffer1);
-
- g_print(" month is %d\n", month);
-
- #endif
-
- g_date_free(date1);
-
- return(month);
-}
-
-static gint countmonth(guint32 mindate, guint32 maxdate)
-{
-GDate *date1, *date2;
-gint nbmonth;
-
- date1 = g_date_new_julian(mindate);
- date2 = g_date_new_julian(maxdate);
-
- nbmonth = 0;
- while(g_date_compare(date1, date2) < 0)
- {
- nbmonth++;
- g_date_add_months(date1, 1);
- }
-
- g_date_free(date2);
- g_date_free(date1);
-
- return(nbmonth);
-}
-
-static gdouble budget_compute_result(gdouble budget, gdouble spent)
-{
-gdouble retval;
-
- //original formula
- //result = ABS(budget) - ABS(spent);
-
- retval = spent - budget;
-
- return retval;
-}
-
-
-
-
-
-static void repbudget_date_change(GtkWidget *widget, gpointer user_data)
-{
-struct repbudget_data *data;
-
- DB( g_print("(repbudget) date change\n") );
-
- data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
-
- data->filter->mindate = gtk_dateentry_get_date(GTK_DATE_ENTRY(data->PO_mindate));
- data->filter->maxdate = gtk_dateentry_get_date(GTK_DATE_ENTRY(data->PO_maxdate));
-
- // set min/max date for both widget
- gtk_dateentry_set_maxdate(GTK_DATE_ENTRY(data->PO_mindate), data->filter->maxdate);
- gtk_dateentry_set_mindate(GTK_DATE_ENTRY(data->PO_maxdate), data->filter->mindate);
-
- g_signal_handler_block(data->CY_range, data->handler_id[HID_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_RANGE]);
-
-
- repbudget_compute(widget, NULL);
- repbudget_update_daterange(widget, NULL);
-
-}
-
-
-static void repbudget_range_change(GtkWidget *widget, gpointer user_data)
-{
-struct repbudget_data *data;
-gint range;
-
- DB( g_print("(repbudget) 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);
-
- g_signal_handler_block(data->PO_mindate, data->handler_id[HID_MINDATE]);
- g_signal_handler_block(data->PO_maxdate, data->handler_id[HID_MAXDATE]);
-
- gtk_dateentry_set_date(GTK_DATE_ENTRY(data->PO_mindate), data->filter->mindate);
- gtk_dateentry_set_date(GTK_DATE_ENTRY(data->PO_maxdate), data->filter->maxdate);
-
- g_signal_handler_unblock(data->PO_mindate, data->handler_id[HID_MINDATE]);
- g_signal_handler_unblock(data->PO_maxdate, data->handler_id[HID_MAXDATE]);
-
- repbudget_compute(widget, NULL);
- repbudget_update_daterange(widget, NULL);
- }
-}
-
-
-static void repbudget_update_daterange(GtkWidget *widget, gpointer user_data)
-{
-struct repbudget_data *data;
-gchar *daterange;
-
- DB( g_print("(repbudget) 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 repbudget_toggle_detail(GtkWidget *widget, gpointer user_data)
-{
-struct repbudget_data *data;
-
- data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
-
- DB( g_print("(repbudget) toggle detail\n") );
-
- data->detail ^= 1;
-
- repbudget_update_detail(widget, user_data);
-
-}
-
-static void repbudget_update_detail(GtkWidget *widget, gpointer user_data)
-{
-struct repbudget_data *data;
-
- data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
-
- DB( g_print("(repbudget) update detail\n") );
-
- 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_BUDGET_KEY, &key, -1);
-
- //DB( g_print(" - active is %d\n", pos) );
-
- repbudget_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 repbudget_detail(GtkWidget *widget, gpointer user_data)
-{
-struct repbudget_data *data;
-guint active = GPOINTER_TO_INT(user_data);
-GList *list;
-guint tmpfor;
-GtkTreeModel *model;
-GtkTreeIter iter;
-
- data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
-
- DB( g_print("(repbudget) detail\n") );
-
- if(data->detail)
- {
- /* 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));
- 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 */
-
- tmpfor = gtk_combo_box_get_active(GTK_COMBO_BOX(data->CY_for));
-
- /* fill in the model */
- list = g_list_first(GLOBALS->ope_list);
- while (list != NULL)
- {
- Account *acc;
- Transaction *ope = list->data;
-
- //DB( g_print(" get %s\n", ope->ope_Word) );
-
- acc = da_acc_get(ope->kacc);
- if(acc != NULL)
- {
- if((acc->flags & AF_CLOSED)) goto next1;
- if((acc->flags & AF_NOBUDGET)) goto next1;
- }
-
- //filter here
- if( !(ope->flags & OF_REMIND) && (ope->date >= data->filter->mindate) && (ope->date <= data->filter->maxdate))
- {
- guint pos = 0;
- gboolean insert = FALSE;
-
- if( ope->flags & OF_SPLIT )
- {
- guint nbsplit = da_transaction_splits_count(ope);
- Split *split;
- guint i;
-
- for(i=0;i<nbsplit;i++)
- {
- split = ope->splits[i];
- switch(tmpfor)
- {
- case BUDG_CATEGORY:
- {
- Category *catentry = da_cat_get(split->kcat);
- if(catentry)
- pos = (catentry->flags & GF_SUB) ? catentry->parent : catentry->key;
- }
- break;
- case BUDG_SUBCATEGORY:
- pos = split->kcat;
- break;
- }
-
- if( pos == active )
- { insert = TRUE; break; }
- }
- }
- else
- {
- switch(tmpfor)
- {
- case BUDG_CATEGORY:
- {
- Category *catentry = da_cat_get(ope->kcat);
- if(catentry)
- pos = (catentry->flags & GF_SUB) ? catentry->parent : catentry->key;
- }
- break;
- case BUDG_SUBCATEGORY:
- pos = ope->kcat;
- break;
- }
-
- if( pos == active )
- insert = TRUE;
- }
-
- //insert
- if( insert == TRUE )
- {
-
- gtk_list_store_append (GTK_LIST_STORE(model), &iter);
- gtk_list_store_set (GTK_LIST_STORE(model), &iter,
- LST_DSPOPE_DATAS, ope,
- -1);
- }
-
- }
-next1:
- 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);
-
- }
-
-}
-
-
-static void repbudget_compute(GtkWidget *widget, gpointer user_data)
-{
-struct repbudget_data *data;
-
-gint tmpfor, tmpkind, tmpview;
-guint32 mindate, maxdate;
-
-GtkTreeModel *model;
-GtkTreeIter iter;
-GList *list;
-guint n_result, id, column;
-gdouble *tmp_spent, *tmp_budget, *tmp_hasbudget;
-gint nbmonth = 1;
-
- DB( g_print("(repbudget) 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_for));
- tmpkind = gtk_combo_box_get_active(GTK_COMBO_BOX(data->CY_kind));
- tmpview = gtk_combo_box_get_active(GTK_COMBO_BOX(data->CY_view));
-
- mindate = data->filter->mindate;
- maxdate = data->filter->maxdate;
- if(maxdate < mindate) return;
-
- DB( g_print(" kind=%d,view=%d\n", tmpkind, tmpview) );
-
-
- /* do nothing if no transaction */
- if(g_list_length(GLOBALS->ope_list) == 0) return;
-
- nbmonth = countmonth(mindate, maxdate);
- DB( g_print(" date: min=%d max=%d nbmonth=%d\n", mindate, maxdate, nbmonth) );
-
- n_result = da_cat_get_max_key();
- DB( g_print(" nbcat=%d\n", n_result) );
-
- /* allocate some memory */
- tmp_spent = g_malloc0((n_result+1) * sizeof(gdouble));
- tmp_budget = g_malloc0((n_result+1) * sizeof(gdouble));
- tmp_hasbudget = g_malloc0((n_result+1) * sizeof(gdouble));
-
- if(tmp_spent && tmp_budget && tmp_hasbudget)
- {
- guint i = 0;
- /* compute the results */
- data->total_spent = 0.0;
- data->total_budget = 0.0;
-
-
- /* compute budget for each category */
- //fixed #328034: here <=n_result
- for(i=0, id=0; i<=n_result; i++)
- {
- Category *entry;
- //gchar buffer[128];
- gint pos;
-
- entry = da_cat_get(i);
- if( entry == NULL)
- continue;
-
- //debug
- #if MYDEBUG == 1
-
- gint k;
-
- g_print("--------\n");
-
- g_print("+ %s", entry->name);
- for(k=0;k<13;k++)
- g_print( "%d[%.2f] ", k, entry->budget[k]);
- g_print("\n");
-
- #endif
-
- pos = 0;
- switch(tmpfor)
- {
- case BUDG_CATEGORY:
- {
- Category *catentry = da_cat_get(i);
- if(catentry)
- pos = (catentry->flags & GF_SUB) ? catentry->parent : catentry->key;
- }
- break;
- case BUDG_SUBCATEGORY:
- pos = i;
- break;
- }
-
- DB( g_print(" ** budget for %d '%s'\n", entry->key, entry->name) );
-
- // same value each month ?
- if(!(entry->flags & GF_CUSTOM))
- {
- //DB( g_print(" cat %s -> monthly %.2f\n", entry->name, entry->budget[0]) );
- tmp_budget[pos] += entry->budget[0]*nbmonth;
- tmp_hasbudget[i] += entry->budget[0]*nbmonth;
- }
- //otherwise sum each month from mindate month
- else
- {
- gint month = getmonth(mindate);
- gint j;
-
- for(j=0;j<nbmonth;j++)
- {
- DB( g_print(" %d, cat %s -> custom : month=%d budg=%.2f\n", j, entry->name, month, entry->budget[month]) );
-
- tmp_budget[pos] += entry->budget[month];
- tmp_hasbudget[i] += entry->budget[month];
- month++;
- if(month > 12) month = 1;
- }
- }
-
- //debug
- #if MYDEBUG == 1
- if( tmp_budget[pos] )
- {
- g_print(" -> cat %d %s, budg[%d]=%.2f hasbudg[%d]=%.2f\n",
- entry->key, entry->name, pos, tmp_budget[pos], i, tmp_hasbudget[i]);
- }
-
- #endif
-
-
-
- }
-
-
- // compute spent for each transaction */
- DB( g_print(" ** compute spent for each categories\n") );
-
-
- list = g_list_first(GLOBALS->ope_list);
- while (list != NULL)
- {
- Transaction *ope = list->data;
- Account *acc;
-
- //DB( g_print("%d, get ope: %s :: acc=%d, cat=%d, mnt=%.2f\n", i, ope->wording, ope->account, ope->category, ope->amount) );
-
- acc = da_acc_get(ope->kacc);
-
- if(acc == NULL) goto next1;
- if((acc->flags & (AF_CLOSED|AF_NOREPORT))) goto next1;
- if((acc->flags & AF_NOBUDGET)) goto next1;
-
- if( !(ope->flags & OF_REMIND) && ope->date >= mindate && ope->date <= maxdate)
- {
- gint pos = 0;
- gdouble trn_amount;
-
- if( ope->flags & OF_SPLIT )
- {
- guint nbsplit = da_transaction_splits_count(ope);
- Split *split;
-
- for(i=0;i<nbsplit;i++)
- {
- split = ope->splits[i];
- switch(tmpfor)
- {
- case BUDG_CATEGORY:
- {
- Category *catentry = da_cat_get(split->kcat);
- if(catentry)
- pos = (catentry->flags & GF_SUB) ? catentry->parent : catentry->key;
- }
- break;
- case BUDG_SUBCATEGORY:
- pos = split->kcat;
- break;
- }
-
- //trn_amount = to_base_amount(split->amount, acc->kcur);
- trn_amount = split->amount;
-
-
- DB( g_print(" -> affecting split %.2f to cat %d\n", trn_amount, pos) );
-
- tmp_spent[pos] += trn_amount;
-
- }
- }
- else
- {
- switch(tmpfor)
- {
- case BUDG_CATEGORY:
- {
- Category *catentry = da_cat_get(ope->kcat);
- if(catentry)
- pos = (catentry->flags & GF_SUB) ? catentry->parent : catentry->key;
- }
- break;
- case BUDG_SUBCATEGORY:
- pos = ope->kcat;
- break;
- }
-
- //trn_amount = to_base_amount(ope->amount, acc->kcur);
- trn_amount = ope->amount;
-
- DB( g_print(" -> affecting %.2f to cat %d\n", trn_amount, pos) );
-
- tmp_spent[pos] += trn_amount;
-
- }
-
-
- }
-
-
-next1:
- list = g_list_next(list);
- i++;
- }
-
-
-
-
-
- DB( g_print("clear and detach model\n") );
-
- /* 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, id=0; i<=n_result; i++)
- {
- gchar *name, *fullcatname;
- Category *entry;
-
- fullcatname = NULL;
-
-
- entry = da_cat_get(i);
- if( entry == NULL)
- continue;
-
- 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->name;
-
- if(name == NULL) name = "(None)";
-
- if( (tmpfor == BUDG_CATEGORY && !(entry->flags & GF_SUB)) || (tmpfor == BUDG_SUBCATEGORY) )
- {
- guint pos;
-
-
-
- pos = 0;
- switch(tmpfor)
- {
- case BUDG_CATEGORY:
- {
- Category *catentry = da_cat_get(i);
- if(catentry)
- pos = (catentry->flags & GF_SUB) ? catentry->parent : catentry->key;
- }
- break;
- case BUDG_SUBCATEGORY:
- pos = i;
- break;
- }
-
- // display expense or income (filter on amount and not category hupothetical flag
- //if( tmpkind != (entry->flags & GF_INCOME)) continue;
- if( tmpkind == 1 && tmp_budget[pos] > 0)
- continue;
-
- if( tmpkind == 2 && tmp_budget[pos] < 0)
- continue;
-
-
- if(tmp_budget[pos] || entry->flags & GF_FORCED /*|| tmp_spent[pos]*/)
- {
- gdouble result;
-
- result = budget_compute_result(tmp_budget[pos], tmp_spent[pos]);
-
- DB( g_print(" inserting %i, %s, %.2f %.2f %.2f\n", i, name, tmp_spent[pos], tmp_budget[pos], result) );
-
- gtk_list_store_append (GTK_LIST_STORE(model), &iter);
- gtk_list_store_set (GTK_LIST_STORE(model), &iter,
- LST_BUDGET_POS, id++,
- LST_BUDGET_KEY, pos,
- LST_BUDGET_NAME, name,
- LST_BUDGET_SPENT, tmp_spent[pos],
- LST_BUDGET_BUDGET, tmp_budget[pos],
- LST_BUDGET_RESULT, result,
- -1);
-
- data->total_spent += tmp_spent[pos];
- data->total_budget += tmp_budget[pos];
- }
- }
-
- g_free(fullcatname);
-
-
- }
-
-
- /* Re-attach model to view */
- gtk_tree_view_set_model(GTK_TREE_VIEW(data->LV_report), model);
- g_object_unref(model);
-
-
-
- repbudget_update_total(widget, NULL);
-
- column = LST_BUDGET_SPENT+tmpview-1;
-
- /* update bar chart */
- DB( g_print(" set bar to %d\n\n", column) );
-
- //gtk_chart_set_currency(GTK_CHART(data->RE_bar), GLOBALS->kcur);
-
- /* set chart color scheme */
- gtk_chart_set_color_scheme(GTK_CHART(data->RE_bar), PREFS->report_color_scheme);
-
- if( tmpview == 0 )
- gtk_chart_set_dualdatas(GTK_CHART(data->RE_bar), model, LST_BUDGET_SPENT, LST_BUDGET_BUDGET, _(CYA_BUDGETSELECT[tmpview]));
- else
- gtk_chart_set_datas(GTK_CHART(data->RE_bar), model, column, _(CYA_BUDGETSELECT[tmpview]));
-
- }
-
-
- //DB( g_print(" inserting %i, %f %f\n", i, total_expense, total_income) );
-
- /* free our memory */
- g_free(tmp_spent);
- g_free(tmp_budget);
- g_free(tmp_hasbudget);
-
-
-}
-
-
-static void repbudget_update_total(GtkWidget *widget, gpointer user_data)
-{
-struct repbudget_data *data;
-
- DB( g_print("(repbudget) update total\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));
-
- /*
- hb_label_set_colvaluecurr(GTK_LABEL(data->TX_total[0]), data->total_spent, GLOBALS->kcur);
- hb_label_set_colvaluecurr(GTK_LABEL(data->TX_total[1]), data->total_budget, GLOBALS->kcur);
- hb_label_set_colvaluecurr(GTK_LABEL(data->TX_total[2]), budget_compute_result(data->total_budget, data->total_spent), GLOBALS->kcur);
- */
- hb_label_set_colvalue(GTK_LABEL(data->TX_total[0]), data->total_spent, GLOBALS->minor);
- hb_label_set_colvalue(GTK_LABEL(data->TX_total[1]), data->total_budget, GLOBALS->minor);
- hb_label_set_colvalue(GTK_LABEL(data->TX_total[2]), budget_compute_result(data->total_budget, data->total_spent), GLOBALS->minor);
-
-
-}
-
-
-/*
-** update sensitivity
-*/
-static void repbudget_sensitive(GtkWidget *widget, gpointer user_data)
-{
-struct repbudget_data *data;
-gboolean active;
-gboolean sensitive;
-gint page;
-
- DB( g_print("(repbudget) sensitive\n") );
-
- data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
-
- active = gtk_tree_selection_get_selected(gtk_tree_view_get_selection(GTK_TREE_VIEW(data->LV_report)), NULL, NULL);
-
- page = gtk_notebook_get_current_page(GTK_NOTEBOOK(data->GR_result));
-
- sensitive = page == 0 ? active : FALSE;
-// gtk_widget_set_sensitive(data->TB_buttons[ACTION_REPBUDGET_DETAIL], sensitive);
- gtk_action_set_sensitive(gtk_ui_manager_get_action(data->ui, "/ToolBar/Detail"), sensitive);
-
- sensitive = page == 0 ? FALSE : TRUE;
- gtk_widget_set_sensitive(data->CY_view, sensitive);
- gtk_widget_set_sensitive(data->RG_zoomx, sensitive);
-// gtk_widget_set_sensitive(data->TB_buttons[ACTION_REPBUDGET_LEGEND], sensitive);
- gtk_action_set_sensitive(gtk_ui_manager_get_action(data->ui, "/ToolBar/Legend"), sensitive);
-
-}
-
-
-
-/*
-** change the chart legend visibility
-*/
-static void repbudget_toggle_legend(GtkWidget *widget, gpointer user_data)
-{
-struct repbudget_data *data;
-
- DB( g_print("(repbudget) legend\n") );
-
- data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
-
- //active = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(data->CM_legend));
- data->legend ^= 1;
-
- gtk_chart_show_legend(GTK_CHART(data->RE_bar), data->legend, FALSE);
-
-}
-
-static void repbudget_zoomx_callback(GtkWidget *widget, gpointer user_data)
-{
-struct repbudget_data *data;
-gdouble value;
-
- DB( g_print("(repbudget) 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_bar), value);
-
-}
-
-static void repbudget_toggle(GtkWidget *widget, gpointer user_data)
-{
-struct repbudget_data *data;
-gboolean minor;
-
- DB( g_print("(repbudget) toggle\n") );
-
- data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
-
- repbudget_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);
-
-}
-
-static void repbudget_setup(struct repbudget_data *data)
-{
- DB( g_print("(repbudget) setup\n") );
-
- data->detail = PREFS->budg_showdetail;
- data->legend = 1;
-
-
- data->filter = da_filter_malloc();
- filter_default_all_set(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);
-
- g_signal_handler_block(data->PO_mindate, data->handler_id[HID_MINDATE]);
- g_signal_handler_block(data->PO_maxdate, data->handler_id[HID_MAXDATE]);
-
- gtk_dateentry_set_date(GTK_DATE_ENTRY(data->PO_mindate), data->filter->mindate);
- gtk_dateentry_set_date(GTK_DATE_ENTRY(data->PO_maxdate), data->filter->maxdate);
-
- g_signal_handler_unblock(data->PO_mindate, data->handler_id[HID_MINDATE]);
- g_signal_handler_unblock(data->PO_maxdate, data->handler_id[HID_MAXDATE]);
-
-}
-
-
-static void repbudget_selection(GtkTreeSelection *treeselection, gpointer user_data)
-{
-GtkTreeModel *model;
-GtkTreeIter iter;
-guint key;
-
- DB( g_print("(repbudget) selection\n") );
-
- if (gtk_tree_selection_get_selected(treeselection, &model, &iter))
- {
- gtk_tree_model_get(model, &iter, LST_BUDGET_KEY, &key, -1);
-
- DB( g_print(" - active is %d\n", key) );
-
- repbudget_detail(GTK_WIDGET(gtk_tree_selection_get_tree_view (treeselection)), GINT_TO_POINTER(key));
- }
-
- repbudget_sensitive(GTK_WIDGET(gtk_tree_selection_get_tree_view (treeselection)), NULL);
-}
-/*
-**
-*/
-static gboolean repbudget_window_dispose(GtkWidget *widget, GdkEvent *event, gpointer user_data)
-{
-struct repbudget_data *data = user_data;
-struct WinGeometry *wg;
-
- DB( g_print("(repbudget) start dispose\n") );
-
- da_filter_free(data->filter);
-
- g_free(data);
-
- //store position and size
- wg = &PREFS->bud_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));
-
- DB( g_print("(repbudget) end dispose\n") );
-
- return FALSE;
-}
-
-
-// the window creation
-GtkWidget *repbudget_window_new(void)
-{
-struct repbudget_data *data;
-struct WinGeometry *wg;
-GtkWidget *window, *mainvbox, *hbox, *vbox, *notebook, *treeview;
-GtkWidget *label, *widget, *table, *alignment, *entry;
-gint row;
-GtkUIManager *ui;
-GtkActionGroup *actions;
-GtkAction *action;
-GError *error = NULL;
-
- data = g_malloc0(sizeof(struct repbudget_data));
- if(!data) return NULL;
-
- DB( g_print("(repbudget) new\n") );
-
- //disable define windows
- GLOBALS->define_off++;
- ui_mainwindow_update(GLOBALS->mainwindow, GINT_TO_POINTER(2));
-
- /* 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);
-
- gtk_window_set_title (GTK_WINDOW (window), _("Budget report"));
-
- //set the window icon
- //homebank_window_set_icon_from_file(GTK_WINDOW (window), "report_budget.svg");
- gtk_window_set_icon_name(GTK_WINDOW (window), HB_STOCK_REP_BUDGET);
-
-
- //window contents
- mainvbox = gtk_vbox_new (FALSE, 0);
- gtk_container_add (GTK_CONTAINER (window), mainvbox);
-
- hbox = gtk_hbox_new(FALSE, 0);
- gtk_box_pack_start (GTK_BOX (mainvbox), hbox, TRUE, TRUE, 0);
-
- //control part
- table = gtk_table_new (9, 3, FALSE);
- // gtk_alignment_new(xalign, yalign, xscale, yscale)
- alignment = gtk_alignment_new(0.0, 0.0, 0.0, 0.0);
- gtk_container_add(GTK_CONTAINER(alignment), table);
- gtk_box_pack_start (GTK_BOX (hbox), alignment, FALSE, FALSE, 0);
-
- gtk_container_set_border_width (GTK_CONTAINER (table), HB_BOX_SPACING);
- gtk_table_set_row_spacings (GTK_TABLE (table), HB_TABROW_SPACING);
- gtk_table_set_col_spacings (GTK_TABLE (table), HB_TABCOL_SPACING);
-
- row = 0;
- label = make_label(_("Display"), 0.0, 0.5);
- gimp_label_set_attributes(GTK_LABEL(label), PANGO_ATTR_WEIGHT, PANGO_WEIGHT_BOLD, -1);
- gtk_table_attach_defaults (GTK_TABLE (table), label, 0, 3, row, row+1);
-
- row++;
- label = make_label(_("_For:"), 0, 0.5);
- gtk_table_attach (GTK_TABLE (table), label, 1, 2, row, row+1, (GtkAttachOptions) (GTK_FILL), (GtkAttachOptions) (0), 0, 0);
- widget = make_cycle(label, CYA_BUDGSELECT);
- data->CY_for = widget;
- gtk_table_attach_defaults (GTK_TABLE (table), data->CY_for, 2, 3, row, row+1);
-
-
- row++;
- label = make_label(_("_Kind:"), 0, 0.5);
- gtk_table_attach (GTK_TABLE (table), label, 1, 2, row, row+1, (GtkAttachOptions) (GTK_FILL), (GtkAttachOptions) (0), 0, 0);
- widget = make_cycle(label, CYA_KIND);
- data->CY_kind = widget;
- gtk_table_attach_defaults (GTK_TABLE (table), data->CY_kind, 2, 3, row, row+1);
-
- row++;
- label = make_label(_("_View:"), 0, 0.5);
- gtk_table_attach (GTK_TABLE (table), label, 1, 2, row, row+1, (GtkAttachOptions) (GTK_FILL), (GtkAttachOptions) (0), 0, 0);
- widget = make_cycle(label, CYA_BUDGETSELECT);
- data->CY_view = widget;
- gtk_table_attach_defaults (GTK_TABLE (table), data->CY_view, 2, 3, row, row+1);
-
- row++;
- widget = gtk_check_button_new_with_mnemonic (_("_Minor currency"));
- data->CM_minor = widget;
- gtk_table_attach_defaults (GTK_TABLE (table), widget, 1, 3, row, row+1);
-
- row++;
- label = make_label(_("_Zoom X:"), 0, 0.5);
- gtk_table_attach (GTK_TABLE (table), label, 1, 2, row, row+1, (GtkAttachOptions) (GTK_FILL), (GtkAttachOptions) (0), 0, 0);
- widget = make_scale(label);
- data->RG_zoomx = widget;
- gtk_table_attach_defaults (GTK_TABLE (table), widget, 2, 3, row, row+1);
-
- row++;
- widget = gtk_hseparator_new();
- gtk_table_attach_defaults (GTK_TABLE (table), widget, 0, 3, row, row+1);
-
- row++;
- label = make_label(_("Date filter"), 0.0, 0.5);
- gimp_label_set_attributes(GTK_LABEL(label), PANGO_ATTR_WEIGHT, PANGO_WEIGHT_BOLD, -1);
- gtk_table_attach_defaults (GTK_TABLE (table), label, 0, 3, row, row+1);
-
- row++;
- label = make_label(_("_Range:"), 0, 0.5);
- gtk_table_attach (GTK_TABLE (table), label, 1, 2, row, row+1, (GtkAttachOptions) (GTK_FILL), (GtkAttachOptions) (0), 0, 0);
- data->CY_range = make_daterange(label, FALSE);
- gtk_table_attach_defaults (GTK_TABLE (table), data->CY_range, 2, 3, row, row+1);
-
- row++;
- label = make_label(_("_From:"), 0, 0.5);
- gtk_table_attach (GTK_TABLE (table), label, 1, 2, row, row+1, (GtkAttachOptions) (GTK_FILL), (GtkAttachOptions) (0), 0, 0);
- data->PO_mindate = gtk_dateentry_new();
- gtk_table_attach_defaults (GTK_TABLE (table), data->PO_mindate, 2, 3, row, row+1);
-
- row++;
- label = make_label(_("_To:"), 0, 0.5);
- gtk_table_attach (GTK_TABLE (table), label, 1, 2, row, row+1, (GtkAttachOptions) (GTK_FILL), (GtkAttachOptions) (0), 0, 0);
- data->PO_maxdate = gtk_dateentry_new();
- gtk_table_attach_defaults (GTK_TABLE (table), data->PO_maxdate, 2, 3, row, row+1);
-
-
- //part: info + report
- vbox = gtk_vbox_new (FALSE, 0);
- gtk_box_pack_start (GTK_BOX (hbox), vbox, TRUE, TRUE, 0);
-
- //ui manager
- actions = gtk_action_group_new ("Account");
-
- //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);
-
- 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, "Bar");
- 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->budg_showdetail, 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;
-
- //toolbar
- data->TB_bar = gtk_ui_manager_get_widget (ui, "/ToolBar");
- gtk_box_pack_start (GTK_BOX (vbox), data->TB_bar, FALSE, FALSE, 0);
-
- //infos
- hbox = gtk_hbox_new (FALSE, HB_BOX_SPACING);
- gtk_container_set_border_width (GTK_CONTAINER(hbox), HB_BOX_SPACING);
- 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(_("Result:"));
- 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(_("Budget:"));
- 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(_("Spent:"));
- gtk_box_pack_end (GTK_BOX (hbox), label, FALSE, FALSE, 0);
-
-
- 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
-
- vbox = gtk_vbox_new (FALSE, 0);
- gtk_notebook_append_page(GTK_NOTEBOOK(notebook), vbox, NULL);
-
- 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_budget();
- data->LV_report = treeview;
- gtk_container_add (GTK_CONTAINER(widget), treeview);
- gtk_box_pack_start (GTK_BOX (vbox), widget, TRUE, TRUE, 0);
-
- //detail
- widget = gtk_scrolled_window_new (NULL, NULL);
- data->GR_detail = widget;
- 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_transaction(TRN_LIST_TYPE_DETAIL, PREFS->lst_ope_columns);
- data->LV_detail = treeview;
- gtk_container_add (GTK_CONTAINER(widget), treeview);
-
- gtk_box_pack_start (GTK_BOX (vbox), widget, TRUE, TRUE, 0);
-
- //page: 2d bar
- widget = gtk_chart_new(CHART_TYPE_COL);
- data->RE_bar = widget;
- //gtk_chart_set_minor_prefs(GTK_CHART(widget), PREFS->euro_value, PREFS->minor_cur.suffix_symbol);
- gtk_notebook_append_page(GTK_NOTEBOOK(notebook), widget, NULL);
-
- //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);
- 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 (repbudget_window_dispose), (gpointer)data);
-
- g_signal_connect (data->CM_minor, "toggled", G_CALLBACK (repbudget_toggle), NULL);
-
-
- data->handler_id[HID_RANGE] = g_signal_connect (data->CY_range, "changed", G_CALLBACK (repbudget_range_change), NULL);
-
- g_signal_connect (data->CY_for , "changed", G_CALLBACK (repbudget_compute), (gpointer)data);
- g_signal_connect (data->CY_kind, "changed", G_CALLBACK (repbudget_compute), (gpointer)data);
- g_signal_connect (data->CY_view, "changed", G_CALLBACK (repbudget_compute), (gpointer)data);
-
- g_signal_connect (data->RG_zoomx, "value-changed", G_CALLBACK (repbudget_zoomx_callback), NULL);
-
- data->handler_id[HID_MINDATE] = g_signal_connect (data->PO_mindate, "changed", G_CALLBACK (repbudget_date_change), (gpointer)data);
- data->handler_id[HID_MAXDATE] = g_signal_connect (data->PO_maxdate, "changed", G_CALLBACK (repbudget_date_change), (gpointer)data);
-
- g_signal_connect (gtk_tree_view_get_selection(GTK_TREE_VIEW(data->LV_report)), "changed", G_CALLBACK (repbudget_selection), NULL);
-
- //setup, init and show window
- repbudget_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->bud_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);
-
- //check for any account included into the budget or warn
- {
- guint count =0;
- GList *lacc, *list;
-
- lacc = list = g_hash_table_get_values(GLOBALS->h_acc);
-
- while (list != NULL)
- {
- Account *acc;
- acc = list->data;
- if((acc->flags & (AF_CLOSED|AF_NOREPORT))) goto next1;
- if(!(acc->flags & AF_NOBUDGET))
- count++;
- next1:
- list = g_list_next(list);
- }
- g_list_free(lacc);
-
- if(count <= 0)
- {
- ui_dialog_msg_infoerror(GTK_WINDOW(data->window), GTK_MESSAGE_WARNING,
- _("No account is defined to be part of the budget."),
- _("You should include some accounts from the account dialog.")
- );
- }
-
-
-
- }
-
-
-
- //gtk_widget_hide(data->GR_detail);
-
- repbudget_sensitive(window, NULL);
- repbudget_update_detail(window, NULL);
-
- if( PREFS->date_range_rep != 0)
- gtk_combo_box_set_active(GTK_COMBO_BOX(data->CY_range), PREFS->date_range_rep);
- else
- repbudget_compute(window, NULL);
-
- return(window);
-}
-
-/*
-** ============================================================================
-*/
-static void budget_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];
-gint column_id = GPOINTER_TO_INT(user_data);
-
- gtk_tree_model_get(model, iter, column_id, &value, -1);
-
- if( value )
- {
- mystrfmon(buf, G_ASCII_DTOSTR_BUF_SIZE-1, value, GLOBALS->minor);
- //hb_strfmon(buf, G_ASCII_DTOSTR_BUF_SIZE-1, value, GLOBALS->kcur);
-
- if( column_id == LST_BUDGET_RESULT)
- color = get_minimum_color_amount (value, 0.0);
- else
- color = get_normal_color_amount(value);
-
- g_object_set(renderer,
- "foreground", color,
- "text", buf,
- NULL);
- }
- else
- {
- g_object_set(renderer, "text", "", NULL);
- }
-}
-
-
-static GtkTreeViewColumn *amount_list_budget_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, budget_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_budget(void)
-{
-GtkListStore *store;
-GtkWidget *view;
-GtkCellRenderer *renderer;
-GtkTreeViewColumn *column;
-
- /* create list store */
- store = gtk_list_store_new(
- NUM_LST_BUDGET,
- G_TYPE_INT,
- G_TYPE_INT,
- G_TYPE_STRING,
- 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_rules_hint (GTK_TREE_VIEW (view), PREFS->rules_hint);
-
- /* column: Name */
- column = gtk_tree_view_column_new();
- gtk_tree_view_column_set_title(column, _("Category"));
- 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_BUDGET_NAME);
- //gtk_tree_view_column_set_sort_column_id (column, LST_STAT_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 = amount_list_budget_column(_("Spent"), LST_BUDGET_SPENT);
- gtk_tree_view_append_column (GTK_TREE_VIEW(view), column);
-
- /* column: Income */
- column = amount_list_budget_column(_("Budget"), LST_BUDGET_BUDGET);
- gtk_tree_view_append_column (GTK_TREE_VIEW(view), column);
-
- /* column: Result */
- column = amount_list_budget_column(_("Result"), LST_BUDGET_RESULT);
- 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_BUDGET_POS , stat_list_compare_func, GINT_TO_POINTER(LST_BUDGET_POS), NULL);
- gtk_tree_sortable_set_sort_func(GTK_TREE_SORTABLE(store), LST_BUDGET_SPENT , stat_list_compare_func, GINT_TO_POINTER(LST_BUDGET_SPENT), NULL);
- gtk_tree_sortable_set_sort_func(GTK_TREE_SORTABLE(store), LST_BUDGET_BUDGET, stat_list_compare_func, GINT_TO_POINTER(LST_BUDGET_BUDGET), NULL);
- gtk_tree_sortable_set_sort_func(GTK_TREE_SORTABLE(store), LST_BUDGET_RESULT , stat_list_compare_func, GINT_TO_POINTER(LST_BUDGET_RESULT), NULL);
-*/
-
- return(view);
-}
-