blob: 58582675d35681de0839ebe57c6ac48bc1bcd763 (
plain)
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
|
% if ( scalar(@discount_term) ) {
<TR>
<TD ALIGN="right">Prepayment for</TD>
<TD COLSPAN=2>
<% include('select-discount_term.html',
'discount_term' => \@discount_term,
'cgi' => $opt{'cgi'},
)
%>
</TD>
</TR>
% }
<%init>
my %opt = @_;
my $custnum = $opt{'custnum'};
my $cust_main = qsearchs('cust_main', { 'custnum' => $custnum } )
or die "unknown custnum $custnum\n";
my @discount_term = $cust_main->discount_terms;
</%init>
|