Revision 43d75428
| SL/BackgroundJob/SetNumberRange.pm | ||
|---|---|---|
| 33 | 33 |
|
| 34 | 34 |
my $defaults = SL::DB::Default->get; |
| 35 | 35 |
|
| 36 |
foreach (qw(invnumber cnnumber soinumber pqinumber sonumber ponumber pocnumber sqnumber rfqnumber sdonumber pdonumber)) {
|
|
| 36 |
foreach (qw(invnumber cnnumber soinumber pqinumber sonumber ponumber pocnumber |
|
| 37 |
sqnumber rfqnumber sdonumber pdonumber sudonumber rdonumber |
|
| 38 |
s_reclamation_record_number p_reclamation_record_number )) {
|
|
| 39 |
|
|
| 37 | 40 |
my $current_number = SL::PrefixedNumber->new(number => $defaults->{$_});
|
| 38 | 41 |
$current_number->set_to($running_year * $multiplier); |
| 39 | 42 |
$defaults->{$_} = $current_number->get_current;
|
Auch abrufbar als: Unified diff
SetNumberRange: Erweiterung auf alle derzeit aktiven Nummerkreise