Files
Customer/AA/SMKA/smka.sql
2024-01-31 10:46:47 +00:00

805 lines
33 KiB
SQL

--
-- $Id$
--
-- Script containing customer specific sql statements for the FACILITOR database
DEFINE thisfile = 'SMKA.SQL'
DEFINE dbuser = '^SMKA'
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 ------
-- script om dagelijks terugkerende scripts aan te roepen.
CREATE OR REPLACE PROCEDURE smka_select_daily_task (p_applname IN VARCHAR2, p_applrun IN VARCHAR2)
AS
BEGIN
aaxx_daily_task (p_applname, p_applrun);
END;
/
-- View tbv notificatiejob - Notities meldingen naar backoffice ipv behandelaar (ipv MLDNOB)
-- Notificatie gaat naar emailadres Servicedesk Heyday (= vakgroep email-adres) (ticket 60002)
CREATE OR REPLACE VIEW SMKA_V_NOTIFY_BACKOFFICE_NOB
(
SENDER,
RECEIVER,
TEXT,
CODE,
FAC_SRTNOTIFICATIE_KEY,
KEY,
XKEY,
XEMAIL,
XMOBILE
)
AS
SELECT (SELECT prs_perslid_key
FROM prs_perslid
WHERE prs_perslid_upper = 'FACILITOR')
sender,
NULL
receiver,
'Er is/zijn door aanvrager '
|| TO_CHAR (v.aantalopmerkingen)
|| ' nieuwe opmerking(en) geplaatst bij melding '
|| v.mld_melding_key
|| ' ('
|| v.mld_stdmelding_omschrijving
|| ' / '
|| v.ins_discipline_omschrijving
|| ')'
text,
'CUST10'
code,
(SELECT fac_srtnotificatie_key
FROM fac_srtnotificatie
WHERE fac_srtnotificatie_code = 'CUST10')
fac_srtnotificatie_key,
v.mld_melding_key
key,
NULL
xkey,
v.vakgroep_email
xemail,
NULL
xmobile
FROM (SELECT m.mld_melding_key,
sm.mld_stdmelding_omschrijving,
d.ins_discipline_omschrijving,
dp.mld_disc_params_emailnw3
AS vakgroep_email,
COALESCE (
( SELECT MAX (fac_tracking_datum)
FROM fac_tracking
WHERE INSTR (fac_tracking_oms, 'CUST10') > 0
AND fac_tracking_datum >= SYSDATE - 30),
SYSDATE - 1)
datum_vanaf,
(SELECT COUNT (*)
FROM mld_melding_note mn2
WHERE mn2.mld_melding_key = m.mld_melding_key
AND mn2.prs_perslid_key = m.prs_perslid_key
AND mn2.mld_melding_note_aanmaak >=
COALESCE (
( SELECT MAX (fac_tracking_datum)
FROM fac_tracking
WHERE INSTR (fac_tracking_oms,
'CUST10') >
0
AND fac_tracking_datum >=
SYSDATE - 30),
SYSDATE - 1))
AS aantalopmerkingen
FROM mld_melding m,
mld_stdmelding sm,
ins_tab_discipline d,
mld_disc_params dp,
mld_melding_note mn
WHERE m.mld_melding_key = mn.mld_melding_key
AND m.mld_stdmelding_key = sm.mld_stdmelding_key
AND sm.mld_ins_discipline_key = d.ins_discipline_key
AND d.ins_discipline_module = 'MLD'
AND d.ins_discipline_key = dp.mld_ins_discipline_key
AND (m.mld_melding_behandelaar_key <> mn.prs_perslid_key or m.mld_melding_behandelaar_key is null)
AND mn.mld_melding_note_aanmaak >=
COALESCE (
( SELECT MAX (fac_tracking_datum)
FROM fac_tracking
WHERE INSTR (fac_tracking_oms, 'CUST10') > 0
AND fac_tracking_datum >= SYSDATE - 30),
SYSDATE - 1)
AND dp.mld_disc_params_emailnw3 IS NOT NULL
AND m.prs_perslid_key = mn.prs_perslid_key -- Alleen notities van de aanvrager meenemen
) v
;
-- exact verkoop
CREATE OR REPLACE VIEW smka_v_export_exact_verkoop (RESULT, result_order) AS SELECT RESULT, result_order FROM aaxx_v_export_exact_verkoop;
CREATE OR REPLACE PROCEDURE smka_select_exact_verkoop (
p_applname IN VARCHAR2,
p_applrun IN VARCHAR2
)
AS
BEGIN
aaxx_select_exact_verkoop(p_applname, p_applrun, to_char(sysdate, 'yyyy'), 'CORE');
END;
/
CREATE OR REPLACE PROCEDURE smka_export_exact_verkoop (
p_applname IN VARCHAR2,
p_applrun IN VARCHAR2,
p_filedir IN VARCHAR2,
p_filename IN VARCHAR2
)
AS
BEGIN
aaxx_export_exact_verkoop(p_applname, p_applrun, p_filedir, p_filename, to_char(sysdate, 'yyyy'), 'CORE');
END;
/
-- exact verkoop over het vorige jaar
CREATE OR REPLACE VIEW smka_v_export_exact_verkoop_vj (RESULT, result_order) AS SELECT RESULT, result_order FROM aaxx_v_export_exact_verkoop;
CREATE OR REPLACE PROCEDURE smka_select_exact_verkoop_vj (
p_applname IN VARCHAR2,
p_applrun IN VARCHAR2
)
AS
BEGIN
aaxx_select_exact_verkoop(p_applname, p_applrun, to_char(to_number(to_char(sysdate, 'yyyy'))-1), 'CORE');
END;
/
CREATE OR REPLACE PROCEDURE smka_export_exact_verkoop_vj (
p_applname IN VARCHAR2,
p_applrun IN VARCHAR2,
p_filedir IN VARCHAR2,
p_filename IN VARCHAR2
)
AS
BEGIN
aaxx_export_exact_verkoop(p_applname, p_applrun, p_filedir, p_filename, to_char(to_number(to_char(sysdate, 'yyyy'))-1), 'CORE');
END;
/
-- exact projecturen (XML)
CREATE OR REPLACE VIEW smka_v_export_exact_uren (result, result_order)
AS SELECT result, result_order FROM aaxx_v_export_exact_uren_xml;
CREATE OR REPLACE PROCEDURE smka_select_exact_uren (
p_applname IN VARCHAR2,
p_applrun IN VARCHAR2
)
AS
BEGIN
aaxx_select_exact_uren_xml(p_applname, p_applrun, '');
END;
/
-- verwerk exact projecturen (XML)
CREATE OR REPLACE PROCEDURE smka_export_verwerk_exact_uren (
p_applname IN VARCHAR2,
p_applrun IN VARCHAR2,
p_filedir IN VARCHAR2,
p_filename IN VARCHAR2
)
AS
BEGIN
aaxx_export_verwerk_exact_uren(p_applname, p_applrun, p_filedir, p_filename, '');
END;
/
-- Rapportviews
-- Rapporten voor EXPORT van bijlagen naar zip-file (zie ticket 76013)
--- In rapport opgenomen fac_bijlagen_key en fac_bijlagen_zippath voor download-optie vanuit rapport-wizard
--- Exportdefinities voor: 1. MELDINGEN/OPDRACHTEN
CREATE OR REPLACE VIEW smka_v_export_meldingen_udr
(
ins_discpline_omschrijving,
alg_regio_omschrijving,
alg_district_omschrijving,
alg_locatie_omschrijving,
alg_gebouw_naam,
fac_bijlagen_aanmaak,
fac_bijlagen_key,
fac_bijlagen_zippath,
check_lengte
)
AS
SELECT sd.ins_srtdiscipline_omschrijving,
r.alg_regio_omschrijving,
di.alg_district_omschrijving,
l.alg_locatie_omschrijving || ' (' || l.alg_locatie_code || ')',
g.alg_gebouw_code,
b.fac_bijlagen_aanmaak,
b.fac_bijlagen_key,
r.alg_regio_omschrijving
|| CHR(92)
|| di.alg_district_omschrijving
|| CHR(92)
|| REPLACE(REGEXP_REPLACE(l.alg_locatie_code , '[^[a-z,A-Z,0-9,[:space:]]]*', ''), CHR(44),'')
|| CHR(92)
|| REPLACE(REGEXP_REPLACE(g.alg_gebouw_code , '[^[a-z,A-Z,0-9,[:space:]]]*', ''), CHR(44), '')
|| CHR(92)
|| sd.ins_srtdiscipline_omschrijving
|| CHR(92)
|| TO_CHAR (b.fac_bijlagen_aanmaak, 'YYYY-MM')
|| CHR(92)
|| m.mld_melding_key
|| CHR(92)
|| b.fac_bijlagen_filename
fac_bijlagen_zippath, -- Let op, padnaam kan/mag MAX 258 posities hebben (i.v.m. insuffficient memory)
LENGTH(
r.alg_regio_omschrijving
|| CHR(92)
|| di.alg_district_omschrijving
|| CHR(92)
|| REPLACE(REGEXP_REPLACE(l.alg_locatie_code , '[^[a-z,A-Z,0-9,[:space:]]]*', ''), CHR(44),'')
|| CHR(92)
|| REPLACE(REGEXP_REPLACE(g.alg_gebouw_code , '[^[a-z,A-Z,0-9,[:space:]]]*', ''), CHR(44), '')
|| CHR(92)
|| sd.ins_srtdiscipline_omschrijving
|| CHR(92)
|| TO_CHAR (b.fac_bijlagen_aanmaak, 'YYYY-MM')
|| CHR(92)
|| m.mld_melding_key
|| CHR(92)
|| b.fac_bijlagen_filename
) check_lengte
FROM fac_v_bijlagen b,
mld_melding m,
mld_stdmelding sm,
mld_discipline d,
ins_srtdiscipline sd,
(SELECT m.mld_melding_key,
COALESCE (og.alg_gebouw_code, 'Geen gebouw') alg_gebouw_code
FROM mld_melding m,
alg_v_onroerendgoed_gegevens og
WHERE m.mld_alg_onroerendgoed_keys = og.alg_onroerendgoed_keys(+) ) g,
alg_locatie l,
alg_district di,
alg_regio r
WHERE b.fac_bijlagen_refkey = m.mld_melding_key
AND b.fac_bijlagen_module = 'MLD'
AND m.mld_stdmelding_key = sm.mld_stdmelding_key
AND sm.mld_ins_discipline_key = d.ins_discipline_key
AND d.ins_discipline_module = 'MLD'
AND d.ins_srtdiscipline_key = sd.ins_srtdiscipline_key
AND m.mld_melding_key = g.mld_melding_key
AND m.mld_alg_locatie_key = l.alg_locatie_key
AND l.alg_district_key = di.alg_district_key
AND di.alg_regio_key = r.alg_regio_key
AND b.fac_bijlagen_verwijder IS NULL
UNION
SELECT sd.ins_srtdiscipline_omschrijving,
r.alg_regio_omschrijving,
di.alg_district_omschrijving,
l.alg_locatie_omschrijving || ' (' || l.alg_locatie_code || ')',
g.alg_gebouw_code,
b.fac_bijlagen_aanmaak,
b.fac_bijlagen_key,
r.alg_regio_omschrijving
|| CHR(92)
|| di.alg_district_omschrijving
|| CHR(92)
|| REPLACE(REGEXP_REPLACE(l.alg_locatie_code , '[^[a-z,A-Z,0-9,[:space:]]]*', ''), CHR(44),'')
|| CHR(92)
|| REPLACE(REGEXP_REPLACE(g.alg_gebouw_code , '[^[a-z,A-Z,0-9,[:space:]]]*', ''), CHR(44), '')
|| CHR(92)
|| sd.ins_srtdiscipline_omschrijving
|| CHR(92)
|| TO_CHAR (b.fac_bijlagen_aanmaak, 'YYYY-MM')
|| CHR(92)
|| m.mld_melding_key
|| CHR(92)
|| o.mld_opdr_bedrijfopdr_volgnr
|| CHR(92)
|| b.fac_bijlagen_filename
fac_bijlagen_zippath, -- Let op, padnaam kan/mag MAX 258 posities hebben (i.v.m. insuffficient memory)
LENGTH(
r.alg_regio_omschrijving
|| CHR(92)
|| di.alg_district_omschrijving
|| CHR(92)
|| REPLACE(REGEXP_REPLACE(l.alg_locatie_code , '[^[a-z,A-Z,0-9,[:space:]]]*', ''), CHR(44),'')
|| CHR(92)
|| REPLACE(REGEXP_REPLACE(g.alg_gebouw_code , '[^[a-z,A-Z,0-9,[:space:]]]*', ''), CHR(44), '')
|| CHR(92)
|| sd.ins_srtdiscipline_omschrijving
|| CHR(92)
|| TO_CHAR (b.fac_bijlagen_aanmaak, 'YYYY-MM')
|| CHR(92)
|| m.mld_melding_key
|| CHR(92)
|| o.mld_opdr_bedrijfopdr_volgnr
|| CHR(92)
|| b.fac_bijlagen_filename
) check_lengte
FROM fac_v_bijlagen b,
mld_melding m,
mld_opdr o,
mld_stdmelding sm,
mld_discipline d,
ins_srtdiscipline sd,
(SELECT m.mld_melding_key,
COALESCE (og.alg_gebouw_code, 'Geen gebouw') alg_gebouw_code
FROM mld_melding m,
alg_v_onroerendgoed_gegevens og
WHERE m.mld_alg_onroerendgoed_keys = og.alg_onroerendgoed_keys(+) ) g,
alg_locatie l,
alg_district di,
alg_regio r,
mld_kenmerk km
WHERE b.fac_bijlagen_refkey = o.mld_opdr_key
AND b.fac_bijlagen_module = 'MLD'
AND o.mld_melding_key = m.mld_melding_key
AND m.mld_stdmelding_key = sm.mld_stdmelding_key
AND sm.mld_ins_discipline_key = d.ins_discipline_key
AND d.ins_discipline_module = 'MLD'
AND d.ins_srtdiscipline_key = sd.ins_srtdiscipline_key
AND m.mld_melding_key = g.mld_melding_key
AND m.mld_alg_locatie_key = l.alg_locatie_key
AND l.alg_district_key = di.alg_district_key
AND di.alg_regio_key = r.alg_regio_key
AND b.fac_bijlagen_verwijder IS NULL
AND b.fac_bijlagen_kenmerk_key = km.mld_kenmerk_key AND km.mld_kenmerk_niveau = 'O'
;
--- Exportdefinities voor: 1. OPDRACHTEN - PER LEVERANCIER
CREATE OR REPLACE VIEW smka_v_export_opdrachten_udr
(
ins_discpline_omschrijving,
alg_regio_omschrijving,
alg_district_omschrijving,
alg_locatie_omschrijving,
alg_gebouw_naam,
prs_bedrijf_naam,
mld_typeopdr_omschrijving,
opdracht_extern,
fac_bijlagen_aanmaak,
fac_bijlagen_key,
fac_bijlagen_zippath,
check_lengte
)
AS
SELECT sd.ins_srtdiscipline_omschrijving,
r.alg_regio_omschrijving,
di.alg_district_omschrijving,
l.alg_locatie_omschrijving || ' (' || l.alg_locatie_code || ')',
g.alg_gebouw_code,
v.naam,
ot.mld_typeopdr_omschrijving,
DECODE(v.intern, 1, 'nee', 'ja'),
b.fac_bijlagen_aanmaak,
b.fac_bijlagen_key,
v.naam
|| CHR(92)
|| TO_CHAR (b.fac_bijlagen_aanmaak, 'YYYY-MM')
|| CHR(92)
|| di.alg_district_omschrijving
|| CHR(92)
|| m.mld_melding_key || '-' || o.mld_opdr_bedrijfopdr_volgnr
|| CHR(92)
|| b.fac_bijlagen_filename
fac_bijlagen_zippath, -- Let op, padnaam kan/mag MAX 258 posities hebben (i.v.m. insuffficient memory)
LENGTH(
v.naam
|| CHR(92)
|| TO_CHAR (b.fac_bijlagen_aanmaak, 'YYYY-MM')
|| CHR(92)
|| di.alg_district_omschrijving
|| CHR(92)
|| m.mld_melding_key || '-' || o.mld_opdr_bedrijfopdr_volgnr
|| CHR(92)
|| b.fac_bijlagen_filename
) check_lengte
FROM fac_v_bijlagen b,
mld_melding m,
mld_opdr o,
mld_typeopdr ot,
mld_v_uitvoerende v,
mld_stdmelding sm,
mld_discipline d,
ins_srtdiscipline sd,
(SELECT m.mld_melding_key,
COALESCE (og.alg_gebouw_code, 'Geen gebouw') alg_gebouw_code
FROM mld_melding m,
alg_v_onroerendgoed_gegevens og
WHERE m.mld_alg_onroerendgoed_keys = og.alg_onroerendgoed_keys(+) ) g,
alg_locatie l,
alg_district di,
alg_regio r,
mld_kenmerk km
WHERE b.fac_bijlagen_refkey = o.mld_opdr_key
AND b.fac_bijlagen_module = 'MLD'
AND o.mld_melding_key = m.mld_melding_key
AND m.mld_stdmelding_key = sm.mld_stdmelding_key
AND sm.mld_ins_discipline_key = d.ins_discipline_key
AND d.ins_discipline_module = 'MLD'
AND d.ins_srtdiscipline_key = sd.ins_srtdiscipline_key
AND m.mld_melding_key = g.mld_melding_key
AND m.mld_alg_locatie_key = l.alg_locatie_key
AND l.alg_district_key = di.alg_district_key
AND di.alg_regio_key = r.alg_regio_key
AND o.mld_typeopdr_key = ot.mld_typeopdr_key
AND o.mld_uitvoerende_keys = v.mld_uitvoerende_key
AND b.fac_bijlagen_verwijder IS NULL
AND b.fac_bijlagen_kenmerk_key = km.mld_kenmerk_key AND km.mld_kenmerk_niveau = 'O'
;
-- NEN2767 - Rapportage om foto's toe te voegen aan de gebreksmeldingen
---- levert commandlines voor batfile op die geplaatst/uitgevoerd kan worden in lokale map met de foto's en UploadFotoBijGebrek.js
---- in url de kenmerk_key van de foldermap meenemen (voor SMKA is dit 5016)
CREATE OR REPLACE VIEW smka_v_upload_foto_script
AS
SELECT v.mld_melding_key,
v.alg_gebouw_code,
v.alg_gebouw_naam,
v.mld_melding_datum,
v.mld_statuses_omschrijving,
'cscript //E:jscript "UploadFotoBijGebrek_SMKA.js" "https://smka.facilitor.nl/api2" 5016 '
|| v.mld_melding_key
|| ' "fotos/'
|| v.foto
|| '"' url
FROM (SELECT aogg.alg_gebouw_code,
aogg.alg_gebouw_naam,
m.mld_melding_key,
m.mld_melding_datum,
s.mld_statuses_omschrijving,
1 volgorde,
aaxx.imp_getfield_nr (mld_kenmerkmelding_waarde, ';', 1) foto
FROM mld_kenmerkmelding km, mld_melding m, alg_v_onroerendgoed_gegevens aogg, mld_kenmerk k, mld_srtkenmerk sk, mld_statuses s
WHERE aogg.alg_onroerendgoed_keys = m.mld_alg_onroerendgoed_keys
AND m.mld_melding_status = s.mld_statuses_key
AND m.mld_melding_key = km.mld_melding_key
AND km.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'FOTONAAM'
UNION ALL
SELECT aogg.alg_gebouw_code,
aogg.alg_gebouw_naam,
m.mld_melding_key,
m.mld_melding_datum,
s.mld_statuses_omschrijving,
2,
aaxx.imp_getfield_nr (mld_kenmerkmelding_waarde, ';', 2)
FROM mld_kenmerkmelding km, mld_melding m, alg_v_onroerendgoed_gegevens aogg, mld_kenmerk k, mld_srtkenmerk sk, mld_statuses s
WHERE aogg.alg_onroerendgoed_keys = m.mld_alg_onroerendgoed_keys
AND m.mld_melding_status = s.mld_statuses_key
AND m.mld_melding_key = km.mld_melding_key
AND km.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'FOTONAAM'
UNION ALL
SELECT aogg.alg_gebouw_code,
aogg.alg_gebouw_naam,
m.mld_melding_key,
m.mld_melding_datum,
s.mld_statuses_omschrijving,
3,
aaxx.imp_getfield_nr (mld_kenmerkmelding_waarde, ';', 3)
FROM mld_kenmerkmelding km, mld_melding m, alg_v_onroerendgoed_gegevens aogg, mld_kenmerk k, mld_srtkenmerk sk, mld_statuses s
WHERE aogg.alg_onroerendgoed_keys = m.mld_alg_onroerendgoed_keys
AND m.mld_melding_status = s.mld_statuses_key
AND m.mld_melding_key = km.mld_melding_key
AND km.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'FOTONAAM'
UNION ALL
SELECT aogg.alg_gebouw_code,
aogg.alg_gebouw_naam,
m.mld_melding_key,
m.mld_melding_datum,
s.mld_statuses_omschrijving,
4,
aaxx.imp_getfield_nr (mld_kenmerkmelding_waarde, ';', 4)
FROM mld_kenmerkmelding km, mld_melding m, alg_v_onroerendgoed_gegevens aogg, mld_kenmerk k, mld_srtkenmerk sk, mld_statuses s
WHERE aogg.alg_onroerendgoed_keys = m.mld_alg_onroerendgoed_keys
AND m.mld_melding_status = s.mld_statuses_key
AND m.mld_melding_key = km.mld_melding_key
AND km.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'FOTONAAM') v
WHERE v.foto IS NOT NULL
-- moet fotobestand zijn:
AND REGEXP_INSTR(UPPER(v.foto),'.JPEG|.JPG|.PNG|.GIF|.BMP',1,1)>0 ;
-- NEN2767 - Gestylde rapportage van de gebreken inclusief gebreksfoto
CREATE OR REPLACE VIEW smka_v_rap_conditiemetingen
(
MLD_MELDING_KEY,
LOCATIE_CODE,
LOCATIE_NAAM,
GEBOUW_CODE,
GEBOUW_NAAM,
GEBOUW_GROEP,
HOOFDGROEP,
GROEP,
OBJECTSOORT,
IDENTIFICATIE,
GEBREKNR,
DATUM_TIJD,
DATUM,
INSPECTEUR,
STATUS,
GEBREK,
OMSCHRIJVING,
ERNST,
OMVANG,
INTENSITEIT,
VEILIGHEID_GEZONDHEID,
CULTUURHISTORISCHE_WAARDE,
GEBRUIK_EN_BEDRIJFSPROCES,
TECHNISCHE_VERVOLGSCHADE,
TOENAME_KLACHTENONDERHOUD,
BELEVING_ESTHETICA,
FOTO,
GEADVISEERD_STARTJAAR,
DATUM_GEREED_INSPECTEUR,
KOSTEN,
WERKZAAMHEDEN, -- omschrijving
CONDITIE,
PRIORITEIT
)
AS
SELECT m.mld_melding_key,
l.alg_locatie_code
locatie_code,
l.alg_locatie_omschrijving
locatie_naam,
aog.alg_gebouw_code
gebouw_code,
aog.alg_gebouw_naam
gebouw_naam,
aog.alg_gebouw_groep
gebouw_groep,
id.ins_discipline_omschrijving
hoofdgroep,
isg.ins_srtgroep_omschrijving
groep,
isd.ins_srtdeel_omschrijving
|| ' ('
|| isd.ins_srtdeel_code
|| ')'
objectsoort,
d.ins_deel_omschrijving
identificatie,
m.mld_melding_key
gebreknummer,
m.mld_melding_datum
datum_tijd,
TO_CHAR (mld_melding_datum, 'DD-MM-YYYY')
datum,
pf.prs_perslid_naam_full
inspecteur,
s.mld_statuses_omschrijving
status,
std.mld_stdmelding_omschrijving
gebrek,
m.mld_melding_omschrijving
omschrijving,
(SELECT fac_usrdata_omschr
FROM mld_kenmerkmelding mk,
mld_kenmerk k,
mld_srtkenmerk sk,
fac_kenmerkdomein kd,
fac_usrtab ut,
fac_usrdata ud
WHERE sk.mld_srtkenmerk_code = 'ERNST'
AND sk.mld_srtkenmerk_key = k.mld_srtkenmerk_key
AND k.mld_kenmerk_key = mk.mld_kenmerk_key
AND sk.fac_kenmerkdomein_key = kd.fac_kenmerkdomein_key
AND ut.fac_usrtab_key = kd.fac_usrtab_key
AND ud.fac_usrtab_key = ut.fac_usrtab_key
AND TO_CHAR (fac_usrdata_key) = mld_kenmerkmelding_waarde
AND mk.mld_melding_key = m.mld_melding_key)
ernst,
(SELECT fac_usrdata_omschr
FROM mld_kenmerkmelding mk,
mld_kenmerk k,
mld_srtkenmerk sk,
fac_kenmerkdomein kd,
fac_usrtab ut,
fac_usrdata ud
WHERE sk.mld_srtkenmerk_code = 'OMVANG'
AND sk.mld_srtkenmerk_key = k.mld_srtkenmerk_key
AND k.mld_kenmerk_key = mk.mld_kenmerk_key
AND sk.fac_kenmerkdomein_key = kd.fac_kenmerkdomein_key
AND ut.fac_usrtab_key = kd.fac_usrtab_key
AND ud.fac_usrtab_key = ut.fac_usrtab_key
AND TO_CHAR (fac_usrdata_key) = mld_kenmerkmelding_waarde
AND mk.mld_melding_key = m.mld_melding_key)
omvang,
(SELECT fac_usrdata_omschr
FROM mld_kenmerkmelding mk,
mld_kenmerk k,
mld_srtkenmerk sk,
fac_kenmerkdomein kd,
fac_usrtab ut,
fac_usrdata ud
WHERE sk.mld_srtkenmerk_code = 'INTENSITEIT'
AND sk.mld_srtkenmerk_key = k.mld_srtkenmerk_key
AND k.mld_kenmerk_key = mk.mld_kenmerk_key
AND sk.fac_kenmerkdomein_key = kd.fac_kenmerkdomein_key
AND ut.fac_usrtab_key = kd.fac_usrtab_key
AND ud.fac_usrtab_key = ut.fac_usrtab_key
AND TO_CHAR (fac_usrdata_key) = mld_kenmerkmelding_waarde
AND mk.mld_melding_key = m.mld_melding_key)
intensiteit,
(SELECT fac_usrdata_omschr
FROM mld_kenmerkmelding mk,
mld_kenmerk k,
mld_srtkenmerk sk,
fac_kenmerkdomein kd,
fac_usrtab ut,
fac_usrdata ud
WHERE sk.mld_srtkenmerk_code = 'ASPECT1'
AND sk.mld_srtkenmerk_key = k.mld_srtkenmerk_key
AND k.mld_kenmerk_key = mk.mld_kenmerk_key
AND sk.fac_kenmerkdomein_key = kd.fac_kenmerkdomein_key
AND ut.fac_usrtab_key = kd.fac_usrtab_key
AND ud.fac_usrtab_key = ut.fac_usrtab_key
AND TO_CHAR (fac_usrdata_key) = mld_kenmerkmelding_waarde
AND mk.mld_melding_key = m.mld_melding_key)
veiligheid_gezondheid,
(SELECT fac_usrdata_omschr
FROM mld_kenmerkmelding mk,
mld_kenmerk k,
mld_srtkenmerk sk,
fac_kenmerkdomein kd,
fac_usrtab ut,
fac_usrdata ud
WHERE sk.mld_srtkenmerk_code = 'ASPECT2'
AND sk.mld_srtkenmerk_key = k.mld_srtkenmerk_key
AND k.mld_kenmerk_key = mk.mld_kenmerk_key
AND sk.fac_kenmerkdomein_key = kd.fac_kenmerkdomein_key
AND ut.fac_usrtab_key = kd.fac_usrtab_key
AND ud.fac_usrtab_key = ut.fac_usrtab_key
AND TO_CHAR (fac_usrdata_key) = mld_kenmerkmelding_waarde
AND mk.mld_melding_key = m.mld_melding_key)
cultuurhistorische_waarde,
(SELECT fac_usrdata_omschr
FROM mld_kenmerkmelding mk,
mld_kenmerk k,
mld_srtkenmerk sk,
fac_kenmerkdomein kd,
fac_usrtab ut,
fac_usrdata ud
WHERE sk.mld_srtkenmerk_code = 'ASPECT3'
AND sk.mld_srtkenmerk_key = k.mld_srtkenmerk_key
AND k.mld_kenmerk_key = mk.mld_kenmerk_key
AND sk.fac_kenmerkdomein_key = kd.fac_kenmerkdomein_key
AND ut.fac_usrtab_key = kd.fac_usrtab_key
AND ud.fac_usrtab_key = ut.fac_usrtab_key
AND TO_CHAR (fac_usrdata_key) = mld_kenmerkmelding_waarde
AND mk.mld_melding_key = m.mld_melding_key)
gebruik_en_bedrijfsproces,
(SELECT fac_usrdata_omschr
FROM mld_kenmerkmelding mk,
mld_kenmerk k,
mld_srtkenmerk sk,
fac_kenmerkdomein kd,
fac_usrtab ut,
fac_usrdata ud
WHERE sk.mld_srtkenmerk_code = 'ASPECT4'
AND sk.mld_srtkenmerk_key = k.mld_srtkenmerk_key
AND k.mld_kenmerk_key = mk.mld_kenmerk_key
AND sk.fac_kenmerkdomein_key = kd.fac_kenmerkdomein_key
AND ut.fac_usrtab_key = kd.fac_usrtab_key
AND ud.fac_usrtab_key = ut.fac_usrtab_key
AND TO_CHAR (fac_usrdata_key) = mld_kenmerkmelding_waarde
AND mk.mld_melding_key = m.mld_melding_key)
technische_vervolgschade,
(SELECT fac_usrdata_omschr
FROM mld_kenmerkmelding mk,
mld_kenmerk k,
mld_srtkenmerk sk,
fac_kenmerkdomein kd,
fac_usrtab ut,
fac_usrdata ud
WHERE sk.mld_srtkenmerk_code = 'ASPECT5'
AND sk.mld_srtkenmerk_key = k.mld_srtkenmerk_key
AND k.mld_kenmerk_key = mk.mld_kenmerk_key
AND sk.fac_kenmerkdomein_key = kd.fac_kenmerkdomein_key
AND ut.fac_usrtab_key = kd.fac_usrtab_key
AND ud.fac_usrtab_key = ut.fac_usrtab_key
AND TO_CHAR (fac_usrdata_key) = mld_kenmerkmelding_waarde
AND mk.mld_melding_key = m.mld_melding_key)
toename_klachtenonderhoud,
(SELECT fac_usrdata_omschr
FROM mld_kenmerkmelding mk,
mld_kenmerk k,
mld_srtkenmerk sk,
fac_kenmerkdomein kd,
fac_usrtab ut,
fac_usrdata ud
WHERE sk.mld_srtkenmerk_code = 'ASPECT6'
AND sk.mld_srtkenmerk_key = k.mld_srtkenmerk_key
AND k.mld_kenmerk_key = mk.mld_kenmerk_key
AND sk.fac_kenmerkdomein_key = kd.fac_kenmerkdomein_key
AND ut.fac_usrtab_key = kd.fac_usrtab_key
AND ud.fac_usrtab_key = ut.fac_usrtab_key
AND TO_CHAR (fac_usrdata_key) = mld_kenmerkmelding_waarde
AND mk.mld_melding_key = m.mld_melding_key)
beleving_esthetica,
(SELECT k.mld_kenmerk_key
FROM mld_kenmerk k, mld_srtkenmerk sk
WHERE sk.mld_srtkenmerk_code = 'FOTO'
AND sk.mld_srtkenmerk_key = k.mld_srtkenmerk_key)
foto,
(SELECT mkm.mld_kenmerkmelding_waarde
FROM mld_kenmerkmelding mkm, mld_kenmerk k, mld_srtkenmerk sk
WHERE mkm.mld_melding_key = m.mld_melding_key
AND mkm.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'GEADVISEERDSTARTJAAR')
geadviseerd_startjaar,
(SELECT mkm.mld_kenmerkmelding_waarde
FROM mld_kenmerkmelding mkm, mld_kenmerk k, mld_srtkenmerk sk
WHERE mkm.mld_melding_key = m.mld_melding_key
AND mkm.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'DATUMGEREEDINSPECTEUR')
datum_gereed_inspecteur,
(SELECT mkm.mld_kenmerkmelding_waarde
FROM mld_kenmerkmelding mkm, mld_kenmerk k, mld_srtkenmerk sk
WHERE mkm.mld_melding_key = m.mld_melding_key
AND mkm.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'KOSTEN')
kosten,
mld_melding_omschrijving,
d.ins_deel_mjb_score1,
d.ins_deel_mjb_score2
FROM mld_melding m,
mld_melding_object mo,
ins_deel d,
ins_srtdeel isd,
ins_srtgroep isg,
ins_discipline id,
alg_v_allonrgoed_gegevens aog,
alg_locatie l,
mld_statuses s,
prs_v_perslid_fullnames_all pf,
mld_stdmelding std
WHERE m.mld_melding_key = mo.mld_melding_key
AND d.ins_deel_key = mo.ins_deel_key
AND d.ins_srtdeel_key = isd.ins_srtdeel_key
AND isd.ins_srtgroep_key = isg.ins_srtgroep_key
AND isg.ins_discipline_key = id.ins_discipline_key
AND m.mld_alg_onroerendgoed_keys = aog.alg_onroerendgoed_keys
AND l.alg_locatie_key = aog.alg_locatie_key
AND s.mld_statuses_key = m.mld_melding_status
AND m.prs_perslid_key = pf.prs_perslid_key
AND m.mld_stdmelding_key = std.mld_stdmelding_key;
------ 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