CONN#20969+CONN#21887
svn path=/Customer/trunk/; revision=15055
This commit is contained in:
Maarten van der Heide
127
CONN/conn.sql
127
CONN/conn.sql
@@ -1,7 +1,7 @@
|
||||
-- Script containing customer specific configuration sql statements for CONN: Connexxion
|
||||
-- (c) 2005-2010 SG|facilitor bv
|
||||
-- $Revision: 178 $
|
||||
-- $Modtime: 2-12-11 14:24 $
|
||||
-- $Revision: 179 $
|
||||
-- $Modtime: 14-12-11 13:19 $
|
||||
--
|
||||
-- Support: +31 53 4800710
|
||||
|
||||
@@ -3865,7 +3865,7 @@ SELECT TO_CHAR (bo.bes_bestelopdr_key) OrderNr,
|
||||
TO_CHAR (f.fin_factuur_datum, 'YYYYMMDD') FactDatum,
|
||||
'' BoekDatum,
|
||||
'' SpreidenOver,
|
||||
NVL(ks.prs_kostensoort_oms, kst.prs_kostensoort_oms) KostenSoort,
|
||||
COALESCE(kfr.prs_kostensoort_oms, ks.prs_kostensoort_oms, kst.prs_kostensoort_oms) KostenSoort,
|
||||
fr.fin_factuurregel_omschrijving Omschrijving,
|
||||
fr.fin_factuurregel_referentie KostenPlaats,
|
||||
(SELECT SUBSTR(k.prs_kostenplaats_nr, 1 ,INSTR(k.prs_kostenplaats_nr, '/', 1, 1)-1)
|
||||
@@ -3874,7 +3874,7 @@ SELECT TO_CHAR (bo.bes_bestelopdr_key) OrderNr,
|
||||
FROM dual) Huurder,
|
||||
SUM(boi.bes_bestelopdr_item_aantal) Aantal,
|
||||
fr.fin_factuurregel_totaal KostPrijs, --SUM(boi.bes_bestelopdr_item_prijs) KostPrijs,
|
||||
NVL (fin_factuur_boekmaand, TO_CHAR (f.fin_factuur_datum, 'YYYY-MM')) VerdeelPeriode,
|
||||
COALESCE (fin_factuur_boekmaand, TO_CHAR (f.fin_factuur_datum, 'YYYY-MM')) VerdeelPeriode,
|
||||
DECODE (fr.fin_factuurregel_totaal,
|
||||
0, '0',
|
||||
DECODE (ROUND(100*fr.fin_factuurregel_btw/fr.fin_factuurregel_totaal), 19, '2',6,'1','0')
|
||||
@@ -3891,6 +3891,7 @@ SELECT TO_CHAR (bo.bes_bestelopdr_key) OrderNr,
|
||||
prs_kostenplaats k,
|
||||
fin_factuur f,
|
||||
fin_factuurregel fr,
|
||||
prs_kostensoort kfr,
|
||||
prs_kostensoort ks,
|
||||
bes_srtdeel isd,
|
||||
bes_srtgroep isg,
|
||||
@@ -3905,6 +3906,7 @@ SELECT TO_CHAR (bo.bes_bestelopdr_key) OrderNr,
|
||||
AND f.bes_bestelopdr_key = bo.bes_bestelopdr_key
|
||||
AND f.fin_factuur_statuses_key = 6
|
||||
AND f.fin_factuur_key = fr.fin_factuur_key
|
||||
AND fr.prs_kostensoort_key = kfr.prs_kostensoort_key(+)
|
||||
AND kst.prs_kostensoort_key = itd.prs_kostensoort_key
|
||||
AND itd.ins_discipline_key = isg.ins_discipline_key
|
||||
AND isg.bes_srtgroep_key = isd.bes_srtgroep_key
|
||||
@@ -3913,12 +3915,12 @@ SELECT TO_CHAR (bo.bes_bestelopdr_key) OrderNr,
|
||||
f.fin_factuur_nr,
|
||||
b.prs_leverancier_nr,
|
||||
TO_CHAR (f.fin_factuur_datum, 'YYYYMMDD'),
|
||||
NVL(ks.prs_kostensoort_oms, kst.prs_kostensoort_oms),
|
||||
COALESCE(kfr.prs_kostensoort_oms, ks.prs_kostensoort_oms, kst.prs_kostensoort_oms),
|
||||
fr.fin_factuurregel_omschrijving,
|
||||
fr.fin_factuurregel_referentie,
|
||||
k.prs_kostenplaats_nr,
|
||||
fr.fin_factuurregel_totaal,
|
||||
NVL (fin_factuur_boekmaand, TO_CHAR (f.fin_factuur_datum, 'YYYY-MM')),
|
||||
COALESCE (fin_factuur_boekmaand, TO_CHAR (f.fin_factuur_datum, 'YYYY-MM')),
|
||||
DECODE (ROUND(100*fr.fin_factuurregel_btw/fr.fin_factuurregel_totaal), 19, '2',6,'1','0'),
|
||||
f.fin_factuur_totaal_btw,
|
||||
f.fin_factuur_totaal,
|
||||
@@ -3938,7 +3940,7 @@ SELECT 'C' || c.cnt_contract_nummer_intern opdrachtnr,
|
||||
TO_CHAR (f.fin_factuur_datum, 'YYYYMMDD') FactDatum,
|
||||
'' BoekDatum,
|
||||
'' SpreidenOver,
|
||||
NVL(ks.prs_kostensoort_oms, kst.prs_kostensoort_oms) KostenSoort,
|
||||
COALESCE(kfr.prs_kostensoort_oms, ks.prs_kostensoort_oms, kst.prs_kostensoort_oms) KostenSoort,
|
||||
fr.fin_factuurregel_omschrijving Omschrijving,
|
||||
fr.fin_factuurregel_referentie KostenPlaats,
|
||||
(SELECT SUBSTR(k.prs_kostenplaats_nr, 1 ,INSTR(k.prs_kostenplaats_nr, '/', 1, 1)-1)
|
||||
@@ -3946,7 +3948,7 @@ SELECT 'C' || c.cnt_contract_nummer_intern opdrachtnr,
|
||||
'' Huurder,
|
||||
1 Aantal,
|
||||
fr.fin_factuurregel_totaal KostPrijs, --SUM(boi.bes_bestelopdr_item_prijs) KostPrijs,
|
||||
NVL (fin_factuur_boekmaand, TO_CHAR (f.fin_factuur_datum, 'YYYY-MM')) VerdeelPeriode,
|
||||
COALESCE (fin_factuur_boekmaand, TO_CHAR (f.fin_factuur_datum, 'YYYY-MM')) VerdeelPeriode,
|
||||
DECODE (fr.fin_factuurregel_totaal,
|
||||
0, '0',
|
||||
DECODE (ROUND(100*fr.fin_factuurregel_btw/fr.fin_factuurregel_totaal), 19, '2',6,'1','0')
|
||||
@@ -3961,13 +3963,15 @@ SELECT 'C' || c.cnt_contract_nummer_intern opdrachtnr,
|
||||
prs_kostensoort ks,
|
||||
prs_kostensoort kst,
|
||||
fin_factuur f,
|
||||
fin_factuurregel fr
|
||||
fin_factuurregel fr,
|
||||
prs_kostensoort kfr
|
||||
WHERE f.cnt_contract_key = c.cnt_contract_key
|
||||
AND b.prs_bedrijf_key = c.cnt_prs_bedrijf_key
|
||||
AND c.prs_kostenplaats_key = k.prs_kostenplaats_key(+)
|
||||
AND c.prs_kostensoort_key = kst.prs_kostensoort_key(+)
|
||||
AND f.prs_kostensoort_key = ks.prs_kostensoort_key(+)
|
||||
AND fr.fin_factuur_key = f.fin_factuur_key
|
||||
AND fr.prs_kostensoort_key = kfr.prs_kostensoort_key(+)
|
||||
AND f.fin_factuur_statuses_key = 6;
|
||||
|
||||
|
||||
@@ -3983,8 +3987,8 @@ SELECT sdi.ins_srtdiscipline_prefix || o.mld_melding_key || '/' || o.mld_opdr
|
||||
TO_CHAR (f.fin_factuur_datum, 'YYYYMMDD') FactDatum,
|
||||
'' BoekDatum, -- mld_kenmerk_key = 131 , wordt niet meer gebruikt
|
||||
'' SpreidenOver,
|
||||
NVL(ks.prs_kostensoort_oms,
|
||||
NVL((SELECT prs_kostensoort_oms
|
||||
COALESCE(kfr.prs_kostensoort_oms, ks.prs_kostensoort_oms,
|
||||
COALESCE((SELECT prs_kostensoort_oms
|
||||
FROM prs_kostensoort kst
|
||||
WHERE kst.prs_kostensoort_key = stdm.prs_kostensoort_key),
|
||||
(SELECT kst.prs_kostensoort_oms
|
||||
@@ -3998,7 +4002,7 @@ SELECT sdi.ins_srtdiscipline_prefix || o.mld_melding_key || '/' || o.mld_opdr
|
||||
FROM dual), '') Huurder,
|
||||
1 Aantal,
|
||||
fr.fin_factuurregel_totaal KostPrijs,
|
||||
NVL (fin_factuur_boekmaand, TO_CHAR (f.fin_factuur_datum, 'YYYY-MM')) VerdeelPeriode,
|
||||
COALESCE (fin_factuur_boekmaand, TO_CHAR (f.fin_factuur_datum, 'YYYY-MM')) VerdeelPeriode,
|
||||
DECODE (fr.fin_factuurregel_totaal,
|
||||
0, '0',
|
||||
DECODE (ROUND(100*fr.fin_factuurregel_btw/fr.fin_factuurregel_totaal), 19, '2',6,'1','0')
|
||||
@@ -4020,6 +4024,7 @@ SELECT sdi.ins_srtdiscipline_prefix || o.mld_melding_key || '/' || o.mld_opdr
|
||||
prs_kostenplaats k,
|
||||
fin_factuur f,
|
||||
fin_factuurregel fr,
|
||||
prs_kostensoort kfr,
|
||||
alg_locatie l,
|
||||
mld_stdmelding stdm,
|
||||
ins_tab_discipline di,
|
||||
@@ -4031,6 +4036,7 @@ SELECT sdi.ins_srtdiscipline_prefix || o.mld_melding_key || '/' || o.mld_opdr
|
||||
AND m.mld_alg_locatie_key = l.alg_locatie_key
|
||||
AND f.mld_opdr_key = o.mld_opdr_key
|
||||
AND f.fin_factuur_key = fr.fin_factuur_key
|
||||
AND fr.prs_kostensoort_key = kfr.prs_kostensoort_key(+)
|
||||
AND m.mld_stdmelding_key = stdm.mld_stdmelding_key
|
||||
AND di.ins_discipline_key = stdm.mld_ins_discipline_key
|
||||
AND sdi.ins_srtdiscipline_key = di.ins_srtdiscipline_key
|
||||
@@ -4447,7 +4453,7 @@ BEGIN
|
||||
FROM DUAL;
|
||||
|
||||
fac.imp_writelog (p_applname, p_applrun, 'S',
|
||||
'Cxx factuurimport $Revision: 178 $', '');
|
||||
'Cxx factuurimport $Revision: 179 $', '');
|
||||
|
||||
OPEN cfactuur;
|
||||
IF cfactuur%ISOPEN THEN
|
||||
@@ -9609,11 +9615,11 @@ AS
|
||||
DECODE (UPPER (apkplicht),
|
||||
'JA', 129,
|
||||
'NEE', 130,
|
||||
apkplicht)
|
||||
-1)
|
||||
apkplicht,
|
||||
categorie,
|
||||
alg_locatie_code,
|
||||
alg_ruimte_nr, -- Wordt nog niets mee gedaan!
|
||||
alg_ruimte_nr, -- CONN#21887/Relevant igv. nieuwe objecten!
|
||||
prs_bedrijf_naam, -- Wordt nog niets mee gedaan!
|
||||
ins_srtcontrole_omschrijving,
|
||||
ins_deelsrtcontrole_datum,
|
||||
@@ -9631,7 +9637,7 @@ AS
|
||||
DECODE (UPPER (afgekeurd),
|
||||
'JA', 129,
|
||||
'NEE', 130,
|
||||
afgekeurd)
|
||||
-1)
|
||||
afgekeurd
|
||||
FROM conn_imp_inspectieobj;
|
||||
|
||||
@@ -9764,58 +9770,87 @@ AS
|
||||
FROM ins_srtdeel
|
||||
WHERE ins_srtdeel_key = v_srtdeel_key;
|
||||
|
||||
v_errormsg := 'Fout bij bepalen default ruimte';
|
||||
v_errormsg := 'Fout bij bepalen gewenste ruimte';
|
||||
|
||||
SELECT COUNT ( * )
|
||||
INTO ccount
|
||||
FROM alg_v_aanwezigruimte r,
|
||||
alg_verdieping v,
|
||||
alg_gebouw g
|
||||
WHERE r.alg_ruimte_upper_nr = c_ruimte_nr
|
||||
WHERE r.alg_ruimte_upper_nr = rec.alg_ruimte_nr
|
||||
AND r.alg_verdieping_key = v.alg_verdieping_key
|
||||
AND v.alg_gebouw_key = g.alg_gebouw_key
|
||||
AND g.alg_locatie_key = v_locatie_key;
|
||||
|
||||
|
||||
IF ccount > 0 -- c_ruimte_nr bestaat reeds op locatie!
|
||||
IF ccount > 0 -- rec.alg_ruimte_nr bekend op locatie!
|
||||
THEN
|
||||
SELECT MAX (r.alg_ruimte_key)
|
||||
INTO v_ruimte_key
|
||||
FROM alg_v_aanwezigruimte r,
|
||||
alg_verdieping v,
|
||||
alg_gebouw g
|
||||
WHERE r.alg_ruimte_upper_nr = rec.alg_ruimte_nr
|
||||
AND r.alg_verdieping_key = v.alg_verdieping_key
|
||||
AND v.alg_gebouw_key = g.alg_gebouw_key
|
||||
AND g.alg_locatie_key = v_locatie_key;
|
||||
ELSE -- rec.alg_ruimte_nr onbekend op locatie, c_ruimte_nr ook?
|
||||
v_errormsg := 'Fout bij bepalen default ruimte';
|
||||
|
||||
SELECT COUNT ( * )
|
||||
INTO ccount
|
||||
FROM alg_v_aanwezigruimte r,
|
||||
alg_verdieping v,
|
||||
alg_gebouw g
|
||||
WHERE r.alg_ruimte_upper_nr = c_ruimte_nr
|
||||
AND r.alg_verdieping_key = v.alg_verdieping_key
|
||||
AND v.alg_gebouw_key = g.alg_gebouw_key
|
||||
AND g.alg_locatie_key = v_locatie_key;
|
||||
ELSE -- c_ruimte_nr bestaat nog niet op locatie, dus toevoegen!
|
||||
v_errormsg := 'Fout bij bepalen default gebouw';
|
||||
|
||||
SELECT MIN (g.alg_gebouw_key)
|
||||
INTO v_gebouw_key
|
||||
FROM alg_v_aanweziggebouw g
|
||||
WHERE g.alg_locatie_key = v_locatie_key;
|
||||
IF ccount > 0 -- c_ruimte_nr bekend op locatie!
|
||||
THEN
|
||||
SELECT MAX (r.alg_ruimte_key)
|
||||
INTO v_ruimte_key
|
||||
FROM alg_v_aanwezigruimte r,
|
||||
alg_verdieping v,
|
||||
alg_gebouw g
|
||||
WHERE r.alg_ruimte_upper_nr = c_ruimte_nr
|
||||
AND r.alg_verdieping_key = v.alg_verdieping_key
|
||||
AND v.alg_gebouw_key = g.alg_gebouw_key
|
||||
AND g.alg_locatie_key = v_locatie_key;
|
||||
ELSE -- c_ruimte_nr nog onbekend op locatie, dan aanmaken!
|
||||
v_errormsg := 'Fout bij bepalen default gebouw';
|
||||
|
||||
v_errormsg := 'Fout bij bepalen default verdieping';
|
||||
SELECT MIN (g.alg_gebouw_key)
|
||||
INTO v_gebouw_key
|
||||
FROM alg_v_aanweziggebouw g
|
||||
WHERE g.alg_locatie_key = v_locatie_key;
|
||||
|
||||
SELECT v.alg_verdieping_key
|
||||
INTO v_verdieping_key
|
||||
FROM alg_v_aanwezigverdieping v
|
||||
WHERE v.alg_gebouw_key = v_gebouw_key
|
||||
AND alg_verdieping_volgnr =
|
||||
(SELECT MIN (alg_verdieping_volgnr)
|
||||
FROM alg_v_aanwezigverdieping
|
||||
WHERE alg_gebouw_key = v.alg_gebouw_key);
|
||||
v_errormsg := 'Fout bij bepalen default verdieping';
|
||||
|
||||
v_errormsg := 'Fout bij toevoegen default ruimte';
|
||||
SELECT v.alg_verdieping_key
|
||||
INTO v_verdieping_key
|
||||
FROM alg_v_aanwezigverdieping v
|
||||
WHERE v.alg_gebouw_key = v_gebouw_key
|
||||
AND alg_verdieping_volgnr =
|
||||
(SELECT MIN (alg_verdieping_volgnr)
|
||||
FROM alg_v_aanwezigverdieping
|
||||
WHERE alg_gebouw_key =
|
||||
v.alg_gebouw_key);
|
||||
|
||||
INSERT INTO alg_ruimte (
|
||||
alg_verdieping_key,
|
||||
alg_srtruimte_key,
|
||||
alg_ruimte_nr
|
||||
)
|
||||
VALUES (v_verdieping_key, c_srtruimte_key, c_ruimte_nr)
|
||||
RETURNING alg_ruimte_key INTO v_ruimte_key;
|
||||
v_errormsg := 'Fout bij toevoegen default ruimte';
|
||||
|
||||
INSERT INTO alg_ruimte (
|
||||
alg_verdieping_key,
|
||||
alg_srtruimte_key,
|
||||
alg_ruimte_nr
|
||||
)
|
||||
VALUES (
|
||||
v_verdieping_key,
|
||||
c_srtruimte_key,
|
||||
c_ruimte_nr
|
||||
)
|
||||
RETURNING alg_ruimte_key INTO v_ruimte_key;
|
||||
END IF;
|
||||
END IF;
|
||||
|
||||
v_errormsg := 'Fout bij toevoegen INS-object';
|
||||
@@ -10346,7 +10381,7 @@ AS
|
||||
END IF;
|
||||
|
||||
-- APK toevoegen; huidige waarde NOOIT gewijzigd via import!
|
||||
IF rec.apkplicht IS NOT NULL AND UPPER (rec.apkplicht) != 'NVT'
|
||||
IF rec.apkplicht IS NOT NULL AND UPPER (rec.apkplicht) != -1
|
||||
THEN
|
||||
v_errormsg := 'Fout bij bepalen APK-kenmerk';
|
||||
|
||||
@@ -10514,7 +10549,7 @@ AS
|
||||
END IF;
|
||||
|
||||
-- AFGEKEURD toevoegen; huidige waarde NOOIT gewijzigd via import!
|
||||
IF rec.afgekeurd IS NOT NULL AND UPPER (rec.afgekeurd) != 'NVT'
|
||||
IF rec.afgekeurd IS NOT NULL AND UPPER (rec.afgekeurd) != -1
|
||||
THEN
|
||||
v_errormsg := 'Fout bij bepalen afgekeurd-kenmerk';
|
||||
|
||||
@@ -10755,7 +10790,7 @@ END conn_update_inspectieobj;
|
||||
BEGIN fac.registercustversion('CONN', 49); END;
|
||||
/
|
||||
|
||||
BEGIN adm.systrackscript('$Workfile: conn.sql $', '$Revision: 178 $', 0); END;
|
||||
BEGIN adm.systrackscript('$Workfile: conn.sql $', '$Revision: 179 $', 0); END;
|
||||
/
|
||||
|
||||
COMMIT;
|
||||
|
||||
Reference in New Issue
Block a user