From 22bb2807ec8e7bf91f3f5a7f1598047798d1104c Mon Sep 17 00:00:00 2001
From: Derek Atkins <derek@ihtfp.com>
Date: Mon, 11 Feb 2002 03:19:26 +0000
Subject: [PATCH] make sure that you can't change an Order or Invoice after it
 becomes RO

git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@6709 57a11ea4-9604-0410-9ed3-97b8803252fd
---
 src/business/business-gnome/dialog-invoice.c | 6 ++++++
 src/business/business-gnome/dialog-order.c   | 7 +++++++
 2 files changed, 13 insertions(+)

diff --git a/src/business/business-gnome/dialog-invoice.c b/src/business/business-gnome/dialog-invoice.c
index e1c160beb4..5298ea31cc 100644
--- a/src/business/business-gnome/dialog-invoice.c
+++ b/src/business/business-gnome/dialog-invoice.c
@@ -83,6 +83,9 @@ static void gnc_ui_to_invoice (InvoiceWindow *iw, GncInvoice *invoice)
   Timespec ts;
   time_t tt;
 
+  if (iw->dialog_type == VIEW_INVOICE)
+    return;
+
   gnc_suspend_gui_refresh ();
   
   gncInvoiceSetID (invoice, gtk_editable_get_chars
@@ -339,6 +342,9 @@ gnc_invoice_owner_changed_cb (GtkWidget *widget, gpointer data)
   if (!iw)
     return FALSE;
 
+  if (iw->dialog_type == VIEW_INVOICE)
+    return FALSE;
+
   gnc_owner_get_owner (iw->owner_choice, &(iw->owner));
   invoice = iw_get_invoice (iw);
   gncInvoiceSetOwner (invoice, &(iw->owner));
diff --git a/src/business/business-gnome/dialog-order.c b/src/business/business-gnome/dialog-order.c
index f30418446e..bd763bc745 100644
--- a/src/business/business-gnome/dialog-order.c
+++ b/src/business/business-gnome/dialog-order.c
@@ -85,6 +85,10 @@ static void gnc_ui_to_order (OrderWindow *ow, GncOrder *order)
   Timespec ts;
   time_t tt;
 
+  /* Do nothing if this is view only */
+  if (ow->dialog_type == VIEW_ORDER)
+    return;
+
   gnc_suspend_gui_refresh ();
   
   gncOrderSetID (order, gtk_editable_get_chars
@@ -300,6 +304,9 @@ gnc_order_owner_changed_cb (GtkWidget *widget, gpointer data)
   if (!ow)
     return FALSE;
 
+  if (ow->dialog_type == VIEW_ORDER)
+    return FALSE;
+
   gnc_owner_get_owner (ow->owner_choice, &(ow->owner));
   switch (gncOwnerGetType (&(ow->owner))) {
   case GNC_OWNER_JOB: