X-Git-Url: http://git.equinoxoli.org/?p=migration-tools.git;a=blobdiff_plain;f=sql%2Fbase%2Fbase.sql;h=a39f28766ec0b201753100d82b9aeff272d812d2;hp=ef2f1388a58cf7688353fe7fe0801aa783c79f45;hb=fc81fa6276f08ff5cb4cc7b2ae38187fad955b2a;hpb=8c097f26e9b9152638d205b82c9137046fd06224

diff --git a/sql/base/base.sql b/sql/base/base.sql
index ef2f138..a39f287 100644
--- a/sql/base/base.sql
+++ b/sql/base/base.sql
@@ -2570,3 +2570,17 @@ CREATE OR REPLACE FUNCTION migration_tools.assert (BOOLEAN,TEXT,TEXT) RETURNS TE
     END;
 $$ LANGUAGE PLPGSQL STRICT VOLATILE;
 
+CREATE OR REPLACE FUNCTION migration_tools.push_bib_sequence(INTEGER) RETURNS BIGINT AS $$
+    DECLARE
+        bib_count ALIAS FOR $1;
+        output BIGINT;
+    BEGIN
+        PERFORM setval('biblio.record_entry_id_seq',(SELECT MAX(id) FROM biblio.record_entry) + bib_count + 2000);
+        FOR output IN
+            SELECT CEIL(MAX(id)/1000)*1000+1000 FROM biblio.record_entry WHERE id < (SELECT last_value FROM biblio.record_entry_id_seq)
+        LOOP
+            RETURN output;
+        END LOOP;
+    END;
+$$ LANGUAGE PLPGSQL STRICT VOLATILE;
+