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

svn path=/Database/trunk/; revision=7261

Browse Source
This commit is contained in:
Erik Groener
1999-11-19 12:02:26 +00:00
parent f13d8cc3a4
commit 95b4e0f2a2
2 changed files with 123 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
PRJ/PRJ_PAC.SRC
View File

@@ -3714,7 +3714,7 @@ CREATE OR REPLACE PACKAGE BODY prj AS
FOR v_ruimte IN c_ruimte(p_projectkey)
LOOP
UPDATE alg_ruimte
SET alg_ruimte_nr = omschrijving
SET alg_ruimte_nr = v_ruimte.alg_ruimte_nr
, alg_verdieping_key = v_ruimte.alg_verdieping_key
, alg_ruimte_bruto_vloeropp = v_ruimte.alg_ruimte_bruto_vloeropp
, alg_ruimte_omtrek = v_ruimte.alg_ruimte_omtrek

129
_UP/310to311.src
View File

@@ -115,6 +115,70 @@ CREATE_VIEW(alg_v_verdieping_gegevens,ALG_NORMAAL_PRIVILEGE) AS
#ifdef INS
CREATE_VIEW(ins_v_deel_plaatsaanduiding_r,INS_NORMAAL_PRIVILEGE)
( alg_plaatsaanduiding
, prs_werkplek_key
, prs_werkplek_verwijder
, ins_deel_key
, ins_deel_omschrijving
, ins_deel_verwijder
, alg_verdieping_key)
AS SELECT ALG_G.alg_gebouw_code ||' - '
|| to_char(ALG_V.alg_verdieping_volgnr) ||' - '
|| ALG_R.alg_ruimte_nr
, to_number(NULL)
, to_date(NULL)
, INS_D.ins_deel_key
, INS_D.ins_deel_omschrijving
, INS_D.ins_deel_verwijder
, ALG_V.alg_verdieping_key
FROM ins_deel INS_D
, alg_ruimte ALG_R
, alg_verdieping ALG_V
, alg_gebouw ALG_G
WHERE INS_D.ins_alg_ruimte_key = ALG_R.alg_ruimte_key
AND INS_D.ins_alg_ruimte_type = 'R'
AND ALG_R.alg_verdieping_key = ALG_V.alg_verdieping_key
AND ALG_V.alg_gebouw_key = ALG_G.alg_gebouw_key;
/
CREATE_VIEW(ins_v_deel_plaatsaanduiding_w,INS_NORMAAL_PRIVILEGE)
( alg_plaatsaanduiding
, prs_werkplek_key
, prs_werkplek_verwijder
, ins_deel_key
, ins_deel_omschrijving
, ins_deel_verwijder
, alg_verdieping_key)
AS SELECT ALG_G.alg_gebouw_code ||' - '
|| to_char(ALG_V.alg_verdieping_volgnr) ||' - '
|| ALG_R.alg_ruimte_nr ||'/'
|| to_char(PRS_W.prs_werkplek_volgnr),
PRS_W.prs_werkplek_key
, PRS_W.prs_werkplek_verwijder
, INS_D.ins_deel_key
, INS_D.ins_deel_omschrijving
, INS_D.ins_deel_verwijder
, ALG_V.alg_verdieping_key
FROM ins_deel INS_D
, prs_werkplek PRS_W
, alg_ruimte ALG_R
, alg_verdieping ALG_V
, alg_gebouw ALG_G
WHERE INS_D.ins_alg_ruimte_key = PRS_W.prs_werkplek_key
AND INS_D.ins_alg_ruimte_type = 'W'
AND PRS_W.prs_alg_ruimte_key = ALG_R.alg_ruimte_key
AND ALG_R.alg_verdieping_key = ALG_V.alg_verdieping_key
AND ALG_V.alg_gebouw_key = ALG_G.alg_gebouw_key;
/
CREATE_VIEW(ins_v_deel_plaatsaanduiding,INS_NORMAAL_PRIVILEGE)
AS SELECT *
FROM ins_v_deel_plaatsaanduiding_r
UNION
SELECT *
FROM ins_v_deel_plaatsaanduiding_w;
/
#endif // INS
@@ -932,8 +996,8 @@ WHERE fac_message_code = 'FAC_M035';
#ifdef PRJ
DEF_FAC_MESSAGE ('PRJ_M068','<27> ');
DEF_FAC_MESSAGE ('PRJ_M069','Object dat buiten de projectvoorbereiding om is toegevoegd: ');
DEF_FAC_MESSAGE ('PRJ_M070','Werkplek dat buiten de projectvoorbereiding om is toegevoegd: ');
DEF_FAC_MESSAGE ('PRJ_M069','Object dat buiten het project om is toegevoegd: ');
DEF_FAC_MESSAGE ('PRJ_M070','Werkplek dat buiten het project om is toegevoegd: ');
DEF_FAC_MESSAGE ('PRJ_M071','Vraag projectleiding.');
CREATE_TRIGGER(cad_t_cad_tekening_B_IU)
@@ -957,6 +1021,47 @@ BEGIN
END;
/
CREATE_VIEW(prj_v_prj_deel_mag_delete, PRJ_NORMAAL_PRIVILEGE)
( alg_plaatsaanduiding
, ins_deel_omschrijving
, ins_deel_key
, ins_srtdeel_omschrijving
, prj_project_key
, alg_verdieping_key)
AS SELECT INS_P.alg_plaatsaanduiding
, INS_P.ins_deel_omschrijving
, PRJ_D.ins_deel_key
, INS_S.ins_srtdeel_omschrijving
, PRJ_D.prj_project_key
, INS_P.alg_verdieping_key
FROM prj_deel PRJ_D
, ins_v_deel_plaatsaanduiding_R INS_P
, ins_srtdeel INS_S
WHERE INS_P.ins_deel_key = PRJ_D.ins_deel_key
AND PRJ_D.ins_srtdeel_key = INS_S.ins_srtdeel_key
AND PRJ_D.ins_alg_ruimte_key = 0
AND PRJ_D.ins_alg_ruimte_type = 'R'
AND INS_P.ins_deel_verwijder IS NULL
UNION
SELECT INS_P.alg_plaatsaanduiding
, INS_P.ins_deel_omschrijving
, PRJ_D.ins_deel_key
, INS_S.ins_srtdeel_omschrijving
, PRJ_D.prj_project_key
, INS_P.alg_verdieping_key
FROM prj_deel PRJ_D
, ins_v_deel_plaatsaanduiding_W INS_P
, ins_srtdeel INS_S
, prj_werkplek PRJ_W
WHERE INS_P.ins_deel_key = PRJ_D.ins_deel_key
AND PRJ_D.ins_srtdeel_key = INS_S.ins_srtdeel_key
AND PRJ_D.ins_alg_ruimte_type = 'W'
AND PRJ_W.prs_werkplek_key = PRJ_D.ins_alg_ruimte_key
AND PRJ_W.prj_project_key = PRJ_D.prj_project_key
AND PRJ_W.prs_alg_ruimte_key = 0
AND INS_P.ins_deel_verwijder IS NULL;
/
CREATE OR REPLACE PACKAGE prj AS
FUNCTION prj_f_fac_get_description (LPNName IN VARCHAR2
,CondKey IN NUMBER
@@ -4624,7 +4729,7 @@ CREATE OR REPLACE PACKAGE BODY prj AS
FOR v_ruimte IN c_ruimte(p_projectkey)
LOOP
UPDATE alg_ruimte
SET alg_ruimte_nr = omschrijving
SET alg_ruimte_nr = v_ruimte.alg_ruimte_nr
, alg_verdieping_key = v_ruimte.alg_verdieping_key
, alg_ruimte_bruto_vloeropp = v_ruimte.alg_ruimte_bruto_vloeropp
, alg_ruimte_omtrek = v_ruimte.alg_ruimte_omtrek
@@ -4683,10 +4788,13 @@ CREATE OR REPLACE PACKAGE BODY prj AS
, p.ins_deel_getekend
, p.ins_deel_verwijder
, p.ins_discipline_key
FROM prj_v_deel_verwijderd_all c
, prj_deel p
, l.alg_verdieping_key
FROM prj_v_deel_verwijderd_all c
, prj_deel p
, ins_v_deel_plaatsaanduiding l
WHERE c.ins_deel_key = p.ins_deel_key
AND c.prj_project_key = p.prj_project_key
AND c.ins_deel_key = l.ins_deel_key
AND p.prj_project_key = p_project
AND EXISTS (SELECT ''
FROM prj_werkplek
@@ -4702,6 +4810,7 @@ CREATE OR REPLACE PACKAGE BODY prj AS
, d.ins_deel_getekend
, d.ins_deel_verwijder
, d.ins_discipline_key
, l.alg_verdieping_key
FROM prj_v_ins_deel_nieuw p
, ins_deel d
, ins_v_deel_plaatsaanduiding l
@@ -4723,9 +4832,12 @@ CREATE OR REPLACE PACKAGE BODY prj AS
INTO dummy
FROM cad_tekening
WHERE ins_discipline_key = v_object.ins_discipline_key
AND prj_project_key = p_projectkey;
AND alg_verdieping_key = v_object.alg_verdieping_key
AND prj_project_key = p_projectkey
AND rownum = 1;
--
-- Discipline komt in project voor.
--
UPDATE ins_deel
SET ins_deel_getekend = v_object.ins_deel_getekend
, ins_deel_verwijder = NVL(v_object.ins_deel_verwijder,sysdate)
@@ -4745,9 +4857,12 @@ CREATE OR REPLACE PACKAGE BODY prj AS
INTO dummy
FROM cad_tekening
WHERE ins_discipline_key = v_object.ins_discipline_key
AND prj_project_key = p_projectkey;
AND alg_verdieping_key = v_object.alg_verdieping_key
AND prj_project_key = p_projectkey
AND rownum = 1;
--
-- Discipline komt in project voor.
--
-- prj.verwerk_log('Object verwijderd: <20> '||to_char(v_object.ins_deel_key),p_session,p_projectkey);
UPDATE ins_deel
SET ins_deel_getekend = NULL