From bd39db7a960f64d6a19e714aa8d74ccab1fd04c5 Mon Sep 17 00:00:00 2001 From: ivan Date: Sat, 1 Mar 2008 22:23:41 +0000 Subject: add payby selection to adv. customer search --- httemplate/elements/tr-select-payby.html | 37 ++++++++++++++++++++++++++++++++ 1 file changed, 37 insertions(+) create mode 100644 httemplate/elements/tr-select-payby.html (limited to 'httemplate/elements/tr-select-payby.html') diff --git a/httemplate/elements/tr-select-payby.html b/httemplate/elements/tr-select-payby.html new file mode 100644 index 000000000..354eb5580 --- /dev/null +++ b/httemplate/elements/tr-select-payby.html @@ -0,0 +1,37 @@ +<% include ('tr-td-label.html', 'label' => 'Payment type', @_ ) %> + + > + + <% include( '/elements/select-payby.html', + 'curr_value' => $curr_value, + %opt + ) + %> + + + + + +<%init> + +my %opt = @_; + +#my $onchange = $opt{'onchange'} +# ? 'onChange="'. $opt{'onchange'}. '(this)"' +# : ''; + +my $style = $opt{'cell_style'} ? 'STYLE="'. $opt{'cell_style'}. '"' : ''; + +my $method = 'payby2longname'; +$method = 'cust_payby2longname' if $opt{'payby_type'} eq 'cust'; +#$method = 'event_payby2longname' if $opt{'payby_type'} eq 'event'; +#$method = 'pay_payby2longname' if $opt{'payby_type'} eq 'pay'; + +unless ( $opt{'paybys'} ) { + tie %{ $opt{'paybys'} }, 'Tie::IxHash', FS::payby->$method(); +} + +my $curr_value = $opt{'curr_value'} || $opt{'value'}; + + + -- cgit v1.2.1