From 3f23bdfaef8eb6bb092b72ea741b63e243f8ab19 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Sat, 29 Mar 2008 08:15:45 +0000
Subject: okay.  and thank goodness its on 1.9.  really fix error reporting on
 quick package order this time.  have to change cust cancel popup slightly
 too, but its for the better (easier custnum parsing).  and lastly make it
 easier for reason selection to be reused without stickiness-on-errors being a
 big pain in the ass

---
 httemplate/misc/order_pkg.html | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

(limited to 'httemplate/misc/order_pkg.html')

diff --git a/httemplate/misc/order_pkg.html b/httemplate/misc/order_pkg.html
index 05cd99cc5..f4f297140 100644
--- a/httemplate/misc/order_pkg.html
+++ b/httemplate/misc/order_pkg.html
@@ -10,6 +10,8 @@ function enable_order_pkg () {
 }
 </SCRIPT>
 
+<% include('/elements/error.html') %>
+
 <FORM NAME="OrderPkgForm" ACTION="<% $p %>edit/process/quick-cust_pkg.cgi" METHOD="POST">
 
 <INPUT TYPE="hidden" NAME="custnum" VALUE="<% $cust_main->custnum %>">
@@ -19,8 +21,9 @@ function enable_order_pkg () {
   <TH ALIGN="right">Package</TH>
   <TD>
     <% include('/elements/select-cust-part_pkg.html',
-                 'cust_main' => $cust_main,
-                 'onchange'  => 'enable_order_pkg',
+                 'curr_value' => scalar( $cgi->param('pkgpart') ),
+                 'cust_main'  => $cust_main,
+                 'onchange'   => 'enable_order_pkg',
               )
     %>
   </TD>
@@ -50,8 +53,7 @@ die "access denied"
 
 my $conf = new FS::Conf;
 
-my($query) = $cgi->keywords;
-$query =~ /^(\d+)$/;
+$cgi->param('custnum') =~ /^(\d+)$/;
 my $custnum = $1;
 my $cust_main = qsearchs({
   'table'     => 'cust_main',
-- 
cgit v1.2.1