From 00319751b7761082a30ae6684c82ac7a1814a2be Mon Sep 17 00:00:00 2001
From: tipaul <tipaul>
Date: Tue, 14 May 2002 09:13:52 +0000
Subject: [PATCH] DB query optimisation

---
 acqui/receive.pl | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/acqui/receive.pl b/acqui/receive.pl
index c65d61a7e4..a49190f53b 100755
--- a/acqui/receive.pl
+++ b/acqui/receive.pl
@@ -11,7 +11,7 @@ use strict;
 my $input=new CGI;
 print $input->header();
 my $id=$input->param('id');
-my ($count,@booksellers)=bookseller($id); 
+my ($count,@booksellers)=bookseller($id);
 my $invoice=$input->param('invoice');
 my $freight=$input->param('freight');
 my $gst=$input->param('gst');
@@ -54,9 +54,11 @@ $date
 
 EOP
 ;
-my ($count,@results)=invoice($invoice);
+my ($count,@results);
 if ($invoice eq ''){
-  ($count,@results)=getallorders($id);
+	($count,@results)=getallorders($id);
+} else {
+	($count,@results)=invoice($invoice);
 }
 print $count;
 my $totalprice=0;
-- 
2.39.2