[Home] [Help]
PACKAGE: APPS.FEM_COMP_DIM_MEMBER_LOADER_PKG
Source
1 PACKAGE FEM_COMP_DIM_MEMBER_LOADER_PKG AUTHID CURRENT_USER AS
2 /* $Header: femcompdimldrs.pls 120.1 2006/09/07 12:26:23 navekuma noship $ */
3
4 ---------------------------------------------
5 -- Package Constants
6 ---------------------------------------------
7 c_block CONSTANT VARCHAR2(80) := 'fem.plsql.fem_comp_dim_member_loader_pkg';
8 c_fem CONSTANT VARCHAR2(3) := 'FEM';
9 c_user_id CONSTANT NUMBER := FND_GLOBAL.USER_ID;
10 c_object_version_number CONSTANT NUMBER := 1;
11 c_enabled_flag VARCHAR2(1) := 'Y';
12 c_personal_flag VARCHAR2(1) := 'Y';
13 c_read_only_flag VARCHAR2(1) := 'Y';
14
15 c_false CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
16 c_true CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
17 c_success CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
18 c_error CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
19 c_unexp CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
20 c_api_version CONSTANT NUMBER := 1.0;
21 c_fetch_limit CONSTANT NUMBER := 99999;
22
23
24 c_log_level_1 CONSTANT NUMBER := fnd_log.level_statement;
25 c_log_level_2 CONSTANT NUMBER := fnd_log.level_procedure;
26 c_log_level_3 CONSTANT NUMBER := fnd_log.level_event;
27 c_log_level_4 CONSTANT NUMBER := fnd_log.level_exception;
28 c_log_level_5 CONSTANT NUMBER := fnd_log.level_error;
29 c_log_level_6 CONSTANT NUMBER := fnd_log.level_unexpected;
30
31 -- Engine SQL for Composite Dimension Loader
32 g_select_statement LONG;
33
34 ---------------------------------------------
35 -- Message Constants
36 ---------------------------------------------
37
38 G_NO_STRUCTURE_DEFINED VARCHAR2(30) := 'FEM_DIM_NO_STRUCTURE_DEFINED';
39
40 ---------------------------------------------
41 -- Declare Exceptions --
42 ---------------------------------------------
43
44 e_no_structure_defined EXCEPTION;
45 e_terminate EXCEPTION;
46
47 ---------------------------------------------
48 -- Package Types
49 ---------------------------------------------
50 TYPE rowid_type IS TABLE OF ROWID INDEX BY BINARY_INTEGER;
51 t_rowid rowid_type;
52
53 TYPE date_type IS TABLE OF DATE INDEX BY BINARY_INTEGER;
54 TYPE varchar2_std_type IS TABLE OF VARCHAR2(30) INDEX BY BINARY_INTEGER;
55 TYPE varchar2_150_type IS TABLE OF VARCHAR2(150) INDEX BY BINARY_INTEGER;
56 t_status varchar2_150_type;
57
58 -- This stores the details of each component dimensions of Flex Field
59
60 TYPE rt_metadata IS RECORD (
61 dimension_id fem_xdim_dimensions.dimension_id%TYPE,
62 member_col fem_xdim_dimensions.member_col%TYPE,
63 member_display_code_col fem_xdim_dimensions.member_display_code_col%TYPE,
64 member_b_table_name fem_xdim_dimensions.member_b_table_name%TYPE,
65 value_set_required_flag fem_xdim_dimensions.value_set_required_flag%TYPE,
66 dimension_varchar_label VARCHAR2(100),
67 member_sql VARCHAR2(200));
68
69 TYPE tt_metadata IS TABLE OF rt_metadata INDEX BY BINARY_INTEGER;
70 t_metadata tt_metadata;
71
72 -- This is used to store the values of the Interface(_T) tables
73
74 TYPE display_code_type IS TABLE OF VARCHAR2(150) INDEX BY BINARY_INTEGER;
75 t_global_vs_combo_dc display_code_type;
76 t_fin_elem_dc display_code_type;
77 t_ledger_dc display_code_type;
78 t_cctr_org_dc display_code_type;
79 t_product_dc display_code_type;
80 t_channel_dc display_code_type;
81 t_project_dc display_code_type;
82 t_customer_dc display_code_type;
83 t_task_dc display_code_type;
84 t_user_dim1_dc display_code_type;
85 t_user_dim2_dc display_code_type;
86 t_user_dim3_dc display_code_type;
87 t_user_dim4_dc display_code_type;
88 t_user_dim5_dc display_code_type;
89 t_user_dim6_dc display_code_type;
90 t_user_dim7_dc display_code_type;
91 t_user_dim8_dc display_code_type;
92 t_user_dim9_dc display_code_type;
93 t_user_dim10_dc display_code_type;
94
95 -- This stores the concatenated display code for composite dimension
96 t_display_code display_code_type;
97
98 -- This stores the value of 'UOM_CODE' column for FEM_COST_OBECTS Table.
99 t_uom_code display_code_type;
100
101 --This is used to store the component dimensions of Composite Dimension
102
103 TYPE dim_structure IS TABLE OF VARCHAR2(150) INDEX BY BINARY_INTEGER;
104 t_component_dim_dc dim_structure;
105
106 TYPE number_type IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
107 t_global_vs_combo_id number_type;
108 t_fin_elem_id number_type;
109 t_ledger_id number_type;
110 t_cctr_org_id number_type;
111 t_product_id number_type;
112 t_channel_id number_type;
113 t_project_id number_type;
114 t_customer_id number_type;
115 t_task_id number_type;
116 t_user_dim1_id number_type;
117 t_user_dim2_id number_type;
118 t_user_dim3_id number_type;
119 t_user_dim4_id number_type;
120 t_user_dim5_id number_type;
121 t_user_dim6_id number_type;
122 t_user_dim7_id number_type;
123 t_user_dim8_id number_type;
124 t_user_dim9_id number_type;
125 t_user_dim10_id number_type;
126
127
128 PROCEDURE Process_Rows (p_eng_sql IN VARCHAR2
129 ,p_slc_pred IN VARCHAR2
130 ,p_proc_num IN VARCHAR2
131 ,p_part_code IN VARCHAR2
132 ,p_fetch_limit IN NUMBER
133 ,p_dimension_varchar_label IN VARCHAR2
134 ,p_execution_mode IN VARCHAR2
135 ,p_structure_id IN NUMBER
136 ,p_req_id IN NUMBER );
137
138
139 END FEM_COMP_DIM_MEMBER_LOADER_PKG;