X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/7cad87f84d2284d6836f17d672ce44c9c3418f2b..a910619e4c9c90063f5d6a17e51a8da9eadc1ac0:/SL/DB/Order.pm

diff --git a/SL/DB/Order.pm b/SL/DB/Order.pm
index af5d80353..d996d13b6 100644
--- a/SL/DB/Order.pm
+++ b/SL/DB/Order.pm
@@ -333,6 +333,7 @@ sub new_from {
 
   if ( $is_abbr_any->(qw(sopo poso)) ) {
     $args{ordnumber} = undef;
+    $args{quonumber} = undef;
     $args{reqdate}   = DateTime->today_local->next_workday();
     $args{employee}  = SL::DB::Manager::Employee->current;
   }