agent interface
[freeside.git] / fs_selfservice / FS-SelfService / cgi / view_customer.html
1 <HTML><HEAD><TITLE>View Customer</TITLE></HEAD>
2 <BODY BGCOLOR="#eeeeee"><FONT SIZE=5>View Customer</FONT><BR><BR>
3 <%= $url = "$selfurl?session=$session_id;action="; ''; %>
4 <TABLE BORDER=0 CELLPADDING=4><TR><TD VALIGN="top" HEIGHT=384 BGCOLOR="#dddddd">
5 <A HREF="<%= $url %>agent_main">Reseller Main</A><BR>
6 <!-- <A HREF="<%= $url %>other">SomethingElse</A><BR> -->
7 </TD><TD VALIGN="top">
8
9 <%= $message
10       ? "<FONT SIZE=\"+2\"><B>$message</B></FONT><BR><BR>"
11       : ''
12 %>
13
14 <%= $small_custview %>
15
16 <BR>Purchase additional package
17 <FORM ACTION="<%= $selfurl %>" METHOD=POST>
18 <INPUT TYPE="hidden" NAME="session" VALUE="<%= $session_id %>">
19 <INPUT TYPE="hidden" NAME="action" VALUE="process_order_pkg">
20 <INPUT TYPE="hidden" NAME="custnum" VALUE="<%= $custnum %>">
21 <TABLE BGCOLOR="#cccccc" BORDER=0 CELLSPACING=0>
22 <TR>
23   <TD COLSPAN=2><SELECT NAME="pkgpart"><OPTION VALUE="">
24
25   <%=
26     foreach my $part_pkg ( @part_pkg ) {
27       $OUT .= '<OPTION VALUE="'. $part_pkg->{'pkgpart'}. '"';
28       $OUT .= ' SELECTED' if $pkgpart && $part_pkg->{'pkgpart'} == $pkgpart;
29       $OUT .= '>'. $part_pkg->{'pkg'};
30     }
31   %>
32
33   </SELECT></TD>
34 </TR>
35 <TR>
36   <TD ALIGN="right">Username</TD>
37   <TD><INPUT TYPE="text" NAME="username" VALUE="<%= $username %>"></TD>
38 </TR>
39 <TR>
40   <TD ALIGN="right">Password</TD>
41   <TD><INPUT TYPE="password" NAME="_password" VALUE="<%= $_password %>"></TD>
42 </TR>
43 <TR>
44   <TD ALIGN="right">Re-enter Password</TD>
45   <TD><INPUT TYPE="password" NAME="_password2" VALUE="<%= $_password2 %>"></TD>
46 </TR>
47 <%=
48   if ( $security_phrase ) {
49     $OUT .= <<ENDOUT;
50 <TR>
51   <TD ALIGN="right">Security Phrase</TD>
52   <TD><INPUT TYPE="text" NAME="sec_phrase" VALUE="$sec_phrase">
53   </TD>
54 </TR>
55 ENDOUT
56   } else {
57     $OUT .= '<INPUT TYPE="hidden" NAME="sec_phrase" VALUE="">';
58   }
59 %>
60 <%=
61   if ( @svc_acct_pop ) {
62     $OUT .= '<TR><TD ALIGN="right">Access number</TD><TD>'.
63             popselector( 'popnum'        => $popnum,
64                          'pops'          => \@svc_acct_pop,
65                          'init_popstate' => $init_popstate,
66                          'popac'         => $popac,
67                          'acstate'       => $acstate,
68                        ).
69             '</TD></TR>';
70   } else {
71     $OUT .= popselector(popnum=>$popnum, pops=>\@svc_acct_pop);
72   }
73 %>
74 </TABLE>
75 <INPUT TYPE="submit" VALUE="Purchase">
76 </FORM>
77
78 </TD></TR></TABLE>
79 <HR>
80 <FONT SIZE="-2">powered by <a href="http://www.sisd.com/freeside">freeside</a></FONT>
81 </BODY></HTML>
82
83
84