-<% ntable("#cccccc") %><TR><TD><% &ntable("#cccccc",2) %>
+<FONT CLASS="fsinnerbox-title"><% mt('Miscellaneous information') |h %></FONT>
+<TABLE CLASS="fsinnerbox">
+% my @part_tag = $cust_main->part_tag;
+% if ( $conf->config('cust_tag-location') =~ /^(cust_misc|)$/ && @part_tag ) {
<TR>
- <TD ALIGN="right">Customer number</TD>
- <TD BGCOLOR="#ffffff"><% $cust_main->display_custnum %></TD>
-</TR>
-
-<TR>
- <TD ALIGN="right">Status</TD>
- <TD BGCOLOR="#ffffff"><FONT COLOR="#<% $cust_main->statuscolor %>"><B><% ucfirst($cust_main->status) %></B></FONT></TD>
+ <TH ALIGN="right"><% mt('Tags') |h %></TH>
+ <TD BGCOLOR="#ffffff">
+% foreach my $part_tag ( @part_tag ) {
+ <FONT <% length($part_tag->tagcolor)
+ ? 'STYLE="background-color:#'.$part_tag->tagcolor.'"'
+ : '' %>
+ ><% $part_tag->tagname.': '. $part_tag->tagdesc |h %></FONT>
+ <BR>
+% }
+ </TD>
</TR>
-
-%my $agent;
-%if ( $num_agents == 1 ) {
-% my @agents = qsearchs( 'agent', {} );
-% $agent = $agents[0];
-%} else {
-% $agent = qsearchs('agent',{ 'agentnum' => $cust_main->agentnum } );
- <TR>
- <TD ALIGN="right">Agent</TD>
- <TD BGCOLOR="#ffffff"><% $agent->agentnum %>: <% $agent->agent %></TD>
- </TR>
% }
% if ( $cust_main->agent_custid
% && ! $conf->exists('cust_main-default_agent_custid') ) {
<TR>
- <TD ALIGN="right">Agent customer ref#</TD>
+ <TH ALIGN="right"><% mt('Agent customer ref#') |h %></TH>
<TD BGCOLOR="#ffffff"><% $cust_main->agent_custid %></TD>
</TR>
%
% #if ( $cust_main->classnum ) {
<TR>
- <TD ALIGN="right">Class</TD>
- <TD BGCOLOR="#ffffff"><% $cust_main->classname || '(none)' %></TD>
+ <TH ALIGN="right"><% mt('Class') |h %></TH>
+ <TD><% $cust_main->classname || '('.emt('none').')' %></TD>
</TR>
% #}
+% if ( $cust_main->salesnum ) {
+ <TR>
+ <TH ALIGN="right"><% mt('Sales Person') |h %></TH>
+ <TD><% $cust_main->salesperson |h %></TD>
+ </TR>
+% }
+
% unless ( FS::part_referral->num_part_referral == 1 ) {
% my $referral = qsearchs('part_referral', {
% 'refnum' => $cust_main->refnum
% } );
<TR>
- <TD ALIGN="right">Advertising source</TD>
- <TD BGCOLOR="#ffffff"><% $referral->refnum %>: <% $referral->referral%></TD>
+ <TH ALIGN="right"><% mt('Advertising source') |h %></TH>
+ <TD><% $referral->refnum %>: <% $referral->referral%></TD>
</TR>
% }
<TR>
- <TD ALIGN="right">Referring Customer</TD>
- <TD BGCOLOR="#ffffff">
+ <TH ALIGN="right"><% mt('Referring Customer') |h %></TH>
+ <TD>
%
% my $referring_cust_main = '';
% if ( $cust_main->referral_custnum
%
-<A HREF="<% popurl(1) %>cust_main.cgi?<% $cust_main->referral_custnum %>"><%$cust_main->referral_custnum %>:
+<A HREF="<% popurl(1) %>cust_main.cgi?<% $cust_main->referral_custnum %>"><%$referring_cust_main->display_custnum %>:
<%
( $referring_cust_main->company
? $referring_cust_main->company. ' ('.
</TR>
<TR>
- <TD ALIGN="right">Order taker</TD>
- <TD BGCOLOR="#ffffff"><% $cust_main->otaker %></TD>
+ <TH ALIGN="right"><% mt('Order taker') |h %></TH>
+ <TD><% $cust_main->otaker %></TD>
</TR>
<TR>
- <TD ALIGN="right">Signup Date</TD>
- <TD BGCOLOR="#ffffff"><% $cust_main->signupdate ? time2str($date_format, $cust_main->signupdate) : '' %></TD>
+ <TH ALIGN="right"><% mt('Signup Date') |h %></TH>
+ <TD><% $cust_main->signupdate ? time2str($date_format, $cust_main->signupdate) : '' %></TD>
</TR>
+% my $id_country = $conf->config('national_id-country');
+% if ( $id_country ) {
+% if ( $id_country eq 'MY' ) {
+ <TR>
+% my($old, $nric) = ( '', '');
+% if ( $cust_main->national_id =~ /^\d{6}\-\d{2}\-\d{4}$/ ) {
+ <TH ALIGN="right"><% mt('NRIC') |h %></TH>
+% } else { # elsif ( $cust_main->national_id =~ /^\w\d{9}$/ ) {
+ <TH ALIGN="right"><% mt('Old IC/Passport') |h %></TH>
+% #} else {
+% # warn "unknown national_id format";
+%# <TH ALIGN="right"></TH>
+% }
+ <TD><% $cust_main->national_id |h %></TD>
+ </TR>
+% } else {
+% warn "unknown national_id-country $id_country";
+% }
+% }
+
% if ( $conf->exists('cust_main-enable_birthdate') ) {
% my $dt = $cust_main->birthdate ne ''
% ? DateTime->from_epoch( 'epoch' => $cust_main->birthdate,
% : '';
<TR>
- <TD ALIGN="right">Date of Birth</TD>
- <TD BGCOLOR="#ffffff"><% $dt ? $dt->strftime($date_format) : '' %></TD>
+ <TH ALIGN="right"><% mt('Date of Birth') |h %></TH>
+ <TD><% $dt ? $dt->strftime($date_format) : '' %></TD>
+ </TR>
+
+% if ( $conf->exists('cust_main-enable_spouse')
+% and $cust_main->spouse_birthdate ) {
+% my $dt = DateTime->from_epoch(
+% 'epoch' => $cust_main->spouse_birthdate,
+% 'time_zone' =>'floating'
+% );
+
+ <TR>
+ <TH ALIGN="right"><% mt('Spouse Date of Birth') |h %></TH>
+ <TD><% $dt ? $dt->strftime($date_format) : '' %></TD>
+ </TR>
+
+% }
+% } # enable_birthdate
+
+% if ( $conf->exists('cust_main-enable_anniversary_date') ) {
+% my $dt = $cust_main->anniversary_date ne ''
+% ? DateTime->from_epoch( 'epoch' => $cust_main->anniversary_date,
+% 'time_zone' =>'floating',
+% )
+% : '';
+
+ <TR>
+ <TH ALIGN="right"><% mt('Anniversary Date') |h %></TH>
+ <TD><% $dt ? $dt->strftime($date_format) : '' %></TD>
</TR>
% }
-% if ( $conf->exists('cust_main-require_censustract') ) {
+% if ( $cust_main->district ) {
<TR>
- <TD ALIGN="right">Census tract</TD>
- <TD BGCOLOR="#ffffff"><% $cust_main->censustract %></TD>
+ <TH ALIGN="right"><% mt('Tax district') |h %></TH>
+ <TD><% $cust_main->ship_location->district %></TD>
</TR>
% }
-</TABLE></TD></TR></TABLE>
+
+% if ( $conf->exists('ticket_system-selfservice_edit_subject') ) {
+
+ <TR>
+ <TH ALIGN="right"><% emt('Edit ticket subjects') %></TH>
+ <TD><% $cust_main->edit_subject ? 'yes' : 'no' %></TD>
+ </TR>
+
+% }
+
+% foreach (sort { $a cmp $b } $cust_main->virtual_fields) {
+ <% $cust_main->pvf($_)->widget('HTML', 'view', $cust_main->getfield($_)) %>
+% }
+
+</TABLE>
<%init>
my( $cust_main ) = @_;
my $conf = new FS::Conf;
my $date_format = ($conf->config('date_format') || "%m/%d/%Y");
-my $sth = dbh->prepare('SELECT COUNT(*) FROM agent') or die dbh->errstr;
-$sth->execute or die $sth->errstr;
-my $num_agents = $sth->fetchrow_arrayref->[0];
+my $curuser = $FS::CurrentUser::CurrentUser;
+
+my @agentnums = $curuser->agentnums;
+
+my $status_label = $cust_main->status_label;
+if ($cust_main->is_status_delay_cancel) {
+ $status_label .= ' (Cancelled)';
+}
</%init>