CSUN#31806 -- Rapportage No-Show
svn path=/Customer/trunk/; revision=24222
This commit is contained in:
Arthur Egberink
212
CSUN/CSUN.sql
212
CSUN/CSUN.sql
@@ -70,6 +70,18 @@ AS
|
||||
p_datum_van IN VARCHAR2,
|
||||
p_datum_tot IN VARCHAR2,
|
||||
p_cursor OUT t_cursor);
|
||||
PROCEDURE ns_district_periode (user_key IN NUMBER,
|
||||
p_datum_van IN VARCHAR2,
|
||||
p_datum_tot IN VARCHAR2,
|
||||
p_cursor OUT t_cursor);
|
||||
PROCEDURE ns_regio_periode (user_key IN NUMBER,
|
||||
p_datum_van IN VARCHAR2,
|
||||
p_datum_tot IN VARCHAR2,
|
||||
p_cursor OUT t_cursor);
|
||||
PROCEDURE ns_client_periode (user_key IN NUMBER,
|
||||
p_datum_van IN VARCHAR2,
|
||||
p_datum_tot IN VARCHAR2,
|
||||
p_cursor OUT t_cursor);
|
||||
END;
|
||||
/
|
||||
|
||||
@@ -272,6 +284,204 @@ AS
|
||||
)
|
||||
GROUP BY fac_usrdata_omschr;
|
||||
END;
|
||||
|
||||
PROCEDURE ns_district_periode (user_key IN NUMBER,
|
||||
p_datum_van IN VARCHAR2, -- Let wel: formaat '13-05-2005'
|
||||
p_datum_tot IN VARCHAR2,
|
||||
p_cursor OUT t_cursor)
|
||||
AS
|
||||
v_datum_van DATE;
|
||||
v_datum_tot DATE;
|
||||
v_alg_level_read NUMBER;
|
||||
BEGIN
|
||||
v_datum_van := fac.safe_to_date (p_datum_van, 'dd-mm-yyyy');
|
||||
v_datum_tot := fac.safe_to_date (p_datum_tot, 'dd-mm-yyyy')+1;
|
||||
|
||||
OPEN p_cursor FOR
|
||||
SELECT district,
|
||||
COUNT (mld_key) aantal_meldingen,
|
||||
SUM (acceptoptijd) acceptoptijd,
|
||||
SUM (uitvoeringoptijd) uitvoeringoptijd
|
||||
FROM (
|
||||
SELECT DISTINCT
|
||||
m.mld_melding_key mld_key,
|
||||
di.alg_district_upper district,
|
||||
l.alg_locatie_code locatie,
|
||||
CASE SIGN(fac.datumtijdplusuitvoertijd (
|
||||
fac.gettrackingdate ('MLDNEW', m.mld_melding_key),
|
||||
std.mld_stdmelding_t_accepttijd.tijdsduur, --was sm.mld_stdmelding_urgentie,
|
||||
std.mld_stdmelding_t_accepttijd.eenheid) --was 'UREN')
|
||||
- COALESCE (fac.gettrackingdate ('MLDREJ', m.mld_melding_key),
|
||||
fac.gettrackingdate ('MLDACP', m.mld_melding_key),
|
||||
SYSDATE))
|
||||
WHEN -1 THEN 0
|
||||
ELSE 1
|
||||
END
|
||||
acceptoptijd,
|
||||
CASE
|
||||
WHEN fac.gettrackingdate ('MLDREJ', m.mld_melding_key) IS NULL
|
||||
THEN
|
||||
CASE SIGN(fac.datumtijdplusuitvoertijd (
|
||||
m.mld_melding_datum,
|
||||
m.mld_melding_t_uitvoertijd.tijdsduur, --was m.mld_melding_uitvoertijd,
|
||||
m.mld_melding_t_uitvoertijd.eenheid) --was 'DAGEN')
|
||||
- COALESCE (fac.gettrackingdate ('MLDREJ', m.mld_melding_key),
|
||||
fac.gettrackingdate ('MLDAFM', m.mld_melding_key),
|
||||
SYSDATE))
|
||||
WHEN -1 THEN 0
|
||||
ELSE 1
|
||||
END
|
||||
ELSE 1
|
||||
END
|
||||
uitvoeringoptijd
|
||||
FROM mld_melding m,
|
||||
mld_discipline md,
|
||||
alg_locatie l,
|
||||
alg_district di,
|
||||
prs_perslid p,
|
||||
mld_stdmelding std
|
||||
WHERE m.mld_alg_locatie_key = l.alg_locatie_key
|
||||
AND m.mld_stdmelding_key = 61 -- Klacht No-Show
|
||||
AND l.alg_district_key = di.alg_district_key
|
||||
AND m.prs_perslid_key = p.prs_perslid_key
|
||||
AND md.ins_discipline_key = std.mld_ins_discipline_key
|
||||
AND std.mld_stdmelding_key = m.mld_stdmelding_key
|
||||
AND m.mld_melding_datum BETWEEN v_datum_van AND v_datum_tot
|
||||
)
|
||||
GROUP BY district;
|
||||
END;
|
||||
|
||||
PROCEDURE ns_regio_periode (user_key IN NUMBER,
|
||||
p_datum_van IN VARCHAR2, -- Let wel: formaat '13-05-2005'
|
||||
p_datum_tot IN VARCHAR2,
|
||||
p_cursor OUT t_cursor)
|
||||
AS
|
||||
v_datum_van DATE;
|
||||
v_datum_tot DATE;
|
||||
v_alg_level_read NUMBER;
|
||||
BEGIN
|
||||
v_datum_van := fac.safe_to_date (p_datum_van, 'dd-mm-yyyy');
|
||||
v_datum_tot := fac.safe_to_date (p_datum_tot, 'dd-mm-yyyy')+1;
|
||||
|
||||
OPEN p_cursor FOR
|
||||
SELECT regio,
|
||||
COUNT (mld_key) aantal_meldingen,
|
||||
SUM (acceptoptijd) acceptoptijd,
|
||||
SUM (uitvoeringoptijd) uitvoeringoptijd
|
||||
FROM (
|
||||
SELECT DISTINCT
|
||||
m.mld_melding_key mld_key,
|
||||
di.alg_district_upper district,
|
||||
l.alg_locatie_code locatie,
|
||||
r.alg_regio_omschrijving regio,
|
||||
CASE SIGN(fac.datumtijdplusuitvoertijd (
|
||||
fac.gettrackingdate ('MLDNEW', m.mld_melding_key),
|
||||
std.mld_stdmelding_t_accepttijd.tijdsduur, --was sm.mld_stdmelding_urgentie,
|
||||
std.mld_stdmelding_t_accepttijd.eenheid) --was 'UREN')
|
||||
- COALESCE (fac.gettrackingdate ('MLDREJ', m.mld_melding_key),
|
||||
fac.gettrackingdate ('MLDACP', m.mld_melding_key),
|
||||
SYSDATE))
|
||||
WHEN -1 THEN 0
|
||||
ELSE 1
|
||||
END
|
||||
acceptoptijd,
|
||||
CASE
|
||||
WHEN fac.gettrackingdate ('MLDREJ', m.mld_melding_key) IS NULL
|
||||
THEN
|
||||
CASE SIGN(fac.datumtijdplusuitvoertijd (
|
||||
m.mld_melding_datum,
|
||||
m.mld_melding_t_uitvoertijd.tijdsduur, --was m.mld_melding_uitvoertijd,
|
||||
m.mld_melding_t_uitvoertijd.eenheid) --was 'DAGEN')
|
||||
- COALESCE (fac.gettrackingdate ('MLDREJ', m.mld_melding_key),
|
||||
fac.gettrackingdate ('MLDAFM', m.mld_melding_key),
|
||||
SYSDATE))
|
||||
WHEN -1 THEN 0
|
||||
ELSE 1
|
||||
END
|
||||
ELSE 1
|
||||
END
|
||||
uitvoeringoptijd
|
||||
FROM mld_melding m,
|
||||
mld_discipline md,
|
||||
alg_regio r,
|
||||
alg_locatie l,
|
||||
alg_district di,
|
||||
prs_perslid p,
|
||||
mld_stdmelding std
|
||||
WHERE m.mld_alg_locatie_key = l.alg_locatie_key
|
||||
AND m.mld_stdmelding_key = 61 -- Klacht No-Show
|
||||
AND l.alg_district_key = di.alg_district_key
|
||||
AND di.alg_regio_key = r.alg_regio_key
|
||||
AND m.prs_perslid_key = p.prs_perslid_key
|
||||
AND md.ins_discipline_key = std.mld_ins_discipline_key
|
||||
AND std.mld_stdmelding_key = m.mld_stdmelding_key
|
||||
AND m.mld_melding_datum BETWEEN v_datum_van AND v_datum_tot
|
||||
)
|
||||
GROUP BY regio;
|
||||
END;
|
||||
|
||||
PROCEDURE ns_client_periode (user_key IN NUMBER,
|
||||
p_datum_van IN VARCHAR2, -- Let wel: formaat '13-05-2005'
|
||||
p_datum_tot IN VARCHAR2,
|
||||
p_cursor OUT t_cursor)
|
||||
AS
|
||||
v_datum_van DATE;
|
||||
v_datum_tot DATE;
|
||||
v_alg_level_read NUMBER;
|
||||
BEGIN
|
||||
v_datum_van := fac.safe_to_date (p_datum_van, 'dd-mm-yyyy');
|
||||
v_datum_tot := fac.safe_to_date (p_datum_tot, 'dd-mm-yyyy')+1;
|
||||
|
||||
OPEN p_cursor FOR
|
||||
SELECT fac_usrdata_omschr client,
|
||||
COUNT (mld_key) aantal_meldingen,
|
||||
SUM (acceptoptijd) acceptoptijd,
|
||||
SUM (uitvoeringoptijd) uitvoeringoptijd
|
||||
FROM (
|
||||
SELECT DISTINCT
|
||||
m.mld_melding_key mld_key,
|
||||
fac_usrdata_omschr ,
|
||||
CASE SIGN(fac.datumtijdplusuitvoertijd (
|
||||
fac.gettrackingdate ('MLDNEW', m.mld_melding_key),
|
||||
std.mld_stdmelding_t_accepttijd.tijdsduur, --was sm.mld_stdmelding_urgentie,
|
||||
std.mld_stdmelding_t_accepttijd.eenheid) --was 'UREN')
|
||||
- COALESCE (fac.gettrackingdate ('MLDREJ', m.mld_melding_key),
|
||||
fac.gettrackingdate ('MLDACP', m.mld_melding_key),
|
||||
SYSDATE))
|
||||
WHEN -1 THEN 0
|
||||
ELSE 1
|
||||
END
|
||||
acceptoptijd,
|
||||
CASE
|
||||
WHEN fac.gettrackingdate ('MLDREJ', m.mld_melding_key) IS NULL
|
||||
THEN
|
||||
CASE SIGN(fac.datumtijdplusuitvoertijd (
|
||||
m.mld_melding_datum,
|
||||
m.mld_melding_t_uitvoertijd.tijdsduur, --was m.mld_melding_uitvoertijd,
|
||||
m.mld_melding_t_uitvoertijd.eenheid) --was 'DAGEN')
|
||||
- COALESCE (fac.gettrackingdate ('MLDREJ', m.mld_melding_key),
|
||||
fac.gettrackingdate ('MLDAFM', m.mld_melding_key),
|
||||
SYSDATE))
|
||||
WHEN -1 THEN 0
|
||||
ELSE 1
|
||||
END
|
||||
ELSE 1
|
||||
END
|
||||
uitvoeringoptijd
|
||||
FROM mld_melding m,
|
||||
alg_onrgoedkenmerk ogk,
|
||||
mld_stdmelding std,
|
||||
fac_usrdata ud
|
||||
WHERE m.mld_alg_locatie_key = ogk.alg_onrgoed_key
|
||||
AND m.mld_stdmelding_key = 61 -- Klacht No-Show
|
||||
AND ogk.alg_onrgoed_niveau = 'L'
|
||||
AND ogk.alg_kenmerk_key = 1000
|
||||
AND fac.safe_to_number(ogk.alg_onrgoedkenmerk_waarde) = fac_usrdata_key
|
||||
AND m.mld_stdmelding_key = std.mld_stdmelding_key
|
||||
AND m.mld_melding_datum BETWEEN v_datum_van AND v_datum_tot
|
||||
)
|
||||
GROUP BY fac_usrdata_omschr;
|
||||
END;
|
||||
END;
|
||||
/
|
||||
|
||||
@@ -2130,7 +2340,7 @@ AS
|
||||
|
||||
BEGIN adm.systrackscriptId('$Id$', 0); END;
|
||||
/
|
||||
BEGIN fac.registercustversion('CSUN', 14); END;
|
||||
BEGIN fac.registercustversion('CSUN', 15); END;
|
||||
/
|
||||
COMMIT;
|
||||
spool off
|
||||
|
||||
Reference in New Issue
Block a user