1 /* HomeBank -- Free, easy, personal accounting for everyone.
2 * Copyright (C) 1995-2018 Maxime DOYEN
4 * This file is part of HomeBank.
6 * HomeBank is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
11 * HomeBank is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
16 * You should have received a copy of the GNU General Public License
17 * along with this program. If not, see <http://www.gnu.org/licenses/>.
23 #include "rep_budget.h"
25 #include "list_operation.h"
26 #include "gtk-chart-stack.h"
27 #include "gtk-dateentry.h"
29 #include "dsp_mainwindow.h"
30 #include "ui-transaction.h"
33 /****************************************************************************/
35 /****************************************************************************/
46 /* our global datas */
47 extern struct HomeBank
*GLOBALS
;
48 extern struct Preferences
*PREFS
;
51 static void repbudget_action_viewlist(GtkAction
*action
, gpointer user_data
);
52 static void repbudget_action_viewstack(GtkAction
*action
, gpointer user_data
);
53 static void repbudget_action_detail(GtkAction
*action
, gpointer user_data
);
54 static void repbudget_action_refresh(GtkAction
*action
, gpointer user_data
);
56 static void repbudget_date_change(GtkWidget
*widget
, gpointer user_data
);
57 static void repbudget_range_change(GtkWidget
*widget
, gpointer user_data
);
58 static void repbudget_toggle_detail(GtkWidget
*widget
, gpointer user_data
);
59 static void repbudget_detail(GtkWidget
*widget
, gpointer user_data
);
60 static void repbudget_compute(GtkWidget
*widget
, gpointer user_data
);
61 static void repbudget_update_total(GtkWidget
*widget
, gpointer user_data
);
62 static void repbudget_sensitive(GtkWidget
*widget
, gpointer user_data
);
63 static void repbudget_toggle(GtkWidget
*widget
, gpointer user_data
);
64 static GtkWidget
*create_list_budget(void);
65 static void repbudget_update_detail(GtkWidget
*widget
, gpointer user_data
);
66 static void repbudget_update_daterange(GtkWidget
*widget
, gpointer user_data
);
68 static GString
*ui_list_repbudget_to_string(GtkTreeView
*treeview
, gboolean clipboard
);
70 gchar
*CYA_BUDGSELECT
[] = { N_("Category"), N_("Subcategory"), NULL
};
72 gchar
*CYA_KIND
[] = { N_("Exp. & Inc."), N_("Expense"), N_("Income"), NULL
};
74 gchar
*CYA_BUDGETSELECT
[] = { N_("Spent & Budget"), N_("Spent"), N_("Budget"), N_("Result"), NULL
};
77 //extern gchar *CYA_FLT_SELECT[];
80 static GtkRadioActionEntry radio_entries
[] = {
81 { "List" , ICONNAME_HB_VIEW_LIST
, N_("List") , NULL
, N_("View results as list") , 0 },
82 { "Stack" , ICONNAME_HB_VIEW_STACK
, N_("Stack") , NULL
, N_("View results as stack bars"), 1 },
84 static guint n_radio_entries
= G_N_ELEMENTS (radio_entries
);
87 static GtkActionEntry entries
[] = {
88 { "Refresh" , ICONNAME_REFRESH
, N_("Refresh"), NULL
, N_("Refresh results"), G_CALLBACK (repbudget_action_refresh
) },
90 // { "Export" , ICONNAME_HB_FILE_EXPORT , N_("Export") , NULL, N_("Export as CSV"), G_CALLBACK (repbudget_action_export) },
92 static guint n_entries
= G_N_ELEMENTS (entries
);
95 static GtkToggleActionEntry toggle_entries
[] = {
96 { "Detail", ICONNAME_HB_OPE_SHOW
, /* name, icon-name */
97 N_("Detail"), NULL
, /* label, accelerator */
98 N_("Toggle detail"), /* tooltip */
99 G_CALLBACK (repbudget_action_detail
),
100 FALSE
}, /* is_active */
103 static guint n_toggle_entries
= G_N_ELEMENTS (toggle_entries
);
106 static const gchar
*ui_info
=
108 " <toolbar name='ToolBar'>"
109 " <toolitem action='List'/>"
110 " <toolitem action='Stack'/>"
112 " <toolitem action='Detail'/>"
114 " <toolitem action='Refresh'/>"
116 //" <toolitem action='Export'/>"
117 // replaced by a menubutton
123 /* action functions -------------------- */
124 static void repbudget_action_viewlist(GtkAction
*action
, gpointer user_data
)
126 struct repbudget_data
*data
= user_data
;
128 gtk_notebook_set_current_page(GTK_NOTEBOOK(data
->GR_result
), 0);
129 repbudget_sensitive(data
->window
, NULL
);
132 static void repbudget_action_viewstack(GtkAction
*action
, gpointer user_data
)
134 struct repbudget_data
*data
= user_data
;
136 gtk_notebook_set_current_page(GTK_NOTEBOOK(data
->GR_result
), 1);
137 repbudget_sensitive(data
->window
, NULL
);
141 static void repbudget_action_mode (GtkRadioAction
*action
, GtkRadioAction
*current
, gpointer user_data
)
145 value
= gtk_radio_action_get_current_value(GTK_RADIO_ACTION(action
));
149 repbudget_action_viewlist(GTK_ACTION(action
), user_data
);
152 repbudget_action_viewstack(GTK_ACTION(action
), user_data
);
158 static void repbudget_action_detail(GtkAction
*action
, gpointer user_data
)
160 struct repbudget_data
*data
= user_data
;
162 repbudget_toggle_detail(data
->window
, NULL
);
166 static void repbudget_action_refresh(GtkAction
*action
, gpointer user_data
)
168 struct repbudget_data
*data
= user_data
;
170 repbudget_compute(data
->window
, NULL
);
173 /*static void repbudget_action_export(GtkAction *action, gpointer user_data)
175 struct repbudget_data *data = user_data;
177 repbudget_export_csv(data->window, NULL);
180 /* ======================== */
183 static gint
getmonth(guint date
)
188 date1
= g_date_new_julian(date
);
189 month
= g_date_get_month(date1
);
192 g_print("\n[repbudget] getmonth\n");
194 g_date_strftime (buffer1, 128-1, "%x", date1);
195 g_print(" date is '%s', month=%d\n", buffer1, month);
203 static gint
countmonth(guint32 mindate
, guint32 maxdate
)
205 GDate
*date1
, *date2
;
208 date1
= g_date_new_julian(mindate
);
209 date2
= g_date_new_julian(maxdate
);
212 while(g_date_compare(date1
, date2
) < 0)
215 g_date_add_months(date1
, 1);
224 static gdouble
budget_compute_result(gdouble budget
, gdouble spent
)
229 //result = ABS(budget) - ABS(spent);
231 retval
= spent
- budget
;
240 static void repbudget_date_change(GtkWidget
*widget
, gpointer user_data
)
242 struct repbudget_data
*data
;
244 DB( g_print("\n[repbudget] date change\n") );
246 data
= g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget
, GTK_TYPE_WINDOW
)), "inst_data");
248 data
->filter
->mindate
= gtk_date_entry_get_date(GTK_DATE_ENTRY(data
->PO_mindate
));
249 data
->filter
->maxdate
= gtk_date_entry_get_date(GTK_DATE_ENTRY(data
->PO_maxdate
));
251 // set min/max date for both widget
252 gtk_date_entry_set_maxdate(GTK_DATE_ENTRY(data
->PO_mindate
), data
->filter
->maxdate
);
253 gtk_date_entry_set_mindate(GTK_DATE_ENTRY(data
->PO_maxdate
), data
->filter
->mindate
);
255 g_signal_handler_block(data
->CY_range
, data
->handler_id
[HID_REPBUDGET_RANGE
]);
256 gtk_combo_box_set_active(GTK_COMBO_BOX(data
->CY_range
), FLT_RANGE_OTHER
);
257 g_signal_handler_unblock(data
->CY_range
, data
->handler_id
[HID_REPBUDGET_RANGE
]);
260 repbudget_compute(widget
, NULL
);
261 repbudget_update_daterange(widget
, NULL
);
266 static void repbudget_range_change(GtkWidget
*widget
, gpointer user_data
)
268 struct repbudget_data
*data
;
271 DB( g_print("\n[repbudget] range change\n") );
273 data
= g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget
, GTK_TYPE_WINDOW
)), "inst_data");
275 range
= gtk_combo_box_get_active(GTK_COMBO_BOX(data
->CY_range
));
278 if(range
!= FLT_RANGE_OTHER
)
280 filter_preset_daterange_set(data
->filter
, range
, 0);
282 g_signal_handler_block(data
->PO_mindate
, data
->handler_id
[HID_REPBUDGET_MINDATE
]);
283 g_signal_handler_block(data
->PO_maxdate
, data
->handler_id
[HID_REPBUDGET_MAXDATE
]);
285 gtk_date_entry_set_date(GTK_DATE_ENTRY(data
->PO_mindate
), data
->filter
->mindate
);
286 gtk_date_entry_set_date(GTK_DATE_ENTRY(data
->PO_maxdate
), data
->filter
->maxdate
);
288 g_signal_handler_unblock(data
->PO_mindate
, data
->handler_id
[HID_REPBUDGET_MINDATE
]);
289 g_signal_handler_unblock(data
->PO_maxdate
, data
->handler_id
[HID_REPBUDGET_MAXDATE
]);
291 repbudget_compute(widget
, NULL
);
292 repbudget_update_daterange(widget
, NULL
);
297 static void repbudget_update_daterange(GtkWidget
*widget
, gpointer user_data
)
299 struct repbudget_data
*data
;
302 DB( g_print("\n[repbudget] update daterange\n") );
304 data
= g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget
, GTK_TYPE_WINDOW
)), "inst_data");
306 daterange
= filter_daterange_text_get(data
->filter
);
307 gtk_label_set_markup(GTK_LABEL(data
->TX_daterange
), daterange
);
312 static void repbudget_toggle_detail(GtkWidget
*widget
, gpointer user_data
)
314 struct repbudget_data
*data
;
316 data
= g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget
, GTK_TYPE_WINDOW
)), "inst_data");
318 DB( g_print("\n[repbudget] toggle detail\n") );
322 repbudget_update_detail(widget
, user_data
);
327 static void repbudget_detail_onRowActivated (GtkTreeView
*treeview
,
329 GtkTreeViewColumn
*col
,
332 struct repbudget_data
*data
;
333 Transaction
*active_txn
;
336 data
= g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(GTK_WIDGET(treeview
), GTK_TYPE_WINDOW
)), "inst_data");
338 DB( g_print ("\n[repbudget] A detail row has been double-clicked!\n") );
340 active_txn
= list_txn_get_active_transaction(GTK_TREE_VIEW(data
->LV_detail
));
343 Transaction
*old_txn
, *new_txn
;
345 old_txn
= da_transaction_clone (active_txn
);
346 new_txn
= active_txn
;
347 result
= deftransaction_external_edit(GTK_WINDOW(data
->window
), old_txn
, new_txn
);
349 if(result
== GTK_RESPONSE_ACCEPT
)
352 GLOBALS
->changes_count
++;
353 repbudget_compute(data
->window
, NULL
);
356 da_transaction_free (old_txn
);
361 static void repbudget_update_detail(GtkWidget
*widget
, gpointer user_data
)
363 struct repbudget_data
*data
;
365 data
= g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget
, GTK_TYPE_WINDOW
)), "inst_data");
367 DB( g_print("\n[repbudget] update detail\n") );
369 if(GTK_IS_TREE_VIEW(data
->LV_report
))
373 GtkTreeSelection
*treeselection
;
378 treeselection
= gtk_tree_view_get_selection (GTK_TREE_VIEW(data
->LV_report
));
380 if (gtk_tree_selection_get_selected(treeselection
, &model
, &iter
))
382 gtk_tree_model_get(model
, &iter
, LST_BUDGET_KEY
, &key
, -1);
384 //DB( g_print(" - active is %d\n", pos) );
386 repbudget_detail(GTK_WIDGET(gtk_tree_selection_get_tree_view (treeselection
)), GINT_TO_POINTER(key
));
390 gtk_widget_show(data
->GR_detail
);
393 gtk_widget_hide(data
->GR_detail
);
400 static void repbudget_export_result_clipboard(GtkWidget
*widget
, gpointer user_data
)
402 struct repbudget_data
*data
;
403 GtkClipboard
*clipboard
;
406 DB( g_print("\n[repbudget] export result clipboard\n") );
409 //data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
411 node
= ui_list_repbudget_to_string(GTK_TREE_VIEW(data
->LV_report
), TRUE
);
413 clipboard
= gtk_clipboard_get_default(gdk_display_get_default());
414 gtk_clipboard_set_text(clipboard
, node
->str
, node
->len
);
416 g_string_free(node
, TRUE
);
420 static void repbudget_export_result_csv(GtkWidget
*widget
, gpointer user_data
)
422 struct repbudget_data
*data
;
423 gchar
*filename
= NULL
;
429 DB( g_print("\n[repbudget] export result csv\n") );
432 //data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
434 tmpfor
= gtk_combo_box_get_active(GTK_COMBO_BOX(data
->CY_for
));
435 name
= g_strdup_printf("hb-repbudget_%s.csv", CYA_BUDGSELECT
[tmpfor
]);
437 if( ui_file_chooser_csv(GTK_WINDOW(data
->window
), GTK_FILE_CHOOSER_ACTION_SAVE
, &filename
, name
) == TRUE
)
439 DB( g_print(" + filename is %s\n", filename
) );
440 io
= g_io_channel_new_file(filename
, "w", NULL
);
443 node
= ui_list_repbudget_to_string(GTK_TREE_VIEW(data
->LV_report
), FALSE
);
444 g_io_channel_write_chars(io
, node
->str
, -1, NULL
, NULL
);
445 g_io_channel_unref (io
);
446 g_string_free(node
, TRUE
);
454 static void repbudget_export_detail_clipboard(GtkWidget
*widget
, gpointer user_data
)
456 struct repbudget_data
*data
;
457 GtkClipboard
*clipboard
;
460 DB( g_print("\n[repbudget] export detail clipboard\n") );
463 //data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
465 node
= list_txn_to_string(GTK_TREE_VIEW(data
->LV_detail
), TRUE
);
467 clipboard
= gtk_clipboard_get_default(gdk_display_get_default());
468 gtk_clipboard_set_text(clipboard
, node
->str
, node
->len
);
470 g_string_free(node
, TRUE
);
474 static void repbudget_export_detail_csv(GtkWidget
*widget
, gpointer user_data
)
476 struct repbudget_data
*data
;
477 gchar
*filename
= NULL
;
483 DB( g_print("\n[repbudget] export detail csv\n") );
486 //data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
488 tmpfor
= gtk_combo_box_get_active(GTK_COMBO_BOX(data
->CY_for
));
489 name
= g_strdup_printf("hb-repstat-detail_%s.csv", CYA_BUDGSELECT
[tmpfor
]);
491 if( ui_file_chooser_csv(GTK_WINDOW(data
->window
), GTK_FILE_CHOOSER_ACTION_SAVE
, &filename
, name
) == TRUE
)
493 DB( g_print(" + filename is %s\n", filename
) );
495 io
= g_io_channel_new_file(filename
, "w", NULL
);
498 node
= list_txn_to_string(GTK_TREE_VIEW(data
->LV_detail
), FALSE
);
499 g_io_channel_write_chars(io
, node
->str
, -1, NULL
, NULL
);
501 g_io_channel_unref (io
);
502 g_string_free(node
, TRUE
);
514 static void repbudget_detail(GtkWidget
*widget
, gpointer user_data
)
516 struct repbudget_data
*data
;
517 guint active
= GPOINTER_TO_INT(user_data
);
523 data
= g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget
, GTK_TYPE_WINDOW
)), "inst_data");
525 DB( g_print("\n[repbudget] detail\n") );
529 /* clear and detach our model */
530 model
= gtk_tree_view_get_model(GTK_TREE_VIEW(data
->LV_detail
));
531 gtk_list_store_clear (GTK_LIST_STORE(model
));
532 g_object_ref(model
); /* Make sure the model stays with us after the tree view unrefs it */
533 gtk_tree_view_set_model(GTK_TREE_VIEW(data
->LV_detail
), NULL
); /* Detach model from view */
535 tmpfor
= gtk_combo_box_get_active(GTK_COMBO_BOX(data
->CY_for
));
537 /* fill in the model */
538 list
= g_queue_peek_head_link(data
->txn_queue
);
542 Transaction
*ope
= list
->data
;
544 gboolean insert
= FALSE
;
546 //DB( g_print(" get %s\n", ope->ope_Word) );
548 acc
= da_acc_get(ope
->kacc
);
551 if((acc
->flags
& AF_NOBUDGET
)) goto next1
;
555 if( ope
->flags
& OF_SPLIT
)
557 guint nbsplit
= da_splits_count(ope
->splits
);
561 for(i
=0;i
<nbsplit
;i
++)
563 split
= ope
->splits
[i
];
568 Category
*catentry
= da_cat_get(split
->kcat
);
570 pos
= (catentry
->flags
& GF_SUB
) ? catentry
->parent
: catentry
->key
;
573 case BUDG_SUBCATEGORY
:
579 { insert
= TRUE
; break; }
588 Category
*catentry
= da_cat_get(ope
->kcat
);
590 pos
= (catentry
->flags
& GF_SUB
) ? catentry
->parent
: catentry
->key
;
593 case BUDG_SUBCATEGORY
:
606 gtk_list_store_append (GTK_LIST_STORE(model
), &iter
);
607 gtk_list_store_set (GTK_LIST_STORE(model
), &iter
,
608 LST_DSPOPE_DATAS
, ope
,
614 list
= g_list_next(list
);
617 /* Re-attach model to view */
618 gtk_tree_view_set_model(GTK_TREE_VIEW(data
->LV_detail
), model
);
619 g_object_unref(model
);
621 gtk_tree_view_columns_autosize( GTK_TREE_VIEW(data
->LV_detail
) );
628 static void repbudget_compute(GtkWidget
*widget
, gpointer user_data
)
630 struct repbudget_data
*data
;
632 gint tmpfor
, tmpkind
, tmponlyout
;
633 guint32 mindate
, maxdate
;
639 gdouble
*tmp_spent
, *tmp_budget
;
643 DB( g_print("\n[repbudget] compute\n") );
645 data
= g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget
, GTK_TYPE_WINDOW
)), "inst_data");
647 tmpfor
= gtk_combo_box_get_active(GTK_COMBO_BOX(data
->CY_for
));
648 tmpkind
= gtk_combo_box_get_active(GTK_COMBO_BOX(data
->CY_kind
));
649 tmponlyout
= gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(data
->CM_onlyout
));
651 mindate
= data
->filter
->mindate
;
652 maxdate
= data
->filter
->maxdate
;
653 if(maxdate
< mindate
) return;
655 g_queue_free (data
->txn_queue
);
656 data
->txn_queue
= hbfile_transaction_get_partial_budget(data
->filter
->mindate
, data
->filter
->maxdate
);
659 DB( g_print(" for=%d, kind=%d\n", tmpfor
, tmpkind
) );
661 nbmonth
= countmonth(mindate
, maxdate
);
662 DB( g_print(" date: min=%d max=%d nbmonth=%d\n", mindate
, maxdate
, nbmonth
) );
664 n_result
= da_cat_get_max_key();
665 DB( g_print(" nbcat=%d\n", n_result
) );
667 /* allocate some memory */
668 tmp_spent
= g_malloc0((n_result
+1) * sizeof(gdouble
));
669 tmp_budget
= g_malloc0((n_result
+1) * sizeof(gdouble
));
671 if(tmp_spent
&& tmp_budget
)
674 /* compute the results */
675 data
->total_spent
= 0.0;
676 data
->total_budget
= 0.0;
678 /* compute budget for each category */
679 DB( g_print("\n+ compute budget\n") );
681 //fixed #328034: here <=n_result
682 for(i
=1; i
<=n_result
; i
++)
688 entry
= da_cat_get(i
);
692 DB( g_print(" category %d:'%s' issub=%d hasbudget=%d custom=%d\n",
693 entry
->key
, entry
->name
, (entry
->flags
& GF_SUB
), (entry
->flags
& GF_BUDGET
), (entry
->flags
& GF_CUSTOM
)) );
698 g_print(" budget vector: ");
700 g_print( " %d:[%.2f]", k
, entry
->budget
[k
]);
709 Category
*catentry
= da_cat_get(i
);
711 pos
= (catentry
->flags
& GF_SUB
) ? catentry
->parent
: catentry
->key
;
714 case BUDG_SUBCATEGORY
:
719 // same value each month ?
720 if(!(entry
->flags
& GF_CUSTOM
))
722 DB( g_print(" - monthly %.2f\n", entry
->budget
[0]) );
723 tmp_budget
[pos
] += entry
->budget
[0]*nbmonth
;
725 //otherwise sum each month from mindate month
728 gint month
= getmonth(mindate
);
731 DB( g_print(" - custom each month for %d months\n", nbmonth
) );
732 for(j
=0;j
<nbmonth
;j
++) {
733 DB( g_print(" j=%d month=%d budg=%.2f\n", j
, month
, entry
->budget
[month
]) );
734 tmp_budget
[pos
] += entry
->budget
[month
];
744 g_print(" final budget: %d:'%s' : budg[%d]=%.2f\n", entry
->key
, entry
->name
, pos
, tmp_budget
[pos
] );
749 // compute spent for each transaction */
750 DB( g_print("\n+ compute spent from transactions\n") );
753 list
= g_queue_peek_head_link(data
->txn_queue
);
756 Transaction
*ope
= list
->data
;
760 //DB( g_print("%d, get ope: %s :: acc=%d, cat=%d, mnt=%.2f\n", i, ope->memo, ope->account, ope->category, ope->amount) );
762 if( ope
->flags
& OF_SPLIT
)
764 guint nbsplit
= da_splits_count(ope
->splits
);
767 for(i
=0;i
<nbsplit
;i
++)
769 split
= ope
->splits
[i
];
774 Category
*catentry
= da_cat_get(split
->kcat
);
776 pos
= (catentry
->flags
& GF_SUB
) ? catentry
->parent
: catentry
->key
;
779 case BUDG_SUBCATEGORY
:
784 //trn_amount = split->amount;
785 trn_amount
= hb_amount_base(split
->amount
, ope
->kcur
);
787 DB( g_print(" -> affecting split %.2f to cat pos %d\n", trn_amount
, pos
) );
789 tmp_spent
[pos
] += trn_amount
;
799 Category
*catentry
= da_cat_get(ope
->kcat
);
801 pos
= (catentry
->flags
& GF_SUB
) ? catentry
->parent
: catentry
->key
;
804 case BUDG_SUBCATEGORY
:
809 //trn_amount = ope->amount;
810 trn_amount
= hb_amount_base(ope
->amount
, ope
->kcur
);
812 DB( g_print(" -> affecting %.2f to cat pos %d\n", trn_amount
, pos
) );
814 tmp_spent
[pos
] += trn_amount
;
818 list
= g_list_next(list
);
822 DB( g_print("\nclear and detach model\n") );
824 /* clear and detach our model */
825 model
= gtk_tree_view_get_model(GTK_TREE_VIEW(data
->LV_report
));
826 gtk_list_store_clear (GTK_LIST_STORE(model
));
827 g_object_ref(model
); /* Make sure the model stays with us after the tree view unrefs it */
828 gtk_tree_view_set_model(GTK_TREE_VIEW(data
->LV_report
), NULL
); /* Detach model from view */
830 DB( g_print("\n+ insert into treeview\n") );
832 /* insert into the treeview */
833 for(i
=1, id
=0; i
<=n_result
; i
++)
835 gchar
*name
, *fullcatname
;
836 gboolean outofbudget
;
841 entry
= da_cat_get(i
);
845 if(entry
->flags
& GF_SUB
)
847 Category
*parent
= da_cat_get( entry
->parent
);
849 fullcatname
= g_strdup_printf("%s:%s", parent
->name
, entry
->name
);
855 if(name
== NULL
) name
= "(None)";
858 //if( (tmpfor == BUDG_CATEGORY && !(entry->flags & GF_SUB)) || (tmpfor == BUDG_SUBCATEGORY) )
859 if( (tmpfor
== BUDG_CATEGORY
&& !(entry
->flags
& GF_SUB
)) || (tmpfor
== BUDG_SUBCATEGORY
&& (entry
->flags
& GF_SUB
)) )
868 Category
*catentry
= da_cat_get(i
);
870 pos
= (catentry
->flags
& GF_SUB
) ? catentry
->parent
: catentry
->key
;
873 case BUDG_SUBCATEGORY
:
878 // display expense or income (filter on amount and not category hypothetical flag
879 //if( tmpkind != (entry->flags & GF_INCOME)) continue;
880 if( tmpkind
== 1 && tmp_budget
[pos
] > 0)
883 if( tmpkind
== 2 && tmp_budget
[pos
] < 0)
886 //DB( g_print(" eval %d '%s' : spen=%.2f bud=%.2f \n", i, name, tmp_spent[pos], tmp_budget[pos] ) );
888 if((entry
->flags
& (GF_BUDGET
|GF_FORCED
)) || tmp_budget
[pos
] /*|| tmp_spent[pos]*/)
890 gdouble result
, rawrate
;
893 result
= budget_compute_result(tmp_budget
[pos
], tmp_spent
[pos
]);
895 if(ABS(tmp_budget
[pos
]) > 0)
897 rawrate
= tmp_spent
[pos
] / tmp_budget
[pos
];
899 else if(tmp_budget
[pos
] == 0.0)
900 rawrate
= ABS(tmp_spent
[pos
]);
911 if(tmp_budget
[pos
] < 0.0)
913 else if(tmp_budget
[pos
] > 0.0)
915 status
= _(" under");
920 if(tmponlyout
== TRUE
&& outofbudget
== FALSE
)
923 DB( g_print(" => insert %.2f | %.2f = %.2f (%.2f) '%s'\n\n", tmp_spent
[pos
], tmp_budget
[pos
], result
, rawrate
, status
) );
925 gtk_list_store_append (GTK_LIST_STORE(model
), &iter
);
926 gtk_list_store_set (GTK_LIST_STORE(model
), &iter
,
927 LST_BUDGET_POS
, id
++,
929 LST_BUDGET_NAME
, name
,
930 LST_BUDGET_SPENT
, tmp_spent
[pos
],
931 LST_BUDGET_BUDGET
, tmp_budget
[pos
],
932 LST_BUDGET_RESULT
, result
,
933 LST_BUDGET_STATUS
, status
,
937 data
->total_spent
+= tmp_spent
[pos
];
938 data
->total_budget
+= tmp_budget
[pos
];
946 /* update column 0 title */
947 GtkTreeViewColumn
*column
= gtk_tree_view_get_column( GTK_TREE_VIEW(data
->LV_report
), 0);
948 gtk_tree_view_column_set_title(column
, _(CYA_BUDGSELECT
[tmpfor
]));
950 gtk_tree_view_columns_autosize (GTK_TREE_VIEW(data
->LV_report
));
952 /* Re-attach model to view */
953 gtk_tree_view_set_model(GTK_TREE_VIEW(data
->LV_report
), model
);
954 g_object_unref(model
);
957 repbudget_update_total(widget
, NULL
);
959 /* update stack chart */
960 title
= g_strdup_printf(_("Budget for %s"), _(CYA_BUDGSELECT
[tmpfor
]) );
962 ui_chart_stack_set_currency(GTK_CHARTSTACK(data
->RE_stack
), GLOBALS
->kcur
);
964 /* set chart color scheme */
965 ui_chart_stack_set_color_scheme(GTK_CHARTSTACK(data
->RE_stack
), PREFS
->report_color_scheme
);
966 ui_chart_stack_set_dualdatas(GTK_CHARTSTACK(data
->RE_stack
), model
, _("Budget"), _("Result"), title
, NULL
);
971 //DB( g_print(" inserting %i, %f %f\n", i, total_expense, total_income) );
973 /* free our memory */
980 static void repbudget_update_total(GtkWidget
*widget
, gpointer user_data
)
982 struct repbudget_data
*data
;
984 DB( g_print("\n[repbudget] update total\n") );
986 data
= g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget
, GTK_TYPE_WINDOW
)), "inst_data");
988 GLOBALS
->minor
= gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(data
->CM_minor
));
990 hb_label_set_colvalue(GTK_LABEL(data
->TX_total
[0]), data
->total_spent
, GLOBALS
->kcur
, GLOBALS
->minor
);
991 hb_label_set_colvalue(GTK_LABEL(data
->TX_total
[1]), data
->total_budget
, GLOBALS
->kcur
, GLOBALS
->minor
);
992 hb_label_set_colvalue(GTK_LABEL(data
->TX_total
[2]), budget_compute_result(data
->total_budget
, data
->total_spent
), GLOBALS
->kcur
, GLOBALS
->minor
);
999 ** update sensitivity
1001 static void repbudget_sensitive(GtkWidget
*widget
, gpointer user_data
)
1003 struct repbudget_data
*data
;
1005 gboolean visible
, sensitive
;
1008 DB( g_print("\n[repbudget] sensitive\n") );
1010 data
= g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget
, GTK_TYPE_WINDOW
)), "inst_data");
1012 page
= gtk_notebook_get_current_page(GTK_NOTEBOOK(data
->GR_result
));
1014 visible
= page
== 0 ? TRUE
: FALSE
;
1015 action
= gtk_ui_manager_get_action(data
->ui
, "/ToolBar/Detail");
1016 gtk_action_set_visible (action
, visible
);
1017 //sensitive = gtk_tree_selection_get_selected(gtk_tree_view_get_selection(GTK_TREE_VIEW(data->LV_report)), NULL, NULL);
1018 //gtk_action_set_sensitive(action, sensitive);
1019 //action = gtk_ui_manager_get_action(data->ui, "/ToolBar/Export");
1020 //gtk_action_set_visible (action, visible);
1021 hb_widget_visible (data
->BT_export
, visible
);
1023 sensitive
= gtk_tree_model_iter_n_children(gtk_tree_view_get_model(GTK_TREE_VIEW(data
->LV_detail
)), NULL
) > 0 ? TRUE
: FALSE
;
1024 gtk_widget_set_sensitive(data
->MI_detailtoclip
, sensitive
);
1025 gtk_widget_set_sensitive(data
->MI_detailtocsv
, sensitive
);
1030 static void repbudget_toggle(GtkWidget
*widget
, gpointer user_data
)
1032 struct repbudget_data
*data
;
1035 DB( g_print("\n[repbudget] toggle\n") );
1037 data
= g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget
, GTK_TYPE_WINDOW
)), "inst_data");
1039 repbudget_update_total(widget
, NULL
);
1041 //hbfile_update(data->LV_acc, (gpointer)4);
1042 gtk_tree_view_columns_autosize (GTK_TREE_VIEW(data
->LV_report
));
1044 minor
= gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(data
->CM_minor
));
1045 ui_chart_stack_show_minor(GTK_CHARTSTACK(data
->RE_stack
), minor
);
1049 static void repbudget_setup(struct repbudget_data
*data
)
1051 DB( g_print("\n[repbudget] setup\n") );
1053 data
->txn_queue
= g_queue_new ();
1055 data
->filter
= da_filter_malloc();
1056 filter_default_all_set(data
->filter
);
1058 data
->detail
= PREFS
->budg_showdetail
;
1061 /* 3.4 : make int transfer out of stats */
1062 data
->filter
->option
[FILTER_PAYMODE
] = 1;
1063 data
->filter
->paymode
[PAYMODE_INTXFER
] = FALSE
;
1065 filter_preset_daterange_set(data
->filter
, PREFS
->date_range_rep
, 0);
1067 g_signal_handler_block(data
->PO_mindate
, data
->handler_id
[HID_REPBUDGET_MINDATE
]);
1068 g_signal_handler_block(data
->PO_maxdate
, data
->handler_id
[HID_REPBUDGET_MAXDATE
]);
1070 gtk_date_entry_set_date(GTK_DATE_ENTRY(data
->PO_mindate
), data
->filter
->mindate
);
1071 gtk_date_entry_set_date(GTK_DATE_ENTRY(data
->PO_maxdate
), data
->filter
->maxdate
);
1073 g_signal_handler_unblock(data
->PO_mindate
, data
->handler_id
[HID_REPBUDGET_MINDATE
]);
1074 g_signal_handler_unblock(data
->PO_maxdate
, data
->handler_id
[HID_REPBUDGET_MAXDATE
]);
1079 static void repbudget_selection(GtkTreeSelection
*treeselection
, gpointer user_data
)
1081 GtkTreeModel
*model
;
1085 DB( g_print("\n[repbudget] selection\n") );
1087 if (gtk_tree_selection_get_selected(treeselection
, &model
, &iter
))
1089 gtk_tree_model_get(model
, &iter
, LST_BUDGET_KEY
, &key
, -1);
1092 DB( g_print(" - active is %d\n", key
) );
1094 repbudget_detail(GTK_WIDGET(gtk_tree_selection_get_tree_view (treeselection
)), GINT_TO_POINTER(key
));
1095 repbudget_sensitive(GTK_WIDGET(gtk_tree_selection_get_tree_view (treeselection
)), NULL
);
1102 static gboolean
repbudget_window_dispose(GtkWidget
*widget
, GdkEvent
*event
, gpointer user_data
)
1104 struct repbudget_data
*data
= user_data
;
1105 struct WinGeometry
*wg
;
1107 DB( g_print("\n[repbudget] start dispose\n") );
1109 g_queue_free (data
->txn_queue
);
1111 da_filter_free(data
->filter
);
1115 //store position and size
1116 wg
= &PREFS
->bud_wg
;
1117 gtk_window_get_position(GTK_WINDOW(widget
), &wg
->l
, &wg
->t
);
1118 gtk_window_get_size(GTK_WINDOW(widget
), &wg
->w
, &wg
->h
);
1120 DB( g_print(" window: l=%d, t=%d, w=%d, h=%d\n", wg
->l
, wg
->t
, wg
->w
, wg
->h
) );
1122 //enable define windows
1123 GLOBALS
->define_off
--;
1124 ui_mainwindow_update(GLOBALS
->mainwindow
, GINT_TO_POINTER(UF_SENSITIVE
));
1126 DB( g_print("\n[repbudget] end dispose\n") );
1132 // the window creation
1133 GtkWidget
*repbudget_window_new(void)
1135 struct repbudget_data
*data
;
1136 struct WinGeometry
*wg
;
1137 GtkWidget
*window
, *mainvbox
, *hbox
, *vbox
, *notebook
, *treeview
;
1138 GtkWidget
*label
, *widget
, *table
, *entry
;
1141 GtkActionGroup
*actions
;
1143 GError
*error
= NULL
;
1145 data
= g_malloc0(sizeof(struct repbudget_data
));
1146 if(!data
) return NULL
;
1148 DB( g_print("\n[repbudget] new\n") );
1150 //disable define windows
1151 GLOBALS
->define_off
++;
1152 ui_mainwindow_update(GLOBALS
->mainwindow
, GINT_TO_POINTER(UF_SENSITIVE
));
1154 /* create window, etc */
1155 window
= gtk_window_new (GTK_WINDOW_TOPLEVEL
);
1156 data
->window
= window
;
1158 //store our window private data
1159 g_object_set_data(G_OBJECT(window
), "inst_data", (gpointer
)data
);
1160 DB( g_print(" - new window=%p, inst_data=%p\n", window
, data
) );
1162 gtk_window_set_title (GTK_WINDOW (window
), _("Budget report"));
1164 //set the window icon
1165 gtk_window_set_icon_name(GTK_WINDOW (window
), ICONNAME_HB_REP_BUDGET
);
1169 mainvbox
= gtk_box_new (GTK_ORIENTATION_VERTICAL
, 0);
1170 gtk_container_add (GTK_CONTAINER (window
), mainvbox
);
1172 hbox
= gtk_box_new(GTK_ORIENTATION_HORIZONTAL
, 0);
1173 gtk_box_pack_start (GTK_BOX (mainvbox
), hbox
, TRUE
, TRUE
, 0);
1176 table
= gtk_grid_new ();
1177 // gtk_alignment_new(xalign, yalign, xscale, yscale)
1178 //alignment = gtk_alignment_new(0.0, 0.0, 0.0, 0.0);
1179 //gtk_container_add(GTK_CONTAINER(alignment), table);
1180 gtk_box_pack_start (GTK_BOX (hbox
), table
, FALSE
, FALSE
, 0);
1182 gtk_container_set_border_width (GTK_CONTAINER (table
), SPACING_SMALL
);
1183 gtk_grid_set_row_spacing (GTK_GRID (table
), SPACING_SMALL
);
1184 gtk_grid_set_column_spacing (GTK_GRID (table
), SPACING_MEDIUM
);
1187 label
= make_label_group(_("Display"));
1188 gtk_grid_attach (GTK_GRID (table
), label
, 0, row
, 3, 1);
1191 label
= make_label_widget(_("_For:"));
1192 gtk_grid_attach (GTK_GRID (table
), label
, 1, row
, 1, 1);
1193 widget
= make_cycle(label
, CYA_BUDGSELECT
);
1194 data
->CY_for
= widget
;
1195 gtk_grid_attach (GTK_GRID (table
), data
->CY_for
, 2, row
, 1, 1);
1199 label
= make_label_widget(_("_Kind:"));
1200 gtk_grid_attach (GTK_GRID (table
), label
, 1, row
, 1, 1);
1201 widget
= make_cycle(label
, CYA_KIND
);
1202 data
->CY_kind
= widget
;
1203 gtk_grid_attach (GTK_GRID (table
), data
->CY_kind
, 2, row
, 1, 1);
1206 widget
= gtk_check_button_new_with_mnemonic (_("Only out of budget"));
1207 data
->CM_onlyout
= widget
;
1208 gtk_grid_attach (GTK_GRID (table
), widget
, 2, row
, 1, 1);
1211 widget
= gtk_check_button_new_with_mnemonic (_("Euro _minor"));
1212 data
->CM_minor
= widget
;
1213 gtk_grid_attach (GTK_GRID (table
), widget
, 2, row
, 1, 1);
1216 widget
= gtk_separator_new(GTK_ORIENTATION_HORIZONTAL
);
1217 gtk_grid_attach (GTK_GRID (table
), widget
, 0, row
, 3, 1);
1220 label
= make_label_group(_("Date filter"));
1221 gtk_grid_attach (GTK_GRID (table
), label
, 0, row
, 3, 1);
1224 label
= make_label_widget(_("_Range:"));
1225 gtk_grid_attach (GTK_GRID (table
), label
, 1, row
, 1, 1);
1226 data
->CY_range
= make_daterange(label
, FALSE
);
1227 gtk_grid_attach (GTK_GRID (table
), data
->CY_range
, 2, row
, 1, 1);
1230 label
= make_label_widget(_("_From:"));
1231 gtk_grid_attach (GTK_GRID (table
), label
, 1, row
, 1, 1);
1232 data
->PO_mindate
= gtk_date_entry_new();
1233 gtk_grid_attach (GTK_GRID (table
), data
->PO_mindate
, 2, row
, 1, 1);
1236 label
= make_label_widget(_("_To:"));
1237 gtk_grid_attach (GTK_GRID (table
), label
, 1, row
, 1, 1);
1238 data
->PO_maxdate
= gtk_date_entry_new();
1239 gtk_grid_attach (GTK_GRID (table
), data
->PO_maxdate
, 2, row
, 1, 1);
1242 //part: info + report
1243 vbox
= gtk_box_new (GTK_ORIENTATION_VERTICAL
, 0);
1244 gtk_box_pack_start (GTK_BOX (hbox
), vbox
, TRUE
, TRUE
, 0);
1247 actions
= gtk_action_group_new ("default");
1250 gtk_action_group_set_translation_domain(actions
, GETTEXT_PACKAGE
);
1252 // data to action callbacks is set here (data)
1253 gtk_action_group_add_radio_actions (actions
, radio_entries
, n_radio_entries
, 0, G_CALLBACK(repbudget_action_mode
), data
);
1255 gtk_action_group_add_actions (actions
, entries
, n_entries
, data
);
1257 gtk_action_group_add_toggle_actions (actions
,
1258 toggle_entries
, n_toggle_entries
,
1262 /* set which action should have priority in the toolbar */
1263 //action = gtk_action_group_get_action(actions, "List");
1264 //g_object_set(action, "is_important", TRUE, NULL);
1266 //action = gtk_action_group_get_action(actions, "Stack");
1267 //g_object_set(action, "is_important", TRUE, NULL);
1269 action
= gtk_action_group_get_action(actions
, "Detail");
1270 //g_object_set(action, "is_important", TRUE, NULL);
1271 g_object_set(action
, "active", PREFS
->budg_showdetail
, NULL
);
1273 //action = gtk_action_group_get_action(actions, "Refresh");
1274 //g_object_set(action, "is_important", TRUE, NULL);
1277 ui
= gtk_ui_manager_new ();
1278 gtk_ui_manager_insert_action_group (ui
, actions
, 0);
1279 gtk_window_add_accel_group (GTK_WINDOW (window
), gtk_ui_manager_get_accel_group (ui
));
1281 if (!gtk_ui_manager_add_ui_from_string (ui
, ui_info
, -1, &error
))
1283 g_message ("building UI failed: %s", error
->message
);
1284 g_error_free (error
);
1290 data
->TB_bar
= gtk_ui_manager_get_widget (ui
, "/ToolBar");
1291 gtk_box_pack_start (GTK_BOX (vbox
), data
->TB_bar
, FALSE
, FALSE
, 0);
1293 //add export menu button
1294 GtkToolItem
*toolitem
;
1295 GtkWidget
*menu
, *menuitem
, *image
;
1297 menu
= gtk_menu_new ();
1298 //gtk_widget_set_halign (menu, GTK_ALIGN_END);
1300 menuitem
= gtk_menu_item_new_with_mnemonic (_("_Result to clipboard"));
1301 gtk_menu_shell_append (GTK_MENU_SHELL (menu
), menuitem
);
1302 g_signal_connect (G_OBJECT (menuitem
), "activate", G_CALLBACK (repbudget_export_result_clipboard
), data
);
1304 menuitem
= gtk_menu_item_new_with_mnemonic (_("_Result to CSV"));
1305 gtk_menu_shell_append (GTK_MENU_SHELL (menu
), menuitem
);
1306 g_signal_connect (G_OBJECT (menuitem
), "activate", G_CALLBACK (repbudget_export_result_csv
), data
);
1308 menuitem
= gtk_menu_item_new_with_mnemonic (_("_Detail to clipboard"));
1309 data
->MI_detailtoclip
= menuitem
;
1310 gtk_menu_shell_append (GTK_MENU_SHELL (menu
), menuitem
);
1311 g_signal_connect (G_OBJECT (menuitem
), "activate", G_CALLBACK (repbudget_export_detail_clipboard
), data
);
1313 menuitem
= gtk_menu_item_new_with_mnemonic (_("_Detail to CSV"));
1314 data
->MI_detailtocsv
= menuitem
;
1315 gtk_menu_shell_append (GTK_MENU_SHELL (menu
), menuitem
);
1316 g_signal_connect (G_OBJECT (menuitem
), "activate", G_CALLBACK (repbudget_export_detail_csv
), data
);
1318 gtk_widget_show_all (menu
);
1320 widget
= gtk_menu_button_new();
1321 data
->BT_export
= widget
;
1322 gtk_style_context_add_class (gtk_widget_get_style_context (GTK_WIDGET(widget
)), GTK_STYLE_CLASS_FLAT
);
1324 //gtk_menu_button_set_direction (GTK_MENU_BUTTON(widget), GTK_ARROW_DOWN);
1325 //gtk_widget_set_halign (widget, GTK_ALIGN_END);
1326 image
= gtk_image_new_from_icon_name (ICONNAME_HB_FILE_EXPORT
, GTK_ICON_SIZE_LARGE_TOOLBAR
);
1327 g_object_set (widget
, "image", image
, "popup", GTK_MENU(menu
), NULL
);
1329 toolitem
= gtk_tool_item_new();
1330 gtk_container_add (GTK_CONTAINER(toolitem
), widget
);
1331 gtk_toolbar_insert(GTK_TOOLBAR(data
->TB_bar
), GTK_TOOL_ITEM(toolitem
), -1);
1334 hbox
= gtk_box_new (GTK_ORIENTATION_HORIZONTAL
, SPACING_SMALL
);
1335 gtk_container_set_border_width (GTK_CONTAINER(hbox
), SPACING_SMALL
);
1336 gtk_box_pack_start (GTK_BOX (vbox
), hbox
, FALSE
, FALSE
, 0);
1338 widget
= make_label(NULL
, 0.5, 0.5);
1339 gimp_label_set_attributes (GTK_LABEL (widget
), PANGO_ATTR_SCALE
, PANGO_SCALE_SMALL
, -1);
1340 data
->TX_daterange
= widget
;
1341 gtk_box_pack_start (GTK_BOX (hbox
), widget
, TRUE
, TRUE
, 0);
1344 entry
= gtk_label_new(NULL
);
1345 data
->TX_total
[2] = entry
;
1346 gtk_box_pack_end (GTK_BOX (hbox
), entry
, FALSE
, FALSE
, 0);
1347 label
= gtk_label_new(_("Result:"));
1348 gtk_box_pack_end (GTK_BOX (hbox
), label
, FALSE
, FALSE
, 0);
1350 entry
= gtk_label_new(NULL
);
1351 data
->TX_total
[1] = entry
;
1352 gtk_box_pack_end (GTK_BOX (hbox
), entry
, FALSE
, FALSE
, 0);
1353 label
= gtk_label_new(_("Budget:"));
1354 gtk_box_pack_end (GTK_BOX (hbox
), label
, FALSE
, FALSE
, 0);
1356 entry
= gtk_label_new(NULL
);
1357 data
->TX_total
[0] = entry
;
1358 gtk_box_pack_end (GTK_BOX (hbox
), entry
, FALSE
, FALSE
, 0);
1359 label
= gtk_label_new(_("Spent:"));
1360 gtk_box_pack_end (GTK_BOX (hbox
), label
, FALSE
, FALSE
, 0);
1363 notebook
= gtk_notebook_new();
1364 data
->GR_result
= notebook
;
1365 gtk_widget_show(notebook
);
1366 gtk_notebook_set_show_tabs(GTK_NOTEBOOK(notebook
), FALSE
);
1367 gtk_notebook_set_show_border(GTK_NOTEBOOK(notebook
), FALSE
);
1369 gtk_box_pack_start (GTK_BOX (vbox
), notebook
, TRUE
, TRUE
, 0);
1373 vbox
= gtk_box_new (GTK_ORIENTATION_VERTICAL
, 0);
1374 gtk_notebook_append_page(GTK_NOTEBOOK(notebook
), vbox
, NULL
);
1376 widget
= gtk_scrolled_window_new (NULL
, NULL
);
1377 gtk_scrolled_window_set_shadow_type (GTK_SCROLLED_WINDOW (widget
), GTK_SHADOW_ETCHED_IN
);
1378 gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (widget
), GTK_POLICY_AUTOMATIC
, GTK_POLICY_AUTOMATIC
);
1379 treeview
= create_list_budget();
1380 data
->LV_report
= treeview
;
1381 gtk_container_add (GTK_CONTAINER(widget
), treeview
);
1382 gtk_box_pack_start (GTK_BOX (vbox
), widget
, TRUE
, TRUE
, 0);
1385 widget
= gtk_scrolled_window_new (NULL
, NULL
);
1386 data
->GR_detail
= widget
;
1387 gtk_scrolled_window_set_shadow_type (GTK_SCROLLED_WINDOW (widget
), GTK_SHADOW_ETCHED_IN
);
1388 gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (widget
), GTK_POLICY_AUTOMATIC
, GTK_POLICY_AUTOMATIC
);
1389 treeview
= create_list_transaction(LIST_TXN_TYPE_DETAIL
, PREFS
->lst_ope_columns
);
1390 data
->LV_detail
= treeview
;
1391 gtk_container_add (GTK_CONTAINER(widget
), treeview
);
1393 gtk_box_pack_start (GTK_BOX (vbox
), widget
, TRUE
, TRUE
, 0);
1396 //widget = gtk_chart_new(CHART_TYPE_COL);
1397 widget
= ui_chart_stack_new();
1398 data
->RE_stack
= widget
;
1399 gtk_notebook_append_page(GTK_NOTEBOOK(notebook
), widget
, NULL
);
1401 //todo:should move this
1402 gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(data
->CM_minor
),GLOBALS
->minor
);
1405 /* attach our minor to treeview */
1406 g_object_set_data(G_OBJECT(gtk_tree_view_get_model(GTK_TREE_VIEW(data
->LV_report
))), "minor", (gpointer
)data
->CM_minor
);
1407 g_object_set_data(G_OBJECT(gtk_tree_view_get_model(GTK_TREE_VIEW(data
->LV_detail
))), "minor", (gpointer
)data
->CM_minor
);
1409 /* signal connect */
1410 g_signal_connect (window
, "delete-event", G_CALLBACK (repbudget_window_dispose
), (gpointer
)data
);
1412 g_signal_connect (data
->CM_onlyout
, "toggled", G_CALLBACK (repbudget_compute
), NULL
);
1413 g_signal_connect (data
->CM_minor
, "toggled", G_CALLBACK (repbudget_toggle
), NULL
);
1416 data
->handler_id
[HID_REPBUDGET_RANGE
] = g_signal_connect (data
->CY_range
, "changed", G_CALLBACK (repbudget_range_change
), NULL
);
1418 g_signal_connect (data
->CY_for
, "changed", G_CALLBACK (repbudget_compute
), (gpointer
)data
);
1419 g_signal_connect (data
->CY_kind
, "changed", G_CALLBACK (repbudget_compute
), (gpointer
)data
);
1421 data
->handler_id
[HID_REPBUDGET_MINDATE
] = g_signal_connect (data
->PO_mindate
, "changed", G_CALLBACK (repbudget_date_change
), (gpointer
)data
);
1422 data
->handler_id
[HID_REPBUDGET_MAXDATE
] = g_signal_connect (data
->PO_maxdate
, "changed", G_CALLBACK (repbudget_date_change
), (gpointer
)data
);
1424 g_signal_connect (gtk_tree_view_get_selection(GTK_TREE_VIEW(data
->LV_report
)), "changed", G_CALLBACK (repbudget_selection
), NULL
);
1426 g_signal_connect (GTK_TREE_VIEW(data
->LV_detail
), "row-activated", G_CALLBACK (repbudget_detail_onRowActivated
), NULL
);
1429 //setup, init and show window
1430 repbudget_setup(data
);
1434 if(PREFS
->toolbar_style
== 0)
1435 gtk_toolbar_unset_style(GTK_TOOLBAR(data
->TB_bar
));
1437 gtk_toolbar_set_style(GTK_TOOLBAR(data
->TB_bar
), PREFS
->toolbar_style
-1);
1440 //setup, init and show window
1441 wg
= &PREFS
->bud_wg
;
1442 gtk_window_move(GTK_WINDOW(window
), wg
->l
, wg
->t
);
1443 gtk_window_resize(GTK_WINDOW(window
), wg
->w
, wg
->h
);
1447 gtk_widget_show_all (window
);
1451 if( PREFS
->euro_active
)
1452 gtk_widget_show(data
->CM_minor
);
1454 gtk_widget_hide(data
->CM_minor
);
1456 //check for any account included into the budget or warn
1461 lacc
= list
= g_hash_table_get_values(GLOBALS
->h_acc
);
1463 while (list
!= NULL
)
1467 //#1674045 ony rely on nosummary
1468 //if((acc->flags & (AF_CLOSED|AF_NOREPORT))) goto next1;
1469 if((acc
->flags
& (AF_NOREPORT
))) goto next1
;
1470 if(!(acc
->flags
& AF_NOBUDGET
))
1473 list
= g_list_next(list
);
1479 ui_dialog_msg_infoerror(GTK_WINDOW(data
->window
), GTK_MESSAGE_WARNING
,
1480 _("No account is defined to be part of the budget."),
1481 _("You should include some accounts from the account dialog.")
1491 //gtk_widget_hide(data->GR_detail);
1493 repbudget_sensitive(window
, NULL
);
1494 repbudget_update_detail(window
, NULL
);
1496 if( PREFS
->date_range_rep
!= 0)
1497 gtk_combo_box_set_active(GTK_COMBO_BOX(data
->CY_range
), PREFS
->date_range_rep
);
1499 repbudget_compute(window
, NULL
);
1505 /* = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = */
1507 static GString
*ui_list_repbudget_to_string(GtkTreeView
*treeview
, gboolean clipboard
)
1510 GtkTreeModel
*model
;
1513 const gchar
*format
;
1515 node
= g_string_new(NULL
);
1518 format
= (clipboard
== TRUE
) ? "%s\t%s\t%s\t%s\t\n" : "%s;%s;%s;%s;\n";
1519 g_string_append_printf(node
, format
, _("Category"), _("Spent"), _("Budget"), _("Result"));
1521 model
= gtk_tree_view_get_model(treeview
);
1522 valid
= gtk_tree_model_get_iter_first(GTK_TREE_MODEL(model
), &iter
);
1525 gchar
*name
, *status
;
1526 gdouble spent
, budget
, result
;
1528 gtk_tree_model_get (model
, &iter
,
1529 //LST_REPDIST_KEY, i,
1530 LST_BUDGET_NAME
, &name
,
1531 LST_BUDGET_SPENT
, &spent
,
1532 LST_BUDGET_BUDGET
, &budget
,
1533 LST_BUDGET_RESULT
, &result
,
1534 LST_BUDGET_STATUS
, &status
,
1537 format
= (clipboard
== TRUE
) ? "%s\t%.2f\t%.2f\t%.2f\t%s\n" : "%s;%.2f;%.2f;%.2f;%s\n";
1538 g_string_append_printf(node
, format
, name
, spent
, budget
, result
, status
);
1544 valid
= gtk_tree_model_iter_next(GTK_TREE_MODEL(model
), &iter
);
1547 //DB( g_print("text is:\n%s", node->str) );
1557 ** The function should return:
1558 ** a negative integer if the first value comes before the second,
1559 ** 0 if they are equal,
1560 ** or a positive integer if the first value comes after the second.
1562 static gint
budget_listview_compare_funct (GtkTreeModel
*model
, GtkTreeIter
*a
, GtkTreeIter
*b
, gpointer userdata
)
1565 //Category *entry1, *entry2;
1566 gchar
*entry1
, *entry2
;
1568 gtk_tree_model_get(model
, a
, LST_BUDGET_NAME
, &entry1
, -1);
1569 gtk_tree_model_get(model
, b
, LST_BUDGET_NAME
, &entry2
, -1);
1571 retval
= hb_string_utf8_compare(entry1
, entry2
);
1572 //retval = (entry1->flags & GF_INCOME) - (entry2->flags & GF_INCOME);
1575 // retval = hb_string_utf8_compare(entry1->name, entry2->name);
1585 static void budget_amount_cell_data_function (GtkTreeViewColumn
*col
,
1586 GtkCellRenderer
*renderer
,
1587 GtkTreeModel
*model
,
1593 gchar buf
[G_ASCII_DTOSTR_BUF_SIZE
];
1594 gint column_id
= GPOINTER_TO_INT(user_data
);
1596 gtk_tree_model_get(model
, iter
, column_id
, &value
, -1);
1600 hb_strfmon(buf
, G_ASCII_DTOSTR_BUF_SIZE
-1, value
, GLOBALS
->kcur
, GLOBALS
->minor
);
1602 if( column_id
== LST_BUDGET_RESULT
)
1603 color
= get_minimum_color_amount (value
, 0.0);
1605 color
= get_normal_color_amount(value
);
1607 g_object_set(renderer
,
1608 "foreground", color
,
1614 g_object_set(renderer
, "text", "", NULL
);
1620 static void budget_result_cell_data_function (GtkTreeViewColumn
*col
,
1621 GtkCellRenderer
*renderer
,
1622 GtkTreeModel
*model
,
1629 gint column_id
= GPOINTER_TO_INT(user_data
);
1631 gtk_tree_model_get(model
, iter
,
1633 LST_BUDGET_STATUS
, &status
,
1638 color
= get_minimum_color_amount (value
, 0.0);
1639 g_object_set(renderer
,
1640 "foreground", color
,
1646 g_object_set(renderer
, "text", "", NULL
);
1655 static GtkTreeViewColumn
*amount_list_budget_column(gchar
*name
, gint id
)
1657 GtkTreeViewColumn
*column
;
1658 GtkCellRenderer
*renderer
;
1660 column
= gtk_tree_view_column_new();
1661 gtk_tree_view_column_set_title(column
, name
);
1662 renderer
= gtk_cell_renderer_text_new ();
1663 g_object_set(renderer
, "xalign", 1.0, NULL
);
1664 gtk_tree_view_column_pack_start(column
, renderer
, TRUE
);
1665 gtk_tree_view_column_set_cell_data_func(column
, renderer
, budget_amount_cell_data_function
, GINT_TO_POINTER(id
), NULL
);
1666 gtk_tree_view_column_set_alignment (column
, 0.5);
1667 //gtk_tree_view_column_set_sort_column_id (column, id);
1672 ** create our statistic list
1674 static GtkWidget
*create_list_budget(void)
1676 GtkListStore
*store
;
1678 GtkCellRenderer
*renderer
;
1679 GtkTreeViewColumn
*column
;
1681 DB( g_print("\n[repbudget] create list\n") );
1684 /* create list store */
1685 store
= gtk_list_store_new(
1690 G_TYPE_DOUBLE
, //spent
1691 G_TYPE_DOUBLE
, //budget
1692 G_TYPE_DOUBLE
, //result
1693 G_TYPE_STRING
//status
1697 view
= gtk_tree_view_new_with_model(GTK_TREE_MODEL(store
));
1698 g_object_unref(store
);
1700 gtk_tree_view_set_grid_lines (GTK_TREE_VIEW (view
), PREFS
->grid_lines
);
1703 column
= gtk_tree_view_column_new();
1704 gtk_tree_view_column_set_title(column
, _("Category"));
1705 renderer
= gtk_cell_renderer_text_new ();
1706 gtk_tree_view_column_pack_start(column
, renderer
, TRUE
);
1707 //gtk_tree_view_column_set_cell_data_func(column, renderer, ope_result_cell_data_function, NULL, NULL);
1708 gtk_tree_view_column_add_attribute(column
, renderer
, "text", LST_BUDGET_NAME
);
1709 //gtk_tree_view_column_set_sort_column_id (column, LST_STAT_NAME);
1710 gtk_tree_view_column_set_resizable(column
, TRUE
);
1711 gtk_tree_view_column_set_alignment (column
, 0.5);
1712 gtk_tree_view_append_column (GTK_TREE_VIEW(view
), column
);
1714 /* column: Expense */
1715 column
= amount_list_budget_column(_("Spent"), LST_BUDGET_SPENT
);
1716 gtk_tree_view_append_column (GTK_TREE_VIEW(view
), column
);
1718 /* column: Income */
1719 column
= amount_list_budget_column(_("Budget"), LST_BUDGET_BUDGET
);
1720 gtk_tree_view_append_column (GTK_TREE_VIEW(view
), column
);
1722 /* column: Result */
1723 column
= amount_list_budget_column(_("Result"), LST_BUDGET_RESULT
);
1724 renderer
= gtk_cell_renderer_text_new ();
1725 //g_object_set(renderer, "xalign", 0.0, NULL);
1726 gtk_tree_view_column_pack_start(column
, renderer
, TRUE
);
1727 gtk_tree_view_column_set_cell_data_func(column
, renderer
, budget_result_cell_data_function
, GINT_TO_POINTER(LST_BUDGET_RESULT
), NULL
);
1728 gtk_tree_view_append_column (GTK_TREE_VIEW(view
), column
);
1730 /* column last: empty */
1731 column
= gtk_tree_view_column_new();
1732 gtk_tree_view_append_column (GTK_TREE_VIEW(view
), column
);
1735 gtk_tree_sortable_set_default_sort_func(GTK_TREE_SORTABLE(store
), budget_listview_compare_funct
, NULL
, NULL
);
1736 gtk_tree_sortable_set_sort_column_id(GTK_TREE_SORTABLE(store
), GTK_TREE_SORTABLE_DEFAULT_SORT_COLUMN_ID
, GTK_SORT_ASCENDING
);
1739 gtk_tree_sortable_set_sort_func(GTK_TREE_SORTABLE(store), LST_BUDGET_POS , stat_list_compare_func, GINT_TO_POINTER(LST_BUDGET_POS), NULL);
1740 gtk_tree_sortable_set_sort_func(GTK_TREE_SORTABLE(store), LST_BUDGET_SPENT , stat_list_compare_func, GINT_TO_POINTER(LST_BUDGET_SPENT), NULL);
1741 gtk_tree_sortable_set_sort_func(GTK_TREE_SORTABLE(store), LST_BUDGET_BUDGET, stat_list_compare_func, GINT_TO_POINTER(LST_BUDGET_BUDGET), NULL);
1742 gtk_tree_sortable_set_sort_func(GTK_TREE_SORTABLE(store), LST_BUDGET_RESULT , stat_list_compare_func, GINT_TO_POINTER(LST_BUDGET_RESULT), NULL);