[Home] [Help]
12: -- of the global_view procedure, so it can handle view definitions
13: -- longer than 32K, the previous hard limit (because of PL/SQL varchar2
14: -- string limit). Now, the DBMS_SQL.Varchar2s type is used for storing
15: -- the view definition. This is a table and is the data type used by
16: -- AD_DDL.DO_ARRAY_DDL.
17: --
18: -- April 22, 1998. bso
19: --
20:
84:
85:
86: PROCEDURE exec_ddl_table(schema in varchar2, shortname in varchar2,
87: cmd in integer, statement in DBMS_SQL.varchar2s, name in varchar2) IS
88: -- Execute a data definition statement by using the AD_DDL.DO_ARRAY_DDL
89: -- function. See Bug 574078. Release 10.7 requires this patch to work.
90: -- bso
91:
92: --
92: --
93: -- Bug 3756235
94: -- This is a performance fix. A global view usually has tens of
95: -- thousands of "statements" because each statement(i) is a short
96: -- string. Thus, we have been calling ad_ddl.build_statement a
97: -- lot. The no. of calls can be reduced 10-fold if we concat the
98: -- shorter strings into a long one before invoking the API.
99: --
100: -- 255 is the current max size of build_statement's input param.
125: -- vvs BUG 4129987 Wed Mar 2 04:48:07 PST 2005
126: --
127: IF nvl(lengthb(s), 0) + nvl(lengthb(statement(i)), 0) + 1 > max_size THEN
128: n := n + 1;
129: AD_DDL.build_statement(s, n);
130: s := '';
131: END IF;
132:
133: s := s || statement(i) || ' ';
138: -- we will always have a final "s" to process here.
139: -- bso Sat Jul 24 16:17:15 PDT 2004
140: --
141: n := n + 1;
142: AD_DDL.build_statement(s, n);
143:
144: AD_DDL.do_array_ddl(schema, shortname, cmd, 1, n, name);
145: END;
146:
140: --
141: n := n + 1;
142: AD_DDL.build_statement(s, n);
143:
144: AD_DDL.do_array_ddl(schema, shortname, cmd, 1, n, name);
145: END;
146:
147:
148: FUNCTION trans(name VARCHAR2) RETURN VARCHAR2 IS
161:
162:
163: PROCEDURE drop_view(x VARCHAR2) IS
164: BEGIN
165: ad_ddl.do_ddl(g_schema, 'QA', ad_ddl.drop_view,
166: 'DROP VIEW "' || upper(x) || '"', x);
167: EXCEPTION WHEN OTHERS THEN
168: NULL;
169: END drop_view;
621: create_clause(v_sql_table, v_from_table, 'FROM');
622: create_clause(v_sql_table, v_where_table, 'WHERE');
623:
624: --
625: -- Find apps schema info. To be used in ad_ddl calls.
626: --
627: exec_ddl_table(g_schema, 'QA', AD_DDL.create_view, v_sql_table, x_view_name);
628:
629: END global_view;
623:
624: --
625: -- Find apps schema info. To be used in ad_ddl calls.
626: --
627: exec_ddl_table(g_schema, 'QA', AD_DDL.create_view, v_sql_table, x_view_name);
628:
629: END global_view;
630:
631: --
1227: -- Building the final query for the deref view
1228: --
1229: v_deref_view_final := v_deref_view_create || v_select || v_from || v_deref_view_where;
1230:
1231: ad_ddl.do_ddl(g_schema, 'QA', ad_ddl.create_view, v_final,
1232: x_view_name);
1233:
1234: --
1235: -- bug 6350575
1235: -- bug 6350575
1236: -- 12.1 QWB Usability Improvements
1237: -- Creating the deref view
1238: --
1239: ad_ddl.do_ddl(g_schema, 'QA', ad_ddl.create_view, v_deref_view_final,
1240: v_deref_view_name);
1241:
1242: --
1243: -- bug 12596623
1243: -- bug 12596623
1244: -- Create the export view
1245: --
1246: l_export_view_final := 'CREATE OR REPLACE FORCE VIEW QA_'||x_plan_id||'_EXP_V AS '||get_export_view_sql(x_plan_id);
1247: ad_ddl.do_ddl(g_schema, 'QA', ad_ddl.create_view, l_export_view_final, 'QA_'||x_plan_id||'_EXP_V');
1248:
1249: --
1250: -- bug 6350575
1251: -- 12.1 QWB Usability Improvements
1380: END LOOP;
1381:
1382: v_select := v_select || ' FROM QA_RESULTS_INTERFACE';
1383:
1384: ad_ddl.do_ddl(g_schema, 'QA', ad_ddl.create_view, v_select,
1385: x_view_name);
1386:
1387: --
1388: -- bug 7409976