WTCA#20596

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

WTCA/Once/wtca#20596.sql

@@ -0,0 +1,47 @@
+-- Customer specific once-script.
+--
+-- (c) 2011 SG|facilitor bv
+-- $Revision: 1 $
+-- $Modtime: 26-05-11 10:34 $
+--
+-- 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, 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;
+/
+
+spool off
+
+@wtca.sql