httemplate/misc/order_pkg.html

   1 <% include('/elements/header-popup.html', 'Order new package' ) %>
   2
   3 <SCRIPT TYPE="text/javascript">
   4 function enable_order_pkg () {
   5   if ( document.OrderPkgForm.pkgpart.selectedIndex > 0 ) {
   6     document.OrderPkgForm.submit.disabled = false;
   7   } else {
   8     document.OrderPkgForm.submit.disabled = true;
   9   }
  10 }
  11 </SCRIPT>
  12
  13 <FORM NAME="OrderPkgForm" ACTION="<% $p %>edit/process/quick-cust_pkg.cgi" METHOD="POST">
  14
  15 <INPUT TYPE="hidden" NAME="custnum" VALUE="<% $cust_main->custnum %>">
  16
  17 <% ntable("#cccccc", 2) %>
  18 <TR>
  19   <TH ALIGN="right">Package</TH>
  20   <TD>
  21     <SELECT NAME="pkgpart" onChange="enable_order_pkg()"><OPTION>Select package
  22
  23 %foreach my $part_pkg (
  24 %  qsearch( 'part_pkg', { 'disabled' => '' }, '',
  25 %           ' AND 0 < ( SELECT COUNT(*) FROM type_pkgs '.
  26 %           '             WHERE typenum = '. $cust_main->agent->typenum.
  27 %           '             AND type_pkgs.pkgpart = part_pkg.pkgpart )'
  28 %         )
  29 %) {
  30
  31       <OPTION VALUE="<% $part_pkg->pkgpart %>"><% $part_pkg->pkg %> - <% $part_pkg->comment %>
  32
  33 % }
  34
  35     </SELECT>
  36   </TD>
  37 </TR>
  38
  39 % if ( $conf->exists('pkg_referral') ) {
  40   <% include('/elements/tr-select-part_referral.html',
  41                'curr_value'    => scalar( $cgi->param('refnum') ), #get rid of empty_label first# || $cust_main->refnum,
  42                'disable_empty' => 1,
  43                'multiple'      => $conf->exists('pkg_referral-multiple'),
  44             )
  45   %>
  46 % }
  47
  48 </TABLE>
  49
  50 <BR>
  51 <INPUT NAME="submit" TYPE="submit" VALUE="Order Package" disabled>
  52
  53 </FORM>
  54 <%init>
  55
  56 my $conf = new FS::Conf;
  57
  58 my($query) = $cgi->keywords;
  59 $query =~ /^(\d+)$/;
  60 my $custnum = $1;
  61 my $cust_main = qsearchs({
  62   'table'     => 'cust_main',
  63   'hashref'   => { 'custnum' => $custnum },
  64   'extra_sql' => ' AND '. $FS::CurrentUser::CurrentUser->agentnums_sql,
  65 });
  66
  67 </%init>