diff options
Diffstat (limited to 'httemplate/elements/select-terms.html')
-rw-r--r-- | httemplate/elements/select-terms.html | 41 |
1 files changed, 41 insertions, 0 deletions
diff --git a/httemplate/elements/select-terms.html b/httemplate/elements/select-terms.html new file mode 100644 index 0000000..52f9fb5 --- /dev/null +++ b/httemplate/elements/select-terms.html @@ -0,0 +1,41 @@ +<SELECT NAME = "invoice_terms" + ID = "invoice_terms" + <% $opt{'disabled'} ? 'DISABLED' : ''%> +> +# #false laziness w/select-table.html +% while ( @pre_options ) { +% my $pre_opt = shift(@pre_options); +% my $pre_label = shift(@pre_options); +% my $selected = # ( ref($value) && $value->{$pre_opt} ) || +% ( $curr_value eq $pre_opt ); + <OPTION VALUE="<% $pre_opt %>" + <% $selected ? 'SELECTED' : '' %> + ><% $pre_label %> +% } + + <OPTION VALUE="<% $empty_value %>"><% $empty_label %> +% foreach my $term ( @terms ) { + <OPTION VALUE="<% $term %>" <% $curr_value eq $term ? ' SELECTED' : '' %>><% $term %> +% } +</SELECT> +<%init> + +my %opt = @_; +my $curr_value = $opt{'curr_value'}; +my $conf = new FS::Conf; + +my $empty_label = + $opt{'empty_label'} + || 'Default ('. + ($conf->config('invoice_default_terms') || 'Payable upon receipt'). + ')'; + +my $empty_value = $opt{'empty_value'} || ''; + +my @terms = ( 'Payable upon receipt', + ( map "Net $_", 0, 10, 15, 20, 30, 45, 60 ), + ); + +my @pre_options = $opt{pre_options} ? @{ $opt{pre_options} } : (); + +</%init> |