Open-ILS/src/sql/Pg/upgrade/WWWW.schema.redo_config_metabib_field_sequence.sql

   1 BEGIN;
   2
   3 -- check whether patch can be applied
   4 --SELECT evergreen.upgrade_deps_block_check('XXXX', :eg_version);
   5
   6 ALTER TABLE config.metabib_field_ts_map DROP CONSTRAINT metabib_field_ts_map_metabib_field_fkey;
   7 ALTER TABLE config.metabib_search_alias DROP CONSTRAINT metabib_search_alias_field_fkey;
   8 ALTER TABLE metabib.browse_entry_def_map DROP CONSTRAINT browse_entry_def_map_def_fkey;
   9
  10 ALTER TABLE config.metabib_field_ts_map ADD CONSTRAINT metabib_field_ts_map_metabib_field_fkey FOREIGN KEY (metabib_field) REFERENCES config.metabib_field(id) ON UPDATE CASCADE DEFERRABLE INITIALLY DEFERRED;
  11 ALTER TABLE config.metabib_search_alias ADD CONSTRAINT metabib_search_alias_field_fkey FOREIGN KEY (field) REFERENCES config.metabib_field(id) ON UPDATE CASCADE DEFERRABLE INITIALLY DEFERRED;
  12 ALTER TABLE metabib.browse_entry_def_map ADD CONSTRAINT browse_entry_def_map_def_fkey FOREIGN KEY (def) REFERENCES config.metabib_field(id) ON UPDATE CASCADE DEFERRABLE INITIALLY DEFERRED;
  13
  14
  15 DROP FUNCTION IF EXISTS config.modify_metabib_field(source INT, target INT);
  16 CREATE FUNCTION config.modify_metabib_field(v_source INT, target INT) RETURNS INT AS $func$
  17 DECLARE
  18     f_class TEXT;
  19     check_id INT;
  20     target_id INT;
  21 BEGIN
  22     SELECT field_class INTO f_class FROM config.metabib_field WHERE id = v_source;
  23     IF NOT FOUND THEN
  24         RETURN 0;
  25     END IF;
  26     IF target IS NULL THEN
  27         target_id = v_source + 1000;
  28     ELSE
  29         target_id = target;
  30     END IF;
  31     SELECT id FROM config.metabib_field INTO check_id WHERE id = target_id;
  32     IF FOUND THEN
  33         RAISE NOTICE 'Cannot bump config.metabib_field.id from % to %; the target ID already exists.', v_source, target_id;
  34         RETURN 0;
  35     END IF;
  36     UPDATE config.metabib_field SET id = target_id WHERE id = v_source;
  37     EXECUTE ' UPDATE metabib.' || f_class || '_field_entry SET field = ' || target_id || ' WHERE field = ' || v_source;
  38     UPDATE config.metabib_field_ts_map SET metabib_field = target_id WHERE metabib_field = v_source;
  39     UPDATE config.metabib_field_index_norm_map SET field = target_id WHERE field = v_source;
  40     UPDATE search.relevance_adjustment SET field = target_id WHERE field = v_source;
  41     UPDATE config.metabib_search_alias SET field = target_id WHERE field = v_source;
  42     UPDATE metabib.browse_entry_def_map SET def = target_id WHERE def = v_source;
  43     RETURN 1;
  44 END;
  45 $func$ LANGUAGE PLPGSQL;
  46
  47 SELECT config.modify_metabib_field(id, NULL)
  48     FROM config.metabib_field
  49     WHERE id > 30;
  50
  51 SELECT SETVAL('config.metabib_field_id_seq', GREATEST(1000, (SELECT MAX(id) FROM config.metabib_field)));
  52
  53 COMMIT;