X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=sql%2FPg-upgrade2%2Fwarehouse.pl;h=a9b152f9e8bf2c4c652d817ea2ad0c491591da8c;hb=fe8f7c08e7c9e002f2501cb5afb3ff372d6dd535;hp=e205670c7e3e740425467ebabb380444c2264d37;hpb=ba9f2104f19d6b467dcffcaa10f6a5e63f01b64e;p=kivitendo-erp.git diff --git a/sql/Pg-upgrade2/warehouse.pl b/sql/Pg-upgrade2/warehouse.pl index e205670c7..a9b152f9e 100644 --- a/sql/Pg-upgrade2/warehouse.pl +++ b/sql/Pg-upgrade2/warehouse.pl @@ -2,9 +2,13 @@ # @description: Diverse neue Tabellen und Spalten zur Mehrlagerfähigkeit inkl. Migration # @depends: release_2_4_3 +use strict; die("This script cannot be run from the command line.") unless ($main::form); +my $do_sql_migration = 0; +my ($check_sql, $sqlcode); + sub mydberror { my ($msg) = @_; die($dbup_locale->text("Database update error:") . @@ -21,7 +25,6 @@ sub do_query { } } -$do_sql_migration = 0; sub print_question { print $main::form->parse_html_template("dbupgrade/warehouse_form"); @@ -57,17 +60,17 @@ INSERT INTO warehouse (description, sortkey, invalid) VALUES ($warehouse, 1, FAL UPDATE tmp_parts SET bin = NULL WHERE bin = ''; -- Restore old onhand -INSERT INTO bin - (warehouse_id, description) - (SELECT DISTINCT warehouse.id, COALESCE(bin, $bin) - FROM warehouse, tmp_parts +INSERT INTO bin + (warehouse_id, description) + (SELECT DISTINCT warehouse.id, COALESCE(bin, $bin) + FROM warehouse, tmp_parts WHERE warehouse.description=$warehouse); -INSERT INTO inventory - (warehouse_id, parts_id, bin_id, qty, employee_id, trans_id, trans_type_id) - (SELECT warehouse.id, tmp_parts.id, bin.id, onhand, (SELECT id FROM employee LIMIT 1), nextval('id'), transfer_type.id +INSERT INTO inventory + (warehouse_id, parts_id, bin_id, qty, employee_id, trans_id, trans_type_id, chargenumber) + (SELECT warehouse.id, tmp_parts.id, bin.id, onhand, (SELECT id FROM employee LIMIT 1), nextval('id'), transfer_type.id, '' FROM transfer_type, warehouse, tmp_parts, bin WHERE warehouse.description = $warehouse - AND COALESCE(bin, $bin) = bin.description + AND COALESCE(bin, $bin) = bin.description AND transfer_type.description = 'stock'); EOF ;