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

SORO#29825: ORO id nummer voor ICT objecten

Browse Source 
svn path=/Customer/trunk/; revision=21960
This commit is contained in:
Marcel Bourseau
2014-06-19 14:35:35 +00:00
parent 8d30e49d28
commit a3dc4f01c0
1 changed files with 13 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
SORO/soro.sql
View File

@@ -411,7 +411,19 @@ BEGIN
END soro_update_perslid;
/
BEGIN fac.registercustversion('SORO', 2); END;
-- SORO#29825: Unieke objectid loopt globaal over alle ICT objecten, alle ICT objecten moeten dan wel de objectsoortcode 'ORO' gaan krijgen.
CREATE OR REPLACE VIEW soro_v_ict_ins_volgnr
(volgnr)
AS SELECT 'ORO' || NVL(LPAD( TO_CHAR(MAX(TO_NUMBER(SUBSTR(ins_deel_upper, LENGTH('ORO')+1,LENGTH(ins_deel_upper)-LENGTH('ORO'))))+1) , MAX(LENGTH(ins_deel_upper)-LENGTH('ORO')),'0'),'001')
-- INTO NextVolgNr
FROM INS_DEEL
WHERE ins_deel_upper LIKE 'ORO'||'%'
AND fac.safe_to_integer(SUBSTR(ins_deel_upper, LENGTH('ORO')+1,LENGTH(ins_deel_upper)-LENGTH('ORO'))) IS NOT NULL
AND LTRIM(SUBSTR (ins_deel_upper, LENGTH ('ORO') + 1), '0') = TO_CHAR(fac.safe_to_integer ((SUBSTR (ins_deel_upper, LENGTH ('ORO') + 1))))
AND ins_deel_parent_key IS NULL
AND ins_deel_verwijder IS NULL;
BEGIN fac.registercustversion('SORO', 3); END;
/
BEGIN adm.systrackscriptId('$Id$', 0); END;