Revision e7117e52
Von Jan Büren vor fast 2 Jahren hinzugefügt
| bin/mozilla/ir.pl | ||
|---|---|---|
| 580 | 580 |
if ($form->date_closed($form->{"gldate_$i"})) {
|
| 581 | 581 |
$form->{"changeable_$i"} = 0;
|
| 582 | 582 |
} |
| 583 |
|
|
| 583 |
# don't add manual bookings for charts which are assigned to real bank accounts |
|
| 584 |
my $bank_accounts = SL::DB::Manager::BankAccount->get_all(); |
|
| 585 |
foreach my $bank (@{ $bank_accounts }) {
|
|
| 586 |
my $accno_paid_bank = $bank->chart->accno; |
|
| 587 |
$form->{selectAP_paid} =~ s/<option>$accno_paid_bank--(.*?)<\/option>//;
|
|
| 588 |
} |
|
| 584 | 589 |
$form->{"selectAP_paid_$i"} = $form->{selectAP_paid};
|
| 585 | 590 |
if (!$form->{"AP_paid_$i"}) {
|
| 586 | 591 |
$form->{"selectAP_paid_$i"} =~ s/option>$accno_arap--(.*?)>/option selected>$accno_arap--$1>/;
|
Auch abrufbar als: Unified diff
Zahlungsbuchung in Belegen: Konten ausblenden, die über Bank verbucht werden