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

svn path=/Customer/trunk/; revision=21179

Browse Source
This commit is contained in:
Peter Feij
2014-03-31 15:12:41 +00:00
parent 12d6787530
commit b1de62366f
498 changed files with 0 additions and 123852 deletions
Download Patch File Download Diff File Expand all files Collapse all files

78
WTCA/Once/wtca#20596.sql
View File

@@ -1,78 +0,0 @@
-- Customer specific once-script.
--
-- (c) 2011 SG|facilitor bv
-- $Revision$
-- $Id$
--
-- Support: +31 53 4800700
SET ECHO ON
SPOOL xwtca20596.lst
SET DEFINE OFF
/* Formatted on 26-5-2011 10:34:40 (QP5 v5.115.810.9015) */
BEGIN
-- Op KV zetten afgemelde/TV opdrachten op kostenplaats WTC voor 01-04-2011
-- en alleen zover uitgegeven aan: Donker, EW, EcoSmart, Fortron, ITC, NDI,
-- Overtoom, Prisma, Rentokil, Trigion BE en Trigion RE!
FOR rc
IN ( SELECT o.mld_opdr_key
FROM mld_opdr o, prs_kostenplaats kp
WHERE o.mld_statusopdr_key = 6
AND o.mld_uitvoerende_keys IN
(404,
387,
383,
384,
782,
406,
785,
381,
386,
385,
409)
AND o.prs_kostenplaats_key = kp.prs_kostenplaats_key
AND kp.prs_kostenplaats_upper = 'WTC'
AND fac.gettrackingdate ('ORDAFM', o.mld_opdr_key) <
TO_DATE ('01-04-2011', 'dd-mm-yyyy')
ORDER BY o.mld_opdr_key)
LOOP
MLD.setopdrachtstatus (rc.mld_opdr_key, 9, 4); -- Op KV door Facilitor
COMMIT;
END LOOP;
END;
/
BEGIN
-- Op AV zetten afgemelde/TV opdrachten voor 01-04-2011 die op een andere
-- kostenplaats dan WTC staan en alleen zover uitgegeven aan: Donker, EW,
-- EcoSmart, Fortron, ITC, NDI, Overtoom, Prisma, Rentokil, Trigion BE en
-- Trigion RE!
FOR rc
IN ( SELECT o.mld_opdr_key
FROM mld_opdr o, prs_kostenplaats kp
WHERE o.mld_statusopdr_key = 6
AND o.mld_uitvoerende_keys IN
(404,
387,
383,
384,
782,
406,
785,
381,
386,
385,
409)
AND o.prs_kostenplaats_key = kp.prs_kostenplaats_key
AND kp.prs_kostenplaats_upper != 'WTC'
AND fac.gettrackingdate ('ORDAFM', o.mld_opdr_key) <
TO_DATE ('01-04-2011', 'dd-mm-yyyy')
ORDER BY o.mld_opdr_key)
LOOP
MLD.setopdrachtstatus (rc.mld_opdr_key, 7, 4); -- Op AV door Facilitor
COMMIT;
END LOOP;
END;
/
spool off

88
WTCA/Once/wtca#20792.sql
View File

@@ -1,88 +0,0 @@
-- Customer specific once-script.
--
-- (c) 2011 SG|facilitor bv
-- $Revision$
-- $Id$
--
-- Support: +31 53 4800700
SET ECHO ON
SPOOL xwtca20792.lst
SET DEFINE OFF
/* Formatted on 26-5-2011 10:34:40 (QP5 v5.115.810.9015) */
BEGIN
-- Op KV zetten afgemelde/TV opdrachten op kostenplaats WTC voor 01-03-2011
-- en alleen zover uitgegeven aan: Cofely=1363!
FOR rc
IN ( SELECT o.mld_opdr_key
FROM mld_opdr o, prs_kostenplaats kp
WHERE o.mld_statusopdr_key = 6
AND o.mld_uitvoerende_keys IN
(1363)
AND o.prs_kostenplaats_key = kp.prs_kostenplaats_key
AND kp.prs_kostenplaats_upper = 'WTC'
AND fac.gettrackingdate ('ORDAFM', o.mld_opdr_key) <
TO_DATE ('01-03-2011', 'dd-mm-yyyy')
ORDER BY o.mld_opdr_key)
LOOP
MLD.setopdrachtstatus (rc.mld_opdr_key, 9, 4); -- Op KV door Facilitor
COMMIT;
END LOOP;
END;
/
/* Formatted on 26-5-2011 10:34:40 (QP5 v5.115.810.9015) */
BEGIN
-- Op AV zetten afgeronde/KV opdrachten op kostenplaats WTC voor 01-03-2011
-- en alleen zover uitgegeven aan: Cofely=1363!
FOR rc
IN ( SELECT o.mld_opdr_key
FROM mld_opdr o, prs_kostenplaats kp
WHERE o.mld_statusopdr_key = 9
AND o.mld_uitvoerende_keys IN
(1363)
AND o.prs_kostenplaats_key = kp.prs_kostenplaats_key
AND kp.prs_kostenplaats_upper = 'WTC'
AND fac.gettrackingdate ('ORDAFM', o.mld_opdr_key) <
TO_DATE ('01-03-2011', 'dd-mm-yyyy')
ORDER BY o.mld_opdr_key)
LOOP
MLD.setopdrachtstatus (rc.mld_opdr_key, 7, 4); -- Op AV door Facilitor
COMMIT;
END LOOP;
END;
/
-- Telefonisch afgestemd op 8/6 om onderstaande set van KV naar AV te zetten
-- en zodoende "kwijt te zijn" in de periodeafsluiting-rapportage!
BEGIN
-- Op AV zetten afgeronde/KV opdrachten (WTC of niet WTC) voor 01-04-2011
-- en alleen zover uitgegeven aan: Donker, EW, EcoSmart, Fortron, ITC, NDI,
-- Overtoom, Prisma, Rentokil, Trigion BE en Trigion RE!
FOR rc
IN ( SELECT o.mld_opdr_key
FROM mld_opdr o
WHERE o.mld_statusopdr_key = 9
AND o.mld_uitvoerende_keys IN
(404,
387,
383,
384,
782,
406,
785,
381,
386,
385,
409)
AND fac.gettrackingdate ('ORDAFM', o.mld_opdr_key) <
TO_DATE ('01-04-2011', 'dd-mm-yyyy')
ORDER BY o.mld_opdr_key)
LOOP
MLD.setopdrachtstatus (rc.mld_opdr_key, 7, 4); -- Op AV door Facilitor
COMMIT;
END LOOP;
END;
/
spool off

