diff options
Diffstat (limited to 'httemplate/misc/order_pkg.html')
-rw-r--r-- | httemplate/misc/order_pkg.html | 62 |
1 files changed, 62 insertions, 0 deletions
diff --git a/httemplate/misc/order_pkg.html b/httemplate/misc/order_pkg.html new file mode 100644 index 000000000..05cd99cc5 --- /dev/null +++ b/httemplate/misc/order_pkg.html @@ -0,0 +1,62 @@ +<% include('/elements/header-popup.html', 'Order new package' ) %> + +<SCRIPT TYPE="text/javascript"> +function enable_order_pkg () { + if ( document.OrderPkgForm.pkgpart.selectedIndex > 0 ) { + document.OrderPkgForm.submit.disabled = false; + } else { + document.OrderPkgForm.submit.disabled = true; + } +} +</SCRIPT> + +<FORM NAME="OrderPkgForm" ACTION="<% $p %>edit/process/quick-cust_pkg.cgi" METHOD="POST"> + +<INPUT TYPE="hidden" NAME="custnum" VALUE="<% $cust_main->custnum %>"> + +<% ntable("#cccccc", 2) %> +<TR> + <TH ALIGN="right">Package</TH> + <TD> + <% include('/elements/select-cust-part_pkg.html', + 'cust_main' => $cust_main, + 'onchange' => 'enable_order_pkg', + ) + %> + </TD> +</TR> + +% 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'), + ) + %> +% } + +</TABLE> + +<BR> +<INPUT NAME="submit" TYPE="submit" VALUE="Order Package" disabled> + +</FORM> +</BODY> +</HTML> +<%init> + +die "access denied" + unless $FS::CurrentUser::CurrentUser->access_right('Order customer package'); + +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, +}); + +</%init> |