1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
|
<%doc>
Examples:
<& /elements/header-cust_main.html,
view => 'Basics', #required
cust_main => $cust_main, # cust_main or custnum is required
custnum => $custnum, #
&>
</%doc>
<& /elements/header.html, {
'title' => $title,
'title_noescape' => $title_noescape,
'head' => $head,
'nobr' => 1,
}
&>
% my @part_tag = $cust_main->part_tag;
% if ( $conf->config('cust_tag-location') eq 'top' && @part_tag ) {
<TABLE STYLE="margin-bottom:8px" CELLSPACING=2>
% foreach my $part_tag ( @part_tag ) {
<TR>
<TD>
<FONT SIZE="+1"
<% length($part_tag->tagcolor)
? 'STYLE="background-color:#'.$part_tag->tagcolor.'"'
: ''
%>><% $part_tag->tagname.': '. $part_tag->tagdesc |h %></FONT>
</TD>
</TR>
% }
</TABLE>
% }
<& /view/cust_main/menu.html, cust_main => $cust_main, show => $opt{'view'} &>
<BR>
<DIV CLASS="fstabcontainer">
<& /elements/init_overlib.html &>
<SCRIPT TYPE="text/javascript">
function areyousure(href, message) {
if (confirm(message) == true)
window.location.href = href;
}
function areyousure_popup(message, action, actionlabel) {
if (confirm(message) == true) {
<% include('/elements/popup_link_onclick.html',
'js_action' => 'action',
'js_actionlabel' => 'actionlabel',
) %>
}
}
</SCRIPT>
<br>
<%init>
my $curuser = $FS::CurrentUser::CurrentUser;
my $conf = new FS::Conf;
my %opt = @_;
my $cust_main = $opt{'cust_main'} || qsearchs( {
'table' => 'cust_main',
'hashref' => { 'custnum' => $opt{'custnum'} },
'extra_sql' => ' AND '. $curuser->agentnums_sql,
});
die "Customer not found!" unless $cust_main;
my $title = mt("Customer").' #'. $cust_main->display_custnum. ': ';
my $title_noescape = $title. encode_entities($cust_main->name);
$title .= $cust_main->name;
if ( $curuser->num_agents ) {
$title_noescape =
encode_entities($cust_main->agent->agent). " $title_noescape";
$title = $cust_main->agent->agent. " $title";
}
my $status = $cust_main->status_label;
$status .= ' (Cancelled)' if $cust_main->is_status_delay_cancel;
$title_noescape .= ' (<B><FONT COLOR="#'. $cust_main->statuscolor. '">'. $status. '</FONT></B>)';
$title .= " ($status)";
my $ie_compat = $conf->config('ie-compatibility_mode');
my $head = '';
if ( $ie_compat ) {
$head = qq(<meta http-equiv="X-UA-Compatible" content="IE=$ie_compat" />);
}
</%init>
|