dbcb349c45
Add processing to make it clearer which application build has been produced and to link the schema with the correct application (AssociateSchema.sql, SetSubstitution.sql, bulk_load.sql and InstallMIP.cmd) Changes to schema: METERS now have 'MESC_CODE'. Associated changes in the bulk_load routines and initial changes to mip_quotation.pck (needs confirmation testing). git-svn-id: http://locode01.ad.dom/svn/WEBMIP/trunk@3830 248e525c-4dfb-0310-94bc-949c084e9493
48 lines
1.3 KiB
SQL
48 lines
1.3 KiB
SQL
SET VERIFY OFF
|
|
DECLARE
|
|
|
|
l_test_load BOOLEAN := upper('&&2') = 'TEST';
|
|
l_fat_load BOOLEAN := upper('&&2') = 'FAT';
|
|
l_uat_load BOOLEAN := upper('&&2') = 'UAT';
|
|
l_live_load BOOLEAN := upper('&&2') = 'LIVE';
|
|
l_train_load BOOLEAN := upper('&&2') = 'TRAIN';
|
|
l_dev_load BOOLEAN := upper(nvl('&&2'
|
|
,'DEV')) = 'DEV';
|
|
l_sgid NUMBER;
|
|
l_flow_id NUMBER;
|
|
l_schema VARCHAR2(80) DEFAULT upper('&&1');
|
|
BEGIN
|
|
|
|
IF l_test_load THEN
|
|
l_flow_id := 102;
|
|
ELSIF l_fat_load THEN
|
|
l_flow_id := 200;
|
|
ELSIF l_dev_load THEN
|
|
l_flow_id := 155;
|
|
ELSIF l_uat_load THEN
|
|
l_flow_id := 400;
|
|
ELSIF l_train_load THEN
|
|
l_flow_id := 800;
|
|
END IF;
|
|
|
|
IF l_flow_id IS NOT NULL THEN
|
|
|
|
SELECT wwv_flow.get_current_flow_sgid(l_flow_id)
|
|
INTO l_sgid
|
|
FROM dual;
|
|
|
|
wwv_flow_api.set_security_group_id(l_sgid);
|
|
apex_application.g_flow_id := l_flow_id;
|
|
|
|
UPDATE flows_030000.wwv_flows w
|
|
SET w.substitution_value_01 = '('||upper('&&2')||'-'||to_char(sysdate,'DD-MON-YYYY HH24:MI')||')'
|
|
WHERE security_group_id = l_sgid;
|
|
|
|
ELSE
|
|
dbms_output.put_line('Run SetSubstitution: Unexpected parameter value of &&2 received');
|
|
END IF;
|
|
|
|
END;
|
|
/
|
|
|