From 638a89f580d964b996c5564f408783f9a067cca0 Mon Sep 17 00:00:00 2001
From: hardya <hardya@248e525c-4dfb-0310-94bc-949c084e9493>
Date: Mon, 10 Mar 2008 13:03:34 +0000
Subject: [PATCH] Make sure the correct FLOWS version is updated.

git-svn-id: http://locode01.ad.dom/svn/WEBMIP/trunk@3904 248e525c-4dfb-0310-94bc-949c084e9493
---
 Schema/SetSubstitution.sql | 21 ++++++++++++++++-----
 1 file changed, 16 insertions(+), 5 deletions(-)

diff --git a/Schema/SetSubstitution.sql b/Schema/SetSubstitution.sql
index 2c2258a..bab413e 100644
--- a/Schema/SetSubstitution.sql
+++ b/Schema/SetSubstitution.sql
@@ -1,4 +1,5 @@
-SET VERIFY OFF
+set verify off
+set serveroutput on
 DECLARE
 
   l_test_load  BOOLEAN := upper('&&2') = 'TEST';
@@ -6,11 +7,11 @@ DECLARE
   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_dev_load   BOOLEAN := upper(nvl('&&2' ,'DEV')) = 'DEV';
   l_sgid       NUMBER;
   l_flow_id    NUMBER;
   l_schema     VARCHAR2(80) DEFAULT upper('&&1');
+  l_substitution varchar2(80);
 BEGIN
 
   IF l_test_load THEN
@@ -25,6 +26,8 @@ BEGIN
     l_flow_id := 800;
   END IF;
 
+  dbms_output.put_line('Flow:'||l_flow_id);
+
   IF l_flow_id IS NOT NULL THEN
   
       SELECT wwv_flow.get_current_flow_sgid(l_flow_id)
@@ -33,10 +36,16 @@ BEGIN
     
       wwv_flow_api.set_security_group_id(l_sgid);
       apex_application.g_flow_id := l_flow_id;
+
+    dbms_output.put_line('Security Group:'||l_sgid);
     
-    UPDATE flows_030000.wwv_flows w
-       SET w.substitution_value_01 = '('||upper('&&2')||'-'||to_char(sysdate,'DD-MON-YYYY HH24:MI')||')'
+    l_substitution := '('||upper('&&2')||'-'||to_char(sysdate,'DD-MON-YYYY HH24:MI')||')';
+
+    UPDATE flows_030100.wwv_flows w
+       SET w.substitution_value_01 = l_substitution
      WHERE security_group_id = l_sgid;
+
+    dbms_output.put_line('SetSubstitution:'||l_substitution);
   
   ELSE
     dbms_output.put_line('Run SetSubstitution: Unexpected parameter value of &&2 received');
@@ -44,4 +53,6 @@ BEGIN
 
 END;
 /
+commit
+/