admin/Customer
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

WTCA#22502+WTCA#22589-+FSN#22517

Browse Source 
svn path=/Customer/trunk/; revision=15186
This commit is contained in:
Maarten van der Heide
2012-03-20 11:42:24 +00:00
parent 65b8fa4415
commit a1a15f48d9
1 changed files with 157 additions and 80 deletions
Download Patch File Download Diff File Expand all files Collapse all files

237
WTCA/wtca.sql
View File

@@ -1,7 +1,7 @@
-- Script containing customer specific db-configuration for WTCA.
-- (c) 2010 SG|facilitor bv
-- $Revision: 27 $
-- $Modtime: 13-02-12 10:32 $
-- $Revision: 28 $
-- $Modtime: 24-02-12 12:56 $
--
-- Support: +31 53 4800700
@@ -40,8 +40,6 @@ AS
'yyyymmdd');
c_applname VARCHAR2 (50) := 'FREEZE_OPDR';
c_applrun VARCHAR2 (30)
:= TO_CHAR (SYSDATE, 'dd-mm-yyyy hh24:mi:ss') ;
v_errormsg VARCHAR2 (1000);
oracle_err_num NUMBER;
oracle_err_mes VARCHAR2 (200);
@@ -51,13 +49,6 @@ AS
BEGIN
v_count_upd := 0;
-- Verwijder log-regels van voor deze maand.
DELETE FROM imp_log
WHERE imp_log_applicatie = c_applname
AND imp_log_datum <
TO_DATE (TO_CHAR (SYSDATE, 'yyyymm') || '01',
'yyyymmdd');
-- Controleer bestaan uitvoerende.
v_errormsg := 'Fout bij bepalen uitvoerende.';
@@ -77,9 +68,8 @@ AS
COMMIT;
END LOOP;
fac.imp_writelog (
fac.writelog (
c_applname,
c_applrun,
'S',
'Proces: ' || TO_CHAR (v_count_upd) || ' opdrachten bevroren',
''
@@ -97,11 +87,10 @@ AS
|| '/'
|| oracle_err_mes
|| ')';
fac.imp_writelog (c_applname,
c_applrun,
'E',
v_errormsg,
'');
fac.writelog (c_applname,
'E',
v_errormsg,
'');
COMMIT;
END freezeopdrachten;
@@ -123,12 +112,16 @@ AS
IF (van_date > tot_date)
THEN
v_van_date := TO_DATE (TO_CHAR (tot_date, 'yyyymmddhh24mi'), 'yyyymmddhh24mi');
v_tot_date := TO_DATE (TO_CHAR (van_date, 'yyyymmddhh24mi'), 'yyyymmddhh24mi');
v_van_date :=
TO_DATE (TO_CHAR (tot_date, 'yyyymmddhh24mi'), 'yyyymmddhh24mi');
v_tot_date :=
TO_DATE (TO_CHAR (van_date, 'yyyymmddhh24mi'), 'yyyymmddhh24mi');
lbackwards := TRUE;
ELSE
v_van_date := TO_DATE (TO_CHAR (van_date, 'yyyymmddhh24mi'), 'yyyymmddhh24mi');
v_tot_date := TO_DATE (TO_CHAR (tot_date, 'yyyymmddhh24mi'), 'yyyymmddhh24mi');
v_van_date :=
TO_DATE (TO_CHAR (van_date, 'yyyymmddhh24mi'), 'yyyymmddhh24mi');
v_tot_date :=
TO_DATE (TO_CHAR (tot_date, 'yyyymmddhh24mi'), 'yyyymmddhh24mi');
lbackwards := FALSE;
END IF;
@@ -1987,7 +1980,7 @@ AS
kostenplaats,
kostenplaats_oms) x;
/* Formatted on 24-1-2011 12:18:36 (QP5 v5.115.810.9015) */
/* Formatted on 24-2-2012 10:28:42 (QP5 v5.115.810.9015) */
CREATE OR REPLACE VIEW wtca_v_rap_mld_structuur
(
fclt_f_vakgroeptype,
@@ -2003,7 +1996,9 @@ CREATE OR REPLACE VIEW wtca_v_rap_mld_structuur
sla_norm,
sla_laag,
m_totaal,
m_lopend
m_lopend,
fclt_f_dienst,
aanwijzing
)
AS
SELECT x.vakgroeptype,
@@ -2019,63 +2014,68 @@ AS
x.sla_norm,
x.sla_laag,
y.m_totaal,
z.m_lopend
FROM (SELECT sm.mld_stdmelding_key,
DECODE (sd.ins_srtdiscipline_verwijder,
NULL, '',
'XXX-')
|| sd.ins_srtdiscipline_omschrijving
vakgroeptype,
sd.ins_srtdiscipline_prefix prefix,
-- DECODE (sd.ins_srtdiscipline_alg, 0, 'N', 'J') plaatsgegevens,
-- DECODE (sd.ins_srtdiscipline_bes, 0, 'N', 'J') objectgegevens,
-- DECODE (sd.ins_srtdiscipline_ins, 0, 'N', 'J') bestelgegevens,
DECODE (td.ins_discipline_verwijder,
NULL, '',
'XXX-')
|| td.ins_discipline_omschrijving
vakgroep,
DECODE (sm.mld_stdmelding_verwijder,
NULL, '',
'XXX-')
|| sm.mld_stdmelding_omschrijving
melding,
sm.mld_stdmelding_groep groep,
k.prs_kostensoort_oms ksoort,
k.prs_kostensoort_opmerking ksoort_oms,
TO_CHAR (sm.mld_stdmelding_urgentie) acc_tijd,
TO_CHAR (sm.mld_stdmelding_uitvoertijd_pr1)
sla_krit,
TO_CHAR (sm.mld_stdmelding_uitvoertijd_pr2)
sla_hoog,
TO_CHAR (sm.mld_stdmelding_uitvoertijd) sla_norm,
TO_CHAR (sm.mld_stdmelding_uitvoertijd_pr4)
sla_laag
FROM ins_srtdiscipline sd,
ins_tab_discipline td,
mld_stdmelding sm,
prs_kostensoort k
WHERE sd.ins_srtdiscipline_module = 'MLD'
-- AND sd.ins_srtdiscipline_verwijder IS NULL
AND sd.ins_srtdiscipline_key =
td.ins_srtdiscipline_key
-- AND td.ins_discipline_verwijder IS NULL
AND td.ins_discipline_key =
sm.mld_ins_discipline_key
-- AND sm.mld_stdmelding_verwijder IS NULL
AND sm.prs_kostensoort_key =
k.prs_kostensoort_key(+)) x
z.m_lopend,
d.prs_dienst_omschrijving,
x.aanwijzing
FROM (SELECT sm.mld_stdmelding_key,
DECODE (sd.ins_srtdiscipline_verwijder,
NULL, '',
'XXX-')
|| sd.ins_srtdiscipline_omschrijving
vakgroeptype,
sd.ins_srtdiscipline_prefix prefix,
DECODE (td.ins_discipline_verwijder,
NULL, '',
'XXX-')
|| td.ins_discipline_omschrijving
vakgroep,
DECODE (sm.mld_stdmelding_verwijder,
NULL, '',
'XXX-')
|| sm.mld_stdmelding_omschrijving
melding,
sm.mld_stdmelding_groep groep,
k.prs_kostensoort_oms ksoort,
k.prs_kostensoort_opmerking ksoort_oms,
TO_CHAR (sm.mld_stdmelding_urgentie) acc_tijd,
TO_CHAR (sm.mld_stdmelding_uitvoertijd_pr1)
sla_krit,
TO_CHAR (sm.mld_stdmelding_uitvoertijd_pr2)
sla_hoog,
TO_CHAR (sm.mld_stdmelding_uitvoertijd)
sla_norm,
TO_CHAR (sm.mld_stdmelding_uitvoertijd_pr4)
sla_laag,
sm.prs_dienst_key,
sm.mld_stdmelding_hint aanwijzing
FROM ins_srtdiscipline sd,
ins_tab_discipline td,
mld_stdmelding sm,
prs_kostensoort k
WHERE sd.ins_srtdiscipline_module = 'MLD'
--AND sd.ins_srtdiscipline_verwijder IS NULL
AND sd.ins_srtdiscipline_key =
td.ins_srtdiscipline_key
--AND td.ins_discipline_verwijder IS NULL
AND td.ins_discipline_key =
sm.mld_ins_discipline_key
--AND sm.mld_stdmelding_verwijder IS NULL
AND sm.prs_kostensoort_key =
k.prs_kostensoort_key(+)) x
LEFT JOIN
( SELECT mld_stdmelding_key, COUNT ( * ) m_totaal
FROM mld_melding
GROUP BY mld_stdmelding_key) y
ON x.mld_stdmelding_key = y.mld_stdmelding_key
LEFT JOIN
( SELECT mld_stdmelding_key, COUNT ( * ) m_totaal
( SELECT mld_stdmelding_key, COUNT ( * ) m_lopend
FROM mld_melding
GROUP BY mld_stdmelding_key) y
ON x.mld_stdmelding_key = y.mld_stdmelding_key
WHERE mld_melding_status NOT IN (1, 5, 6)
GROUP BY mld_stdmelding_key) z
ON x.mld_stdmelding_key = z.mld_stdmelding_key
LEFT JOIN
( SELECT mld_stdmelding_key, COUNT ( * ) m_lopend
FROM mld_melding
WHERE mld_melding_status NOT IN (1, 5, 6)
GROUP BY mld_stdmelding_key) z
ON x.mld_stdmelding_key = z.mld_stdmelding_key;
prs_dienst d
ON x.prs_dienst_key = d.prs_dienst_key;
/* Formatted on 5-5-2011 14:02:24 (QP5 v5.115.810.9015) */
CREATE OR REPLACE VIEW wtca_v_rap_maand_actual
@@ -3585,9 +3585,86 @@ AS
WHERE mc.prs_kenmerklink_waarde = '81') -- Ja
x;
BEGIN adm.systrackscript('$Workfile: wtca.sql $', '$Revision: 27 $', 0); END;
/* Formatted on 21-2-2012 12:42:24 (QP5 v5.115.810.9015) */
CREATE OR REPLACE VIEW WTCA_V_GRAPH_PPI_MY_OPDR
(
FCLT_3D_AFDELING_KEY,
FCLT_XAS_,
FCLT_YAS_
)
AS
SELECT prs_afdeling_key,
SUM (uitvoering_op_tijd) aantal,
COUNT (mld_opdr_key) totaal
FROM (SELECT opdr.mld_opdr_key,
DECODE (
SIGN (
opdr.afmelddagen - COALESCE (CORR.sla, opdr.sla)
),
1,
0,
1
)
uitvoering_op_tijd,
uitv.prs_afdeling_key
FROM (SELECT o.mld_opdr_key,
m.mld_melding_uitvoertijd sla,
FAC.count_work_days_incltime (
fac.gettrackingdate ('ORDNEW',
o.mld_opdr_key),
COALESCE (
fac.gettrackingdate (
'ORDCAN',
o.mld_opdr_key
),
COALESCE (
fac.gettrackingdate (
'ORDAFM',
o.mld_opdr_key
),
SYSDATE
)
)
)
afmelddagen
FROM mld_opdr o, mld_melding m
WHERE o.mld_melding_key = m.mld_melding_key
AND o.mld_uitvoerende_keys = 1771 -- Scheldebouw
AND o.mld_statusopdr_key IN
(2, 3, 4, 5, 8, 10)
AND m.mld_melding_spoed IN (3, 4)) opdr
LEFT JOIN
(SELECT DISTINCT
o.mld_opdr_key, p.prs_afdeling_key
FROM mld_opdr o,
prs_bedrijf b,
prs_contactpersoon cp,
prs_perslid p
WHERE o.mld_uitvoerende_keys =
b.prs_bedrijf_key
AND b.prs_bedrijf_key =
cp.prs_bedrijf_key
AND cp.prs_perslid_key =
p.prs_perslid_key) uitv
ON opdr.mld_opdr_key = uitv.mld_opdr_key
LEFT JOIN
(SELECT ko.mld_opdr_key,
COALESCE (sm.mld_stdmelding_uitvoertijd,
0)
sla
FROM mld_v_aanwezigkenmerkopdr ko,
mld_stdmelding sm
WHERE ko.mld_kenmerk_key = 41 -- Corr. melding
AND sm.mld_stdmelding_key =
fac.safe_to_number (
ko.mld_kenmerkopdr_waarde
)) CORR
ON opdr.mld_opdr_key = CORR.mld_opdr_key) x
GROUP BY prs_afdeling_key;
BEGIN adm.systrackscript('$Workfile: wtca.sql $', '$Revision: 28 $', 0); END;
/
BEGIN fac.registercustversion('WTCA', 16); END;
BEGIN fac.registercustversion('WTCA', 17); END;
/
COMMIT;
spool off