DBA Data[Home] [Help]

PACKAGE BODY: APPS.OTA_ACTIVITY_CATEGORY_API

Source


1 PACKAGE BODY OTA_ACTIVITY_CATEGORY_API as
2 /* $Header: otaciapi.pkb 120.0 2005/05/29 06:50:49 appldev noship $ */
3 --
4 -- Package Variables
5 --
6 g_package  varchar2(33) := '  OTA_ACTIVITY_CATEGORY_API.';
7 --
8 -- ----------------------------------------------------------------------------
9 -- |-------------------------< create_act_cat_inclusion >------------------|
10 -- ----------------------------------------------------------------------------
11 --
12 procedure create_act_cat_inclusion
13   (p_validate                      in     boolean  default false,
14   p_effective_date                in     date,
15   p_activity_version_id          in  number,
16   p_activity_category            in  varchar2,
17   p_comments                     in  varchar2  default null,
18   p_object_version_number        out nocopy number,
19   p_aci_information_category     in  varchar2  default null,
20   p_aci_information1             in  varchar2  default null,
21   p_aci_information2             in  varchar2  default null,
22   p_aci_information3             in  varchar2  default null,
23   p_aci_information4             in  varchar2  default null,
24   p_aci_information5             in  varchar2  default null,
25   p_aci_information6             in  varchar2  default null,
26   p_aci_information7             in  varchar2  default null,
27   p_aci_information8             in  varchar2  default null,
28   p_aci_information9             in  varchar2  default null,
29   p_aci_information10            in  varchar2  default null,
30   p_aci_information11            in  varchar2  default null,
31   p_aci_information12            in  varchar2  default null,
32   p_aci_information13            in  varchar2  default null,
33   p_aci_information14            in  varchar2  default null,
34   p_aci_information15            in  varchar2  default null,
35   p_aci_information16            in  varchar2  default null,
36   p_aci_information17            in  varchar2  default null,
37   p_aci_information18            in  varchar2  default null,
38   p_aci_information19            in  varchar2  default null,
39   p_aci_information20            in  varchar2  default null,
40   p_start_date_active            in  date      default null,
41   p_end_date_active              in  date      default null,
42   p_primary_flag                 in  varchar2  default 'N',
43   p_category_usage_id            in  number
44   )
45 is
46   --
47   -- Declare cursors and local variables
48   --
49   l_proc                    varchar2(72) := g_package||' create_act_cat_inclusion ';
50   l_object_version_number   number;
51   l_effective_date          date;
52 
53 begin
54   hr_utility.set_location('Entering:'|| l_proc, 10);
55   --
56   -- Issue a savepoint
57   --
58   savepoint create_act_cat_inclusion;
59   --
60   -- Truncate the time portion from all IN date parameters
61   --
62   l_effective_date := trunc(p_effective_date);
63 
64   --
65   -- Call Before Process User Hook
66   --
67   begin
68     ota_activity_category_bk1.create_act_cat_inclusion_b
69   (p_effective_date             => l_effective_date,
70    p_activity_version_id        => p_activity_version_id ,
71   p_activity_category           => p_activity_category,
72   p_comments                    => p_comments,
73   p_object_version_number       => l_object_version_number,
74   p_aci_information_category    => p_aci_information_category,
75   p_aci_information1            => p_aci_information1,
76   p_aci_information2            => p_aci_information2,
77   p_aci_information3            => p_aci_information3,
78   p_aci_information4            => p_aci_information4,
79   p_aci_information5            => p_aci_information5 ,
80   p_aci_information6            => p_aci_information6,
81   p_aci_information7            => p_aci_information7,
82   p_aci_information8            => p_aci_information8,
83   p_aci_information9            => p_aci_information9,
84   p_aci_information10           => p_aci_information10,
85   p_aci_information11           => p_aci_information11,
86   p_aci_information12           => p_aci_information12,
87   p_aci_information13           => p_aci_information13,
88   p_aci_information14           => p_aci_information14,
89   p_aci_information15           => p_aci_information15,
90   p_aci_information16           => p_aci_information16,
91   p_aci_information17           => p_aci_information17,
92   p_aci_information18           => p_aci_information18,
93   p_aci_information19           => p_aci_information19,
94   p_aci_information20           => p_aci_information20,
95   p_start_date_active           => p_start_date_active,
96   p_end_date_active             => p_end_date_active,
97   p_primary_flag                => p_primary_flag,
98   p_category_usage_id           => p_category_usage_id
99 );
100   exception
101     when hr_api.cannot_find_prog_unit then
102       hr_api.cannot_find_prog_unit_error
103         (p_module_name => 'create_act_cat_inclusion_b'
104         ,p_hook_type   => 'BP'
105         );
106   end;
107   --
108   -- Validation in addition to Row Handlers
109   --
110   --
111   -- Process Logic
112   --
113   ota_aci_ins.ins
114   (p_effective_date             => l_effective_date,
115    p_activity_version_id        => p_activity_version_id ,
116   p_activity_category           => p_activity_category,
117   p_comments                    => p_comments,
118   p_object_version_number       => l_object_version_number,
119   p_aci_information_category    => p_aci_information_category,
120   p_aci_information1            => p_aci_information1,
121   p_aci_information2            => p_aci_information2,
122   p_aci_information3            => p_aci_information3,
123   p_aci_information4            => p_aci_information4,
124   p_aci_information5            => p_aci_information5 ,
125   p_aci_information6            => p_aci_information6,
126   p_aci_information7            => p_aci_information7,
127   p_aci_information8            => p_aci_information8,
128   p_aci_information9            => p_aci_information9,
129   p_aci_information10           => p_aci_information10,
130   p_aci_information11           => p_aci_information11,
131   p_aci_information12           => p_aci_information12,
132   p_aci_information13           => p_aci_information13,
133   p_aci_information14           => p_aci_information14,
134   p_aci_information15           => p_aci_information15,
135   p_aci_information16           => p_aci_information16,
136   p_aci_information17           => p_aci_information17,
137   p_aci_information18           => p_aci_information18,
138   p_aci_information19           => p_aci_information19,
139   p_aci_information20           => p_aci_information20,
140   p_start_date_active           => p_start_date_active,
141   p_end_date_active             => p_end_date_active,
142   p_primary_flag                => p_primary_flag,
143   p_category_usage_id           => p_category_usage_id
144 );
145 
146   --
147   -- Call After Process User Hook
148   --
149   begin
150   OTA_activity_category_bk1.create_act_cat_inclusion_a
151   (p_effective_date             => l_effective_date,
152    p_activity_version_id        => p_activity_version_id ,
153   p_activity_category           => p_activity_category,
154   p_comments                    => p_comments,
155   p_object_version_number       => l_object_version_number,
156   p_aci_information_category    => p_aci_information_category,
157   p_aci_information1            => p_aci_information1,
158   p_aci_information2            => p_aci_information2,
159   p_aci_information3            => p_aci_information3,
160   p_aci_information4            => p_aci_information4,
161   p_aci_information5            => p_aci_information5 ,
162   p_aci_information6            => p_aci_information6,
163   p_aci_information7            => p_aci_information7,
164   p_aci_information8            => p_aci_information8,
165   p_aci_information9            => p_aci_information9,
166   p_aci_information10           => p_aci_information10,
167   p_aci_information11           => p_aci_information11,
168   p_aci_information12           => p_aci_information12,
169   p_aci_information13           => p_aci_information13,
170   p_aci_information14           => p_aci_information14,
171   p_aci_information15           => p_aci_information15,
172   p_aci_information16           => p_aci_information16,
173   p_aci_information17           => p_aci_information17,
174   p_aci_information18           => p_aci_information18,
175   p_aci_information19           => p_aci_information19,
176   p_aci_information20           => p_aci_information20,
177   p_start_date_active           => p_start_date_active,
178   p_end_date_active             => p_end_date_active,
179   p_primary_flag                => p_primary_flag,
180   p_category_usage_id           => p_category_usage_id
181 );
182 
183   exception
184     when hr_api.cannot_find_prog_unit then
185       hr_api.cannot_find_prog_unit_error
186         (p_module_name => 'create_act_cat_inclusion_a'
187         ,p_hook_type   => 'AP'
188         );
189   end;
190   --
191   -- When in validation only mode raise the Validate_Enabled exception
192   --
193   if p_validate then
194     raise hr_api.validate_enabled;
195   end if;
196   --
197   -- Set all output arguments
198   --
199   --
200   p_object_version_number   := l_object_version_number;
201   --
202   hr_utility.set_location(' Leaving:'||l_proc, 70);
203 exception
204   when hr_api.validate_enabled then
205     --
206     -- As the Validate_Enabled exception has been raised
207     -- we must rollback to the savepoint
208     --
209     rollback to create_act_cat_inclusion;
210     --
211     -- Only set output warning arguments
212     -- (Any key or derived arguments must be set to null
213     -- when validation only mode is being used.)
214     --
215     p_object_version_number   := null;
216     hr_utility.set_location(' Leaving:'||l_proc, 80);
217   when others then
218     --
219     -- A validation or unexpected error has occured
220     --
221     rollback to create_act_cat_inclusion;
222     p_object_version_number :=  null;
223     hr_utility.set_location(' Leaving:'||l_proc, 90);
224     raise;
225 end create_act_cat_inclusion ;
226 -- ----------------------------------------------------------------------------
227 -- |-------------------------< update_act_cat_inclusion >-------------------|
228 -- ----------------------------------------------------------------------------
229 --
230 procedure update_act_cat_inclusion
231   (p_validate                      in     boolean  default false
232   ,p_effective_date                in     date
233   ,p_activity_version_id          in number
234   ,p_activity_category            in varchar2
235   ,p_comments                     in varchar2     default hr_api.g_varchar2
236   ,p_object_version_number        in out nocopy number
237   ,p_aci_information_category     in varchar2     default hr_api.g_varchar2
238   ,p_aci_information1             in varchar2     default hr_api.g_varchar2
239   ,p_aci_information2             in varchar2     default hr_api.g_varchar2
240   ,p_aci_information3             in varchar2     default hr_api.g_varchar2
241   ,p_aci_information4             in varchar2     default hr_api.g_varchar2
242   ,p_aci_information5             in varchar2     default hr_api.g_varchar2
243   ,p_aci_information6             in varchar2     default hr_api.g_varchar2
244   ,p_aci_information7             in varchar2     default hr_api.g_varchar2
245   ,p_aci_information8             in varchar2     default hr_api.g_varchar2
246   ,p_aci_information9             in varchar2     default hr_api.g_varchar2
247   ,p_aci_information10            in varchar2     default hr_api.g_varchar2
248   ,p_aci_information11            in varchar2     default hr_api.g_varchar2
249   ,p_aci_information12            in varchar2     default hr_api.g_varchar2
250   ,p_aci_information13            in varchar2     default hr_api.g_varchar2
251   ,p_aci_information14            in varchar2     default hr_api.g_varchar2
252   ,p_aci_information15            in varchar2     default hr_api.g_varchar2
253   ,p_aci_information16            in varchar2     default hr_api.g_varchar2
254   ,p_aci_information17            in varchar2     default hr_api.g_varchar2
255   ,p_aci_information18            in varchar2     default hr_api.g_varchar2
256   ,p_aci_information19            in varchar2     default hr_api.g_varchar2
257   ,p_aci_information20            in varchar2     default hr_api.g_varchar2
258   ,p_start_date_active            in date         default hr_api.g_date
259   ,p_end_date_active              in date         default hr_api.g_date
260   ,p_primary_flag                 in varchar2     default hr_api.g_varchar2
261   ,p_category_usage_id            in number
262   ) is
263   --
264   -- Declare cursors and local variables
265   --
266   l_proc                    varchar2(72) := g_package||' update_act_cat_inclusion ';
267   l_object_version_number   number       := p_object_version_number;
268   l_effective_date          date;
269 
270 begin
271   hr_utility.set_location('Entering:'|| l_proc, 10);
272   --
273   -- Issue a savepoint
274   --
275   savepoint update_act_cat_inclusion ;
276 
277   --
278   -- Truncate the time portion from all IN date parameters
279   --
280   l_effective_date := trunc(p_effective_date);
281   --
282 
283   -- Call Before Process User Hook
284   --
285   begin
286     ota_activity_category_bk2.update_act_cat_inclusion_b
287    (p_effective_date             => l_effective_date,
288    p_activity_version_id        => p_activity_version_id ,
289   p_activity_category           => p_activity_category,
290   p_comments                    => p_comments,
291   p_object_version_number       => p_object_version_number,
292   p_aci_information_category    => p_aci_information_category,
293   p_aci_information1            => p_aci_information1,
294   p_aci_information2            => p_aci_information2,
295   p_aci_information3            => p_aci_information3,
296   p_aci_information4            => p_aci_information4,
297   p_aci_information5            => p_aci_information5 ,
298   p_aci_information6            => p_aci_information6,
299   p_aci_information7            => p_aci_information7,
300   p_aci_information8            => p_aci_information8,
301   p_aci_information9            => p_aci_information9,
302   p_aci_information10           => p_aci_information10,
303   p_aci_information11           => p_aci_information11,
304   p_aci_information12           => p_aci_information12,
305   p_aci_information13           => p_aci_information13,
306   p_aci_information14           => p_aci_information14,
307   p_aci_information15           => p_aci_information15,
308   p_aci_information16           => p_aci_information16,
309   p_aci_information17           => p_aci_information17,
310   p_aci_information18           => p_aci_information18,
311   p_aci_information19           => p_aci_information19,
312   p_aci_information20           => p_aci_information20,
313   p_start_date_active           => p_start_date_active,
314   p_end_date_active             => p_end_date_active,
315   p_primary_flag                => p_primary_flag,
316   p_category_usage_id           => p_category_usage_id
317 );
318 
319   exception
320     when hr_api.cannot_find_prog_unit then
321       hr_api.cannot_find_prog_unit_error
322         (p_module_name => 'update_act_cat_inclusion_b'
323         ,p_hook_type   => 'BP'
324         );
325   end;
326   --
327   -- Validation in addition to Row Handlers
328   --
329   --
330   -- Process Logic
331   --
332   ota_aci_upd.upd
333    (p_effective_date             => l_effective_date,
334    p_activity_version_id        => p_activity_version_id ,
335   p_activity_category           => p_activity_category,
336   p_comments                    => p_comments,
337   p_object_version_number       => p_object_version_number,
338   p_aci_information_category    => p_aci_information_category,
339   p_aci_information1            => p_aci_information1,
340   p_aci_information2            => p_aci_information2,
341   p_aci_information3            => p_aci_information3,
342   p_aci_information4            => p_aci_information4,
343   p_aci_information5            => p_aci_information5 ,
344   p_aci_information6            => p_aci_information6,
345   p_aci_information7            => p_aci_information7,
346   p_aci_information8            => p_aci_information8,
347   p_aci_information9            => p_aci_information9,
348   p_aci_information10           => p_aci_information10,
349   p_aci_information11           => p_aci_information11,
350   p_aci_information12           => p_aci_information12,
351   p_aci_information13           => p_aci_information13,
352   p_aci_information14           => p_aci_information14,
353   p_aci_information15           => p_aci_information15,
354   p_aci_information16           => p_aci_information16,
355   p_aci_information17           => p_aci_information17,
356   p_aci_information18           => p_aci_information18,
357   p_aci_information19           => p_aci_information19,
358   p_aci_information20           => p_aci_information20,
359   p_start_date_active           => p_start_date_active,
360   p_end_date_active             => p_end_date_active,
361   p_primary_flag                => p_primary_flag,
362   p_category_usage_id           => p_category_usage_id
363   );
364   --
365   -- Call After Process User Hook
366   --
367   begin
368   OTA_activity_category_bk2.update_act_cat_inclusion_a
369    (p_effective_date             => l_effective_date,
370    p_activity_version_id        => p_activity_version_id ,
371   p_activity_category           => p_activity_category,
372   p_comments                    => p_comments,
373   p_object_version_number       => p_object_version_number,
374   p_aci_information_category    => p_aci_information_category,
375   p_aci_information1            => p_aci_information1,
376   p_aci_information2            => p_aci_information2,
377   p_aci_information3            => p_aci_information3,
378   p_aci_information4            => p_aci_information4,
379   p_aci_information5            => p_aci_information5 ,
380   p_aci_information6            => p_aci_information6,
381   p_aci_information7            => p_aci_information7,
382   p_aci_information8            => p_aci_information8,
383   p_aci_information9            => p_aci_information9,
384   p_aci_information10           => p_aci_information10,
385   p_aci_information11           => p_aci_information11,
386   p_aci_information12           => p_aci_information12,
387   p_aci_information13           => p_aci_information13,
388   p_aci_information14           => p_aci_information14,
389   p_aci_information15           => p_aci_information15,
390   p_aci_information16           => p_aci_information16,
391   p_aci_information17           => p_aci_information17,
392   p_aci_information18           => p_aci_information18,
393   p_aci_information19           => p_aci_information19,
394   p_aci_information20           => p_aci_information20,
395   p_start_date_active           => p_start_date_active,
396   p_end_date_active             => p_end_date_active,
397   p_primary_flag                => p_primary_flag,
398   p_category_usage_id           => p_category_usage_id
399   );
400   exception
401     when hr_api.cannot_find_prog_unit then
402       hr_api.cannot_find_prog_unit_error
403         (p_module_name => 'update_act_cat_inclusion'
404         ,p_hook_type   => 'AP'
405         );
406   end;
407   --
408   -- When in validation only mode raise the Validate_Enabled exception
409   --
410   if p_validate then
411     raise hr_api.validate_enabled;
412   end if;
413   --
414   -- Set all output arguments
415   --
416   -- p_object_version_number  := l_object_version_number;
417   --
418   hr_utility.set_location(' Leaving:'||l_proc, 70);
419 exception
420   when hr_api.validate_enabled then
421     --
422     -- As the Validate_Enabled exception has been raised
423     -- we must rollback to the savepoint
424     --
425     rollback to update_act_cat_inclusion ;
426     --
427     -- Only set output warning arguments
428     -- (Any key or derived arguments must be set to null
429     -- when validation only mode is being used.)
430     --
431     p_object_version_number  := null;
432     hr_utility.set_location(' Leaving:'||l_proc, 80);
433   when others then
434     --
435     -- A validation or unexpected error has occured
436     --
437     rollback to update_act_cat_inclusion ;
438     hr_utility.set_location(' Leaving:'||l_proc, 90);
439     p_object_version_number := l_object_version_number;
440     raise;
441 end update_act_cat_inclusion ;
442 
443 --
444 -- ----------------------------------------------------------------------------
445 -- |-------------------------< delete_act_cat_inclusion >------------------|
446 -- ----------------------------------------------------------------------------
447 --
448 procedure delete_act_cat_inclusion
449 ( p_activity_version_id                in number,
450   p_category_usage_id                   in varchar2,
451   p_object_version_number              in number,
452   p_validate                           in boolean default false
453 
454   ) is
455   --
456   -- Declare cursors and local variables
457   --
458   l_proc                    varchar2(72) := g_package||' delete_act_cat_inclusion ';
459   --
460 begin
461   hr_utility.set_location('Entering:'|| l_proc, 10);
462   --
463   -- Issue a savepoint
464   --
465   savepoint delete_act_cat_inclusion ;
466   --
467   -- Call Before Process User Hook
468   --
469   begin
470     OTA_activity_category_bk3.delete_act_cat_inclusion_b
471     (p_activity_version_id        => p_activity_version_id ,
472      p_category_usage_id           => p_category_usage_id,
473      p_object_version_number       => p_object_version_number);
474 
475   exception
476     when hr_api.cannot_find_prog_unit then
477       hr_api.cannot_find_prog_unit_error
478         (p_module_name => 'delete_act_cat_inclusion_b '
479         ,p_hook_type   => 'BP'
480         );
481   end;
482   --
483   -- Validation in addition to Row Handlers
484   --
485   --
486   -- Process Logic
487   --
488   OTA_aci_del.del
489     (p_activity_version_id        => p_activity_version_id ,
490      p_category_usage_id           => p_category_usage_id,
491      p_object_version_number       => p_object_version_number);
492   --
493   -- Call After Process User Hook
494   --
495   begin
496   OTA_activity_category_bk3.delete_act_cat_inclusion_a
497     (p_activity_version_id        => p_activity_version_id ,
498      p_category_usage_id           => p_category_usage_id,
499      p_object_version_number       => p_object_version_number);
500   exception
501     when hr_api.cannot_find_prog_unit then
502       hr_api.cannot_find_prog_unit_error
503         (p_module_name => 'delete_act_cat_inclusion_a '
504         ,p_hook_type   => 'AP'
505         );
506   end;
507   --
508   -- When in validation only mode raise the Validate_Enabled exception
509   --
510   if p_validate then
511     raise hr_api.validate_enabled;
512   end if;
513   --
514   -- Set all output arguments
515   --
516   --
517   hr_utility.set_location(' Leaving:'||l_proc, 170);
518 exception
519   when hr_api.validate_enabled then
520     --
521     -- As the Validate_Enabled exception has been raised
522     -- we must rollback to the savepoint
523     --
524     rollback to delete_act_cat_inclusion ;
525     --
526     -- Only set output warning arguments
527     -- (Any key or derived arguments must be set to null
528     -- when validation only mode is being used.)
529     --
530     hr_utility.set_location(' Leaving:'||l_proc, 180);
531   when others then
532     --
533     -- A validation or unexpected error has occured
534     --
535     rollback to delete_act_cat_inclusion ;
536     hr_utility.set_location(' Leaving:'||l_proc, 190);
537     raise;
538 end delete_act_cat_inclusion;
539 --
540 end ota_activity_category_api;