X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fedit%2Fcust_pkg.cgi;h=7ffbb1fc0e2da2fe81b40ed6523af6ce04ae8685;hp=d860499406708f2d9c188ef7ee9a61a3b6660810;hb=d20e332890418a6713c0617cd7af5507664168e2;hpb=06fd3d9f3ca53b2d2f7595e55be4b129ca69511c
diff --git a/httemplate/edit/cust_pkg.cgi b/httemplate/edit/cust_pkg.cgi
index d86049940..7ffbb1fc0 100755
--- a/httemplate/edit/cust_pkg.cgi
+++ b/httemplate/edit/cust_pkg.cgi
@@ -46,17 +46,17 @@
Order new packages
-%
+
%my $cust_main = qsearchs('cust_main',{'custnum'=>$custnum});
%my $agent = qsearchs('agent',{'agentnum'=> $cust_main->agentnum });
%
-%my %agent_pkgs = map { ( $_->pkgpart , $all_pkg{$_->pkgpart} ) }
-% qsearch('type_pkgs',{'typenum'=> $agent->typenum });
+%my %agent_pkgs = map { ( $_->pkgpart => $all_pkg{$_->pkgpart} ) }
+% ( qsearch('type_pkgs',{ typenum => $agent->typenum }),
+% qsearch('part_pkg', { agentnum => $cust_main->agentnum }),
+% );
%
%my $count = 0;
%my $pkgparts = 0;
-%
-