X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/02fa01b23003eb4429392092cd0282d44a11cea8..80970e1dbc30a1e8d56f924ba5699d1868d48d22:/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;
   }