88
WTCA/Once/wtca#27385.sql
View File

@@ -1,88 +0,0 @@
-- Customer specific once-script.
--
-- (c) 2013 SG|facilitor bv
-- $Revision$
-- $Id$
--
-- Support: +31 53 4800700
SET ECHO ON
SPOOL xwtca27385.lst
SET DEFINE OFF
SELECT COUNT ( * )
FROM mld_opdr o
WHERE o.mld_statusopdr_key = 7 AND o.mld_uitvoerende_keys IN (382, 1363)
AND EXISTS
(SELECT 1
FROM fac_tracking t
WHERE t.fac_srtnotificatie_key = 47
AND TO_CHAR (t.fac_tracking_datum, 'yyyymmddhh24mi') =
'201309031700'
AND t.fac_tracking_refkey = o.mld_opdr_key)
AND EXISTS
(SELECT 1
FROM fac_tracking t
WHERE t.fac_srtnotificatie_key = 221
AND TO_CHAR (t.fac_tracking_datum, 'yyyymm') =
'201308'
AND t.fac_tracking_refkey = o.mld_opdr_key);
UPDATE mld_opdr o
SET o.mld_statusopdr_key = 9
WHERE o.mld_statusopdr_key = 7 AND o.mld_uitvoerende_keys IN (382, 1363)
AND EXISTS
(SELECT 1
FROM fac_tracking t
WHERE t.fac_srtnotificatie_key = 47
AND TO_CHAR (t.fac_tracking_datum, 'yyyymmddhh24mi') =
'201309031700'
AND t.fac_tracking_refkey = o.mld_opdr_key)
AND EXISTS
(SELECT 1
FROM fac_tracking t
WHERE t.fac_srtnotificatie_key = 221
AND TO_CHAR (t.fac_tracking_datum, 'yyyymm') =
'201308'
AND t.fac_tracking_refkey = o.mld_opdr_key);
SELECT COUNT ( * )
FROM fac_tracking t
WHERE t.fac_srtnotificatie_key = 47
AND TO_CHAR (t.fac_tracking_datum, 'yyyymmddhh24mi') =
'201309031700'
AND EXISTS
(SELECT 1
FROM mld_opdr o
WHERE o.mld_statusopdr_key = 9
AND o.mld_uitvoerende_keys IN (382, 1363)
AND o.mld_opdr_key = t.fac_tracking_refkey)
AND EXISTS
(SELECT 1
FROM fac_tracking
WHERE fac_srtnotificatie_key = 221
AND TO_CHAR (fac_tracking_datum, 'yyyymm') =
'201308'
AND fac_tracking_refkey = t.fac_tracking_refkey);
DELETE FROM fac_tracking t
WHERE t.fac_srtnotificatie_key = 47
AND TO_CHAR (t.fac_tracking_datum, 'yyyymmddhh24mi') =
'201309031700'
AND EXISTS
(SELECT 1
FROM mld_opdr o
WHERE o.mld_statusopdr_key = 9
AND o.mld_uitvoerende_keys IN (382, 1363)
AND o.mld_opdr_key = t.fac_tracking_refkey)
AND EXISTS
(SELECT 1
FROM fac_tracking
WHERE fac_srtnotificatie_key = 221
AND TO_CHAR (fac_tracking_datum, 'yyyymm') =
'201308'
AND fac_tracking_refkey = t.fac_tracking_refkey);
COMMIT;
BEGIN adm.systrackscript('$Workfile: wtca#27385.sql $', '$Revision$', 0); END;
/
SPOOL OFF

