]> Dogcows Code - chaz/homebank/blob - src/rep_budget.c
projects / chaz / homebank / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
Merge branch 'upstream'
[chaz/homebank] / src / rep_budget.c
1 /* HomeBank -- Free, easy, personal accounting for everyone.
2 * Copyright (C) 1995-2016 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_budget.h"
24
25 #include "list_operation.h"
26 #include "gtk-chart-stack.h"
27 #include "gtk-dateentry.h"
28
29 #include "dsp_mainwindow.h"
30 #include "ui-transaction.h"
31
32
33 /****************************************************************************/
34 /* Debug macros */
35 /****************************************************************************/
36 #define MYDEBUG 0
37
38 #if MYDEBUG
39 #define DB(x) (x);
40 #else
41 #define DB(x);
42 #endif
43
44
45
46 /* our global datas */
47 extern struct HomeBank *GLOBALS;
48 extern struct Preferences *PREFS;
49
50
51 static void repbudget_action_viewlist(GtkAction *action, gpointer user_data);
52 static void repbudget_action_viewbar(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);
55 static void repbudget_action_export(GtkAction *action, gpointer user_data);
56
57 static void repbudget_date_change(GtkWidget *widget, gpointer user_data);
58 static void repbudget_range_change(GtkWidget *widget, gpointer user_data);
59 static void repbudget_toggle_detail(GtkWidget *widget, gpointer user_data);
60 static void repbudget_detail(GtkWidget *widget, gpointer user_data);
61 static void repbudget_compute(GtkWidget *widget, gpointer user_data);
62 static void repbudget_update_total(GtkWidget *widget, gpointer user_data);
63 static void repbudget_sensitive(GtkWidget *widget, gpointer user_data);
64 static void repbudget_toggle(GtkWidget *widget, gpointer user_data);
65 static GtkWidget *create_list_budget(void);
66 static void repbudget_update_detail(GtkWidget *widget, gpointer user_data);
67 static void repbudget_update_daterange(GtkWidget *widget, gpointer user_data);
68 static void repbudget_export_csv(GtkWidget *widget, gpointer user_data);
69
70 gchar *CYA_BUDGSELECT[] = { N_("Category"), N_("Subcategory"), NULL };
71
72 gchar *CYA_KIND[] = { N_("Exp. & Inc."), N_("Expense"), N_("Income"), NULL };
73
74 gchar *CYA_BUDGETSELECT[] = { N_("Spent & Budget"), N_("Spent"), N_("Budget"), N_("Result"), NULL };
75
76
77 //extern gchar *CYA_FLT_SELECT[];
78
79 static GtkActionEntry entries[] = {
80 { "List" , ICONNAME_HB_VIEW_LIST , N_("List") , NULL, N_("View results as list"), G_CALLBACK (repbudget_action_viewlist) },
81 { "Stack" , ICONNAME_HB_VIEW_STACK, N_("Stack") , NULL, N_("View results as stack bars"), G_CALLBACK (repbudget_action_viewbar) },
82 { "Refresh" , ICONNAME_REFRESH, N_("Refresh"), NULL, N_("Refresh results"), G_CALLBACK (repbudget_action_refresh) },
83
84 { "Export" , ICONNAME_HB_FILE_EXPORT , N_("Export") , NULL, N_("Export as CSV"), G_CALLBACK (repbudget_action_export) },
85 };
86 static guint n_entries = G_N_ELEMENTS (entries);
87
88
89 static GtkToggleActionEntry toggle_entries[] = {
90 { "Detail", ICONNAME_HB_OPE_SHOW, /* name, icon-name */
91 N_("Detail"), NULL, /* label, accelerator */
92 N_("Toggle detail"), /* tooltip */
93 G_CALLBACK (repbudget_action_detail),
94 FALSE }, /* is_active */
95
96 };
97 static guint n_toggle_entries = G_N_ELEMENTS (toggle_entries);
98
99
100 static const gchar *ui_info =
101 "<ui>"
102 " <toolbar name='ToolBar'>"
103 " <toolitem action='List'/>"
104 " <toolitem action='Stack'/>"
105 " <separator/>"
106 " <toolitem action='Detail'/>"
107 " <separator/>"
108 " <toolitem action='Refresh'/>"
109 " <separator/>"
110 " <toolitem action='Export'/>"
111 " </toolbar>"
112 "</ui>";
113
114
115
116 /* action functions -------------------- */
117 static void repbudget_action_viewlist(GtkAction *action, gpointer user_data)
118 {
119 struct repbudget_data *data = user_data;
120
121 gtk_notebook_set_current_page(GTK_NOTEBOOK(data->GR_result), 0);
122 repbudget_sensitive(data->window, NULL);
123 }
124
125 static void repbudget_action_viewbar(GtkAction *action, gpointer user_data)
126 {
127 struct repbudget_data *data = user_data;
128
129 gtk_notebook_set_current_page(GTK_NOTEBOOK(data->GR_result), 1);
130 repbudget_sensitive(data->window, NULL);
131 }
132
133 static void repbudget_action_detail(GtkAction *action, gpointer user_data)
134 {
135 struct repbudget_data *data = user_data;
136
137 repbudget_toggle_detail(data->window, NULL);
138 }
139
140
141 static void repbudget_action_refresh(GtkAction *action, gpointer user_data)
142 {
143 struct repbudget_data *data = user_data;
144
145 repbudget_compute(data->window, NULL);
146 }
147
148 static void repbudget_action_export(GtkAction *action, gpointer user_data)
149 {
150 struct repbudget_data *data = user_data;
151
152 repbudget_export_csv(data->window, NULL);
153 }
154
155 /* ======================== */
156
157
158 static gint getmonth(guint date)
159 {
160 GDate *date1;
161 gint month;
162
163 date1 = g_date_new_julian(date);
164 month = g_date_get_month(date1);
165
166 /*#if MYDEBUG == 1
167 g_print("\n[repbudget] getmonth\n");
168 gchar buffer1[128];
169 g_date_strftime (buffer1, 128-1, "%x", date1);
170 g_print(" date is '%s', month=%d\n", buffer1, month);
171 #endif*/
172
173 g_date_free(date1);
174
175 return(month);
176 }
177
178 static gint countmonth(guint32 mindate, guint32 maxdate)
179 {
180 GDate *date1, *date2;
181 gint nbmonth;
182
183 date1 = g_date_new_julian(mindate);
184 date2 = g_date_new_julian(maxdate);
185
186 nbmonth = 0;
187 while(g_date_compare(date1, date2) < 0)
188 {
189 nbmonth++;
190 g_date_add_months(date1, 1);
191 }
192
193 g_date_free(date2);
194 g_date_free(date1);
195
196 return(nbmonth);
197 }
198
199 static gdouble budget_compute_result(gdouble budget, gdouble spent)
200 {
201 gdouble retval;
202
203 //original formula
204 //result = ABS(budget) - ABS(spent);
205
206 retval = spent - budget;
207
208 return retval;
209 }
210
211
212
213
214
215 static void repbudget_date_change(GtkWidget *widget, gpointer user_data)
216 {
217 struct repbudget_data *data;
218
219 DB( g_print("\n[repbudget] date change\n") );
220
221 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
222
223 data->filter->mindate = gtk_date_entry_get_date(GTK_DATE_ENTRY(data->PO_mindate));
224 data->filter->maxdate = gtk_date_entry_get_date(GTK_DATE_ENTRY(data->PO_maxdate));
225
226 // set min/max date for both widget
227 gtk_date_entry_set_maxdate(GTK_DATE_ENTRY(data->PO_mindate), data->filter->maxdate);
228 gtk_date_entry_set_mindate(GTK_DATE_ENTRY(data->PO_maxdate), data->filter->mindate);
229
230 g_signal_handler_block(data->CY_range, data->handler_id[HID_REPBUDGET_RANGE]);
231 gtk_combo_box_set_active(GTK_COMBO_BOX(data->CY_range), FLT_RANGE_OTHER);
232 g_signal_handler_unblock(data->CY_range, data->handler_id[HID_REPBUDGET_RANGE]);
233
234
235 repbudget_compute(widget, NULL);
236 repbudget_update_daterange(widget, NULL);
237
238 }
239
240
241 static void repbudget_range_change(GtkWidget *widget, gpointer user_data)
242 {
243 struct repbudget_data *data;
244 gint range;
245
246 DB( g_print("\n[repbudget] range change\n") );
247
248 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
249
250 range = gtk_combo_box_get_active(GTK_COMBO_BOX(data->CY_range));
251
252
253 if(range != FLT_RANGE_OTHER)
254 {
255 filter_preset_daterange_set(data->filter, range, 0);
256
257 g_signal_handler_block(data->PO_mindate, data->handler_id[HID_REPBUDGET_MINDATE]);
258 g_signal_handler_block(data->PO_maxdate, data->handler_id[HID_REPBUDGET_MAXDATE]);
259
260 gtk_date_entry_set_date(GTK_DATE_ENTRY(data->PO_mindate), data->filter->mindate);
261 gtk_date_entry_set_date(GTK_DATE_ENTRY(data->PO_maxdate), data->filter->maxdate);
262
263 g_signal_handler_unblock(data->PO_mindate, data->handler_id[HID_REPBUDGET_MINDATE]);
264 g_signal_handler_unblock(data->PO_maxdate, data->handler_id[HID_REPBUDGET_MAXDATE]);
265
266 repbudget_compute(widget, NULL);
267 repbudget_update_daterange(widget, NULL);
268 }
269 }
270
271
272 static void repbudget_update_daterange(GtkWidget *widget, gpointer user_data)
273 {
274 struct repbudget_data *data;
275 gchar *daterange;
276
277 DB( g_print("\n[repbudget] update daterange\n") );
278
279 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
280
281 daterange = filter_daterange_text_get(data->filter);
282 gtk_label_set_markup(GTK_LABEL(data->TX_daterange), daterange);
283 g_free(daterange);
284 }
285
286
287 static void repbudget_toggle_detail(GtkWidget *widget, gpointer user_data)
288 {
289 struct repbudget_data *data;
290
291 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
292
293 DB( g_print("\n[repbudget] toggle detail\n") );
294
295 data->detail ^= 1;
296
297 repbudget_update_detail(widget, user_data);
298
299 }
300
301
302 static void repbudget_detail_onRowActivated (GtkTreeView *treeview,
303 GtkTreePath *path,
304 GtkTreeViewColumn *col,
305 gpointer userdata)
306 {
307 struct repbudget_data *data;
308 Transaction *active_txn;
309 gboolean result;
310
311 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(GTK_WIDGET(treeview), GTK_TYPE_WINDOW)), "inst_data");
312
313 DB( g_print ("\n[repbudget] A detail row has been double-clicked!\n") );
314
315 active_txn = list_txn_get_active_transaction(GTK_TREE_VIEW(data->LV_detail));
316 if(active_txn)
317 {
318 Transaction *old_txn, *new_txn;
319
320 old_txn = da_transaction_clone (active_txn);
321 new_txn = active_txn;
322 result = deftransaction_external_edit(GTK_WINDOW(data->window), old_txn, new_txn);
323
324 if(result == GTK_RESPONSE_ACCEPT)
325 {
326 //#1640885
327 GLOBALS->changes_count++;
328 repbudget_compute(data->window, NULL);
329 }
330
331 da_transaction_free (old_txn);
332 }
333 }
334
335
336 static void repbudget_update_detail(GtkWidget *widget, gpointer user_data)
337 {
338 struct repbudget_data *data;
339
340 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
341
342 DB( g_print("\n[repbudget] update detail\n") );
343
344 if(GTK_IS_TREE_VIEW(data->LV_report))
345 {
346 if(data->detail)
347 {
348 GtkTreeSelection *treeselection;
349 GtkTreeModel *model;
350 GtkTreeIter iter;
351 guint key;
352
353 treeselection = gtk_tree_view_get_selection (GTK_TREE_VIEW(data->LV_report));
354
355 if (gtk_tree_selection_get_selected(treeselection, &model, &iter))
356 {
357 gtk_tree_model_get(model, &iter, LST_BUDGET_KEY, &key, -1);
358
359 //DB( g_print(" - active is %d\n", pos) );
360
361 repbudget_detail(GTK_WIDGET(gtk_tree_selection_get_tree_view (treeselection)), GINT_TO_POINTER(key));
362 }
363
364
365 gtk_widget_show(data->GR_detail);
366 }
367 else
368 gtk_widget_hide(data->GR_detail);
369
370
371 }
372 }
373
374
375 static void repbudget_export_csv(GtkWidget *widget, gpointer user_data)
376 {
377 struct repbudget_data *data;
378 GtkTreeModel *model;
379 GtkTreeIter iter;
380 gboolean valid;
381 gchar *filename = NULL;
382 GIOChannel *io;
383 gchar *outstr, *name;
384 gint tmpfor;
385
386 DB( g_print("\n[repbudget] export csv\n") );
387
388 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
389
390 tmpfor = gtk_combo_box_get_active(GTK_COMBO_BOX(data->CY_for));
391
392 name = g_strdup_printf("hb-budget_%s.csv", CYA_BUDGSELECT[tmpfor]);
393
394 if( ui_file_chooser_csv(GTK_WINDOW(data->window), GTK_FILE_CHOOSER_ACTION_SAVE, &filename, name) == TRUE )
395 {
396 DB( g_print(" + filename is %s\n", filename) );
397
398 io = g_io_channel_new_file(filename, "w", NULL);
399 if(io != NULL)
400 {
401 // header
402 outstr = g_strdup_printf("%s;%s;%s;%s;\n", _("Category"), _("Spent"), _("Budget"), _("Result"));
403 g_io_channel_write_chars(io, outstr, -1, NULL, NULL);
404
405 model = gtk_tree_view_get_model(GTK_TREE_VIEW(data->LV_report));
406 valid = gtk_tree_model_get_iter_first(GTK_TREE_MODEL(model), &iter);
407 while (valid)
408 {
409 gchar *name, *status;
410 gdouble spent, budget, result;
411
412 gtk_tree_model_get (model, &iter,
413 //LST_REPDIST_KEY, i,
414 LST_BUDGET_NAME, &name,
415 LST_BUDGET_SPENT, &spent,
416 LST_BUDGET_BUDGET, &budget,
417 LST_BUDGET_RESULT, &result,
418 LST_BUDGET_STATUS, &status,
419 -1);
420
421 outstr = g_strdup_printf("%s;%.2f;%.2f;%.2f;%s\n", name, spent, budget, result, status);
422 g_io_channel_write_chars(io, outstr, -1, NULL, NULL);
423
424 DB( g_print("%s", outstr) );
425
426 g_free(outstr);
427
428 valid = gtk_tree_model_iter_next(GTK_TREE_MODEL(model), &iter);
429 }
430
431 g_io_channel_unref (io);
432 }
433
434 g_free( filename );
435 }
436
437 g_free(name);
438
439
440 }
441
442
443 static void repbudget_detail(GtkWidget *widget, gpointer user_data)
444 {
445 struct repbudget_data *data;
446 guint active = GPOINTER_TO_INT(user_data);
447 GList *list;
448 guint tmpfor;
449 GtkTreeModel *model;
450 GtkTreeIter iter;
451
452 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
453
454 DB( g_print("\n[repbudget] detail\n") );
455
456 if(data->detail)
457 {
458 /* clear and detach our model */
459 model = gtk_tree_view_get_model(GTK_TREE_VIEW(data->LV_detail));
460 gtk_list_store_clear (GTK_LIST_STORE(model));
461 g_object_ref(model); /* Make sure the model stays with us after the tree view unrefs it */
462 gtk_tree_view_set_model(GTK_TREE_VIEW(data->LV_detail), NULL); /* Detach model from view */
463
464 tmpfor = gtk_combo_box_get_active(GTK_COMBO_BOX(data->CY_for));
465
466 /* fill in the model */
467 list = g_queue_peek_head_link(data->txn_queue);
468 while (list != NULL)
469 {
470 Account *acc;
471 Transaction *ope = list->data;
472 guint pos = 0;
473 gboolean insert = FALSE;
474
475 //DB( g_print(" get %s\n", ope->ope_Word) );
476
477 acc = da_acc_get(ope->kacc);
478 if(acc != NULL)
479 {
480 if((acc->flags & AF_NOBUDGET)) goto next1;
481 }
482
483 //filter here
484 if( ope->flags & OF_SPLIT )
485 {
486 guint nbsplit = da_splits_count(ope->splits);
487 Split *split;
488 guint i;
489
490 for(i=0;i<nbsplit;i++)
491 {
492 split = ope->splits[i];
493 switch(tmpfor)
494 {
495 case BUDG_CATEGORY:
496 {
497 Category *catentry = da_cat_get(split->kcat);
498 if(catentry)
499 pos = (catentry->flags & GF_SUB) ? catentry->parent : catentry->key;
500 }
501 break;
502 case BUDG_SUBCATEGORY:
503 pos = split->kcat;
504 break;
505 }
506
507 if( pos == active )
508 { insert = TRUE; break; }
509 }
510 }
511 else
512 {
513 switch(tmpfor)
514 {
515 case BUDG_CATEGORY:
516 {
517 Category *catentry = da_cat_get(ope->kcat);
518 if(catentry)
519 pos = (catentry->flags & GF_SUB) ? catentry->parent : catentry->key;
520 }
521 break;
522 case BUDG_SUBCATEGORY:
523 pos = ope->kcat;
524 break;
525 }
526
527 if( pos == active )
528 insert = TRUE;
529 }
530
531 //insert
532 if( insert == TRUE )
533 {
534
535 gtk_list_store_append (GTK_LIST_STORE(model), &iter);
536 gtk_list_store_set (GTK_LIST_STORE(model), &iter,
537 LST_DSPOPE_DATAS, ope,
538 -1);
539 }
540
541
542 next1:
543 list = g_list_next(list);
544 }
545
546 /* Re-attach model to view */
547 gtk_tree_view_set_model(GTK_TREE_VIEW(data->LV_detail), model);
548 g_object_unref(model);
549
550 gtk_tree_view_columns_autosize( GTK_TREE_VIEW(data->LV_detail) );
551
552 }
553
554 }
555
556
557 static void repbudget_compute(GtkWidget *widget, gpointer user_data)
558 {
559 struct repbudget_data *data;
560
561 gint tmpfor, tmpkind;
562 guint32 mindate, maxdate;
563
564 GtkTreeModel *model;
565 GtkTreeIter iter;
566 GList *list;
567 guint n_result, id;
568 gdouble *tmp_spent, *tmp_budget;
569 gint nbmonth = 1;
570 gchar *title;
571
572 DB( g_print("\n[repbudget] compute\n") );
573
574 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
575
576 tmpfor = gtk_combo_box_get_active(GTK_COMBO_BOX(data->CY_for));
577 tmpkind = gtk_combo_box_get_active(GTK_COMBO_BOX(data->CY_kind));
578
579 mindate = data->filter->mindate;
580 maxdate = data->filter->maxdate;
581 if(maxdate < mindate) return;
582
583 g_queue_free (data->txn_queue);
584 data->txn_queue = hbfile_transaction_get_partial(data->filter->mindate, data->filter->maxdate);
585
586
587 DB( g_print(" for=%d, kind=%d\n", tmpfor, tmpkind) );
588
589 nbmonth = countmonth(mindate, maxdate);
590 DB( g_print(" date: min=%d max=%d nbmonth=%d\n", mindate, maxdate, nbmonth) );
591
592 n_result = da_cat_get_max_key();
593 DB( g_print(" nbcat=%d\n", n_result) );
594
595 /* allocate some memory */
596 tmp_spent = g_malloc0((n_result+1) * sizeof(gdouble));
597 tmp_budget = g_malloc0((n_result+1) * sizeof(gdouble));
598
599 if(tmp_spent && tmp_budget)
600 {
601 guint i = 0;
602 /* compute the results */
603 data->total_spent = 0.0;
604 data->total_budget = 0.0;
605
606 /* compute budget for each category */
607 DB( g_print("\n+ compute budget\n") );
608
609 //fixed #328034: here <=n_result
610 for(i=1; i<=n_result; i++)
611 {
612 Category *entry;
613 //gchar buffer[128];
614 gint pos;
615
616 entry = da_cat_get(i);
617 if( entry == NULL)
618 continue;
619
620 DB( g_print(" category %d:'%s' issub=%d hasbudget=%d custom=%d\n",
621 entry->key, entry->name, (entry->flags & GF_SUB), (entry->flags & GF_BUDGET), (entry->flags & GF_CUSTOM)) );
622
623 //debug
624 #if MYDEBUG == 1
625 gint k;
626 g_print(" budget vector: ");
627 for(k=0;k<13;k++)
628 g_print( " %d:[%.2f]", k, entry->budget[k]);
629 g_print("\n");
630 #endif
631
632 pos = 0;
633 switch(tmpfor)
634 {
635 case BUDG_CATEGORY:
636 {
637 Category *catentry = da_cat_get(i);
638 if(catentry)
639 pos = (catentry->flags & GF_SUB) ? catentry->parent : catentry->key;
640 }
641 break;
642 case BUDG_SUBCATEGORY:
643 pos = i;
644 break;
645 }
646
647 // same value each month ?
648 if(!(entry->flags & GF_CUSTOM))
649 {
650 DB( g_print(" - monthly %.2f\n", entry->budget[0]) );
651 tmp_budget[pos] += entry->budget[0]*nbmonth;
652 }
653 //otherwise sum each month from mindate month
654 else
655 {
656 gint month = getmonth(mindate);
657 gint j;
658
659 DB( g_print(" - custom each month for %d months\n", nbmonth) );
660 for(j=0;j<nbmonth;j++) {
661 DB( g_print(" j=%d month=%d budg=%.2f\n", j, month, entry->budget[month]) );
662 tmp_budget[pos] += entry->budget[month];
663 month++;
664 if(month > 12) {
665 month = 1;
666 }
667 }
668 }
669
670 //debug
671 #if MYDEBUG == 1
672 g_print(" final budget: %d:'%s' : budg[%d]=%.2f\n", entry->key, entry->name, pos, tmp_budget[pos] );
673 #endif
674 }
675
676
677 // compute spent for each transaction */
678 DB( g_print("\n+ compute spent from transactions\n") );
679
680
681 list = g_queue_peek_head_link(data->txn_queue);
682 while (list != NULL)
683 {
684 Transaction *ope = list->data;
685 gint pos = 0;
686 gdouble trn_amount;
687
688 //DB( g_print("%d, get ope: %s :: acc=%d, cat=%d, mnt=%.2f\n", i, ope->wording, ope->account, ope->category, ope->amount) );
689
690 if( ope->flags & OF_SPLIT )
691 {
692 guint nbsplit = da_splits_count(ope->splits);
693 Split *split;
694
695 for(i=0;i<nbsplit;i++)
696 {
697 split = ope->splits[i];
698 switch(tmpfor)
699 {
700 case BUDG_CATEGORY:
701 {
702 Category *catentry = da_cat_get(split->kcat);
703 if(catentry)
704 pos = (catentry->flags & GF_SUB) ? catentry->parent : catentry->key;
705 }
706 break;
707 case BUDG_SUBCATEGORY:
708 pos = split->kcat;
709 break;
710 }
711
712 //trn_amount = split->amount;
713 trn_amount = hb_amount_base(split->amount, ope->kcur);
714
715 DB( g_print(" -> affecting split %.2f to cat pos %d\n", trn_amount, pos) );
716
717 tmp_spent[pos] += trn_amount;
718
719 }
720 }
721 else
722 {
723 switch(tmpfor)
724 {
725 case BUDG_CATEGORY:
726 {
727 Category *catentry = da_cat_get(ope->kcat);
728 if(catentry)
729 pos = (catentry->flags & GF_SUB) ? catentry->parent : catentry->key;
730 }
731 break;
732 case BUDG_SUBCATEGORY:
733 pos = ope->kcat;
734 break;
735 }
736
737 //trn_amount = ope->amount;
738 trn_amount = hb_amount_base(ope->amount, ope->kcur);
739
740 DB( g_print(" -> affecting %.2f to cat pos %d\n", trn_amount, pos) );
741
742 tmp_spent[pos] += trn_amount;
743
744 }
745
746 list = g_list_next(list);
747 i++;
748 }
749
750 DB( g_print("\nclear and detach model\n") );
751
752 /* clear and detach our model */
753 model = gtk_tree_view_get_model(GTK_TREE_VIEW(data->LV_report));
754 gtk_list_store_clear (GTK_LIST_STORE(model));
755 g_object_ref(model); /* Make sure the model stays with us after the tree view unrefs it */
756 gtk_tree_view_set_model(GTK_TREE_VIEW(data->LV_report), NULL); /* Detach model from view */
757
758 DB( g_print("\n+ insert into treeview\n") );
759
760 /* insert into the treeview */
761 for(i=1, id=0; i<=n_result; i++)
762 {
763 gchar *name, *fullcatname;
764 Category *entry;
765
766 fullcatname = NULL;
767
768 entry = da_cat_get(i);
769 if( entry == NULL)
770 continue;
771
772 if(entry->flags & GF_SUB)
773 {
774 Category *parent = da_cat_get( entry->parent);
775
776 fullcatname = g_strdup_printf("%s:%s", parent->name, entry->name);
777 name = fullcatname;
778 }
779 else
780 name = entry->name;
781
782 if(name == NULL) name = "(None)";
783
784 //#1553862
785 //if( (tmpfor == BUDG_CATEGORY && !(entry->flags & GF_SUB)) || (tmpfor == BUDG_SUBCATEGORY) )
786 if( (tmpfor == BUDG_CATEGORY && !(entry->flags & GF_SUB)) || (tmpfor == BUDG_SUBCATEGORY && (entry->flags & GF_SUB)) )
787 {
788 guint pos;
789
790 pos = 0;
791 switch(tmpfor)
792 {
793 case BUDG_CATEGORY:
794 {
795 Category *catentry = da_cat_get(i);
796 if(catentry)
797 pos = (catentry->flags & GF_SUB) ? catentry->parent : catentry->key;
798 }
799 break;
800 case BUDG_SUBCATEGORY:
801 pos = i;
802 break;
803 }
804
805 // display expense or income (filter on amount and not category hypothetical flag
806 //if( tmpkind != (entry->flags & GF_INCOME)) continue;
807 if( tmpkind == 1 && tmp_budget[pos] > 0)
808 continue;
809
810 if( tmpkind == 2 && tmp_budget[pos] < 0)
811 continue;
812
813 DB( g_print(" eval %d '%s' : spen=%.2f bud=%.2f \n", i, name, tmp_spent[pos], tmp_budget[pos] ) );
814
815 if((entry->flags & (GF_BUDGET|GF_FORCED)) || tmp_budget[pos] /*|| tmp_spent[pos]*/)
816 {
817 gdouble result, rawrate;
818 gchar *status;
819
820 result = budget_compute_result(tmp_budget[pos], tmp_spent[pos]);
821 rawrate = 0.0;
822 if(ABS(tmp_budget[pos]) > 0)
823 {
824 rawrate = tmp_spent[pos] / tmp_budget[pos];
825 }
826 else if(tmp_budget[pos] == 0.0)
827 rawrate = ABS(tmp_spent[pos]);
828
829 status = "";
830 if(rawrate > 1.0)
831 {
832 status = _(" over");
833 }
834 else
835 {
836 if(tmp_budget[pos] < 0.0)
837 status = _(" left");
838 else if(tmp_budget[pos] > 0.0)
839 status = _(" under");
840 }
841
842 DB( g_print(" => insert %.2f | %.2f = %.2f '%s'\n", tmp_spent[pos], tmp_budget[pos], result, status ) );
843
844 gtk_list_store_append (GTK_LIST_STORE(model), &iter);
845 gtk_list_store_set (GTK_LIST_STORE(model), &iter,
846 LST_BUDGET_POS, id++,
847 LST_BUDGET_KEY, pos,
848 LST_BUDGET_NAME, name,
849 LST_BUDGET_SPENT, tmp_spent[pos],
850 LST_BUDGET_BUDGET, tmp_budget[pos],
851 LST_BUDGET_RESULT, result,
852 LST_BUDGET_STATUS, status,
853 -1);
854
855 data->total_spent += tmp_spent[pos];
856 data->total_budget += tmp_budget[pos];
857 }
858 }
859
860 g_free(fullcatname);
861
862 }
863
864 /* update column 0 title */
865 GtkTreeViewColumn *column = gtk_tree_view_get_column( GTK_TREE_VIEW(data->LV_report), 0);
866 gtk_tree_view_column_set_title(column, _(CYA_BUDGSELECT[tmpfor]));
867
868 gtk_tree_view_columns_autosize (GTK_TREE_VIEW(data->LV_report));
869
870 /* Re-attach model to view */
871 gtk_tree_view_set_model(GTK_TREE_VIEW(data->LV_report), model);
872 g_object_unref(model);
873
874
875 repbudget_update_total(widget, NULL);
876
877 /* update stack chart */
878 title = g_strdup_printf(_("Budget for %s"), _(CYA_BUDGSELECT[tmpfor]) );
879
880 ui_chart_stack_set_currency(GTK_CHARTSTACK(data->RE_stack), GLOBALS->kcur);
881
882 /* set chart color scheme */
883 ui_chart_stack_set_color_scheme(GTK_CHARTSTACK(data->RE_stack), PREFS->report_color_scheme);
884 ui_chart_stack_set_dualdatas(GTK_CHARTSTACK(data->RE_stack), model, _("Budget"), _("Result"), title, NULL);
885
886 g_free(title);
887 }
888
889 //DB( g_print(" inserting %i, %f %f\n", i, total_expense, total_income) );
890
891 /* free our memory */
892 g_free(tmp_spent);
893 g_free(tmp_budget);
894
895 }
896
897
898 static void repbudget_update_total(GtkWidget *widget, gpointer user_data)
899 {
900 struct repbudget_data *data;
901
902 DB( g_print("\n[repbudget] update total\n") );
903
904 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
905
906 GLOBALS->minor = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(data->CM_minor));
907
908 hb_label_set_colvalue(GTK_LABEL(data->TX_total[0]), data->total_spent, GLOBALS->kcur, GLOBALS->minor);
909 hb_label_set_colvalue(GTK_LABEL(data->TX_total[1]), data->total_budget, GLOBALS->kcur, GLOBALS->minor);
910 hb_label_set_colvalue(GTK_LABEL(data->TX_total[2]), budget_compute_result(data->total_budget, data->total_spent), GLOBALS->kcur, GLOBALS->minor);
911
912
913 }
914
915
916 /*
917 ** update sensitivity
918 */
919 static void repbudget_sensitive(GtkWidget *widget, gpointer user_data)
920 {
921 struct repbudget_data *data;
922 gboolean active;
923 gboolean sensitive;
924 gint page;
925
926 DB( g_print("\n[repbudget] sensitive\n") );
927
928 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
929
930 active = gtk_tree_selection_get_selected(gtk_tree_view_get_selection(GTK_TREE_VIEW(data->LV_report)), NULL, NULL);
931
932 page = gtk_notebook_get_current_page(GTK_NOTEBOOK(data->GR_result));
933
934 sensitive = page == 0 ? active : FALSE;
935 // gtk_widget_set_sensitive(data->TB_buttons[ACTION_REPBUDGET_DETAIL], sensitive);
936 gtk_action_set_sensitive(gtk_ui_manager_get_action(data->ui, "/ToolBar/Detail"), sensitive);
937
938 }
939
940
941 static void repbudget_toggle(GtkWidget *widget, gpointer user_data)
942 {
943 struct repbudget_data *data;
944 gboolean minor;
945
946 DB( g_print("\n[repbudget] toggle\n") );
947
948 data = g_object_get_data(G_OBJECT(gtk_widget_get_ancestor(widget, GTK_TYPE_WINDOW)), "inst_data");
949
950 repbudget_update_total(widget, NULL);
951
952 //hbfile_update(data->LV_acc, (gpointer)4);
953 gtk_tree_view_columns_autosize (GTK_TREE_VIEW(data->LV_report));
954
955 minor = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(data->CM_minor));
956 ui_chart_stack_show_minor(GTK_CHARTSTACK(data->RE_stack), minor);
957
958 }
959
960 static void repbudget_setup(struct repbudget_data *data)
961 {
962 DB( g_print("\n[repbudget] setup\n") );
963
964 data->txn_queue = g_queue_new ();
965
966 data->filter = da_filter_malloc();
967 filter_default_all_set(data->filter);
968
969 data->detail = PREFS->budg_showdetail;
970 data->legend = 1;
971
972 /* 3.4 : make int transfer out of stats */
973 data->filter->option[FILTER_PAYMODE] = 1;
974 data->filter->paymode[PAYMODE_INTXFER] = FALSE;
975
976 filter_preset_daterange_set(data->filter, PREFS->date_range_rep, 0);
977
978 g_signal_handler_block(data->PO_mindate, data->handler_id[HID_REPBUDGET_MINDATE]);
979 g_signal_handler_block(data->PO_maxdate, data->handler_id[HID_REPBUDGET_MAXDATE]);
980
981 gtk_date_entry_set_date(GTK_DATE_ENTRY(data->PO_mindate), data->filter->mindate);
982 gtk_date_entry_set_date(GTK_DATE_ENTRY(data->PO_maxdate), data->filter->maxdate);
983
984 g_signal_handler_unblock(data->PO_mindate, data->handler_id[HID_REPBUDGET_MINDATE]);
985 g_signal_handler_unblock(data->PO_maxdate, data->handler_id[HID_REPBUDGET_MAXDATE]);
986
987 }
988
989
990 static void repbudget_selection(GtkTreeSelection *treeselection, gpointer user_data)
991 {
992 GtkTreeModel *model;
993 GtkTreeIter iter;
994 guint key;
995
996 DB( g_print("\n[repbudget] selection\n") );
997
998 if (gtk_tree_selection_get_selected(treeselection, &model, &iter))
999 {
1000 gtk_tree_model_get(model, &iter, LST_BUDGET_KEY, &key, -1);
1001
1002 DB( g_print(" - active is %d\n", key) );
1003
1004 repbudget_detail(GTK_WIDGET(gtk_tree_selection_get_tree_view (treeselection)), GINT_TO_POINTER(key));
1005 }
1006
1007 repbudget_sensitive(GTK_WIDGET(gtk_tree_selection_get_tree_view (treeselection)), NULL);
1008 }
1009 /*
1010 **
1011 */
1012 static gboolean repbudget_window_dispose(GtkWidget *widget, GdkEvent *event, gpointer user_data)
1013 {
1014 struct repbudget_data *data = user_data;
1015 struct WinGeometry *wg;
1016
1017 DB( g_print("\n[repbudget] start dispose\n") );
1018
1019 g_queue_free (data->txn_queue);
1020
1021 da_filter_free(data->filter);
1022
1023 g_free(data);
1024
1025 //store position and size
1026 wg = &PREFS->bud_wg;
1027 gtk_window_get_position(GTK_WINDOW(widget), &wg->l, &wg->t);
1028 gtk_window_get_size(GTK_WINDOW(widget), &wg->w, &wg->h);
1029
1030 DB( g_print(" window: l=%d, t=%d, w=%d, h=%d\n", wg->l, wg->t, wg->w, wg->h) );
1031
1032 //enable define windows
1033 GLOBALS->define_off--;
1034 ui_mainwindow_update(GLOBALS->mainwindow, GINT_TO_POINTER(UF_SENSITIVE));
1035
1036 DB( g_print("\n[repbudget] end dispose\n") );
1037
1038 return FALSE;
1039 }
1040
1041
1042 // the window creation
1043 GtkWidget *repbudget_window_new(void)
1044 {
1045 struct repbudget_data *data;
1046 struct WinGeometry *wg;
1047 GtkWidget *window, *mainvbox, *hbox, *vbox, *notebook, *treeview;
1048 GtkWidget *label, *widget, *table, *entry;
1049 gint row;
1050 GtkUIManager *ui;
1051 GtkActionGroup *actions;
1052 GtkAction *action;
1053 GError *error = NULL;
1054
1055 data = g_malloc0(sizeof(struct repbudget_data));
1056 if(!data) return NULL;
1057
1058 DB( g_print("\n[repbudget] new\n") );
1059
1060 //disable define windows
1061 GLOBALS->define_off++;
1062 ui_mainwindow_update(GLOBALS->mainwindow, GINT_TO_POINTER(2));
1063
1064 /* create window, etc */
1065 window = gtk_window_new (GTK_WINDOW_TOPLEVEL);
1066 data->window = window;
1067
1068 //store our window private data
1069 g_object_set_data(G_OBJECT(window), "inst_data", (gpointer)data);
1070
1071 gtk_window_set_title (GTK_WINDOW (window), _("Budget report"));
1072
1073 //set the window icon
1074 gtk_window_set_icon_name(GTK_WINDOW (window), ICONNAME_HB_REP_BUDGET);
1075
1076
1077 //window contents
1078 mainvbox = gtk_box_new (GTK_ORIENTATION_VERTICAL, 0);
1079 gtk_container_add (GTK_CONTAINER (window), mainvbox);
1080
1081 hbox = gtk_box_new(GTK_ORIENTATION_HORIZONTAL, 0);
1082 gtk_box_pack_start (GTK_BOX (mainvbox), hbox, TRUE, TRUE, 0);
1083
1084 //control part
1085 table = gtk_grid_new ();
1086 // gtk_alignment_new(xalign, yalign, xscale, yscale)
1087 //alignment = gtk_alignment_new(0.0, 0.0, 0.0, 0.0);
1088 //gtk_container_add(GTK_CONTAINER(alignment), table);
1089 gtk_box_pack_start (GTK_BOX (hbox), table, FALSE, FALSE, 0);
1090
1091 gtk_container_set_border_width (GTK_CONTAINER (table), SPACING_SMALL);
1092 gtk_grid_set_row_spacing (GTK_GRID (table), SPACING_SMALL);
1093 gtk_grid_set_column_spacing (GTK_GRID (table), SPACING_MEDIUM);
1094
1095 row = 0;
1096 label = make_label_group(_("Display"));
1097 gtk_grid_attach (GTK_GRID (table), label, 0, row, 3, 1);
1098
1099 row++;
1100 label = make_label_widget(_("_For:"));
1101 gtk_grid_attach (GTK_GRID (table), label, 1, row, 1, 1);
1102 widget = make_cycle(label, CYA_BUDGSELECT);
1103 data->CY_for = widget;
1104 gtk_grid_attach (GTK_GRID (table), data->CY_for, 2, row, 1, 1);
1105
1106
1107 row++;
1108 label = make_label_widget(_("_Kind:"));
1109 gtk_grid_attach (GTK_GRID (table), label, 1, row, 1, 1);
1110 widget = make_cycle(label, CYA_KIND);
1111 data->CY_kind = widget;
1112 gtk_grid_attach (GTK_GRID (table), data->CY_kind, 2, row, 1, 1);
1113
1114 row++;
1115 widget = gtk_check_button_new_with_mnemonic (_("Euro _minor"));
1116 data->CM_minor = widget;
1117 gtk_grid_attach (GTK_GRID (table), widget, 2, row, 1, 1);
1118
1119 row++;
1120 widget = gtk_separator_new(GTK_ORIENTATION_HORIZONTAL);
1121 gtk_grid_attach (GTK_GRID (table), widget, 0, row, 3, 1);
1122
1123 row++;
1124 label = make_label_group(_("Date filter"));
1125 gtk_grid_attach (GTK_GRID (table), label, 0, row, 3, 1);
1126
1127 row++;
1128 label = make_label_widget(_("_Range:"));
1129 gtk_grid_attach (GTK_GRID (table), label, 1, row, 1, 1);
1130 data->CY_range = make_daterange(label, FALSE);
1131 gtk_grid_attach (GTK_GRID (table), data->CY_range, 2, row, 1, 1);
1132
1133 row++;
1134 label = make_label_widget(_("_From:"));
1135 gtk_grid_attach (GTK_GRID (table), label, 1, row, 1, 1);
1136 data->PO_mindate = gtk_date_entry_new();
1137 gtk_grid_attach (GTK_GRID (table), data->PO_mindate, 2, row, 1, 1);
1138
1139 row++;
1140 label = make_label_widget(_("_To:"));
1141 gtk_grid_attach (GTK_GRID (table), label, 1, row, 1, 1);
1142 data->PO_maxdate = gtk_date_entry_new();
1143 gtk_grid_attach (GTK_GRID (table), data->PO_maxdate, 2, row, 1, 1);
1144
1145
1146 //part: info + report
1147 vbox = gtk_box_new (GTK_ORIENTATION_VERTICAL, 0);
1148 gtk_box_pack_start (GTK_BOX (hbox), vbox, TRUE, TRUE, 0);
1149
1150 //ui manager
1151 actions = gtk_action_group_new ("Account");
1152
1153 //as we use gettext
1154 gtk_action_group_set_translation_domain(actions, GETTEXT_PACKAGE);
1155
1156 // data to action callbacks is set here (data)
1157 gtk_action_group_add_actions (actions, entries, n_entries, data);
1158
1159 gtk_action_group_add_toggle_actions (actions,
1160 toggle_entries, n_toggle_entries,
1161 data);
1162
1163
1164 /* set which action should have priority in the toolbar */
1165 action = gtk_action_group_get_action(actions, "List");
1166 g_object_set(action, "is_important", TRUE, NULL);
1167
1168 action = gtk_action_group_get_action(actions, "Stack");
1169 g_object_set(action, "is_important", TRUE, NULL);
1170
1171 action = gtk_action_group_get_action(actions, "Detail");
1172 g_object_set(action, "is_important", TRUE, NULL);
1173 g_object_set(action, "active", PREFS->budg_showdetail, NULL);
1174
1175 action = gtk_action_group_get_action(actions, "Refresh");
1176 g_object_set(action, "is_important", TRUE, NULL);
1177
1178
1179 ui = gtk_ui_manager_new ();
1180 gtk_ui_manager_insert_action_group (ui, actions, 0);
1181 gtk_window_add_accel_group (GTK_WINDOW (window), gtk_ui_manager_get_accel_group (ui));
1182
1183 if (!gtk_ui_manager_add_ui_from_string (ui, ui_info, -1, &error))
1184 {
1185 g_message ("building UI failed: %s", error->message);
1186 g_error_free (error);
1187 }
1188
1189 data->ui = ui;
1190
1191 //toolbar
1192 data->TB_bar = gtk_ui_manager_get_widget (ui, "/ToolBar");
1193 gtk_box_pack_start (GTK_BOX (vbox), data->TB_bar, FALSE, FALSE, 0);
1194
1195 //infos
1196 hbox = gtk_box_new (GTK_ORIENTATION_HORIZONTAL, SPACING_SMALL);
1197 gtk_container_set_border_width (GTK_CONTAINER(hbox), SPACING_SMALL);
1198 gtk_box_pack_start (GTK_BOX (vbox), hbox, FALSE, FALSE, 0);
1199
1200 widget = make_label(NULL, 0.5, 0.5);
1201 gimp_label_set_attributes (GTK_LABEL (widget), PANGO_ATTR_SCALE, PANGO_SCALE_SMALL, -1);
1202 data->TX_daterange = widget;
1203 gtk_box_pack_start (GTK_BOX (hbox), widget, TRUE, TRUE, 0);
1204
1205
1206 entry = gtk_label_new(NULL);
1207 data->TX_total[2] = entry;
1208 gtk_box_pack_end (GTK_BOX (hbox), entry, FALSE, FALSE, 0);
1209 label = gtk_label_new(_("Result:"));
1210 gtk_box_pack_end (GTK_BOX (hbox), label, FALSE, FALSE, 0);
1211
1212 entry = gtk_label_new(NULL);
1213 data->TX_total[1] = entry;
1214 gtk_box_pack_end (GTK_BOX (hbox), entry, FALSE, FALSE, 0);
1215 label = gtk_label_new(_("Budget:"));
1216 gtk_box_pack_end (GTK_BOX (hbox), label, FALSE, FALSE, 0);
1217
1218 entry = gtk_label_new(NULL);
1219 data->TX_total[0] = entry;
1220 gtk_box_pack_end (GTK_BOX (hbox), entry, FALSE, FALSE, 0);
1221 label = gtk_label_new(_("Spent:"));
1222 gtk_box_pack_end (GTK_BOX (hbox), label, FALSE, FALSE, 0);
1223
1224
1225 notebook = gtk_notebook_new();
1226 data->GR_result = notebook;
1227 gtk_widget_show(notebook);
1228 gtk_notebook_set_show_tabs(GTK_NOTEBOOK(notebook), FALSE);
1229 gtk_notebook_set_show_border(GTK_NOTEBOOK(notebook), FALSE);
1230
1231 gtk_box_pack_start (GTK_BOX (vbox), notebook, TRUE, TRUE, 0);
1232
1233 //page: list
1234
1235 vbox = gtk_box_new (GTK_ORIENTATION_VERTICAL, 0);
1236 gtk_notebook_append_page(GTK_NOTEBOOK(notebook), vbox, NULL);
1237
1238 widget = gtk_scrolled_window_new (NULL, NULL);
1239 gtk_scrolled_window_set_shadow_type (GTK_SCROLLED_WINDOW (widget), GTK_SHADOW_ETCHED_IN);
1240 gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (widget), GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC);
1241 treeview = create_list_budget();
1242 data->LV_report = treeview;
1243 gtk_container_add (GTK_CONTAINER(widget), treeview);
1244 gtk_box_pack_start (GTK_BOX (vbox), widget, TRUE, TRUE, 0);
1245
1246 //detail
1247 widget = gtk_scrolled_window_new (NULL, NULL);
1248 data->GR_detail = widget;
1249 gtk_scrolled_window_set_shadow_type (GTK_SCROLLED_WINDOW (widget), GTK_SHADOW_ETCHED_IN);
1250 gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (widget), GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC);
1251 treeview = create_list_transaction(LIST_TXN_TYPE_DETAIL, PREFS->lst_ope_columns);
1252 data->LV_detail = treeview;
1253 gtk_container_add (GTK_CONTAINER(widget), treeview);
1254
1255 gtk_box_pack_start (GTK_BOX (vbox), widget, TRUE, TRUE, 0);
1256
1257 //page: 2d bar
1258 //widget = gtk_chart_new(CHART_TYPE_COL);
1259 widget = ui_chart_stack_new();
1260 data->RE_stack = widget;
1261 gtk_notebook_append_page(GTK_NOTEBOOK(notebook), widget, NULL);
1262
1263 //todo:should move this
1264 gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(data->CM_minor),GLOBALS->minor);
1265
1266
1267 /* attach our minor to treeview */
1268 g_object_set_data(G_OBJECT(gtk_tree_view_get_model(GTK_TREE_VIEW(data->LV_report))), "minor", (gpointer)data->CM_minor);
1269 g_object_set_data(G_OBJECT(gtk_tree_view_get_model(GTK_TREE_VIEW(data->LV_detail))), "minor", (gpointer)data->CM_minor);
1270
1271 /* signal connect */
1272 g_signal_connect (window, "delete-event", G_CALLBACK (repbudget_window_dispose), (gpointer)data);
1273
1274 g_signal_connect (data->CM_minor, "toggled", G_CALLBACK (repbudget_toggle), NULL);
1275
1276
1277 data->handler_id[HID_REPBUDGET_RANGE] = g_signal_connect (data->CY_range, "changed", G_CALLBACK (repbudget_range_change), NULL);
1278
1279 g_signal_connect (data->CY_for , "changed", G_CALLBACK (repbudget_compute), (gpointer)data);
1280 g_signal_connect (data->CY_kind, "changed", G_CALLBACK (repbudget_compute), (gpointer)data);
1281
1282 data->handler_id[HID_REPBUDGET_MINDATE] = g_signal_connect (data->PO_mindate, "changed", G_CALLBACK (repbudget_date_change), (gpointer)data);
1283 data->handler_id[HID_REPBUDGET_MAXDATE] = g_signal_connect (data->PO_maxdate, "changed", G_CALLBACK (repbudget_date_change), (gpointer)data);
1284
1285 g_signal_connect (gtk_tree_view_get_selection(GTK_TREE_VIEW(data->LV_report)), "changed", G_CALLBACK (repbudget_selection), NULL);
1286
1287 g_signal_connect (GTK_TREE_VIEW(data->LV_detail), "row-activated", G_CALLBACK (repbudget_detail_onRowActivated), NULL);
1288
1289
1290 //setup, init and show window
1291 repbudget_setup(data);
1292
1293
1294 /* toolbar */
1295 if(PREFS->toolbar_style == 0)
1296 gtk_toolbar_unset_style(GTK_TOOLBAR(data->TB_bar));
1297 else
1298 gtk_toolbar_set_style(GTK_TOOLBAR(data->TB_bar), PREFS->toolbar_style-1);
1299
1300
1301 //setup, init and show window
1302 wg = &PREFS->bud_wg;
1303 gtk_window_move(GTK_WINDOW(window), wg->l, wg->t);
1304 gtk_window_resize(GTK_WINDOW(window), wg->w, wg->h);
1305
1306
1307
1308 gtk_widget_show_all (window);
1309
1310
1311 //minor ?
1312 if( PREFS->euro_active )
1313 gtk_widget_show(data->CM_minor);
1314 else
1315 gtk_widget_hide(data->CM_minor);
1316
1317 //check for any account included into the budget or warn
1318 {
1319 guint count =0;
1320 GList *lacc, *list;
1321
1322 lacc = list = g_hash_table_get_values(GLOBALS->h_acc);
1323
1324 while (list != NULL)
1325 {
1326 Account *acc;
1327 acc = list->data;
1328 if((acc->flags & (AF_CLOSED|AF_NOREPORT))) goto next1;
1329 if(!(acc->flags & AF_NOBUDGET))
1330 count++;
1331 next1:
1332 list = g_list_next(list);
1333 }
1334 g_list_free(lacc);
1335
1336 if(count <= 0)
1337 {
1338 ui_dialog_msg_infoerror(GTK_WINDOW(data->window), GTK_MESSAGE_WARNING,
1339 _("No account is defined to be part of the budget."),
1340 _("You should include some accounts from the account dialog.")
1341 );
1342 }
1343
1344
1345
1346 }
1347
1348
1349
1350 //gtk_widget_hide(data->GR_detail);
1351
1352 repbudget_sensitive(window, NULL);
1353 repbudget_update_detail(window, NULL);
1354
1355 if( PREFS->date_range_rep != 0)
1356 gtk_combo_box_set_active(GTK_COMBO_BOX(data->CY_range), PREFS->date_range_rep);
1357 else
1358 repbudget_compute(window, NULL);
1359
1360 return(window);
1361 }
1362
1363
1364 /* = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = */
1365
1366
1367 /*
1368 **
1369 ** The function should return:
1370 ** a negative integer if the first value comes before the second,
1371 ** 0 if they are equal,
1372 ** or a positive integer if the first value comes after the second.
1373 */
1374 static gint budget_listview_compare_funct (GtkTreeModel *model, GtkTreeIter *a, GtkTreeIter *b, gpointer userdata)
1375 {
1376 gint retval = 0;
1377 //Category *entry1, *entry2;
1378 gchar *entry1, *entry2;
1379
1380 gtk_tree_model_get(model, a, LST_BUDGET_NAME, &entry1, -1);
1381 gtk_tree_model_get(model, b, LST_BUDGET_NAME, &entry2, -1);
1382
1383 retval = hb_string_utf8_compare(entry1, entry2);
1384 //retval = (entry1->flags & GF_INCOME) - (entry2->flags & GF_INCOME);
1385 //if(!retval)
1386 //{
1387 // retval = hb_string_utf8_compare(entry1->name, entry2->name);
1388 //}
1389
1390 return retval;
1391 }
1392
1393
1394 static void budget_amount_cell_data_function (GtkTreeViewColumn *col,
1395 GtkCellRenderer *renderer,
1396 GtkTreeModel *model,
1397 GtkTreeIter *iter,
1398 gpointer user_data)
1399 {
1400 gdouble value;
1401 gchar *color;
1402 gchar buf[G_ASCII_DTOSTR_BUF_SIZE];
1403 gint column_id = GPOINTER_TO_INT(user_data);
1404
1405 gtk_tree_model_get(model, iter, column_id, &value, -1);
1406
1407 if( value )
1408 {
1409 hb_strfmon(buf, G_ASCII_DTOSTR_BUF_SIZE-1, value, GLOBALS->kcur, GLOBALS->minor);
1410
1411 if( column_id == LST_BUDGET_RESULT)
1412 color = get_minimum_color_amount (value, 0.0);
1413 else
1414 color = get_normal_color_amount(value);
1415
1416 g_object_set(renderer,
1417 "foreground", color,
1418 "text", buf,
1419 NULL);
1420 }
1421 else
1422 {
1423 g_object_set(renderer, "text", "", NULL);
1424 }
1425 }
1426
1427
1428
1429 static void budget_result_cell_data_function (GtkTreeViewColumn *col,
1430 GtkCellRenderer *renderer,
1431 GtkTreeModel *model,
1432 GtkTreeIter *iter,
1433 gpointer user_data)
1434 {
1435 gdouble value;
1436 gchar *color;
1437 gchar *status;
1438 gint column_id = GPOINTER_TO_INT(user_data);
1439
1440 gtk_tree_model_get(model, iter,
1441 column_id, &value,
1442 LST_BUDGET_STATUS, &status,
1443 -1);
1444
1445 if( value )
1446 {
1447 color = get_minimum_color_amount (value, 0.0);
1448 g_object_set(renderer,
1449 "foreground", color,
1450 "text", status,
1451 NULL);
1452 }
1453 else
1454 {
1455 g_object_set(renderer, "text", "", NULL);
1456 }
1457 }
1458
1459
1460
1461 static GtkTreeViewColumn *amount_list_budget_column(gchar *name, gint id)
1462 {
1463 GtkTreeViewColumn *column;
1464 GtkCellRenderer *renderer;
1465
1466 column = gtk_tree_view_column_new();
1467 gtk_tree_view_column_set_title(column, name);
1468 renderer = gtk_cell_renderer_text_new ();
1469 g_object_set(renderer, "xalign", 1.0, NULL);
1470 gtk_tree_view_column_pack_start(column, renderer, TRUE);
1471 gtk_tree_view_column_set_cell_data_func(column, renderer, budget_amount_cell_data_function, GINT_TO_POINTER(id), NULL);
1472 gtk_tree_view_column_set_alignment (column, 0.5);
1473 //gtk_tree_view_column_set_sort_column_id (column, id);
1474 return column;
1475 }
1476
1477 /*
1478 ** create our statistic list
1479 */
1480 static GtkWidget *create_list_budget(void)
1481 {
1482 GtkListStore *store;
1483 GtkWidget *view;
1484 GtkCellRenderer *renderer;
1485 GtkTreeViewColumn *column;
1486
1487 DB( g_print("\n[repbudget] create list\n") );
1488
1489
1490 /* create list store */
1491 store = gtk_list_store_new(
1492 NUM_LST_BUDGET,
1493 G_TYPE_INT,
1494 G_TYPE_INT,
1495 G_TYPE_STRING,
1496 G_TYPE_DOUBLE, //spent
1497 G_TYPE_DOUBLE, //budget
1498 G_TYPE_DOUBLE, //result
1499 G_TYPE_STRING //status
1500 );
1501
1502 //treeview
1503 view = gtk_tree_view_new_with_model(GTK_TREE_MODEL(store));
1504 g_object_unref(store);
1505
1506 gtk_tree_view_set_grid_lines (GTK_TREE_VIEW (view), PREFS->grid_lines);
1507
1508 /* column: Name */
1509 column = gtk_tree_view_column_new();
1510 gtk_tree_view_column_set_title(column, _("Category"));
1511 renderer = gtk_cell_renderer_text_new ();
1512 gtk_tree_view_column_pack_start(column, renderer, TRUE);
1513 //gtk_tree_view_column_set_cell_data_func(column, renderer, ope_result_cell_data_function, NULL, NULL);
1514 gtk_tree_view_column_add_attribute(column, renderer, "text", LST_BUDGET_NAME);
1515 //gtk_tree_view_column_set_sort_column_id (column, LST_STAT_NAME);
1516 gtk_tree_view_column_set_resizable(column, TRUE);
1517 gtk_tree_view_column_set_alignment (column, 0.5);
1518 gtk_tree_view_append_column (GTK_TREE_VIEW(view), column);
1519
1520 /* column: Expense */
1521 column = amount_list_budget_column(_("Spent"), LST_BUDGET_SPENT);
1522 gtk_tree_view_append_column (GTK_TREE_VIEW(view), column);
1523
1524 /* column: Income */
1525 column = amount_list_budget_column(_("Budget"), LST_BUDGET_BUDGET);
1526 gtk_tree_view_append_column (GTK_TREE_VIEW(view), column);
1527
1528 /* column: Result */
1529 column = amount_list_budget_column(_("Result"), LST_BUDGET_RESULT);
1530 renderer = gtk_cell_renderer_text_new ();
1531 //g_object_set(renderer, "xalign", 0.0, NULL);
1532 gtk_tree_view_column_pack_start(column, renderer, TRUE);
1533 gtk_tree_view_column_set_cell_data_func(column, renderer, budget_result_cell_data_function, GINT_TO_POINTER(LST_BUDGET_RESULT), NULL);
1534 gtk_tree_view_append_column (GTK_TREE_VIEW(view), column);
1535
1536 /* column last: empty */
1537 column = gtk_tree_view_column_new();
1538 gtk_tree_view_append_column (GTK_TREE_VIEW(view), column);
1539
1540 /* sort */
1541 gtk_tree_sortable_set_default_sort_func(GTK_TREE_SORTABLE(store), budget_listview_compare_funct, NULL, NULL);
1542 gtk_tree_sortable_set_sort_column_id(GTK_TREE_SORTABLE(store), GTK_TREE_SORTABLE_DEFAULT_SORT_COLUMN_ID, GTK_SORT_ASCENDING);
1543
1544 /*
1545 gtk_tree_sortable_set_sort_func(GTK_TREE_SORTABLE(store), LST_BUDGET_POS , stat_list_compare_func, GINT_TO_POINTER(LST_BUDGET_POS), NULL);
1546 gtk_tree_sortable_set_sort_func(GTK_TREE_SORTABLE(store), LST_BUDGET_SPENT , stat_list_compare_func, GINT_TO_POINTER(LST_BUDGET_SPENT), NULL);
1547 gtk_tree_sortable_set_sort_func(GTK_TREE_SORTABLE(store), LST_BUDGET_BUDGET, stat_list_compare_func, GINT_TO_POINTER(LST_BUDGET_BUDGET), NULL);
1548 gtk_tree_sortable_set_sort_func(GTK_TREE_SORTABLE(store), LST_BUDGET_RESULT , stat_list_compare_func, GINT_TO_POINTER(LST_BUDGET_RESULT), NULL);
1549 */
1550
1551 return(view);
1552 }
1553
fork of homebank with support for plugins
This page took 0.103467 seconds and 4 git commands to generate.