midsuit
/
core-jgi
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Postgres fix of post migration process to update sequences

This commit is contained in:
Carlos Ruiz 2008-11-25 02:04:50 +00:00
parent 9e781224ab
commit c696064fc8
1 changed files with 11 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
migration/processes_post_migration/postgresql/03_update_sequences.sql
View File

@ -25,7 +25,7 @@ BEGIN
cmdsys :=
'SELECT MAX ('
|| r.tablename
|| '_id) currentnextsys FROM '
|| '_id) as currentnextsys FROM '
|| r.tablename
|| ' where '
|| r.tablename
@ -46,15 +46,15 @@ BEGIN
currentnextsys := 0;
END IF;
SELECT INTO currentnextsys DECODE (SIGN (currentnextsys - 50000),
-1, 50000,
NVL (currentnextsys + 1, 50000)
);
SELECT INTO currentnextsys CASE SIGN (currentnextsys - 50000)
WHEN -1 THEN 50000
ELSE coalesce (currentnextsys + 1, 50000)
END;
cmdnosys :=
'SELECT MAX ('
|| r.tablename
|| '_id) currentnext FROM '
|| '_id) as currentnext FROM '
|| r.tablename
|| ' where '
|| r.tablename
@ -67,10 +67,10 @@ BEGIN
currentnext := 0;
END IF;
SELECT INTO currentnext DECODE (SIGN (currentnext - 1000000),
-1, 1000000,
NVL (currentnext + 1, 1000000)
);
SELECT INTO currentnext CASE SIGN (currentnext - 1000000)
WHEN -1 THEN 1000000
ELSE coalesce (currentnext + 1, 1000000)
END ;
cmdseq :=
'SELECT currentnext, currentnextsys FROM AD_Sequence '
@ -101,4 +101,4 @@ $func$ LANGUAGE plpgsql;
select update_sequences();
commit;
commit;