579 lines
26 KiB
SQL
579 lines
26 KiB
SQL
--
|
||
-- $Id$
|
||
--
|
||
-- Script containing customer specific db-configuration for SKOA.
|
||
DEFINE thisfile = 'SKOA.SQL'
|
||
DEFINE dbuser = '^SKOA'
|
||
|
||
SET ECHO ON
|
||
SET DEFINE ON
|
||
COLUMN fcltlogfile NEW_VALUE fcltlogfile NOPRINT;
|
||
COLUMN fcltcusttxt NEW_VALUE fcltcusttxt NOPRINT;
|
||
WHENEVER SQLERROR CONTINUE;
|
||
SELECT adm.getscriptspoolfile('&thisfile') AS fcltlogfile FROM DUAL;
|
||
SPOOL &fcltlogfile
|
||
WHENEVER SQLERROR EXIT;
|
||
SELECT adm.checkscriptcust('&dbuser') AS fcltcusttxt FROM DUAL;
|
||
WHENEVER SQLERROR CONTINUE;
|
||
---------------------------------------
|
||
PROMPT &fcltcusttxt
|
||
---------------------------------------
|
||
SET DEFINE OFF
|
||
|
||
------ payload begin ------
|
||
|
||
/* WEG!
|
||
CREATE OR REPLACE VIEW skoa_v_verhuurder
|
||
(
|
||
prs_bedrijf_key,
|
||
prs_bedrijf_naam,
|
||
prs_bedrijf_verwijder
|
||
)
|
||
AS
|
||
SELECT b.prs_bedrijf_key,
|
||
b.prs_bedrijf_naam,
|
||
b.prs_bedrijf_verwijder
|
||
FROM prs_bedrijf b
|
||
WHERE b.prs_bedrijf_intern IS NULL;
|
||
*/
|
||
CREATE OR REPLACE VIEW SKOA_V_VERHUURDER_CP
|
||
(
|
||
verhuurder_cp_key,
|
||
verhuurder_cp_naam,
|
||
verhuurder_cp_verwijder
|
||
)
|
||
AS
|
||
SELECT COALESCE (b.prs_bedrijf_key, cp.prs_contactpersoon_key),
|
||
b.prs_bedrijf_naam
|
||
|| DECODE (cp.prs_contactpersoon_key,
|
||
NULL, '',
|
||
' - '
|
||
|| COALESCE (cp.prs_contactpersoon_voornaam, cp.prs_contactpersoon_voorletters)
|
||
|| NVL2 (cp.prs_contactpersoon_tussenv, ' ' || cp.prs_contactpersoon_tussenv, '')
|
||
|| NVL2 (cp.prs_contactpersoon_naam, ' ' || cp.prs_contactpersoon_naam, '')
|
||
|| DECODE (COALESCE (cp.prs_contactpersoon_telefoon_1, cp.prs_contactpersoon_telefoon_2, b.prs_bedrijf_contact_telefoon, b.prs_bedrijf_telefoon),
|
||
NULL, '',
|
||
' ['
|
||
|| COALESCE (cp.prs_contactpersoon_telefoon_1, cp.prs_contactpersoon_telefoon_2, b.prs_bedrijf_contact_telefoon, b.prs_bedrijf_telefoon)
|
||
|| ']')
|
||
|| DECODE (COALESCE (cp.prs_contactpersoon_email, b.prs_bedrijf_email),
|
||
NULL, '',
|
||
'/'
|
||
|| COALESCE (cp.prs_contactpersoon_email, b.prs_bedrijf_email))),
|
||
COALESCE (cp.prs_contactpersoon_verwijder, b.prs_bedrijf_verwijder)
|
||
FROM prs_bedrijf b, prs_contactpersoon cp
|
||
WHERE b.prs_bedrijf_intern IS NULL
|
||
AND b.prs_bedrijf_huurder = 1
|
||
AND b.prs_bedrijf_key = cp.prs_bedrijf_key(+);
|
||
|
||
CREATE OR REPLACE VIEW SKOA_V_UITVOERDER_CP
|
||
(
|
||
uitvoerder_cp_key,
|
||
uitvoerder_cp_naam,
|
||
uitvoerder_cp_verwijder
|
||
)
|
||
AS
|
||
SELECT COALESCE (b.prs_bedrijf_key, cp.prs_contactpersoon_key),
|
||
b.prs_bedrijf_naam
|
||
|| DECODE (cp.prs_contactpersoon_key,
|
||
NULL, '',
|
||
' - '
|
||
|| COALESCE (cp.prs_contactpersoon_voornaam, cp.prs_contactpersoon_voorletters)
|
||
|| NVL2 (cp.prs_contactpersoon_tussenv, ' ' || cp.prs_contactpersoon_tussenv, '')
|
||
|| NVL2 (cp.prs_contactpersoon_naam, ' ' || cp.prs_contactpersoon_naam, '')
|
||
|| DECODE (COALESCE (cp.prs_contactpersoon_telefoon_1, cp.prs_contactpersoon_telefoon_2, b.prs_bedrijf_contact_telefoon, b.prs_bedrijf_telefoon),
|
||
NULL, '',
|
||
' ['
|
||
|| COALESCE (cp.prs_contactpersoon_telefoon_1, cp.prs_contactpersoon_telefoon_2, b.prs_bedrijf_contact_telefoon, b.prs_bedrijf_telefoon)
|
||
|| ']')
|
||
|| DECODE (COALESCE (cp.prs_contactpersoon_email, b.prs_bedrijf_email),
|
||
NULL, '',
|
||
'/'
|
||
|| COALESCE (cp.prs_contactpersoon_email, b.prs_bedrijf_email))),
|
||
COALESCE (cp.prs_contactpersoon_verwijder, b.prs_bedrijf_verwijder)
|
||
FROM prs_bedrijf b, prs_contactpersoon cp
|
||
WHERE b.prs_bedrijf_intern IS NULL
|
||
AND (b.prs_bedrijf_leverancier = 1 OR b.prs_bedrijf_uitvoerende = 1 OR b.prs_bedrijf_contract = 1)
|
||
AND b.prs_bedrijf_key = cp.prs_bedrijf_key(+);
|
||
|
||
/*
|
||
Zoals op 8-7 afgestemd is het verzoek om de volgende 4 real-time monitors (of grafieken) te gaan realiseren:
|
||
1. Staafdiagram met lopende meldingen per behandelteam (Facilitair + Onderhoud + Inrichting groepen en tuinen + Marketing) met de kleuren: [a] blauw=meer dan 2 werkdagen voor geplande einddatum (van de melding!) en actie bij aanvrager, [b] groen=meer dan 2 werkdagen voor geplande einddatum en actie bij backoffice (niet bij aanvrager) en [c] rood=minder dan 2 werkdagen voor geplande einddatum.
|
||
2. Staafdiagram met lopende meldingen per locatie en zie verder 1.
|
||
3. Staafdiagram met lopende opdrachten die zijn uitgegeven per interne uitvoerder en 1 staaf voor alle lopende opdrachten die extern zijn uitgegeven met de kleuren: [a] groen=meer dan 2 werkdagen voor geplande einddatum (van de opdracht!) en [b] rood=minder dan 2 werkdagen voor geplande einddatum.
|
||
4. Lijndiagram met afgehandelde opdrachten per maand voor elke interne uitvoerder en 1 lijn voor alle afgehandelde opdrachten die extern waren uitgegeven.
|
||
|
||
Aanvullende wens is dat de staafdiagrammen (1 t/m 3) klikbaar zijn.
|
||
*/
|
||
CREATE OR REPLACE VIEW SKOA_V_UDR_MLD_OPEN
|
||
(
|
||
mld_melding_key,
|
||
meldingid,
|
||
vakgroeptype,
|
||
--fclt_3d_discipline_key,
|
||
vakgroep_key,
|
||
vakgroep,
|
||
standaardmelding,
|
||
--fclt_3d_locatie_key,
|
||
locatie_key,
|
||
locatiecode,
|
||
locatie,
|
||
status,
|
||
behandelteam_key,
|
||
behandelteam,
|
||
mldnew,
|
||
melding_datum,
|
||
geplande_einddatum,
|
||
--uitvoertijd,
|
||
optijd_telaat
|
||
)
|
||
AS
|
||
SELECT x.mld_melding_key,
|
||
x.ins_srtdiscipline_prefix || TO_CHAR (x.mld_melding_key) meldingid,
|
||
x.ins_srtdiscipline_omschrijving vakgroeptype,
|
||
x.ins_discipline_key vakgroep_key,
|
||
x.ins_discipline_omschrijving vakgroep,
|
||
x.mld_stdmelding_omschrijving standaardmelding,
|
||
x.alg_locatie_key,
|
||
x.alg_locatie_code,
|
||
x.alg_locatie_omschrijving,
|
||
x.mld_statuses_omschrijving status,
|
||
x.behandelteam_key,
|
||
COALESCE (x.behandelteam, '<Geen>'),
|
||
x.mldnew,
|
||
x.mld_melding_datum,
|
||
x.mld_melding_einddatum,
|
||
--TO_CHAR (x.mld_melding_t_uitvoertijd.tijdsduur) || x.mld_melding_t_uitvoertijd.eenheid uitvoertijd,
|
||
DECODE (SIGN (x.gepland_over_2wd - SYSDATE),
|
||
-1,
|
||
DECODE (SIGN (x.mld_melding_einddatum - SYSDATE),
|
||
-1, 'Te laat', -- Rood
|
||
'Over 2 dagen te laat'), -- Oranje
|
||
DECODE (BITAND (x.mld_melding_actiecode, 1),
|
||
1, 'Actie bij behandelaar', -- Groen en "alle tijd"
|
||
'Actie bij aanvrager')) -- Blauw en "alle tijd"
|
||
optijd_telaat
|
||
FROM (SELECT m.mld_melding_key,
|
||
sd.ins_srtdiscipline_prefix,
|
||
sd.ins_srtdiscipline_omschrijving,
|
||
md.ins_discipline_key,
|
||
md.ins_discipline_omschrijving,
|
||
sm.mld_stdmelding_key,
|
||
sm.mld_stdmelding_omschrijving,
|
||
l.alg_locatie_key,
|
||
l.alg_locatie_code,
|
||
l.alg_locatie_omschrijving,
|
||
ms.mld_statuses_omschrijving,
|
||
bt.ins_discipline_key behandelteam_key,
|
||
bt.ins_discipline_omschrijving behandelteam,
|
||
--m.mld_melding_spoed,
|
||
fac.gettrackingdate ('MLDNEW', m.mld_melding_key) mldnew,
|
||
m.mld_melding_datum,
|
||
m.mld_melding_einddatum,
|
||
--m.mld_melding_t_uitvoertijd,
|
||
fac.datumtijdplusuitvoertijd (
|
||
m.mld_melding_einddatum - 14,
|
||
mld.getactualuitvoer (m.mld_melding_einddatum - 14, m.mld_melding_einddatum, sm.mld_stdmelding_key, -1, -1, -1, 'D').tijdsduur - 2,
|
||
'D')
|
||
gepland_over_2wd, -- Twee werkdagen voor geplande einddatum (niet triviaal, maar best slim bedacht, al zeg ik het zelf)
|
||
m.mld_melding_actiecode -- 1=bij behandelaar/2=bij aanvrager/129=reactie aanvrager/257=info aanvrager/258=actie aanvrager
|
||
FROM mld_melding m,
|
||
mld_stdmelding sm,
|
||
mld_discipline md,
|
||
ins_srtdiscipline sd,
|
||
alg_locatie l,
|
||
mld_statuses ms,
|
||
mld_discipline bt
|
||
WHERE 1 = 1
|
||
--AND m.mld_melding_datum > TRUNC (ADD_MONTHS (SYSDATE, -24), 'yyyy')
|
||
--AND fac.gettrackingdate ('MLDNEW', m.mld_melding_key) > TRUNC (ADD_MONTHS (SYSDATE, -24), 'yyyy')
|
||
AND m.fac_activiteit_key IS NULL
|
||
AND m.mld_melding_status IN (0, 2, 3, 4, 7, 99) -- Open meldingen
|
||
AND m.mld_stdmelding_key = sm.mld_stdmelding_key
|
||
AND sm.mld_ins_discipline_key = md.ins_discipline_key
|
||
AND md.ins_srtdiscipline_key = sd.ins_srtdiscipline_key
|
||
AND m.mld_alg_locatie_key = l.alg_locatie_key(+)
|
||
AND m.mld_melding_status = ms.mld_statuses_key
|
||
AND m.mld_ins_discipline_key = bt.ins_discipline_key(+)) x;
|
||
|
||
CREATE OR REPLACE VIEW SKOA_V_UDR_ORD_OPEN
|
||
(
|
||
mld_opdr_key,
|
||
opdrachtid,
|
||
opdrachttype_key,
|
||
opdrachttype,
|
||
uitvoerende_key,
|
||
uitvoerende,
|
||
vakgroeptype,
|
||
--fclt_3d_discipline_key,
|
||
vakgroep_key,
|
||
vakgroep,
|
||
standaardmelding,
|
||
--fclt_3d_locatie_key,
|
||
locatie_key,
|
||
locatiecode,
|
||
locatie,
|
||
status,
|
||
ordnew,
|
||
opdracht_datum,
|
||
opdracht_verzonden,
|
||
geplande_einddatum,
|
||
--uitvoertijd,
|
||
optijd_telaat
|
||
)
|
||
AS
|
||
SELECT x.mld_opdr_key,
|
||
x.ins_srtdiscipline_prefix || TO_CHAR (x.mld_melding_key) || '/' || TO_CHAR (x.mld_opdr_bedrijfopdr_volgnr) opdrachtid,
|
||
x.mld_typeopdr_key,
|
||
x.mld_typeopdr_omschrijving,
|
||
x.mld_uitvoerende_keys,
|
||
DECODE (x.prs_bedrijf_naam,
|
||
NULL,
|
||
x.prs_perslid_naam_full,
|
||
--'Extern')
|
||
x.prs_bedrijf_naam)
|
||
uitvoerende,
|
||
x.ins_srtdiscipline_omschrijving vakgroeptype,
|
||
x.ins_discipline_key vakgroep_key,
|
||
x.ins_discipline_omschrijving vakgroep,
|
||
x.mld_stdmelding_omschrijving standaardmelding,
|
||
x.alg_locatie_key,
|
||
x.alg_locatie_code,
|
||
x.alg_locatie_omschrijving,
|
||
x.mld_statusopdr_omschrijving status,
|
||
x.ordnew,
|
||
x.mld_opdr_datumbegin,
|
||
x.mld_opdr_verzonden,
|
||
x.mld_opdr_einddatum,
|
||
--TO_CHAR (x.mld_melding_t_uitvoertijd.tijdsduur) || x.mld_melding_t_uitvoertijd.eenheid uitvoertijd,
|
||
DECODE (SIGN (x.gepland_over_2wd - SYSDATE),
|
||
-1,
|
||
DECODE (SIGN (x.mld_opdr_einddatum - SYSDATE),
|
||
-1, 'Te laat', -- Rood
|
||
'Over 2 dagen te laat'), -- Oranje
|
||
'Op tijd') -- Groen en "alle tijd"
|
||
optijd_telaat
|
||
FROM (SELECT o.mld_opdr_key,
|
||
o.mld_melding_key,
|
||
o.mld_opdr_bedrijfopdr_volgnr,
|
||
ot.mld_typeopdr_key,
|
||
ot.mld_typeopdr_omschrijving,
|
||
o.mld_uitvoerende_keys,
|
||
lev.prs_bedrijf_naam,
|
||
iuv.prs_perslid_naam_full,
|
||
sd.ins_srtdiscipline_prefix,
|
||
sd.ins_srtdiscipline_omschrijving,
|
||
md.ins_discipline_key,
|
||
md.ins_discipline_omschrijving,
|
||
sm.mld_stdmelding_key,
|
||
sm.mld_stdmelding_omschrijving,
|
||
l.alg_locatie_key,
|
||
l.alg_locatie_code,
|
||
l.alg_locatie_omschrijving,
|
||
os.mld_statusopdr_omschrijving,
|
||
--m.mld_melding_spoed,
|
||
fac.gettrackingdate ('ORDNEW', o.mld_opdr_key) ordnew,
|
||
o.mld_opdr_datumbegin,
|
||
o.mld_opdr_verzonden,
|
||
o.mld_opdr_einddatum,
|
||
--m.mld_melding_t_uitvoertijd,
|
||
fac.datumtijdplusuitvoertijd (
|
||
o.mld_opdr_einddatum - 14,
|
||
mld.getactualuitvoer (o.mld_opdr_einddatum - 14, o.mld_opdr_einddatum, sm.mld_stdmelding_key, -1, -1, -1, 'D').tijdsduur - 2,
|
||
'D')
|
||
gepland_over_2wd -- Twee werkdagen voor geplande einddatum (niet triviaal, maar best slim bedacht, al zeg ik het zelf)
|
||
FROM mld_opdr o,
|
||
mld_typeopdr ot,
|
||
prs_bedrijf lev,
|
||
prs_v_perslid_fullnames iuv,
|
||
mld_melding m,
|
||
mld_stdmelding sm,
|
||
mld_discipline md,
|
||
ins_srtdiscipline sd,
|
||
alg_locatie l,
|
||
mld_statusopdr os
|
||
WHERE 1 = 1
|
||
--AND o.mld_opdr_datumbegin > TRUNC (ADD_MONTHS (SYSDATE, -24), 'yyyy')
|
||
--AND fac.gettrackingdate ('ORDNEW', o.mld_opdr_key) > TRUNC (ADD_MONTHS (SYSDATE, -24), 'yyyy')
|
||
AND o.mld_statusopdr_key IN (3, 4, 5, 8, 10) -- Open opdrachten
|
||
AND o.mld_typeopdr_key = ot.mld_typeopdr_key
|
||
AND o.mld_uitvoerende_keys = lev.prs_bedrijf_key(+)
|
||
AND o.mld_uitvoerende_keys = iuv.prs_perslid_key(+)
|
||
AND o.mld_melding_key = m.mld_melding_key
|
||
AND m.mld_stdmelding_key = sm.mld_stdmelding_key
|
||
AND sm.mld_ins_discipline_key = md.ins_discipline_key
|
||
AND md.ins_srtdiscipline_key = sd.ins_srtdiscipline_key
|
||
AND m.mld_alg_locatie_key = l.alg_locatie_key(+)
|
||
AND o.mld_statusopdr_key = os.mld_statusopdr_key) x;
|
||
|
||
CREATE OR REPLACE VIEW SKOA_V_UDR_ORD_AFM
|
||
(
|
||
ordafm_maand,
|
||
mld_opdr_key,
|
||
opdrachtid,
|
||
opdrachttype_key,
|
||
opdrachttype,
|
||
uitvoerende_key,
|
||
uitvoerende,
|
||
vakgroeptype,
|
||
--fclt_3d_discipline_key,
|
||
vakgroep_key,
|
||
vakgroep,
|
||
standaardmelding,
|
||
--fclt_3d_locatie_key,
|
||
locatie_key,
|
||
locatiecode,
|
||
locatie,
|
||
status
|
||
)
|
||
AS
|
||
SELECT TO_CHAR (x.ordafm, 'yyyy-mm') ordafm_maand,
|
||
x.mld_opdr_key,
|
||
x.ins_srtdiscipline_prefix || TO_CHAR (x.mld_melding_key) || '/' || TO_CHAR (x.mld_opdr_bedrijfopdr_volgnr) opdrachtid,
|
||
x.mld_typeopdr_key,
|
||
x.mld_typeopdr_omschrijving,
|
||
x.mld_uitvoerende_keys,
|
||
DECODE (x.prs_bedrijf_naam,
|
||
NULL,
|
||
'Intern:' || x.prs_perslid_naam_full,
|
||
'Extern')
|
||
uitvoerende,
|
||
x.ins_srtdiscipline_omschrijving vakgroeptype,
|
||
x.ins_discipline_key vakgroep_key,
|
||
x.ins_discipline_omschrijving vakgroep,
|
||
x.mld_stdmelding_omschrijving standaardmelding,
|
||
x.alg_locatie_key,
|
||
x.alg_locatie_code,
|
||
x.alg_locatie_omschrijving,
|
||
x.mld_statusopdr_omschrijving status
|
||
FROM (SELECT o.mld_opdr_key,
|
||
o.mld_melding_key,
|
||
o.mld_opdr_bedrijfopdr_volgnr,
|
||
ot.mld_typeopdr_key,
|
||
ot.mld_typeopdr_omschrijving,
|
||
o.mld_uitvoerende_keys,
|
||
lev.prs_bedrijf_naam,
|
||
iuv.prs_perslid_naam_full,
|
||
sd.ins_srtdiscipline_prefix,
|
||
sd.ins_srtdiscipline_omschrijving,
|
||
md.ins_discipline_key,
|
||
md.ins_discipline_omschrijving,
|
||
sm.mld_stdmelding_key,
|
||
sm.mld_stdmelding_omschrijving,
|
||
l.alg_locatie_key,
|
||
l.alg_locatie_code,
|
||
l.alg_locatie_omschrijving,
|
||
os.mld_statusopdr_omschrijving,
|
||
fac.gettrackingdate ('ORDAFM', o.mld_opdr_key) ordafm
|
||
FROM mld_opdr o,
|
||
mld_typeopdr ot,
|
||
prs_bedrijf lev,
|
||
prs_v_perslid_fullnames iuv,
|
||
mld_melding m,
|
||
mld_stdmelding sm,
|
||
mld_discipline md,
|
||
ins_srtdiscipline sd,
|
||
alg_locatie l,
|
||
mld_statusopdr os
|
||
WHERE fac.gettrackingdate ('ORDAFM', o.mld_opdr_key) > TRUNC (ADD_MONTHS (SYSDATE, -12), 'mm')
|
||
AND o.mld_statusopdr_key IN (6, 7, 9) -- Gesloten opdrachten
|
||
AND o.mld_typeopdr_key = ot.mld_typeopdr_key
|
||
AND o.mld_uitvoerende_keys = lev.prs_bedrijf_key(+)
|
||
AND o.mld_uitvoerende_keys = iuv.prs_perslid_key(+)
|
||
AND o.mld_melding_key = m.mld_melding_key
|
||
AND m.mld_stdmelding_key = sm.mld_stdmelding_key
|
||
AND sm.mld_ins_discipline_key = md.ins_discipline_key
|
||
AND md.ins_srtdiscipline_key = sd.ins_srtdiscipline_key
|
||
AND m.mld_alg_locatie_key = l.alg_locatie_key(+)
|
||
AND o.mld_statusopdr_key = os.mld_statusopdr_key) x;
|
||
|
||
-- SKOA#84585: Jaarbegroting verlopen objecten.
|
||
CREATE OR REPLACE VIEW SKOA_V_UDR_INS_AFSCHRIJVING
|
||
(
|
||
ins_deel_key,
|
||
discipline,
|
||
groep,
|
||
objectsoort,
|
||
objectsoortcode,
|
||
objectid,
|
||
objectbeschr,
|
||
afdeling,
|
||
eigenaar,
|
||
plaatsaanduiding,
|
||
vestiging,
|
||
adres,
|
||
plaats,
|
||
aankoop_jaar,
|
||
afschr_term,
|
||
afschr_jaar,
|
||
--mjop_y0,
|
||
--mjop_y1,
|
||
--mjop_y2,
|
||
--mjop_y3,
|
||
--mjop_y4,
|
||
--mjop_y5,
|
||
verv_waarde
|
||
)
|
||
AS
|
||
SELECT x.ins_deel_key,
|
||
x.ins_discipline_omschrijving,
|
||
x.ins_srtgroep_omschrijving,
|
||
x.ins_srtdeel_omschrijving,
|
||
x.ins_srtdeel_code,
|
||
x.ins_deel_omschrijving,
|
||
x.ins_deel_opmerking,
|
||
x.afdeling,
|
||
x.eigenaar,
|
||
x.plaatsaanduiding,
|
||
x.vestiging,
|
||
x.adres,
|
||
x.plaats,
|
||
kd1.ins_kenmerkdeel_waarde aankoop_jaar,
|
||
kd2.ins_kenmerkdeel_waarde afschr_term,
|
||
TO_CHAR (fac.safe_to_number (kd1.ins_kenmerkdeel_waarde) + fac.safe_to_number (kd2.ins_kenmerkdeel_waarde)) afschr_jaar,
|
||
--DECODE (SIGN ((fac.safe_to_number (kd1.ins_kenmerkdeel_waarde) + fac.safe_to_number (kd2.ins_kenmerkdeel_waarde)) - fac.safe_to_number (TO_CHAR (SYSDATE, 'yyyy'))),
|
||
-- 0, fac.safe_to_number (kd3.ins_kenmerkdeel_waarde),
|
||
-- TO_NUMBER (NULL)) mjop_y0, -- Dit jaar afgeschreven
|
||
--DECODE (SIGN ((fac.safe_to_number (kd1.ins_kenmerkdeel_waarde) + fac.safe_to_number (kd2.ins_kenmerkdeel_waarde)) - fac.safe_to_number (TO_CHAR (ADD_MONTHS (SYSDATE, 12), 'yyyy'))),
|
||
-- 0, fac.safe_to_number (kd3.ins_kenmerkdeel_waarde),
|
||
-- TO_NUMBER (NULL)) mjop_y1, -- Jaar+1 afgeschreven
|
||
--DECODE (SIGN ((fac.safe_to_number (kd1.ins_kenmerkdeel_waarde) + fac.safe_to_number (kd2.ins_kenmerkdeel_waarde)) - fac.safe_to_number (TO_CHAR (ADD_MONTHS (SYSDATE, 24), 'yyyy'))),
|
||
-- 0, fac.safe_to_number (kd3.ins_kenmerkdeel_waarde),
|
||
-- TO_NUMBER (NULL)) mjop_y2, -- Jaar+2 afgeschreven
|
||
--DECODE (SIGN ((fac.safe_to_number (kd1.ins_kenmerkdeel_waarde) + fac.safe_to_number (kd2.ins_kenmerkdeel_waarde)) - fac.safe_to_number (TO_CHAR (ADD_MONTHS (SYSDATE, 36), 'yyyy'))),
|
||
-- 0, fac.safe_to_number (kd3.ins_kenmerkdeel_waarde),
|
||
-- TO_NUMBER (NULL)) mjop_y3, -- Jaar+3 afgeschreven
|
||
--DECODE (SIGN ((fac.safe_to_number (kd1.ins_kenmerkdeel_waarde) + fac.safe_to_number (kd2.ins_kenmerkdeel_waarde)) - fac.safe_to_number (TO_CHAR (ADD_MONTHS (SYSDATE, 48), 'yyyy'))),
|
||
-- 0, fac.safe_to_number (kd3.ins_kenmerkdeel_waarde),
|
||
-- TO_NUMBER (NULL)) mjop_y4, -- Jaar+4 afgeschreven
|
||
--DECODE (SIGN ((fac.safe_to_number (kd1.ins_kenmerkdeel_waarde) + fac.safe_to_number (kd2.ins_kenmerkdeel_waarde)) - fac.safe_to_number (TO_CHAR (ADD_MONTHS (SYSDATE, 60), 'yyyy'))),
|
||
-- 0, fac.safe_to_number (kd3.ins_kenmerkdeel_waarde),
|
||
-- TO_NUMBER (NULL)) mjop_y5, -- Jaar+5 afgeschreven
|
||
fac.safe_to_number (kd3.ins_kenmerkdeel_waarde) verv_waarde
|
||
FROM (SELECT d.ins_deel_key,
|
||
d.ins_deel_omschrijving,
|
||
d.ins_deel_opmerking,
|
||
td.ins_discipline_key,
|
||
td.ins_discipline_omschrijving,
|
||
sg.ins_srtgroep_key,
|
||
sg.ins_srtgroep_omschrijving,
|
||
sd.ins_srtdeel_key,
|
||
sd.ins_srtdeel_omschrijving,
|
||
sd.ins_srtdeel_code,
|
||
a.prs_afdeling_naam || '-' || a.prs_afdeling_omschrijving afdeling,
|
||
NULL eigenaar,
|
||
NULL plaatsaanduiding,
|
||
NULL vestiging,
|
||
NULL adres,
|
||
NULL plaats
|
||
FROM ins_v_aanwezigdeel d,
|
||
ins_srtdeel sd,
|
||
ins_srtgroep sg,
|
||
ins_tab_discipline td,
|
||
prs_afdeling a
|
||
WHERE d.ins_deel_parent_key IS NULL
|
||
AND d.ins_alg_ruimte_type = 'A'
|
||
AND d.ins_srtdeel_key = sd.ins_srtdeel_key
|
||
AND sd.ins_srtgroep_key = sg.ins_srtgroep_key
|
||
AND sg.ins_discipline_key = td.ins_discipline_key
|
||
--AND td.ins_discipline_key IN (-1)
|
||
AND d.ins_alg_ruimte_type = a.prs_afdeling_key
|
||
UNION ALL
|
||
SELECT d.ins_deel_key,
|
||
d.ins_deel_omschrijving,
|
||
d.ins_deel_opmerking,
|
||
td.ins_discipline_key,
|
||
td.ins_discipline_omschrijving,
|
||
sg.ins_srtgroep_key,
|
||
sg.ins_srtgroep_omschrijving,
|
||
sd.ins_srtdeel_key,
|
||
sd.ins_srtdeel_omschrijving,
|
||
sd.ins_srtdeel_code,
|
||
NULL afdeling,
|
||
pf.prs_perslid_naam_full eigenaar,
|
||
NULL plaatsaanduiding,
|
||
NULL vestiging,
|
||
NULL adres,
|
||
NULL plaats
|
||
FROM ins_v_aanwezigdeel d,
|
||
ins_srtdeel sd,
|
||
ins_srtgroep sg,
|
||
ins_tab_discipline td,
|
||
prs_v_perslid_fullnames_all pf
|
||
WHERE d.ins_deel_parent_key IS NULL
|
||
AND d.ins_alg_ruimte_type = 'P'
|
||
AND d.ins_srtdeel_key = sd.ins_srtdeel_key
|
||
AND sd.ins_srtgroep_key = sg.ins_srtgroep_key
|
||
AND sg.ins_discipline_key = td.ins_discipline_key
|
||
--AND td.ins_discipline_key IN (-1)
|
||
AND d.ins_alg_ruimte_key = pf.prs_perslid_key
|
||
UNION ALL
|
||
SELECT d.ins_deel_key,
|
||
d.ins_deel_omschrijving,
|
||
d.ins_deel_opmerking,
|
||
td.ins_discipline_key,
|
||
td.ins_discipline_omschrijving,
|
||
sg.ins_srtgroep_key,
|
||
sg.ins_srtgroep_omschrijving,
|
||
sd.ins_srtdeel_key,
|
||
sd.ins_srtdeel_omschrijving,
|
||
sd.ins_srtdeel_code,
|
||
NULL afdeling,
|
||
NULL eigenaar,
|
||
ao.alg_plaatsaanduiding plaatsaanduiding,
|
||
l.alg_locatie_omschrijving vestiging,
|
||
l.alg_locatie_adres adres,
|
||
l.alg_locatie_plaats plaats
|
||
FROM ins_v_aanwezigdeel d,
|
||
ins_srtdeel sd,
|
||
ins_srtgroep sg,
|
||
ins_tab_discipline td,
|
||
ins_v_alg_overzicht ao,
|
||
alg_locatie l
|
||
WHERE d.ins_deel_parent_key IS NULL
|
||
AND d.ins_alg_ruimte_type IN ('T', 'R', 'W')
|
||
AND d.ins_srtdeel_key = sd.ins_srtdeel_key
|
||
AND sd.ins_srtgroep_key = sg.ins_srtgroep_key
|
||
AND sg.ins_discipline_key = td.ins_discipline_key
|
||
--AND td.ins_discipline_key IN (-1)
|
||
AND d.ins_alg_ruimte_type = ao.alg_onroerendgoed_type
|
||
AND d.ins_alg_ruimte_key = ao.alg_onroerendgoed_keys
|
||
AND ao.alg_locatie_key = l.alg_locatie_key) x
|
||
LEFT JOIN
|
||
ins_v_aanwezigkenmerkdeel kd1
|
||
ON x.ins_deel_key = kd1.ins_deel_key
|
||
AND EXISTS
|
||
(SELECT 1
|
||
FROM ins_v_aanwezigkenmerk
|
||
WHERE ins_srtkenmerk_key = 383 -- Aangekocht in jaar
|
||
AND ins_kenmerk_key = kd1.ins_kenmerk_key)
|
||
LEFT JOIN
|
||
ins_v_aanwezigkenmerkdeel kd2
|
||
ON x.ins_deel_key = kd2.ins_deel_key
|
||
AND EXISTS
|
||
(SELECT 1
|
||
FROM ins_v_aanwezigkenmerk
|
||
WHERE ins_srtkenmerk_key = 381 -- Afschrijvingstermijn
|
||
AND ins_kenmerk_key = kd2.ins_kenmerk_key)
|
||
LEFT JOIN
|
||
ins_v_aanwezigkenmerkdeel kd3
|
||
ON x.ins_deel_key = kd3.ins_deel_key
|
||
AND EXISTS
|
||
(SELECT 1
|
||
FROM ins_v_aanwezigkenmerk
|
||
WHERE ins_srtkenmerk_key = 221 -- Vervangingswaarde <20> inc. BTW
|
||
AND ins_kenmerk_key = kd3.ins_kenmerk_key)
|
||
WHERE 1 = 1;
|
||
|
||
------ payload end ------
|
||
|
||
SET DEFINE OFF
|
||
BEGIN adm.systrackscriptId ('$Id$', 0); END;
|
||
/
|
||
|
||
COMMIT;
|
||
SET ECHO OFF
|
||
SPOOL OFF
|
||
SET DEFINE ON
|
||
PROMPT Logfile of this upgrade is: &fcltlogfile
|