admin/Database
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

VOLK#71732 prs.move_to_ruimte slimmer?

Browse Source 
svn path=/Database/trunk/; revision=55396
This commit is contained in:
Erik Groener
2022-03-28 07:10:00 +00:00
parent cf791dfbdf
commit 1c41491590
6 changed files with 14 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
FAC/FAC_TAB.SRC
View File

@@ -1018,7 +1018,7 @@ CREATE_TABLE(fac_imp_perslid, 0)
,alg_gebouw_code VARCHAR2(12)
,alg_verdieping_volgnr NUMBER(3,0)
,alg_ruimte_nr VARCHAR2(20)
,prs_werkplek_volgnr NUMBER (3)
,prs_werkplek_volgnr NUMBER (8)
,prs_werkplek_omschrijving VARCHAR2 (30)
,prs_afdeling_naam VARCHAR2 (15)
,prs_perslid_naam VARCHAR2 (60)

12
PRJ/PRJ_PAC.SRC
View File

@@ -148,11 +148,11 @@ AS
AND w.prs_alg_ruimte_key = parent_key
AND w.prs_werkplek_volgnr = TO_NUMBER (element_omschrijving);
-- Gevonden, dus niet uniek. Probeer het met een sterretje ervoor, passen ze dat later maar zelf aan
IF TO_NUMBER (element_omschrijving) = 999
IF TO_NUMBER (element_omschrijving) = 99999999
THEN
-- Ik kan met 3 cijfers niet hoger, begin opnieuw onderaan (to prevent infinite recursion)
-- Ik kan met 8 cijfers niet hoger, begin opnieuw onderaan (to prevent infinite recursion)
omschrijving :=
forceuniqueness (element_type, parent_key, '000', NULL);
forceuniqueness (element_type, parent_key, '00000000', NULL);
ELSE
omschrijving :=
forceuniqueness (element_type,
@@ -180,11 +180,11 @@ AS
AND w.prj_werkplek_volgnr = element_omschrijving
AND w.prj_werkplek_verwijder IS NULL;
-- Gevonden, dus niet uniek. Probeer het met een sterretje ervoor, passen ze dat later maar zelf aan
IF TO_NUMBER (element_omschrijving) = 999
IF TO_NUMBER (element_omschrijving) = 99999999
THEN
-- Ik kan met 3 cijfers niet hoger, begin opnieuw onderaan (to prevent infinite recursion)
-- Ik kan met 8 cijfers niet hoger, begin opnieuw onderaan (to prevent infinite recursion)
omschrijving :=
forceuniqueness (element_type, parent_key, '000', NULL);
forceuniqueness (element_type, parent_key, '00000000', NULL);
ELSE
omschrijving :=
forceuniqueness (element_type,

2
PRJ/PRJ_TAB.SRC
View File

@@ -96,7 +96,7 @@ CREATE_TABLE(prj_werkplek, 0)
NUMBER(10)
CONSTRAINT prj_r_prs_werkplek_key REFERENCES prs_werkplek(prs_werkplek_key) ON DELETE CASCADE,
prj_werkplek_volgnr
NUMBER(4)
NUMBER(8)
NOT_NULL(prj_werkplek_volgnr, prj_c_prj_werkplek_volgnr),
prj_werkplek_omschrijving
VARCHAR2(30),

2
PRS/PRS_PAC.SRC
View File

@@ -759,7 +759,7 @@ AS
INTO v_wp_volgnr
FROM ( SELECT LEVEL ll
FROM DUAL
CONNECT BY LEVEL <= 9999
CONNECT BY LEVEL <= 99999999
MINUS
SELECT prs_werkplek_volgnr
FROM prs_werkplek

2
PRS/PRS_TAB.SRC
View File

@@ -506,7 +506,7 @@ CREATE_TABLE(prs_werkplek,0)
prs_werkplek_module
VARCHAR2(3),
prs_werkplek_volgnr
NUMBER(4)
NUMBER(8)
NOT_NULL(prs_werkplek_volgnr, prs_c_prs_werkplek_volgnr),
prs_werkplek_omschrijving
VARCHAR2(30),

5
_UP/DB41to42.src
View File

@@ -121,8 +121,11 @@ DEF_FAC_SRTNOT('INSMEN', 0, 'lcl_noti_INSMEN', 'ins/ins_deel.asp?ins_key=', '0',
DEF_FAC_SRTNOT('MLDMEN', 0, 'lcl_noti_MLDMEN', 'mld/mld_melding.asp?mld_key=', '0', 'melding', 10);
DEF_FAC_SRTNOT('ORDMEN', 0, 'lcl_noti_ORDMEN', 'mld/mld_opdr.asp?opdr_key=', '0', 'opdracht', 10);
/////////////////////////////////////////////////////////////////////////////////////////// VOLK#71732
ALTER TABLE prs_werkplek MODIFY prs_werkplek_volgnr NUMBER(8);
ALTER TABLE prj_werkplek MODIFY prj_werkplek_volgnr NUMBER(8);
/////////////////////////////////////////////////////////////////////////////////////////// FCLT#00000
///////////////////////////////////////////////////////////////////////////////////////////
REGISTERONCE('$Id$')