[Home] [Help]
PACKAGE BODY: APPS.HR_SUMMARY_API2
Source
1 package body hr_summary_api2 as
2 /* $Header: hrsumapi.pkb 115.5 2002/11/26 10:30:14 sfmorris noship $ */
3 --
4 procedure update_item_type (p_item_type_id in number
5 ,p_business_group_id in number
6 ,p_object_version_number in out nocopy number
7 ,p_name in varchar2
8 ,p_units in varchar2
9 ,p_datatype in varchar2
10 ,p_count_clause1 in varchar2
11 ,p_count_clause2 in varchar2
12 ,p_where_clause in varchar2
13 ,p_seeded_data in varchar2
14 ,p_allowed in varchar2) is
15 begin
16 --
17 hr_utility.set_location('Entering: hr_summary_api2.update_item_type', 10);
18 --
19 if p_seeded_data = 'Y' then
20 if p_allowed = 'Y' then
21 null;
22 else
23 fnd_message.set_name('PER','PER_74882_RECORD_PROTECT');
24 fnd_message.raise_error;
25 end if;
26 end if;
27 --
28 /* call row handler package with correct parameters */
29 per_bil_upd.upd(p_type => 'ITEM_TYPE'
30 ,p_id_value => p_item_type_id
31 ,p_business_group_id => p_business_group_id
32 ,p_object_version_number => p_object_version_number
33 ,p_text_value1 => p_name
34 ,p_text_value2 => p_units
35 ,p_text_value3 => p_datatype
36 ,p_text_value4 => p_count_clause1
37 ,p_text_value5 => p_count_clause2
38 ,p_text_value6 => p_where_clause
39 ,p_text_value7 => p_seeded_data);
40 --
41 hr_utility.set_location('Leaving: hr_summary_api2.update_item_type', 20);
42 --
43 end update_item_type;
44 -----------------
45 procedure update_key_type (p_key_type_id in number
46 ,p_business_group_id in number
47 ,p_object_version_number in out nocopy number
48 ,p_name in varchar2
49 ,p_key_function in varchar2
50 ,p_seeded_data in varchar2
51 ,p_allowed in varchar2) is
52 begin
53 --
54 hr_utility.set_location('Entering: hr_summary_api2.update_key_type', 10);
55 --
56 if p_seeded_data = 'Y' then
57 if p_allowed = 'Y' then
58 null;
59 else
60 fnd_message.set_name('PER','PER_74882_RECORD_PROTECT');
61 fnd_message.raise_error;
62 end if;
63 end if;
64 --
65 /* call row handler package with correct parameters */
66 per_bil_upd.upd(p_type => 'KEY_TYPE'
67 ,p_id_value => p_key_type_id
68 ,p_business_group_id => p_business_group_id
69 ,p_object_version_number => p_object_version_number
70 ,p_text_value1 => p_name
71 ,p_text_value6 => p_key_function
72 ,p_text_value7 => p_seeded_data);
73 --
74 hr_utility.set_location('Leaving: hr_summary_api2.update_key_type', 20);
75 --
76 end update_key_type;
77 -----------------
78 procedure update_key_value (p_key_value_id in number
79 ,p_business_group_id in number
80 ,p_object_version_number in out nocopy number
81 ,p_key_type_id in number
82 ,p_item_value_id in number
83 ,p_name in varchar2 ) is
84 begin
85 --
86 hr_utility.set_location('Entering: hr_summary_api2.update_key_value', 10);
87 --
88 /* call row handler package with correct parameters */
89 per_bil_upd.upd(p_type => 'KEY_VALUE'
90 ,p_id_value => p_key_value_id
91 ,p_business_group_id => p_business_group_id
92 ,p_object_version_number => p_object_version_number
93 ,p_fk_value1 => p_key_type_id
94 ,p_fk_value2 => p_item_value_id
95 ,p_text_value1 => p_name);
96 --
97 hr_utility.set_location('Leaving: hr_summary_api2.update_key_value', 20);
98 --
99 end update_key_value;
100 -----------------
101 procedure update_item_value (p_item_value_id in number
102 ,p_business_group_id in number
103 ,p_object_version_number in out nocopy number
104 ,p_process_run_id in number
105 ,p_item_type_usage_id in number
106 ,p_textvalue in varchar2
107 ,p_numvalue1 in number
108 ,p_numvalue2 in number
109 ,p_datevalue in date ) is
110 begin
111 --
112 hr_utility.set_location('Entering: hr_summary_api2.update_item_value', 10);
113 --
114 /* call row handler package with correct parameters */
115 per_bil_upd.upd(p_type => 'ITEM_VALUE'
116 ,p_id_value => p_item_value_id
117 ,p_business_group_id => p_business_group_id
118 ,p_object_version_number => p_object_version_number
119 ,p_fk_value1 => p_process_run_id
120 ,p_fk_value2 => p_item_type_usage_id
121 ,p_text_value1 => p_textvalue
122 ,p_num_value1 => p_numvalue1
123 ,p_num_value2 => p_numvalue2
124 ,p_date_value1 => p_datevalue);
125 --
126 hr_utility.set_location('Leaving: hr_summary_api2.update_item_value', 20);
127 --
128 end update_item_value;
129 -----------------
130 procedure update_valid_restriction (p_valid_restriction_id in number
131 ,p_business_group_id in number
132 ,p_object_version_number in out nocopy number
133 ,p_item_type_id in number
134 ,p_restriction_type_id in number
135 ,p_seeded_data in varchar2
136 ,p_allowed in varchar2) is
137 begin
138 --
139 hr_utility.set_location('Entering: hr_summary_api2.update_valid_restriction', 10);
140 --
141 if p_seeded_data = 'Y' then
142 if p_allowed = 'Y' then
143 null;
144 else
145 fnd_message.set_name('PER','PER_74882_RECORD_PROTECT');
146 fnd_message.raise_error;
147 end if;
148 end if;
149 --
150 /* call row handler package with correct parameters */
151 per_bil_upd.upd(p_type => 'VALID_RESTRICTION'
152 ,p_id_value => p_valid_restriction_id
153 ,p_business_group_id => p_business_group_id
154 ,p_object_version_number => p_object_version_number
155 ,p_fk_value1 => p_item_type_id
156 ,p_fk_value2 => p_restriction_type_id
157 ,p_text_value7 => p_seeded_data);
158 --
159 hr_utility.set_location('Leaving: hr_summary_api2.update_valid_restriction', 20);
160 --
161 end update_valid_restriction;
162 -----------------
163 procedure update_restriction_type (p_restriction_type_id in number
164 ,p_business_group_id in number
165 ,p_object_version_number in out nocopy number
166 ,p_name in varchar2
167 ,p_data_type in varchar2
168 ,p_restriction_clause in varchar2
169 ,p_restriction_sql in varchar2
170 ,p_seeded_data in varchar2
171 ,p_allowed in varchar2) is
172 begin
173 --
174 hr_utility.set_location('Entering: hr_summary_api2.update_restriction_type', 10);
175 --
176 if p_seeded_data = 'Y' then
177 if p_allowed = 'Y' then
178 null;
179 else
180 fnd_message.set_name('PER','PER_74882_RECORD_PROTECT');
181 fnd_message.raise_error;
182 end if;
183 end if;
184 --
185 /* call row handler package with correct parameters */
186 per_bil_upd.upd(p_type => 'RESTRICTION_TYPE'
187 ,p_id_value => p_restriction_type_id
188 ,p_business_group_id => p_business_group_id
189 ,p_object_version_number => p_object_version_number
190 ,p_text_value1 => p_name
191 ,p_text_value2 => p_data_type
192 ,p_text_value3 => p_restriction_clause
193 ,p_text_value4 => p_restriction_sql
194 ,p_text_value7 => p_seeded_data);
195 --
196 hr_utility.set_location('Leaving: hr_summary_api2.update_restriction_type', 20);
197 --
198 end update_restriction_type;
199 -----------------
200 procedure update_restriction_usage (p_restriction_usage_id in number
201 ,p_business_group_id in number
202 ,p_object_version_number in out nocopy number
203 ,p_item_type_usage_id in number
204 ,p_valid_restriction_id in number
205 ,p_restriction_type in varchar2
206 ,p_seeded_data in varchar2
207 ,p_allowed in varchar2) is
208 begin
209 --
210 hr_utility.set_location('Entering: hr_summary_api2.update_restriction_usage', 10);
211 --
212 if p_seeded_data = 'Y' then
213 if p_allowed = 'Y' then
214 null;
215 else
216 fnd_message.set_name('PER','PER_74882_RECORD_PROTECT');
217 fnd_message.raise_error;
218 end if;
219 end if;
220 --
221 /* call row handler package with correct parameters */
222 per_bil_upd.upd(p_type => 'RESTRICTION_USAGE'
223 ,p_id_value => p_restriction_usage_id
224 ,p_business_group_id => p_business_group_id
225 ,p_object_version_number => p_object_version_number
226 ,p_fk_value1 => p_item_type_usage_id
227 ,p_fk_value2 => p_valid_restriction_id
228 ,p_text_value1 => p_restriction_type
229 ,p_text_value7 => p_seeded_data);
230 --
231 hr_utility.set_location('Leaving: hr_summary_api2.update_restriction_usage', 20);
232 --
233 end update_restriction_usage;
234 -----------------
235 procedure update_restriction_value ( p_restriction_value_id in number
236 ,p_business_group_id in number
237 ,p_object_version_number in out nocopy number
238 ,p_restriction_usage_id in number
239 ,p_value in varchar2
240 ,p_seeded_data in varchar2
241 ,p_allowed in varchar2) is
242 begin
243 --
244 hr_utility.set_location('Entering: hr_summary_api2.update_restriction_value', 10);
245 --
246 if p_seeded_data = 'Y' then
247 if p_allowed = 'Y' then
248 null;
249 else
250 fnd_message.set_name('PER','PER_74882_RECORD_PROTECT');
251 fnd_message.raise_error;
252 end if;
253 end if;
254 --
255 /* call row handler package with correct parameters */
256 per_bil_upd.upd(p_type => 'RESTRICTION_VALUE'
257 ,p_id_value => p_restriction_value_id
258 ,p_business_group_id => p_business_group_id
259 ,p_object_version_number => p_object_version_number
260 ,p_fk_value1 => p_restriction_usage_id
261 ,p_text_value1 => p_value);
262 --
263 hr_utility.set_location('Leaving: hr_summary_api2.update_restriction_value', 20);
264 --
265 end update_restriction_value;
266 -----------------
267 procedure update_item_type_usage ( p_item_type_usage_id in number
268 ,p_business_group_id in number
269 ,p_object_version_number in out nocopy number
270 ,p_sequence_number in number
271 ,p_name in varchar2
272 ,p_template_id in number
273 ,p_item_type_id in number
274 ,p_seeded_data in varchar2
275 ,p_allowed in varchar2) is
276 begin
277 --
278 hr_utility.set_location('Entering: hr_summary_api2.update_item_type_usage', 10);
279 --
280 if p_seeded_data = 'Y' then
281 if p_allowed = 'Y' then
282 null;
283 else
284 fnd_message.set_name('PER','PER_74882_RECORD_PROTECT');
285 fnd_message.raise_error;
286 end if;
287 end if;
288 --
289 /* call row handler package with correct parameters */
290 per_bil_upd.upd(p_type => 'ITEM_TYPE_USAGE'
291 ,p_id_value => p_item_type_usage_id
292 ,p_business_group_id => p_business_group_id
293 ,p_object_version_number => p_object_version_number
294 ,p_num_value1 => p_sequence_number
295 ,p_text_value1 => p_name
296 ,p_fk_value1 => p_template_id
297 ,p_fk_value2 => p_item_type_id
298 ,p_text_value7 => p_seeded_data);
299 --
300 hr_utility.set_location('Leaving: hr_summary_api2.update_item_type_usage', 20);
301 --
302 end update_item_type_usage;
303 -----------------
304 procedure update_valid_key_type (p_valid_key_type_id in number
305 ,p_business_group_id in number
306 ,p_object_version_number in out nocopy number
307 ,p_item_type_id in number
308 ,p_key_type_id in number
309 ,p_seeded_data in varchar2
310 ,p_allowed in varchar2) is
311 begin
312 --
313 hr_utility.set_location('Entering: hr_summary_api2.update_valid_key_type', 10);
314 --
315 if p_seeded_data = 'Y' then
316 if p_allowed = 'Y' then
317 null;
318 else
319 fnd_message.set_name('PER','PER_74882_RECORD_PROTECT');
320 fnd_message.raise_error;
321 end if;
322 end if;
323 --
324 /* call row handler package with correct parameters */
325 per_bil_upd.upd(p_type => 'VALID_KEY_TYPE'
326 ,p_id_value => p_valid_key_type_id
327 ,p_business_group_id => p_business_group_id
328 ,p_object_version_number => p_object_version_number
329 ,p_fk_value1 => p_item_type_id
330 ,p_fk_value2 => p_key_type_id
331 ,p_text_value7 => p_seeded_data);
332 --
333 hr_utility.set_location('Entering: hr_summary_api2.update_valid_key_type', 20);
334 --
335 end update_valid_key_type;
336 -----------------
337 procedure update_key_type_usage (p_key_type_usage_id in number
338 ,p_business_group_id in number
339 ,p_object_version_number in out nocopy number
340 ,p_item_type_usage_id in number
341 ,p_valid_key_type_id in number
342 ,p_seeded_data in varchar2
343 ,p_allowed in varchar2) is
344 begin
345 --
346 hr_utility.set_location('Entering: hr_summary_api2.update_key_type_usage', 10);
347 --
348 if p_seeded_data = 'Y' then
349 if p_allowed = 'Y' then
350 null;
351 else
352 fnd_message.set_name('PER','PER_74882_RECORD_PROTECT');
353 fnd_message.raise_error;
354 end if;
355 end if;
356 --
357 /* call row handler package with correct parameters */
358 per_bil_upd.upd(p_type => 'KEY_TYPE_USAGE'
359 ,p_id_value => p_key_type_usage_id
360 ,p_business_group_id => p_business_group_id
361 ,p_object_version_number => p_object_version_number
362 ,p_fk_value1 => p_item_type_usage_id
363 ,p_fk_value2 => p_valid_key_type_id
364 ,p_text_value7 => p_seeded_data);
365 --
366 hr_utility.set_location('Entering: hr_summary_api2.update_key_type_usage', 20);
367 --
368 end update_key_type_usage;
369 -----------------
370 procedure update_template (p_template_id in number
371 ,p_business_group_id in number
372 ,p_object_version_number in out nocopy number
373 ,p_name in varchar2
374 ,p_seeded_data in varchar2
375 ,p_allowed in varchar2) is
376 begin
377 --
378 hr_utility.set_location('Entering: hr_summary_api2.update_template', 10);
379 --
380 if p_seeded_data = 'Y' then
381 if p_allowed = 'Y' then
382 null;
383 else
384 fnd_message.set_name('PER','PER_74882_RECORD_PROTECT');
385 fnd_message.raise_error;
386 end if;
387 end if;
388 --
389 /* call row handler package with correct parameters */
390 per_bil_upd.upd(p_type => 'TEMPLATE'
391 ,p_id_value => p_template_id
392 ,p_business_group_id => p_business_group_id
393 ,p_object_version_number => p_object_version_number
394 ,p_text_value1 => p_name
395 ,p_text_value7 => p_seeded_data);
396 --
397 hr_utility.set_location('Entering: hr_summary_api2.update_template', 20);
398 --
399 end update_template;
400 -----------------
401 procedure update_process_run (p_process_run_id in number
402 ,p_business_group_id in number
403 ,p_object_version_number in out nocopy number
404 ,p_name in varchar2
405 ,p_template_id in varchar2
406 ,p_process_type in varchar2) is
407 begin
408 --
409 hr_utility.set_location('Entering: hr_summary_api2.update_process_run', 10);
410 --
411 /* call row handler package with correct parameters */
412 per_bil_upd.upd(p_type => 'PROCESS_RUN'
413 ,p_id_value => p_process_run_id
414 ,p_business_group_id => p_business_group_id
415 ,p_object_version_number => p_object_version_number
416 ,p_text_value2 => p_name
417 ,p_fk_value1 => p_template_id
418 ,p_text_value1 => p_process_type);
419 --
420 hr_utility.set_location('Leaving: hr_summary_api2.update_process_run', 20);
421 --
422 end update_process_run;
423 -----------------
424 procedure update_parameter (p_parameter_id in number
425 ,p_business_group_id in number
426 ,p_object_version_number in out nocopy number
427 ,p_process_run_id in number
428 ,p_name in varchar2
429 ,p_value in varchar2) is
430 begin
431 --
432 hr_utility.set_location('Entering: hr_summary_api2.update_parameter', 10);
433 --
434 /* call row handler package with correct parameters */
435 per_bil_upd.upd(p_type => 'PARAMETER'
436 ,p_id_value => p_parameter_id
437 ,p_business_group_id => p_business_group_id
438 ,p_object_version_number => p_object_version_number
439 ,p_fk_value1 => p_process_run_id
440 ,p_text_value1 => p_name
441 ,p_text_value6 => p_value);
442 --
443 hr_utility.set_location('Leaving: hr_summary_api2.update_parameter', 20);
444 --
445 end update_parameter;
446 --
447 end hr_summary_api2;