]> wagnertech.de Git - mfinanz.git/blobdiff - bin/mozilla/io.pl
Lieferscheine benötigen auch Preisquellen
[mfinanz.git] / bin / mozilla / io.pl
index c4f656714643399da13642bb3ed674f4e2f214cf..849e8df5ad6f9b8ec17e18fe42097267b16be077 100644 (file)
@@ -2015,6 +2015,7 @@ sub _make_record {
   }
 
   $obj->items(@items) if @items;
+  $obj->is_sales(!!$obj->customer_id) if $class eq 'SL::DB::DeliveryOrder';
 
   return $obj;
 }