diff --git a/installer/data/mysql/atomicupdate/bug_37419.pl b/installer/data/mysql/atomicupdate/bug_37419.pl new file mode 100755 index 0000000000..b39b42a10b --- /dev/null +++ b/installer/data/mysql/atomicupdate/bug_37419.pl @@ -0,0 +1,29 @@ +use Modern::Perl; +use Koha::Installer::Output qw(say_warning say_failure say_success say_info); + +return { + bug_number => "37419", + description => "Replace FK constraint to avoid data loss", + up => sub { + my ($args) = @_; + my ( $dbh, $out ) = @$args{qw(dbh out)}; + + # Drop table constraint + if ( foreign_key_exists( 'biblio_metadata', 'record_metadata_fk_2' ) ) { + $dbh->do( + q{ + ALTER TABLE biblio_metadata DROP FOREIGN KEY record_metadata_fk_2 + } + ); + } + + $dbh->do( + q{ + ALTER TABLE biblio_metadata + ADD CONSTRAINT `record_metadata_fk_2` FOREIGN KEY (`record_source_id`) REFERENCES `record_sources` (`record_source_id`) ON DELETE RESTRICT ON UPDATE CASCADE + } + ); + + say_success( $out, "Updated foreign key 'biblio_metadata.record_metadata_fk_2'" ); + }, +}; diff --git a/installer/data/mysql/kohastructure.sql b/installer/data/mysql/kohastructure.sql index 91c1bec42f..4d1f1c10ef 100644 --- a/installer/data/mysql/kohastructure.sql +++ b/installer/data/mysql/kohastructure.sql @@ -1144,7 +1144,7 @@ CREATE TABLE `biblio_metadata` ( KEY `timestamp` (`timestamp`), KEY `record_metadata_fk_2` (`record_source_id`), CONSTRAINT `record_metadata_fk_1` FOREIGN KEY (`biblionumber`) REFERENCES `biblio` (`biblionumber`) ON DELETE CASCADE ON UPDATE CASCADE, - CONSTRAINT `record_metadata_fk_2` FOREIGN KEY (`record_source_id`) REFERENCES `record_sources` (`record_source_id`) ON DELETE CASCADE ON UPDATE CASCADE + CONSTRAINT `record_metadata_fk_2` FOREIGN KEY (`record_source_id`) REFERENCES `record_sources` (`record_source_id`) ON DELETE RESTRICT ON UPDATE CASCADE ) ENGINE=InnoDB DEFAULT CHARSET=utf8mb4 COLLATE=utf8mb4_unicode_ci; /*!40101 SET character_set_client = @saved_cs_client */;