diff options
Diffstat (limited to 'httemplate/view/cust_main/misc.html')
-rw-r--r-- | httemplate/view/cust_main/misc.html | 93 |
1 files changed, 0 insertions, 93 deletions
diff --git a/httemplate/view/cust_main/misc.html b/httemplate/view/cust_main/misc.html deleted file mode 100644 index f06a4fbd2..000000000 --- a/httemplate/view/cust_main/misc.html +++ /dev/null @@ -1,93 +0,0 @@ -<% - my( $cust_main ) = @_; - my $conf = new FS::Conf; -%> - -<%= ntable("#cccccc") %><TR><TD><%= &ntable("#cccccc",2) %> - -<TR> - <TD ALIGN="right">Customer number</TD> - <TD BGCOLOR="#ffffff"><%= $cust_main->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> -</TR> - -<% - my @agents = qsearch( 'agent', {} ); - my $agent; - unless ( scalar(@agents) == 1 ) { - $agent = qsearchs('agent',{ 'agentnum' => $cust_main->agentnum } ); -%> - -<TR> - <TD ALIGN="right">Agent</TD> - <TD BGCOLOR="#ffffff"><%= $agent->agentnum %>: <%= $agent->agent %></TD> -</TR> - -<% - } else { - $agent = $agents[0]; - } - - if ( $cust_main->agent_custid ) { -%> - -<TR> - <TD ALIGN="right">Agent customer ref#</TD> - <TD BGCOLOR="#ffffff"><%= $cust_main->agent_custid %></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> -</TR> - -<% } %> - -<TR> - <TD ALIGN="right">Referring Customer</TD> - <TD BGCOLOR="#ffffff"> - -<% - my $referring_cust_main = ''; - if ( $cust_main->referral_custnum - && ( $referring_cust_main = - qsearchs('cust_main', { custnum => $cust_main->referral_custnum } ) - ) - ) { -%> - -<A HREF="<%= popurl(1) %>cust_main.cgi?<%= $cust_main->referral_custnum %>"><%=$cust_main->referral_custnum %>: -<%= - ( $referring_cust_main->company - ? $referring_cust_main->company. ' ('. - $referring_cust_main->last. ', '. $referring_cust_main->first. - ')' - : $referring_cust_main->last. ', '. $referring_cust_main->first - ) -%></A> - -<% } %> - - </TD> -</TR> - -<TR> - <TD ALIGN="right">Order taker</TD> - <TD BGCOLOR="#ffffff"><%= $cust_main->otaker %></TD> -</TR> - -</TABLE></TD></TR></TABLE> - |