WTCA#21431

svn path=/Customer/trunk/; revision=14953
This commit is contained in:
Maarten van der Heide
2011-10-05 09:03:16 +00:00
parent 75cfb1d660
commit a509975079
2 changed files with 245 additions and 5 deletions

37
WTCA/Once/wtca14.sql Normal file
View File

@@ -0,0 +1,37 @@
-- Customer specific once-script WTCA14.
--
-- (c) 2010 SG|facilitor bv
-- $Revision: 1 $
-- $Modtime: 4-10-11 15:59 $
--
-- Support: +31 53 4800700
SET ECHO ON
SPOOL xwtca14.lst
SET DEFINE OFF
-- WTCA#21431: "Marc Claassen"-rapport/66
INSERT INTO FAC_USRRAP
(fac_usrrap_omschrijving, fac_usrrap_view_name,
fac_usrrap_in_huidige_locatie,
fac_usrrap_template, fac_usrrap_macro,
fac_usrrap_vraagbegindatum, fac_usrrap_vraageinddatum,
fac_usrrap_functie,
fac_usrrap_info,
fac_functie_key, fac_usrrap_autorefresh
)
VALUES ('Leverancier performance', 'wtca_v_rap_lev_perf_details',
NULL,
NULL, NULL,
0, 0,
1,
'Leverancier performance details.',
66,
0
);
BEGIN adm.systrackscript('$Workfile: wtca14.sql $', '$Revision: 1 $', 1); END;
/
SPOOL OFF
@wtca.sql

View File

