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

CSUN#40729 -- Automatisering Facilitor koppelingen (gebouwcode)

Browse Source 
svn path=/Customer/trunk/; revision=35542
This commit is contained in:
Arthur Egberink
2017-10-03 15:28:32 +00:00
parent ab48e790ca
commit f6e6b67a71
1 changed files with 42 additions and 18 deletions
Download Patch File Download Diff File Expand all files Collapse all files

60
CSUN/CSUN.sql
View File

@@ -663,26 +663,50 @@ AS
FROM prs_kenmerklink
WHERE prs_kenmerk_key = 1080 AND prs_link_key = v_perslid_key;
IF v_locatie_key = 28581 AND v_client = 462 -- Locatie key van locatie ONBEKEND and pilot voor RWS
IF v_locatie_key = 28581 -- Locatie key van locatie ONBEKEND
THEN
BEGIN
SELECT alg_locatie_key
INTO v_locatie_key
FROM alg_locatie l,
mld_kenmerkmelding km,
mld_kenmerk k,
alg_onrgoedkenmerk aogkk,
alg_onrgoedkenmerk aogkc
WHERE k.mld_srtkenmerk_key = 181 -- Klant locatiecode
AND k.mld_kenmerk_key = km.mld_kenmerk_key
AND km.mld_melding_key = p_key
AND UPPER (aogkk.alg_onrgoedkenmerk_waarde) =
UPPER (km.mld_kenmerkmelding_waarde)
AND aogkk.alg_onrgoed_key = l.alg_locatie_key
AND aogkk.alg_kenmerk_key = 1203 -- Klant locatiecode
AND fac.safe_to_number (aogkc.alg_onrgoedkenmerk_waarde) = v_client
AND aogkc.alg_onrgoed_key = l.alg_locatie_key
AND aogkc.alg_kenmerk_key = 1000; -- Client
IF v_client = 462 -- pilot voor RWS
OR v_client = 241 -- Arcadis
THEN
SELECT alg_locatie_key
INTO v_locatie_key
FROM alg_locatie l,
mld_kenmerkmelding km,
mld_kenmerk k,
alg_onrgoedkenmerk aogkk,
alg_onrgoedkenmerk aogkc
WHERE k.mld_srtkenmerk_key = 181 -- Klant locatiecode
AND k.mld_kenmerk_key = km.mld_kenmerk_key
AND km.mld_melding_key = p_key
AND UPPER (aogkk.alg_onrgoedkenmerk_waarde) =
UPPER (km.mld_kenmerkmelding_waarde)
AND aogkk.alg_onrgoed_key = l.alg_locatie_key
AND aogkk.alg_kenmerk_key = 1203 -- Klant locatiecode
AND fac.safe_to_number (aogkc.alg_onrgoedkenmerk_waarde) = v_client
AND aogkc.alg_onrgoed_key = l.alg_locatie_key
AND aogkc.alg_kenmerk_key = 1000; -- Client
ELSIF v_client = 621 -- DB Schenker
OR v_client = 641 -- Alliance
THEN
SELECT alg_locatie_key
INTO v_locatie_key
FROM alg_locatie l,
mld_kenmerkmelding km,
mld_kenmerk k,
alg_onrgoedkenmerk aogkk,
alg_onrgoedkenmerk aogkc
WHERE k.mld_srtkenmerk_key = 201 -- Klant gebouwcode
AND k.mld_kenmerk_key = km.mld_kenmerk_key
AND km.mld_melding_key = p_key
AND UPPER (aogkk.alg_onrgoedkenmerk_waarde) =
UPPER (km.mld_kenmerkmelding_waarde)
AND aogkk.alg_onrgoed_key = l.alg_locatie_key
AND aogkk.alg_kenmerk_key = 1203 -- Klant locatiecode
AND fac.safe_to_number (aogkc.alg_onrgoedkenmerk_waarde) = v_client
AND aogkc.alg_onrgoed_key = l.alg_locatie_key
AND aogkc.alg_kenmerk_key = 1000; -- Client
END IF;
DBMS_OUTPUT.put_line (v_locatie_key);