Revision 97954312
Von Bernd Bleßmann vor etwa 12 Jahren hinzugefügt
| SL/AP.pm | ||
|---|---|---|
| 38 | 38 |
use SL::DBUtils; |
| 39 | 39 |
use SL::IO; |
| 40 | 40 |
use SL::MoreCommon; |
| 41 |
|
|
| 41 |
use SL::DB::Default; |
|
| 42 | 42 |
use Data::Dumper; |
| 43 | 43 |
|
| 44 | 44 |
use strict; |
| ... | ... | |
| 251 | 251 |
# add paid transactions |
| 252 | 252 |
for my $i (1 .. $form->{paidaccounts}) {
|
| 253 | 253 |
|
| 254 |
if ($form->{"acc_trans_id_$i"} && $payments_only && ($::lx_office_conf{features}->{payments_changeable} == 0)) {
|
|
| 254 |
if ($form->{"acc_trans_id_$i"} && $payments_only && (SL::DB::Default->get->payments_changeable == 0)) {
|
|
| 255 | 255 |
next; |
| 256 | 256 |
} |
| 257 | 257 |
|
| ... | ... | |
| 593 | 593 |
$old_form = save_form(); |
| 594 | 594 |
|
| 595 | 595 |
# Delete all entries in acc_trans from prior payments. |
| 596 |
if ($::lx_office_conf{features}->{payments_changeable} != 0) {
|
|
| 596 |
if (SL::DB::Default->get->payments_changeable != 0) {
|
|
| 597 | 597 |
$self->_delete_payments($form, $dbh); |
| 598 | 598 |
} |
| 599 | 599 |
|
Auch abrufbar als: Unified diff
Controller für Mandantenkonfiguration.
Im Moment lässt sich hier die Änderbarkeit für Zahlungen einstellen. Es
sollen demnächst auch noch anderen Konfig-Einstellungen aus der Konfig-Datei
hierher wandern.