From eb4ff7f73c5d4bdf74a3472448b5a195598ff4cd Mon Sep 17 00:00:00 2001 From: ivan Date: Wed, 1 Aug 2007 22:26:52 +0000 Subject: event refactor, landing on HEAD! --- httemplate/misc/order_pkg.html | 67 ++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 67 insertions(+) create mode 100644 httemplate/misc/order_pkg.html (limited to 'httemplate/misc/order_pkg.html') diff --git a/httemplate/misc/order_pkg.html b/httemplate/misc/order_pkg.html new file mode 100644 index 000000000..c81f5b06f --- /dev/null +++ b/httemplate/misc/order_pkg.html @@ -0,0 +1,67 @@ +<% include('/elements/header-popup.html', 'Order new package' ) %> + + + +
+ + + +<% ntable("#cccccc", 2) %> + + Package + + + + + +% 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, +}); + + -- cgit v1.2.1