/* 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 .
*/
#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 =
""
" "
" "
" "
" "
" "
" "
" "
" "
" "
"";
/* 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;isplits[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 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;isplits[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);
}