Bug 22729: (QA follow-up) Ensure no NULL values before setting NOT NULL
authorMartin Renvoize <martin.renvoize@ptfs-europe.com>
Thu, 25 Apr 2019 07:15:58 +0000 (08:15 +0100)
committerNick Clemens <nick@bywatersolutions.com>
Thu, 25 Apr 2019 10:06:44 +0000 (10:06 +0000)
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>

Signed-off-by: Nick Clemens <nick@bywatersolutions.com>

installer/data/mysql/atomicupdate/bug_21336_followup.perl

index 880d832..ff26889 100644 (file)
@@ -3,6 +3,9 @@ if( CheckVersion( $DBversion ) ) {
 
     if ( column_exists( 'borrowers', 'flgAnonymized' ) ) {
         $dbh->do(q{
+            UPDATE borrowers SET flgAnonymized = 0 WHERE flgAnonymized IS NULL
+        });
+        $dbh->do(q{
             ALTER TABLE borrowers
                 CHANGE `flgAnonymized` `anonymized` TINYINT(1) NOT NULL DEFAULT 0
         });
@@ -10,6 +13,9 @@ if( CheckVersion( $DBversion ) ) {
 
     if ( column_exists( 'deletedborrowers', 'flgAnonymized' ) ) {
         $dbh->do(q{
+            UPDATE deletedborrowers SET flgAnonymized = 0 WHERE flgAnonymized IS NULL
+        });
+        $dbh->do(q{
             ALTER TABLE deletedborrowers
                 CHANGE `flgAnonymized` `anonymized` TINYINT(1) NOT NULL DEFAULT 0
         });