CONN#435
svn path=/Customer/trunk/; revision=12779
This commit is contained in:
Arthur Egberink
@@ -1,6 +1,14 @@
|
||||
-- CONN449TO450.SQL
|
||||
|
||||
spool conn449to450.lst
|
||||
spool xconn449to450.lst
|
||||
|
||||
-- set alg_srtgebouw key op de default
|
||||
update alg_gebouw set alg_srtgebouw_key = 1 where alg_srtgebouw_key is null;
|
||||
|
||||
INSERT INTO INS_TAB_DISCIPLINE ( INS_DISCIPLINE_KEY, INS_DISCIPLINE_MODULE,
|
||||
INS_DISCIPLINE_OMSCHRIJVING, INS_DISCIPLINE_MIN_LEVEL, INS_DISCIPLINE_KOSTENSOORT,
|
||||
INS_SRTDISCIPLINE_KEY ) VALUES (
|
||||
799, 'RES', 'Parkeerplaatsen', 1, NULL, NULL);
|
||||
|
||||
-- CONN#318
|
||||
|
||||
@@ -1007,37 +1015,7 @@ values
|
||||
,'C'
|
||||
,30);
|
||||
|
||||
insert into prs_kenmerk
|
||||
(prs_kenmerk_key
|
||||
,prs_kenmerk_niveau
|
||||
,prs_kenmerk_volgnr
|
||||
,prs_kenmerk_omschrijving
|
||||
,prs_kenmerk_kenmerktype
|
||||
,prs_kenmerk_lengte)
|
||||
values
|
||||
(1015
|
||||
,'B'
|
||||
,130
|
||||
,'Debiteurnaam'
|
||||
,'C'
|
||||
,30);
|
||||
|
||||
/* Bestaat al sinds 2004-11-05 15:21:08, gezien in versie 4.48
|
||||
insert into prs_kenmerk
|
||||
(prs_kenmerk_key
|
||||
,prs_kenmerk_niveau
|
||||
,prs_kenmerk_volgnr
|
||||
,prs_kenmerk_omschrijving
|
||||
,prs_kenmerk_kenmerktype
|
||||
,prs_kenmerk_lengte)
|
||||
values
|
||||
(1100
|
||||
,'A'
|
||||
,131
|
||||
,'Factureren aan'
|
||||
,'C'
|
||||
,30);
|
||||
*/
|
||||
|
||||
insert into fac_usrtab
|
||||
(fac_usrtab_key
|
||||
@@ -1085,6 +1063,35 @@ values
|
||||
,'Vastgoed'
|
||||
,990);
|
||||
|
||||
INSERT INTO PRS_REFKENMERK
|
||||
(PRS_REFKENMERK_KEY
|
||||
,PRS_REFKENMERK_OMSCHRIJVING
|
||||
,PRS_REFKENMERK_OBJECTNAAM
|
||||
,PRS_REFKENMERK_KOLOMNAAM
|
||||
,PRS_REFKENMERK_KOLOMTXT
|
||||
,FAC_USRTAB_KEY )
|
||||
VALUES
|
||||
(1039
|
||||
,'Divisie'
|
||||
,'FAC_USRDATA'
|
||||
,'FAC_USRDATA_KEY'
|
||||
,'FAC_USRDATA_OMSCHR'
|
||||
, 210);
|
||||
|
||||
insert into prs_kenmerk
|
||||
(prs_kenmerk_key
|
||||
,prs_kenmerk_niveau
|
||||
,prs_kenmerk_volgnr
|
||||
,prs_kenmerk_omschrijving
|
||||
,prs_kenmerk_kenmerktype
|
||||
,prs_refkenmerk_key)
|
||||
values
|
||||
(1015
|
||||
,'B'
|
||||
,130
|
||||
,'Divisie indien huurder'
|
||||
,'R'
|
||||
,1039);
|
||||
|
||||
insert into prs_kenmerk
|
||||
(prs_kenmerk_key
|
||||
@@ -1131,14 +1138,14 @@ having count(prs_bedrijf_key) > 1
|
||||
*/
|
||||
|
||||
create or replace view conn_v_tmp_huurder_b as
|
||||
select prs_bedrijf_key, huurdernr
|
||||
select prs_bedrijf_key, huurder
|
||||
from conn_v_tmp_huurder h, prs_bedrijf b
|
||||
where h.huurdernr = substr(substr(NVL(b.PRS_LEVERANCIER_NR,''),instr(NVL(b.PRS_LEVERANCIER_NR,''),'/')),2)
|
||||
and instr(b.PRS_LEVERANCIER_NR,'/') <> 0
|
||||
and b.prs_bedrijf_verwijder is null
|
||||
and b.prs_bedrijf_huurder = '1'
|
||||
UNION
|
||||
select prs_bedrijf_key, huurdernr
|
||||
select prs_bedrijf_key, huurder
|
||||
from conn_v_tmp_huurder h, prs_bedrijf b
|
||||
where h.huurdernr = b.prs_leverancier_nr
|
||||
and b.prs_bedrijf_verwijder is null
|
||||
@@ -1178,7 +1185,7 @@ BEGIN
|
||||
(rec.prs_bedrijf_key
|
||||
,'B'
|
||||
,1012
|
||||
,rec.huurdernr
|
||||
,rec.huurder
|
||||
);
|
||||
|
||||
commit;
|
||||
@@ -1216,13 +1223,13 @@ having count(prs_afdeling_key) > 1
|
||||
*/
|
||||
|
||||
create or replace view conn_v_tmp_huurder_a as
|
||||
select prs_afdeling_key, huurdernr
|
||||
select prs_afdeling_key, huurder
|
||||
from conn_v_tmp_huurder h, prs_afdeling a
|
||||
where h.huurdernr = substr(substr(NVL(a.prs_afdeling_kostenplaats,''),instr(NVL(a.prs_afdeling_kostenplaats,''),'/')),2)
|
||||
and a.prs_afdeling_verwijder is null
|
||||
and instr(prs_afdeling_kostenplaats,'/') <> 0
|
||||
UNION ALL
|
||||
select prs_afdeling_key, huurdernr
|
||||
select prs_afdeling_key, huurder
|
||||
from conn_v_tmp_huurder h, prs_afdeling a
|
||||
where h.huurdernr = a.prs_afdeling_kostenplaats
|
||||
and a.prs_afdeling_verwijder is null;
|
||||
@@ -1262,7 +1269,7 @@ BEGIN
|
||||
(rec.prs_afdeling_key
|
||||
,'A'
|
||||
,1013
|
||||
,rec.huurdernr
|
||||
,rec.huurder
|
||||
);
|
||||
|
||||
commit;
|
||||
@@ -1280,6 +1287,119 @@ BEGIN
|
||||
END;
|
||||
/
|
||||
|
||||
create or replace view conn_v_tmp_huurder as
|
||||
select huurdernr, huurder, businessunit
|
||||
from CONN_IMPORT_ETABEL
|
||||
where huurdernr is not null
|
||||
and huurder is not null
|
||||
group by huurdernr, huurder, businessunit;
|
||||
|
||||
create or replace view conn_v_tmp_huurder_b as
|
||||
select prs_bedrijf_key, businessunit
|
||||
from conn_v_tmp_huurder h, prs_bedrijf b
|
||||
where h.huurdernr = substr(substr(NVL(b.PRS_LEVERANCIER_NR,''),instr(NVL(b.PRS_LEVERANCIER_NR,''),'/')),2)
|
||||
and instr(b.PRS_LEVERANCIER_NR,'/') <> 0
|
||||
and b.prs_bedrijf_verwijder is null
|
||||
and b.prs_bedrijf_huurder = '1'
|
||||
UNION
|
||||
select prs_bedrijf_key, businessunit
|
||||
from conn_v_tmp_huurder h, prs_bedrijf b
|
||||
where h.huurdernr = b.prs_leverancier_nr
|
||||
and b.prs_bedrijf_verwijder is null
|
||||
and b.prs_bedrijf_huurder = '1';
|
||||
|
||||
|
||||
-- insert 'divisie'
|
||||
DECLARE
|
||||
CURSOR c1 IS
|
||||
select *
|
||||
from conn_v_tmp_huurder_b
|
||||
where 1=1;
|
||||
|
||||
rec c1%rowtype;
|
||||
teller number;
|
||||
v_divisie_count number;
|
||||
v_divisie_key number;
|
||||
cCount number(10);
|
||||
error varchar2(100);
|
||||
BEGIN
|
||||
|
||||
OPEN c1;
|
||||
IF c1%ISOPEN THEN
|
||||
teller := 0;
|
||||
|
||||
LOOP
|
||||
BEGIN
|
||||
|
||||
FETCH c1 INTO rec;
|
||||
|
||||
EXIT WHEN c1%NOTFOUND;
|
||||
teller := teller + 1;
|
||||
|
||||
error := 'before v_divisie_count';
|
||||
|
||||
select count(fac_usrdata_key)
|
||||
into v_divisie_count
|
||||
from fac_usrdata where fac_usrdata_upper = UPPER(rec.businessunit)
|
||||
and fac_usrtab_key = 210;
|
||||
|
||||
if v_divisie_count <> 1 THEN
|
||||
|
||||
error := 'before insert fac_usrdata ('|| v_divisie_count || ') ';
|
||||
|
||||
insert into fac_usrdata
|
||||
(fac_usrtab_key
|
||||
,fac_usrdata_code
|
||||
,fac_usrdata_omschr
|
||||
,fac_usrdata_volgnr)
|
||||
values
|
||||
(210
|
||||
,rec.businessunit
|
||||
,rec.businessunit
|
||||
,990);
|
||||
|
||||
error := 'after insert fac_usrdata';
|
||||
END IF;
|
||||
|
||||
error := 'before v_divisie_key';
|
||||
|
||||
select fac_usrdata_key
|
||||
into v_divisie_key
|
||||
from fac_usrdata where fac_usrdata_upper = UPPER(rec.businessunit) and fac_usrtab_key = 210;
|
||||
|
||||
error := 'before insert prs_kenmerklink';
|
||||
|
||||
insert into prs_kenmerklink
|
||||
(PRS_LINK_KEY
|
||||
,PRS_KENMERKLINK_NIVEAU
|
||||
,PRS_KENMERK_KEY
|
||||
,PRS_KENMERKLINK_WAARDE)
|
||||
values
|
||||
(rec.prs_bedrijf_key
|
||||
,'B'
|
||||
,1015
|
||||
,v_divisie_key
|
||||
);
|
||||
|
||||
commit;
|
||||
|
||||
EXCEPTION WHEN OTHERS THEN
|
||||
teller := teller - 1;
|
||||
-- insert into aeg (descre) values ('error ' || error || ' : ' || rec.prs_bedrijf_key || ' div: ' || v_divisie_key );
|
||||
-- commit;
|
||||
|
||||
END;
|
||||
END LOOP;
|
||||
|
||||
END IF;
|
||||
CLOSE c1;
|
||||
|
||||
commit;
|
||||
END;
|
||||
/
|
||||
|
||||
|
||||
|
||||
drop view conn_v_tmp_huurder;
|
||||
|
||||
drop view conn_v_tmp_huurder_a;
|
||||
@@ -1311,6 +1431,7 @@ AND PRS_KENMERKLINK_NIVEAU = 'B');
|
||||
*/
|
||||
|
||||
|
||||
|
||||
-- Dubbele alg_onroerendgoed_keys
|
||||
-- Bug gevonden tijdens testen 4.50
|
||||
-- FSN#1200
|
||||
@@ -1396,6 +1517,18 @@ delete from ins_deel where ins_deel_key = 21455;
|
||||
END;
|
||||
/
|
||||
|
||||
-- CONN#435
|
||||
update alg_refkenmerk set alg_refkenmerk_objectnaam = 'CONN_V_LEV_SCHOONMAAK'
|
||||
where alg_refkenmerk_key = 1000;
|
||||
|
||||
|
||||
@conn#465.sql;
|
||||
@conn#467.sql;
|
||||
@conn#470.sql;
|
||||
@perman.sql;
|
||||
@NavHuurder.sql;
|
||||
@conn.sql;
|
||||
|
||||
spool off
|
||||
|
||||
commit;
|
||||
|
||||
@@ -27,6 +27,16 @@ AS
|
||||
AND aog.alg_onroerendgoed_keys = cog.alg_onrgoed_key;
|
||||
|
||||
|
||||
-- CONN#435
|
||||
CREATE OR REPLACE VIEW CONN_V_LEV_SCHOONMAAK
|
||||
(PRS_BEDRIJF_KEY, PRS_BEDRIJF_NAAM)
|
||||
AS
|
||||
SELECT DISTINCT prs_bedrijf.PRS_BEDRIJF_KEY,prs_bedrijf.PRS_BEDRIJF_NAAM
|
||||
FROM prs_bedrijf, prs_bedrijfdienstlocatie
|
||||
WHERE prs_bedrijf.prs_bedrijf_verwijder IS NULL
|
||||
AND prs_bedrijf.prs_bedrijf_key = prs_bedrijfdienstlocatie.prs_bedrijf_key
|
||||
AND prs_bedrijfdienstlocatie.prs_dienst_key = 129 ;
|
||||
|
||||
|
||||
CREATE OR REPLACE VIEW CONN_MI_RAPPORT_PROD_GROEP
|
||||
(NR, FCLT_F_MAAND, NAAM, FCLT_F_BUSINESS_UNIT, AFDELING,
|
||||
|
||||
Reference in New Issue
Block a user