420: select 'Y' into l_run_ok from all_objects
421: where owner='SYS' and object_type='PACKAGE BODY'
422: and object_name='DBMS_PROFILER';
423:
424: select 'Y' into l_run_ok from all_tables
425: where table_name='PLSQL_PROFILER_RUNS' and rownum =1 and owner like '%';
426: select 'Y' into l_run_ok from all_tables
427: where table_name='PLSQL_PROFILER_UNITS' and rownum =1 and owner like '%';
428: select 'Y' into l_run_ok from all_tables
422: and object_name='DBMS_PROFILER';
423:
424: select 'Y' into l_run_ok from all_tables
425: where table_name='PLSQL_PROFILER_RUNS' and rownum =1 and owner like '%';
426: select 'Y' into l_run_ok from all_tables
427: where table_name='PLSQL_PROFILER_UNITS' and rownum =1 and owner like '%';
428: select 'Y' into l_run_ok from all_tables
429: where table_name='PLSQL_PROFILER_DATA' and rownum =1 and owner like '%';
430: EXCEPTION
424: select 'Y' into l_run_ok from all_tables
425: where table_name='PLSQL_PROFILER_RUNS' and rownum =1 and owner like '%';
426: select 'Y' into l_run_ok from all_tables
427: where table_name='PLSQL_PROFILER_UNITS' and rownum =1 and owner like '%';
428: select 'Y' into l_run_ok from all_tables
429: where table_name='PLSQL_PROFILER_DATA' and rownum =1 and owner like '%';
430: EXCEPTION
431: WHEN NO_DATA_FOUND THEN
432: dlog('Profiler Package and/or Profiler Tables could not be accessed.');