Customer/onces/PCHW/PCHW#52476.sql

--
-- $Id$
--
-- Bevries de catering met de oude prijs.

DEFINE thisfile = 'PCHW#52476.sql'
DEFINE dbuser   = '^PCHW'


SET ECHO ON
SET DEFINE ON
COLUMN fcltlogfile NEW_VALUE fcltlogfile NOPRINT;
WHENEVER SQLERROR EXIT;
SELECT adm.scriptspoolfile('&dbuser', '&thisfile') AS fcltlogfile FROM DUAL;
WHENEVER SQLERROR CONTINUE;
SPOOL &fcltlogfile
SET DEFINE OFF

------ payload begin ------

CREATE TABLE tmp_cor_artikel
(
    res_artikel_key NUMBER (10),
    res_artikel_prijs NUMBER (7, 2),
    res_artikel_btw NUMBER (3)
);

SET DEFINE OFF;
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (95, 5.83, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (96, 5.16, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (97, 6.88, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (98, 0.28, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (99, 5.89, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (100, 6.45, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (101, 6.9, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (102, 9.95, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (103, 11, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (104, 5.25, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (105, 5.25, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (106, 5.25, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (107, 5.93, 21);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (108, 3.48, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (109, 5.89, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (110, 4.99, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (111, 2.46, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (112, 0.71, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (113, 200, 21);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (114, 2.46, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (115, 5.2, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (116, 2.46, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (117, 200, 21);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (118, 4, 21);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (119, 75, 21);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (120, 10, 21);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (121, 50, 21);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (122, 0.15, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (141, 2.72, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (226, 26.73);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (227, 32.81);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (228, 36.45);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (229, 31.5);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (230, 34.65);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (231, 42.53);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (232, 47.25);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (233, 54);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (234, 59.4);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (235, 72.9);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (236, 81);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (221, 22.5);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (222, 24.75);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_BTW)
 Values
   (241, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_BTW)
 Values
   (242, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_BTW)
 Values
   (243, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_BTW)
 Values
   (244, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (161, 0.15);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (163, 0.15);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (164, 0.15);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (165, 0.15);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (166, 0.15);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (167, 0.15);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (169, 0.15);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (170, 0.15);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (171, 0.15);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (172, 0.15);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (173, 0.15);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (174, 0.15);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (175, 0.15);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (177, 0.15);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (178, 0.15);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (179, 0.15);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (180, 0.15);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (181, 0.15);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (182, 0.15);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (183, 0.15);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (201, 26.73);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (202, 24.3);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (203, 32.81);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (204, 36.45);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (223, 30.38);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (224, 33.75);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS)
 Values
   (225, 24.3);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (61, 7.2, 21);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (62, 8.04, 21);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (63, 1.12, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (64, 1.26, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (65, 1.48, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (66, 0.97, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (67, 0.5, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (68, 0.94, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (69, 2.3, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (70, 1.3, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (71, 2.58, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (72, 2.58, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (73, 1.9, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (74, 1.9, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (75, 1.8, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (76, 2.45, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (77, 1.09, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (78, 1.27, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (79, 1.11, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (80, 2.93, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (81, 4.7, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (82, 2.67, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (83, 3.21, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (84, 2.72, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (85, 2.45, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (86, 2.6, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (87, 4.76, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (88, 3.8, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (89, 13.04, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (90, 12.4, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (91, 1.77, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (92, 1.1, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (93, 1.5, 6);
Insert into TMP_COR_ARTIKEL
   (RES_ARTIKEL_KEY, RES_ARTIKEL_PRIJS, RES_ARTIKEL_BTW)
 Values
   (94, 1.73, 6);


DECLARE
    CURSOR c
    IS
        SELECT rra.res_rsv_artikel_key,
               rra.res_rsv_artikel_aantal,
               c.res_artikel_prijs,
               c.res_artikel_btw,
               rra.res_rsv_ruimte_key
          FROM res_rsv_artikel rra, tmp_cor_artikel c
         WHERE     res_status_bo_key = 2
               AND res_rsv_artikel_levering <
                   TO_DATE ('20180201', 'yyyymmdd')
               AND res_rsv_artikel_verwijder IS NULL
               AND rra.res_artikel_key = c.res_artikel_key;
BEGIN
    FOR rec IN c
    LOOP
        UPDATE res_rsv_artikel
           SET res_rsv_artikel_prijs =
                   rec.res_rsv_artikel_aantal * rec.res_artikel_prijs,
               res_rsv_artikel_btw = rec.res_artikel_btw,
               res_status_bo_key = 5,
               res_rsv_artikel_afgemeld = SYSDATE
         WHERE res_rsv_artikel_key = rec.res_rsv_artikel_key;

        INSERT INTO fac_tracking (fac_srtnotificatie_key,
                                  fac_tracking_refkey,
                                  fac_tracking_oms,
                                  prs_perslid_key)
             VALUES (83,
                     rec.res_rsv_ruimte_key,
                     'Catering afgemeld (oude prijs)',
                     4);
    END LOOP;

    COMMIT;
END;
/

DROP TABLE tmp_cor_artikel;

------ payload end   ------

SET DEFINE OFF
BEGIN adm.systrackscriptId ('$Id$', 1); END;
/

COMMIT;
SET ECHO OFF
SPOOL OFF
SET DEFINE ON
PROMPT Logfile of this upgrade is: &fcltlogfile