diff --git a/SKOA/skoa.sql b/SKOA/skoa.sql new file mode 100644 index 000000000..640e7478e --- /dev/null +++ b/SKOA/skoa.sql @@ -0,0 +1,578 @@ +-- +-- $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, ''), + 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 € 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