<% include('/elements/header-popup.html', 'Order new package' ) %>

<% ntable("#cccccc", 2) %> Package Select package %foreach my $part_pkg ( % qsearch( 'part_pkg', { 'disabled' => '' }, '', % ' AND 0 < ( SELECT COUNT(*) FROM type_pkgs '. % ' WHERE typenum = '. $cust_main->agent->typenum. % ' AND type_pkgs.pkgpart = part_pkg.pkgpart )' % ) %) { <% $part_pkg->pkg %> - <% $part_pkg->comment %> % } % if ( $conf->exists('pkg_referral') ) { <% include('/elements/tr-select-part_referral.html', 'curr_value' => scalar( $cgi->param('refnum') ), #get rid of empty_label first# || $cust_main->refnum, 'disable_empty' => 1, 'multiple' => $conf->exists('pkg_referral-multiple'), ) %> % }

<%init> my $conf = new FS::Conf; my($query) = $cgi->keywords; $query =~ /^(\d+)$/; my $custnum = $1; my $cust_main = qsearchs({ 'table' => 'cust_main', 'hashref' => { 'custnum' => $custnum }, 'extra_sql' => ' AND '. $FS::CurrentUser::CurrentUser->agentnums_sql, });