1 PACKAGE FA_ASSET_TRACE_PVT AS
2 /* $Header: faxtrcvs.pls 120.0.12010000.3 2008/10/13 20:04:40 hhafid noship $ */
3
4 --Type declarations
5
6 TYPE t_asset_tbl IS TABLE OF VARCHAR2(32767)
7 INDEX BY BINARY_INTEGER;
8
9 TYPE c_stmt IS REF CURSOR;
10
11 Type t_cc_cols_rec IS RECORD (cTbl VARCHAR2(100), cCol VARCHAR2(100));
12 Type t_cc_cols IS TABLE OF t_cc_cols_rec INDEX BY BINARY_INTEGER;
13
14 TYPE t_num_tbl IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
15
16 --req_id => request id
17 --param_column => table column corresponding to the cp param
18 --nValue => parameter value if param is number
19 --cValue => parameter value if param is char.
20 Type t_param_rec IS RECORD (param_column VARCHAR2(50), nValue NUMBER, cValue VARCHAR2(100));
21 Type t_param_tbl IS TABLE OF t_param_rec INDEX BY BINARY_INTEGER;
22
23 --Globals
24 g_param_tbl t_param_tbl; --holds primary/secondary columns driving the trace
25 g_dyn_head VARCHAR2(32767);
26 g_no_header VARCHAR2(1) DEFAULT 'N';
27 g_sel_tbl t_asset_tbl;
28 g_hdr_tbl t_asset_tbl;
29 g_mrc_enabled VARCHAR2(1);
30 g_jx_enabled VARCHAR2(1);
31 g_temp_head VARCHAR2(2000); --holds banner area content
32
33 g_use_utl_file VARCHAR2(1) := 'N';
34 g_outfile UTL_FILE.FILE_TYPE;
35 g_logfile UTL_FILE.FILE_TYPE;
36
37 PROCEDURE initialize_globals (p_opt_tbl IN FA_ASSET_TRACE_PUB.t_options_tbl,
38 p_exc_tbl IN FA_ASSET_TRACE_PUB.t_excl_tbl,
39 p_schema OUT NOCOPY VARCHAR2,
40 p_debug_flag IN BOOLEAN,
41 p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null);
42
43 PROCEDURE do_primary;
44
45 PROCEDURE do_col_exclusions (p_tbl IN VARCHAR2,
46 p_schema IN VARCHAR2,
47 x_stmt OUT NOCOPY VARCHAR2,
48 p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null);
49
50 PROCEDURE exec_sql (p_table IN VARCHAR2,
51 p_sel_clause IN VARCHAR2,
52 p_stmt IN VARCHAR2,
53 p_schema IN VARCHAR2 DEFAULT 'FA',
54 p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null);
55
56 PROCEDURE get_final_sql (p_table IN OUT NOCOPY VARCHAR2,
57 p_sel_clause IN VARCHAR2,
58 x_header OUT NOCOPY VARCHAR2,
59 px_sql IN OUT NOCOPY VARCHAR2,
60 p_schema IN VARCHAR2,
61 p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null);
62
63 PROCEDURE get_options (p_table IN VARCHAR2,
64 p_opt_tbl IN OUT NOCOPY FA_ASSET_TRACE_PUB.t_options_tbl,
65 p_sv_col IN OUT NOCOPY NUMBER,
66 p_mode IN VARCHAR2 default null,
67 p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null);
68
69 PROCEDURE get_system_options (p_sys_opt_tbl IN VARCHAR2,
70 p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null);
71
72 FUNCTION get_param (p_numcol IN number,
73 p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) return VARCHAR2;
74
75 FUNCTION get_tbl_cnt (p_table IN VARCHAR2,
76 p_stmt IN VARCHAR2,
77 p_schema IN VARCHAR2,
78 p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) RETURN BOOLEAN;
79
80 FUNCTION check_column (p_table IN VARCHAR2,
81 p_schema IN VARCHAR2 DEFAULT 'FA',
82 p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) RETURN NUMBER;
83
84 FUNCTION fafsc (p_col IN VARCHAR2,
85 p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) RETURN VARCHAR2;
86
87 FUNCTION fparse_header(p_in_str IN VARCHAR2,
88 p_add_html IN VARCHAR2 DEFAULT 'Y',
89 p_break_size IN NUMBER DEFAULT 14,
90 p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) RETURN VARCHAR2;
91
92 PROCEDURE build_stmt(p_t_tbl IN FA_ASSET_TRACE_PKG.t_col_tbl,
93 p_col_tbl IN FA_ASSET_TRACE_PKG.t_col_tbl,
94 p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null);
95
96 PROCEDURE col_order (x_table IN VARCHAR2,
97 x_col_tbl IN OUT NOCOPY FA_ASSET_TRACE_PKG.t_col_tbl,
98 x_t_tbl IN OUT NOCOPY FA_ASSET_TRACE_PKG.t_col_tbl,
99 p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null);
100
101 PROCEDURE build_anchors (p_t_tbl IN FA_ASSET_TRACE_PKG.t_col_tbl,
102 p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null);
103
104 PROCEDURE save_output (p_calling_prog IN VARCHAR2, --i.e. FATRACE
105 p_use_utl_file IN VARCHAR2,
106 p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null);
107
108 PROCEDURE log(p_calling_fn IN VARCHAR2,
109 p_msg IN VARCHAR2 default null,
110 p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null);
111
112 PROCEDURE ocfile (p_handle IN OUT NOCOPY utl_file.file_type,
113 p_file IN VARCHAR2,
114 p_mode IN VARCHAR2); --C(lose) or O(pen)
115
116 END FA_ASSET_TRACE_PVT;