Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 1b9948c2

Von Bernd Bleßmann vor 12 Monaten hinzugefügt

  • ID 1b9948c224014bf95b7b94e3b7d5e072db7705f4
  • Vorgänger 10c514e3
  • Nachfolger e26719e5

Lieferantenauftragsbestätigung: 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 soinumber pqinumber sonumber ponumber sqnumber rfqnumber sdonumber pdonumber)) {


  		




  
  32
  
    
  foreach (qw(invnumber cnnumber soinumber pqinumber sonumber ponumber pocnumber 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