[freeside-commits] freeside/httemplate/view qual.cgi,1.5,1.6

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/httemplate/view
In directory wavetail.420.am:/tmp/cvs-serv5187/httemplate/view

Modified Files:
	qual.cgi 
Log Message:
refactor transaction from process/qual.cgi to qual.pm insert, RT#7111

Index: qual.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/view/qual.cgi,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -w -d -r1.5 -r1.6
--- qual.cgi	20 Jan 2011 20:46:30 -0000	1.5
+++ qual.cgi	12 Mar 2011 21:30:57 -0000	1.6
@@ -37,7 +37,7 @@
 %   my $pkglist = $qual_result->{'pkglist'};
 %   my $cust_or_prospect = $qual->cust_or_prospect;
 %   my $locationnum = '';
-%   my %location = $qual->location;
+%   my %location = $qual->location_hash;
 %   if (%location && $location{'locationnum'}) { 
 %      $locationnum = $location{'locationnum'};
 %   }
@@ -82,7 +82,7 @@
 
 my $qual = qsearchs('qual', { qualnum => $qualnum }) or die "invalid qualnum";
 my $location_line = '';
-my %location_hash = $qual->location;
+my %location_hash = $qual->location_hash;
 my $cust_location;
 if ( %location_hash ) {
     $cust_location = new FS::cust_location(\%location_hash);