1 <% include('/elements/header-popup.html', 'Order new package' ) %>
3 <SCRIPT TYPE="text/javascript">
4 function enable_order_pkg () {
5 if ( document.OrderPkgForm.pkgpart.selectedIndex > 0 ) {
6 document.OrderPkgForm.submit.disabled = false;
8 document.OrderPkgForm.submit.disabled = true;
13 <FORM NAME="OrderPkgForm" ACTION="<% $p %>edit/process/quick-cust_pkg.cgi" METHOD="POST">
15 <INPUT TYPE="hidden" NAME="custnum" VALUE="<% $cust_main->custnum %>">
17 <% ntable("#cccccc", 2) %>
19 <TH ALIGN="right">Package</TH>
21 <% include('/elements/select-cust-part_pkg.html',
22 'cust_main' => $cust_main,
23 'onchange' => 'enable_order_pkg',
29 % if ( $conf->exists('pkg_referral') ) {
30 <% include('/elements/tr-select-part_referral.html',
31 'curr_value' => scalar( $cgi->param('refnum') ), #get rid of empty_label first# || $cust_main->refnum,
33 'multiple' => $conf->exists('pkg_referral-multiple'),
41 <INPUT NAME="submit" TYPE="submit" VALUE="Order Package" disabled>
49 unless $FS::CurrentUser::CurrentUser->access_right('Order customer package');
51 my $conf = new FS::Conf;
53 my($query) = $cgi->keywords;
56 my $cust_main = qsearchs({
57 'table' => 'cust_main',
58 'hashref' => { 'custnum' => $custnum },
59 'extra_sql' => ' AND '. $FS::CurrentUser::CurrentUser->agentnums_sql,