3:
4: g_options_tbl FA_ASSET_TRACE_PUB.t_options_tbl;
5: g_col_exclusions FA_ASSET_TRACE_PUB.t_excl_tbl;
6: g_tmp_opt_tbl FA_ASSET_TRACE_PUB.t_options_tbl;
7: g_tmpc_tbl FA_ASSET_TRACE_PKG.t_col_tbl;
8: g_tbl_hldr FA_ASSET_TRACE_PKG.t_col_tbl;
9: g_anchor_tbl FA_ASSET_TRACE_PKG.t_col_tbl;
10: g_no_rec_tbl t_asset_tbl;
11: g_tmp_tbl t_asset_tbl;
4: g_options_tbl FA_ASSET_TRACE_PUB.t_options_tbl;
5: g_col_exclusions FA_ASSET_TRACE_PUB.t_excl_tbl;
6: g_tmp_opt_tbl FA_ASSET_TRACE_PUB.t_options_tbl;
7: g_tmpc_tbl FA_ASSET_TRACE_PKG.t_col_tbl;
8: g_tbl_hldr FA_ASSET_TRACE_PKG.t_col_tbl;
9: g_anchor_tbl FA_ASSET_TRACE_PKG.t_col_tbl;
10: g_no_rec_tbl t_asset_tbl;
11: g_tmp_tbl t_asset_tbl;
12: g_output_tbl t_asset_tbl;
5: g_col_exclusions FA_ASSET_TRACE_PUB.t_excl_tbl;
6: g_tmp_opt_tbl FA_ASSET_TRACE_PUB.t_options_tbl;
7: g_tmpc_tbl FA_ASSET_TRACE_PKG.t_col_tbl;
8: g_tbl_hldr FA_ASSET_TRACE_PKG.t_col_tbl;
9: g_anchor_tbl FA_ASSET_TRACE_PKG.t_col_tbl;
10: g_no_rec_tbl t_asset_tbl;
11: g_tmp_tbl t_asset_tbl;
12: g_output_tbl t_asset_tbl;
13: g_req_tbl t_num_tbl;
97: PROCEDURE do_primary IS
98:
99: l_cursor c_stmt;
100: l_primary_tbls FA_ASSET_TRACE_PUB.t_options_tbl;
101: l_col_tbl FA_ASSET_TRACE_PKG.t_col_tbl;
102: l_t_tbl FA_ASSET_TRACE_PKG.t_col_tbl;
103: l_cur_tab_name varchar2(100);
104: l_tmp_tbl VARCHAR2(100):='NOTHING';
105: l_tblcount number;
98:
99: l_cursor c_stmt;
100: l_primary_tbls FA_ASSET_TRACE_PUB.t_options_tbl;
101: l_col_tbl FA_ASSET_TRACE_PKG.t_col_tbl;
102: l_t_tbl FA_ASSET_TRACE_PKG.t_col_tbl;
103: l_cur_tab_name varchar2(100);
104: l_tmp_tbl VARCHAR2(100):='NOTHING';
105: l_tblcount number;
106: l_sel VARCHAR2(2000);
287: -- note: it's not efficient to build the full header or select clause here
288: -- as there are tables that we want to have certain leading columns to identify
289: -- the row.
290: --
291: PROCEDURE build_stmt(p_t_tbl IN FA_ASSET_TRACE_PKG.t_col_tbl,
292: p_col_tbl IN FA_ASSET_TRACE_PKG.t_col_tbl,
293: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)IS
294:
295: l_t_tbl FA_ASSET_TRACE_PKG.t_col_tbl;
288: -- as there are tables that we want to have certain leading columns to identify
289: -- the row.
290: --
291: PROCEDURE build_stmt(p_t_tbl IN FA_ASSET_TRACE_PKG.t_col_tbl,
292: p_col_tbl IN FA_ASSET_TRACE_PKG.t_col_tbl,
293: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)IS
294:
295: l_t_tbl FA_ASSET_TRACE_PKG.t_col_tbl;
296: l_col_tbl FA_ASSET_TRACE_PKG.t_col_tbl;
291: PROCEDURE build_stmt(p_t_tbl IN FA_ASSET_TRACE_PKG.t_col_tbl,
292: p_col_tbl IN FA_ASSET_TRACE_PKG.t_col_tbl,
293: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)IS
294:
295: l_t_tbl FA_ASSET_TRACE_PKG.t_col_tbl;
296: l_col_tbl FA_ASSET_TRACE_PKG.t_col_tbl;
297: l_dummy_tbl FA_ASSET_TRACE_PUB.t_options_tbl;
298: l_tmp varchar2(100);
299: l_tmpt varchar2(100);
292: p_col_tbl IN FA_ASSET_TRACE_PKG.t_col_tbl,
293: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)IS
294:
295: l_t_tbl FA_ASSET_TRACE_PKG.t_col_tbl;
296: l_col_tbl FA_ASSET_TRACE_PKG.t_col_tbl;
297: l_dummy_tbl FA_ASSET_TRACE_PUB.t_options_tbl;
298: l_tmp varchar2(100);
299: l_tmpt varchar2(100);
300: l_tmp_col varchar2(100);
620: l_resp_name VARCHAR2(100);
621: l_stmt VARCHAR2(32767);
622: l_counter NUMBER :=0;
623: l_cursor c_stmt;
624: l_col_tbl FA_ASSET_TRACE_PKG.t_col_tbl;
625: l_t_tbl FA_ASSET_TRACE_PKG.t_col_tbl;
626:
627: l_calling_fn varchar2(40) := 'fa_asset_trace_pvt.get_system_options';
628:
621: l_stmt VARCHAR2(32767);
622: l_counter NUMBER :=0;
623: l_cursor c_stmt;
624: l_col_tbl FA_ASSET_TRACE_PKG.t_col_tbl;
625: l_t_tbl FA_ASSET_TRACE_PKG.t_col_tbl;
626:
627: l_calling_fn varchar2(40) := 'fa_asset_trace_pvt.get_system_options';
628:
629: BEGIN
749: --
750: --parse the desired colum order for tables in options tbl.
751: --
752: PROCEDURE col_order (x_table IN VARCHAR2,
753: x_col_tbl IN OUT NOCOPY FA_ASSET_TRACE_PKG.t_col_tbl,
754: x_t_tbl IN OUT NOCOPY FA_ASSET_TRACE_PKG.t_col_tbl,
755: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) IS
756:
757: l_ord_list varchar2(2000);
750: --parse the desired colum order for tables in options tbl.
751: --
752: PROCEDURE col_order (x_table IN VARCHAR2,
753: x_col_tbl IN OUT NOCOPY FA_ASSET_TRACE_PKG.t_col_tbl,
754: x_t_tbl IN OUT NOCOPY FA_ASSET_TRACE_PKG.t_col_tbl,
755: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) IS
756:
757: l_ord_list varchar2(2000);
758: l_parsed_str varchar2(100);
757: l_ord_list varchar2(2000);
758: l_parsed_str varchar2(100);
759: l_counter number:=0;
760: l_idx NUMBER:=0;
761: l_col_tbl FA_ASSET_TRACE_PKG.t_col_tbl;
762: l_t_tbl FA_ASSET_TRACE_PKG.t_col_tbl;
763: l_found BOOLEAN :=FALSE;
764:
765: l_calling_fn varchar2(40) := 'fa_asset_trace_pvt.col_order';
758: l_parsed_str varchar2(100);
759: l_counter number:=0;
760: l_idx NUMBER:=0;
761: l_col_tbl FA_ASSET_TRACE_PKG.t_col_tbl;
762: l_t_tbl FA_ASSET_TRACE_PKG.t_col_tbl;
763: l_found BOOLEAN :=FALSE;
764:
765: l_calling_fn varchar2(40) := 'fa_asset_trace_pvt.col_order';
766:
1003: raise;
1004:
1005: END fparse_header;
1006: --
1007: PROCEDURE build_anchors (p_t_tbl IN FA_ASSET_TRACE_PKG.t_col_tbl,
1008: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) IS
1009:
1010: l_t_tbl FA_ASSET_TRACE_PKG.t_col_tbl := p_t_tbl;
1011: l_anchor VARCHAR2(32767);
1006: --
1007: PROCEDURE build_anchors (p_t_tbl IN FA_ASSET_TRACE_PKG.t_col_tbl,
1008: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) IS
1009:
1010: l_t_tbl FA_ASSET_TRACE_PKG.t_col_tbl := p_t_tbl;
1011: l_anchor VARCHAR2(32767);
1012: l_tbl VARCHAR2(150);
1013: l_count number:=0;
1014: