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
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
|
<% &ntable("#cccccc") %>
%# tags
<& /elements/tr-select-cust_tag.html,
'custnum' => $custnum,
'cgi' => $cgi,
&>
%# agent
% if ( $cgi->param('lock_agentnum') =~ /^(\d+)$/ && $curuser->agentnum($1) ) {
%
% my $agentnum = $1;
% $cust_main->agentnum($agentnum);
<INPUT TYPE="hidden" NAME="lock_agentnum" VALUE="<% $agentnum %>">
<INPUT TYPE="hidden" NAME="agentnum" VALUE="<% $agentnum %>">
<TR>
<TD ALIGN="right"><% mt('Agent') |h %></TD>
<TD CLASS="fsdisabled"><% $cust_main->agent->agent |h %></TD>
</TR>
% } else {
<& /elements/tr-select-agent.html,
'curr_value' => $cust_main->agentnum,
'label' => "<B>${r}".emt('Agent')."</B>",
'empty_label' => emt('Select agent'),
'disable_empty' => ( $cust_main->agentnum ? 1 : 0 ),
'viewall_right' => emt('None'),
&>
% }
%# agent_custid
% if ( $conf->exists('cust_main-edit_agent_custid') ) {
<TR>
<TD ALIGN="right"><% mt('Customer identifier') |h %></TD>
<TD><INPUT TYPE="text" NAME="agent_custid" VALUE="<% $cust_main->agent_custid %>"></TD>
</TR>
% } else {
<INPUT TYPE="hidden" NAME="agent_custid" VALUE="<% $cust_main->agent_custid %>">
% }
%# class
<& /elements/tr-select-cust_class.html,
'curr_value' => $cust_main->classnum,
'label' => emt("Class"),
&>
%# referral (advertising source)
%my $refnum = $cust_main->refnum || $conf->config('referraldefault') || 0;
%if ( $custnum && ! $conf->exists('editreferrals') ) {
<INPUT TYPE="hidden" NAME="refnum" VALUE="<% $refnum %>">
% } else {
<& /elements/tr-select-part_referral.html,
'curr_value' => $refnum
&>
% }
%# referring customer
%my $referring_cust_main = '';
%if ( $cust_main->referral_custnum
% and $referring_cust_main =
% qsearchs('cust_main', { custnum => $cust_main->referral_custnum } )
% and ! $curuser->access_right('Edit referring customer')
%) {
<TR>
<TD ALIGN="right"><% mt('Referring customer') |h %></TD>
<TD>
<A HREF="<% popurl(1) %>/cust_main.cgi?<% $cust_main->referral_custnum %>"><% $cust_main->referral_custnum %>: <% $referring_cust_main->name %></A>
</TD>
</TR>
<INPUT TYPE="hidden" NAME="referral_custnum" VALUE="<% $cust_main->referral_custnum %>">
% } elsif ( ! $conf->exists('disable_customer_referrals') ) {
<TR>
<TD ALIGN="right"><% mt('Referring customer') |h %></TD>
<TD>
<& /elements/search-cust_main.html,
'field_name' => 'referral_custnum',
'curr_value' => $cust_main->referral_custnum,
&>
</TD>
</TR>
% } else {
<INPUT TYPE="hidden" NAME="referral_custnum" VALUE="">
% }
%# signup date
% if ( $conf->exists('cust_main-edit_signupdate') ) {
<& /elements/tr-input-date-field.html, {
'name' => 'signupdate',
'value' => $cust_main->signupdate,
'label' => emt('Signup date'),
'format' => ( $conf->config('date_format') || "%m/%d/%Y" ),
}
&>
% }
</TABLE>
<%init>
my( $cust_main, %opt ) = @_;
my $custnum = $opt{'custnum'};
my $conf = new FS::Conf;
my $curuser = $FS::CurrentUser::CurrentUser;
my $r = qq!<font color="#ff0000">*</font> !;
</%init>
|
