Revision 97954312
Von Bernd Bleßmann vor etwa 12 Jahren hinzugefügt
| bin/mozilla/ap.pl | ||
|---|---|---|
| 40 | 40 |
use SL::IS; |
| 41 | 41 |
use SL::PE; |
| 42 | 42 |
use SL::ReportGenerator; |
| 43 |
use SL::DB::Default; |
|
| 43 | 44 |
|
| 44 | 45 |
require "bin/mozilla/arap.pl"; |
| 45 | 46 |
require "bin/mozilla/common.pl"; |
| ... | ... | |
| 693 | 694 |
print qq|<input type=hidden name="acc_trans_id_$i" value=$form->{"acc_trans_id_$i"}>\n|;
|
| 694 | 695 |
print qq|<input type=hidden name="gldate_$i" value=$form->{"gldate_$i"}>\n|;
|
| 695 | 696 |
my $changeable = 1; |
| 696 |
if ($::lx_office_conf{features}->{payments_changeable} == 0) {
|
|
| 697 |
if (SL::DB::Default->get->payments_changeable == 0) {
|
|
| 697 | 698 |
# never |
| 698 | 699 |
$changeable = ($form->{"acc_trans_id_$i"})? 0 : 1;
|
| 699 | 700 |
} |
| 700 |
if ($::lx_office_conf{features}->{payments_changeable} == 2) {
|
|
| 701 |
if (SL::DB::Default->get->payments_changeable == 2) {
|
|
| 701 | 702 |
# on the same day |
| 702 | 703 |
$changeable = (($form->{"gldate_$i"} eq '') || $form->current_date(\%myconfig) eq $form->{"gldate_$i"});
|
| 703 | 704 |
} |
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.