X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/4c01b1b28e9a7c871e9da06e1c9aee960ce04f64..fe249cf48f36d113f44dbf355f10de1ed4035bd9:/SL/WH.pm
diff --git a/SL/WH.pm b/SL/WH.pm
index 895db95e5..bcdffa511 100644
--- a/SL/WH.pm
+++ b/SL/WH.pm
@@ -312,9 +312,7 @@ sub transfer_assembly {
}
# gibt die Fehlermeldung zurück. A.) Keine Teile definiert
# B.) Artikel und Anzahl der fehlenden Teile/Dienstleistungen
- if ($kannNichtFertigen) {
- return 0;
- }
+ die "
" . $kannNichtFertigen if ($kannNichtFertigen);
# soweit alles gut. Jetzt noch die wirkliche Lagerbewegung für das Erzeugnis ausführen ...
my $transferAssemblySQL = qq|INSERT INTO inventory (parts_id, warehouse_id, bin_id, chargenumber, bestbefore,