]> Dogcows Code - chaz/homebank/blob - src/rep-stats.c
Merge branch 'upstream'
[chaz/homebank] / src / rep-stats.c
1 /* HomeBank -- Free, easy, personal accounting for everyone.
2 * Copyright (C) 1995-2019 Maxime DOYEN
3 *
4 * This file is part of HomeBank.
5 *
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.
10 *
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.
15 *
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/>.
18 */
19
20
21 #include "homebank.h"
22
23 #include "rep-stats.h"
24
25 #include "list-operation.h"
26 #include "gtk-chart.h"
27 #include "gtk-dateentry.h"
28
29 #include "dsp-mainwindow.h"
30 #include "ui-account.h"
31 #include "ui-payee.h"
32 #include "ui-category.h"
33 #include "ui-filter.h"
34 #include "ui-transaction.h"
35
36 /****************************************************************************/
37 /* Debug macros */
38 /****************************************************************************/
39 #define MYDEBUG 0
40
41 #if MYDEBUG
42 #define DB(x) (x);
43 #else
44 #define DB(x);
45 #endif
46
47 /* our global datas */
48 extern struct HomeBank *GLOBALS;
49 extern struct Preferences *PREFS;
50
51
52 /* prototypes */
53 static void ui_repdist_action_viewlist(GtkAction *action, gpointer user_data);
54 static void ui_repdist_action_viewbar(GtkAction *action, gpointer user_data);
55 static void ui_repdist_action_viewpie(GtkAction *action, gpointer user_data);
56 static void ui_repdist_action_detail(GtkAction *action, gpointer user_data);
57 static void ui_repdist_action_legend(GtkAction *action, gpointer user_data);
58 static void ui_repdist_action_rate(GtkAction *action, gpointer user_data);
59 static void ui_repdist_action_filter(GtkAction *action, gpointer user_data);
60 static void ui_repdist_action_refresh(GtkAction *action, gpointer user_data);
61
62
63 static GtkRadioActionEntry radio_entries[] = {
64 { "List" , ICONNAME_HB_VIEW_LIST , N_("List") , NULL, N_("View results as list"), 0 },
65 { "Column" , ICONNAME_HB_VIEW_COLUMN , N_("Column") , NULL, N_("View results as column"), 1 },
66 { "Donut" , ICONNAME_HB_VIEW_DONUT , N_("Donut") , NULL, N_("View results as donut"), 2 },
67 };
68 static guint n_radio_entries = G_N_ELEMENTS (radio_entries);
69
70
71 static GtkActionEntry entries[] = {
72 { "Filter" , ICONNAME_HB_FILTER , N_("Filter") , NULL, N_("Edit filter"), G_CALLBACK (ui_repdist_action_filter) },
73 { "Refresh" , ICONNAME_HB_REFRESH , N_("Refresh"), NULL, N_("Refresh results"), G_CALLBACK (ui_repdist_action_refresh) },
74
75 //{ "Export" , ICONNAME_HB_FILE_EXPORT , N_("Export") , NULL, N_("Export as CSV"), G_CALLBACK (ui_repdist_action_export) },
76 };
77 static guint n_entries = G_N_ELEMENTS (entries);
78
79
80 static GtkToggleActionEntry toggle_entries[] = {
81 { "Detail", ICONNAME_HB_OPE_SHOW, /* name, icon-name */
82 N_("Detail"), NULL, /* label, accelerator */
83 N_("Toggle detail"), /* tooltip */
84 G_CALLBACK (ui_repdist_action_detail),
85 FALSE }, /* is_active */
86
87 { "Legend", ICONNAME_HB_SHOW_LEGEND, /* name, icon-name */
88 N_("Legend"), NULL, /* label, accelerator */
89 N_("Toggle legend"), /* tooltip */
90 G_CALLBACK (ui_repdist_action_legend),
91 TRUE }, /* is_active */
92
93 { "Rate", ICONNAME_HB_SHOW_RATE, /* name, icon-name */
94 N_("Rate"), NULL, /* label, accelerator */
95 N_("Toggle rate"), /* tooltip */
96 G_CALLBACK (ui_repdist_action_rate),
97 FALSE }, /* is_active */
98
99 };
100 static guint n_toggle_entries = G_N_ELEMENTS (toggle_entries);
101
102
103
104 static const gchar *ui_info =
105 "<ui>"
106 " <toolbar name='ToolBar'>"
107 " <toolitem action='List'/>"
108 " <toolitem action='Column'/>"
109 " <toolitem action='Donut'/>"
110 " <separator/>"
111 " <toolitem action='Detail'/>"
112 " <toolitem action='Legend'/>"
113 " <toolitem action='Rate'/>"
114 " <separator/>"
115 " <toolitem action='Filter'/>"
116 " <toolitem action='Refresh'/>"
117 " <separator/>"
118 //" <toolitem action='Export'/>"
119 // replaced by a menubutton
120 " </toolbar>"
121 "</ui>";
122
123
124
125 static void ui_repdist_date_change(GtkWidget *widget, gpointer user_data);
126 static void ui_repdist_range_change(GtkWidget *widget, gpointer user_data);
127 static void ui_repdist_detail(GtkWidget *widget, gpointer user_data);
128 static void ui_repdist_update(GtkWidget *widget, gpointer user_data);
129 static void ui_repdist_update_total(GtkWidget *widget, gpointer user_data);
130 static void ui_repdist_compute(GtkWidget *widget, gpointer user_data);
131 static void ui_repdist_sensitive(GtkWidget *widget, gpointer user_data);
132 static void ui_repdist_toggle_detail(GtkWidget *widget, gpointer user_data);
133 static void ui_repdist_toggle_legend(GtkWidget *widget, gpointer user_data);
134 static void ui_repdist_toggle_minor(GtkWidget *widget, gpointer user_data);
135 static void ui_repdist_toggle_rate(GtkWidget *widget, gpointer user_data);
136 static GtkWidget *ui_list_repdist_create(void);
137 static void ui_repdist_update_daterange(GtkWidget *widget, gpointer user_data);
138 static void ui_repdist_update_date_widget(GtkWidget *widget, gpointer user_data);
139
140 static GString *ui_list_repdist_to_string(GtkTreeView *treeview, gboolean clipboard);
141 static gint ui_list_repdist_compare_func (GtkTreeModel *model, GtkTreeIter *a, GtkTreeIter *b, gpointer userdata);
142
143
144
145 HbKvData CYA_REPORT_SRC[] = {
146 { REPORT_SRC_CATEGORY, N_("Category") },
147 { REPORT_SRC_SUBCATEGORY, N_("Subcategory") },
148 { REPORT_SRC_PAYEE, N_("Payee") },
149 { REPORT_SRC_ACCOUNT, N_("Account") },
150 { REPORT_SRC_TAG, N_("Tag") },
151 { REPORT_SRC_MONTH, N_("Month") },
152 { REPORT_SRC_YEAR, N_("Year") },
153 { 0, NULL }
154 };
155
156
157 HbKvData CYA_REPORT_TYPE[] = {
158 { REPORT_TYPE_ALL, N_("Exp. & Inc.") },
159 { REPORT_TYPE_EXPENSE, N_("Expense") },
160 { REPORT_TYPE_INCOME, N_("Income") },
161 { REPORT_TYPE_BALANCE, N_("Balance")} ,
162 { 0, NULL }
163 };
164
165 extern gchar *CYA_REPORT_MODE[];
166 extern HbKvData CYA_REPORT_INTVL[];
167
168 extern gchar *CYA_ABMONTHS[];
169
170 /* action functions -------------------- */
171
172 static void ui_repdist_action_viewlist(GtkAction *action, gpointer user_data)
173 {
174 struct ui_repdist_data *data = user_data;
175
176 gtk_notebook_set_current_page(GTK_NOTEBOOK(data->GR_result), 0);
177 ui_repdist_sensitive(data->window, NULL);
178 }
179
180 static void ui_repdist_action_viewbar(GtkAction *action, gpointer user_data)
181 {
182 struct ui_repdist_data *data = user_data;
183
184 gtk_notebook_set_current_page(GTK_NOTEBOOK(data->GR_result), 1);
185 gtk_chart_set_type (GTK_CHART(data->RE_chart), CHART_TYPE_COL);
186 ui_repdist_sensitive(data->window, NULL);
187 }
188
189
190 static void ui_repdist_action_viewpie(GtkAction *action, gpointer user_data)
191 {
192 struct ui_repdist_data *data = user_data;
193 gint tmpview;
194
195 gtk_notebook_set_current_page(GTK_NOTEBOOK(data->GR_result), 1);
196
197 gtk_chart_set_type (GTK_CHART(data->RE_chart), CHART_TYPE_PIE);
198 ui_repdist_sensitive(data->window, NULL);
199
200 tmpview = hbtk_combo_box_get_active_id(GTK_COMBO_BOX_TEXT(data->CY_type));
201
202 // ensure not exp & inc for piechart
203 if( tmpview == REPORT_TYPE_ALL )
204 {
205 //g_signal_handler_block(data->CY_type, data->handler_id[HID_REPDIST_VIEW]);
206 hbtk_combo_box_set_active_id(GTK_COMBO_BOX_TEXT(data->CY_type), REPORT_TYPE_EXPENSE);
207 //g_signal_handler_unblock(data->CY_type, data->handler_id[HID_REPDIST_VIEW]);
208 }
209
210 }
211
212
213 static void ui_repdist_action_mode (GtkRadioAction *action, GtkRadioAction *current, gpointer user_data)
214 {
215 gint value;
216
217 value = gtk_radio_action_get_current_value(GTK_RADIO_ACTION(action));
218 switch( value )
219 {
220 case 0:
221 ui_repdist_action_viewlist(GTK_ACTION(action), user_data);
222 break;
223 case 1:
224 ui_repdist_action_viewbar(GTK_ACTION(action), user_data);
225 break;
226 case 2:
227 ui_repdist_action_viewpie(GTK_ACTION(action), user_data);
228 break;
229 }
230 }
231
232
233 static void ui_repdist_action_detail(GtkAction *action, gpointer user_data)
234 {
235 struct ui_repdist_data *data = user_data;
236
237 ui_repdist_toggle_detail(data->window, NULL);
238 }
239
240 static void ui_repdist_action_legend(GtkAction *action, gpointer user_data)
241 {
242 struct ui_repdist_data *data = user_data;
243
244 ui_repdist_toggle_legend(data->window, NULL);
245 }
246
247 static void ui_repdist_action_rate(GtkAction *action, gpointer user_data)
248 {
249 struct ui_repdist_data *data = user_data;
250
251 ui_repdist_toggle_rate(data->window, NULL);
252 }
253
254 static void ui_repdist_action_filter(GtkAction *action, gpointer user_data)
255 {
256 struct ui_repdist_data *data = user_data;
257
258 //debug
259 //create_deffilter_window(data->filter, TRUE);
260
261 if(ui_flt_manage_dialog_new(GTK_WINDOW(data->window), data->filter, TRUE, FALSE) != GTK_RESPONSE_REJECT)
262 {
263 ui_repdist_compute(data->window, NULL);
264 ui_repdist_update_date_widget(data->window, NULL);
265 ui_repdist_update_daterange(data->window, NULL);
266
267 g_signal_handler_block(data->CY_range, data->handler_id[HID_REPDIST_RANGE]);
268 gtk_combo_box_set_active(GTK_COMBO_BOX(data->CY_range), FLT_RANGE_OTHER);
269 g_signal_handler_unblock(data->CY_range, data->handler_id[HID_REPDIST_RANGE]);
270
271 }
272 }
273
274 static void ui_repdist_action_refresh(GtkAction *action, gpointer user_data)
275 {
276 struct ui_repdist_data *data = user_data;
277
278 ui_repdist_compute(data->window, NULL);
279 }
280
281 /*static void ui_repdist_action_export(GtkAction *action, gpointer user_data)
282 {
283 struct ui_repdist_data *data = user_data;
284
285 ui_repdist_export_csv(data->window, NULL);
286 }*/
287
288
289
290 /* ======================== */
291
292
293
294 /*
295 ** ============================================================================
296 */
297
298
299 static void ui_repdist_date_change(GtkWidget *widget, gpointer user_data)
300 {
301 struct ui_repdist_data *data;
302
303 DB( g_print("\n[repdist] date change\n") );
304
305 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
306
307 data->filter->mindate = gtk_date_entry_get_date(GTK_DATE_ENTRY(data->PO_mindate));
308 data->filter->maxdate = gtk_date_entry_get_date(GTK_DATE_ENTRY(data->PO_maxdate));
309
310 // set min/max date for both widget
311 gtk_date_entry_set_maxdate(GTK_DATE_ENTRY(data->PO_mindate), data->filter->maxdate);
312 gtk_date_entry_set_mindate(GTK_DATE_ENTRY(data->PO_maxdate), data->filter->mindate);
313
314 g_signal_handler_block(data->CY_range, data->handler_id[HID_REPDIST_RANGE]);
315 gtk_combo_box_set_active(GTK_COMBO_BOX(data->CY_range), FLT_RANGE_OTHER);
316 g_signal_handler_unblock(data->CY_range, data->handler_id[HID_REPDIST_RANGE]);
317
318 ui_repdist_compute(widget, NULL);
319 ui_repdist_update_daterange(widget, NULL);
320
321 }
322
323
324 static void ui_repdist_range_change(GtkWidget *widget, gpointer user_data)
325 {
326 struct ui_repdist_data *data;
327 gint range;
328
329 DB( g_print("\n[repdist] range change\n") );
330
331 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
332
333 range = gtk_combo_box_get_active(GTK_COMBO_BOX(data->CY_range));
334
335 if(range != FLT_RANGE_OTHER)
336 {
337 filter_preset_daterange_set(data->filter, range, 0);
338
339 ui_repdist_update_date_widget(data->window, NULL);
340
341 ui_repdist_compute(data->window, NULL);
342 ui_repdist_update_daterange(data->window, NULL);
343 }
344 else
345 {
346 if(ui_flt_manage_dialog_new(GTK_WINDOW(data->window), data->filter, TRUE, FALSE) != GTK_RESPONSE_REJECT)
347 {
348 ui_repdist_update_date_widget(data->window, NULL);
349 ui_repdist_compute(data->window, NULL);
350 ui_repdist_update_daterange(data->window, NULL);
351 }
352 }
353 }
354
355
356 static void ui_repdist_update(GtkWidget *widget, gpointer user_data)
357 {
358 struct ui_repdist_data *data;
359 gboolean byamount;
360 GtkTreeModel *model;
361 gint page, tmpsrc, tmptype, column;
362 gboolean xval;
363 gchar *title;
364
365 DB( g_print("\n[repdist] update\n") );
366
367 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
368
369
370 model = gtk_tree_view_get_model(GTK_TREE_VIEW(data->LV_report));
371 byamount = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(data->CM_byamount));
372 tmptype = hbtk_combo_box_get_active_id(GTK_COMBO_BOX_TEXT(data->CY_type));
373 //tmpsrc = gtk_combo_box_get_active(GTK_COMBO_BOX(data->CY_src));
374 tmpsrc = hbtk_combo_box_get_active_id(GTK_COMBO_BOX_TEXT(data->CY_src));
375
376 //debug option
377 DB( g_print(" option: byamount=%d tmptype=%d '%s' tmpsrc=%d '%s'\n\n", byamount, tmptype, hbtk_get_label(CYA_REPORT_TYPE,tmptype), tmpsrc, hbtk_get_label(CYA_REPORT_SRC,tmpsrc)) );
378
379 // ensure not exp & inc for piechart
380 page = gtk_notebook_get_current_page(GTK_NOTEBOOK(data->GR_result));
381
382 if( page == 2 && tmptype == REPORT_TYPE_ALL )
383 {
384 g_signal_handler_block(data->CY_type, data->handler_id[HID_REPDIST_VIEW]);
385 hbtk_combo_box_set_active_id(GTK_COMBO_BOX_TEXT(data->CY_type), 1);
386 g_signal_handler_unblock(data->CY_type, data->handler_id[HID_REPDIST_VIEW]);
387 tmptype = REPORT_TYPE_EXPENSE;
388 }
389
390 // define view/sort column
391 column = LST_REPDIST_POS;
392
393 if( byamount )
394 {
395 switch( tmptype )
396 {
397 case REPORT_TYPE_ALL: //Inc & Exp
398 case REPORT_TYPE_BALANCE:
399 column = LST_REPDIST_BALANCE;
400 break;
401 case REPORT_TYPE_EXPENSE:
402 column = LST_REPDIST_EXPENSE;
403 break;
404 case REPORT_TYPE_INCOME:
405 column = LST_REPDIST_INCOME;
406 break;
407 }
408 }
409
410 DB( g_print(" sort on column %d\n\n", column) );
411
412 gtk_tree_sortable_set_sort_column_id(GTK_TREE_SORTABLE(model), column, GTK_SORT_DESCENDING);
413
414 gtk_chart_set_color_scheme(GTK_CHART(data->RE_chart), PREFS->report_color_scheme);
415
416 //TRANSLATORS: example 'Expense by Category'
417 title = g_strdup_printf(_("%s by %s"), hbtk_get_label(CYA_REPORT_TYPE,tmptype), hbtk_get_label(CYA_REPORT_SRC, tmpsrc) );
418
419 /* update absolute or not */
420 gboolean abs = (tmptype == REPORT_TYPE_EXPENSE || tmptype == REPORT_TYPE_INCOME) ? TRUE : FALSE;
421 gtk_chart_set_absolute(GTK_CHART(data->RE_chart), abs);
422
423 /* show xval for month/year and no by amount display */
424 xval = FALSE;
425
426 if( !byamount && (tmpsrc == REPORT_SRC_MONTH || tmpsrc == REPORT_SRC_YEAR) )
427 {
428 xval = TRUE;
429 /*switch( tmpsrc)
430 {
431 case REPORT_SRC_MONTH:
432 gtk_chart_set_every_xval(GTK_CHART(data->RE_chart), 4);
433 break;
434 case REPORT_SRC_YEAR:
435 gtk_chart_set_every_xval(GTK_CHART(data->RE_chart), 2);
436 break;
437 }*/
438 }
439
440 gtk_chart_show_xval(GTK_CHART(data->RE_chart), xval);
441
442
443 /* update bar chart */
444 if( tmptype == REPORT_TYPE_ALL ) //dual exp/inc
445 {
446 DB( g_print(" set bar to dual exp %d/inc %d\n\n", LST_REPDIST_EXPENSE, LST_REPDIST_INCOME) );
447 gtk_chart_set_dualdatas(GTK_CHART(data->RE_chart), model, LST_REPDIST_EXPENSE, LST_REPDIST_INCOME, title, NULL);
448 }
449 else
450 {
451 // /!\ hazardous here
452 column = LST_REPDIST_EXPENSE+(tmptype-1)*2;
453 DB( g_print(" set bar to %d\n\n", column) );
454 gtk_chart_set_datas(GTK_CHART(data->RE_chart), model, column, title, NULL);
455 }
456
457
458 g_free(title);
459
460 }
461
462
463 static void ui_repdist_update_date_widget(GtkWidget *widget, gpointer user_data)
464 {
465 struct ui_repdist_data *data;
466
467 DB( g_print("\n[repdist] update date widget\n") );
468
469 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
470
471 g_signal_handler_block(data->PO_mindate, data->handler_id[HID_REPDIST_MINDATE]);
472 g_signal_handler_block(data->PO_maxdate, data->handler_id[HID_REPDIST_MAXDATE]);
473
474 gtk_date_entry_set_date(GTK_DATE_ENTRY(data->PO_mindate), data->filter->mindate);
475 gtk_date_entry_set_date(GTK_DATE_ENTRY(data->PO_maxdate), data->filter->maxdate);
476
477 g_signal_handler_unblock(data->PO_mindate, data->handler_id[HID_REPDIST_MINDATE]);
478 g_signal_handler_unblock(data->PO_maxdate, data->handler_id[HID_REPDIST_MAXDATE]);
479
480 }
481
482
483 static void ui_repdist_update_daterange(GtkWidget *widget, gpointer user_data)
484 {
485 struct ui_repdist_data *data;
486 gchar *daterange;
487
488 DB( g_print("\n[repdist] update daterange\n") );
489
490 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
491
492 daterange = filter_daterange_text_get(data->filter);
493 gtk_label_set_markup(GTK_LABEL(data->TX_daterange), daterange);
494 g_free(daterange);
495 }
496
497 static void ui_repdist_update_total(GtkWidget *widget, gpointer user_data)
498 {
499 struct ui_repdist_data *data;
500 //gboolean minor;
501
502 DB( g_print("\n[repdist] update total\n") );
503
504 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
505
506 //minor = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(data->CM_minor));
507
508 hb_label_set_colvalue(GTK_LABEL(data->TX_total[0]), data->total_expense, GLOBALS->kcur, GLOBALS->minor);
509 hb_label_set_colvalue(GTK_LABEL(data->TX_total[1]), data->total_income, GLOBALS->kcur, GLOBALS->minor);
510 hb_label_set_colvalue(GTK_LABEL(data->TX_total[2]), data->total_expense + data->total_income, GLOBALS->kcur, GLOBALS->minor);
511
512
513 }
514
515
516 static void ui_repdist_export_result_clipboard(GtkWidget *widget, gpointer user_data)
517 {
518 struct ui_repdist_data *data;
519 GtkClipboard *clipboard;
520 GString *node;
521
522 DB( g_print("\n[repdist] export result clipboard\n") );
523
524 data = user_data;
525 //data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
526
527 node = ui_list_repdist_to_string(GTK_TREE_VIEW(data->LV_report), TRUE);
528
529 clipboard = gtk_clipboard_get_default(gdk_display_get_default());
530 gtk_clipboard_set_text(clipboard, node->str, node->len);
531
532 g_string_free(node, TRUE);
533 }
534
535
536 static void ui_repdist_export_result_csv(GtkWidget *widget, gpointer user_data)
537 {
538 struct ui_repdist_data *data;
539 gchar *filename = NULL;
540 GString *node;
541 GIOChannel *io;
542 gchar *name;
543 gint tmpsrc;
544
545 DB( g_print("\n[repdist] export result csv\n") );
546
547 data = user_data;
548 //data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
549
550 //tmpsrc = gtk_combo_box_get_active(GTK_COMBO_BOX(data->CY_src));
551 tmpsrc = hbtk_combo_box_get_active_id(GTK_COMBO_BOX_TEXT(data->CY_src));
552
553 name = g_strdup_printf("hb-repstat_%s.csv", hbtk_get_label(CYA_REPORT_SRC,tmpsrc));
554
555 if( ui_file_chooser_csv(GTK_WINDOW(data->window), GTK_FILE_CHOOSER_ACTION_SAVE, &filename, name) == TRUE )
556 {
557 DB( g_print(" + filename is %s\n", filename) );
558 io = g_io_channel_new_file(filename, "w", NULL);
559 if(io != NULL)
560 {
561 node = ui_list_repdist_to_string(GTK_TREE_VIEW(data->LV_report), FALSE);
562 g_io_channel_write_chars(io, node->str, -1, NULL, NULL);
563 g_io_channel_unref (io);
564 g_string_free(node, TRUE);
565 }
566 g_free( filename );
567 }
568 g_free(name);
569 }
570
571
572 static void ui_repdist_export_detail_clipboard(GtkWidget *widget, gpointer user_data)
573 {
574 struct ui_repdist_data *data;
575 GtkClipboard *clipboard;
576 GString *node;
577
578 DB( g_print("\n[repdist] export detail clipboard\n") );
579
580 data = user_data;
581 //data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
582
583 node = list_txn_to_string(GTK_TREE_VIEW(data->LV_detail), TRUE);
584
585 clipboard = gtk_clipboard_get_default(gdk_display_get_default());
586 gtk_clipboard_set_text(clipboard, node->str, node->len);
587
588 g_string_free(node, TRUE);
589 }
590
591
592 static void ui_repdist_export_detail_csv(GtkWidget *widget, gpointer user_data)
593 {
594 struct ui_repdist_data *data;
595 gchar *filename = NULL;
596 GString *node;
597 GIOChannel *io;
598 gchar *name;
599 gint tmpsrc;
600
601 DB( g_print("\n[repdist] export detail csv\n") );
602
603 data = user_data;
604 //data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
605
606 //tmpsrc = gtk_combo_box_get_active(GTK_COMBO_BOX(data->CY_src));
607 tmpsrc = hbtk_combo_box_get_active_id(GTK_COMBO_BOX_TEXT(data->CY_src));
608 name = g_strdup_printf("hb-repstat-detail_%s.csv", hbtk_get_label(CYA_REPORT_SRC,tmpsrc));
609
610 if( ui_file_chooser_csv(GTK_WINDOW(data->window), GTK_FILE_CHOOSER_ACTION_SAVE, &filename, name) == TRUE )
611 {
612 DB( g_print(" + filename is %s\n", filename) );
613
614 io = g_io_channel_new_file(filename, "w", NULL);
615 if(io != NULL)
616 {
617 node = list_txn_to_string(GTK_TREE_VIEW(data->LV_detail), FALSE);
618 g_io_channel_write_chars(io, node->str, -1, NULL, NULL);
619
620 g_io_channel_unref (io);
621 g_string_free(node, TRUE);
622 }
623
624 g_free( filename );
625 }
626
627 g_free(name);
628 }
629
630
631 static void ui_repdist_detail(GtkWidget *widget, gpointer user_data)
632 {
633 struct ui_repdist_data *data;
634 guint active = GPOINTER_TO_INT(user_data);
635 guint tmpsrc;
636 GList *list;
637 GtkTreeModel *model;
638 GtkTreeIter iter;
639
640 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
641
642 DB( g_print("\n[repdist] detail\n") );
643
644 /* clear and detach our model */
645 model = gtk_tree_view_get_model(GTK_TREE_VIEW(data->LV_detail));
646 gtk_list_store_clear (GTK_LIST_STORE(model));
647
648 if(data->detail)
649 {
650 //tmpsrc = gtk_combo_box_get_active(GTK_COMBO_BOX(data->CY_src));
651 tmpsrc = hbtk_combo_box_get_active_id(GTK_COMBO_BOX_TEXT(data->CY_src));
652
653 g_object_ref(model); /* Make sure the model stays with us after the tree view unrefs it */
654 gtk_tree_view_set_model(GTK_TREE_VIEW(data->LV_detail), NULL); /* Detach model from view */
655
656 /* fill in the model */
657 list = g_queue_peek_head_link(data->txn_queue);
658 while (list != NULL)
659 {
660 Transaction *ope = list->data;
661
662 if(filter_txn_match(data->filter, ope) == 1)
663 {
664 gboolean match = FALSE;
665 guint i, pos = 0;
666
667 if( tmpsrc != REPORT_SRC_TAG )
668 {
669 if( (tmpsrc == REPORT_SRC_CATEGORY || tmpsrc == REPORT_SRC_SUBCATEGORY) && ope->flags & OF_SPLIT )
670 {
671 guint nbsplit = da_splits_length(ope->splits);
672 Split *split;
673
674 for(i=0;i<nbsplit;i++)
675 {
676 split = da_splits_get(ope->splits, i);
677 pos = category_report_id(split->kcat, (tmpsrc == REPORT_SRC_SUBCATEGORY) ? TRUE : FALSE);
678 if( pos == active )
679 {
680 match = TRUE;
681 break;
682 }
683 }
684 }
685 else
686 {
687 pos = report_items_get_pos(tmpsrc, data->filter->mindate, ope);
688 if( pos == active )
689 {
690 match = TRUE;
691 }
692 }
693 }
694 else
695 /* the TAG process is particular */
696 {
697 if(ope->tags != NULL)
698 {
699 guint32 *tptr = ope->tags;
700
701 while(*tptr)
702 {
703 pos = *tptr - 1;
704
705 DB( g_print(" -> storing tag %d %.2f\n", pos, ope->amount) );
706
707 if( pos == active )
708 {
709 match = TRUE;
710 break;
711 }
712 tptr++;
713 }
714 }
715 }
716
717 if( match == TRUE )
718 {
719 gtk_list_store_insert_with_values (GTK_LIST_STORE(model), &iter, -1,
720 LST_DSPOPE_DATAS, ope,
721 -1);
722 }
723 }
724
725 list = g_list_next(list);
726 }
727
728 /* Re-attach model to view */
729 gtk_tree_view_set_model(GTK_TREE_VIEW(data->LV_detail), model);
730 g_object_unref(model);
731
732 gtk_tree_view_columns_autosize( GTK_TREE_VIEW(data->LV_detail) );
733
734 }
735
736 }
737
738
739 static void ui_repdist_compute(GtkWidget *widget, gpointer user_data)
740 {
741 struct ui_repdist_data *data;
742 gint tmpsrc, tmptype;
743 guint32 from, to;
744 GtkTreeModel *model;
745 GtkTreeIter iter;
746 GList *list, *tmplist = NULL;
747 guint n_result, sortid;
748 guint i;
749 gdouble *tmp_income, *tmp_expense;
750 gdouble exprate, incrate, balrate;
751
752 DB( g_print("\n[repdist] compute\n") );
753
754 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
755
756 //tmpsrc = gtk_combo_box_get_active(GTK_COMBO_BOX(data->CY_src));
757 tmpsrc = hbtk_combo_box_get_active_id(GTK_COMBO_BOX_TEXT(data->CY_src));
758 tmptype = hbtk_combo_box_get_active_id(GTK_COMBO_BOX_TEXT(data->CY_type));
759
760
761 DB( g_print(" for=%d,kind=%d\n", tmpsrc, tmpkind) );
762
763 //get our min max date
764 from = data->filter->mindate;
765 to = data->filter->maxdate;
766 if(to < from) return;
767
768
769 g_queue_free (data->txn_queue);
770 data->txn_queue = hbfile_transaction_get_partial(data->filter->mindate, data->filter->maxdate);
771
772 DB( g_print(" nb-txn=%d\n", g_queue_get_length (data->txn_queue) ) );
773
774 //todo: remove this later on
775 n_result = report_items_count(tmpsrc, data->filter->mindate, data->filter->maxdate);
776
777 switch(tmpsrc)
778 {
779 case REPORT_SRC_CATEGORY:
780 case REPORT_SRC_SUBCATEGORY:
781 tmplist = category_glist_sorted(1);
782 break;
783 case REPORT_SRC_PAYEE:
784 tmplist = payee_glist_sorted(1);
785 break;
786 case REPORT_SRC_ACCOUNT:
787 tmplist = account_glist_sorted(1);
788 break;
789 case REPORT_SRC_TAG:
790 tmplist = tag_glist_sorted(1);
791 break;
792 }
793
794 DB( g_print(" %s :: n_result=%d\n", hbtk_get_label(CYA_REPORT_SRC,tmpsrc), n_result) );
795
796 /* allocate some memory */
797 tmp_expense = g_malloc0((n_result+2) * sizeof(gdouble));
798 tmp_income = g_malloc0((n_result+2) * sizeof(gdouble));
799
800 data->total_expense = 0.0;
801 data->total_income = 0.0;
802
803 if(tmp_expense && tmp_income)
804 {
805
806 DB( g_print(" - ok memory\n") );
807
808 /* compute the results */
809 list = g_queue_peek_head_link(data->txn_queue);
810 while (list != NULL)
811 {
812 Transaction *ope = list->data;
813
814 DB( g_print("** testing '%s', cat=%d==> %d\n", ope->memo, ope->kcat, filter_test(data->filter, ope)) );
815
816 if( (filter_txn_match(data->filter, ope) == 1) )
817 {
818 guint32 pos = 0;
819 gdouble trn_amount;
820
821 DB( g_print(" - should insert\n") );
822
823 //trn_amount = ope->amount;
824 trn_amount = hb_amount_base(ope->amount, ope->kcur);
825
826 //#1562372 in case of a split we need to take amount for filter categories only
827 if( ope->flags & OF_SPLIT )
828 {
829 guint nbsplit = da_splits_length(ope->splits);
830 Split *split;
831 Category *catentry;
832 gint sinsert;
833
834 trn_amount = 0.0;
835
836 for(i=0;i<nbsplit;i++)
837 {
838 split = da_splits_get(ope->splits, i);
839 catentry = da_cat_get(split->kcat);
840 if(catentry == NULL) continue;
841 sinsert = ( catentry->flt_select == TRUE ) ? 1 : 0;
842 if(data->filter->option[FILTER_CATEGORY] == 2) sinsert ^= 1;
843
844 DB( g_print(" split '%s' insert=%d\n",catentry->name, sinsert) );
845
846 if( (data->filter->option[FILTER_CATEGORY] == 0) || sinsert)
847 {
848 trn_amount += hb_amount_base(split->amount, ope->kcur);
849 }
850 }
851
852 }
853
854
855 if( tmpsrc != REPORT_SRC_TAG )
856 {
857 if( (tmpsrc == REPORT_SRC_CATEGORY || tmpsrc == REPORT_SRC_SUBCATEGORY) && ope->flags & OF_SPLIT )
858 {
859 guint nbsplit = da_splits_length(ope->splits);
860 Split *split;
861 Category *catentry;
862 gint sinsert;
863
864 for(i=0;i<nbsplit;i++)
865 {
866 split = da_splits_get(ope->splits, i);
867 catentry = da_cat_get(split->kcat);
868 if(catentry == NULL) continue;
869 sinsert = ( catentry->flt_select == TRUE ) ? 1 : 0;
870 if(data->filter->option[FILTER_CATEGORY] == 2) sinsert ^= 1;
871
872 DB( g_print(" split '%s' insert=%d\n",catentry->name, sinsert) );
873
874 if( (data->filter->option[FILTER_CATEGORY] == 0) || sinsert)
875 {
876 switch(tmpsrc)
877 {
878 case REPORT_SRC_CATEGORY:
879 {
880 pos = (catentry->flags & GF_SUB) ? catentry->parent : catentry->key;
881 }
882 break;
883 case REPORT_SRC_SUBCATEGORY:
884 pos = split->kcat;
885 break;
886 }
887
888 trn_amount = hb_amount_base(split->amount, ope->kcur);
889 //trn_amount = split->amount;
890
891 if(trn_amount > 0.0)
892 {
893 tmp_income[pos] += trn_amount;
894 data->total_income += trn_amount;
895 }
896 else
897 {
898 tmp_expense[pos] += trn_amount;
899 data->total_expense += trn_amount;
900 }
901
902 }
903 // end insert
904
905 }
906 }
907 else
908 {
909 pos = report_items_get_pos(tmpsrc, from, ope);
910 if(trn_amount > 0.0)
911 {
912 tmp_income[pos] += trn_amount;
913 data->total_income += trn_amount;
914 }
915 else
916 {
917 tmp_expense[pos] += trn_amount;
918 data->total_expense += trn_amount;
919 }
920 }
921 }
922 else
923 /* the TAG process is particularly */
924 {
925 if(ope->tags != NULL)
926 {
927 guint32 *tptr = ope->tags;
928
929 while(*tptr)
930 {
931 pos = *tptr - 1;
932
933 DB( g_print(" -> storing tag %d %s %.2f\n", pos, da_tag_get(*tptr)->name, trn_amount) );
934
935 if(trn_amount > 0.0)
936 {
937 tmp_income[pos] += trn_amount;
938 data->total_income += trn_amount;
939 }
940 else
941 {
942 tmp_expense[pos] += trn_amount;
943 data->total_expense += trn_amount;
944 }
945 tptr++;
946 }
947 }
948 }
949
950 // fix total according to selection
951 //if(tmpkind==0 && !tmp_expense[pos]) { data->total_income -= ope->amount; }
952 //if(tmpkind==1 && !tmp_income[pos] ) { data->total_expense -= ope->amount; }
953
954
955 }
956
957 list = g_list_next(list);
958 }
959
960 /* clear and detach our model */
961 model = gtk_tree_view_get_model(GTK_TREE_VIEW(data->LV_report));
962 gtk_list_store_clear (GTK_LIST_STORE(model));
963 g_object_ref(model); /* Make sure the model stays with us after the tree view unrefs it */
964 gtk_tree_view_set_model(GTK_TREE_VIEW(data->LV_report), NULL); /* Detach model from view */
965
966 /* insert into the treeview */
967 for(i=0, sortid=0; i<n_result; i++)
968 {
969 gchar *name, *fullcatname;
970 gchar buffer[64];
971 GDate *date;
972
973 name = NULL;
974 fullcatname = NULL;
975
976 DB( g_print("try to insert item %d - %.2f %.2f\n", i, tmp_expense[i], tmp_income[i]) );
977
978
979 /* filter empty results */
980 if(tmpsrc == REPORT_SRC_CATEGORY || tmpsrc == REPORT_SRC_SUBCATEGORY || tmpsrc == REPORT_SRC_PAYEE || tmpsrc == REPORT_SRC_TAG)
981 {
982 if( tmptype == 1 && !tmp_expense[i] ) continue;
983 if( tmptype == 2 && !tmp_income[i] ) continue;
984 if( !tmp_expense[i] && !tmp_income[i] ) continue;
985 }
986
987 /* get the result name */
988 switch(tmpsrc)
989 {
990 case REPORT_SRC_CATEGORY:
991 {
992 Category *entry = da_cat_get(i);
993 if(entry != NULL)
994 {
995 name = entry->key == 0 ? _("(no category)") : entry->name;
996
997 sortid = g_list_index(tmplist, entry);
998 }
999 }
1000 break;
1001
1002 case REPORT_SRC_SUBCATEGORY:
1003 {
1004 Category *entry = da_cat_get(i);
1005 if(entry != NULL)
1006 {
1007 if(entry->flags & GF_SUB)
1008 {
1009 Category *parent = da_cat_get(entry->parent);
1010
1011 fullcatname = g_strdup_printf("%s : %s", parent->name, entry->name);
1012 name = fullcatname;
1013 }
1014 else
1015 name = entry->key == 0 ? _("(no category)") : entry->name;
1016
1017 sortid = g_list_index(tmplist, entry);
1018 }
1019 }
1020 break;
1021
1022 case REPORT_SRC_PAYEE:
1023 {
1024 Payee *entry = da_pay_get(i);
1025 if(entry != NULL)
1026 {
1027 name = entry->key == 0 ? _("(no payee)") : entry->name;
1028 sortid = g_list_index(tmplist, entry);
1029 }
1030 }
1031 break;
1032
1033 case REPORT_SRC_ACCOUNT:
1034 {
1035 Account *entry = da_acc_get(i);
1036 if(entry != NULL)
1037 {
1038 name = entry->name;
1039 sortid = g_list_index(tmplist, entry);
1040 }
1041 }
1042 break;
1043
1044 case REPORT_SRC_TAG:
1045 {
1046 Tag *entry = da_tag_get(i+1);
1047 name = entry->name;
1048 sortid = g_list_index(tmplist, entry);
1049 }
1050 break;
1051
1052 case REPORT_SRC_MONTH:
1053 date = g_date_new_julian(from);
1054 g_date_add_months(date, i);
1055 //g_snprintf(buffer, 63, "%d-%02d", g_date_get_year(date), g_date_get_month(date));
1056 g_snprintf(buffer, 63, "%d-%s", g_date_get_year(date), _(CYA_ABMONTHS[g_date_get_month(date)]));
1057 g_date_free(date);
1058 name = buffer;
1059 break;
1060
1061 case REPORT_SRC_YEAR:
1062 date = g_date_new_julian(from);
1063 g_date_add_years(date, i);
1064 g_snprintf(buffer, 63, "%d", g_date_get_year(date));
1065 g_date_free(date);
1066 name = buffer;
1067 break;
1068 }
1069
1070 DB( g_print(" inserting %2d, '%s', %9.2f %9.2f %9.2f\n", i, name, tmp_expense[i], tmp_income[i], tmp_expense[i] + tmp_income[i]) );
1071
1072 //compute rate
1073 exprate = 0.0;
1074 incrate = 0.0;
1075 balrate = 0.0;
1076
1077 if( data->total_expense )
1078 exprate = ABS((tmp_expense[i] * 100 / data->total_expense));
1079
1080 if( data->total_income )
1081 incrate = (tmp_income[i] * 100 / data->total_income);
1082
1083 data->total_balance = ABS(data->total_expense) + data->total_income;
1084 if( data->total_balance )
1085 balrate = (ABS(tmp_expense[i]) + tmp_income[i]) * 100 / data->total_balance;
1086
1087 gtk_list_store_append (GTK_LIST_STORE(model), &iter);
1088 gtk_list_store_set (GTK_LIST_STORE(model), &iter,
1089 LST_REPDIST_POS, sortid++,
1090 LST_REPDIST_KEY, i,
1091 LST_REPDIST_NAME, name,
1092 LST_REPDIST_EXPENSE, tmp_expense[i],
1093 LST_REPDIST_INCOME , tmp_income[i],
1094 LST_REPDIST_BALANCE, tmp_expense[i] + tmp_income[i],
1095 LST_REPDIST_EXPRATE, exprate,
1096 LST_REPDIST_INCRATE, incrate,
1097 LST_REPDIST_BALRATE, balrate,
1098 -1);
1099
1100 g_free(fullcatname);
1101 }
1102
1103 /* update column 0 title */
1104 GtkTreeViewColumn *column = gtk_tree_view_get_column( GTK_TREE_VIEW(data->LV_report), 0);
1105 gtk_tree_view_column_set_title(column, hbtk_get_label(CYA_REPORT_SRC,tmpsrc));
1106
1107 gtk_tree_view_columns_autosize (GTK_TREE_VIEW(data->LV_report));
1108
1109 /* Re-attach model to view */
1110 gtk_tree_view_set_model(GTK_TREE_VIEW(data->LV_report), model);
1111 g_object_unref(model);
1112 }
1113
1114 /* free our memory */
1115 g_free(tmp_expense);
1116 g_free(tmp_income);
1117
1118 /* free tmplist (sort cat/pay) */
1119 g_list_free(tmplist);
1120
1121 ui_repdist_update_total(widget,NULL);
1122
1123 ui_repdist_update(widget, user_data);
1124
1125 }
1126
1127
1128
1129
1130
1131 /*
1132 ** update sensitivity
1133 */
1134 static void ui_repdist_sensitive(GtkWidget *widget, gpointer user_data)
1135 {
1136 struct ui_repdist_data *data;
1137 GtkAction *action;
1138 gboolean visible, sensitive;
1139 gint page;
1140
1141 DB( g_print("\n[repdist] sensitive\n") );
1142
1143 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
1144
1145 page = gtk_notebook_get_current_page(GTK_NOTEBOOK(data->GR_result));
1146
1147 visible = page == 0 ? TRUE : FALSE;
1148 action = gtk_ui_manager_get_action(data->ui, "/ToolBar/Detail");
1149 gtk_action_set_visible (action, visible);
1150 //sensitive = gtk_tree_selection_get_selected(gtk_tree_view_get_selection(GTK_TREE_VIEW(data->LV_report)), NULL, NULL);
1151 //gtk_action_set_sensitive(action, sensitive);
1152 //action = gtk_ui_manager_get_action(data->ui, "/ToolBar/Export");
1153 //gtk_action_set_visible (action, visible);
1154 hb_widget_visible (data->BT_export, visible);
1155
1156
1157 visible = page == 0 ? FALSE : TRUE;
1158 //todo: don't display for pie chart (get the type form chart)
1159
1160 hb_widget_visible(data->LB_zoomx, visible);
1161 hb_widget_visible(data->RG_zoomx, visible);
1162
1163 visible = page == 0 ? FALSE : TRUE;
1164 gtk_action_set_visible(gtk_ui_manager_get_action(data->ui, "/ToolBar/Legend"), visible);
1165
1166 visible = page == 0 ? TRUE : FALSE;
1167 gtk_action_set_visible(gtk_ui_manager_get_action(data->ui, "/ToolBar/Rate"), visible);
1168
1169 sensitive = gtk_tree_model_iter_n_children(gtk_tree_view_get_model(GTK_TREE_VIEW(data->LV_detail)), NULL) > 0 ? TRUE : FALSE;
1170 gtk_widget_set_sensitive(data->MI_detailtoclip, sensitive);
1171 gtk_widget_set_sensitive(data->MI_detailtocsv, sensitive);
1172 }
1173
1174
1175 static void ui_repdist_detail_onRowActivated (GtkTreeView *treeview,
1176 GtkTreePath *path,
1177 GtkTreeViewColumn *col,
1178 gpointer userdata)
1179 {
1180 struct ui_repdist_data *data;
1181 Transaction *active_txn;
1182 gboolean result;
1183
1184 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(GTK_WIDGET(treeview), GTK_TYPE_WINDOW)), "inst_data");
1185
1186 DB( g_print ("\n[repdist] A detail row has been double-clicked!\n") );
1187
1188 active_txn = list_txn_get_active_transaction(GTK_TREE_VIEW(data->LV_detail));
1189 if(active_txn)
1190 {
1191 Transaction *old_txn, *new_txn;
1192
1193 old_txn = da_transaction_clone (active_txn);
1194 new_txn = active_txn;
1195 result = deftransaction_external_edit(GTK_WINDOW(data->window), old_txn, new_txn);
1196
1197 if(result == GTK_RESPONSE_ACCEPT)
1198 {
1199 //#1640885
1200 GLOBALS->changes_count++;
1201 ui_repdist_compute(data->window, NULL);
1202 }
1203
1204 da_transaction_free (old_txn);
1205 }
1206 }
1207
1208
1209 static void ui_repdist_update_detail(GtkWidget *widget, gpointer user_data)
1210 {
1211 struct ui_repdist_data *data;
1212
1213 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
1214
1215 if(GTK_IS_TREE_VIEW(data->LV_report))
1216 {
1217 if(data->detail)
1218 {
1219 GtkTreeSelection *treeselection;
1220 GtkTreeModel *model;
1221 GtkTreeIter iter;
1222 guint key;
1223
1224 treeselection = gtk_tree_view_get_selection (GTK_TREE_VIEW(data->LV_report));
1225
1226 if (gtk_tree_selection_get_selected(treeselection, &model, &iter))
1227 {
1228 gtk_tree_model_get(model, &iter, LST_REPDIST_KEY, &key, -1);
1229
1230 DB( g_print(" - active is %d\n", key) );
1231
1232 ui_repdist_detail(GTK_WIDGET(gtk_tree_selection_get_tree_view (treeselection)), GINT_TO_POINTER(key));
1233 }
1234
1235
1236
1237 gtk_widget_show(data->GR_detail);
1238 }
1239 else
1240 gtk_widget_hide(data->GR_detail);
1241
1242 }
1243 }
1244
1245
1246
1247
1248 static void ui_repdist_toggle_detail(GtkWidget *widget, gpointer user_data)
1249 {
1250 struct ui_repdist_data *data;
1251
1252 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
1253
1254 data->detail ^= 1;
1255
1256 DB( g_print("\n[repdist] toggledetail to %d\n", data->detail) );
1257
1258 ui_repdist_update_detail(widget, user_data);
1259
1260 }
1261
1262 /*
1263 ** change the chart legend visibility
1264 */
1265 static void ui_repdist_toggle_legend(GtkWidget *widget, gpointer user_data)
1266 {
1267 struct ui_repdist_data *data;
1268 //gint active;
1269
1270 DB( g_print("\n[repdist] toggle legend\n") );
1271
1272 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
1273
1274 data->legend ^= 1;
1275
1276 gtk_chart_show_legend(GTK_CHART(data->RE_chart), data->legend, FALSE);
1277
1278 }
1279
1280 static void ui_repdist_zoomx_callback(GtkWidget *widget, gpointer user_data)
1281 {
1282 struct ui_repdist_data *data;
1283 gdouble value;
1284
1285 DB( g_print("\n[repdist] zoomx\n") );
1286
1287 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
1288
1289 value = gtk_range_get_value(GTK_RANGE(data->RG_zoomx));
1290
1291 DB( g_print(" + scale is %.2f\n", value) );
1292
1293 gtk_chart_set_barw(GTK_CHART(data->RE_chart), value);
1294
1295 }
1296
1297
1298 /*
1299 ** change the chart rate columns visibility
1300 */
1301 static void ui_repdist_toggle_rate(GtkWidget *widget, gpointer user_data)
1302 {
1303 struct ui_repdist_data *data;
1304 GtkTreeViewColumn *column;
1305
1306 DB( g_print("\n[repdist] toggle rate\n") );
1307
1308 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
1309
1310 data->rate ^= 1;
1311
1312 if(GTK_IS_TREE_VIEW(data->LV_report))
1313 {
1314
1315 column = gtk_tree_view_get_column (GTK_TREE_VIEW(data->LV_report), 2);
1316 gtk_tree_view_column_set_visible(column, data->rate);
1317
1318 column = gtk_tree_view_get_column (GTK_TREE_VIEW(data->LV_report), 4);
1319 gtk_tree_view_column_set_visible(column, data->rate);
1320
1321 column = gtk_tree_view_get_column (GTK_TREE_VIEW(data->LV_report), 6);
1322 gtk_tree_view_column_set_visible(column, data->rate);
1323 }
1324
1325 }
1326
1327 static void ui_repdist_toggle_minor(GtkWidget *widget, gpointer user_data)
1328 {
1329 struct ui_repdist_data *data;
1330
1331 DB( g_print("\n[repdist] toggle minor\n") );
1332
1333 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
1334
1335 GLOBALS->minor = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(data->CM_minor));
1336
1337 ui_repdist_update_total(widget,NULL);
1338
1339 //hbfile_update(data->LV_acc, (gpointer)4);
1340 gtk_tree_view_columns_autosize (GTK_TREE_VIEW(data->LV_report));
1341 gtk_chart_show_minor(GTK_CHART(data->RE_chart), GLOBALS->minor);
1342
1343 }
1344
1345
1346 /*
1347 **
1348 */
1349 static void ui_repdist_setup(struct ui_repdist_data *data)
1350 {
1351 DB( g_print("\n[repdist] setup\n") );
1352
1353 data->txn_queue = g_queue_new ();
1354
1355 data->filter = da_flt_malloc();
1356 filter_reset(data->filter);
1357
1358
1359 data->detail = PREFS->stat_showdetail;
1360 data->legend = 1;
1361 data->rate = PREFS->stat_showrate^1;
1362
1363
1364 ui_repdist_toggle_rate(data->window, NULL);
1365
1366
1367
1368 /* 3.4 : make int transfer out of stats */
1369 data->filter->option[FILTER_PAYMODE] = 1;
1370 data->filter->paymode[PAYMODE_INTXFER] = FALSE;
1371
1372 filter_preset_daterange_set(data->filter, PREFS->date_range_rep, 0);
1373
1374 ui_repdist_update_date_widget(data->window, NULL);
1375
1376 }
1377
1378
1379
1380 static void ui_repdist_selection(GtkTreeSelection *treeselection, gpointer user_data)
1381 {
1382 GtkTreeModel *model;
1383 GtkTreeIter iter;
1384 guint key = -1;
1385
1386 DB( g_print("\n[repdist] selection\n") );
1387
1388 if (gtk_tree_selection_get_selected(treeselection, &model, &iter))
1389 {
1390 gtk_tree_model_get(model, &iter, LST_REPDIST_KEY, &key, -1);
1391 }
1392
1393 DB( g_print(" - active is %d\n", key) );
1394
1395 ui_repdist_detail(GTK_WIDGET(gtk_tree_selection_get_tree_view (treeselection)), GINT_TO_POINTER(key));
1396 ui_repdist_sensitive(GTK_WIDGET(gtk_tree_selection_get_tree_view (treeselection)), NULL);
1397 }
1398
1399
1400 /*
1401 **
1402 */
1403 static gboolean ui_repdist_dispose(GtkWidget *widget, GdkEvent *event, gpointer user_data)
1404 {
1405 struct ui_repdist_data *data = user_data;
1406 struct WinGeometry *wg;
1407
1408 DB( g_print("\n[repdist] dispose\n") );
1409
1410 g_queue_free (data->txn_queue);
1411
1412 da_flt_free(data->filter);
1413
1414 g_free(data);
1415
1416 //store position and size
1417 wg = &PREFS->sta_wg;
1418 gtk_window_get_position(GTK_WINDOW(widget), &wg->l, &wg->t);
1419 gtk_window_get_size(GTK_WINDOW(widget), &wg->w, &wg->h);
1420
1421 DB( g_print(" window: l=%d, t=%d, w=%d, h=%d\n", wg->l, wg->t, wg->w, wg->h) );
1422
1423
1424
1425 //enable define windows
1426 GLOBALS->define_off--;
1427 ui_mainwindow_update(GLOBALS->mainwindow, GINT_TO_POINTER(UF_SENSITIVE));
1428
1429 return FALSE;
1430 }
1431
1432
1433 // the window creation
1434 GtkWidget *ui_repdist_window_new(void)
1435 {
1436 struct ui_repdist_data *data;
1437 struct WinGeometry *wg;
1438 GtkWidget *window, *mainvbox, *hbox, *vbox, *notebook, *treeview, *vpaned, *sw;
1439 GtkWidget *label, *widget, *table, *entry;
1440 gint row;
1441 GtkUIManager *ui;
1442 GtkActionGroup *actions;
1443 GtkAction *action;
1444 GError *error = NULL;
1445
1446 DB( g_print("\n[repdist] new\n") );
1447
1448
1449 data = g_malloc0(sizeof(struct ui_repdist_data));
1450 if(!data) return NULL;
1451
1452 //disable define windows
1453 GLOBALS->define_off++;
1454 ui_mainwindow_update(GLOBALS->mainwindow, GINT_TO_POINTER(UF_SENSITIVE));
1455
1456 /* create window, etc */
1457 window = gtk_window_new (GTK_WINDOW_TOPLEVEL);
1458 data->window = window;
1459
1460 //store our window private data
1461 g_object_set_data(G_OBJECT(window), "inst_data", (gpointer)data);
1462 DB( g_print(" - new window=%p, inst_data=%p\n", window, data) );
1463
1464 gtk_window_set_title (GTK_WINDOW (window), _("Statistics Report"));
1465 gtk_window_set_icon_name(GTK_WINDOW (window), ICONNAME_HB_REP_STATS);
1466
1467
1468 //window contents
1469 mainvbox = gtk_box_new (GTK_ORIENTATION_VERTICAL, 0);
1470 gtk_container_add (GTK_CONTAINER (window), mainvbox);
1471
1472 hbox = gtk_box_new(GTK_ORIENTATION_HORIZONTAL, 0);
1473 gtk_box_pack_start (GTK_BOX (mainvbox), hbox, TRUE, TRUE, 0);
1474
1475 //control part
1476 table = gtk_grid_new ();
1477 gtk_widget_set_hexpand (GTK_WIDGET(table), FALSE);
1478 gtk_box_pack_start (GTK_BOX (hbox), table, FALSE, FALSE, 0);
1479
1480 gtk_container_set_border_width (GTK_CONTAINER (table), SPACING_SMALL);
1481 gtk_grid_set_row_spacing (GTK_GRID (table), SPACING_SMALL);
1482 gtk_grid_set_column_spacing (GTK_GRID (table), SPACING_MEDIUM);
1483
1484 row = 0;
1485 label = make_label_group(_("Display"));
1486 gtk_grid_attach (GTK_GRID (table), label, 0, row, 3, 1);
1487
1488 row++;
1489 label = make_label_widget(_("_View by:"));
1490 gtk_grid_attach (GTK_GRID (table), label, 1, row, 1, 1);
1491 //widget = make_cycle(label, CYA_REPORT_SRC);
1492 widget = hbtk_combo_box_new_with_data(label, CYA_REPORT_SRC);
1493 data->CY_src = widget;
1494 gtk_grid_attach (GTK_GRID (table), widget, 2, row, 1, 1);
1495
1496 row++;
1497 label = make_label_widget(_("_Type:"));
1498 gtk_grid_attach (GTK_GRID (table), label, 1, row, 1, 1);
1499 //widget = make_cycle(label, CYA_REPORT_TXN_TYPE);
1500 widget = hbtk_combo_box_new_with_data(label, CYA_REPORT_TYPE);
1501 data->CY_type = widget;
1502 gtk_grid_attach (GTK_GRID (table), widget, 2, row, 1, 1);
1503
1504
1505 row++;
1506 widget = gtk_check_button_new_with_mnemonic (_("By _amount"));
1507 data->CM_byamount = widget;
1508 gtk_grid_attach (GTK_GRID (table), widget, 2, row, 1, 1);
1509
1510 row++;
1511 widget = gtk_check_button_new_with_mnemonic (_("Euro _minor"));
1512 data->CM_minor = widget;
1513 gtk_grid_attach (GTK_GRID (table), widget, 2, row, 1, 1);
1514
1515
1516 row++;
1517 label = make_label_widget(_("_Zoom X:"));
1518 data->LB_zoomx = label;
1519 gtk_grid_attach (GTK_GRID (table), label, 1, row, 1, 1);
1520 widget = make_scale(label);
1521 data->RG_zoomx = widget;
1522 gtk_grid_attach (GTK_GRID (table), widget, 2, row, 1, 1);
1523
1524 /*
1525 row++;
1526 widget = gtk_check_button_new_with_mnemonic ("Legend");
1527 data->CM_legend = widget;
1528 gtk_grid_attach (GTK_GRID (table), widget, 1, 2, row, row+1);
1529 */
1530 row++;
1531 widget = gtk_separator_new(GTK_ORIENTATION_HORIZONTAL);
1532 gtk_grid_attach (GTK_GRID (table), widget, 0, row, 3, 1);
1533
1534 row++;
1535 label = make_label_group(_("Date filter"));
1536 gtk_grid_attach (GTK_GRID (table), label, 0, row, 3, 1);
1537
1538 row++;
1539 label = make_label_widget(_("_Range:"));
1540 gtk_grid_attach (GTK_GRID (table), label, 1, row, 1, 1);
1541 data->CY_range = make_daterange(label, TRUE);
1542 gtk_grid_attach (GTK_GRID (table), data->CY_range, 2, row, 1, 1);
1543
1544 row++;
1545 label = make_label_widget(_("_From:"));
1546 gtk_grid_attach (GTK_GRID (table), label, 1, row, 1, 1);
1547 data->PO_mindate = gtk_date_entry_new();
1548 gtk_grid_attach (GTK_GRID (table), data->PO_mindate, 2, row, 1, 1);
1549
1550 row++;
1551 label = make_label_widget(_("_To:"));
1552 gtk_grid_attach (GTK_GRID (table), label, 1, row, 1, 1);
1553 data->PO_maxdate = gtk_date_entry_new();
1554 gtk_grid_attach (GTK_GRID (table), data->PO_maxdate, 2, row, 1, 1);
1555
1556 //part: info + report
1557 vbox = gtk_box_new (GTK_ORIENTATION_VERTICAL, 0);
1558 gtk_box_pack_start (GTK_BOX (hbox), vbox, TRUE, TRUE, 0);
1559
1560 //ui manager
1561 actions = gtk_action_group_new ("default");
1562
1563 //as we use gettext
1564 gtk_action_group_set_translation_domain(actions, GETTEXT_PACKAGE);
1565
1566 // data to action callbacks is set here (data)
1567 gtk_action_group_add_radio_actions (actions, radio_entries, n_radio_entries, 0, G_CALLBACK(ui_repdist_action_mode), data);
1568
1569 gtk_action_group_add_actions (actions, entries, n_entries, data);
1570
1571 gtk_action_group_add_toggle_actions (actions,
1572 toggle_entries, n_toggle_entries,
1573 data);
1574
1575
1576 /* set which action should have priority in the toolbar */
1577 //action = gtk_action_group_get_action(actions, "List");
1578 //g_object_set(action, "is_important", TRUE, NULL);
1579
1580 //action = gtk_action_group_get_action(actions, "Column");
1581 //g_object_set(action, "is_important", TRUE, NULL);
1582
1583 //action = gtk_action_group_get_action(actions, "Donut");
1584 //g_object_set(action, "is_important", TRUE, NULL);
1585
1586 action = gtk_action_group_get_action(actions, "Detail");
1587 //g_object_set(action, "is_important", TRUE, NULL);
1588 g_object_set(action, "active", PREFS->stat_showdetail, NULL);
1589
1590 action = gtk_action_group_get_action(actions, "Rate");
1591 g_object_set(action, "active", PREFS->stat_showrate, NULL);
1592
1593 //action = gtk_action_group_get_action(actions, "Filter");
1594 //g_object_set(action, "is_important", TRUE, NULL);
1595
1596 //action = gtk_action_group_get_action(actions, "Refresh");
1597 //g_object_set(action, "is_important", TRUE, NULL);
1598
1599
1600 ui = gtk_ui_manager_new ();
1601 gtk_ui_manager_insert_action_group (ui, actions, 0);
1602 gtk_window_add_accel_group (GTK_WINDOW (window), gtk_ui_manager_get_accel_group (ui));
1603
1604 if (!gtk_ui_manager_add_ui_from_string (ui, ui_info, -1, &error))
1605 {
1606 g_message ("building UI failed: %s", error->message);
1607 g_error_free (error);
1608 }
1609
1610 data->ui = ui;
1611 data->actions = actions;
1612
1613 //toolbar
1614 data->TB_bar = gtk_ui_manager_get_widget (ui, "/ToolBar");
1615 gtk_box_pack_start (GTK_BOX (vbox), data->TB_bar, FALSE, FALSE, 0);
1616
1617 //add export menu button
1618 GtkToolItem *toolitem;
1619 GtkWidget *menu, *menuitem, *image;
1620
1621 menu = gtk_menu_new ();
1622 //gtk_widget_set_halign (menu, GTK_ALIGN_END);
1623
1624 menuitem = gtk_menu_item_new_with_mnemonic (_("_Result to clipboard"));
1625 gtk_menu_shell_append (GTK_MENU_SHELL (menu), menuitem);
1626 g_signal_connect (G_OBJECT (menuitem), "activate", G_CALLBACK (ui_repdist_export_result_clipboard), data);
1627
1628 menuitem = gtk_menu_item_new_with_mnemonic (_("_Result to CSV"));
1629 gtk_menu_shell_append (GTK_MENU_SHELL (menu), menuitem);
1630 g_signal_connect (G_OBJECT (menuitem), "activate", G_CALLBACK (ui_repdist_export_result_csv), data);
1631
1632 menuitem = gtk_menu_item_new_with_mnemonic (_("_Detail to clipboard"));
1633 data->MI_detailtoclip = menuitem;
1634 gtk_menu_shell_append (GTK_MENU_SHELL (menu), menuitem);
1635 g_signal_connect (G_OBJECT (menuitem), "activate", G_CALLBACK (ui_repdist_export_detail_clipboard), data);
1636
1637 menuitem = gtk_menu_item_new_with_mnemonic (_("_Detail to CSV"));
1638 data->MI_detailtocsv = menuitem;
1639 gtk_menu_shell_append (GTK_MENU_SHELL (menu), menuitem);
1640 g_signal_connect (G_OBJECT (menuitem), "activate", G_CALLBACK (ui_repdist_export_detail_csv), data);
1641
1642 gtk_widget_show_all (menu);
1643
1644 widget = gtk_menu_button_new();
1645 data->BT_export = widget;
1646 gtk_style_context_add_class (gtk_widget_get_style_context (GTK_WIDGET(widget)), GTK_STYLE_CLASS_FLAT);
1647
1648 //gtk_menu_button_set_direction (GTK_MENU_BUTTON(widget), GTK_ARROW_DOWN);
1649 //gtk_widget_set_halign (widget, GTK_ALIGN_END);
1650 image = gtk_image_new_from_icon_name (ICONNAME_HB_FILE_EXPORT, GTK_ICON_SIZE_LARGE_TOOLBAR);
1651 g_object_set (widget, "image", image, "popup", GTK_MENU(menu), NULL);
1652
1653 toolitem = gtk_tool_item_new();
1654 gtk_container_add (GTK_CONTAINER(toolitem), widget);
1655 gtk_toolbar_insert(GTK_TOOLBAR(data->TB_bar), GTK_TOOL_ITEM(toolitem), -1);
1656
1657
1658 //infos + balance
1659 hbox = gtk_box_new (GTK_ORIENTATION_HORIZONTAL, SPACING_SMALL);
1660 gtk_container_set_border_width (GTK_CONTAINER(hbox), SPACING_SMALL);
1661 gtk_box_pack_start (GTK_BOX (vbox), hbox, FALSE, FALSE, 0);
1662
1663 widget = make_label(NULL, 0.5, 0.5);
1664 gimp_label_set_attributes (GTK_LABEL (widget), PANGO_ATTR_SCALE, PANGO_SCALE_SMALL, -1);
1665 data->TX_daterange = widget;
1666 gtk_box_pack_start (GTK_BOX (hbox), widget, TRUE, TRUE, 0);
1667
1668 entry = gtk_label_new(NULL);
1669 data->TX_total[2] = entry;
1670 gtk_box_pack_end (GTK_BOX (hbox), entry, FALSE, FALSE, 0);
1671 label = gtk_label_new(_("Balance:"));
1672 gtk_box_pack_end (GTK_BOX (hbox), label, FALSE, FALSE, 0);
1673
1674 entry = gtk_label_new(NULL);
1675 data->TX_total[1] = entry;
1676 gtk_box_pack_end (GTK_BOX (hbox), entry, FALSE, FALSE, 0);
1677 label = gtk_label_new(_("Income:"));
1678 gtk_box_pack_end (GTK_BOX (hbox), label, FALSE, FALSE, 0);
1679
1680
1681 entry = gtk_label_new(NULL);
1682 data->TX_total[0] = entry;
1683 gtk_box_pack_end (GTK_BOX (hbox), entry, FALSE, FALSE, 0);
1684 label = gtk_label_new(_("Expense:"));
1685 gtk_box_pack_end (GTK_BOX (hbox), label, FALSE, FALSE, 0);
1686
1687
1688 /* report area */
1689 notebook = gtk_notebook_new();
1690 data->GR_result = notebook;
1691 gtk_widget_show(notebook);
1692 gtk_notebook_set_show_tabs(GTK_NOTEBOOK(notebook), FALSE);
1693 gtk_notebook_set_show_border(GTK_NOTEBOOK(notebook), FALSE);
1694 gtk_box_pack_start (GTK_BOX (vbox), notebook, TRUE, TRUE, 0);
1695
1696 // page list/detail
1697 vpaned = gtk_paned_new(GTK_ORIENTATION_VERTICAL);
1698 gtk_notebook_append_page(GTK_NOTEBOOK(notebook), vpaned, NULL);
1699
1700 // list
1701 sw = gtk_scrolled_window_new (NULL, NULL);
1702 gtk_scrolled_window_set_shadow_type (GTK_SCROLLED_WINDOW (sw), GTK_SHADOW_ETCHED_IN);
1703 gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (sw), GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC);
1704 treeview = ui_list_repdist_create();
1705 data->LV_report = treeview;
1706 gtk_container_add (GTK_CONTAINER(sw), treeview);
1707 gtk_paned_pack1 (GTK_PANED(vpaned), sw, TRUE, TRUE);
1708
1709 //detail
1710 sw = gtk_scrolled_window_new (NULL, NULL);
1711 data->GR_detail = sw;
1712 //gtk_scrolled_window_set_placement(GTK_SCROLLED_WINDOW (sw), GTK_CORNER_TOP_RIGHT);
1713 gtk_scrolled_window_set_shadow_type (GTK_SCROLLED_WINDOW (sw), GTK_SHADOW_ETCHED_IN);
1714 gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (sw), GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC);
1715 treeview = create_list_transaction(LIST_TXN_TYPE_DETAIL, PREFS->lst_ope_columns);
1716 data->LV_detail = treeview;
1717 gtk_container_add (GTK_CONTAINER(sw), treeview);
1718 gtk_paned_pack2 (GTK_PANED(vpaned), sw, TRUE, TRUE);
1719
1720 //page: 2d bar /pie
1721 widget = gtk_chart_new(CHART_TYPE_COL);
1722 data->RE_chart = widget;
1723 gtk_chart_set_minor_prefs(GTK_CHART(widget), PREFS->euro_value, PREFS->minor_cur.symbol);
1724 gtk_chart_set_currency(GTK_CHART(widget), GLOBALS->kcur);
1725 gtk_notebook_append_page(GTK_NOTEBOOK(notebook), widget, NULL);
1726
1727 //todo: setup should move this
1728 gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(data->CM_minor), GLOBALS->minor);
1729 gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(data->CM_byamount), PREFS->stat_byamount);
1730
1731 hbtk_combo_box_set_active_id(GTK_COMBO_BOX_TEXT(data->CY_type), REPORT_TYPE_EXPENSE);
1732
1733 /* attach our minor to treeview */
1734 g_object_set_data(G_OBJECT(gtk_tree_view_get_model(GTK_TREE_VIEW(data->LV_report))), "minor", (gpointer)data->CM_minor);
1735 g_object_set_data(G_OBJECT(gtk_tree_view_get_model(GTK_TREE_VIEW(data->LV_detail))), "minor", (gpointer)data->CM_minor);
1736
1737 /* signal connect */
1738 g_signal_connect (window, "delete-event", G_CALLBACK (ui_repdist_dispose), (gpointer)data);
1739
1740 g_signal_connect (data->CM_minor, "toggled", G_CALLBACK (ui_repdist_toggle_minor), NULL);
1741
1742 data->handler_id[HID_REPDIST_MINDATE] = g_signal_connect (data->PO_mindate, "changed", G_CALLBACK (ui_repdist_date_change), (gpointer)data);
1743 data->handler_id[HID_REPDIST_MAXDATE] = g_signal_connect (data->PO_maxdate, "changed", G_CALLBACK (ui_repdist_date_change), (gpointer)data);
1744
1745 data->handler_id[HID_REPDIST_RANGE] = g_signal_connect (data->CY_range, "changed", G_CALLBACK (ui_repdist_range_change), NULL);
1746
1747 g_signal_connect (data->CY_src, "changed", G_CALLBACK (ui_repdist_compute), (gpointer)data);
1748
1749 data->handler_id[HID_REPDIST_VIEW] = g_signal_connect (data->CY_type, "changed", G_CALLBACK (ui_repdist_compute), (gpointer)data);
1750
1751 g_signal_connect (data->RG_zoomx, "value-changed", G_CALLBACK (ui_repdist_zoomx_callback), NULL);
1752
1753
1754 g_signal_connect (data->CM_byamount, "toggled", G_CALLBACK (ui_repdist_update), NULL);
1755
1756 g_signal_connect (gtk_tree_view_get_selection(GTK_TREE_VIEW(data->LV_report)), "changed", G_CALLBACK (ui_repdist_selection), NULL);
1757
1758 g_signal_connect (GTK_TREE_VIEW(data->LV_detail), "row-activated", G_CALLBACK (ui_repdist_detail_onRowActivated), NULL);
1759
1760 //setup, init and show window
1761 ui_repdist_setup(data);
1762
1763 /* toolbar */
1764 if(PREFS->toolbar_style == 0)
1765 gtk_toolbar_unset_style(GTK_TOOLBAR(data->TB_bar));
1766 else
1767 gtk_toolbar_set_style(GTK_TOOLBAR(data->TB_bar), PREFS->toolbar_style-1);
1768
1769
1770 //setup, init and show window
1771 wg = &PREFS->sta_wg;
1772 gtk_window_move(GTK_WINDOW(window), wg->l, wg->t);
1773 gtk_window_resize(GTK_WINDOW(window), wg->w, wg->h);
1774
1775 gtk_widget_show_all (window);
1776
1777
1778
1779 //minor ?
1780 if( PREFS->euro_active )
1781 gtk_widget_show(data->CM_minor);
1782 else
1783 gtk_widget_hide(data->CM_minor);
1784
1785 //gtk_widget_hide(data->GR_detail);
1786
1787
1788
1789 ui_repdist_sensitive(window, NULL);
1790 ui_repdist_update_detail(window, NULL);
1791
1792 DB( g_print("range: %d\n", PREFS->date_range_rep) );
1793
1794 if( PREFS->date_range_rep != 0)
1795 gtk_combo_box_set_active(GTK_COMBO_BOX(data->CY_range), PREFS->date_range_rep);
1796 else
1797 ui_repdist_compute(window, NULL);
1798
1799
1800 return window;
1801 }
1802
1803 /*
1804 ** ============================================================================
1805 */
1806
1807
1808 static GString *ui_list_repdist_to_string(GtkTreeView *treeview, gboolean clipboard)
1809 {
1810 GString *node;
1811 GtkTreeModel *model;
1812 GtkTreeIter iter;
1813 gboolean valid;
1814 const gchar *format;
1815
1816 node = g_string_new(NULL);
1817
1818 // header
1819 format = (clipboard == TRUE) ? "%s\t%s\t%s\t%s\n" : "%s;%s;%s;%s\n";
1820 g_string_append_printf(node, format, _("Result"), _("Expense"), _("Income"), _("Balance"));
1821
1822 model = gtk_tree_view_get_model(treeview);
1823 valid = gtk_tree_model_get_iter_first(GTK_TREE_MODEL(model), &iter);
1824 while (valid)
1825 {
1826 gchar *name;
1827 gdouble exp, inc, bal;
1828
1829 gtk_tree_model_get (model, &iter,
1830 //LST_REPDIST_KEY, i,
1831 LST_REPDIST_NAME , &name,
1832 LST_REPDIST_EXPENSE, &exp,
1833 LST_REPDIST_INCOME , &inc,
1834 LST_REPDIST_BALANCE, &bal,
1835 -1);
1836
1837 format = (clipboard == TRUE) ? "%s\t%.2f\t%.2f\t%.2f\n" : "%s;%.2f;%.2f;%.2f\n";
1838 g_string_append_printf(node, format, name, exp, inc, bal);
1839
1840 //leak
1841 g_free(name);
1842
1843 valid = gtk_tree_model_iter_next(GTK_TREE_MODEL(model), &iter);
1844 }
1845
1846 //DB( g_print("text is:\n%s", node->str) );
1847
1848 return node;
1849 }
1850
1851
1852
1853
1854 static void ui_list_repdist_rate_cell_data_function (GtkTreeViewColumn *col,
1855 GtkCellRenderer *renderer,
1856 GtkTreeModel *model,
1857 GtkTreeIter *iter,
1858 gpointer user_data)
1859 {
1860 //GtkWidget *widget;
1861
1862 //widget = g_object_get_data(G_OBJECT(model), "minor");
1863
1864 //todo g_assert here and null test
1865
1866 gdouble tmp;
1867 gchar buf[128];
1868
1869 gtk_tree_model_get(model, iter, GPOINTER_TO_INT(user_data), &tmp, -1);
1870
1871 if(tmp != 0.0)
1872 {
1873 g_snprintf(buf, sizeof(buf), "%.2f %%", tmp);
1874 g_object_set(renderer, "text", buf, NULL);
1875 }
1876 else
1877 g_object_set(renderer, "text", "", NULL);
1878
1879 }
1880
1881
1882 static void ui_list_repdist_amount_cell_data_function (GtkTreeViewColumn *col,
1883 GtkCellRenderer *renderer,
1884 GtkTreeModel *model,
1885 GtkTreeIter *iter,
1886 gpointer user_data)
1887 {
1888 gdouble value;
1889 gchar *color;
1890 gchar buf[G_ASCII_DTOSTR_BUF_SIZE];
1891
1892 gtk_tree_model_get(model, iter, GPOINTER_TO_INT(user_data), &value, -1);
1893
1894 if( value )
1895 {
1896 hb_strfmon(buf, G_ASCII_DTOSTR_BUF_SIZE-1, value, GLOBALS->kcur, GLOBALS->minor);
1897
1898 color = get_normal_color_amount(value);
1899
1900 g_object_set(renderer,
1901 "foreground", color,
1902 "text", buf,
1903 NULL); }
1904 else
1905 {
1906 g_object_set(renderer, "text", "", NULL);
1907 }
1908 }
1909
1910
1911 static GtkTreeViewColumn *ui_list_repdist_amount_column(gchar *name, gint id)
1912 {
1913 GtkTreeViewColumn *column;
1914 GtkCellRenderer *renderer;
1915
1916 column = gtk_tree_view_column_new();
1917 gtk_tree_view_column_set_title(column, name);
1918 renderer = gtk_cell_renderer_text_new ();
1919 g_object_set(renderer, "xalign", 1.0, NULL);
1920 gtk_tree_view_column_pack_start(column, renderer, TRUE);
1921 gtk_tree_view_column_set_cell_data_func(column, renderer, ui_list_repdist_amount_cell_data_function, GINT_TO_POINTER(id), NULL);
1922 gtk_tree_view_column_set_alignment (column, 0.5);
1923 //gtk_tree_view_column_set_sort_column_id (column, id);
1924 return column;
1925 }
1926
1927 static GtkTreeViewColumn *ui_list_repdist_rate_column(gint id)
1928 {
1929 GtkTreeViewColumn *column;
1930 GtkCellRenderer *renderer;
1931
1932 column = gtk_tree_view_column_new();
1933 gtk_tree_view_column_set_title(column, "%");
1934 renderer = gtk_cell_renderer_text_new ();
1935 g_object_set(renderer, "xalign", 1.0, "yalign", 1.0, "scale", 0.8, "scale-set", TRUE, NULL);
1936
1937 gtk_tree_view_column_pack_start(column, renderer, TRUE);
1938 //gtk_tree_view_column_add_attribute(column, renderer, "text", id);
1939 gtk_tree_view_column_set_cell_data_func(column, renderer, ui_list_repdist_rate_cell_data_function, GINT_TO_POINTER(id), NULL);
1940 gtk_tree_view_column_set_alignment (column, 0.5);
1941 //gtk_tree_view_column_set_sort_column_id (column, id);
1942
1943 //gtk_tree_view_column_set_visible(column, FALSE);
1944
1945 return column;
1946 }
1947
1948 /*
1949 ** create our statistic list
1950 */
1951 static GtkWidget *ui_list_repdist_create(void)
1952 {
1953 GtkListStore *store;
1954 GtkWidget *view;
1955 GtkCellRenderer *renderer;
1956 GtkTreeViewColumn *column;
1957
1958 /* create list store */
1959 store = gtk_list_store_new(
1960 NUM_LST_REPDIST,
1961 G_TYPE_INT, //keep for compatibility with chart
1962 G_TYPE_INT,
1963 G_TYPE_STRING,
1964 G_TYPE_DOUBLE,
1965 G_TYPE_DOUBLE,
1966 G_TYPE_DOUBLE,
1967 G_TYPE_DOUBLE,
1968 G_TYPE_DOUBLE,
1969 G_TYPE_DOUBLE
1970 );
1971
1972 //treeview
1973 view = gtk_tree_view_new_with_model(GTK_TREE_MODEL(store));
1974 g_object_unref(store);
1975
1976 gtk_tree_view_set_grid_lines (GTK_TREE_VIEW (view), PREFS->grid_lines);
1977
1978 /* column: Name */
1979 column = gtk_tree_view_column_new();
1980 gtk_tree_view_column_set_title(column, _("Result"));
1981 renderer = gtk_cell_renderer_text_new ();
1982 gtk_tree_view_column_pack_start(column, renderer, TRUE);
1983 //gtk_tree_view_column_set_cell_data_func(column, renderer, ope_result_cell_data_function, NULL, NULL);
1984 gtk_tree_view_column_add_attribute(column, renderer, "text", LST_REPDIST_NAME);
1985 //gtk_tree_view_column_set_sort_column_id (column, LST_REPDIST_NAME);
1986 gtk_tree_view_column_set_resizable(column, TRUE);
1987 gtk_tree_view_column_set_alignment (column, 0.5);
1988 gtk_tree_view_append_column (GTK_TREE_VIEW(view), column);
1989
1990 /* column: Expense */
1991 column = ui_list_repdist_amount_column(_("Expense"), LST_REPDIST_EXPENSE);
1992 gtk_tree_view_append_column (GTK_TREE_VIEW(view), column);
1993 column = ui_list_repdist_rate_column(LST_REPDIST_EXPRATE);
1994 gtk_tree_view_append_column (GTK_TREE_VIEW(view), column);
1995
1996 /* column: Income */
1997 column = ui_list_repdist_amount_column(_("Income"), LST_REPDIST_INCOME);
1998 gtk_tree_view_append_column (GTK_TREE_VIEW(view), column);
1999 column = ui_list_repdist_rate_column(LST_REPDIST_INCRATE);
2000 gtk_tree_view_append_column (GTK_TREE_VIEW(view), column);
2001
2002 /* column: Balance */
2003 column = ui_list_repdist_amount_column(_("Balance"), LST_REPDIST_BALANCE);
2004 gtk_tree_view_append_column (GTK_TREE_VIEW(view), column);
2005 column = ui_list_repdist_rate_column(LST_REPDIST_BALRATE);
2006 gtk_tree_view_append_column (GTK_TREE_VIEW(view), column);
2007
2008 /* column last: empty */
2009 column = gtk_tree_view_column_new();
2010 gtk_tree_view_append_column (GTK_TREE_VIEW(view), column);
2011
2012 /* sort */
2013 gtk_tree_sortable_set_sort_func(GTK_TREE_SORTABLE(store), LST_REPDIST_POS , ui_list_repdist_compare_func, GINT_TO_POINTER(LST_REPDIST_POS), NULL);
2014 gtk_tree_sortable_set_sort_func(GTK_TREE_SORTABLE(store), LST_REPDIST_EXPENSE, ui_list_repdist_compare_func, GINT_TO_POINTER(LST_REPDIST_EXPENSE), NULL);
2015 gtk_tree_sortable_set_sort_func(GTK_TREE_SORTABLE(store), LST_REPDIST_INCOME , ui_list_repdist_compare_func, GINT_TO_POINTER(LST_REPDIST_INCOME), NULL);
2016 gtk_tree_sortable_set_sort_func(GTK_TREE_SORTABLE(store), LST_REPDIST_BALANCE, ui_list_repdist_compare_func, GINT_TO_POINTER(LST_REPDIST_BALANCE), NULL);
2017
2018
2019 return(view);
2020 }
2021
2022 static gint ui_list_repdist_compare_func (GtkTreeModel *model, GtkTreeIter *a, GtkTreeIter *b, gpointer userdata)
2023 {
2024 gint sortcol = GPOINTER_TO_INT(userdata);
2025 gint retval = 0;
2026 gint pos1, pos2;
2027 gdouble val1, val2;
2028
2029 gtk_tree_model_get(model, a,
2030 LST_REPDIST_POS, &pos1,
2031 sortcol, &val1,
2032 -1);
2033 gtk_tree_model_get(model, b,
2034 LST_REPDIST_POS, &pos2,
2035 sortcol, &val2,
2036 -1);
2037
2038 switch(sortcol)
2039 {
2040 case LST_REPDIST_POS:
2041 retval = pos2 - pos1;
2042 break;
2043 default:
2044 retval = (ABS(val1) - ABS(val2)) > 0 ? 1 : -1;
2045 break;
2046 }
2047
2048 //DB( g_print(" sort %d=%d or %.2f=%.2f :: %d\n", pos1,pos2, val1, val2, ret) );
2049
2050 return retval;
2051 }
2052
This page took 0.128772 seconds and 4 git commands to generate.