From a1c11c57842c7df70dbf42053e4c1341618dfb21 Mon Sep 17 00:00:00 2001
From: tipaul <tipaul>
Date: Wed, 15 Sep 2004 16:13:41 +0000
Subject: [PATCH] bugfixes in order modif

---
 C4/Acquisition.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/C4/Acquisition.pm b/C4/Acquisition.pm
index 9264f344d2..3093f89861 100644
--- a/C4/Acquisition.pm
+++ b/C4/Acquisition.pm
@@ -254,11 +254,11 @@ sub modorder {
   my $dbh = C4::Context->dbh;
   my $sth=$dbh->prepare("update aqorders set title=?,
   quantity=?,listprice=?,basketno=?,
-  rrp=?,ecost=?,unitprice=?,
-  sort1=?, sort2=?
+  rrp=?,ecost=?,unitprice=?,booksellerinvoicenumber=?,
+  notes=?,sort1=?, sort2=?
   where
   ordernumber=? and biblionumber=?");
-  $sth->execute($title,$quantity,$listprice,$basketno,$rrp,$ecost,$cost,$sort1,$sort2,$ordnum,$bibnum);
+  $sth->execute($title,$quantity,$listprice,$basketno,$rrp,$ecost,$cost,$invoice,$notes,$sort1,$sort2,$ordnum,$bibnum);
   $sth->finish;
   $sth=$dbh->prepare("update aqorderbreakdown set bookfundid=? where
   ordernumber=?");
-- 
2.39.5