/* * dialog-invoice.c -- Dialog for Invoice entry * Copyright (C) 2001,2002 Derek Atkins * Author: Derek Atkins */ #include "config.h" #include #include #include #include "dialog-utils.h" #include "global-options.h" #include "gnc-component-manager.h" #include "gnc-ui.h" #include "gnc-gui-query.h" #include "gnc-ui-util.h" #include "gnc-engine-util.h" #include "gnc-date-edit.h" #include "gnc-menu-extensions.h" #include "gnc-amount-edit.h" #include "gnucash-sheet.h" #include "window-help.h" #include "window-report.h" #include "dialog-search.h" #include "search-param.h" #include "gncObject.h" #include "gncInvoice.h" #include "gncInvoiceP.h" #include "gncEntryLedger.h" #include "gnc-general-search.h" #include "dialog-date-close.h" #include "dialog-invoice.h" #include "dialog-job.h" #include "business-gnome-utils.h" #include "dialog-payment.h" #include "dialog-tax-table.h" #include "dialog-billterms.h" #include "AccWindow.h" #define DIALOG_NEW_INVOICE_CM_CLASS "dialog-new-invoice" #define DIALOG_VIEW_INVOICE_CM_CLASS "dialog-view-invoice" typedef enum { NEW_INVOICE, MOD_INVOICE, EDIT_INVOICE, VIEW_INVOICE } InvoiceDialogType; typedef enum { BY_STANDARD = 0, BY_DATE, BY_DATE_ENTERED, BY_DESC, BY_QTY, BY_PRICE } sort_type_t; struct _invoice_select_window { GNCBook * book; GncOwner * owner; QueryNew * q; GncOwner owner_def; }; struct _invoice_window { GladeXML * xml; GtkWidget * dialog; GtkWidget * statusbar; /* Popup Menu */ GtkWidget * popup_menu; /* Toolbar Widgets */ GtkWidget * toolbar_dock; GtkWidget * edit_button; GtkWidget * enter_button; GtkWidget * cancel_button; GtkWidget * delete_button; GtkWidget * duplicate_button; GtkWidget * blank_button; GtkWidget * print_button; GtkWidget * post_button; GtkWidget * unpost_button; /* Summary Bar Widgets */ GtkWidget * summarybar_dock; GtkWidget * total_label; GtkWidget * total_cash_label; GtkWidget * total_charge_label; /* Menu Widgets */ GtkWidget * menu_print; GtkWidget * menu_cut; GtkWidget * menu_paste; GtkWidget * menu_edit_invoice; GtkWidget * menu_actions; /* Data Widgets */ GtkWidget * id_entry; GtkWidget * notes_text; GtkWidget * opened_date; GtkWidget * posted_date_hbox; GtkWidget * posted_date; GtkWidget * active_check; GtkWidget * owner_box; GtkWidget * owner_label; GtkWidget * owner_choice; GtkWidget * job_label; GtkWidget * job_box; GtkWidget * job_choice; GtkWidget * billing_id_entry; GtkWidget * terms_menu; /* Project Widgets (used for Bills only) */ GtkWidget * proj_frame; GtkWidget * proj_cust_box; GtkWidget * proj_cust_choice; GtkWidget * proj_job_box; GtkWidget * proj_job_choice; /* Exp Voucher Widgets */ GtkWidget * to_charge_frame; GtkWidget * to_charge_edit; gint width; GncBillTerm * terms; GnucashRegister * reg; GncEntryLedger * ledger; sort_type_t last_sort; InvoiceDialogType dialog_type; GUID invoice_guid; gint component_id; GNCBook * book; GncInvoice * created_invoice; GncOwner owner; GncOwner job; GncOwner proj_cust; GncOwner proj_job; }; /* Forward definitions for CB functions */ void gnc_invoice_window_closeCB (GtkWidget *widget, gpointer data); void gnc_invoice_window_editCB (GtkWidget *widget, gpointer data); void gnc_invoice_window_recordCB (GtkWidget *widget, gpointer data); void gnc_invoice_window_cancelCB (GtkWidget *widget, gpointer data); void gnc_invoice_window_deleteCB (GtkWidget *widget, gpointer data); void gnc_invoice_window_duplicateCB (GtkWidget *widget, gpointer data); void gnc_invoice_window_blankCB (GtkWidget *widget, gpointer data); void gnc_invoice_window_printCB (GtkWidget *widget, gpointer data); void gnc_invoice_window_postCB (GtkWidget *widget, gpointer data); void gnc_invoice_window_unpostCB (GtkWidget *widget, gpointer data); void gnc_invoice_window_cut_cb (GtkWidget *widget, gpointer data); void gnc_invoice_window_copy_cb (GtkWidget *widget, gpointer data); void gnc_invoice_window_paste_cb (GtkWidget *widget, gpointer data); void gnc_invoice_window_new_account_cb (GtkWidget *widget, gpointer data); void gnc_invoice_window_new_invoice_cb (GtkWidget *widget, gpointer data); void gnc_invoice_window_report_owner_cb (GtkWidget *widget, gpointer data); void gnc_invoice_window_taxtable_cb (GtkWidget *widget, gpointer data); void gnc_invoice_window_billterm_cb (GtkWidget *widget, gpointer data); void gnc_invoice_window_payment_cb (GtkWidget *widget, gpointer data); void gnc_invoice_window_sort_standard_cb (GtkWidget *widget, gpointer data); void gnc_invoice_window_sort_date_cb (GtkWidget *widget, gpointer data); void gnc_invoice_window_sort_date_entered_cb (GtkWidget *widget, gpointer data); void gnc_invoice_window_sort_description_cb (GtkWidget *widget, gpointer data); void gnc_invoice_window_sort_quantity_cb (GtkWidget *widget, gpointer data); void gnc_invoice_window_sort_price_cb (GtkWidget *widget, gpointer data); void gnc_invoice_window_toolbar_cb (GtkWidget *widget, gpointer data); void gnc_invoice_window_statusbar_cb (GtkWidget *widget, gpointer data); void gnc_invoice_window_summarybar_cb (GtkWidget *widget, gpointer data); void gnc_invoice_window_active_toggled_cb (GtkWidget *widget, gpointer data); void gnc_invoice_window_leave_notes_cb (GtkWidget *widget, GdkEventFocus *event, gpointer data); #define INV_WIDTH_PREFIX "invoice_reg" #define BILL_WIDTH_PREFIX "bill_reg" #define VOUCHER_WIDTH_PREFIX "voucher_reg" static int inv_last_width = 0; static int bill_last_width = 0; static int voucher_last_width = 0; static void gnc_invoice_update_window (InvoiceWindow *iw); static InvoiceWindow * gnc_ui_invoice_modify (GncInvoice *invoice); static GncInvoice * iw_get_invoice (InvoiceWindow *iw) { if (!iw) return NULL; return gncInvoiceLookup (iw->book, &iw->invoice_guid); } static void gnc_ui_to_invoice (InvoiceWindow *iw, GncInvoice *invoice) { Timespec ts; if (iw->dialog_type == VIEW_INVOICE) return; gnc_suspend_gui_refresh (); gncInvoiceBeginEdit (invoice); if (iw->active_check) gncInvoiceSetActive (invoice, gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (iw->active_check))); gncInvoiceSetNotes (invoice, gtk_editable_get_chars (GTK_EDITABLE (iw->notes_text), 0, -1)); if (iw->to_charge_edit) gncInvoiceSetToChargeAmount (invoice, gnc_amount_edit_get_amount (GNC_AMOUNT_EDIT (iw->to_charge_edit))); /* Only set these values for NEW/MOD INVOICE types */ if (iw->dialog_type != EDIT_INVOICE) { gncInvoiceSetID (invoice, gtk_editable_get_chars (GTK_EDITABLE (iw->id_entry), 0, -1)); gncInvoiceSetBillingID (invoice, gtk_editable_get_chars (GTK_EDITABLE (iw->billing_id_entry), 0, -1)); gncInvoiceSetTerms (invoice, iw->terms); ts = gnc_date_edit_get_date_ts (GNC_DATE_EDIT (iw->opened_date)); gncInvoiceSetDateOpened (invoice, ts); gnc_owner_get_owner (iw->owner_choice, &(iw->owner)); if (iw->job_choice) gnc_owner_get_owner (iw->job_choice, &(iw->job)); /* Only set the job if we've actually got one */ if (gncOwnerGetJob (&(iw->job))) gncInvoiceSetOwner (invoice, &(iw->job)); else gncInvoiceSetOwner (invoice, &(iw->owner)); /* Set the invoice currency based on the owner */ gncInvoiceSetCurrency (invoice, gncOwnerGetCurrency (&iw->owner)); /* Only set the BillTo if we've actually got one */ if (gncOwnerGetJob (&iw->proj_job)) gncInvoiceSetBillTo (invoice, &iw->proj_job); else gncInvoiceSetBillTo (invoice, &iw->proj_cust); } gncInvoiceCommitEdit (invoice); gnc_resume_gui_refresh (); } static gboolean gnc_invoice_window_verify_ok (InvoiceWindow *iw) { const char *res; /* save the current entry in the ledger? */ if (!gnc_entry_ledger_check_close (iw->dialog, iw->ledger)) return FALSE; /* Check the Owner */ gnc_owner_get_owner (iw->owner_choice, &(iw->owner)); res = gncOwnerGetName (&(iw->owner)); if (res == NULL || safe_strcmp (res, "") == 0) { gnc_error_dialog_parented (GTK_WINDOW (iw->dialog), /* Translators: In this context, * 'Billing information' maps to the * label in the frame and means * e.g. customer i.e. the company being * invoiced. */ _("You need to supply Billing Information.")); return FALSE; } /* Check the ID; set one if necessary */ res = gtk_entry_get_text (GTK_ENTRY (iw->id_entry)); if (safe_strcmp (res, "") == 0) { gtk_entry_set_text (GTK_ENTRY (iw->id_entry), g_strdup_printf ("%.6lld", gncInvoiceNextID(iw->book))); } return TRUE; } static gboolean gnc_invoice_window_ok_save (InvoiceWindow *iw) { if (!gnc_invoice_window_verify_ok (iw)) return FALSE; { GncInvoice *invoice = iw_get_invoice (iw); if (invoice) { gnc_ui_to_invoice (iw, invoice); } /* Save the invoice to return it later. */ iw->created_invoice = invoice; } return TRUE; } static void gnc_invoice_window_ok_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; if (!gnc_invoice_window_ok_save (iw)) return; /* Ok, we don't need this anymore */ iw->invoice_guid = *xaccGUIDNULL (); /* if this is a NEW_INVOICE, and created_invoice is NON-NULL, the * open up a new window with the invoice. This used to be done * in gnc_ui_invoice_new() but cannot be done anymore */ if (iw->dialog_type == NEW_INVOICE && iw->created_invoice) gnc_ui_invoice_edit (iw->created_invoice); gnc_close_gui_component (iw->component_id); } static void gnc_invoice_window_cancel_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; gnc_close_gui_component (iw->component_id); } static void gnc_invoice_window_help_cb (GtkWidget *widget, gpointer data) { char *help_file = HH_INVOICE; helpWindow(NULL, NULL, help_file); } static void gnc_invoice_window_destroy_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; GncInvoice *invoice = iw_get_invoice (iw); gnc_suspend_gui_refresh (); if (iw->dialog_type == NEW_INVOICE && invoice != NULL) { gncInvoiceBeginEdit (invoice); gncInvoiceDestroy (invoice); iw->invoice_guid = *xaccGUIDNULL (); } gnc_entry_ledger_destroy (iw->ledger); gnc_unregister_gui_component (iw->component_id); gnc_resume_gui_refresh (); g_free (iw); } void gnc_invoice_window_closeCB (GtkWidget *widget, gpointer data) { gnc_invoice_window_ok_cb (widget, data); } void gnc_invoice_window_editCB (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; GncInvoice *invoice = iw_get_invoice (iw); if (invoice) gnc_ui_invoice_modify (invoice); } void gnc_invoice_window_recordCB (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; if (!iw || !iw->ledger) return; if (!gnc_entry_ledger_commit_entry (iw->ledger)) return; gnucash_register_goto_next_virt_row (iw->reg); } void gnc_invoice_window_cancelCB (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; if (!iw || !iw->ledger) return; gnc_entry_ledger_cancel_cursor_changes (iw->ledger); } void gnc_invoice_window_deleteCB (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; GncEntry *entry; if (!iw || !iw->ledger) return; /* get the current entry based on cursor position */ entry = gnc_entry_ledger_get_current_entry (iw->ledger); if (!entry) { gnc_entry_ledger_cancel_cursor_changes (iw->ledger); return; } /* deleting the blank entry just cancels */ if (entry == gnc_entry_ledger_get_blank_entry (iw->ledger)) { gnc_entry_ledger_cancel_cursor_changes (iw->ledger); return; } /* Verify that the user really wants to delete this entry */ { const char *message = _("Are you sure you want to delete the " "selected entry?"); const char *order_warn = _("This entry is attached to an order and " "will be deleted from that as well!"); char *msg; gboolean result; if (gncEntryGetOrder (entry)) msg = g_strconcat (message, "\n\n", order_warn, NULL); else msg = g_strdup (message); result = gnc_verify_dialog_parented (iw->dialog, FALSE, msg); g_free (msg); if (!result) return; } /* Yep, let's delete */ gnc_entry_ledger_delete_current_entry (iw->ledger); return; } void gnc_invoice_window_duplicateCB (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; if (!iw || !iw->ledger) return; gnc_entry_ledger_duplicate_current_entry (iw->ledger); } void gnc_invoice_window_blankCB (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; if (!iw || !iw->ledger) return; if (!gnc_entry_ledger_commit_entry (iw->ledger)) return; { VirtualCellLocation vcell_loc; GncEntry *blank; blank = gnc_entry_ledger_get_blank_entry (iw->ledger); if (blank == NULL) return; if (gnc_entry_ledger_get_entry_virt_loc (iw->ledger, blank, &vcell_loc)) gnucash_register_goto_virt_cell (iw->reg, vcell_loc); } } void gnc_invoice_window_printCB (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; GncInvoice *invoice = iw_get_invoice (iw); SCM func, arg; SCM args = SCM_EOL; int report_id; g_return_if_fail (invoice); func = gh_eval_str ("gnc:invoice-report-create"); g_return_if_fail (gh_procedure_p (func)); arg = gw_wcp_assimilate_ptr (invoice, gh_eval_str("")); args = gh_cons (arg, args); /* scm_protect_object(func); */ arg = gh_apply (func, args); g_return_if_fail (gh_exact_p (arg)); report_id = gh_scm2int (arg); /* scm_unprotect_object(func); */ if (report_id >= 0) reportWindow (report_id); } void gnc_invoice_window_postCB (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; GncInvoice *invoice; char *message, *memo, *ddue_label, *post_label, *acct_label; Account *acc = NULL; GList * acct_types = NULL; Timespec ddue, postdate; /* Make sure the invoice is ok */ if (!gnc_invoice_window_verify_ok (iw)) return; invoice = iw_get_invoice (iw); if (!invoice) return; /* Check that there is at least one Entry */ invoice = iw_get_invoice (iw); if (gncInvoiceGetEntries (invoice) == NULL) { gnc_error_dialog_parented (GTK_WINDOW (iw->dialog), _("The Invoice must have at least one Entry.")); return; } /* Ok, we can post this invoice. Ask for verification, set the due date, * post date, and posted account */ message = _("Do you really want to post the invoice?"); ddue_label = _("Due Date"); post_label = _("Post Date"); acct_label = _("Post to Account"); /* Determine the type of account to post to */ acct_types = gnc_business_account_types (&(iw->owner)); /* Get the due date and posted account */ timespecFromTime_t (&postdate, time(NULL)); ddue = postdate; memo = NULL; if (!gnc_dialog_dates_acct_parented (iw->dialog, message, ddue_label, post_label, acct_label, TRUE, acct_types, iw->book, iw->terms, &ddue, &postdate, &memo, &acc)) return; /* Yep, we're posting. So, save the invoice... * Note that we can safely ignore the return value; we checked * the verify_ok earlier, so we know it's ok. */ gnc_suspend_gui_refresh (); gncInvoiceBeginEdit (invoice); gnc_invoice_window_ok_save (iw); /* ... post it; post date is set to now ... */ gncInvoicePostToAccount (invoice, acc, &postdate, &ddue, memo); gncInvoiceCommitEdit (invoice); gnc_resume_gui_refresh (); if (memo) g_free (memo); /* Reset the type; change to read-only! */ iw->dialog_type = VIEW_INVOICE; gnc_entry_ledger_set_readonly (iw->ledger, TRUE); /* ... and redisplay here. */ gnc_invoice_update_window (iw); gnc_table_refresh_gui (gnc_entry_ledger_get_table (iw->ledger), FALSE); } void gnc_invoice_window_unpostCB (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; GncInvoice *invoice; char * msg; gboolean result; invoice = iw_get_invoice (iw); if (!invoice) return; /* make sure the user REALLY wants to do this! */ msg = _("Unposting this Invoice will delete the posted transaction. " "Are you sure you want to unpost it?"); result = gnc_verify_dialog_parented (iw->dialog, FALSE, msg); if (!result) return; /* Attempt to unpost the invoice */ gnc_suspend_gui_refresh (); result = gncInvoiceUnpost (invoice); gnc_resume_gui_refresh (); if (!result) return; /* if we get here, we succeeded in unposting -- reset the ledger and redisplay */ iw->dialog_type = EDIT_INVOICE; gnc_entry_ledger_set_readonly (iw->ledger, FALSE); gnc_invoice_update_window (iw); gnc_table_refresh_gui (gnc_entry_ledger_get_table (iw->ledger), FALSE); } void gnc_invoice_window_cut_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; gnucash_register_cut_clipboard (iw->reg); } void gnc_invoice_window_copy_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; gnucash_register_copy_clipboard (iw->reg); } void gnc_invoice_window_paste_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; gnucash_register_paste_clipboard (iw->reg); } void gnc_invoice_window_new_account_cb (GtkWidget *widget, gpointer data) { gnc_ui_new_account_window (NULL); } void gnc_invoice_window_new_invoice_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; if (gncOwnerGetJob (&iw->job)) { gnc_ui_invoice_new (&iw->job, iw->book); } else { gnc_ui_invoice_new (&iw->owner, iw->book); } } void gnc_business_call_owner_report (GncOwner *owner, Account *acc) { int id; SCM qtype; SCM args; SCM func; SCM arg; g_return_if_fail (owner); args = SCM_EOL; func = gh_eval_str ("gnc:owner-report-create"); g_return_if_fail (gh_procedure_p (func)); if (acc) { qtype = gh_eval_str(""); g_return_if_fail (qtype != SCM_UNDEFINED); arg = gw_wcp_assimilate_ptr (acc, qtype); g_return_if_fail (arg != SCM_UNDEFINED); args = gh_cons (arg, args); } else { args = gh_cons (SCM_BOOL_F, args); } qtype = gh_eval_str(""); g_return_if_fail (qtype != SCM_UNDEFINED); arg = gw_wcp_assimilate_ptr (owner, qtype); g_return_if_fail (arg != SCM_UNDEFINED); args = gh_cons (arg, args); /* Apply the function to the args */ arg = gh_apply (func, args); g_return_if_fail (gh_exact_p (arg)); id = gh_scm2int (arg); if (id >= 0) reportWindow (id); } void gnc_invoice_window_report_owner_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; gnc_business_call_owner_report (&iw->owner, NULL); } void gnc_invoice_window_taxtable_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; gnc_ui_tax_table_window_new (iw->book); } void gnc_invoice_window_billterm_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; gnc_ui_billterms_window_new (iw->book); } void gnc_invoice_window_payment_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; GncInvoice *invoice = iw_get_invoice(iw); GNCLot *lot = gncInvoiceGetPostedLot (invoice); gnc_numeric val = gnc_numeric_abs (gnc_lot_get_balance (lot)); if (gncOwnerGetJob (&iw->job)) gnc_ui_payment_new_with_value (&iw->job, iw->book, val); else gnc_ui_payment_new_with_value (&iw->owner, iw->book, val); } /* Sorting callbacks */ static void gnc_invoice_window_sort (InvoiceWindow *iw, sort_type_t sort_code) { QueryNew *query = gnc_entry_ledger_get_query (iw->ledger); GSList *p1 = NULL, *p2 = NULL, *p3 = NULL, *standard; if (iw->last_sort == sort_code) return; standard = g_slist_prepend (NULL, QUERY_DEFAULT_SORT); switch (sort_code) { case BY_STANDARD: p1 = standard; break; case BY_DATE: p1 = g_slist_prepend (p1, ENTRY_DATE); p2 = standard; break; case BY_DATE_ENTERED: p1 = g_slist_prepend (p1, ENTRY_DATE_ENTERED); p2 = standard; break; case BY_DESC: p1 = g_slist_prepend (p1, ENTRY_DESC); p2 = standard; break; case BY_QTY: p1 = g_slist_prepend (p1, ENTRY_QTY); p2 = standard; break; case BY_PRICE: p1 = g_slist_prepend (p1, ((iw->owner.type == GNC_OWNER_CUSTOMER) ? ENTRY_IPRICE : ENTRY_BPRICE)); p2 = standard; break; default: g_slist_free (standard); g_return_if_fail (FALSE); } gncQuerySetSortOrder (query, p1, p2, p3); iw->last_sort = sort_code; gnc_entry_ledger_display_refresh (iw->ledger); } void gnc_invoice_window_sort_standard_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; gnc_invoice_window_sort (iw, BY_STANDARD); } void gnc_invoice_window_sort_date_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; gnc_invoice_window_sort (iw, BY_DATE); } void gnc_invoice_window_sort_date_entered_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; gnc_invoice_window_sort (iw, BY_DATE_ENTERED); } void gnc_invoice_window_sort_description_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; gnc_invoice_window_sort (iw, BY_DESC); } void gnc_invoice_window_sort_quantity_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; gnc_invoice_window_sort (iw, BY_QTY); } void gnc_invoice_window_sort_price_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; gnc_invoice_window_sort (iw, BY_PRICE); } /* Window configuration callbacks */ void gnc_invoice_window_toolbar_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; GtkCheckMenuItem *checkmenu = GTK_CHECK_MENU_ITEM(widget); if (checkmenu->active) { gtk_widget_show(iw->toolbar_dock); } else { gtk_widget_hide(iw->toolbar_dock); gtk_widget_queue_resize(iw->toolbar_dock); } } void gnc_invoice_window_statusbar_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; GtkCheckMenuItem *checkmenu = GTK_CHECK_MENU_ITEM(widget); if (checkmenu->active) { gtk_widget_show(iw->statusbar); } else { gtk_widget_hide(iw->statusbar); gtk_widget_queue_resize(iw->statusbar); } } void gnc_invoice_window_summarybar_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; GtkCheckMenuItem *checkmenu = GTK_CHECK_MENU_ITEM(widget); if (checkmenu->active) { gtk_widget_show(iw->summarybar_dock); } else { gtk_widget_hide(iw->summarybar_dock); gtk_widget_queue_resize(iw->summarybar_dock); } } void gnc_invoice_window_active_toggled_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; GncInvoice *invoice = iw_get_invoice(iw); if (!invoice) return; gncInvoiceSetActive (invoice, gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (widget))); } void gnc_invoice_window_leave_notes_cb (GtkWidget *widget, GdkEventFocus *event, gpointer data) { InvoiceWindow *iw = data; GncInvoice *invoice = iw_get_invoice(iw); if (!invoice) return; gncInvoiceSetNotes (invoice, gtk_editable_get_chars (GTK_EDITABLE (widget), 0, -1)); } static void gnc_invoice_window_leave_to_charge_cb (GtkWidget *widget, GdkEventFocus *event, gpointer data) { gnc_amount_edit_evaluate (GNC_AMOUNT_EDIT (widget)); } static void gnc_invoice_window_changed_to_charge_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; GncInvoice *invoice = iw_get_invoice(iw); if (!invoice) return; gncInvoiceSetToChargeAmount (invoice, gnc_amount_edit_get_amount (GNC_AMOUNT_EDIT (widget))); } static GtkWidget * add_summary_label (GtkWidget *summarybar, const char *label_str) { GtkWidget *hbox; GtkWidget *label; hbox = gtk_hbox_new(FALSE, 2); gtk_box_pack_start (GTK_BOX(summarybar), hbox, FALSE, FALSE, 5); label = gtk_label_new (label_str); gtk_misc_set_alignment (GTK_MISC(label), 1.0, 0.5); gtk_box_pack_start (GTK_BOX(hbox), label, FALSE, FALSE, 0); label = gtk_label_new (""); gtk_misc_set_alignment (GTK_MISC(label), 1.0, 0.5); gtk_box_pack_start (GTK_BOX(hbox), label, FALSE, FALSE, 0); return label; } static GtkWidget * gnc_invoice_window_create_summary_bar (InvoiceWindow *iw) { GtkWidget *summarybar; iw->total_label = NULL; iw->total_cash_label = NULL; iw->total_charge_label = NULL; summarybar = gtk_hbox_new (FALSE, 4); iw->total_label = add_summary_label (summarybar, _("Total:")); if (gncOwnerGetType (&iw->owner) == GNC_OWNER_EMPLOYEE) { iw->total_cash_label = add_summary_label (summarybar, _("Total Cash:")); iw->total_charge_label = add_summary_label (summarybar, _("Total Charge:")); } return summarybar; } static GtkWidget * gnc_invoice_window_create_popup_menu (InvoiceWindow *iw) { GtkWidget *popup; GladeXML *xml; xml = gnc_glade_xml_new ("invoice.glade", "Invoice Window Popup Menu"); popup = glade_xml_get_widget (xml, "Invoice Window Popup Menu"); glade_xml_signal_autoconnect_full (xml, gnc_glade_autoconnect_full_func, iw); /* Glade insists on making this a tearoff menu. */ if (gnome_preferences_get_menus_have_tearoff ()) { GtkMenuShell *ms = GTK_MENU_SHELL (popup); GtkWidget *tearoff; tearoff = g_list_nth_data (ms->children, 0); ms->children = g_list_remove (ms->children, tearoff); gtk_widget_destroy (tearoff); } iw->popup_menu = popup; return popup; } static char * gnc_invoice_get_width_prefix (InvoiceWindow *iw) { switch (gncOwnerGetType (&iw->owner)) { case GNC_OWNER_CUSTOMER: return INV_WIDTH_PREFIX; case GNC_OWNER_VENDOR: return BILL_WIDTH_PREFIX; case GNC_OWNER_EMPLOYEE: return VOUCHER_WIDTH_PREFIX; default: g_warning ("invalid owner"); return INV_WIDTH_PREFIX; } } static int * gnc_invoice_get_width_integer (InvoiceWindow *iw) { switch (gncOwnerGetType (&iw->owner)) { case GNC_OWNER_CUSTOMER: return &inv_last_width; case GNC_OWNER_VENDOR: return &bill_last_width; case GNC_OWNER_EMPLOYEE: return &voucher_last_width; default: g_warning ("invalid owner"); return &inv_last_width; } } static void gnc_invoice_save_size (InvoiceWindow *iw) { int *last_width = gnc_invoice_get_width_integer (iw); gdk_window_get_geometry (iw->dialog->window, NULL, NULL, last_width, NULL, NULL); gnc_save_window_size (gnc_invoice_get_width_prefix (iw), *last_width, 0); } static void size_allocate (GtkWidget *widget, GtkAllocation *allocation, gpointer user_data) { InvoiceWindow *iw = user_data; gboolean resize = FALSE; /* HACK ALERT. this seems to be the only thing to get the * freekin register window to stop freekin resizing itself * all the freekin time. * * NOTE: Only resize on the SECOND time through. I don't know why, * but this really seems to have an effect on the window the * _second_ time you pop one up. */ if (iw->width == allocation->width) return; if (iw->width > 0) resize = TRUE; iw->width = allocation->width; if (resize) gtk_window_set_default_size (GTK_WINDOW(iw->dialog), iw->width, 0); } static int gnc_invoice_job_changed_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; GncInvoice *invoice; char const *msg = ""; if (!iw) return FALSE; if (iw->dialog_type == VIEW_INVOICE) return FALSE; gnc_owner_get_owner (iw->job_choice, &(iw->job)); invoice = iw_get_invoice (iw); if (iw->dialog_type == EDIT_INVOICE) return FALSE; msg = gncJobGetReference (gncOwnerGetJob (&(iw->job))); gtk_entry_set_text (GTK_ENTRY (iw->billing_id_entry), msg ? msg : ""); return FALSE; } static GNCSearchWindow * gnc_invoice_select_job_cb (gpointer jobp, gpointer user_data) { GncJob *j = jobp; InvoiceWindow *iw = user_data; GncOwner owner, *ownerp; if (!iw) return NULL; if (j) { ownerp = gncJobGetOwner (j); gncOwnerCopy (ownerp, &owner); } else gncOwnerCopy (&(iw->owner), &owner); return gnc_job_search (j, &owner, iw->book); } static void gnc_invoice_update_job_choice (InvoiceWindow *iw) { if (iw->job_choice) gtk_container_remove (GTK_CONTAINER (iw->job_box), iw->job_choice); /* If we don't have a real owner, then we obviously can't have a job */ if (iw->owner.owner.undefined == NULL) { iw->job_choice = NULL; } else switch (iw->dialog_type) { case VIEW_INVOICE: case EDIT_INVOICE: iw->job_choice = gnc_owner_edit_create (NULL, iw->job_box, iw->book, &(iw->job)); break; case NEW_INVOICE: case MOD_INVOICE: iw->job_choice = gnc_general_search_new (GNC_JOB_MODULE_NAME, _("Select..."), gnc_invoice_select_job_cb, iw); gnc_general_search_set_selected (GNC_GENERAL_SEARCH (iw->job_choice), gncOwnerGetJob (&iw->job)); gnc_general_search_allow_clear (GNC_GENERAL_SEARCH (iw->job_choice), TRUE); gtk_box_pack_start (GTK_BOX (iw->job_box), iw->job_choice, TRUE, TRUE, 0); gtk_signal_connect (GTK_OBJECT (iw->job_choice), "changed", GTK_SIGNAL_FUNC (gnc_invoice_job_changed_cb), iw); break; } if (iw->job_choice) gtk_widget_show_all (iw->job_choice); } static GNCSearchWindow * gnc_invoice_select_proj_job_cb (gpointer jobp, gpointer user_data) { GncJob *j = jobp; InvoiceWindow *iw = user_data; GncOwner owner, *ownerp; if (!iw) return NULL; if (j) { ownerp = gncJobGetOwner (j); gncOwnerCopy (ownerp, &owner); } else gncOwnerCopy (&(iw->proj_cust), &owner); return gnc_job_search (j, &owner, iw->book); } static int gnc_invoice_proj_job_changed_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; if (!iw) return FALSE; if (iw->dialog_type == VIEW_INVOICE) return FALSE; gnc_owner_get_owner (iw->proj_job_choice, &(iw->proj_job)); return FALSE; } static void gnc_invoice_update_proj_job (InvoiceWindow *iw) { if (iw->proj_job_choice) gtk_container_remove (GTK_CONTAINER (iw->proj_job_box), iw->proj_job_choice); switch (iw->dialog_type) { case VIEW_INVOICE: case EDIT_INVOICE: iw->proj_job_choice = gnc_owner_edit_create (NULL, iw->proj_job_box, iw->book, &(iw->job)); break; case NEW_INVOICE: case MOD_INVOICE: if (iw->proj_cust.owner.undefined == NULL) { iw->proj_job_choice = NULL; } else { iw->proj_job_choice = gnc_general_search_new (GNC_JOB_MODULE_NAME, _("Select..."), gnc_invoice_select_proj_job_cb, iw); gnc_general_search_set_selected (GNC_GENERAL_SEARCH(iw->proj_job_choice), gncOwnerGetJob (&iw->proj_job)); gnc_general_search_allow_clear (GNC_GENERAL_SEARCH (iw->proj_job_choice), TRUE); gtk_box_pack_start (GTK_BOX (iw->proj_job_box), iw->proj_job_choice, TRUE, TRUE, 0); gtk_signal_connect (GTK_OBJECT (iw->proj_job_choice), "changed", GTK_SIGNAL_FUNC (gnc_invoice_proj_job_changed_cb), iw); } break; } if (iw->proj_job_choice) gtk_widget_show_all (iw->proj_job_choice); } static int gnc_invoice_owner_changed_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; GncBillTerm *term = NULL; GncOwner owner; if (!iw) return FALSE; if (iw->dialog_type == VIEW_INVOICE) return FALSE; gncOwnerCopy (&(iw->owner), &owner); gnc_owner_get_owner (iw->owner_choice, &owner); /* If this owner really changed, then reset ourselves */ if (!gncOwnerEqual (&owner, &(iw->owner))) { GncInvoice *invoice; gncOwnerCopy (&owner, &(iw->owner)); gncOwnerInitJob (&(iw->job), NULL); invoice = iw_get_invoice (iw); gnc_entry_ledger_reset_query (iw->ledger); } if (iw->dialog_type == EDIT_INVOICE) return FALSE; switch (gncOwnerGetType (&(iw->owner))) { case GNC_OWNER_CUSTOMER: term = gncCustomerGetTerms (gncOwnerGetCustomer (&(iw->owner))); break; case GNC_OWNER_VENDOR: term = gncVendorGetTerms (gncOwnerGetVendor (&(iw->owner))); break; case GNC_OWNER_EMPLOYEE: term = NULL; break; default: g_warning ("Unknown owner type: %d\n", gncOwnerGetType (&(iw->owner))); break; } /* XXX: I'm not sure -- should we change the terms if this happens? */ iw->terms = term; gnc_ui_billterms_optionmenu (iw->terms_menu, iw->book, TRUE, &iw->terms); gnc_invoice_update_job_choice (iw); return FALSE; } static int gnc_invoice_proj_cust_changed_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; GncOwner owner; if (!iw) return FALSE; if (iw->dialog_type == VIEW_INVOICE) return FALSE; gncOwnerCopy (&(iw->proj_cust), &owner); gnc_owner_get_owner (iw->proj_cust_choice, &owner); /* If this owner really changed, then reset ourselves */ if (!gncOwnerEqual (&owner, &(iw->proj_cust))) { gncOwnerCopy (&owner, &(iw->proj_cust)); gncOwnerInitJob (&(iw->proj_job), NULL); } if (iw->dialog_type == EDIT_INVOICE) return FALSE; gnc_invoice_update_proj_job (iw); return FALSE; } static void gnc_invoice_dialog_close_handler (gpointer user_data) { InvoiceWindow *iw = user_data; if (iw) gnome_dialog_close (GNOME_DIALOG (iw->dialog)); } static void gnc_invoice_window_close_handler (gpointer user_data) { InvoiceWindow *iw = user_data; if (iw) { switch (iw->dialog_type) { case VIEW_INVOICE: case EDIT_INVOICE: gnc_invoice_save_size (iw); break; default: break; } gtk_widget_destroy (iw->dialog); } } static void gnc_invoice_reset_total_label (GtkLabel *label, gnc_numeric amt) { char string[256]; xaccSPrintAmount (string, amt, gnc_default_print_info (TRUE)); gtk_label_set_text (label, string); } static void gnc_invoice_redraw_all_cb (GnucashRegister *g_reg, gpointer data) { InvoiceWindow *iw = data; GncInvoice * invoice; gnc_commodity * currency; gnc_numeric amount, to_charge_amt = gnc_numeric_zero(); if (!iw) return; // if (iw) // gnc_invoice_update_window (iw); invoice = iw_get_invoice (iw); if (!invoice) return; if (iw->total_label) { amount = gncInvoiceGetTotal (invoice); gnc_invoice_reset_total_label (GTK_LABEL (iw->total_label), amount); } /* Deal with extra items for the expense voucher */ currency = gncInvoiceGetCurrency (invoice); if (iw->to_charge_edit) { gnc_amount_edit_evaluate (GNC_AMOUNT_EDIT (iw->to_charge_edit)); to_charge_amt = gnc_amount_edit_get_amount(GNC_AMOUNT_EDIT(iw->to_charge_edit)); } if (iw->total_cash_label) { amount = gncInvoiceGetTotalOf (invoice, GNC_PAYMENT_CASH); amount = gnc_numeric_sub (amount, to_charge_amt, gnc_commodity_get_fraction (currency), GNC_RND_ROUND); gnc_invoice_reset_total_label (GTK_LABEL (iw->total_cash_label), amount); } if (iw->total_charge_label) { amount = gncInvoiceGetTotalOf (invoice, GNC_PAYMENT_CARD); amount = gnc_numeric_add (amount, to_charge_amt, gnc_commodity_get_fraction (currency), GNC_RND_ROUND); gnc_invoice_reset_total_label (GTK_LABEL (iw->total_charge_label), amount); } } static void gnc_invoice_redraw_help_cb (GnucashRegister *g_reg, gpointer data) { InvoiceWindow *iw = data; const char *status; char *help; if (!iw) return; help = gnc_table_get_help (gnc_entry_ledger_get_table (iw->ledger)); status = help ? help : ""; gnome_appbar_set_default (GNOME_APPBAR (iw->statusbar), status); g_free (help); } static void gnc_invoice_window_refresh_handler (GHashTable *changes, gpointer user_data) { InvoiceWindow *iw = user_data; const EventInfo *info; GncInvoice *invoice = iw_get_invoice (iw); GncOwner *owner; /* If there isn't a invoice behind us, close down */ if (!invoice) { gnc_close_gui_component (iw->component_id); return; } /* Next, close if this is a destroy event */ if (changes) { info = gnc_gui_get_entity_events (changes, &iw->invoice_guid); if (info && (info->event_mask & GNC_EVENT_DESTROY)) { gnc_close_gui_component (iw->component_id); return; } } /* Check the owners, and see if they have changed */ owner = gncInvoiceGetOwner (invoice); /* Copy the owner information into our window */ gncOwnerCopy (gncOwnerGetEndOwner (owner), &(iw->owner)); gncOwnerInitJob (&(iw->job), gncOwnerGetJob (owner)); /* Copy the billto information into our window */ owner = gncInvoiceGetBillTo (invoice); gncOwnerCopy (gncOwnerGetEndOwner (owner), &iw->proj_cust); gncOwnerInitJob (&iw->proj_job, gncOwnerGetJob (owner)); /* Ok, NOW let's refresh ourselves */ gnc_invoice_update_window (iw); } static void gnc_configure_register_colors (void) { GncEntryLedgerColors reg_colors; reg_colors.header_bg_color = gnc_lookup_color_option_argb("Register Colors", "Header color", 0xffffff); reg_colors.primary_bg_color = gnc_lookup_color_option_argb("Register Colors", "Primary color", 0xffffff); reg_colors.secondary_bg_color = gnc_lookup_color_option_argb("Register Colors", "Secondary color", 0xffffff); reg_colors.primary_active_bg_color = gnc_lookup_color_option_argb("Register Colors", "Primary active color", 0xffffff); reg_colors.secondary_active_bg_color = gnc_lookup_color_option_argb("Register Colors", "Secondary active color", 0xffffff); gnc_entry_ledger_set_colors (reg_colors); } static void gnc_invoice_update_window (InvoiceWindow *iw) { GtkWidget *acct_entry; GncInvoice *invoice; gboolean is_posted = FALSE; gboolean can_unpost = FALSE; invoice = iw_get_invoice (iw); if (iw->owner_choice) gtk_container_remove (GTK_CONTAINER (iw->owner_box), iw->owner_choice); if (iw->proj_cust_choice) gtk_container_remove (GTK_CONTAINER (iw->proj_cust_box), iw->proj_cust_choice); switch (iw->dialog_type) { case VIEW_INVOICE: case EDIT_INVOICE: iw->owner_choice = gnc_owner_edit_create (iw->owner_label, iw->owner_box, iw->book, &(iw->owner)); iw->proj_cust_choice = gnc_owner_edit_create (NULL, iw->proj_cust_box, iw->book, &(iw->proj_cust)); break; case NEW_INVOICE: case MOD_INVOICE: iw->owner_choice = gnc_owner_select_create (iw->owner_label, iw->owner_box, iw->book, &(iw->owner)); iw->proj_cust_choice = gnc_owner_select_create (NULL, iw->proj_cust_box, iw->book, &(iw->proj_cust)); gtk_signal_connect (GTK_OBJECT (iw->owner_choice), "changed", GTK_SIGNAL_FUNC (gnc_invoice_owner_changed_cb), iw); gtk_signal_connect (GTK_OBJECT (iw->proj_cust_choice), "changed", GTK_SIGNAL_FUNC (gnc_invoice_proj_cust_changed_cb), iw); break; } gnc_invoice_update_job_choice (iw); gnc_invoice_update_proj_job (iw); { int * last_width = gnc_invoice_get_width_integer (iw); switch (iw->dialog_type) { case VIEW_INVOICE: case EDIT_INVOICE: if (*last_width == 0) gnc_get_window_size (gnc_invoice_get_width_prefix (iw), last_width, NULL); gtk_window_set_default_size (GTK_WINDOW (iw->dialog), *last_width, 0); break; default: break; } } gtk_widget_show_all (iw->dialog); /* Hide the project frame for customer invoices */ if (iw->owner.type == GNC_OWNER_CUSTOMER) gtk_widget_hide_all (iw->proj_frame); /* Hide the "job" label and entry for employee invoices */ if (iw->owner.type == GNC_OWNER_EMPLOYEE) { gtk_widget_hide_all (iw->job_label); gtk_widget_hide_all (iw->job_box); } acct_entry = glade_xml_get_widget (iw->xml, "acct_entry"); /* We know that "invoice" (and "owner") exist now */ do { const char *string; Timespec ts, ts_zero = {0,0}; Account *acct; gint pos = 0; gtk_entry_set_text (GTK_ENTRY (iw->id_entry), gncInvoiceGetID (invoice)); gtk_entry_set_text (GTK_ENTRY (iw->billing_id_entry), gncInvoiceGetBillingID (invoice)); string = gncInvoiceGetNotes (invoice); gtk_editable_delete_text (GTK_EDITABLE (iw->notes_text), 0, -1); gtk_editable_insert_text (GTK_EDITABLE (iw->notes_text), string, strlen (string), &pos); if (iw->active_check) gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (iw->active_check), gncInvoiceGetActive (invoice)); ts = gncInvoiceGetDateOpened (invoice); if (timespec_equal (&ts, &ts_zero)) { gnc_date_edit_set_time (GNC_DATE_EDIT (iw->opened_date), time(NULL)); } else { gnc_date_edit_set_time_ts (GNC_DATE_EDIT (iw->opened_date), ts); } /* fill in the terms menu */ iw->terms = gncInvoiceGetTerms (invoice); gnc_ui_billterms_optionmenu (iw->terms_menu, iw->book, TRUE, &iw->terms); /* * Next, figure out if we've been posted, and if so set the * appropriate bits of information.. Then work on hiding or * unhiding as necessary. */ acct = gncInvoiceGetPostedAcc (invoice); if (!acct) break; /* Ok, it's definitely posted. Setup the 'posted-invoice' fields now */ is_posted = TRUE; /* Can we unpost this invoice? * XXX: right now we always can, but there * may be times in the future when we cannot. */ can_unpost = TRUE; ts = gncInvoiceGetDatePosted (invoice); gnc_date_edit_set_time_ts (GNC_DATE_EDIT (iw->posted_date), ts); string = xaccAccountGetFullName (acct, gnc_get_account_separator ()); gtk_entry_set_text (GTK_ENTRY (acct_entry), string); } while (FALSE); if (iw->dialog_type == NEW_INVOICE || iw->dialog_type == MOD_INVOICE) return; /* Fill in the to_charge amount (only in VIEW/EDIT modes) */ { gnc_numeric amount; amount = gncInvoiceGetToChargeAmount (invoice); gnc_amount_edit_set_amount (GNC_AMOUNT_EDIT (iw->to_charge_edit), amount); } /* Hide/show the appropriate widgets based on our posted/paid state */ { GtkWidget *hide; if (is_posted == TRUE) { hide = glade_xml_get_widget (iw->xml, "hide3"); gtk_widget_hide_all (hide); hide = glade_xml_get_widget (iw->xml, "hide4"); gtk_widget_hide_all (hide); /* Remove the popup menu */ gnucash_register_attach_popup (iw->reg, NULL, iw); } else { /* ! posted */ hide = glade_xml_get_widget (iw->xml, "posted_label"); gtk_widget_hide_all (hide); gtk_widget_hide_all (iw->posted_date_hbox); hide = glade_xml_get_widget (iw->xml, "acct_label"); gtk_widget_hide_all (hide); gtk_widget_hide_all (acct_entry); hide = glade_xml_get_widget (iw->xml, "hide1"); gtk_widget_hide_all (hide); hide = glade_xml_get_widget (iw->xml, "hide2"); gtk_widget_hide_all (hide); } } /* Set the toolbar widgets sensitivity */ gtk_widget_set_sensitive (iw->edit_button, !is_posted); gtk_widget_set_sensitive (iw->enter_button, !is_posted); gtk_widget_set_sensitive (iw->cancel_button, !is_posted); gtk_widget_set_sensitive (iw->delete_button, !is_posted); gtk_widget_set_sensitive (iw->duplicate_button, !is_posted); gtk_widget_set_sensitive (iw->blank_button, !is_posted); gtk_widget_set_sensitive (iw->post_button, !is_posted); gtk_widget_set_sensitive (iw->unpost_button, can_unpost); /* Set the menubar widgets sensitivity */ gtk_widget_set_sensitive (iw->menu_print, is_posted); gtk_widget_set_sensitive (iw->menu_cut, !is_posted); gtk_widget_set_sensitive (iw->menu_paste, !is_posted); gtk_widget_set_sensitive (iw->menu_edit_invoice, !is_posted); gtk_widget_set_sensitive (iw->menu_actions, !is_posted); /* Set the to-change widget */ gtk_widget_set_sensitive (iw->to_charge_edit, !is_posted); /* Hide the to_charge frame for all non-employee invoices, * or set insensitive if the employee does not have a charge card */ if (iw->owner.type == GNC_OWNER_EMPLOYEE) { if (!gncEmployeeGetCCard (gncOwnerGetEmployee(&iw->owner))) gtk_widget_set_sensitive (iw->to_charge_edit, FALSE); } else { gtk_widget_hide_all (iw->to_charge_frame); } if (is_posted) { // GtkWidget *hide; /* Setup viewer for read-only access */ /* gtk_widget_set_sensitive (iw->id_entry, FALSE); gtk_widget_set_sensitive (iw->terms_menu, FALSE); gtk_widget_set_sensitive (iw->notes_text, FALSE); *//* XXX: should notes remain writable? */ } } static void gnc_invoice_id_changed_cb (GtkWidget *widget, gpointer data) { InvoiceWindow *iw = data; char *id, *wintitle = NULL, *title; if (!iw) return; id = gtk_entry_get_text (GTK_ENTRY (iw->id_entry)); switch (gncOwnerGetType (&iw->owner)) { case GNC_OWNER_CUSTOMER: switch (iw->dialog_type) { case NEW_INVOICE: wintitle = _("New Invoice"); break; case MOD_INVOICE: case EDIT_INVOICE: wintitle = _("Edit Invoice"); break; case VIEW_INVOICE: wintitle = _("View Invoice"); break; } break; case GNC_OWNER_VENDOR: switch (iw->dialog_type) { case NEW_INVOICE: wintitle = _("New Bill"); break; case MOD_INVOICE: case EDIT_INVOICE: wintitle = _("Edit Bill"); break; case VIEW_INVOICE: wintitle = _("View Bill"); break; } break; case GNC_OWNER_EMPLOYEE: switch (iw->dialog_type) { case NEW_INVOICE: wintitle = _("New Expense Voucher"); break; case MOD_INVOICE: case EDIT_INVOICE: wintitle = _("Edit Expense Voucher"); break; case VIEW_INVOICE: wintitle = _("View Expense Voucher"); break; } break; default: break; } title = g_strconcat (wintitle, " - ", id, NULL); gtk_window_set_title (GTK_WINDOW (iw->dialog), title); g_free (title); } static gboolean find_handler (gpointer find_data, gpointer user_data) { const GUID *invoice_guid = find_data; InvoiceWindow *iw = user_data; return(iw && guid_equal(&iw->invoice_guid, invoice_guid)); } static InvoiceWindow * gnc_invoice_new_window (GNCBook *bookp, InvoiceDialogType type, GncInvoice *invoice, GncOwner *owner) { InvoiceWindow *iw; GladeXML *xml; GtkWidget *hbox; GncEntryLedger *entry_ledger = NULL; GncOwnerType owner_type; GncEntryLedgerType ledger_type; GncOwner *billto; g_assert (type != NEW_INVOICE && type != MOD_INVOICE); g_assert (invoice != NULL); /* * Find an existing window for this invoice. If found, bring it to * the front. */ if (invoice) { GUID invoice_guid; invoice_guid = *gncInvoiceGetGUID (invoice); iw = gnc_find_first_gui_component (DIALOG_VIEW_INVOICE_CM_CLASS, find_handler, &invoice_guid); if (iw) { gtk_window_present (GTK_WINDOW(iw->dialog)); return(iw); } } /* * No existing invoice window found. Build a new one. */ gnc_configure_register_colors (); iw = g_new0 (InvoiceWindow, 1); iw->book = bookp; iw->dialog_type = type; iw->width = -1; /* Save this for later */ gncOwnerCopy (gncOwnerGetEndOwner (owner), &(iw->owner)); gncOwnerInitJob (&(iw->job), gncOwnerGetJob (owner)); owner_type = gncOwnerGetType (&iw->owner); billto = gncInvoiceGetBillTo (invoice); gncOwnerCopy (gncOwnerGetEndOwner (billto), &(iw->proj_cust)); gncOwnerInitJob (&iw->proj_job, gncOwnerGetJob (billto)); /* Find the dialog */ iw->xml = xml = gnc_glade_xml_new ("invoice.glade", "Invoice Entry Window"); iw->dialog = glade_xml_get_widget (xml, "Invoice Entry Window"); gtk_object_set_data (GTK_OBJECT (iw->dialog), "dialog_info", iw); /* Autoconnect all the signals */ glade_xml_signal_autoconnect_full (xml, gnc_glade_autoconnect_full_func, iw); /* libglade should do this next line */ GNOME_APP(iw->dialog)->menubar = glade_xml_get_widget (xml, "menubar1"); gnc_extensions_menu_setup(GNOME_APP(iw->dialog), WINDOW_NAME_INVOICE); /* Grab the widgets */ iw->id_entry = glade_xml_get_widget (xml, "id_entry"); iw->billing_id_entry = glade_xml_get_widget (xml, "billing_id_entry"); iw->terms_menu = glade_xml_get_widget (xml, "terms_menu"); iw->notes_text = glade_xml_get_widget (xml, "notes_text"); iw->active_check = glade_xml_get_widget (xml, "active_check"); iw->owner_box = glade_xml_get_widget (xml, "owner_hbox"); iw->owner_label = glade_xml_get_widget (xml, "owner_label"); iw->job_label = glade_xml_get_widget (xml, "job_label"); iw->job_box = glade_xml_get_widget (xml, "job_hbox"); /* grab the project widgets */ iw->proj_frame = glade_xml_get_widget (xml, "proj_frame"); iw->proj_cust_box = glade_xml_get_widget (xml, "proj_cust_hbox"); iw->proj_job_box = glade_xml_get_widget (xml, "proj_job_hbox"); /* grab the toolbar widgets */ iw->toolbar_dock = glade_xml_get_widget (xml, "toolbar_dock"); iw->edit_button = glade_xml_get_widget (xml, "edit_button"); iw->enter_button = glade_xml_get_widget (xml, "enter_button"); iw->cancel_button = glade_xml_get_widget (xml, "cancel_button"); iw->delete_button = glade_xml_get_widget (xml, "delete_button"); iw->duplicate_button = glade_xml_get_widget (xml, "duplicate_button"); iw->blank_button = glade_xml_get_widget (xml, "blank_button"); iw->print_button = glade_xml_get_widget (xml, "print_button"); iw->post_button = glade_xml_get_widget (xml, "post_button"); iw->unpost_button = glade_xml_get_widget (xml, "unpost_button"); /* grab the menu widgets */ iw->menu_print = glade_xml_get_widget (xml, "menu_print"); iw->menu_cut = glade_xml_get_widget (xml, "menu_cut"); iw->menu_paste = glade_xml_get_widget (xml, "menu_paste"); iw->menu_edit_invoice = glade_xml_get_widget (xml, "menu_edit_invoice"); iw->menu_actions = glade_xml_get_widget (xml, "menu_actions"); /* grab the to_charge widgets */ { GtkWidget *edit; gnc_commodity *currency = gncInvoiceGetCurrency (invoice); GNCPrintAmountInfo print_info; iw->to_charge_frame = glade_xml_get_widget (xml, "to_charge_frame"); edit = gnc_amount_edit_new(); print_info = gnc_commodity_print_info (currency, FALSE); gnc_amount_edit_set_evaluate_on_enter (GNC_AMOUNT_EDIT (edit), TRUE); gnc_amount_edit_set_print_info (GNC_AMOUNT_EDIT (edit), print_info); gnc_amount_edit_set_fraction (GNC_AMOUNT_EDIT (edit), gnc_commodity_get_fraction (currency)); iw->to_charge_edit = edit; gtk_widget_show (edit); hbox = glade_xml_get_widget (xml, "to_charge_box"); gtk_box_pack_start (GTK_BOX (hbox), edit, TRUE, TRUE, 0); gtk_signal_connect (GTK_OBJECT(gnc_amount_edit_gtk_entry (GNC_AMOUNT_EDIT(edit))), "focus-out-event", GTK_SIGNAL_FUNC(gnc_invoice_window_leave_to_charge_cb), iw); gtk_signal_connect (GTK_OBJECT (edit), "amount_changed", GTK_SIGNAL_FUNC(gnc_invoice_window_changed_to_charge_cb), iw); } /* grab the statusbar */ iw->statusbar = glade_xml_get_widget (xml, "status_bar"); /* grab/build the summarybar */ { GtkWidget * summarybar = gnc_invoice_window_create_summary_bar (iw); iw->summarybar_dock = glade_xml_get_widget (xml, "summarybar_dock"); if (summarybar) { gtk_widget_show_all (summarybar); gtk_container_add (GTK_CONTAINER (iw->summarybar_dock), summarybar); } } hbox = glade_xml_get_widget (xml, "date_opened_hbox"); iw->opened_date = gnc_date_edit_new (time(NULL), FALSE, FALSE); gtk_box_pack_start (GTK_BOX(hbox), iw->opened_date, TRUE, TRUE, 0); iw->posted_date_hbox = glade_xml_get_widget (xml, "date_posted_hbox"); iw->posted_date = gnc_date_edit_new (time(NULL), FALSE, FALSE); gtk_box_pack_start (GTK_BOX(iw->posted_date_hbox), iw->posted_date, TRUE, TRUE, 0); /* Make the opened and posted dates insensitive in this window */ gtk_widget_set_sensitive (iw->opened_date, FALSE); gtk_widget_set_sensitive (iw->posted_date, FALSE); /* Build the ledger */ ledger_type = GNCENTRY_INVOICE_VIEWER; switch (type) { case EDIT_INVOICE: switch (owner_type) { case GNC_OWNER_CUSTOMER: ledger_type = GNCENTRY_INVOICE_ENTRY; break; case GNC_OWNER_VENDOR: ledger_type = GNCENTRY_BILL_ENTRY; break; case GNC_OWNER_EMPLOYEE: ledger_type = GNCENTRY_EXPVOUCHER_ENTRY; break; default: g_warning ("Invalid owner type"); } break; case VIEW_INVOICE: default: switch (owner_type) { case GNC_OWNER_CUSTOMER: ledger_type = GNCENTRY_INVOICE_VIEWER; break; case GNC_OWNER_VENDOR: ledger_type = GNCENTRY_BILL_VIEWER; break; case GNC_OWNER_EMPLOYEE: ledger_type = GNCENTRY_EXPVOUCHER_VIEWER; break; default: g_warning ("Invalid owner type"); } } entry_ledger = gnc_entry_ledger_new (iw->book, ledger_type); /* Save the ledger... */ iw->ledger = entry_ledger; gnc_entry_ledger_set_parent (entry_ledger, iw->dialog); /* Set the entry_ledger's invoice */ gnc_entry_ledger_set_default_invoice (entry_ledger, invoice); /* Setup initial values */ iw->invoice_guid = *gncInvoiceGetGUID (invoice); iw->component_id = gnc_register_gui_component (DIALOG_VIEW_INVOICE_CM_CLASS, gnc_invoice_window_refresh_handler, gnc_invoice_window_close_handler, iw); gnc_gui_component_watch_entity_type (iw->component_id, GNC_INVOICE_MODULE_NAME, GNC_EVENT_MODIFY | GNC_EVENT_DESTROY); gtk_signal_connect (GTK_OBJECT (iw->dialog), "destroy", GTK_SIGNAL_FUNC(gnc_invoice_window_destroy_cb), iw); gtk_signal_connect (GTK_OBJECT (iw->dialog), "size-allocate", GTK_SIGNAL_FUNC(size_allocate), iw); gtk_signal_connect (GTK_OBJECT (iw->id_entry), "changed", gnc_invoice_id_changed_cb, iw); /* Create the register */ { GtkWidget *regWidget, *frame; GtkWidget *popup; guint num_rows; num_rows = (guint) gnc_lookup_number_option ("Business", "Number of Rows", 10.0); gnucash_register_set_initial_rows( num_rows ); /* Watch the order of operations, here... */ regWidget = gnucash_register_new (gnc_entry_ledger_get_table (entry_ledger)); gnc_table_init_gui( regWidget, entry_ledger ); frame = glade_xml_get_widget (xml, "ledger_frame"); gtk_container_add (GTK_CONTAINER (frame), regWidget); iw->reg = GNUCASH_REGISTER (regWidget); GNUCASH_SHEET (iw->reg->sheet)->window = iw->dialog; gtk_signal_connect (GTK_OBJECT(regWidget), "activate_cursor", GTK_SIGNAL_FUNC(gnc_invoice_window_recordCB), iw); gtk_signal_connect (GTK_OBJECT(regWidget), "redraw_all", GTK_SIGNAL_FUNC(gnc_invoice_redraw_all_cb), iw); gtk_signal_connect (GTK_OBJECT(regWidget), "redraw_help", GTK_SIGNAL_FUNC(gnc_invoice_redraw_help_cb), iw); popup = gnc_invoice_window_create_popup_menu (iw); gnucash_register_attach_popup (GNUCASH_REGISTER (regWidget), popup, iw); } gnc_table_realize_gui (gnc_entry_ledger_get_table (entry_ledger)); /* Show the dialog */ gtk_widget_show_all (iw->dialog); /* Now fill in a lot of the pieces and display properly */ gnc_invoice_update_window (iw); gnc_table_refresh_gui (gnc_entry_ledger_get_table (iw->ledger), TRUE); gnc_window_adjust_for_screen (GTK_WINDOW(iw->dialog)); return iw; } static InvoiceWindow * gnc_invoice_window_new_invoice (GNCBook *bookp, GncOwner *owner, GncInvoice *invoice) { InvoiceWindow *iw; GladeXML *xml; GnomeDialog *iwd; GtkWidget *hbox; GncOwner *billto; if (invoice) { /* * Try to find an existing window for this invoice. If found, * bring it to the front. */ GUID invoice_guid; invoice_guid = *gncInvoiceGetGUID (invoice); iw = gnc_find_first_gui_component (DIALOG_NEW_INVOICE_CM_CLASS, find_handler, &invoice_guid); if (iw) { gtk_window_present (GTK_WINDOW(iw->dialog)); return(iw); } } /* * No existing invoice window found. Build a new one. */ iw = g_new0 (InvoiceWindow, 1); if (invoice == NULL) { iw->dialog_type = NEW_INVOICE; invoice = gncInvoiceCreate (bookp); gncInvoiceSetCurrency (invoice, gnc_default_currency ()); iw->book = bookp; } else { iw->dialog_type = MOD_INVOICE; owner = gncInvoiceGetOwner (invoice); iw->book = gncInvoiceGetBook (invoice); } /* Save this for later */ gncOwnerCopy (gncOwnerGetEndOwner(owner), &(iw->owner)); gncOwnerInitJob (&(iw->job), gncOwnerGetJob (owner)); billto = gncInvoiceGetBillTo (invoice); gncOwnerCopy (gncOwnerGetEndOwner (billto), &(iw->proj_cust)); gncOwnerInitJob (&iw->proj_job, gncOwnerGetJob (billto)); /* Find the dialog */ iw->xml = xml = gnc_glade_xml_new ("invoice.glade", "New Invoice Dialog"); iw->dialog = glade_xml_get_widget (xml, "New Invoice Dialog"); iwd = GNOME_DIALOG (iw->dialog); gtk_object_set_data (GTK_OBJECT (iw->dialog), "dialog_info", iw); /* Grab the widgets */ iw->id_entry = glade_xml_get_widget (xml, "id_entry"); iw->billing_id_entry = glade_xml_get_widget (xml, "billing_id_entry"); iw->terms_menu = glade_xml_get_widget (xml, "terms_menu"); iw->notes_text = glade_xml_get_widget (xml, "notes_text"); iw->owner_box = glade_xml_get_widget (xml, "owner_hbox"); iw->owner_label = glade_xml_get_widget (xml, "owner_label"); iw->job_label = glade_xml_get_widget (xml, "job_label"); iw->job_box = glade_xml_get_widget (xml, "job_hbox"); /* grab the project widgets */ iw->proj_frame = glade_xml_get_widget (xml, "proj_frame"); iw->proj_cust_box = glade_xml_get_widget (xml, "proj_cust_hbox"); iw->proj_job_box = glade_xml_get_widget (xml, "proj_job_hbox"); hbox = glade_xml_get_widget (xml, "date_opened_hbox"); iw->opened_date = gnc_date_edit_new (time(NULL), FALSE, FALSE); gtk_box_pack_start (GTK_BOX(hbox), iw->opened_date, TRUE, TRUE, 0); /* If this is a New Invoice, reset the Notes file to read/write */ if (iw->dialog_type == NEW_INVOICE) gtk_editable_set_editable (GTK_EDITABLE (iw->notes_text), TRUE); /* default to ok */ gnome_dialog_editable_enters (iwd, GTK_EDITABLE (iw->id_entry)); gnome_dialog_set_default (iwd, 0); gtk_signal_connect (GTK_OBJECT (iw->dialog), "destroy", GTK_SIGNAL_FUNC(gnc_invoice_window_destroy_cb), iw); gtk_signal_connect (GTK_OBJECT (iw->id_entry), "changed", gnc_invoice_id_changed_cb, iw); gnome_dialog_button_connect (iwd, 0, GTK_SIGNAL_FUNC(gnc_invoice_window_ok_cb), iw); gnome_dialog_button_connect (iwd, 1, GTK_SIGNAL_FUNC(gnc_invoice_window_cancel_cb), iw); gnome_dialog_button_connect (iwd, 2, GTK_SIGNAL_FUNC(gnc_invoice_window_help_cb), iw); /* Setup initial values */ iw->invoice_guid = *gncInvoiceGetGUID (invoice); iw->component_id = gnc_register_gui_component (DIALOG_NEW_INVOICE_CM_CLASS, gnc_invoice_window_refresh_handler, gnc_invoice_dialog_close_handler, iw); gnc_gui_component_watch_entity_type (iw->component_id, GNC_INVOICE_MODULE_NAME, GNC_EVENT_MODIFY | GNC_EVENT_DESTROY); /* Now fill in a lot of the pieces and display properly */ gnc_invoice_update_window (iw); gnc_table_refresh_gui (gnc_entry_ledger_get_table (iw->ledger), TRUE); return iw; } InvoiceWindow * gnc_ui_invoice_edit (GncInvoice *invoice) { InvoiceWindow *iw; InvoiceDialogType type; if (!invoice) return NULL; /* Immutable once we've been posted */ if (gncInvoiceGetPostedAcc (invoice)) type = VIEW_INVOICE; else type = EDIT_INVOICE; iw = gnc_invoice_new_window (gncInvoiceGetBook(invoice), type, invoice, gncInvoiceGetOwner (invoice)); return iw; } static InvoiceWindow * gnc_ui_invoice_modify (GncInvoice *invoice) { InvoiceWindow *iw; if (!invoice) return NULL; iw = gnc_invoice_window_new_invoice (NULL, NULL, invoice); return iw; } InvoiceWindow * gnc_ui_invoice_new (GncOwner *ownerp, GNCBook *bookp) { InvoiceWindow *iw; GncOwner owner; if (ownerp) { gncOwnerCopy (ownerp, &owner); } else gncOwnerInitCustomer (&owner, NULL); /* XXX: pass in the owner type? */ /* Make sure required options exist */ if (!bookp) return NULL; iw = gnc_invoice_window_new_invoice (bookp, &owner, NULL); return iw; } /* Functions for invoice selection widgets */ static void edit_invoice_cb (gpointer *invoice_p, gpointer user_data) { GncInvoice *invoice; g_return_if_fail (invoice_p && user_data); invoice = *invoice_p; if (!invoice) return; gnc_ui_invoice_edit (invoice); } static void pay_invoice_cb (gpointer *invoice_p, gpointer user_data) { struct _invoice_select_window *sw = user_data; GncInvoice *invoice; GNCLot *lot; gnc_numeric val; g_return_if_fail (invoice_p && user_data); invoice = *invoice_p; if (!invoice) return; lot = gncInvoiceGetPostedLot (invoice); val = gnc_numeric_abs (gnc_lot_get_balance (lot)); gnc_ui_payment_new_with_value (gncInvoiceGetOwner (invoice), sw->book, val); } static gpointer new_invoice_cb (gpointer user_data) { struct _invoice_select_window *sw = user_data; InvoiceWindow *iw; g_return_val_if_fail (user_data, NULL); iw = gnc_ui_invoice_new (sw->owner, sw->book); return iw_get_invoice (iw); } static void free_invoice_cb (gpointer user_data) { struct _invoice_select_window *sw = user_data; g_return_if_fail (sw); gncQueryDestroy (sw->q); g_free (sw); } GNCSearchWindow * gnc_invoice_search (GncInvoice *start, GncOwner *owner, GNCBook *book) { GNCIdType type = GNC_INVOICE_MODULE_NAME; struct _invoice_select_window *sw; QueryNew *q, *q2 = NULL; static GList *params = NULL; static GList *columns = NULL; static GNCSearchCallbackButton buttons[] = { { N_("View/Edit Invoice"), edit_invoice_cb}, { N_("Process Payment"), pay_invoice_cb}, { NULL }, }; g_return_val_if_fail (book, NULL); /* Build parameter list in reverse order */ if (params == NULL) { params = gnc_search_param_prepend (params, _("Invoice Owner"), NULL, type, INVOICE_OWNER, NULL); params = gnc_search_param_prepend (params, _("Invoice Notes"), NULL, type, INVOICE_NOTES, NULL); params = gnc_search_param_prepend (params, _("Billing ID"), NULL, type, INVOICE_BILLINGID, NULL); params = gnc_search_param_prepend (params, _("Date Posted"), NULL, type, INVOICE_POSTED, NULL); params = gnc_search_param_prepend (params, _("Is Posted?"), NULL, type, INVOICE_IS_POSTED, NULL); params = gnc_search_param_prepend (params, _("Date Opened"), NULL, type, INVOICE_OPENED, NULL); params = gnc_search_param_prepend (params, _("Company Name "), NULL, type, INVOICE_OWNER, OWNER_PARENT, OWNER_NAME, NULL); params = gnc_search_param_prepend (params, _("Invoice ID"), NULL, type, INVOICE_ID, NULL); } /* Build the column list in reverse order */ if (columns == NULL) { columns = gnc_search_param_prepend (columns, _("Billing ID"), NULL, type, INVOICE_BILLINGID, NULL); columns = gnc_search_param_prepend (columns, _("Company"), NULL, type, INVOICE_OWNER, OWNER_PARENT, OWNER_NAME, NULL); columns = gnc_search_param_prepend (columns, _("Type"), NULL, type, INVOICE_TYPE, NULL); columns = gnc_search_param_prepend (columns, _("Posted"), NULL, type, INVOICE_POSTED, NULL); columns = gnc_search_param_prepend (columns, _("Opened"), NULL, type, INVOICE_OPENED, NULL); columns = gnc_search_param_prepend (columns, _("Num"), NULL, type, INVOICE_ID, NULL); } /* Build the queries */ q = gncQueryCreateFor (type); gncQuerySetBook (q, book); /* If owner is supplied, limit all searches to invoices who's owner * or end-owner is the supplied owner! Show all invoices by this * owner. If a Job is supplied, search for all invoices for that * job, but if a Customer is supplied, search for all invoices owned * by that Customer or any of that Customer's Jobs. In other words, * match on == Invoice->Owner->GUID or * Invoice->owner->parentGUID. */ if (owner && gncOwnerGetGUID (owner)) { q2 = gncQueryCreate (); gncQueryAddGUIDMatch (q2, g_slist_prepend (g_slist_prepend (NULL, QUERY_PARAM_GUID), INVOICE_OWNER), gncOwnerGetGUID (owner), QUERY_OR); gncQueryAddGUIDMatch (q2, g_slist_prepend (g_slist_prepend (NULL, OWNER_PARENTG), INVOICE_OWNER), gncOwnerGetGUID (owner), QUERY_OR); gncQueryMergeInPlace (q, q2, QUERY_AND); gncQueryDestroy (q2); q2 = gncQueryCopy (q); } #if 0 if (start) { if (q2 == NULL) q2 = gncQueryCopy (q); gncQueryAddGUIDMatch (q2, g_slist_prepend (NULL, QUERY_PARAM_GUID), gncInvoiceGetGUID (start), QUERY_AND); } #endif /* launch select dialog and return the result */ sw = g_new0 (struct _invoice_select_window, 1); if (owner) { gncOwnerCopy (owner, &(sw->owner_def)); sw->owner = &(sw->owner_def); } sw->book = book; sw->q = q; return gnc_search_dialog_create (type, params, columns, q, q2, buttons, NULL, new_invoice_cb, sw, free_invoice_cb); } GNCSearchWindow * gnc_invoice_search_select (gpointer start, gpointer book) { GncInvoice *i = start; GncOwner owner, *ownerp; if (!book) return NULL; if (i) { ownerp = gncInvoiceGetOwner (i); gncOwnerCopy (ownerp, &owner); } else gncOwnerInitCustomer (&owner, NULL); /* XXX */ return gnc_invoice_search (start, NULL, book); } GNCSearchWindow * gnc_invoice_search_edit (gpointer start, gpointer book) { if (start) gnc_ui_invoice_edit (start); return NULL; }