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
|
<TR>
<TH COLSPAN=2>Tax products</TH>
</TR>
% foreach my $usage_class (@classes) {
% my $classnum = $usage_class->classnum;
% my $curr_value =
% $cgi->param("usage_taxproductnum_$classnum")
% || $pkg_options{"usage_taxproductnum_$classnum"}
% || '';
<TR>
<TD><% $usage_class->classname %></TD>
<TD><& select-taxproduct.html,
%opt,
'field' => $field.'_'.$classnum,
'curr_value' => $curr_value
&>
</TD>
</TR>
% }
<%init>
my %opt = @_;
my $field = delete($opt{field}) || 'taxproductnum';
my $pkgpart = delete($opt{pkgpart});
my %pkg_options;
if ($pkgpart) {
my $part_pkg = FS::part_pkg->by_key($pkgpart);
%pkg_options = $part_pkg->options;
$pkg_options{'usage_taxproductnum_'} = $part_pkg->taxproductnum;
}
my @classes = qsearch('usage_class', { 'disabled' => '' });
unshift @classes,
FS::usage_class->new({ 'classnum' => '', 'classname' => '(default)', }),
FS::usage_class->new({ 'classnum' => 'setup', 'classname' => 'Setup', }),
FS::usage_class->new({ 'classnum' => 'recur', 'classname' => 'Recur', }),
;
</%init>
|
