1: PACKAGE BODY xla_utility_pkg AS
2: /* $Header: xlacmutl.pkb 120.11 2005/10/22 00:06:21 awan ship $ */
3: /*======================================================================+
4: | Copyright (c) 1995-2002 Oracle Corporation |
5: | Redwood Shores, CA, USA |
5: | Redwood Shores, CA, USA |
6: | All rights reserved. |
7: +=======================================================================+
8: | PACKAGE NAME |
9: | xla_utility_pkg |
10: | |
11: | PACKAGE NAME |
12: | xla_utility_pkg |
13: | |
8: | PACKAGE NAME |
9: | xla_utility_pkg |
10: | |
11: | PACKAGE NAME |
12: | xla_utility_pkg |
13: | |
14: | DESCRIPTION |
15: | XLA Utility Package |
16: | |
33: | xla_debug_timeout in seconds (1..n) |
34: | |
35: | Usage from SQL*Plus: |
36: | BEGIN |
37: | xla_utility_pkg.activate('OUTPUT|FILE',location); |
38: |
39: | xla_utility_pkg.deactivate('OUTPUT|FILE',location); |
40: | END; |
41: | |
35: | Usage from SQL*Plus: |
36: | BEGIN |
37: | xla_utility_pkg.activate('OUTPUT|FILE',location); |
38: |
39: | xla_utility_pkg.deactivate('OUTPUT|FILE',location); |
40: | END; |
41: | |
42: | PL/SQL coding standard: |
43: | BEGIN |
40: | END; |
41: | |
42: | PL/SQL coding standard: |
43: | BEGIN |
44: | xla_utility_pkg.activate(mode,location) |
45: | .../... |
46: | xla_utility_pkg.trace('String',trace_level); |
47: | xla_utility_pkg.trace('String',trace_level); |
48: | .../... |
42: | PL/SQL coding standard: |
43: | BEGIN |
44: | xla_utility_pkg.activate(mode,location) |
45: | .../... |
46: | xla_utility_pkg.trace('String',trace_level); |
47: | xla_utility_pkg.trace('String',trace_level); |
48: | .../... |
49: | xla_utility_pkg.deactivate(location); |
50: | END; |
43: | BEGIN |
44: | xla_utility_pkg.activate(mode,location) |
45: | .../... |
46: | xla_utility_pkg.trace('String',trace_level); |
47: | xla_utility_pkg.trace('String',trace_level); |
48: | .../... |
49: | xla_utility_pkg.deactivate(location); |
50: | END; |
51: | |
45: | .../... |
46: | xla_utility_pkg.trace('String',trace_level); |
47: | xla_utility_pkg.trace('String',trace_level); |
48: | .../... |
49: | xla_utility_pkg.deactivate(location); |
50: | END; |
51: | |
52: | |
53: | B] SRS Output and logfile facilities |
54: | |
55: | Example of calls: |
56: | BEGIN |
57: | .../... |
58: | xla_utility_pkg.print_outputfile(msg); |
59: | xla_utility_pkg.print_logfile(msg); |
60: | .../... |
61: | END; |
62: | |
55: | Example of calls: |
56: | BEGIN |
57: | .../... |
58: | xla_utility_pkg.print_outputfile(msg); |
59: | xla_utility_pkg.print_logfile(msg); |
60: | .../... |
61: | END; |
62: | |
63: | |
64: | C] Statistics |
65: | |
66: | Example of calls: |
67: | BEGIN |
68: | xla_utility_pkg.activate_stat; |
69: |
70: | xla_utility_pkg.deactivate_stat; |
71: | END; |
72: | |
66: | Example of calls: |
67: | BEGIN |
68: | xla_utility_pkg.activate_stat; |
69: |
70: | xla_utility_pkg.deactivate_stat; |
71: | END; |
72: | |
73: | |
74: | D] SQL Trace facilities |
75: | |
76: | Example of calls: |
77: | BEGIN |
78: | .../... |
79: | xla_utility_pkg.set_sqltrace_on; |
80: | .../... |
81: | xla_utility_pkg.set_sqltrace_off; |
82: | .../... |
83: | END; |
77: | BEGIN |
78: | .../... |
79: | xla_utility_pkg.set_sqltrace_on; |
80: | .../... |
81: | xla_utility_pkg.set_sqltrace_off; |
82: | .../... |
83: | END; |
84: | |
85: | DEPENDENCIES |
453: RAISE;
454: WHEN OTHERS THEN
455: g_srs_output_enable := 'N';
456: xla_exceptions_pkg.raise_message
457: (p_location => 'xla_utility_pkg.open_srs_files');
458: END open_srs_files;
459:
460:
461: /*======================================================================+
486:
487: EXCEPTION
488: WHEN OTHERS THEN
489: xla_exceptions_pkg.raise_message
490: (p_location => 'xla_utility_pkg.get_root_dir');
491: END get_root_dir;
492:
493:
494: /*======================================================================+
585: ,'FILENAME' , g_file_name
586: ,'DIRECTORY' , g_file_directory);
587: WHEN OTHERS THEN
588: xla_exceptions_pkg.raise_message
589: (p_location => 'xla_utility_pkg.open_file');
590: END open_file;
591:
592:
593: /*======================================================================+
641: ,'FILENAME' , g_file_name
642: ,'DIRECTORY' , g_file_directory);
643: WHEN OTHERS THEN
644: xla_exceptions_pkg.raise_message
645: (p_location => 'xla_utility_pkg.close_file');
646: END close_file;
647:
648:
649: /*======================================================================+
811: RAISE;
812: WHEN OTHERS THEN
813: g_srs_output_enable := 'N';
814: xla_exceptions_pkg.raise_message
815: (p_location => 'xla_utility_pkg.print_fndfile');
816: END print_fndfile;
817:
818:
819: /*======================================================================+
843: WHEN xla_exceptions_pkg.application_exception THEN
844: RAISE;
845: WHEN OTHERS THEN
846: xla_exceptions_pkg.raise_message
847: (p_location => 'xla_utility_pkg.print_aflog');
848: END print_aflog;
849:
850:
851: /*======================================================================+
908: ,'DIRECTORY' , g_file_directory);
909: WHEN OTHERS THEN
910: g_trace := 'N';
911: xla_exceptions_pkg.raise_message
912: (p_location => 'xla_utility_pkg.print_file');
913: END print_file;
914:
915:
916: /*======================================================================+
961: WHEN xla_exceptions_pkg.application_exception THEN
962: RAISE;
963: WHEN OTHERS THEN
964: xla_exceptions_pkg.raise_message
965: (p_location => 'xla_utility_pkg.send_pipe');
966: END send_pipe;
967:
968:
969: /*======================================================================+
1058: RAISE;
1059: WHEN OTHERS THEN
1060: g_trace := 'N';
1061: xla_exceptions_pkg.raise_message
1062: (p_location => 'xla_utility_pkg.stop_tracer');
1063: END stop_tracer;
1064:
1065:
1066: /*======================================================================+
1566: ELSE
1567: xla_exceptions_pkg.raise_message
1568: ('XLA' ,'XLA_INTERNAL_ERROR'
1569: ,'ERROR' ,'Invalid option '||p_option
1570: ,'LOCATION' ,'xla_utility_pkg.set_option');
1571: END IF;
1572: END set_option;
1573:
1574:
1788: ELSE
1789: xla_exceptions_pkg.raise_message
1790: ('XLA' ,'XLA_INTERNAL_ERROR'
1791: ,'ERROR' ,'Invalid option '||p_option
1792: ,'LOCATION' ,'xla_utility_pkg.get_session_info');
1793: END IF;
1794: END get_session_info;
1795:
1796:
1817: ELSE
1818: xla_exceptions_pkg.raise_message
1819: ('XLA' ,'XLA_INTERNAL_ERROR'
1820: ,'ERROR' ,'Invalid option '||p_option
1821: ,'LOCATION' ,'xla_utility_pkg.get_session_info');
1822: END IF;
1823: END;
1824:
1825:
2071: ELSE
2072: xla_exceptions_pkg.raise_message
2073: ('XLA' ,'XLA_INTERNAL_ERROR'
2074: ,'ERROR' ,'Invalid option '||p_option
2075: ,'LOCATION' ,'xla_utility_pkg.set_option');
2076: END IF;
2077: END get_stat_info;
2078:
2079:
2351:
2352: BEGIN
2353: reset;
2354:
2355: END xla_utility_pkg;