From 6ae30d7c9676170d2c8282f8fde6d610608f3162 Mon Sep 17 00:00:00 2001 From: Josef Moravec Date: Wed, 31 Oct 2018 07:24:05 +0000 Subject: [PATCH] Bug 19066: (QA follow-up) Move db update to perl --- installer/data/mysql/atomicupdate/bug_19066.sql | 1 - .../atomicupdate/bug_19066_add_accountlines_branchcode.perl | 11 +++++++++++ 2 files changed, 11 insertions(+), 1 deletion(-) delete mode 100644 installer/data/mysql/atomicupdate/bug_19066.sql create mode 100644 installer/data/mysql/atomicupdate/bug_19066_add_accountlines_branchcode.perl diff --git a/installer/data/mysql/atomicupdate/bug_19066.sql b/installer/data/mysql/atomicupdate/bug_19066.sql deleted file mode 100644 index 8fe161a..0000000 --- a/installer/data/mysql/atomicupdate/bug_19066.sql +++ /dev/null @@ -1 +0,0 @@ -ALTER TABLE accountlines ADD branchcode VARCHAR( 10 ) NULL DEFAULT NULL AFTER manager_id; diff --git a/installer/data/mysql/atomicupdate/bug_19066_add_accountlines_branchcode.perl b/installer/data/mysql/atomicupdate/bug_19066_add_accountlines_branchcode.perl new file mode 100644 index 0000000..426d997 --- /dev/null +++ b/installer/data/mysql/atomicupdate/bug_19066_add_accountlines_branchcode.perl @@ -0,0 +1,11 @@ +$DBversion = 'XXX'; # will be replaced by the RM +if( CheckVersion( $DBversion ) ) { + + if( !column_exists( 'accountlines', 'branchcode' ) ) { + $dbh->do("ALTER TABLE accountlines ADD branchcode VARCHAR( 10 ) NULL DEFAULT NULL AFTER manager_id"); + } + + # Always end with this (adjust the bug info) + SetVersion( $DBversion ); + print "Upgrade to $DBversion done (Bug 19066 - Add branchcode to accountlines)\n"; +} -- 2.1.4