Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision fe15fb2d

Von Bernd Bleßmann vor etwa 1 Jahr hinzugefügt

  • ID fe15fb2d42edad6ac4ded93bc1433d65d9a3ec43
  • Vorgänger 61363943
  • Nachfolger 6fe62d2a

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