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

SGGR#84850 indexatie savepoint (plus nog wat)

Browse Source 
svn path=/Customer/trunk/; revision=66995
This commit is contained in:
Peter Feij
2024-11-12 09:42:37 +00:00
parent 6169a959fe
commit ffa8df862a
1 changed files with 22 additions and 16 deletions
Download Patch File Download Diff File Expand all files Collapse all files

38
SGGR/sggr.sql
View File

@@ -513,7 +513,7 @@ AS
x.cnt_contract_kosten,
x.cnt_contract_termijnkosten,
DECODE (pc_aip.afwijkend_indexperc,
NULL, COALESCE (c_aip.afwijkend_indexperc, 6.4), -- Afwijkend index-percentage op contract en anders 6.4%
NULL, COALESCE (c_aip.afwijkend_indexperc, 7.4), -- Afwijkend index-percentage op contract en anders 6.4%
pc_aip.afwijkend_indexperc) -- Afwijkend index-percentage op mantelcontract
indexpct
FROM (SELECT c.*
@@ -559,7 +559,7 @@ AS
AND COALESCE (li.laatste_indexdatum, SYSDATE) < p_splitsindexdatum
ORDER BY TO_NUMBER (x.cnt_contract_nummer_intern);
c_splitsindexdatum DATE := TO_DATE ('01012024', 'ddmmyyyy'); -- Per 01-01-2024!
c_splitsindexdatum DATE := TO_DATE ('01012025', 'ddmmyyyy'); -- Per 01-01-2025!
v_errorhint VARCHAR2 (1000);
v_errormsg VARCHAR2 (1000);
oracle_err_num NUMBER;
@@ -632,7 +632,7 @@ AS
END IF;
END;
BEGIN
-- Splitsen en indexeren FACILITOR-contracten.
-- Indexeren doorlopende FACILITOR-contracten.
FOR rc IN ccnt (c_splitsindexdatum)
LOOP
BEGIN
@@ -4007,24 +4007,31 @@ BEGIN
-- de juiste mailadressen eruit filteren
UPDATE fac_imp_perslid i
SET i.prs_perslid_email =
(SELECT REPLACE (SUBSTR (REGEXP_SUBSTR (p.prs_perslid_email,
'(.*)(@aareon.nl)',
(SELECT REPLACE (SUBSTR (REGEXP_SUBSTR (p.prs_perslid_email,
'(.*)(@aareon.)',
1,
1,
NULL,
1),
INSTR ((REGEXP_SUBSTR (p.prs_perslid_email,
'(.*)(@aareon.nl)',
1,
1,
NULL,
1)),
';',
-1)),
NVL (INSTR ((REGEXP_SUBSTR (p.prs_perslid_email,
'(.*)(@aareon.)',
1,
1,
NULL,
1)),
';',
-1),
0)),
'; ')
|| '@aareon.nl' mailto
|| CASE
WHEN UPPER (p.prs_perslid_email) LIKE '%@AAREON.COM%'
THEN
'@aareon.com'
ELSE
'@aareon.nl'
END mailto
FROM fac_imp_perslid p
WHERE p.fac_imp_file_index = i.fac_imp_file_index );
WHERE p.fac_imp_file_index = i.fac_imp_file_index);
-- De juiste afdelingen bepalen
UPDATE fac_imp_perslid i
@@ -4036,7 +4043,6 @@ BEGIN
AND b.prs_bedrijf_verwijder IS NULL
AND a.prs_afdeling_verwijder IS NULL
AND UPPER (a.prs_afdeling_omschrijving) = UPPER (i.prs_kenmerk19));
END sggr_import_perslid;
/