blob: 7d9ee4d1fdab925b4b45c4095ae2257d34df83d6 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
<%=
if ( scalar(keys %discount_terms_hash) ) {
$OUT .= '<TR>';
$OUT .= '<TD ALIGN="right">Prepayment for</TD>';
$OUT .= '<TD>';
$OUT .= '<SELECT NAME="discount_term">';
$OUT .= qq(<OPTION VALUE="">1 month\n);
foreach ( keys %discount_terms_hash ) {
$selected = $discount_term eq $_ ? ' SELECTED' : '';
$OUT .= qq(<OPTION$selected VALUE="$_">$_ months\n);
}
$OUT .= '</SELECT>';
$OUT .= '</TD>';
$OUT .= '</TR>';
}
$OUT .= '';
%>
|