Attempt to set the system name during bulk_load.sql.

Changes to constraint messages in comsg.ctl.
Attempt to associate the new schema with the workspace in AssociateSchema.sql.
Change schema contract sizes to 35 characters
Add a DEBUG parameter to the Ruby constants.rb

git-svn-id: http://locode01.ad.dom/svn/WEBMIP/trunk@3759 248e525c-4dfb-0310-94bc-949c084e9493

Schema/AssociateSchema.sql

@@ -0,0 +1,59 @@
+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
+  
+    BEGIN
+      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;
+    
+      INSERT INTO flows_030000.wwv_flow_company_schemas
+        (security_group_id
+        ,SCHEMA)
+      VALUES
+        (l_sgid
+        ,l_schema);
+    EXCEPTION
+      WHEN dup_val_on_index THEN
+        NULL;
+    END;
+  
+    UPDATE flows_030000.wwv_flows w
+       SET w.owner = l_schema
+     WHERE security_group_id = l_sgid;
+  
+  ELSE
+    dbms_output.put_line('Run associate_schema: Unexpected parameter value of &&2 received');
+  END IF;
+
+END;
+/
+