121: || 'WHERE run_comment = '''||xla_utility_pkg.g_unique_location||'''';
122:
123: -- xla_utility_pkg.trace(l_statement_runid , 50);
124:
125: l_cr_runid := dbms_sql.open_cursor;
126:
127: dbms_sql.parse
128: (l_cr_runid
129: ,l_statement_runid
123: -- xla_utility_pkg.trace(l_statement_runid , 50);
124:
125: l_cr_runid := dbms_sql.open_cursor;
126:
127: dbms_sql.parse
128: (l_cr_runid
129: ,l_statement_runid
130: ,dbms_sql.native);
131:
126:
127: dbms_sql.parse
128: (l_cr_runid
129: ,l_statement_runid
130: ,dbms_sql.native);
131:
132: dbms_sql.define_column
133: (l_cr_runid
134: ,1
128: (l_cr_runid
129: ,l_statement_runid
130: ,dbms_sql.native);
131:
132: dbms_sql.define_column
133: (l_cr_runid
134: ,1
135: ,l_runid);
136:
133: (l_cr_runid
134: ,1
135: ,l_runid);
136:
137: l_rows_runid := dbms_sql.execute_and_fetch(l_cr_runid);
138:
139: dbms_sql.column_value
140: (l_cr_runid
141: ,1
135: ,l_runid);
136:
137: l_rows_runid := dbms_sql.execute_and_fetch(l_cr_runid);
138:
139: dbms_sql.column_value
140: (l_cr_runid
141: ,1
142: ,l_runid);
143:
140: (l_cr_runid
141: ,1
142: ,l_runid);
143:
144: dbms_sql.close_cursor(l_cr_runid);
145:
146:
147: --
148: -- Prepare to fetch accross all units
162: || ' ,''
163:
164: -- xla_utility_pkg.trace(l_statement_unit , 50);
165:
166: l_cr_unit := dbms_sql.open_cursor;
167:
168: dbms_sql.parse
169: (l_cr_unit
170: ,l_statement_unit
164: -- xla_utility_pkg.trace(l_statement_unit , 50);
165:
166: l_cr_unit := dbms_sql.open_cursor;
167:
168: dbms_sql.parse
169: (l_cr_unit
170: ,l_statement_unit
171: ,dbms_sql.native);
172:
167:
168: dbms_sql.parse
169: (l_cr_unit
170: ,l_statement_unit
171: ,dbms_sql.native);
172:
173: dbms_sql.define_column
174: (l_cr_unit
175: ,1
169: (l_cr_unit
170: ,l_statement_unit
171: ,dbms_sql.native);
172:
173: dbms_sql.define_column
174: (l_cr_unit
175: ,1
176: ,l_unit_type
177: ,255);
175: ,1
176: ,l_unit_type
177: ,255);
178:
179: dbms_sql.define_column
180: (l_cr_unit
181: ,2
182: ,l_unit_name
183: ,255);
181: ,2
182: ,l_unit_name
183: ,255);
184:
185: dbms_sql.define_column
186: (l_cr_unit
187: ,3
188: ,l_unit_number);
189:
186: (l_cr_unit
187: ,3
188: ,l_unit_number);
189:
190: l_rows_unit := dbms_sql.execute(l_cr_unit);
191:
192: --
193: -- Fetch accross all units
194: --
193: -- Fetch accross all units
194: --
195:
196: LOOP
197: IF dbms_sql.fetch_rows (l_cr_unit) >0 THEN
198: dbms_sql.column_value(l_cr_unit,1,l_unit_type);
199: dbms_sql.column_value(l_cr_unit,2,l_unit_name);
200: dbms_sql.column_value(l_cr_unit,3,l_unit_number);
201:
194: --
195:
196: LOOP
197: IF dbms_sql.fetch_rows (l_cr_unit) >0 THEN
198: dbms_sql.column_value(l_cr_unit,1,l_unit_type);
199: dbms_sql.column_value(l_cr_unit,2,l_unit_name);
200: dbms_sql.column_value(l_cr_unit,3,l_unit_number);
201:
202: xla_utility_pkg.trace(l_unit_name ,-10);
195:
196: LOOP
197: IF dbms_sql.fetch_rows (l_cr_unit) >0 THEN
198: dbms_sql.column_value(l_cr_unit,1,l_unit_type);
199: dbms_sql.column_value(l_cr_unit,2,l_unit_name);
200: dbms_sql.column_value(l_cr_unit,3,l_unit_number);
201:
202: xla_utility_pkg.trace(l_unit_name ,-10);
203: xla_utility_pkg.trace('' ,-10);
196: LOOP
197: IF dbms_sql.fetch_rows (l_cr_unit) >0 THEN
198: dbms_sql.column_value(l_cr_unit,1,l_unit_type);
199: dbms_sql.column_value(l_cr_unit,2,l_unit_name);
200: dbms_sql.column_value(l_cr_unit,3,l_unit_number);
201:
202: xla_utility_pkg.trace(l_unit_name ,-10);
203: xla_utility_pkg.trace('' ,-10);
204:
216: || c_chr || ' AND d.line# (+) = s.line '
217: || c_chr || 'ORDER BY '
218: || c_chr || ' s.line';
219:
220: l_cr_data := dbms_sql.open_cursor;
221:
222: dbms_sql.parse (l_cr_data
223: ,l_statement_data
224: ,dbms_sql.native);
218: || c_chr || ' s.line';
219:
220: l_cr_data := dbms_sql.open_cursor;
221:
222: dbms_sql.parse (l_cr_data
223: ,l_statement_data
224: ,dbms_sql.native);
225:
226: dbms_sql.define_column
220: l_cr_data := dbms_sql.open_cursor;
221:
222: dbms_sql.parse (l_cr_data
223: ,l_statement_data
224: ,dbms_sql.native);
225:
226: dbms_sql.define_column
227: (l_cr_data
228: ,1
222: dbms_sql.parse (l_cr_data
223: ,l_statement_data
224: ,dbms_sql.native);
225:
226: dbms_sql.define_column
227: (l_cr_data
228: ,1
229: ,l_text
230: ,255);
228: ,1
229: ,l_text
230: ,255);
231:
232: dbms_sql.define_column
233: (l_cr_data
234: ,2
235: ,l_total_occur);
236:
233: (l_cr_data
234: ,2
235: ,l_total_occur);
236:
237: dbms_sql.define_column
238: (l_cr_data
239: ,3
240: ,l_total_time);
241:
238: (l_cr_data
239: ,3
240: ,l_total_time);
241:
242: dbms_sql.define_column
243: (l_cr_data
244: ,4
245: ,l_min_time);
246:
243: (l_cr_data
244: ,4
245: ,l_min_time);
246:
247: dbms_sql.define_column
248: (l_cr_data
249: ,5
250: ,l_max_time);
251:
248: (l_cr_data
249: ,5
250: ,l_max_time);
251:
252: l_rows_data := dbms_sql.execute(l_cr_data);
253:
254: LOOP
255: IF dbms_sql.fetch_rows (l_cr_data) >0 THEN
256:
251:
252: l_rows_data := dbms_sql.execute(l_cr_data);
253:
254: LOOP
255: IF dbms_sql.fetch_rows (l_cr_data) >0 THEN
256:
257: dbms_sql.column_value(l_cr_data, 1,l_text );
258: dbms_sql.column_value(l_cr_data, 2,l_total_occur );
259: dbms_sql.column_value(l_cr_data, 3,l_total_time );
253:
254: LOOP
255: IF dbms_sql.fetch_rows (l_cr_data) >0 THEN
256:
257: dbms_sql.column_value(l_cr_data, 1,l_text );
258: dbms_sql.column_value(l_cr_data, 2,l_total_occur );
259: dbms_sql.column_value(l_cr_data, 3,l_total_time );
260: dbms_sql.column_value(l_cr_data, 4,l_min_time );
261: dbms_sql.column_value(l_cr_data, 5,l_max_time );
254: LOOP
255: IF dbms_sql.fetch_rows (l_cr_data) >0 THEN
256:
257: dbms_sql.column_value(l_cr_data, 1,l_text );
258: dbms_sql.column_value(l_cr_data, 2,l_total_occur );
259: dbms_sql.column_value(l_cr_data, 3,l_total_time );
260: dbms_sql.column_value(l_cr_data, 4,l_min_time );
261: dbms_sql.column_value(l_cr_data, 5,l_max_time );
262:
255: IF dbms_sql.fetch_rows (l_cr_data) >0 THEN
256:
257: dbms_sql.column_value(l_cr_data, 1,l_text );
258: dbms_sql.column_value(l_cr_data, 2,l_total_occur );
259: dbms_sql.column_value(l_cr_data, 3,l_total_time );
260: dbms_sql.column_value(l_cr_data, 4,l_min_time );
261: dbms_sql.column_value(l_cr_data, 5,l_max_time );
262:
263: xla_utility_pkg.trace ('! '
256:
257: dbms_sql.column_value(l_cr_data, 1,l_text );
258: dbms_sql.column_value(l_cr_data, 2,l_total_occur );
259: dbms_sql.column_value(l_cr_data, 3,l_total_time );
260: dbms_sql.column_value(l_cr_data, 4,l_min_time );
261: dbms_sql.column_value(l_cr_data, 5,l_max_time );
262:
263: xla_utility_pkg.trace ('! '
264: || SUBSTR(
257: dbms_sql.column_value(l_cr_data, 1,l_text );
258: dbms_sql.column_value(l_cr_data, 2,l_total_occur );
259: dbms_sql.column_value(l_cr_data, 3,l_total_time );
260: dbms_sql.column_value(l_cr_data, 4,l_min_time );
261: dbms_sql.column_value(l_cr_data, 5,l_max_time );
262:
263: xla_utility_pkg.trace ('! '
264: || SUBSTR(
265: RPAD(
273: EXIT;
274: END IF;
275: END LOOP;
276:
277: dbms_sql.close_cursor(l_cr_data);
278:
279: ELSE
280: EXIT;
281: END IF;
281: END IF;
282:
283: END LOOP;
284:
285: dbms_sql.close_cursor(l_cr_unit);
286:
287: EXCEPTION
288: WHEN l_table_not_exist THEN
289: xla_exceptions_pkg.raise_message