Include ADDITIONAL_ITEM 'SELFPURGING' to cover instances of 'purging' where the user has selected 'NO' - i.e. the customer will carry out any required purging. Used to simplify CAVEAT text selection.

git-svn-id: http://locode01.ad.dom/svn/WEBMIP/trunk@13258 248e525c-4dfb-0310-94bc-949c084e9493
This commit is contained in:
andrew.hardy
2009-11-03 15:08:58 +00:00
parent b9a3a321f9
commit 1110407d42
2 changed files with 352 additions and 211 deletions

View File

@@ -1,35 +1,40 @@
DECLARE
l_test_load BOOLEAN := upper('&&1') = 'TEST';
l_fat_load BOOLEAN := upper('&&1') = 'FAT';
l_uat_load BOOLEAN := upper('&&1') = 'UAT';
l_live_load BOOLEAN := upper('&&1') = 'LIVE';
l_train_load BOOLEAN := upper('&&1') = 'TRAIN';
l_dev_load BOOLEAN := upper(nvl('&&1','DEV')) = 'DEV';
REM $Id$
BEGIN
dbms_output.enable;
dbms_output.put_line('UpgradeBulkLoad: Add SELFPURGING to ADDITIONAL_ITEMS');
IF l_test_load THEN
mip_bulk_load.g_flow_id := 102;
ELSIF l_fat_load THEN
mip_bulk_load.g_flow_id := 200;
ELSIF l_dev_load THEN
mip_bulk_load.g_flow_id := 155;
ELSIF l_uat_load THEN
mip_bulk_load.g_flow_id := 400;
ELSIF l_train_load THEN
mip_bulk_load.g_flow_id := 800;
END IF;
UPDATE additional_items
SET description = 'No Purging Required'
,lead_time = 0
WHERE code = 'SELFPURGING';
IF mip_bulk_load.g_flow_id IS NOT NULL THEN
dbms_output.put_line('UpgradeBulkLoad: Upgrade Bulk Load Not Required');
--mip_bulk_load.init;
--mip_bulk_load.load_caveats;
--mip_bulk_load.report_err;
IF SQL%ROWCOUNT <> 0 THEN
dbms_output.put_line('UpgradeBulkLoad: - Done (Update)');
ELSE
dbms_output.put_line('UpgradeBulkLoad: Unexpected parameter value of &&1 received');
INSERT INTO additional_items
(code
,description
,lead_time)
VALUES
('SELFPURGING'
,'No Purging Required'
,0);
dbms_output.put_line('UpgradeBulkLoad: - Done (Insert)');
END IF;
dbms_output.put_line('UpgradeBulkLoad: Add SELFPURGING to CAVEAT_TEXTS');
UPDATE caveat_texts
SET adit_code = 'SELFPURGING'
,condition = 'NULL'
WHERE text LIKE 'Where purging of downstream%';
IF SQL%ROWCOUNT <> 0 THEN
dbms_output.put_line('UpgradeBulkLoad: - Done (Update)');
ELSE
dbms_output.put_line('UpgradeBulkLoad: - Not Done (No Caveats Found)');
END IF;
END;
/
exit
/

File diff suppressed because it is too large Load Diff