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

PCBO#74850 Implementatie PCBO thema schoonmaak

Browse Source 
svn path=/Customer/trunk/; revision=61674
This commit is contained in:
Suzan Wiegerinck
2023-08-31 12:34:29 +00:00
parent 697047c744
commit 82981127d5
1 changed files with 35 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

37
PCBO/PCBO.sql
View File

@@ -78,7 +78,7 @@ AS
AND k.fac_kenmerkdomein_key = rk.fac_kenmerkdomein_key
AND TO_CHAR (ud.fac_usrdata_key) =
ok.alg_onrgoedkenmerk_waarde
AND k.alg_kenmerk_key = 1101
AND k.alg_kenmerk_key = 1160
AND rr.alg_ruimte_key = ok.alg_onrgoed_key) gf
WHERE gf.alg_ruimte_key (+) = r.alg_ruimte_key;
@@ -163,7 +163,40 @@ AS
AND k.alg_kenmerk_key = 1161
AND rr.alg_ruimte_key = ok.alg_onrgoed_key) va
WHERE va.alg_ruimte_key = r.alg_ruimte_key;
CREATE OR REPLACE VIEW PCBO_V_CAD_THEMA_SCHOONM
(
ALG_RUIMTE_KEY,
WAARDE,
WAARDE_KEY
)
AS
SELECT r.alg_ruimte_key, COALESCE(gf.fac_usrdata_omschr, 'Onbekend'), COALESCE(gf.fac_usrdata_key, 161)
from alg_ruimte r,
(SELECT rr.alg_ruimte_key, ud.fac_usrdata_omschr, ud.fac_usrdata_key
FROM alg_onrgoedkenmerk ok,
fac_usrdata ud,
fac_kenmerkdomein rk,
alg_kenmerk k,
alg_v_aanwezigruimte rr
WHERE rk.fac_usrtab_key = ud.fac_usrtab_key
AND k.fac_kenmerkdomein_key = rk.fac_kenmerkdomein_key
AND TO_CHAR (ud.fac_usrdata_key) =
ok.alg_onrgoedkenmerk_waarde
AND k.alg_kenmerk_key = 1320
AND rr.alg_ruimte_key = ok.alg_onrgoed_key) gf
WHERE gf.alg_ruimte_key (+) = r.alg_ruimte_key;
CREATE OR REPLACE TRIGGER pcbo_t_thema_schoonm_i_iu
INSTEAD OF INSERT OR UPDATE
ON PCBO_V_CAD_THEMA_SCHOONM
FOR EACH ROW
BEGIN
--- kenmerk bijwerken, let op: de nieuwe waarde is de key en dus niet de omschrijving
alg.upsertkenmerk (1320, :new.alg_ruimte_key, :new.waarde_key);
END;
/
------ payload end ------
SET DEFINE OFF