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

WEHK#21079

Browse Source 
svn path=/Customer/trunk/; revision=14883
This commit is contained in:
Ruud Lipper
2011-07-22 11:39:44 +00:00
parent fcbfbb0c99
commit 5421885d80
1 changed files with 69 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

72
Wehk/WEHK.sql
View File

@@ -1,7 +1,7 @@
-- Script containing customer specific configuration sql statements for WEHK: Wehkamp
-- (c) 2010 SG|facilitor bv
-- $Revision: 30 $
-- $Modtime: 7-06-11 10:05 $
-- $Revision: 31 $
-- $Modtime: 22-07-11 12:19 $
--
-- Support: +31 53 4800700
@@ -2113,7 +2113,31 @@ CREATE OR REPLACE PROCEDURE wehk_export_autoclose (p_applname IN VARCHAR2,
p_applrun IN VARCHAR2,
p_filedir IN VARCHAR2,
p_filename IN VARCHAR2)
AS
AS
CURSOR cres
IS
SELECT rrr.res_rsv_ruimte_key
FROM res_rsv_ruimte rrr
WHERE res_status_bo_key = 2
AND res_rsv_ruimte_verwijder IS NULL
AND res_rsv_ruimte_van < SYSDATE - 14;
CURSOR cart
IS
SELECT ra.res_rsv_artikel_key
FROM res_rsv_artikel ra
WHERE res_status_bo_key = 2
AND res_rsv_artikel_verwijder IS NULL
AND res_rsv_artikel_levering < SYSDATE - 14;
CURSOR cobj
IS
SELECT rd.res_rsv_deel_key
FROM res_rsv_deel rd
WHERE res_status_bo_key = 2
AND res_rsv_deel_verwijder IS NULL
AND res_rsv_deel_tot < SYSDATE - 14;
BEGIN
FOR rc
IN (SELECT boi.bes_bestelopdr_item_key, bo.bes_bestelopdr_key
@@ -2166,6 +2190,48 @@ BEGIN
COMMIT;
END LOOP;
FOR rc IN cart
LOOP
UPDATE res_rsv_artikel
SET res_status_bo_key = 5
WHERE res_rsv_artikel_key = rc.res_rsv_artikel_key;
fac.trackaction ('RESAFM',
rc.res_rsv_artikel_key,
NULL,
NULL,
NULL);
COMMIT;
END LOOP;
FOR rc IN cobj
LOOP
UPDATE res_rsv_deel
SET res_status_bo_key = 5
WHERE res_rsv_deel_key = rc.res_rsv_deel_key;
fac.trackaction ('RESAFM',
rc.res_rsv_deel_key,
NULL,
NULL,
NULL);
COMMIT;
END LOOP;
FOR rc IN cres
LOOP
UPDATE res_rsv_ruimte
SET res_status_bo_key = 5
WHERE res_rsv_ruimte_key = rc.res_rsv_ruimte_key;
fac.trackaction ('RESAFM',
rc.res_rsv_ruimte_key,
NULL,
NULL,
NULL);
COMMIT;
END LOOP;
END;
/