1 <SCRIPT TYPE="text/javascript">
2 function enable_order_pkg () {
3 if ( document.OrderPkgForm.pkgpart.selectedIndex > 0 ) {
4 document.OrderPkgForm.submit.disabled = false;
6 document.OrderPkgForm.submit.disabled = true;
10 <FONT SIZE=4>Purchase additional package</FONT><BR><BR>
12 $OUT .= qq!<FONT SIZE="+1" COLOR="#ff0000">$error</FONT><BR><BR>!;
14 <FORM NAME="OrderPkgForm" ACTION="<%= $selfurl %>" METHOD=POST>
15 <INPUT TYPE="hidden" NAME="session" VALUE="<%= $session_id %>">
16 <INPUT TYPE="hidden" NAME="action" VALUE="process_order_pkg">
17 <INPUT TYPE="hidden" NAME="custnum" VALUE="<%= $custnum %>">
18 <TABLE BGCOLOR="#cccccc" BORDER=0 CELLSPACING=0>
20 <TD COLSPAN=2><SELECT NAME="pkgpart" onChange="enable_order_pkg()">
24 foreach my $part_pkg ( @part_pkg ) {
25 $OUT .= '<OPTION VALUE="'. $part_pkg->{'pkgpart'}. '"';
26 $OUT .= ' SELECTED' if $pkgpart && $part_pkg->{'pkgpart'} == $pkgpart;
27 $OUT .= '>'. $part_pkg->{'pkg'};
34 <TD ALIGN="right">Username</TD>
35 <TD><INPUT TYPE="text" NAME="username" VALUE="<%= $username %>"></TD>
38 <TD ALIGN="right">Password</TD>
39 <TD><INPUT TYPE="password" NAME="_password" VALUE="<%= $_password %>"></TD>
42 <TD ALIGN="right">Re-enter Password</TD>
43 <TD><INPUT TYPE="password" NAME="_password2" VALUE="<%= $_password2 %>"></TD>
46 if ( $security_phrase ) {
49 <TD ALIGN="right">Security Phrase</TD>
50 <TD><INPUT TYPE="text" NAME="sec_phrase" VALUE="$sec_phrase">
55 $OUT .= '<INPUT TYPE="hidden" NAME="sec_phrase" VALUE="">';
59 if ( @svc_acct_pop ) {
60 $OUT .= '<TR><TD ALIGN="right">Access number</TD><TD>'.
61 popselector( 'popnum' => $popnum,
62 'pops' => \@svc_acct_pop,
63 'init_popstate' => $init_popstate,
65 'acstate' => $acstate,
69 $OUT .= popselector(popnum=>$popnum, pops=>\@svc_acct_pop);
73 <INPUT NAME="submit" TYPE="submit" VALUE="Purchase" disabled>