FSN#14217 unique volgnummer

svn path=/Database/trunk/; revision=9789
This commit is contained in:
Jos Groot Lipman
2008-07-10 11:33:30 +00:00
parent af80b06035
commit 5dd321af6a

View File

@@ -1,8 +1,8 @@
#ifdef PRJ
/* PRJ_PAC.SRC
*
* $Revision: 52 $
* $Modtime: 14-02-08 13:58 $
* $Revision: 53 $
* $Modtime: 10-07-08 13:22 $
*/
/*
CODE COMMENTS, CONSIDERATIONS
@@ -1022,6 +1022,8 @@ AS
AND wp.prj_werkplek_verwijder IS NULL
AND wp.prs_werkplek_key IS NOT NULL
AND rx.prj_scenario_key = sk;
werkplek_nr PRJ_WERKPLEK.prs_werkplek_volgnr%TYPE;
BEGIN
BEGIN
-- Bestaande ruimtes aanpassen
@@ -1067,9 +1069,15 @@ AS
-- Bestaande werkplekken aanpassen
FOR cr IN werkplek_updates (pscenariokey)
LOOP
werkplek_nr :=
forceuniqueness ('PRS_WERKPLEK',
cr.alg_ruimte_key,
TO_CHAR (cr.prj_werkplek_volgnr),
NULL
);
UPDATE prs_werkplek r
SET prs_alg_ruimte_key = cr.alg_ruimte_key,
prs_werkplek_volgnr = cr.prj_werkplek_volgnr,
prs_werkplek_volgnr = werkplek_nr,
prs_werkplek_omschrijving = cr.prj_werkplek_omschrijving,
prs_werkplek_vastopp = cr.prj_werkplek_vastopp,
prs_werkplek_opp = cr.prj_werkplek_opp,