Revision cb9719b1
Von Moritz Bunkus vor etwa 13 Jahren hinzugefügt
bin/mozilla/sepa.pl | ||
---|---|---|
113 | 113 |
} |
114 | 114 |
|
115 | 115 |
if ($error_message || !$form->{confirmation}) { |
116 |
my @vc_ids = uniq map { $_->{"${vc}_id"} } @bank_transfers;
|
|
116 |
my @vc_ids = uniq map { $_->{vc_id} } @bank_transfers;
|
|
117 | 117 |
$vc_bank_info ||= CT->get_bank_info('vc' => $vc, |
118 | 118 |
'id' => \@vc_ids); |
119 | 119 |
my @vc_bank_info = sort { lc $a->{name} cmp lc $b->{name} } values %{ $vc_bank_info }; |
... | ... | |
136 | 136 |
} else { |
137 | 137 |
foreach my $bank_transfer (@bank_transfers) { |
138 | 138 |
foreach (qw(iban bic)) { |
139 |
$bank_transfer->{"vc_${_}"} = $vc_bank_info->{ $bank_transfer->{"${vc}_id"} }->{$_};
|
|
139 |
$bank_transfer->{"vc_${_}"} = $vc_bank_info->{ $bank_transfer->{vc_id} }->{$_};
|
|
140 | 140 |
$bank_transfer->{"our_${_}"} = $bank_account->{$_}; |
141 | 141 |
} |
142 | 142 |
|
Auch abrufbar als: Unified diff
IBAN/BIC durch Masken durchreichen
Bei Umstellung von "nur Überweisung" auf "auch Einzug" gingen IBAN/BIC
in den Masken verloren, weil die Eingabefelder "vc_bic" hießen, der
Code aber nach "${vc}_bic" gesucht hat, effektiv also nach
"customer_bic" oder "vendor_bic".