[Home] [Help]
PACKAGE BODY: APPS.FEM_BR_DATASET_GROUP_PVT
Source
1 PACKAGE BODY FEM_BR_DATASET_GROUP_PVT AS
2 /* $Header: FEMVDSGB.pls 120.0 2005/06/06 20:59:47 appldev noship $ */
3
4 --------------------------------------------------------------------------------
5 -- PRIVATE CONSTANTS
6 --------------------------------------------------------------------------------
7
8 G_PKG_NAME constant varchar2(30) := 'FEM_BR_DATASET_GROUP_PVT';
9
10 --------------------------------------------------------------------------------
11 -- PRIVATE SPECIFICATIONS
12 --------------------------------------------------------------------------------
13
14 PROCEDURE DeleteDatasetGroup(
15 p_obj_def_id in number
16 );
17
18 PROCEDURE DeleteInputDatasets(
19 p_obj_def_id in number
20 );
21
22 PROCEDURE CopyDatasetGroup(
23 p_source_obj_def_id in number
24 ,p_target_obj_def_id in number
25 ,p_created_by in number
26 ,p_creation_date in date
27 );
28
29 PROCEDURE CopyInputDatasets(
30 p_source_obj_def_id in number
31 ,p_target_obj_def_id in number
32 ,p_created_by in number
33 ,p_creation_date in date
34 );
35
36 --------------------------------------------------------------------------------
37 -- PUBLIC BODIES
38 --------------------------------------------------------------------------------
39
40 --
41 -- PROCEDURE
42 -- DeleteObjectDefinition
43 --
44 -- DESCRIPTION
45 -- Deletes all the details records of a Dataset Group Rule Definition.
46 --
47 -- IN
48 -- p_obj_def_id - Object Definition ID.
49 --
50 --------------------------------------------------------------------------------
51 PROCEDURE DeleteObjectDefinition(
52 p_obj_def_id in number
53 )
54 --------------------------------------------------------------------------------
55 IS
56
57 g_api_name constant varchar2(30) := 'DeleteObjectDefinition';
58
59 BEGIN
60
61 DeleteDatasetGroup(
62 p_obj_def_id => p_obj_def_id
63 );
64
65 DeleteInputDatasets(
66 p_obj_def_id => p_obj_def_id
67 );
68
69 EXCEPTION
70
71 when others then
72 FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, g_api_name);
73 raise FND_API.G_EXC_UNEXPECTED_ERROR;
74
75 END DeleteObjectDefinition;
76
77
78 --
79 -- PROCEDURE
80 -- CopyObjectDefinition
81 --
82 -- DESCRIPTION
83 -- Creates all the detail records of a new Dataset Group Rule Definition (target)
84 -- by copying the detail records of another Dataset Group Rule Definition (source).
85 --
86 -- IN
87 -- p_source_obj_def_id - Source Object Definition ID.
88 -- p_target_obj_def_id - Target Object Definition ID.
89 -- p_created_by - FND User ID (optional).
90 -- p_creation_date - System Date (optional).
91 --
92 --------------------------------------------------------------------------------
93 PROCEDURE CopyObjectDefinition(
94 p_source_obj_def_id in number
95 ,p_target_obj_def_id in number
96 ,p_created_by in number
97 ,p_creation_date in date
98 )
99 --------------------------------------------------------------------------------
100 IS
101
102 g_api_name constant varchar2(30) := 'CopyObjectDefinition';
103
104 BEGIN
105
106 CopyDatasetGroup(
107 p_source_obj_def_id => p_source_obj_def_id
108 ,p_target_obj_def_id => p_target_obj_def_id
109 ,p_created_by => p_created_by
110 ,p_creation_date => p_creation_date
111 );
112
113 CopyInputDatasets(
114 p_source_obj_def_id => p_source_obj_def_id
115 ,p_target_obj_def_id => p_target_obj_def_id
116 ,p_created_by => p_created_by
117 ,p_creation_date => p_creation_date
118 );
119
120 EXCEPTION
121
122 when others then
123 FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, g_api_name);
124 raise FND_API.G_EXC_UNEXPECTED_ERROR;
125
126 END CopyObjectDefinition;
127
128
129
130 --------------------------------------------------------------------------------
131 -- PRIVATE BODIES
132 --------------------------------------------------------------------------------
133
134 --
135 -- PROCEDURE
136 -- DeleteDatasetGroup
137 --
138 -- DESCRIPTION
139 -- Deletes a Dataset Group Rule Definition by performing deletes on records
140 -- in the FEM_DS_INPUT_OUTPUT_DEFS table.
141 --
142 -- IN
143 -- p_obj_def_id - Object Definition ID.
144 --
145 --------------------------------------------------------------------------------
146 PROCEDURE DeleteDatasetGroup(
147 p_obj_def_id in number
148 )
149 --------------------------------------------------------------------------------
150 IS
151 BEGIN
152
153 delete from fem_ds_input_output_defs
154 where dataset_io_obj_def_id = p_obj_def_id;
155
156 END DeleteDatasetGroup;
157
158
159 --
160 -- PROCEDURE
161 -- DeleteInputDatasets
162 --
163 -- DESCRIPTION
164 -- Deletes a Dataset Group Rule Definition by performing deletes on records
165 -- in the FEM_DS_INPUT_LISTS table.
166 --
167 -- IN
168 -- p_obj_def_id - Object Definition ID.
169 --
170 --------------------------------------------------------------------------------
171 PROCEDURE DeleteInputDatasets(
172 p_obj_def_id in number
173 )
174 --------------------------------------------------------------------------------
175 IS
176 BEGIN
177
178 delete from fem_ds_input_lists
179 where dataset_io_obj_def_id = p_obj_def_id;
180
181 END DeleteInputDatasets;
182
183
184 --
185 -- PROCEDURE
186 -- CopyDatasetGroup
187 --
188 -- DESCRIPTION
189 -- Creates a new Dataset Group Rule Definition by copying records in the
190 -- FEM_DS_INPUT_OUTPUT_DEFS table.
191 --
192 -- IN
193 -- p_source_obj_def_id - Source Object Definition ID.
194 -- p_target_obj_def_id - Target Object Definition ID.
195 -- p_created_by - FND User ID (optional).
196 -- p_creation_date - System Date (optional).
197 --
198 --------------------------------------------------------------------------------
199 PROCEDURE CopyDatasetGroup(
200 p_source_obj_def_id in number
201 ,p_target_obj_def_id in number
202 ,p_created_by in number
203 ,p_creation_date in date
204 )
205 --------------------------------------------------------------------------------
206 IS
207 BEGIN
208
209 insert into fem_ds_input_output_defs(
210 dataset_io_obj_def_id
211 ,output_dataset_code
212 ,calendar_id
213 ,created_by
214 ,creation_date
215 ,last_updated_by
216 ,last_update_date
217 ,last_update_login
218 ,object_version_number
219 ) select
220 p_target_obj_def_id
221 ,output_dataset_code
222 ,calendar_id
223 ,nvl(p_created_by,FND_GLOBAL.user_id)
224 ,nvl(p_creation_date,sysdate)
225 ,FND_GLOBAL.user_id
226 ,sysdate
227 ,FND_GLOBAL.login_id
228 ,1
229 from fem_ds_input_output_defs
230 where dataset_io_obj_def_id = p_source_obj_def_id;
231
232 END CopyDatasetGroup;
233
234
235
236 --
237 -- PROCEDURE
238 -- CopyInputDatasets
239 --
240 -- DESCRIPTION
241 -- Creates a new Dataset Group Rule Definition by copying records in the
242 -- FEM_DS_INPUT_LISTS table.
243 --
244 -- IN
245 -- p_source_obj_def_id - Source Object Definition ID.
246 -- p_target_obj_def_id - Target Object Definition ID.
247 -- p_created_by - FND User ID (optional).
248 -- p_creation_date - System Date (optional).
249 --
250 --------------------------------------------------------------------------------
251 PROCEDURE CopyInputDatasets(
252 p_source_obj_def_id in number
253 ,p_target_obj_def_id in number
254 ,p_created_by in number
255 ,p_creation_date in date
256 )
257 --------------------------------------------------------------------------------
258 IS
259 BEGIN
260
261 insert into fem_ds_input_lists(
262 dataset_io_obj_def_id
263 ,input_list_item_num
264 ,input_dataset_code
265 ,absolute_cal_period_flag
266 ,absolute_cal_period_id
267 ,use_default_dim_grp_id_code
268 ,relative_dimension_group_id
269 ,relative_cal_period_offset
270 ,created_by
271 ,creation_date
272 ,last_updated_by
273 ,last_update_date
274 ,last_update_login
275 ,object_version_number
276 ) select
277 p_target_obj_def_id
278 ,fem_input_list_item_num_seq.nextval
279 ,input_dataset_code
280 ,absolute_cal_period_flag
281 ,absolute_cal_period_id
282 ,use_default_dim_grp_id_code
283 ,relative_dimension_group_id
284 ,relative_cal_period_offset
285 ,nvl(p_created_by,FND_GLOBAL.user_id)
286 ,nvl(p_creation_date,sysdate)
287 ,FND_GLOBAL.user_id
288 ,sysdate
289 ,FND_GLOBAL.login_id
290 ,1
291 from fem_ds_input_lists
292 where dataset_io_obj_def_id = p_source_obj_def_id;
293
294 END CopyInputDatasets;
295
296
297
298 END FEM_BR_DATASET_GROUP_PVT;