Revision c872d063
Von Moritz Bunkus vor fast 14 Jahren hinzugefügt
bin/mozilla/sepa.pl | ||
---|---|---|
155 | 155 |
$form->{jsscript} = 1; |
156 | 156 |
|
157 | 157 |
$form->header(); |
158 |
print $form->parse_html_template('sepa/bank_transfer_search'); |
|
158 |
print $form->parse_html_template('sepa/bank_transfer_search', { vc => $vc });
|
|
159 | 159 |
|
160 | 160 |
$main::lxdebug->leave_sub(); |
161 | 161 |
} |
... | ... | |
231 | 231 |
|
232 | 232 |
$report->set_options('top_info_text' => join("\n", @options), |
233 | 233 |
'raw_top_info_text' => $form->parse_html_template('sepa/bank_transfer_list_top'), |
234 |
'raw_bottom_info_text' => $form->parse_html_template('sepa/bank_transfer_list_bottom', { 'show_buttons' => $open_available }), |
|
234 |
'raw_bottom_info_text' => $form->parse_html_template('sepa/bank_transfer_list_bottom', { 'show_buttons' => $open_available, vc => $vc }),
|
|
235 | 235 |
'std_column_visibility' => 1, |
236 | 236 |
'output_format' => 'HTML', |
237 | 237 |
'title' => $form->{title}, |
... | ... | |
272 | 272 |
|
273 | 273 |
my $form = $main::form; |
274 | 274 |
my $locale = $main::locale; |
275 |
my $vc = $form->{vc} eq 'customer' ? 'customer' : 'vendor'; |
|
275 | 276 |
|
276 | 277 |
my @ids = (); |
277 | 278 |
if (!$form->{mode} || ($form->{mode} eq 'single')) { |
... | ... | |
287 | 288 |
my $export; |
288 | 289 |
|
289 | 290 |
foreach my $id (@ids) { |
290 |
my $curr_export = SL::SEPA->retrieve_export('id' => $id, 'details' => 1); |
|
291 |
my $curr_export = SL::SEPA->retrieve_export('id' => $id, 'details' => 1, 'vc' => $vc);
|
|
291 | 292 |
|
292 | 293 |
foreach my $item (@{ $curr_export->{items} }) { |
293 | 294 |
map { $item->{"export_${_}"} = $curr_export->{$_} } grep { !ref $curr_export->{$_} } keys %{ $curr_export }; |
Auch abrufbar als: Unified diff
Unterscheidung Bankeinzug/Überweisung bei Liste & Editmaske