1 % if ( scalar(@{ $opt{'discount'} }) == 0
2 % && ! $curuser->access_right('Custom discount customer package') ) {
4 <INPUT TYPE="hidden" NAME="<% $name %>" VALUE="<% $discountnum %>">
9 <TD ALIGN="right" WIDTH="176"><% $opt{'label'} || '<B>Discount</B>' %></TD>
11 <% include( '/elements/select-discount.html',
12 'curr_value' => $discountnum,
13 'onchange' => $onchange,
20 % # a weird kind of false laziness w/edit/discount.html
22 % # <INPUT TYPE="hidden" NAME="<% $name %>_disabled" VALUE="Y">
25 <% include( '/elements/tr-select.html',
26 'label' => '<B>Discount Type</B>',
27 'field' => $name. '__type',
28 'id' => $name. '__type',
29 'options' => \@_type_options,
30 'curr_value' => scalar($cgi->param($name.'__type')),
31 'onchange' => $name.'__type_changed',
32 'colspan' => $opt{'colspan'},
36 <% include( '/elements/tr-input-money.html',
37 'label' => '<B>Discount Amount </B>',
38 'field' => $name. '_amount',
39 'id' => $name. '_amount',
41 'curr_value' => scalar($cgi->param($name.'_amount')),
42 'colspan' => $opt{'colspan'},
46 <% include( '/elements/tr-input-percentage.html',
47 'label' => '<B>Discount Percentage</B>',
48 'field' => $name. '_percent',
49 'id' => $name. '_percent',
51 'curr_value' => scalar($cgi->param($name.'_percent')),
52 'colspan' => $opt{'colspan'},
56 <% include( '/elements/tr-input-text.html',
57 'label' => '<B>Discount duration (months)</B>',
58 'field' => $name. '_months',
59 'id' => $name. '_months',
61 'postfix' => qq(<FONT SIZE="-1" ID="${name}_months_postfix"><I>(blank for non-expiring discount)</I></FONT>),
62 'curr_value' => scalar($cgi->param($name.'_months')),
63 'colspan' => $opt{'colspan'},
67 <% include( '/elements/tr-checkbox.html',
68 'label' => '<B>Apply discount to setup fee</B>',
69 'field' => $name.'_setup',
70 'id' => $name.'_setup',
71 'curr_value' => scalar($cgi->param($name.'_setup')),
73 'colspan' => $opt{'colspan'},
77 <SCRIPT TYPE="text/javascript">
79 % my $ge = 'document.getElementById';
81 function <% $name %>_changed(what) {
82 var <% $name %> = what.options[what.selectedIndex].value;
84 if ( <% $name %> == '-1' ) {
85 <% $ge %>('<% $name %>__type_label0').style.display = '';
86 <% $ge %>('<% $name %>__type_label0').style.visibility = '';
87 <% $ge %>('<% $name %>__type').style.display = '';
88 <% $ge %>('<% $name %>__type').style.visibility = '';
89 % #XXX retrieve previous visibility for amount, percent :/
90 <% $ge %>('<% $name %>_months_label0').style.display = '';
91 <% $ge %>('<% $name %>_months_label0').style.visibility = '';
92 <% $ge %>('<% $name %>_months').style.display = '';
93 <% $ge %>('<% $name %>_months').style.visibility = '';
94 <% $ge %>('<% $name %>_months_postfix').style.display = '';
95 <% $ge %>('<% $name %>_months_postfix').style.visibility = '';
96 <% $ge %>('<% $name %>_setup_label0').style.display = '';
97 <% $ge %>('<% $name %>_setup_label0').style.visibility = '';
98 <% $ge %>('<% $name %>_setup').style.display = '';
99 <% $ge %>('<% $name %>_setup').style.visibility = '';
102 <% $ge %>('<% $name %>__type_label0').style.display = 'none';
103 <% $ge %>('<% $name %>__type_label0').style.visibility = 'hidden';
104 <% $ge %>('<% $name %>__type').style.display = 'none';
105 <% $ge %>('<% $name %>__type').style.visibility = 'hidden';
107 % #XXX save visibility settings for amount, percent :/
108 <% $ge %>('<% $name %>_amount_label0').style.display = 'none';
109 <% $ge %>('<% $name %>_amount_label0').style.visibility = 'hidden';
110 <% $ge %>('<% $name %>_amount_input0').style.display = 'none';
111 <% $ge %>('<% $name %>_amount_input0').style.visibility = 'hidden';
112 <% $ge %>('<% $name %>_amount_input0').style.display = 'none';
113 <% $ge %>('<% $name %>_amount_input0').style.visibility = 'hidden';
114 <% $ge %>('<% $name %>_percent_label0').style.display = 'none';
115 <% $ge %>('<% $name %>_percent_label0').style.visibility = 'hidden';
116 <% $ge %>('<% $name %>_percent_input0').style.display = 'none';
117 <% $ge %>('<% $name %>_percent_input0').style.visibility = 'hidden';
118 <% $ge %>('<% $name %>_percent_input0').style.display = 'none';
119 <% $ge %>('<% $name %>_percent_input0').style.visibility = 'hidden';
121 <% $ge %>('<% $name %>_months_label0').style.display = 'none';
122 <% $ge %>('<% $name %>_months_label0').style.visibility = 'hidden';
123 <% $ge %>('<% $name %>_months').style.display = 'none';
124 <% $ge %>('<% $name %>_months').style.visibility = 'hidden';
125 <% $ge %>('<% $name %>_months_postfix').style.display = 'none';
126 <% $ge %>('<% $name %>_months_postfix').style.visibility = 'hidden';
128 <% $ge %>('<% $name %>_setup_label0').style.display = 'none';
129 <% $ge %>('<% $name %>_setup_label0').style.visibility = 'hidden';
130 <% $ge %>('<% $name %>_setup').style.display = 'none';
131 <% $ge %>('<% $name %>_setup').style.visibility = 'hidden';
137 function <% $name %>__type_changed(what) {
138 var <% $name %>__type = what.options[what.selectedIndex].value;
140 if ( <% $name %>__type == '<% $select %>' ) {
141 <% $ge %>('<% $name %>_amount_label0').style.display = 'none';
142 <% $ge %>('<% $name %>_amount_label0').style.visibility = 'hidden';
143 <% $ge %>('<% $name %>_amount').style.display = 'none';
144 <% $ge %>('<% $name %>_amount').style.visibility = 'hidden';
145 <% $ge %>('<% $name %>_percent_label0').style.display = 'none';
146 <% $ge %>('<% $name %>_percent_label0').style.visibility = 'hidden';
147 <% $ge %>('<% $name %>_percent').style.display = 'none';
148 <% $ge %>('<% $name %>_percent').style.visibility = 'hidden';
149 } else if ( <% $name %>__type == 'Amount' ) {
150 <% $ge %>('<% $name %>_amount_label0').style.display = '';
151 <% $ge %>('<% $name %>_amount_label0').style.visibility = '';
152 <% $ge %>('<% $name %>_amount_input0').style.display = '';
153 <% $ge %>('<% $name %>_amount_input0').style.visibility = '';
154 <% $ge %>('<% $name %>_percent_label0').style.display = 'none';
155 <% $ge %>('<% $name %>_percent_label0').style.visibility = 'hidden';
156 <% $ge %>('<% $name %>_percent_input0').style.display = 'none';
157 <% $ge %>('<% $name %>_percent_input0').style.visibility = 'hidden';
158 } else if ( <% $name %>__type == 'Percentage' ) {
159 <% $ge %>('<% $name %>_amount_label0').style.display = 'none';
160 <% $ge %>('<% $name %>_amount_label0').style.visibility = 'hidden';
161 <% $ge %>('<% $name %>_amount_input0').style.display = 'none';
162 <% $ge %>('<% $name %>_amount_input0').style.visibility = 'hidden';
163 <% $ge %>('<% $name %>_percent_label0').style.display = '';
164 <% $ge %>('<% $name %>_percent_label0').style.visibility = '';
165 <% $ge %>('<% $name %>_percent_input0').style.display = '';
166 <% $ge %>('<% $name %>_percent_input0').style.visibility = '';
171 <% $name %>_changed(<% $ge %>('<% $name %>'));
179 my $cgi = $opt{'cgi'};
180 my $discountnum = $opt{'curr_value'} || $opt{'value'};
182 $opt{'discount'} ||= [ qsearch( 'discount', { disabled=>'' } ) ];
184 my $curuser = $FS::CurrentUser::CurrentUser;
186 my $name = $opt{'element_name'} || $opt{'field'} || 'discountnum';
188 my $select = 'Select discount type';
190 my @_type_options = ( 'Amount', 'Percentage' );
191 unshift @_type_options, $select;
193 my $colspan = $opt{'colspan'} ? 'COLSPAN="'.$opt{'colspan'}.'"' : '';
195 my $onchange = ( $opt{'onchange'} ? delete($opt{'onchange'}).';' : '' ).
196 $name.'_changed(this);';