From 025990e3fc5f678dc83f06301e39bf83181bb7f1 Mon Sep 17 00:00:00 2001 From: Nick Clemens Date: Mon, 27 Aug 2018 18:21:23 +0000 Subject: [PATCH] Bug 18639: Alter DB update to populate replacementprice from rpp initially --- .../bug_18639_add_replacementprice_field_to_aqorders.perl | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/installer/data/mysql/atomicupdate/bug_18639_add_replacementprice_field_to_aqorders.perl b/installer/data/mysql/atomicupdate/bug_18639_add_replacementprice_field_to_aqorders.perl index 004d6ab..152b14d 100644 --- a/installer/data/mysql/atomicupdate/bug_18639_add_replacementprice_field_to_aqorders.perl +++ b/installer/data/mysql/atomicupdate/bug_18639_add_replacementprice_field_to_aqorders.perl @@ -1,6 +1,9 @@ $DBversion = 'XXX'; # will be replaced by the RM if( CheckVersion( $DBversion ) ) { - $dbh->do( "ALTER TABLE aqorders ADD COLUMN replacementprice DECIMAL(28,6)" ); + if( !column_exists( 'aqorders', 'replacementprice' ){ + $dbh->do( "ALTER TABLE aqorders ADD COLUMN replacementprice DECIMAL(28,6)" ); + $dbh->do( "UPDATE aqorders set replacementprice = rrp WHERE replacementprice IS NULL" ); + } SetVersion( $DBversion ); print "Upgrade to $DBversion done (Bug 18639 - Add replacementprice field to aqorders table)\n"; } -- 2.1.4