7e625d26c58f17bb42045fba1867b4e8c4fd3d40
[freeside.git] / httemplate / view / cust_main / misc.html
1 <FONT CLASS="fsinnerbox-title"><% mt('Miscellaneous information') |h %></FONT>
2 <TABLE CLASS="fsinnerbox">
3
4 % my @part_tag = $cust_main->part_tag;
5 % if ( $conf->config('cust_tag-location') =~ /^(cust_misc|)$/ && @part_tag ) {
6 <TR>
7   <TD ALIGN="right"><% mt('Tags') |h %></TD>
8   <TD BGCOLOR="#ffffff">
9 %   foreach my $part_tag ( @part_tag ) {
10       <FONT <% length($part_tag->tagcolor)
11                  ? 'STYLE="background-color:#'.$part_tag->tagcolor.'"'
12                  : '' %>
13       ><% $part_tag->tagname.': '. $part_tag->tagdesc |h %></FONT>
14       <BR>
15 %   }
16   </TD>
17 </TR>
18 % }
19
20 %  if ( $cust_main->agent_custid
21 %       && ! $conf->exists('cust_main-default_agent_custid') ) {
22
23 <TR>
24   <TD ALIGN="right"><% mt('Agent customer ref#') |h %></TD>
25   <TD BGCOLOR="#ffffff"><% $cust_main->agent_custid %></TD>
26 </TR>
27 %
28 %  }
29
30 %  #if ( $cust_main->classnum ) {
31      <TR>
32        <TH ALIGN="right"><% mt('Class') |h %></TH>
33        <TD><% $cust_main->classname || '('.emt('none').')' %></TD>
34      </TR>
35 %  #}
36
37 % if ( $cust_main->salesnum ) {
38     <TR>
39       <TH ALIGN="right"><% mt('Sales Person') |h %></TH>
40       <TD><% $cust_main->salesperson |h %></TD>
41     </TR>
42 % }
43
44 %  unless ( FS::part_referral->num_part_referral == 1 ) {
45 %    my $referral = qsearchs('part_referral', {
46 %      'refnum' => $cust_main->refnum
47 %    } );
48
49 <TR>
50   <TH ALIGN="right"><% mt('Advertising source') |h %></TH>
51   <TD><% $referral->refnum %>: <% $referral->referral%></TD>
52 </TR>
53 % } 
54
55
56 <TR>
57   <TH ALIGN="right"><% mt('Referring Customer') |h %></TH>
58   <TD>
59 %
60 %  my $referring_cust_main = '';
61 %  if ( $cust_main->referral_custnum
62 %       && ( $referring_cust_main =
63 %            qsearchs('cust_main', { custnum => $cust_main->referral_custnum } )
64 %          )
65 %     ) {
66 %
67
68
69 <A HREF="<% popurl(1) %>cust_main.cgi?<% $cust_main->referral_custnum %>"><%$referring_cust_main->display_custnum %>: 
70 <%
71   ( $referring_cust_main->company
72       ? $referring_cust_main->company. ' ('.
73           $referring_cust_main->last. ', '. $referring_cust_main->first.
74           ')'
75       : $referring_cust_main->last. ', '. $referring_cust_main->first
76   )
77 %></A>
78 % } 
79
80
81   </TD>
82 </TR>
83
84 <TR>
85   <TH ALIGN="right"><% mt('Order taker') |h %></TH>
86   <TD><% $cust_main->otaker %></TD>
87 </TR>
88
89   <TR>
90     <TH ALIGN="right"><% mt('Signup Date') |h %></TH>
91     <TD><% $cust_main->signupdate ? time2str($date_format, $cust_main->signupdate) : '' %></TD>
92   </TR>
93
94 % my $id_country = $conf->config('national_id-country');
95 %  if ( $id_country ) {
96 %   if ( $id_country eq 'MY' ) {
97       <TR>
98 %     my($old, $nric) = ( '', '');
99 %     if ( $cust_main->national_id =~ /^\d{6}\-\d{2}\-\d{4}$/ ) {
100           <TH ALIGN="right"><% mt('NRIC') |h %></TH>
101 %     } else { # elsif ( $cust_main->national_id =~ /^\w\d{9}$/ ) {
102           <TH ALIGN="right"><% mt('Old IC/Passport') |h %></TH>
103 %     #} else {
104 %     #  warn "unknown national_id format";
105 %#         <TH ALIGN="right"></TH>
106 %     }
107         <TD><% $cust_main->national_id |h %></TD>
108       </TR>
109 %   } else {
110 %     warn "unknown national_id-country $id_country";
111 %   }
112 % }
113
114 % if ( $conf->exists('cust_main-enable_birthdate') ) {
115 %   my $dt = $cust_main->birthdate ne ''
116 %              ? DateTime->from_epoch( 'epoch'     => $cust_main->birthdate,
117 %                                      'time_zone' =>'floating',
118 %                                    )
119 %              : '';
120
121   <TR>
122     <TH ALIGN="right"><% mt('Date of Birth') |h %></TH>
123     <TD><% $dt ? $dt->strftime($date_format) : '' %></TD>
124   </TR>
125
126 %   if ( $conf->exists('cust_main-enable_spouse') 
127 %        and $cust_main->spouse_birthdate ) {
128 %     my $dt = DateTime->from_epoch(
129 %                   'epoch'  => $cust_main->spouse_birthdate,
130 %                   'time_zone' =>'floating'
131 %              );
132
133   <TR>
134     <TH ALIGN="right"><% mt('Spouse Date of Birth') |h %></TH>
135     <TD><% $dt ? $dt->strftime($date_format) : '' %></TD>
136   </TR>
137
138 %   }
139 % } # enable_birthdate
140
141 % if ( $conf->exists('cust_main-enable_anniversary_date') ) {
142 %   my $dt = $cust_main->anniversary_date ne ''
143 %              ? DateTime->from_epoch( 'epoch'  => $cust_main->anniversary_date,
144 %                                      'time_zone' =>'floating',
145 %                                    )
146 %              : '';
147
148   <TR>
149     <TH ALIGN="right"><% mt('Anniversary Date') |h %></TH>
150     <TD><% $dt ? $dt->strftime($date_format) : '' %></TD>
151   </TR>
152
153 % }
154
155 % if ( $cust_main->district ) {
156
157   <TR>
158     <TH ALIGN="right"><% mt('Tax district') |h %></TH>
159     <TD><% $cust_main->ship_location->district %></TD>
160   </TR>
161
162 % }
163
164
165 % if ( $conf->exists('ticket_system-selfservice_edit_subject') ) {
166
167   <TR>
168     <TH ALIGN="right"><% mt('Edit ticket subjects') %></TH>
169     <TD><% $cust_main->edit_subject ? 'yes' : 'no' %></TD>
170   </TR>
171
172 % }
173
174 % foreach (sort { $a cmp $b } $cust_main->virtual_fields) {
175     <% $cust_main->pvf($_)->widget('HTML', 'view', $cust_main->getfield($_)) %>
176 % }
177
178 </TABLE>
179 <%init>
180
181 my( $cust_main ) = @_;
182 my $conf = new FS::Conf;
183 my $date_format = ($conf->config('date_format') || "%m/%d/%Y");
184
185 my $curuser = $FS::CurrentUser::CurrentUser;
186
187 my @agentnums = $curuser->agentnums;
188
189 my $status_label = $cust_main->status_label;
190 if ($cust_main->is_status_delay_cancel) {
191   $status_label .= ' (Cancelled)';
192 }
193
194 </%init>