admin/Database
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
Files
3982c4b3b782a2184aa0ffa2129fafc721323eb3
Database/_UP/IBG2to3.SQL
Bert in het Veld 17ccb59e25 Ophogen sequence PRS_S_PRS_ALLUITVOERENDE_KEYS ging fout als table 
prs_bedrijf leeg was. Code aangepast !

svn path=/Database/trunk/; revision=6963
1999-07-16 10:22:22 +00:00

1040 lines
35 KiB
Plaintext
Raw Blame History

--****************************************************************
--Coversie-statements IBG
-- De 2.0 data van IBG staat in ibg0133/i
-- De 3.0 data voor IBG gaan naar IBG3/i
-- last update : BIV/16-jul-1999 - Ophogen sequence PRS_S_PRS_ALLUITVOERENDE_KEYS ging fout
-- als table prs_bedrijf leeg was. Code aangepast !
--****************************************************************
CONNECT IBG0133/I
/*
--LET OP!!!!.
-->VIEW AANPASSEN: zie hieronder!!!!!!!!!!!!!!!!!!!
-->Zoek op string ***BEFORE_RUN_SCRIPT***!!!!!!!!!!!!!!!!!!!!
Na conversie 'goede' trigger weer herstellen (ins_t_ins_deel_B_IU)
-->Zoek op RD*****
-->Veranderingen in Database-definitie na bovengenoemde datum!!!!
-->Bij INS_DEEL wordt de (redundante) locatie_key altijd op 1 gezet: er zijn weliswaar...
meerdere locaties, echter alle delen staan op slechts 1 locatie. Als dit
bij de werkelijke conversie niet meer het geval is moeten er aanpassingen komen!
10-jul-1999: er zijn weliswaar 2 locaties, echter alle delen staan op locatie 1 zodat
aanpassingen niet noodzakelijk zijn.
-->Controleer bij de werkelijke conversie of inderdaad geen records bestaan bij die
tabellen die tijdens het aanmaken van dit script 0 records hadden. {tip: kijk bij
'grant select on ... 0 RECORDS!'}.
10-jul-1999: gecontroleerd.
*/
--OPM.
--FAC tables worden niet geconverteerd.
--Tabel INS_DISCIPLINE heet nu INS_TAB_DISCIPLINE.
--Conversie MLD_MELDING niet nodig (op advies van PF/20apr1999)
--grant select on TMP_INS_SRTDEEL TO IBG3; -- 0 RECORDS!
--grant select on PRS_LOCATIEBESTEK TO IBG3; -- 0 RECORDS!
--grant select on PRS_DISCIPLINEBESTEK TO IBG3; -- 0 RECORDS!
--grant select on PRS_BESTEK TO IBG3; -- 0 RECORDS!
--grant select on ALG_SRTTERREIN TO IBG3; -- 0 RECORDS!
--grant select on ALG_SRTVERDIEPING TO IBG3; -- 0 RECORDS!
--grant select on ALG_BOUWDEEL TO IBG3; -- 0 RECORDS!
--grant select on FAC_ERROR TO IBG3; -- 0 RECORDS!
--grant select on ALG_OBJECTDEEL TO IBG3; -- 0 RECORDS!
--grant select on ALG_SYSTEEMCLUSTER TO IBG3; -- 0 RECORDS!
--grant select on FAC_GEBRUIKER TO IBG3; -- 0 RECORDS!
--grant select on FAC_RAPPORT TO IBG3; -- 0 RECORDS!
--grant select on FAC_SELECTIE TO IBG3; -- 0 RECORDS!
--grant select on FAC_VOLGNRS TO IBG3; -- 0 RECORDS!
--grant select on INS_IMPORT TO IBG3; -- 0 RECORDS!
--grant select on FAC_ENTITY_NAME TO IBG3; -- 813 records
--grant select on FAC_FORM TO IBG3; -- 110 records
--grant select on FAC_MESSAGE TO IBG3; -- 1323 records
--grant select on FAC_MODULE TO IBG3; -- 10 records
--grant select on FAC_PRIVILEGE TO IBG3; -- 176 records
--grant select on INS_KENMERK TO IBG3; -- BESTAAT NIET in IBG 2.0
--grant select on FAC_ROL TO IBG3; -- BESTAAT NIET in IBG 2.0
--grant select on ALG_KENMERK TO IBG3; -- BESTAAT NIET in IBG 2.0
--grant select on ALG_ONRGOEDKENMERK TO IBG3; -- BESTAAT NIET in IBG 2.0
--grant select on ALG_REFKENMERK TO IBG3; -- BESTAAT NIET in IBG 2.0
--grant select on ALG_SRTVLOER TO IBG3; -- BESTAAT NIET in IBG 2.0
--grant select on FAC_FUNCTIE TO IBG3; -- BESTAAT NIET in IBG 2.0
--grant select on INS_DEELKOPPELING TO IBG3; -- BESTAAT NIET in IBG 2.0
--grant select on INS_KENMERKDEEL TO IBG3; -- BESTAAT NIET in IBG 2.0
--grant select on INS_REFSRTKENMERK TO IBG3; -- BESTAAT NIET in IBG 2.0
--grant select on INS_SRTKENMERK TO IBG3; -- BESTAAT NIET in IBG 2.0
--grant select on INS_TAB_DISCIPLINE TO IBG3; -- BESTAAT NIET in IBG 2.0 {zie OPM.} 8 records
-- {allen niet aangemerkt als zijnde verwijderd}
grant select on INS_DISCIPLINE TO IBG3; -- zie OPM.
grant select on ALG_DISTRICT TO IBG3; -- 1 record
grant select on ALG_GEBOUW TO IBG3; -- 5 records
grant select on ALG_IMPORT TO IBG3; -- 4541 records -- geen view!
grant select on ALG_KOSTENPOST TO IBG3; -- 4 records
grant select on ALG_LOCATIE TO IBG3; -- 2 records
grant select on ALG_REGIO TO IBG3; -- 1 record
grant select on ALG_RUIMTE TO IBG3; -- 1515 records -- view 1453 records!
--view ALG_V_RUIMTE_GEGEVENS: verschil table/view -> verwijderde records.
grant select on ALG_SRTGEBOUW TO IBG3; -- 1 record
grant select on ALG_SRTRUIMTE TO IBG3; -- 98 record
grant select on ALG_TERREINSECTOR TO IBG3; -- 1 record
grant select on ALG_VERDIEPING TO IBG3; -- 40 records
grant select on INS_DEEL TO IBG3; -- 8326 records -- view 7917 records!
--view INS_V_DEEL_GEGEVENS: verschil table/view -> verwijderde records.
grant select on INS_SRTDEEL TO IBG3; -- 174 records
grant select on INS_SRTGROEP TO IBG3; -- 91 records
grant select on INS_ATTRIBUTE TO IBG3; -- vervalt in FAC3: opnemen data in INS_SRTKENMERK etc.
grant select on PRS_AFDELING TO IBG3; -- 74 records -- geen view.
grant select on PRS_BEDRIJF TO IBG3; -- 1 record -- geen view.
grant select on PRS_PERSLID TO IBG3; -- 2541 records -- view 1692 records!
--view PRS_V_PERSLID_GEGEVENS: verschil table/view -> verwijderde records.
grant select on PRS_PERSLIDWERKPLEK TO IBG3; -- 1819 records
grant select on PRS_SRTPERSLID TO IBG3; -- 11 records
grant select on PRS_WERKPLEK TO IBG3; -- 2295 records -- view 1843 records!
--view PRS_V_WERKPLEK_GEGEVENS: verschil table/view -> verwijderde records.
grant select on SCH_ACTIVITEIT TO IBG3; -- 13 records -- geen view gedefinieerd?
grant select on SCH_FREQUENTIE TO IBG3; -- 10 records -- geen view gedefinieerd?
grant select on SCH_NIVO TO IBG3; -- 2 records -- view 10 records!
--view SCH_V_NIVO_GEGEVENS.
grant select on SCH_NIVO_OG TO IBG3; -- 12 records -- geen view gedefinieerd?
grant select on SCH_SRTVLOER TO IBG3; -- 9 records
grant select on SCH_WERKZAAMHEDEN TO IBG3; -- 421 records
grant select on INS_V_AANWEZIGDEEL TO IBG3;
set echo on
connect IBG3/I
SPOOL ibg2TO3
show user
select to_char(sysdate,'hh24:mi:ss') from dual;
DECLARE
/*
Verwijderen inserts CREA_IBG.SQL: records idem als 2.0. Op deze manier hoeven niet
expliciet alle records worden gevuld die de user heeft
aangemaakt in versie 2.0.
*/
dummy integer;
BEGIN
delete from ALG_SRTRUIMTE;
delete from ALG_SRTGEBOUW;
delete from INS_SRTDEEL;
delete from INS_SRTGROEP;
END;
/
delete from INS_KENMERKDEEL;
delete from INS_DEEL;
delete from INS_SRTDEEL;
delete from INS_SRTGROEP;
alter trigger ins_t_ins_discipline_B_IU disable;
delete from INS_TAB_DISCIPLINE;
alter trigger ins_t_ins_discipline_B_IU enable;
insert into INS_TAB_DISCIPLINE
(INS_DISCIPLINE_KEY, INS_DISCIPLINE_MODULE, INS_DISCIPLINE_OMSCHRIJVING,
INS_DISCIPLINE_AANMAAK, INS_DISCIPLINE_VERWIJDER)
select
INS_DISCIPLINE_KEY, INS_DISCIPLINE_MODULE, INS_DISCIPLINE_OMSCHRIJVING,
INS_DISCIPLINE_AANMAAK, INS_DISCIPLINE_VERWIJDER
from IBG0133.INS_DISCIPLINE;
insert into ALG_REGIO
(ALG_REGIO_KEY, ALG_REGIO_OMSCHRIJVING, ALG_REGIO_UPPER,
ALG_REGIO_AANMAAK, ALG_REGIO_VERWIJDER)
select
ALG_REGIO_KEY, ALG_REGIO_OMSCHRIJVING, ALG_REGIO_UPPER,
ALG_REGIO_AANMAAK, ALG_REGIO_VERWIJDER
from IBG0133.ALG_REGIO;
select count(*) from ALG_REGIO;
insert into ALG_DISTRICT
(ALG_DISTRICT_KEY, ALG_REGIO_KEY, ALG_DISTRICT_OMSCHRIJVING,
ALG_DISTRICT_UPPER, ALG_DISTRICT_AANMAAK, ALG_DISTRICT_VERWIJDER)
select
ALG_DISTRICT_KEY, ALG_REGIO_KEY, ALG_DISTRICT_OMSCHRIJVING,
ALG_DISTRICT_UPPER, ALG_DISTRICT_AANMAAK, ALG_DISTRICT_VERWIJDER
from IBG0133.ALG_DISTRICT;
select count(*) from ALG_DISTRICT;
insert into ALG_LOCATIE
(ALG_LOCATIE_KEY, ALG_DISTRICT_KEY, ALG_LOCATIE_CODE,
ALG_LOCATIE_OMSCHRIJVING, ALG_LOCATIE_UPPER, ALG_LOCATIE_AANMAAK,
ALG_LOCATIE_VERWIJDER, ALG_LOCATIE_ADRES, ALG_LOCATIE_POSTCODE,
ALG_LOCATIE_PLAATS, ALG_LOCATIE_LAND, ALG_LOCATIE_POST_ADRES,
ALG_LOCATIE_POST_POSTCODE, ALG_LOCATIE_POST_PLAATS, ALG_LOCATIE_POST_LAND,
ALG_LOCATIE_TEKENING, ALG_LOCATIE_VERANTW, ALG_LOCATIE_VERANTW_TEL)
select
ALG_LOCATIE_KEY, ALG_DISTRICT_KEY, ALG_LOCATIE_CODE,
ALG_LOCATIE_OMSCHRIJVING, ALG_LOCATIE_UPPER, ALG_LOCATIE_AANMAAK,
ALG_LOCATIE_VERWIJDER, ALG_LOCATIE_ADRES, ALG_LOCATIE_POSTCODE,
ALG_LOCATIE_PLAATS, ALG_LOCATIE_LAND, ALG_LOCATIE_POST_ADRES,
ALG_LOCATIE_POST_POSTCODE, ALG_LOCATIE_POST_PLAATS, ALG_LOCATIE_POST_LAND,
ALG_LOCATIE_TEKENING, ALG_LOCATIE_VERANTW, ALG_LOCATIE_VERANTW_TEL
from IBG0133.ALG_LOCATIE;
select count(*) from ALG_LOCATIE;
insert into ALG_SRTGEBOUW select * from IBG0133.ALG_SRTGEBOUW;
select count(*) from ALG_SRTGEBOUW;
-- RD***** ALG_GEBOUW_OPMERKING was bij de IBG2 data altijd null. Indien dit bij de werkelijk conversie
-- niet meer het geval is: opnemen als kenmerk! 10-jul-1999: gecontroleerd.
insert into ALG_GEBOUW
(ALG_GEBOUW_KEY, ALG_LOCATIE_KEY, ALG_SRTGEBOUW_KEY,
ALG_GEBOUW_ACADKEY, ALG_GEBOUW_NAAM, ALG_GEBOUW_CODE,
ALG_GEBOUW_OMSCHRIJVING, ALG_GEBOUW_UPPER, ALG_GEBOUW_AANMAAK,
ALG_GEBOUW_VERWIJDER, ALG_GEBOUW_BRUTO_VLOEROPP, ALG_GEBOUW_OMTREK,
ALG_GEBOUW_INHOUD)
select
ALG_GEBOUW_KEY, ALG_LOCATIE_KEY, ALG_SRTGEBOUW_KEY,
ALG_GEBOUW_ACADKEY, ALG_GEBOUW_NAAM, ALG_GEBOUW_CODE,
ALG_GEBOUW_OMSCHRIJVING, ALG_GEBOUW_UPPER, ALG_GEBOUW_AANMAAK,
ALG_GEBOUW_VERWIJDER, ALG_GEBOUW_BRUTO_VLOEROPP, ALG_GEBOUW_OMTREK,
ALG_GEBOUW_INHOUD
from IBG0133.ALG_GEBOUW;
select count(*) from ALG_GEBOUW;
commit;
insert into ALG_VERDIEPING
(ALG_VERDIEPING_KEY, ALG_GEBOUW_KEY, ALG_VERDIEPING_OMSCHRIJVING, ALG_VERDIEPING_UPPER,
ALG_VERDIEPING_AANMAAK, ALG_VERDIEPING_VERWIJDER, ALG_VERDIEPING_VOLGNR, ALG_VERDIEPING_TEKENING
)
select
ALG_VERDIEPING_KEY, ALG_GEBOUW_KEY, ALG_VERDIEPING_OMSCHRIJVING, ALG_VERDIEPING_UPPER,
ALG_VERDIEPING_AANMAAK, ALG_VERDIEPING_VERWIJDER, ALG_VERDIEPING_VOLGNR, ALG_VERDIEPING_TEKENING
from IBG0133.ALG_VERDIEPING;
select count(*) from ALG_VERDIEPING;
insert into ALG_SRTRUIMTE select * from IBG0133.ALG_SRTRUIMTE;
select count(*) from ALG_SRTRUIMTE;
-- RD ALG_RUIMTE_OPP_GEVELBEKLEDING was altijd NULL. Als bij werkelijk conversie dit niet het
-- geval is opnemen als RefKenmerk. Idem voor ALG_RUIMTE_OPP_SEPARATIEGLAS, ALG_RUIMTE_OPP_GEVELGLAS
-- en ALG_RUIMTE_VLOER_OMSCHRIJVING.
--alter trigger ALG_T_ALG_RUIMTE_B_IU disable;
insert into ALG_RUIMTE
(ALG_RUIMTE_KEY, ALG_VERDIEPING_KEY, ALG_SRTRUIMTE_KEY,
ALG_RUIMTE_NR, ALG_RUIMTE_UPPER_NR, ALG_RUIMTE_ACADKEY,
ALG_RUIMTE_OMSCHRIJVING, ALG_RUIMTE_AANMAAK, ALG_RUIMTE_VERWIJDER,
ALG_RUIMTE_BRUTO_VLOEROPP, ALG_RUIMTE_INHOUD, ALG_RUIMTE_OPMERKING,
ALG_RUIMTE_OMTREK
)
select
ALG_RUIMTE_KEY, ALG_VERDIEPING_KEY, ALG_SRTRUIMTE_KEY,
ALG_RUIMTE_NR, ALG_RUIMTE_UPPER_NR, ALG_RUIMTE_ACADKEY,
ALG_RUIMTE_OMSCHRIJVING, ALG_RUIMTE_AANMAAK, ALG_RUIMTE_VERWIJDER,
ALG_RUIMTE_BRUTO_VLOEROPP, ALG_RUIMTE_INHOUD, ALG_RUIMTE_OPMERKING,
ALG_RUIMTE_OMTREK
from IBG0133.ALG_RUIMTE;
select count(*) from ALG_RUIMTE;
--alter trigger ALG_T_ALG_RUIMTE_B_IU enable;
commit;
insert into ALG_TERREINSECTOR
(ALG_TERREINSECTOR_KEY, ALG_LOCATIE_KEY, ALG_TERREINSECTOR_OMSCHRIJVING,
ALG_TERREINSECTOR_CODE, ALG_TERREINSECTOR_NAAM, ALG_TERREINSECTOR_UPPER,
ALG_TERREINSECTOR_AANMAAK, ALG_TERREINSECTOR_VERWIJDER)
select
ALG_TERREINSECTOR_KEY, ALG_LOCATIE_KEY, ALG_TERREINSECTOR_OMSCHRIJVING,
ALG_TERREINSECTOR_CODE, ALG_TERREINSECTOR_NAAM, ALG_TERREINSECTOR_UPPER,
ALG_TERREINSECTOR_AANMAAK, ALG_TERREINSECTOR_VERWIJDER
from IBG0133.ALG_TERREINSECTOR;
select count(*) from ALG_TERREINSECTOR;
insert into ALG_IMPORT select * from IBG0133.ALG_IMPORT;
select count(*) from ALG_IMPORT;
insert into ALG_KOSTENPOST select * from IBG0133.ALG_KOSTENPOST;
select count(*) from ALG_KOSTENPOST;
insert into INS_SRTGROEP select * from IBG0133.INS_SRTGROEP;
select count(*) from INS_SRTGROEP;
-- RD***** Code moet uniek zijn, echter de nummering bij omschrijving
-- is niet uniek! Voorlopig(?) INS_SRTDEEL_CODE=INS_SRTDEEL_KEY!
insert into INS_SRTDEEL
(INS_SRTDEEL_KEY, INS_SRTGROEP_KEY, INS_SRTDEEL_MODULE,
INS_SRTDEEL_OMSCHRIJVING, INS_SRTDEEL_UPPER, INS_SRTDEEL_AANMAAK,
INS_SRTDEEL_VERWIJDER, INS_SRTDEEL_VOLGNR, INS_SRTDEEL_PRIJS,
INS_SRTDEEL_EENHEID, INS_SRTDEEL_ACADSYMBOL, INS_SRTDEEL_ACAD_TAGVALUE,
INS_SRTDEEL_CODE, INS_SRTDEEL_CODE_UPPER, INS_SRTDEEL_DIMENSIE
)
select
INS_SRTDEEL_KEY, INS_SRTGROEP_KEY, INS_SRTDEEL_MODULE,
INS_SRTDEEL_OMSCHRIJVING, INS_SRTDEEL_UPPER, INS_SRTDEEL_AANMAAK,
INS_SRTDEEL_VERWIJDER, INS_SRTDEEL_VOLGNR, INS_SRTDEEL_PRIJS,
INS_SRTDEEL_EENHEID, INS_SRTDEEL_ACADSYMBOL, INS_SRTDEEL_ACAD_TAGVALUE,
TO_CHAR(INS_SRTDEEL_KEY), TO_CHAR(INS_SRTDEEL_KEY), 0
from IBG0133.INS_SRTDEEL;
select count(*) from INS_SRTDEEL;
commit;
/*
*** Conversie error 2to3 ***
ERROR:
ERROR at line 1:
ORA-20000: ins_m092
ORA-06512: at "IBG3.INS_T_INS_DEEL_B_IU", line 57
ORA-04088: error during execution of trigger 'IBG3.INS_T_INS_DEEL_B_IU'
ORA-06512: at line 16
Wordt veroorzaakt door:
BEGIN
SELECT alg_ruimte_key
INTO dummy
FROM alg_v_aanwezigruimte
WHERE alg_ruimte_key = :new.ins_alg_ruimte_key;
EXCEPTION WHEN NO_DATA_FOUND THEN raise_application_error(-20000, 'ins_m092');
END;
Bovenstaande foutmelding zou niet optreden indien het volgende 0 records zou opleveren,
hetgeen niet het geval is:
select alg_ruimte_key
from alg_v_aanwezigruimte
where alg_ruimte_key not in (select ins_alg_ruimte_key
from ins_deel);
*/
-- RDE***** Disable wegens bovenstaande.
--alter trigger ins_t_ins_deel_B_IU disable; (bij uitschakeling worden diverse kolommen niet
--automatisch gevuld!!!!!!!!)
--De volgende kolommen van INS_DEEL zijn vervallen:
--INS_DEEL_FABRIKAAT
--INS_DEEL_TYPE
--INS_DEEL_SERIENR
--INS_DEEL_BOUWJAAR
--INS_DEEL_CAPACITEIT
--INS_DEEL_PRIJS
--INS_DEEL_LEVENSDUUR
--INS_DEEL_REALISATIE + [FAC0..FAC9]
--> FAC0 is meest interessant voor de conversie, deze bevat wel data i.t.t. de andere
-- kolommen, andere kolommen vervallen en worden DUS OOK NIET als kenmerk opgenomen!
--RDE***** Controleer of er bij de werkelijke conversie ook slechts 1 locatie is!!!
--RDE***** INS_DEEL_OPMERKING was altijd null, nog steeds zo bij werkelijk conversie?
DECLARE
CURSOR c9 IS select * from IBG0133.INS_DEEL;
rec c9%rowtype;
teller integer;
teller2 integer;
const_max_inserts integer := 100;
pl_aanduiding VARCHAR2(107);
BEGIN
OPEN c9;
IF c9%ISOPEN THEN
teller := const_max_inserts;
teller2 := 1;
LOOP
FETCH c9 INTO rec;
EXIT WHEN c9%NOTFOUND;
insert into INS_DEEL
(INS_DEEL_KEY, INS_DEEL_MODULE, INS_SRTDEEL_KEY,
INS_ALG_RUIMTE_KEY, INS_ALG_RUIMTE_TYPE, INS_DEEL_AANTAL,
INS_DEEL_OMSCHRIJVING,
INS_DEEL_AANMAAK, INS_DEEL_VERWIJDER, INS_ALG_LOCATIE_KEY
)
values
(rec.INS_DEEL_KEY, rec.INS_DEEL_MODULE, rec.INS_SRTDEEL_KEY,
rec.INS_ALG_RUIMTE_KEY, rec.INS_ALG_RUIMTE_TYPE, rec.INS_DEEL_AANTAL,
substr(concat(concat(to_char(teller2), ' - '), rec.INS_DEEL_OMSCHRIJVING), 1, 30),
rec.INS_DEEL_AANMAAK, rec.INS_DEEL_VERWIJDER, 1
);
IF teller = 1 THEN
commit;
teller := const_max_inserts;
ELSE
teller := teller - 1;
END IF;
teller2 := teller2 + 1;
END LOOP;
END IF;
CLOSE c9;
commit;
END;
/
--alter trigger ins_t_ins_deel_B_IU enable;
commit;
DECLARE
/*
Toevoegen kenmerk 'oppervlakte' van 'oude' tabel INS_ATTRIBUTE:
1. insert INS_SRTKENMERK -> 1 record
2. insert INS_KENMERK -> niveau 'S' {= soortgroep}
-> 1 record toevoegen voor 1 groepsoort
3. insert INS_KENMERKDEEL -> voor elk deel 1 record toevoegen + waarde voor het
kenmerk oppervlakte
*/
CURSOR c1 IS select * from IBG0133.ins_attribute;
rec c1%rowtype;
BEGIN
OPEN c1;
IF c1%ISOPEN THEN
FETCH c1 INTO rec;
insert into ins_srtkenmerk
(ins_srtkenmerk_key, ins_srtkenmerk_omschrijving, ins_srtkenmerk_systeem,
ins_srtkenmerk_upper, ins_srtkenmerk_kenmerktype, ins_srtkenmerk_lengte,
ins_srtkenmerk_nmin, ins_srtkenmerk_nmax, ins_srtkenmerk_dec,
ins_srtkenmerk_dimensie
)
values
(rec.ins_attribute_main_key + 1000, rec.ins_attribute_label, 1,
UPPER(rec.ins_attribute_label), rec.ins_attribute_type, rec.ins_attribute_length,
rec.ins_attribute_min, rec.ins_attribute_max, rec.ins_attribute_dec,
rec.ins_attribute_unit
);
insert into ins_kenmerk
(ins_srtkenmerk_key, ins_srtinstallatie_key, ins_kenmerk_niveau,
ins_kenmerk_verplicht, ins_kenmerk_volgnummer, ins_kenmerk_toonbaar
)
values
(rec.ins_attribute_main_key + 1000, rec.ins_srtinst_keys, rec.ins_srtinst_type,
rec.ins_attribute_required, rec.ins_attribute_volgorde, rec.ins_attribute_toonbaar
);
insert into ins_kenmerkdeel (ins_deel_key, ins_kenmerk_key, ins_kenmerkdeel_waarde)
select ins_deel_key, ins_s_ins_kenmerk_key.currval, fac0
from IBG0133.ins_deel where fac0 is not null;
CLOSE c1;
END IF;
END;
/
insert into SCH_ACTIVITEIT select * from IBG0133.SCH_ACTIVITEIT;
select count(*) from SCH_ACTIVITEIT;
insert into SCH_FREQUENTIE select * from IBG0133.SCH_FREQUENTIE;
select count(*) from SCH_FREQUENTIE;
insert into SCH_NIVO select * from IBG0133.SCH_NIVO;
select count(*) from SCH_NIVO;
insert into SCH_NIVO_OG select * from IBG0133.SCH_NIVO_OG;
select count(*) from SCH_NIVO_OG;
insert into PRS_AFDELING
(PRS_AFDELING_KEY, PRS_AFDELING_PARENTKEY, PRS_AFDELING_NAAM,
PRS_AFDELING_UPPER, PRS_AFDELING_OMSCHRIJVING, PRS_AFDELING_AANMAAK,
PRS_AFDELING_VERWIJDER)
select
PRS_AFDELING_KEY, PRS_AFDELING_PARENTKEY, PRS_AFDELING_NAAM,
PRS_AFDELING_UPPER, PRS_AFDELING_OMSCHRIJVING, PRS_AFDELING_AANMAAK,
PRS_AFDELING_VERWIJDER
from IBG0133.PRS_AFDELING;
insert into PRS_BEDRIJF select * from IBG0133.PRS_BEDRIJF;
select count(*) from PRS_BEDRIJF;
insert into PRS_SRTPERSLID select * from IBG0133.PRS_SRTPERSLID;
select count(*) from PRS_SRTPERSLID;
--alter trigger prs_t_prs_perslid_B_IU disable;
insert into PRS_PERSLID select * from IBG0133.PRS_PERSLID;
select count(*) from PRS_PERSLID;
--alter trigger prs_t_prs_perslid_B_IU enable;
--alter trigger prs_t_prs_werkplek_B_IU disable;
insert into PRS_WERKPLEK
(PRS_WERKPLEK_KEY, PRS_WERKPLEK_MODULE, PRS_WERKPLEK_VOLGNR,
PRS_WERKPLEK_OMSCHRIJVING, PRS_WERKPLEK_VASTOPP, PRS_WERKPLEK_OPP,
PRS_ALG_RUIMTE_KEY, PRS_WERKPLEK_AANMAAK, PRS_WERKPLEK_VERWIJDER)
select
PRS_WERKPLEK_KEY, PRS_WERKPLEK_MODULE, PRS_WERKPLEK_VOLGNR,
PRS_WERKPLEK_OMSCHRIJVING, PRS_WERKPLEK_VASTOPP, PRS_WERKPLEK_OPP,
PRS_ALG_RUIMTE_KEY, PRS_WERKPLEK_AANMAAK, PRS_WERKPLEK_VERWIJDER
from IBG0133.PRS_WERKPLEK;
--alter trigger prs_t_prs_werkplek_B_IU enable;
--alter trigger PRS_T_PRS_PERSLIDWERKPLEK_B_IU disable;
insert into PRS_PERSLIDWERKPLEK
(PRS_PERSLIDWERKPLEK_KEY, PRS_PERSLID_KEY, PRS_AFDELING_KEY,
PRS_WERKPLEK_KEY, PRS_PERSLIDWERKPLEK_BEZETTING)
select
PRS_PERSLIDWERKPLEK_KEY, PRS_PERSLID_KEY, PRS_AFDELING_KEY,
PRS_WERKPLEK_KEY, PRS_PERSLIDWERKPLEK_BEZETTING
from IBG0133.PRS_PERSLIDWERKPLEK;
--alter trigger PRS_T_PRS_PERSLIDWERKPLEK_B_IU enable;
-- verwijderen evt. standaardvulling
delete from fac_usrdata;
alter trigger alg_t_alg_kenmerk_b_d disable;
delete from alg_kenmerk;
alter trigger alg_t_alg_kenmerk_b_d enable;
delete from alg_refkenmerk;
delete from fac_usrtab;
DECLARE
-- srtvloer opnemen als referentiekenmerk en ruimten die waarden hebben voor dit
-- kenmerk invullen.
CURSOR cR IS
select *
from IBG0133.ALG_RUIMTE
where SCH_SRTVLOER_KEY is not NULL;
rec cR%rowtype;
srtvloer_omschrijving VARCHAR2(30);
BEGIN
INSERT INTO fac_usrtab
(fac_usrtab_naam, fac_usrtab_object,fac_usrtab_omschrijving, fac_usrtab_view)
VALUES ('Vloersoort', 'USR_VLOERSOORT', 'Soort vloer', 'T');
insert into fac_usrdata
(fac_usrdata_key, fac_usrtab_key, fac_usrdata_code, fac_usrdata_omschr)
select
sch_srtvloer_key, fac_s_fac_usrtab_key.currval, substr(sch_srtvloer_omschrijving,1 , 20), sch_srtvloer_omschrijving
from ibg0133.sch_srtvloer;
insert into alg_refkenmerk
(alg_refkenmerk_omschrijving, alg_refkenmerk_objectnaam, alg_refkenmerk_kolomnaam,
alg_refkenmerk_kolomtxt, fac_usrtab_key
)
values
('Soort vloer', 'FAC_USRDATA', 'FAC_USRDATA_KEY',
'FAC_USRDATA_OMSCHR', fac_s_fac_usrtab_key.currval
);
insert into alg_kenmerk
(alg_kenmerk_key, alg_kenmerk_niveau, alg_kenmerk_omschrijving, alg_kenmerk_kenmerktype,
alg_kenmerk_systeem, alg_refkenmerk_key
)
values
(2, 'R', 'Soort vloer', 'R',
1, alg_s_alg_refkenmerk_key.currval
);
OPEN cR;
IF cR%ISOPEN THEN
LOOP
FETCH cR INTO rec;
EXIT WHEN cR%NOTFOUND;
insert into alg_onrgoedkenmerk
(alg_onrgoed_key, alg_onrgoed_niveau, alg_kenmerk_key,
alg_onrgoedkenmerk_waarde
)
values
(rec.ALG_RUIMTE_KEY, 'R', 2,
rec.SCH_SRTVLOER_KEY
);
END LOOP;
CLOSE cR;
END IF;
END; -- referentiekenmerk srtvloer
/
insert into SCH_WERKZAAMHEDEN select * from IBG0133.SCH_WERKZAAMHEDEN;
select count(*) from SCH_WERKZAAMHEDEN;
-- BEGIN UPDATE SEQUENCES
DECLARE
maxval NUMBER(10);
seqval NUMBER;
BEGIN
SELECT MAX(ALG_REGIO_KEY) INTO maxval FROM ALG_REGIO;
SELECT ALG_S_ALG_REGIO_KEY.nextval INTO seqval FROM DUAL;
WHILE seqval<maxval
LOOP
SELECT ALG_S_ALG_REGIO_KEY.nextval INTO seqval FROM DUAL;
END LOOP;
END;
/
DECLARE
maxval NUMBER(10);
seqval NUMBER;
BEGIN
SELECT MAX(ALG_DISTRICT_KEY) INTO maxval FROM ALG_DISTRICT;
SELECT ALG_S_ALG_DISTRICT_KEY.nextval INTO seqval FROM DUAL;
WHILE seqval<maxval
LOOP
SELECT ALG_S_ALG_DISTRICT_KEY.nextval INTO seqval FROM DUAL;
END LOOP;
END;
/
DECLARE
maxval NUMBER(10);
seqval NUMBER;
BEGIN
SELECT MAX(ALG_LOCATIE_KEY) INTO maxval FROM ALG_LOCATIE;
SELECT ALG_S_ALG_LOCATIE_KEY.nextval INTO seqval FROM DUAL;
WHILE seqval<maxval
LOOP
SELECT ALG_S_ALG_LOCATIE_KEY.nextval INTO seqval FROM DUAL;
END LOOP;
END;
/
DECLARE
maxval NUMBER(10);
seqval NUMBER;
BEGIN
SELECT MAX(ALG_SRTGEBOUW_KEY) INTO maxval FROM ALG_SRTGEBOUW;
SELECT ALG_S_ALG_SRTGEBOUW_KEY.nextval INTO seqval FROM DUAL;
WHILE seqval<maxval
LOOP
SELECT ALG_S_ALG_SRTGEBOUW_KEY.nextval INTO seqval FROM DUAL;
END LOOP;
END;
/
DECLARE
-- sequence voor gebouw, ruimte, terreinsector en verdieping.
maxval NUMBER(10);
maxval_g NUMBER(10);
maxval_r NUMBER(10);
maxval_t NUMBER(10);
maxval_v NUMBER(10);
seqval NUMBER;
BEGIN
SELECT MAX(ALG_GEBOUW_KEY) INTO maxval_g FROM ALG_GEBOUW;
SELECT MAX(ALG_RUIMTE_KEY) INTO maxval_r FROM ALG_RUIMTE;
SELECT MAX(ALG_TERREINSECTOR_KEY) INTO maxval_t FROM ALG_TERREINSECTOR;
SELECT MAX(ALG_VERDIEPING_KEY) INTO maxval_v FROM ALG_VERDIEPING;
maxval := maxval_g;
IF (maxval < maxval_r) THEN maxval := maxval_r; END IF;
IF (maxval < maxval_t) THEN maxval := maxval_t; END IF;
IF (maxval < maxval_v) THEN maxval := maxval_v; END IF;
SELECT ALG_S_ALG_ONROERENDGOED_KEYS.nextval INTO seqval FROM DUAL;
WHILE seqval<maxval
LOOP
SELECT ALG_S_ALG_ONROERENDGOED_KEYS.nextval INTO seqval FROM DUAL;
END LOOP;
END;
/
DECLARE
maxval NUMBER(10);
seqval NUMBER;
BEGIN
SELECT MAX(ALG_SRTRUIMTE_KEY) INTO maxval FROM ALG_SRTRUIMTE;
SELECT ALG_S_ALG_SRTRUIMTE_KEY.nextval INTO seqval FROM DUAL;
WHILE seqval<maxval
LOOP
SELECT ALG_S_ALG_SRTRUIMTE_KEY.nextval INTO seqval FROM DUAL;
END LOOP;
END;
/
DECLARE
maxval NUMBER(10);
seqval NUMBER;
BEGIN
SELECT MAX(ALG_IMPORT_KEY) INTO maxval FROM ALG_IMPORT;
SELECT ALG_S_ALG_IMPORT_KEY.nextval INTO seqval FROM DUAL;
WHILE seqval<maxval
LOOP
SELECT ALG_S_ALG_IMPORT_KEY.nextval INTO seqval FROM DUAL;
END LOOP;
END;
/
DECLARE
maxval NUMBER(10);
seqval NUMBER;
BEGIN
SELECT MAX(ALG_KOSTENPOST_KEY) INTO maxval FROM ALG_KOSTENPOST;
SELECT ALG_S_ALG_KOSTENPOST_KEY.nextval INTO seqval FROM DUAL;
WHILE seqval<maxval
LOOP
SELECT ALG_S_ALG_KOSTENPOST_KEY.nextval INTO seqval FROM DUAL;
END LOOP;
END;
/
DECLARE
maxval NUMBER(10);
seqval NUMBER;
BEGIN
SELECT MAX(INS_SRTGROEP_KEY) INTO maxval FROM INS_SRTGROEP;
SELECT INS_S_INS_SRTGROEP_KEY.nextval INTO seqval FROM DUAL;
WHILE seqval<maxval
LOOP
SELECT INS_S_INS_SRTGROEP_KEY.nextval INTO seqval FROM DUAL;
END LOOP;
END;
/
DECLARE
maxval NUMBER(10);
seqval NUMBER;
BEGIN
SELECT MAX(ins_srtdeel_key) INTO maxval FROM INS_SRTDEEL;
SELECT INS_S_INS_SRTINST_KEYS.nextval INTO seqval FROM DUAL;
WHILE seqval<maxval OR seqval < 1000
LOOP
SELECT INS_S_INS_SRTINST_KEYS.nextval INTO seqval FROM DUAL;
END LOOP;
END;
/
-- Wordt deze sequence (..._keys) niet in meerdere tabellen bebruikt? Nee.
DECLARE
maxval NUMBER(10);
seqval NUMBER;
BEGIN
SELECT MAX(INS_DEEL_KEY) INTO maxval FROM INS_DEEL;
SELECT INS_S_INS_INST_KEYS.nextval INTO seqval FROM DUAL;
WHILE seqval<maxval
LOOP
SELECT INS_S_INS_INST_KEYS.nextval INTO seqval FROM DUAL;
END LOOP;
END;
/
DECLARE
maxval NUMBER(10);
seqval NUMBER;
BEGIN
SELECT MAX(INS_SRTKENMERK_KEY) INTO maxval FROM INS_SRTKENMERK;
SELECT INS_S_INS_SRTKENMERK_KEY.nextval INTO seqval FROM DUAL;
WHILE seqval<maxval OR seqval < 1000
LOOP
SELECT INS_S_INS_SRTKENMERK_KEY.nextval INTO seqval FROM DUAL;
END LOOP;
END;
/
DECLARE
maxval NUMBER(10);
seqval NUMBER;
BEGIN
SELECT MAX(SCH_ACTIVITEIT_KEY) INTO maxval FROM SCH_ACTIVITEIT;
SELECT SCH_S_SCH_ACTIVITEIT_KEY.nextval INTO seqval FROM DUAL;
WHILE seqval<maxval
LOOP
SELECT SCH_S_SCH_ACTIVITEIT_KEY.nextval INTO seqval FROM DUAL;
END LOOP;
END;
/
DECLARE
maxval NUMBER(10);
seqval NUMBER;
BEGIN
SELECT MAX(SCH_FREQUENTIE_KEY) INTO maxval FROM SCH_FREQUENTIE;
SELECT SCH_S_SCH_FREQUENTIE_KEY.nextval INTO seqval FROM DUAL;
WHILE seqval<maxval
LOOP
SELECT SCH_S_SCH_FREQUENTIE_KEY.nextval INTO seqval FROM DUAL;
END LOOP;
END;
/
DECLARE
maxval NUMBER(10);
seqval NUMBER;
BEGIN
SELECT MAX(SCH_NIVO_KEY) INTO maxval FROM SCH_NIVO;
SELECT SCH_S_SCH_NIVO_KEY.nextval INTO seqval FROM DUAL;
WHILE seqval<maxval
LOOP
SELECT SCH_S_SCH_NIVO_KEY.nextval INTO seqval FROM DUAL;
END LOOP;
END;
/
-- SCH_NIVO_OG geen sequence?! Waarschijn niet, gebruikt als key de sleutel van
-- onroerendgoed.
DECLARE
maxval NUMBER(10);
seqval NUMBER;
BEGIN
SELECT MAX(SCH_WERKZAAMHEDEN_KEY) INTO maxval FROM SCH_WERKZAAMHEDEN;
SELECT SCH_S_SCH_WERKZAAMHEDEN_KEY.nextval INTO seqval FROM DUAL;
WHILE seqval<maxval
LOOP
SELECT SCH_S_SCH_WERKZAAMHEDEN_KEY.nextval INTO seqval FROM DUAL;
END LOOP;
END;
/
DECLARE
maxval NUMBER(10);
seqval NUMBER;
BEGIN
SELECT MAX(PRS_AFDELING_KEY) INTO maxval FROM PRS_AFDELING;
SELECT PRS_S_PRS_AFDELING_KEY.nextval INTO seqval FROM DUAL;
WHILE seqval<maxval
LOOP
SELECT PRS_S_PRS_AFDELING_KEY.nextval INTO seqval FROM DUAL;
END LOOP;
END;
/
DECLARE
maxval NUMBER(10);
seqval NUMBER(10);
maxval_b NUMBER(10);
maxval_s NUMBER(10);
maxval_p NUMBER(10);
BEGIN
SELECT NVL(MAX(PRS_BEDRIJF_KEY), 0) INTO maxval_b FROM PRS_BEDRIJF;
SELECT NVL(MAX(PRS_SRTPERSLID_KEY), 0) INTO maxval_s FROM PRS_SRTPERSLID;
SELECT NVL(MAX(PRS_PERSLID_KEY), 0) INTO maxval_p FROM PRS_PERSLID;
maxval := maxval_b;
IF (maxval < maxval_s) THEN maxval := maxval_s; END IF;
IF (maxval < maxval_p) THEN maxval := maxval_p; END IF;
SELECT PRS_S_PRS_ALLUITVOERENDE_KEYS.nextval INTO seqval FROM DUAL;
WHILE seqval<maxval
LOOP
SELECT PRS_S_PRS_ALLUITVOERENDE_KEYS.nextval INTO seqval FROM DUAL;
END LOOP;
END;
/
DECLARE
maxval NUMBER(10);
seqval NUMBER;
BEGIN
SELECT MAX(PRS_WERKPLEK_KEY) INTO maxval FROM PRS_WERKPLEK;
SELECT PRS_S_PRS_WERKPLEK_KEY.nextval INTO seqval FROM DUAL;
WHILE seqval<maxval
LOOP
SELECT PRS_S_PRS_WERKPLEK_KEY.nextval INTO seqval FROM DUAL;
END LOOP;
END;
/
DECLARE
maxval NUMBER(10);
seqval NUMBER;
BEGIN
SELECT MAX(PRS_PERSLIDWERKPLEK_KEY) INTO maxval FROM PRS_PERSLIDWERKPLEK;
SELECT PRS_S_PRS_PERSLIDWERKPLEK_KEY.nextval INTO seqval FROM DUAL;
WHILE seqval<maxval
LOOP
SELECT PRS_S_PRS_PERSLIDWERKPLEK_KEY.nextval INTO seqval FROM DUAL;
END LOOP;
END;
/
DECLARE
maxval NUMBER(10);
seqval NUMBER;
BEGIN
SELECT MAX(INS_DISCIPLINE_KEY) INTO maxval FROM INS_DISCIPLINE;
SELECT INS_S_INS_DISCIPLINE_KEY.nextval INTO seqval FROM DUAL;
WHILE seqval<maxval
LOOP
SELECT INS_S_INS_DISCIPLINE_KEY.nextval INTO seqval FROM DUAL;
END LOOP;
END;
/
DECLARE
maxval NUMBER(10);
seqval NUMBER;
BEGIN
SELECT MAX(ins_kenmerkdeel_key) INTO maxval FROM ins_kenmerkdeel;
SELECT ins_s_ins_kenmerkdeel_key.nextval INTO seqval FROM DUAL;
WHILE seqval<maxval
LOOP
SELECT ins_s_ins_kenmerkdeel_key.nextval INTO seqval FROM DUAL;
END LOOP;
END;
/
DECLARE
maxval NUMBER(10);
seqval NUMBER;
BEGIN
SELECT MAX(alg_kenmerk_key) INTO maxval FROM alg_kenmerk;
SELECT alg_s_alg_kenmerk_key.nextval INTO seqval FROM DUAL;
WHILE seqval<maxval OR seqval < 1000
LOOP
SELECT alg_s_alg_kenmerk_key.nextval INTO seqval FROM DUAL;
END LOOP;
END;
/
DECLARE
maxval NUMBER(10);
seqval NUMBER;
BEGIN
SELECT MAX(alg_onrgoedkenmerk_key) INTO maxval FROM alg_onrgoedkenmerk;
SELECT alg_s_alg_onrgoedkenmerk_key.nextval INTO seqval FROM DUAL;
WHILE seqval<maxval
LOOP
SELECT alg_s_alg_onrgoedkenmerk_key.nextval INTO seqval FROM DUAL;
END LOOP;
END;
/
DECLARE
maxval NUMBER(10);
seqval NUMBER;
BEGIN
SELECT MAX(fac_usrdata_key) INTO maxval FROM fac_usrdata;
SELECT fac_s_fac_usrdata_key.nextval INTO seqval FROM DUAL;
WHILE seqval<maxval
LOOP
SELECT fac_s_fac_usrdata_key.nextval INTO seqval FROM DUAL;
END LOOP;
END;
/
DECLARE
maxval NUMBER(10);
seqval NUMBER;
BEGIN
SELECT MAX(fac_usrtab_key) INTO maxval FROM fac_usrtab;
SELECT fac_s_fac_usrtab_key.nextval INTO seqval FROM DUAL;
WHILE seqval<maxval
LOOP
SELECT fac_s_fac_usrtab_key.nextval INTO seqval FROM DUAL;
END LOOP;
END;
/
-- END UPDATE SEQUENCES
-- Nieuwe kolomnaam die verplicht is, default waarde op 0 (dimensie = symbool/punt).
update ins_srtdeel set ins_srtdeel_dimensie = 0 where ins_srtdeel_dimensie is null;
commit;
-- TENSLOTTE: delen met aantal > 1 opnemen als afzondelijke delen, incl. vulling ins_kenmerdeel.
DECLARE
CURSOR DeelCursor IS
SELECT *
FROM ibg0133.ins_v_aanwezigdeel
WHERE ins_deel_aantal > 1;
CURSOR KenmerkCursor (DeelKey IN Number) IS
SELECT *
FROM ins_kenmerkdeel
WHERE ins_kenmerkdeel.ins_deel_key = DeelKey;
teller NUMBER(10);
kenmerkwaarde ins_kenmerkdeel.ins_kenmerkdeel_waarde%type;
BEGIN
select count(*) into teller from ins_deel;
teller := teller + 1;
FOR rec IN DeelCursor
LOOP
-- BEGIN loop voor alle nieuw aan te maken delen ...
FOR i IN 1..(rec.ins_deel_aantal - 1) LOOP
commit;
insert into INS_DEEL
(INS_DEEL_MODULE, INS_SRTDEEL_KEY,
INS_ALG_RUIMTE_KEY, INS_ALG_RUIMTE_TYPE, INS_DEEL_AANTAL,
INS_DEEL_OMSCHRIJVING,
INS_DEEL_AANMAAK, INS_ALG_LOCATIE_KEY
)
values
(rec.INS_DEEL_MODULE, rec.INS_SRTDEEL_KEY,
rec.INS_ALG_RUIMTE_KEY, rec.INS_ALG_RUIMTE_TYPE, 1,
substr(concat(concat(to_char(teller), ' - '), rec.INS_DEEL_OMSCHRIJVING), 1, 30),
rec.INS_DEEL_AANMAAK, 1
);
-- BEGIN insert evt. waard(en) nieuwe deel ...
FOR rec2 IN KenmerkCursor (rec.ins_deel_key) LOOP
insert into ins_kenmerkdeel
(ins_deel_key, ins_kenmerk_key, ins_kenmerkdeel_waarde)
values
(ins_s_ins_inst_keys.currval, rec2.ins_kenmerk_key, rec2.ins_kenmerkdeel_waarde);
END LOOP;
-- END insert evt. waard(en) nieuwe deel ...
teller := teller + 1;
END LOOP;
-- END loop voor alle nieuw aan te maken delen ...
END LOOP;
END;
/
commit;
update ins_deel set ins_deel_aantal = 1;
commit;
select to_char(sysdate,'hh24:mi:ss') from dual;
SPOOL OFF
-- EINDE ROUTINE.
/*
-----------------------------------------------------------------------------------------------------------
***BEFORE_RUN_SCRIPT***
==> IBG conversie: aanpassen script, draaien in GMS3.
* MLD_Melding nog teeds niet meenemen (advies PF/30 april jl.). Er wordt waarchijnlijk niets mee
gedaan (5 meldingen, 'jongste' op 5-april-1998!).
*** Conversie error 2to3 ***
ERROR:
ERROR at line 1:
ORA-20000: ins_m092
ORA-06512: at "IBG3.INS_T_INS_DEEL_B_IU", line 57
ORA-04088: error during execution of trigger 'IBG3.INS_T_INS_DEEL_B_IU'
ORA-06512: at line 16
Wordt veroorzaakt door:
BEGIN
SELECT alg_ruimte_key
INTO dummy
FROM alg_v_aanwezigruimte
WHERE alg_ruimte_key = :new.ins_alg_ruimte_key;
EXCEPTION WHEN NO_DATA_FOUND THEN raise_application_error(-20000, 'ins_m092');
END;
Bovenstaande foutmelding zou niet optreden indien het volgende 0 records zou opleveren,
hetgeen niet het geval is:
select alg_ruimte_key
from alg_v_aanwezigruimte
where alg_ruimte_key not in (select ins_alg_ruimte_key
from ins_deel);
Oplossing!! Past trigger "INS_T_INS_DEEL_B_IU" tijdelijk aan....
BEGIN
SELECT alg_ruimte_key
INTO dummy
FROM alg_v_aanwezigruimte
WHERE alg_ruimte_key = :new.ins_alg_ruimte_key;
EXCEPTION WHEN NULL;
END;
-----------------------------------------------------------------------------------------------------------
*/
Reference in New Issue View Git Blame Copy Permalink