summaryrefslogtreecommitdiff
path: root/httemplate/elements/tr-select-discount_term.html
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>