Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 6c8fcdb1

Von Bernd Bleßmann vor mehr als 1 Jahr hinzugefügt

  • ID 6c8fcdb1212ce1103f73e62ad13e4340125dee5e
  • Vorgänger 23002590
  • Nachfolger eaf9e172

Auftrags-Eingang: DB und Nummernkreis

Unterschiede anzeigen:

SL/BackgroundJob/SetNumberRange.pm
29 29 

  		




  30
  30
  
    
  my $defaults   = SL::DB::Default->get;


  		




  31
  31
  
    

  		




  32
  
  
    
  foreach (qw(invnumber cnnumber sonumber ponumber sqnumber rfqnumber sdonumber pdonumber)) {


  		




  
  32
  
    
  foreach (qw(invnumber cnnumber soinumber sonumber ponumber sqnumber rfqnumber sdonumber pdonumber)) {


  		




  33
  33
  
    
    my $current_number = SL::PrefixedNumber->new(number => $defaults->{$_});


  		




  34
  34
  
    
    $current_number->set_to($next_year * $multiplier);


  		




  35
  35
  
    
    $defaults->{$_} = $current_number->get_current;


  		












Auch abrufbar als:  Unified diff