101: l_total_occur INTEGER;
102: l_total_time INTEGER;
103: l_min_time INTEGER;
104: l_max_time INTEGER;
105: c_chr CONSTANT VARCHAR2(9) := xla_environment_pkg.g_chr_newline;
106: l_table_not_exist EXCEPTION;
107:
108: PRAGMA exception_init (l_table_not_exist , -0942);
109:
114: --
115: -- Get the runid
116: --
117: l_statement_runid := 'SELECT runid '
118: || xla_environment_pkg.g_chr_newline
119: || 'FROM plsql_profiler_runs '
120: || xla_environment_pkg.g_chr_newline
121: || 'WHERE run_comment = '''||xla_utility_pkg.g_unique_location||'''';
122:
116: --
117: l_statement_runid := 'SELECT runid '
118: || xla_environment_pkg.g_chr_newline
119: || 'FROM plsql_profiler_runs '
120: || xla_environment_pkg.g_chr_newline
121: || 'WHERE run_comment = '''||xla_utility_pkg.g_unique_location||'''';
122:
123: -- xla_utility_pkg.trace(l_statement_runid , 50);
124:
147: --
148: -- Prepare to fetch accross all units
149: --
150: l_statement_unit := 'SELECT unit_type '
151: || xla_environment_pkg.g_chr_newline
152: || ' ,unit_name '
153: || xla_environment_pkg.g_chr_newline
154: || ' ,unit_number '
155: || xla_environment_pkg.g_chr_newline
149: --
150: l_statement_unit := 'SELECT unit_type '
151: || xla_environment_pkg.g_chr_newline
152: || ' ,unit_name '
153: || xla_environment_pkg.g_chr_newline
154: || ' ,unit_number '
155: || xla_environment_pkg.g_chr_newline
156: || 'FROM plsql_profiler_units '
157: || xla_environment_pkg.g_chr_newline
151: || xla_environment_pkg.g_chr_newline
152: || ' ,unit_name '
153: || xla_environment_pkg.g_chr_newline
154: || ' ,unit_number '
155: || xla_environment_pkg.g_chr_newline
156: || 'FROM plsql_profiler_units '
157: || xla_environment_pkg.g_chr_newline
158: || 'WHERE runid = '||l_runid||' '
159: || xla_environment_pkg.g_chr_newline
153: || xla_environment_pkg.g_chr_newline
154: || ' ,unit_number '
155: || xla_environment_pkg.g_chr_newline
156: || 'FROM plsql_profiler_units '
157: || xla_environment_pkg.g_chr_newline
158: || 'WHERE runid = '||l_runid||' '
159: || xla_environment_pkg.g_chr_newline
160: || ' AND unit_name NOT IN (''DBMS_PROFILER'' '
161: || xla_environment_pkg.g_chr_newline
155: || xla_environment_pkg.g_chr_newline
156: || 'FROM plsql_profiler_units '
157: || xla_environment_pkg.g_chr_newline
158: || 'WHERE runid = '||l_runid||' '
159: || xla_environment_pkg.g_chr_newline
160: || ' AND unit_name NOT IN (''DBMS_PROFILER'' '
161: || xla_environment_pkg.g_chr_newline
162: || ' ,''
163:
157: || xla_environment_pkg.g_chr_newline
158: || 'WHERE runid = '||l_runid||' '
159: || xla_environment_pkg.g_chr_newline
160: || ' AND unit_name NOT IN (''DBMS_PROFILER'' '
161: || xla_environment_pkg.g_chr_newline
162: || ' ,''
163:
164: -- xla_utility_pkg.trace(l_statement_unit , 50);
165:
262:
263: xla_utility_pkg.trace ('! '
264: || SUBSTR(
265: RPAD(
266: REPLACE(l_text ,xla_environment_pkg.g_chr_newline,''),75,' '),1,75)
267: || ' '
268: || TO_CHAR(l_total_occur,'999999')
269: || TO_CHAR(l_total_time/1000000000 ,'99999.9999999')
270: || TO_CHAR(l_min_time /1000000000 ,'99999.9999999')