123
WTCA/Once/wtca1.sql
View File

@@ -1,123 +0,0 @@
-- Customer specific once-script UWVA52.
--
-- (c) 2010 SG|facilitor bv
-- $Revision$
-- $Id$
--
-- Support: +31 53 4800700
SET ECHO ON
SPOOL xwtca1.lst
SET DEFINE OFF
-- Beheer:Gebruikersbeheer = 62
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 ('Financiele periodeafsluiting', 'wtca_v_rap_freezeopdrachten',
NULL,
NULL, NULL,
0, 0,
1,
'Bevriezen van opdrachten en daarmee kosten per uitvoerende.',
62,
0
);
-- Beheer:Gebruikersbeheer = 62
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 ('Concept periodeoverzicht', 'wtca_v_rap_maand_actual',
NULL,
NULL, NULL,
0, 0,
0,
'Concept opdrachtgegevens tbv. financiele periodeafsluiting.',
62,
0
);
-- Beheer:Gebruikersbeheer = 62
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 ('Definitieve periodeoverzichten', 'wtca_v_rap_maand_frozen',
NULL,
NULL, NULL,
0, 0,
0,
'Definitieve opdrachtgegevens per financiele periodeafsluiting.',
62,
0
);
COMMIT;
BEGIN
-- Op AV zetten afgemelde opdrachten op kostenplaats WTC voor 01-09-2010!
FOR rc
IN ( SELECT o.mld_opdr_key
FROM mld_opdr o, prs_kostenplaats kp
WHERE o.mld_statusopdr_key = 6
AND o.prs_kostenplaats_key = kp.prs_kostenplaats_key
AND kp.prs_kostenplaats_upper = 'WTC'
AND fac.gettrackingdate ('ORDAFM', o.mld_opdr_key) <
TO_DATE ('01-09-2010', 'dd-mm-yyyy')
ORDER BY o.mld_opdr_key)
LOOP
MLD.setopdrachtstatus (rc.mld_opdr_key, 7, 4); -- Facilitor
COMMIT;
END LOOP;
-- Afmelden ALLE niet opgeloste meldingen (waaronder opdrachten bestaan die
-- allemaal de status Afgewezen, Niet akkoord, Afgemeld of Verwerkt hebben!
FOR rc
IN (SELECT mld_melding_key
FROM mld_melding
WHERE mld_melding_key IN
(SELECT niet_opgelost.mld_melding_key
FROM (SELECT m.mld_melding_key,
(SELECT COUNT ( * )
FROM mld_opdr o
WHERE mld_melding_key =
m.mld_melding_key)
aanw_opdr,
(SELECT COUNT ( * )
FROM mld_opdr o
WHERE mld_melding_key =
m.mld_melding_key
AND o.mld_statusopdr_key NOT IN
(1, 2, 6, 7))
open_opdr
FROM mld_melding m
WHERE m.mld_melding_status IN (4, 7))
niet_opgelost
WHERE aanw_opdr > 0 AND open_opdr = 0))
LOOP
MLD.setmeldingstatus (rc.mld_melding_key, 5, 4); -- Facilitor
COMMIT;
END LOOP;
END;
/
spool off
@wtca.sql

37
WTCA/Once/wtca13.sql
View File

@@ -1,37 +0,0 @@
-- Customer specific once-script WTCA13.
--
-- (c) 2010 SG|facilitor bv
-- $Revision$
-- $Id$
--
-- Support: +31 53 4800700
SET ECHO ON
SPOOL xwtca13.lst
SET DEFINE OFF
-- WTCA#21357: "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',
NULL,
NULL, NULL,
0, 0,
1,
'Leverancier performance.',
66,
0
);
BEGIN adm.systrackscript('$Workfile: wtca13.sql $', '$Revision$', 1); END;
/
SPOOL OFF
@wtca.sql

37
WTCA/Once/wtca14.sql
View File

@@ -1,37 +0,0 @@
-- Customer specific once-script WTCA14.
--
-- (c) 2010 SG|facilitor bv
-- $Revision$
-- $Id$
--
-- 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); END;
/
SPOOL OFF
@wtca.sql

37
WTCA/Once/wtca19.sql
View File

@@ -1,37 +0,0 @@
-- Customer specific once-script WTCA19.
--
-- (c) 2013 SG|facilitor bv
-- $Revision$
-- $Id$
--
-- Support: +31 53 4800700
SET ECHO ON
SPOOL xwtca19.lst
SET DEFINE OFF
-- WTCA#25443: 68=WEB_USER03 -> Speciale functie voor rapportages met 3d-scope
-- op Afdeling-1 (VERPLICHT, dus niet op Alles, Bedrijf of lager)!
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 ('Meldingen per metrage', 'wtca_v_rap_mld_vs_metrage',
NULL,
NULL, NULL,
0, 0,
1,
'Meldingen per metrage.',
68,
0
);
COMMIT;
BEGIN adm.systrackscript('$Workfile: wtca19.sql $', '$Revision$', 0); END;
/
SPOOL OFF
@wtca.sql