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

<% ntable("#cccccc", 2) %> Package <% include('/elements/select-cust-part_pkg.html', 'curr_value' => $pkgpart, 'cust_main' => $cust_main, 'onchange' => 'enable_order_pkg', ) %> % 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> die "access denied" unless $FS::CurrentUser::CurrentUser->access_right('Order customer package'); my $conf = new FS::Conf; $cgi->param('custnum') =~ /^(\d+)$/; my $custnum = $1; my $cust_main = qsearchs({ 'table' => 'cust_main', 'hashref' => { 'custnum' => $custnum }, 'extra_sql' => ' AND '. $FS::CurrentUser::CurrentUser->agentnums_sql, }); my $pkgpart = scalar($cgi->param('pkgpart'));