Revision 7ccc2fd5
Von Jan Büren vor mehr als 7 Jahren hinzugefügt
| SL/WH.pm | ||
|---|---|---|
| 312 | 312 |
} |
| 313 | 313 |
# gibt die Fehlermeldung zurück. A.) Keine Teile definiert |
| 314 | 314 |
# B.) Artikel und Anzahl der fehlenden Teile/Dienstleistungen |
| 315 |
if ($kannNichtFertigen) {
|
|
| 316 |
return 0; |
|
| 317 |
} |
|
| 315 |
die "<br><br>" . $kannNichtFertigen if ($kannNichtFertigen); |
|
| 318 | 316 |
|
| 319 | 317 |
# soweit alles gut. Jetzt noch die wirkliche Lagerbewegung für das Erzeugnis ausführen ... |
| 320 | 318 |
my $transferAssemblySQL = qq|INSERT INTO inventory (parts_id, warehouse_id, bin_id, chargenumber, bestbefore, |
Auch abrufbar als: Unified diff
Fixt #281 Fertigen nicht transaktionssicher
return 0 verlässt den eval block, aber macht kein Rollback
Ein sauberes "die" funktioniert wie gewollt.
Die Rückmeldung an den Anwender ist jetzt allerdings etwas kryptischer.