default to a session cookie instead of setting an explicit timeout, weird timezone...
[freeside.git] / fs_selfservice / FS-SelfService / cgi / small_custview.html
1 <DIV ID="fs_small_custview">
2   
3 Customer #<B><%= $display_custnum %></B>
4  - <B><FONT COLOR="#<%= $statuscolor %>"><%= $status_label %></FONT></B>
5
6 <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=2 BGCOLOR="<%= $box_bgcolor ||= '#c0c0c0' %>">
7   <TR>
8     <TD VALIGN="top">
9       <%= $has_ship_address
10             ? '<I><FONT SIZE="-1">Billing Address</FONT></I><BR>'
11             : ''
12       %>
13       <%= encode_entities($first) %> <%= encode_entities($last) %><BR>
14       <%= $company ? encode_entities($company).'<BR>' : '' %>
15       <%= encode_entities($address1) %><BR>
16       <%= $address2 ? encode_entities($address2).'<BR>' : '' %>
17       <%= $city %>, <%= $state %> <%= $zip %><BR>
18       <%= $country && $country ne ($countrydefault||'US')
19             ? $country.'<BR>'
20             : ''
21       %>
22       <%= if ( $daytime && $night ) {
23             $OUT .= "<BR>Day Phone $daytime<BR>Night Phone $night";
24           } elsif ( $daytime || $night ) {
25             $OUT .= '<BR>'. ($daytime || $night);
26           }
27           '';
28       %>
29       <%= $fax ? "<BR>Fax $fax" : '' %>
30
31     </TD>
32
33 <%= if ( $has_ship_address ) {
34
35   $OUT .= '<TD>&nbsp;</TD>'.
36           '<TD VALIGN="top">'.
37           '<I><FONT SIZE="-1">Service Address</FONT></I><BR>'.
38           "$ship_first $ship_last<BR>";
39   $OUT .= "$ship_company<BR>" if $ship_company;
40   $OUT .= "$ship_address1<BR>";
41   $OUT .= "$ship_address2<BR>" if $ship_address2;
42   $OUT .= "$ship_city, $ship_state  $ship_zip<BR>";
43   $OUT .= "$ship_country<BR>"
44     if $ship_country && $ship_country ne ($countrydefault||'US');
45
46
47   if ( $ship_daytime && $ship_night ) {
48     $OUT .= "<BR>Day Phone $ship_daytime<BR>Night Phone $ship_night";
49   } elsif ( $ship_daytime || $ship_night ) {
50     $OUT .= '<BR'. ($ship_daytime || $ship_night);
51   }
52
53   $OUT .= "<BR>Fax $ship_fax" if $ship_fax;
54
55   $OUT .= '</TD>';
56 }
57 '';
58 %>
59
60 </TR></TABLE>
61
62 <%= 
63 unless ( $access_pkgnum ) {
64   if ($balance >= 0) {
65     $OUT .= '<BR>Balance: <B>'. $balance_pretty . '</B><BR>';
66   } else {
67     my $credit_balance_pretty = $balance_pretty;
68     $credit_balance_pretty =~ s/-//;
69     $OUT .= '<BR>Credit Balance: <B>'. $credit_balance_pretty . '</B><BR>';
70   }
71 }
72 '';
73 %>
74
75 </DIV>
76