Files
Database/_UP/116TO117.SRC
1998-09-23 08:56:36 +00:00

336 lines
11 KiB
Plaintext

SPOOL 116to117
/*
* [V:\SQL\_UPDATE]
*
* Update script van versie 01.16 naar 01.17
*
* Dit script wordt geprecompileerd dus is het mogelijk (verplicht)
* om #ifdef's te gebruiken voor de diverse modules.
*
* History:
*
* 25-06-96 EH Entities ALG_VERDIEPING_OPP en ALG_GEBOUW_OPP toegevoegd.
* 25-06-96 EH View prevopdr_gegevens aangepast; view openprevopdr_gegevens
* verwijderd (redundant).
* 21-06-96 AH INV-messages 028 en 016 aangepast.
* 21-06-96 EH Message prs_m053 toegevoegd.
* 20-06-96 AH UNIQUE op PRS_WERKPLEK uitgebreid met PRS_WERKPLEK_MODULE.
* 19-06-96 EH Entity 'ALG_TERREINSECTOR_B' (voor button) toegevoegd.
* 13-06-96 EH De volgende indices toegevoegd:
* - mld_alg_kostenpost_key aan mld_opdr
* - mld_opdr_key aan mld_bestelregel
* - mld_opdr_key aan bco_werkregel
* - mld_statusopdr_key aan bcp_prevopdr
* - bcp_prevopdr_key aan bco_werkregel
* - mra_eenheid aan mld_melding
* - mra_veroorzaker aan mld_melding
* 13-06-96 EH Indices voor LEV toegevoegd.
* 13-06-96 EH Indices voor SLE toegevoegd.
* 13-06-96 AH INV_M024 en INV_M030 saangepast.
* 10-06-96 EH Fac_message SCH_NIVO2 toegevoegd.
* 10-06-96 EH In ins_v_attr_hulp ins_v_.. veranderd in all_v ...
* 10-06-96 AH PRS_M052 toegevoegd.
* 07-06-96 KTH fac_privilege.object_name moeten UPPERs zijn (zie COMSQL.H)
* 07-06-96 EH alg_locatie_key toegevoegd aan ins_v_onderdeel_gegevens
* 07-06-96 EH UNIQUE constraint op srtinst tabellen uitgebreid.
* 06-06-96 AH PRS_WERKPLEK_MODULE toegevoegd.
* 05-06-96 KTH Lege file aangemaakt.
*/
#include "comsql.h"
update fac_privilege set object_name=UPPER(object_name);
DEF_FAC_MESSAGE ('SCH_NIVO2','Schoonmaakniveau');
DEF_FAC_MESSAGE ('PRS_M053', 'Afdeling moet worden ingevuld');
DEF_FAC_ENTITY ('ALG_VERDIEPING_OPP', 'Netto vloeropp.', NULL, NULL);
DEF_FAC_ENTITY ('ALG_GEBOUW_OPP', 'Netto vloeropp.', NULL, NULL);
#ifdef PRS
ALTER TABLE prs_werkplek
ADD
( prs_werkplek_module
VARCHAR2(3)
DEFAULT 'PRR');
UPDATE prs_werkplek
SET prs_werkplek_module = 'PRR';
ALTER TABLE prs_werkplek
MODIFY
(
prs_werkplek_module
NOT NULL
);
#endif
#ifdef SLE
CREATE INDEX sle_i_sle_sleutel_perslid1 ON sle_sleutel_perslid(sle_prs_perslid_key);
CREATE INDEX sle_i_sle_sleutel_perslid2 ON sle_sleutel_perslid(sle_sleutel_key);
CREATE INDEX sle_i_sle_sleutel_slot1 ON sle_sleutel_slot(sle_sleutel_key);
CREATE INDEX sle_i_sle_sleutel_slot2 ON sle_sleutel_slot(sle_slot_key);
CREATE INDEX sle_i_sle_slot ON sle_slot(sle_alg_onroerendgoed_keys);
#endif
#ifdef LEV
CREATE INDEX lev_i_lev_bestelling1 ON lev_bestelling (lev_alg_kostenpost_key);
CREATE INDEX lev_i_lev_bestelling2 ON lev_bestelling (lev_prs_bedrijf_key);
CREATE INDEX lev_i_lev_bestelling3 ON lev_bestelling (lev_prs_perslid_key);
CREATE INDEX lev_i_lev_bestelling4 ON lev_bestelling (lev_alg_gebouw_key);
CREATE INDEX lev_i_lev_bestelregel1 ON lev_bestelregel (lev_bestelling_key);
CREATE INDEX lev_i_lev_bestelregel2 ON lev_bestelregel (lev_ins_srtdeel_key);
CREATE INDEX lev_i_lev_bestelregel3 ON lev_bestelregel (lev_alg_ruimte_key);
CREATE INDEX lev_i_lev_levering ON lev_levering (lev_prs_bedrijf_key);
#endif
#ifdef MLD
CREATE INDEX mld_i_mld_opdr7 on mld_opdr(mld_alg_kostenpost_key);
CREATE INDEX mld_i_mld_bestelregel2 on mld_bestelregel(mld_opdr_key);
#endif
#ifdef BCO
CREATE INDEX bco_i_bco_werkregel2 on bco_werkregel(bco_mld_opdr_key);
#endif
#ifdef BCP
CREATE INDEX bcp_i_bcp_prevopdr4 on bcp_prevopdr(bcp_mld_statusopdr_key);
CREATE INDEX bcp_i_bco_werkregel1 on bco_werkregel(bcp_prevopdr_key);
CREATE_VIEW(bcp_v_prevopdr_gegevens,NORMAAL_PRIVILEGE)
( bcp_prevopdr_key,
bcp_prevopdr_status,
bcp_prevopdr_jaarweek,
bcp_prevopdr_discipline,
bcp_prevopdr_locatie) AS
SELECT BCP_P.bcp_prevopdr_key,
MLD_S.mld_statusopdr_omschrijving,
BCP_P.bcp_prevopdr_week,
INS_D.ins_discipline_omschrijving,
ALG_L.alg_locatie_omschrijving
FROM bcp_prevopdr BCP_P,
mld_statusopdr MLD_S,
bcp_taak BCP_T,
bcp_v_aanwezigverzamel BCP_V,
ins_v_aanwezigsrtdeel INS_SD,
ins_srtgroep INS_SG,
ins_discipline INS_D,
alg_v_aanweziggebouw ALG_G,
alg_locatie ALG_L
WHERE BCP_P.bcp_mld_statusopdr_key = MLD_S.mld_statusopdr_key
AND BCP_P.bcp_taak_key = BCP_T.bcp_taak_key
AND BCP_T.bcp_verzamel_key = BCP_V.bcp_verzamel_key
AND BCP_V.bcp_ins_srtdeel_key = INS_SD.ins_srtdeel_key
AND INS_SD.ins_srtgroep_key = INS_SG.ins_srtgroep_key
AND INS_SG.ins_discipline_key = INS_D.ins_discipline_key
AND BCP_T.bcp_alg_gebouw_key = ALG_G.alg_gebouw_key
AND ALG_G.alg_locatie_key = ALG_L.alg_locatie_key;
DROP VIEW bcp_v_openprevopdr_gegevens;
#endif
#ifdef MRA
CREATE INDEX mra_i_mra_melding2 on mld_melding(mra_melding_melder_eenheid);
CREATE INDEX mra_i_mra_melding3 on mld_melding(mra_melding_veroorzaker);
#endif
#ifdef INS
ALTER TABLE ins_discipline
DROP
UNIQUE(ins_discipline_omschrijving, ins_discipline_verwijder);
ALTER TABLE ins_srtgroep
DROP
UNIQUE(ins_srtgroep_upper, ins_srtgroep_verwijder);
ALTER TABLE ins_srtdeel
DROP
UNIQUE(ins_srtdeel_upper, ins_srtdeel_verwijder);
ALTER TABLE ins_discipline
ADD
(
UNIQUE(ins_discipline_omschrijving, ins_discipline_verwijder,
ins_discipline_module)
);
ALTER TABLE ins_srtgroep
ADD
(
UNIQUE(ins_srtgroep_upper, ins_srtgroep_verwijder, ins_srtgroep_module)
);
ALTER TABLE ins_srtdeel
ADD
(
UNIQUE(ins_srtdeel_upper,ins_srtdeel_verwijder, ins_srtdeel_module)
);
DROP VIEW ins_v_onderdeel_gegevens;
CREATE VIEW ins_v_onderdeel_gegevens
(
ins_srtdeel_key, ins_srtdeel_omschrijving,
ins_srtdeel_upper, ins_srtonderdeel_key,
ins_srtonderdeel_omschrijving, ins_srtonderdeel_upper,
ins_deel_key, ins_deel_omschrijving,
ins_deel_upper, ins_onderdeel_key,
ins_onderdeel_omschrijving, ins_onderdeel_aantal,
ins_onderdeel_fabrikaat, ins_onderdeel_type,
ins_onderdeel_serienr,ins_onderdeel_bouwjaar,
ins_onderdeel_capaciteit, ins_onderdeel_prijs,
ins_onderdeel_levensduur, ins_onderdeel_opmerking,
ins_onderdeel_upper, alg_locatie_key,
alg_gebouw_key, alg_gebouw_upper, alg_verdieping_key,
alg_verdieping_upper, alg_ruimte_key, alg_ruimte_nr,
plaatsdeel_omschrijving
)
AS
SELECT ins_D.ins_srtdeel_key, ins_D.ins_srtdeel_omschrijving,
ins_D.ins_srtdeel_upper, ins_SOD.ins_srtonderdeel_key,
ins_SOD.ins_srtonderdeel_omschrijving, ins_SOD.ins_srtonderdeel_upper,
ins_D.ins_deel_key, ins_D.ins_deel_omschrijving,
ins_D.ins_deel_upper, ins_OD.ins_onderdeel_key,
ins_OD.ins_onderdeel_omschrijving, ins_OD.ins_onderdeel_aantal,
ins_OD.ins_onderdeel_fabrikaat, ins_OD.ins_onderdeel_type,
ins_OD.ins_onderdeel_serienr,ins_OD.ins_onderdeel_bouwjaar,
ins_OD.ins_onderdeel_capaciteit, ins_OD.ins_onderdeel_prijs,
ins_OD.ins_onderdeel_levensduur, ins_OD.ins_onderdeel_opmerking,
ins_OD.ins_onderdeel_upper, ins_D.alg_locatie_key,
ins_D.alg_gebouw_key, ins_D.alg_gebouw_upper,
ins_D.alg_verdieping_key, ins_D.alg_verdieping_upper,
ins_D.alg_ruimte_key, ins_D.alg_ruimte_nr,
ins_D.plaatsdeel_omschrijving
FROM ins_v_aanwezigsrtonderdeel ins_SOD,
ins_v_aanwezigonderdeel ins_OD,
ins_v_deel_gegevens ins_D
WHERE
ins_SOD.ins_srtonderdeel_key = ins_OD.ins_srtonderdeel_key AND
ins_D.ins_deel_key = ins_OD.ins_deel_key;
CREATE_VIEW(ins_v_attr_hulp, NORMAAL_PRIVILEGE)
(ins_discipline_key,
ins_srtgroep_key,
ins_srtdeel_key,
ins_attribute_main_key) AS
SELECT INS_A.ins_srtinst_keys,
TO_NUMBER(NULL),
TO_NUMBER(NULL),
INS_A.ins_attribute_main_key
FROM ins_attribute INS_A
WHERE INS_A.ins_srtinst_type = 'D'
UNION
SELECT TO_NUMBER(NULL),
INS_A.ins_srtinst_keys,
TO_NUMBER(NULL),
INS_A.ins_attribute_main_key
FROM ins_attribute INS_A
WHERE INS_A.ins_srtinst_type = 'G'
UNION
SELECT TO_NUMBER(NULL),
INS_SG.ins_srtgroep_key,
TO_NUMBER(NULL),
INS_A.ins_attribute_main_key
FROM ins_attribute INS_A,
ins_srtgroep INS_SG
WHERE INS_A.ins_srtinst_type = 'D' AND
INS_A.ins_srtinst_keys = INS_SG.ins_discipline_key
UNION
SELECT TO_NUMBER(NULL),
TO_NUMBER(NULL),
INS_A.ins_srtinst_keys,
INS_A.ins_attribute_main_key
FROM ins_attribute INS_A
WHERE INS_A.ins_srtinst_type = 'S'
UNION
SELECT TO_NUMBER(NULL),
TO_NUMBER(NULL),
INS_SD.ins_srtdeel_key,
INS_A.ins_attribute_main_key
FROM ins_attribute INS_A,
ins_srtdeel INS_SD
WHERE INS_A.ins_srtinst_type = 'G' AND
INS_A.ins_srtinst_keys = INS_SD.ins_srtgroep_key
UNION
SELECT TO_NUMBER(NULL),
TO_NUMBER(NULL),
INS_SDG.ins_srtdeel_key,
INS_A.ins_attribute_main_key
FROM ins_attribute INS_A,
all_v_srtdeel_gegevens INS_SDG
WHERE INS_A.ins_srtinst_type = 'D' AND
INS_A.ins_srtinst_keys = INS_SDG.ins_discipline_key;
#endif
INSERT INTO fac_message VALUES('PRS_M052', 'Inzetbaar voor storing');
DELETE FROM fac_message
WHERE UPPER(fac_message_code) = 'INV_M024';
INSERT INTO fac_message VALUES('INV_M024', 'De plaats is niet ingevuld.');
DELETE FROM fac_message
WHERE UPPER(fac_message_code) = 'INV_M030';
INSERT INTO fac_message VALUES('INV_M030', 'Inventaris in ruimte');
DELETE FROM fac_message
WHERE UPPER(fac_message_code) = 'INV_M028';
INSERT INTO fac_message VALUES('INV_M028', 'De eigenaar is niet ingevuld.');
DELETE FROM fac_message
WHERE UPPER(fac_message_code) = 'INV_M016';
INSERT INTO fac_message VALUES('INV_M016', 'Eigenaar van inventaris');
#if defined(PMK)||defined(pmk)
DEF_FAC_ENTITY ('ALG_TERREINSECTOR_B', 'Syst. cluster', Null, Null);
#else
DEF_FAC_ENTITY ('ALG_TERREINSECTOR_B', 'Terreinsector', 'Terreinsectoren', 'de');
#endif
#ifdef PRS
ALTER TABLE prs_werkplek
DROP UNIQUE(prs_werkplek_volgnr, prs_alg_ruimte_key, prs_werkplek_verwijder);
ALTER TABLE prs_werkplek
ADD UNIQUE(prs_werkplek_module, prs_werkplek_volgnr, prs_alg_ruimte_key, prs_werkplek_verwijder);
#endif
#ifdef LEV
ALTER TABLE ins_deel
DROP
UNIQUE(ins_alg_ruimte_key, ins_srtdeel_key, ins_deel_upper,
lev_levering_key, lev_bestelling_key, lev_afvoerlijst_datum,
ins_deel_verwijder);
ALTER TABLE ins_deel
ADD
UNIQUE(ins_alg_ruimte_key, ins_prs_bezit_key, ins_srtdeel_key, ins_deel_upper,
lev_levering_key, lev_bestelling_key, lev_afvoerlijst_datum,
ins_deel_verwijder);
#endif
SPOOL OFF