Revision 486e5c7c
Von Tamino Steinert vor 10 Monaten hinzugefügt
bin/mozilla/ir.pl | ||
---|---|---|
236 | 236 |
} |
237 | 237 |
} |
238 | 238 |
$form->{AP} = $form->{AP_1} unless $form->{id}; |
239 |
my ($chart_accno) = split /--/, $form->{AP}; |
|
240 |
$form->{AP_chart_id} = $form->{id} ? SL::DB::Manager::Chart->find_by( accno => $chart_accno)->id : $::instance_conf->get_ap_chart_id || $form->{AP_links}->{AP}->[0]->{chart_id}; |
|
239 |
my ($chart_accno) = split /--/, $form->{AP}; # is empty if total is 0 |
|
240 |
$form->{AP_chart_id} = $form->{id} && $chart_accno ? SL::DB::Manager::Chart->find_by(accno => $chart_accno)->id |
|
241 |
: $::instance_conf->get_ap_chart_id || $form->{AP_links}->{AP}->[0]->{chart_id}; |
|
241 | 242 |
|
242 | 243 |
$form->{locked} = |
243 | 244 |
($form->datetonum($form->{invdate}, \%myconfig) <= |
bin/mozilla/is.pl | ||
---|---|---|
294 | 294 |
} |
295 | 295 |
} |
296 | 296 |
$form->{AR} = $form->{AR_1} unless $form->{id}; |
297 |
my ($chart_accno) = split /--/, $form->{AR}; |
|
298 |
$form->{AR_chart_id} = $form->{id} ? SL::DB::Manager::Chart->find_by( accno => $chart_accno)->id : $::instance_conf->get_ar_chart_id || $form->{AR_links}->{AR}->[0]->{chart_id}; |
|
297 |
my ($chart_accno) = split /--/, $form->{AR}; # is empty if total is 0 |
|
298 |
$form->{AR_chart_id} = $form->{id} && $chart_accno ? SL::DB::Manager::Chart->find_by(accno => $chart_accno)->id |
|
299 |
: $::instance_conf->get_ar_chart_id || $form->{AR_links}->{AR}->[0]->{chart_id}; |
|
299 | 300 |
|
300 | 301 |
$form->{locked} = ($form->datetonum($form->{invdate}, \%myconfig) |
301 | 302 |
<= $form->datetonum($form->{closedto}, \%myconfig)); |
Auch abrufbar als: Unified diff
FIX: Buchungskonto setzen bei Summe 0 in VK/EK-Rechnungen