koha-dev.rot13.org Git - srvgit/blob - installer/data/mysql/atomicupdate/erm.pl

   1 use Modern::Perl;
   2
   3 return {
   4     bug_number => "BUG_NUMBER",
   5     description => "Some tables for ERM",
   6     up => sub {
   7         my ($args) = @_;
   8         my ($dbh, $out) = @$args{qw(dbh out)};
   9
  10         $dbh->do(q{
  11             INSERT IGNORE INTO systempreferences (variable,value,explanation,options,type)
  12             VALUES ('ERMModule', '0', NULL, 'Enable the E-Resource management module', 'YesNo');
  13         });
  14
  15         $dbh->do(q{
  16             INSERT IGNORE INTO userflags (bit, flag, flagdesc, defaulton)
  17             VALUES (28, 'erm', 'Manage electronic resources', 0)
  18         });
  19
  20         unless ( TableExists('erm_agreements') ) {
  21             $dbh->do(q{
  22                 CREATE TABLE `erm_agreements` (
  23                     `agreement_id` INT(11) NOT NULL AUTO_INCREMENT COMMENT 'primary key',
  24                     `vendor_id` INT(11) DEFAULT NULL COMMENT 'foreign key to aqbooksellers',
  25                     `name` VARCHAR(255) NOT NULL COMMENT 'name of the agreement',
  26                     `description` LONGTEXT DEFAULT NULL COMMENT 'description of the agreement',
  27                     `status` VARCHAR(80) NOT NULL COMMENT 'current status of the agreement',
  28                     `closure_reason` VARCHAR(80) DEFAULT NULL COMMENT 'reason of the closure',
  29                     `is_perpetual` TINYINT(1) NOT NULL DEFAULT 0 COMMENT 'is the agreement perpetual',
  30                     `renewal_priority` VARCHAR(80) DEFAULT NULL COMMENT 'priority of the renewal',
  31                     `license_info` VARCHAR(80) DEFAULT NULL COMMENT 'info about the license',
  32                     CONSTRAINT `erm_agreements_ibfk_1` FOREIGN KEY (`vendor_id`) REFERENCES `aqbooksellers` (`id`) ON DELETE SET NULL ON UPDATE CASCADE,
  33                     PRIMARY KEY(`agreement_id`)
  34                 ) ENGINE=InnoDB DEFAULT CHARSET=utf8mb4 COLLATE=utf8mb4_unicode_ci;
  35             });
  36         }
  37
  38         $dbh->do(q{
  39             INSERT IGNORE INTO authorised_value_categories (category_name, is_system)
  40             VALUES
  41                 ('ERM_AGREEMENT_STATUS', 1),
  42                 ('ERM_AGREEMENT_CLOSURE_REASON', 1),
  43                 ('ERM_AGREEMENT_RENEWAL_PRIORITY', 1)
  44             });
  45         $dbh->do(q{
  46             INSERT IGNORE INTO authorised_values (category, authorised_value, lib)
  47             VALUES
  48                 ('ERM_AGREEMENT_STATUS', 'active', 'Active'),
  49                 ('ERM_AGREEMENT_STATUS', 'in_negotiation', 'In negotiation'),
  50                 ('ERM_AGREEMENT_STATUS', 'closed', 'Closed'),
  51                 ('ERM_AGREEMENT_CLOSURE_REASON', 'expired', 'Expired'),
  52                 ('ERM_AGREEMENT_CLOSURE_REASON', 'cancelled', 'Cancelled'),
  53                 ('ERM_AGREEMENT_RENEWAL_PRIORITY', 'for_review', 'For review'),
  54                 ('ERM_AGREEMENT_RENEWAL_PRIORITY', 'renew', 'Renew'),
  55                 ('ERM_AGREEMENT_RENEWAL_PRIORITY', 'cancel', 'Cancel')
  56         });
  57
  58         unless ( TableExists('erm_agreement_periods') ) {
  59             $dbh->do(q{
  60                 CREATE TABLE `erm_agreement_periods` (
  61                     `agreement_period_id` INT(11) NOT NULL AUTO_INCREMENT COMMENT 'primary key',
  62                     `agreement_id` INT(11) NOT NULL COMMENT 'link to the agreement',
  63                     `started_on` DATE NOT NULL COMMENT 'start of the agreement period',
  64                     `ended_on` DATE COMMENT 'end of the agreement period',
  65                     `cancellation_deadline` DATE DEFAULT NULL COMMENT 'Deadline for the cancellation',
  66                     `notes` mediumtext DEFAULT NULL COMMENT 'notes about this period',
  67                     CONSTRAINT `erm_agreement_periods_ibfk_1` FOREIGN KEY (`agreement_id`) REFERENCES `erm_agreements` (`agreement_id`) ON DELETE CASCADE ON UPDATE CASCADE,
  68                     PRIMARY KEY(`agreement_period_id`)
  69                 ) ENGINE=InnoDB DEFAULT CHARSET=utf8mb4 COLLATE=utf8mb4_unicode_ci;
  70             });
  71         }
  72
  73         unless ( TableExists('erm_agreement_user_roles') ) {
  74             $dbh->do(q{
  75                 CREATE TABLE `erm_agreement_user_roles` (
  76                     `agreement_id` INT(11) NOT NULL COMMENT 'link to the agreement',
  77                     `user_id` INT(11) NOT NULL COMMENT 'link to the user',
  78                     `role` VARCHAR(80) NOT NULL COMMENT 'role of the user',
  79                     CONSTRAINT `erm_agreement_users_ibfk_1` FOREIGN KEY (`agreement_id`) REFERENCES `erm_agreements` (`agreement_id`) ON DELETE CASCADE ON UPDATE CASCADE,
  80                     CONSTRAINT `erm_agreement_users_ibfk_2` FOREIGN KEY (`user_id`) REFERENCES `borrowers` (`borrowernumber`) ON DELETE CASCADE ON UPDATE CASCADE
  81                 ) ENGINE=InnoDB DEFAULT CHARSET=utf8mb4 COLLATE=utf8mb4_unicode_ci;
  82             });
  83         }
  84         $dbh->do(q{
  85             INSERT IGNORE INTO authorised_value_categories (category_name, is_system)
  86             VALUES
  87                 ('ERM_AGREEMENT_USER_ROLES', 1)
  88         });
  89         $dbh->do(q{
  90             INSERT IGNORE INTO authorised_values (category, authorised_value, lib)
  91             VALUES
  92                 ('ERM_AGREEMENT_USER_ROLES', 'librarian', 'ERM librarian'),
  93                 ('ERM_AGREEMENT_USER_ROLES', 'subject_specialist', 'Subject specialist')
  94         });
  95
  96         unless ( TableExists('erm_licenses') ) {
  97             $dbh->do(q{
  98                 CREATE TABLE `erm_licenses` (
  99                     `license_id` INT(11) NOT NULL AUTO_INCREMENT COMMENT 'primary key',
 100                     `name` VARCHAR(255) NOT NULL COMMENT 'name of the license',
 101                     `description` LONGTEXT DEFAULT NULL COMMENT 'description of the license',
 102                     `type` VARCHAR(80) NOT NULL COMMENT 'type of the license',
 103                     `status` VARCHAR(80) NOT NULL COMMENT 'current status of the license',
 104                     `started_on` DATE COMMENT 'start of the license',
 105                     `ended_on` DATE COMMENT 'end of the license',
 106                     PRIMARY KEY(`license_id`)
 107                 ) ENGINE=InnoDB DEFAULT CHARSET=utf8mb4 COLLATE=utf8mb4_unicode_ci;
 108             });
 109         }
 110         unless ( TableExists('erm_agreement_licenses') ) {
 111             $dbh->do(q{
 112                 CREATE TABLE `erm_agreement_licenses` (
 113                     `agreement_license_id` INT(11) NOT NULL AUTO_INCREMENT COMMENT 'primary key',
 114                     `agreement_id` INT(11) NOT NULL COMMENT 'link to the agreement',
 115                     `license_id` INT(11) NOT NULL COMMENT 'link to the license',
 116                     `status` VARCHAR(80) NOT NULL COMMENT 'current status of the license',
 117                     `physical_location` VARCHAR(80) DEFAULT NULL COMMENT 'physical location of the license',
 118                     `notes` mediumtext DEFAULT NULL COMMENT 'notes about this license',
 119                     `uri` varchar(255) DEFAULT NULL COMMENT 'URI of the license',
 120                     CONSTRAINT `erm_licenses_ibfk_1` FOREIGN KEY (`agreement_id`) REFERENCES `erm_agreements` (`agreement_id`) ON DELETE CASCADE ON UPDATE CASCADE,
 121                     CONSTRAINT `erm_licenses_ibfk_2` FOREIGN KEY (`license_id`) REFERENCES `erm_licenses` (`license_id`) ON DELETE CASCADE ON UPDATE CASCADE,
 122                     PRIMARY KEY(`agreement_license_id`)
 123                 ) ENGINE=InnoDB DEFAULT CHARSET=utf8mb4 COLLATE=utf8mb4_unicode_ci;
 124             });
 125         }
 126         $dbh->do(q{
 127             INSERT IGNORE INTO authorised_value_categories (category_name, is_system)
 128             VALUES
 129                 ('ERM_LICENSE_TYPE', 1),
 130                 ('ERM_LICENSE_STATUS', 1),
 131                 ('ERM_AGREEMENT_LICENSE_STATUS', 1),
 132                 ('ERM_AGREEMENT_LICENSE_LOCATION', 1);
 133         });
 134
 135         $dbh->do(q{
 136             INSERT IGNORE INTO authorised_values (category, authorised_value, lib)
 137             VALUES
 138                 ('ERM_LICENSE_TYPE', 'local', 'Local'),
 139                 ('ERM_LICENSE_TYPE', 'consortial', 'Consortial'),
 140                 ('ERM_LICENSE_TYPE', 'national', 'National'),
 141                 ('ERM_LICENSE_TYPE', 'alliance', 'Alliance'),
 142                 ('ERM_LICENSE_STATUS', 'in_negotiation', 'In negotiation'),
 143                 ('ERM_LICENSE_STATUS', 'not_yet_active', 'Not yet active'),
 144                 ('ERM_LICENSE_STATUS', 'active', 'Active'),
 145                 ('ERM_LICENSE_STATUS', 'rejected', 'Rejected'),
 146                 ('ERM_LICENSE_STATUS', 'expired', 'Expired'),
 147                 ('ERM_AGREEMENT_LICENSE_STATUS', 'controlling', 'Controlling'),
 148                 ('ERM_AGREEMENT_LICENSE_STATUS', 'future', 'Future'),
 149                 ('ERM_AGREEMENT_LICENSE_STATUS', 'history', 'Historic'),
 150                 ('ERM_AGREEMENT_LICENSE_LOCATION', 'filing_cabinet', 'Filing cabinet'),
 151                 ('ERM_AGREEMENT_LICENSE_LOCATION', 'cupboard', 'Cupboard');
 152         });
 153
 154         unless ( TableExists('erm_agreement_relationships') ) {
 155             $dbh->do(q{
 156                 CREATE TABLE `erm_agreement_relationships` (
 157                     `agreement_id` INT(11) NOT NULL COMMENT 'link to the agreement',
 158                     `related_agreement_id` INT(11) NOT NULL COMMENT 'link to the related agreement',
 159                     `relationship` ENUM('supersedes', 'is-superseded-by', 'provides_post-cancellation_access_for', 'has-post-cancellation-access-in', 'tracks_demand-driven_acquisitions_for', 'has-demand-driven-acquisitions-in', 'has_backfile_in', 'has_frontfile_in', 'related_to') NOT NULL COMMENT 'relationship between the two agreements',
 160                     `notes` mediumtext DEFAULT NULL COMMENT 'notes about this relationship',
 161                     CONSTRAINT `erm_agreement_relationships_ibfk_1` FOREIGN KEY (`agreement_id`) REFERENCES `erm_agreements` (`agreement_id`) ON DELETE CASCADE ON UPDATE CASCADE,
 162                     CONSTRAINT `erm_agreement_relationships_ibfk_2` FOREIGN KEY (`related_agreement_id`) REFERENCES `erm_agreements` (`agreement_id`) ON DELETE CASCADE ON UPDATE CASCADE,
 163                     PRIMARY KEY(`agreement_id`, `related_agreement_id`)
 164                 ) ENGINE=InnoDB DEFAULT CHARSET=utf8mb4 COLLATE=utf8mb4_unicode_ci;
 165             });
 166         }
 167
 168         unless ( TableExists('erm_agreement_documents') ) {
 169             $dbh->do(q{
 170                 CREATE TABLE `erm_agreement_documents` (
 171                     `document_id` INT(11) NOT NULL AUTO_INCREMENT COMMENT 'primary key',
 172                     `agreement_id` INT(11) NOT NULL COMMENT 'link to the agreement',
 173                     `file_name` varchar(255) DEFAULT NULL COMMENT 'name of the file',
 174                     `file_type` varchar(255) DEFAULT NULL COMMENT 'type of the file',
 175                     `file_description` varchar(255) DEFAULT NULL COMMENT 'description of the file',
 176                     `file_content` longblob DEFAULT NULL COMMENT 'the content of the file',
 177                     `uploaded_on` datetime DEFAULT NULL COMMENT 'datetime when the file as attached',
 178                     `physical_location` VARCHAR(255) DEFAULT NULL COMMENT 'physical location of the document',
 179                     `uri` varchar(255) DEFAULT NULL COMMENT 'URI of the document',
 180                     `notes` mediumtext DEFAULT NULL COMMENT 'notes about this relationship',
 181                     CONSTRAINT `erm_agreement_documents_ibfk_1` FOREIGN KEY (`agreement_id`) REFERENCES `erm_agreements` (`agreement_id`) ON DELETE CASCADE ON UPDATE CASCADE,
 182                     PRIMARY KEY(`document_id`)
 183                 ) ENGINE=InnoDB DEFAULT CHARSET=utf8mb4 COLLATE=utf8mb4_unicode_ci;
 184             });
 185         }
 186
 187         unless ( TableExists('erm_eholdings_packages') ) {
 188             $dbh->do(q{
 189                 CREATE TABLE `erm_eholdings_packages` (
 190                     `package_id` INT(11) NOT NULL AUTO_INCREMENT COMMENT 'primary key',
 191                     `vendor_id` INT(11) DEFAULT NULL COMMENT 'foreign key to aqbooksellers',
 192                     `name` VARCHAR(255) NOT NULL COMMENT 'name of the package',
 193                     `external_id` VARCHAR(255) DEFAULT NULL COMMENT 'External key',
 194                     `provider` ENUM('ebsco') DEFAULT NULL COMMENT 'External provider',
 195                     `package_type` VARCHAR(80) DEFAULT NULL COMMENT 'type of the package',
 196                     `content_type` VARCHAR(80) DEFAULT NULL COMMENT 'type of the package',
 197                     `created_on` timestamp NOT NULL DEFAULT current_timestamp() COMMENT 'date of creation of the package',
 198                     CONSTRAINT `erm_packages_ibfk_1` FOREIGN KEY (`vendor_id`) REFERENCES `aqbooksellers` (`id`) ON DELETE SET NULL ON UPDATE CASCADE,
 199                     PRIMARY KEY(`package_id`)
 200                 ) ENGINE=InnoDB DEFAULT CHARSET=utf8mb4 COLLATE=utf8mb4_unicode_ci;
 201             });
 202         }
 203
 204         unless ( TableExists('erm_eholdings_packages_agreements') ) {
 205             $dbh->do(q{
 206                 CREATE TABLE `erm_eholdings_packages_agreements` (
 207                     `package_id` INT(11) NOT NULL COMMENT 'link to the package',
 208                     `agreement_id` INT(11) NOT NULL COMMENT 'link to the agreement',
 209                     CONSTRAINT `erm_eholdings_packages_agreements_ibfk_1` FOREIGN KEY (`package_id`) REFERENCES `erm_eholdings_packages` (`package_id`) ON DELETE CASCADE ON UPDATE CASCADE,
 210                     CONSTRAINT `erm_eholdings_packages_agreements_ibfk_2` FOREIGN KEY (`agreement_id`) REFERENCES `erm_agreements` (`agreement_id`) ON DELETE CASCADE ON UPDATE CASCADE
 211                 ) ENGINE=InnoDB DEFAULT CHARSET=utf8mb4 COLLATE=utf8mb4_unicode_ci;
 212             });
 213         }
 214
 215         unless ( TableExists('erm_eholdings_titles') ) {
 216             $dbh->do(q{
 217                 CREATE TABLE `erm_eholdings_titles` (
 218                     `title_id` INT(11) NOT NULL AUTO_INCREMENT COMMENT 'primary key',
 219                     `biblio_id` INT(11) DEFAULT NULL,
 220                     `publication_title` VARCHAR(255) DEFAULT NULL,
 221                     `external_id` VARCHAR(255) DEFAULT NULL,
 222                     `print_identifier` VARCHAR(255) DEFAULT NULL,
 223                     `online_identifier` VARCHAR(255) DEFAULT NULL,
 224                     `date_first_issue_online` VARCHAR(255) DEFAULT NULL,
 225                     `num_first_vol_online` VARCHAR(255) DEFAULT NULL,
 226                     `num_first_issue_online` VARCHAR(255) DEFAULT NULL,
 227                     `date_last_issue_online` VARCHAR(255) DEFAULT NULL,
 228                     `num_last_vol_online` VARCHAR(255) DEFAULT NULL,
 229                     `num_last_issue_online` VARCHAR(255) DEFAULT NULL,
 230                     `title_url` VARCHAR(255) DEFAULT NULL,
 231                     `first_author` VARCHAR(255) DEFAULT NULL,
 232                     `embargo_info` VARCHAR(255) DEFAULT NULL,
 233                     `coverage_depth` VARCHAR(255) DEFAULT NULL,
 234                     `notes` VARCHAR(255) DEFAULT NULL,
 235                     `publisher_name` VARCHAR(255) DEFAULT NULL,
 236                     `publication_type` VARCHAR(80) DEFAULT NULL,
 237                     `date_monograph_published_print` VARCHAR(255) DEFAULT NULL,
 238                     `date_monograph_published_online` VARCHAR(255) DEFAULT NULL,
 239                     `monograph_volume` VARCHAR(255) DEFAULT NULL,
 240                     `monograph_edition` VARCHAR(255) DEFAULT NULL,
 241                     `first_editor` VARCHAR(255) DEFAULT NULL,
 242                     `parent_publication_title_id` VARCHAR(255) DEFAULT NULL,
 243                     `preceeding_publication_title_id` VARCHAR(255) DEFAULT NULL,
 244                     `access_type` VARCHAR(255) DEFAULT NULL,
 245                     CONSTRAINT `erm_eholdings_titles_ibfk_2` FOREIGN KEY (`biblio_id`) REFERENCES `biblio` (`biblionumber`) ON DELETE SET NULL ON UPDATE CASCADE,
 246                     PRIMARY KEY(`title_id`)
 247                 ) ENGINE=InnoDB DEFAULT CHARSET=utf8mb4 COLLATE=utf8mb4_unicode_ci;
 248             });
 249         }
 250         unless ( TableExists('erm_eholdings_resources') ) {
 251             $dbh->do(q{
 252                 CREATE TABLE `erm_eholdings_resources` (
 253                     `resource_id` INT(11) NOT NULL AUTO_INCREMENT COMMENT 'primary key',
 254                     `title_id` INT(11) NOT NULL,
 255                     `package_id` INT(11) NOT NULL,
 256                     `vendor_id` INT(11) DEFAULT NULL,
 257                     `started_on` DATE,
 258                     `ended_on` DATE,
 259                     `proxy` VARCHAR(80) DEFAULT NULL,
 260                     CONSTRAINT `erm_eholdings_resources_ibfk_1` FOREIGN KEY (`title_id`) REFERENCES `erm_eholdings_titles` (`title_id`) ON DELETE CASCADE ON UPDATE CASCADE,
 261                     CONSTRAINT `erm_eholdings_resources_ibfk_2` FOREIGN KEY (`package_id`) REFERENCES `erm_eholdings_packages` (`package_id`) ON DELETE CASCADE ON UPDATE CASCADE,
 262                     CONSTRAINT `erm_eholdings_resources_ibfk_3` FOREIGN KEY (`vendor_id`) REFERENCES `aqbooksellers` (`id`) ON DELETE SET NULL ON UPDATE CASCADE,
 263                     PRIMARY KEY(`resource_id`)
 264                 ) ENGINE=InnoDB DEFAULT CHARSET=utf8mb4 COLLATE=utf8mb4_unicode_ci;
 265             });
 266         }
 267
 268         unless ( column_exists('aqbooksellers', 'external_id') ) {
 269             $dbh->do(q{
 270                 ALTER TABLE `aqbooksellers`
 271                 ADD COLUMN `external_id` VARCHAR(255) DEFAULT NULL
 272                 AFTER `deliverytime`
 273             });
 274         }
 275
 276         $dbh->do(q{
 277             INSERT IGNORE INTO authorised_value_categories (category_name, is_system)
 278             VALUES
 279                 ('ERM_PACKAGE_TYPE', 1),
 280                 ('ERM_PACKAGE_CONTENT_TYPE', 1),
 281                 ('ERM_TITLE_PUBLICATION_TYPE', 1)
 282         });
 283
 284         $dbh->do(q{
 285             INSERT IGNORE INTO authorised_values (category, authorised_value, lib)
 286             VALUES
 287                 ('ERM_PACKAGE_TYPE', 'local', 'Local'),
 288                 ('ERM_PACKAGE_TYPE', 'complete', 'Complete'),
 289                 ('ERM_PACKAGE_CONTENT_TYPE', 'AggregatedFullText', 'Aggregated full'),
 290                 ('ERM_PACKAGE_CONTENT_TYPE', 'AbstractAndIndex', 'Abstract and index'),
 291                 ('ERM_PACKAGE_CONTENT_TYPE', 'EBook', 'E-book'),
 292                 ('ERM_PACKAGE_CONTENT_TYPE', 'MixedContent', 'Mixed content'),
 293                 ('ERM_PACKAGE_CONTENT_TYPE', 'EJournal', 'E-journal'),
 294                 ('ERM_PACKAGE_CONTENT_TYPE', 'OnlineReference', 'Online reference'),
 295                 ('ERM_PACKAGE_CONTENT_TYPE', 'Print', 'Print'),
 296                 ('ERM_PACKAGE_CONTENT_TYPE', 'StreamingMedia', 'Streaming media'),
 297                 ('ERM_PACKAGE_CONTENT_TYPE', 'Unknown', 'Unknown'),
 298                 ('ERM_TITLE_PUBLICATION_TYPE', 'journal', 'Journal'),
 299                 ('ERM_TITLE_PUBLICATION_TYPE', 'newsletter', 'Newsletter'),
 300                 ('ERM_TITLE_PUBLICATION_TYPE', 'report', 'Report'),
 301                 ('ERM_TITLE_PUBLICATION_TYPE', 'proceedings', 'Proceedings'),
 302                 ('ERM_TITLE_PUBLICATION_TYPE', 'website', 'Website'),
 303                 ('ERM_TITLE_PUBLICATION_TYPE', 'newspaper', 'Newspaper'),
 304                 ('ERM_TITLE_PUBLICATION_TYPE', 'unspecified', 'Unspecified'),
 305                 ('ERM_TITLE_PUBLICATION_TYPE', 'book', 'Book'),
 306                 ('ERM_TITLE_PUBLICATION_TYPE', 'ebook', 'E-book'),
 307                 ('ERM_TITLE_PUBLICATION_TYPE', 'bookseries', 'Bookseries'),
 308                 ('ERM_TITLE_PUBLICATION_TYPE', 'database', 'Database'),
 309                 ('ERM_TITLE_PUBLICATION_TYPE', 'thesisdissertation', 'Thesis/Dissertation'),
 310                 ('ERM_TITLE_PUBLICATION_TYPE', 'streamingaudio', 'Streaming audio'),
 311                 ('ERM_TITLE_PUBLICATION_TYPE', 'streamingvideo', 'Streaming video'),
 312                 ('ERM_TITLE_PUBLICATION_TYPE', 'audiobook', 'AudioBook');
 313         });
 314
 315         $dbh->do(q{
 316             INSERT IGNORE INTO systempreferences (variable,value,explanation,options,type)
 317             VALUES ('ERMProviders', 'local', 'local|ebsco', 'Set the providers for the ERM module', 'multiple');
 318         });
 319         $dbh->do(q{
 320             INSERT IGNORE INTO systempreferences (variable,value,explanation,options,type)
 321             VALUES
 322             ('ERMProviderEbscoCustomerID', '', '', 'Customer ID for EBSCO', 'free'),
 323             ('ERMProviderEbscoApiKey', '', '', 'API key for EBSCO', 'free');
 324         });
 325
 326
 327     }
 328 };