@@ -1,7 +1,7 @@
-- Script containing customer specific db-configuration for WTCA.
-- (c) 2010 SG|facilitor bv
-- $Revision: 20 $
-- $Modtime: 19-09-11 14:30 $
-- $Revision: 21 $
-- $Modtime: 5-10-11 11:02 $
--
-- Support: +31 53 4800700
@@ -2359,8 +2359,211 @@ AS
ON x.bedrijf_key = y.bedrijf_key
WHERE y.aantal IS NOT NULL;
/* Formatted on 19-9-2011 14:30:36 (QP5 v5.115.810.9015) */
/* Formatted on 5-10-2011 11:02:04 (QP5 v5.115.810.9015) */
CREATE OR REPLACE VIEW wtca_v_rap_lev_perf
(
fclt_f_maand,
fclt_f_bedrijf,
aant_opdr,
acceptatie_op_tijd,
acceptatie_perc,
uitvoering_op_tijd,
uitvoering_perc,
binnen_norm
)
AS
SELECT x.maand,
x.bedrijf,
x.aant_opdrachten,
x.acceptatie_op_tijd,
REPLACE (
TO_CHAR (x.acceptatie_op_tijd * 100 / x.aant_opdrachten,
'990D99'),
'.',
','
)
acceptatie_perc,
x.uitvoering_op_tijd,
REPLACE (
TO_CHAR (x.uitvoering_op_tijd * 100 / x.aant_opdrachten,
'990D99'),
'.',
','
)
uitvoering_perc,
DECODE (
x.aant_opdrachten,
0,
'Ja',
DECODE (
SIGN (
(x.uitvoering_op_tijd * 100 / x.aant_opdrachten) - 80
),
1,
'Ja',
'Nee'
)
)
norm
FROM ( SELECT opdr.maand,
DECODE (mc.prs_kenmerklink_waarde,
'81', 'Fac. maincontractor',
opdr.bedrijf)
bedrijf,
COUNT (opdr_key) aant_opdrachten,
SUM (acceptoptijd) acceptatie_op_tijd,
SUM(DECODE (
SIGN(opdr.afmelddagen
- COALESCE (CORR.sla, opdr.sla)),
1,
0,
1
))
uitvoering_op_tijd
FROM (SELECT o.mld_opdr_key opdr_key,
o.mld_uitvoerende_keys bedrijf_key,
DECODE (
o.mld_statusopdr_key,
6,
TO_CHAR (
fac.gettrackingdate (
'ORDAFM',
o.mld_opdr_key
),
'yyyy-mm'
),
7,
TO_CHAR (
fac.gettrackingdate (
'ORDAFM',
o.mld_opdr_key
),
'yyyy-mm'
),
9,
TO_CHAR (
fac.gettrackingdate (
'ORDAFM',
o.mld_opdr_key
),
'yyyy-mm'
),
'Lopend'
)
maand,
b.prs_bedrijf_naam bedrijf,
sd.ins_srtdiscipline_prefix prefix,
td.ins_discipline_omschrijving vakgroep,
sm.mld_stdmelding_omschrijving melding,
m.mld_melding_uitvoertijd sla,
DECODE (
m.mld_melding_spoed,
3,
DECODE (
SIGN(FLOOR( (COALESCE (
fac.gettrackingdate (
'ORDACP',
o.mld_opdr_key
),
SYSDATE
)
- fac.gettrackingdate (
'ORDNEW',
o.mld_opdr_key
))
* 24)
- 4), -- Harde afspraak 4 uur
1,
0,
1
),
DECODE (
SIGN(FAC.count_work_days_incltime (
fac.gettrackingdate (
'ORDNEW',
o.mld_opdr_key
),
COALESCE (
fac.gettrackingdate (
'ORDACP',
o.mld_opdr_key
),
SYSDATE
)
)
- 1), -- Harde afspraak 24 uur
1,
0,
1
)
)
acceptoptijd,
FAC.count_work_days_incltime (
fac.gettrackingdate ('ORDNEW',
o.mld_opdr_key),
COALESCE (
fac.gettrackingdate (
'ORDAFM',
o.mld_opdr_key
),
SYSDATE
)
)
afmelddagen
FROM mld_opdr o,
mld_melding m,
mld_stdmelding sm,
ins_tab_discipline td,
ins_srtdiscipline sd,
prs_bedrijf b
WHERE o.mld_melding_key = m.mld_melding_key
AND m.mld_stdmelding_key =
sm.mld_stdmelding_key
AND sm.mld_ins_discipline_key =
td.ins_discipline_key
AND td.ins_srtdiscipline_key =
sd.ins_srtdiscipline_key
AND o.mld_uitvoerende_keys =
b.prs_bedrijf_key
AND o.mld_statusopdr_key <> 1
AND m.mld_melding_spoed IN (3, 4)) opdr
LEFT JOIN
(SELECT ko.mld_opdr_key,
sd.ins_srtdiscipline_prefix prefix,
td.ins_discipline_omschrijving vakgroep,
sm.mld_stdmelding_omschrijving melding,
COALESCE (
sm.mld_stdmelding_uitvoertijd,
0
)
sla
FROM mld_v_aanwezigkenmerkopdr ko,
mld_stdmelding sm,
ins_tab_discipline td,
ins_srtdiscipline sd
WHERE ko.mld_kenmerk_key = 41 -- Corr. melding
AND sm.mld_stdmelding_key =
fac.safe_to_number (
ko.mld_kenmerkopdr_waarde
)
AND sm.mld_ins_discipline_key =
td.ins_discipline_key
AND td.ins_srtdiscipline_key =
sd.ins_srtdiscipline_key) CORR
ON opdr.opdr_key = CORR.mld_opdr_key
LEFT JOIN
(SELECT kl.prs_link_key, kl.prs_kenmerklink_waarde -- Ja of Nee
FROM prs_kenmerklink kl
WHERE kl.prs_kenmerk_key = 1060 -- Facilitaire maincontractor
AND kl.prs_kenmerklink_niveau = 'B') mc
ON opdr.bedrijf_key = mc.prs_link_key
GROUP BY maand,
DECODE (mc.prs_kenmerklink_waarde,
'81', 'Fac. maincontractor',
opdr.bedrijf)) x;
/* Formatted on 19-9-2011 14:30:36 (QP5 v5.115.810.9015) */
CREATE OR REPLACE VIEW wtca_v_rap_lev_perf_details
(
fclt_f_maand,
fclt_f_bedrijf,
@@ -2622,9 +2825,9 @@ AS
ON opdr.opdr_key = CORR.mld_opdr_key
GROUP BY maand, bedrijf) x;
BEGIN adm.systrackscript('$Workfile: wtca.sql $', '$Revision: 20 $', 0); END;
BEGIN adm.systrackscript('$Workfile: wtca.sql $', '$Revision: 21 $', 0); END;
/
BEGIN fac.registercustversion('WTCA', 13); END;
BEGIN fac.registercustversion('WTCA', 14); END;
/
COMMIT;
spool off