DBA Data[Home] [Help]

PACKAGE BODY: APPS.PQP_ANALYZED_ALIEN_DET_API

Source


1 Package Body pqp_analyzed_alien_det_api as
2 /* $Header: pqdetapi.pkb 115.7 2003/01/22 00:54:43 tmehra ship $ */
3 --
4 -- Package Variables
5 --
6 g_package  varchar2(33) := '  pqp_analyzed_alien_det_api.';
7 --
8 -- ----------------------------------------------------------------------------
9 -- |------------------------< create_analyzed_alien_det >----------------------|
10 -- ----------------------------------------------------------------------------
11 --
12 procedure create_analyzed_alien_det
13   (p_validate                       in  boolean   default false
14   ,p_analyzed_data_details_id       out nocopy number
15   ,p_analyzed_data_id               in  number    default null
16   ,p_income_code                    in  varchar2  default null
17   ,p_withholding_rate               in  number    default null
18   ,p_income_code_sub_type           in  varchar2  default null
19   ,p_exemption_code                 in  varchar2  default null
20   ,p_maximum_benefit_amount         in  number    default null
21   ,p_retro_lose_ben_amt_flag        in  varchar2  default null
22   ,p_date_benefit_ends              in  date      default null
23   ,p_retro_lose_ben_date_flag       in  varchar2  default null
24   ,p_nra_exempt_from_ss             in  varchar2  default null
25   ,p_nra_exempt_from_medicare       in  varchar2  default null
26   ,p_student_exempt_from_ss         in  varchar2  default null
27   ,p_student_exempt_from_medi       in  varchar2  default null
28   ,p_addl_withholding_flag          in  varchar2  default null
29   ,p_constant_addl_tax              in  number    default null
30   ,p_addl_withholding_amt           in  number    default null
31   ,p_addl_wthldng_amt_period_type   in  varchar2  default null
32   ,p_personal_exemption             in  number    default null
33   ,p_addl_exemption_allowed         in  number    default null
34   ,p_treaty_ben_allowed_flag        in  varchar2  default null
35   ,p_treaty_benefits_start_date     in  date      default null
36   ,p_object_version_number          out nocopy number
37   ,p_effective_date                 in  date
38   ,p_retro_loss_notification_sent   in  varchar2  default null
39   ,p_current_analysis               in  varchar2  default null
40   ,p_forecast_income_code           in  varchar2  default null
41   ) is
42   --
43   -- Declare cursors and local variables
44   --
45   l_analyzed_data_details_id pqp_analyzed_alien_details.analyzed_data_details_id%TYPE;
46   l_proc varchar2(72) := g_package||'create_analyzed_alien_det';
47   l_object_version_number pqp_analyzed_alien_details.object_version_number%TYPE;
48   --
49 begin
50   --
51   hr_utility.set_location('Entering:'|| l_proc, 10);
52   --
53   -- Issue a savepoint if operating in validation only mode
54   --
55   savepoint create_analyzed_alien_det;
56   --
57   hr_utility.set_location(l_proc, 20);
58   --
59   -- Process Logic
60   --
61   begin
62     --
63     -- Start of API User Hook for the before hook of create_analyzed_alien_det
64     --
65     pqp_analyzed_alien_det_bk1.create_analyzed_alien_det_b
66       (
67        p_analyzed_data_id               =>  p_analyzed_data_id
68       ,p_income_code                    =>  p_income_code
69       ,p_withholding_rate               =>  p_withholding_rate
70       ,p_income_code_sub_type           =>  p_income_code_sub_type
71       ,p_exemption_code                 =>  p_exemption_code
72       ,p_maximum_benefit_amount         =>  p_maximum_benefit_amount
73       ,p_retro_lose_ben_amt_flag        =>  p_retro_lose_ben_amt_flag
74       ,p_date_benefit_ends              =>  p_date_benefit_ends
75       ,p_retro_lose_ben_date_flag       =>  p_retro_lose_ben_date_flag
76       ,p_nra_exempt_from_ss             =>  p_nra_exempt_from_ss
77       ,p_nra_exempt_from_medicare       =>  p_nra_exempt_from_medicare
78       ,p_student_exempt_from_ss         =>  p_student_exempt_from_ss
79       ,p_student_exempt_from_medi       =>  p_student_exempt_from_medi
80       ,p_addl_withholding_flag          =>  p_addl_withholding_flag
81       ,p_constant_addl_tax              =>  p_constant_addl_tax
82       ,p_addl_withholding_amt           =>  p_addl_withholding_amt
83       ,p_addl_wthldng_amt_period_type   =>  p_addl_wthldng_amt_period_type
84       ,p_personal_exemption             =>  p_personal_exemption
85       ,p_addl_exemption_allowed         =>  p_addl_exemption_allowed
86       ,p_treaty_ben_allowed_flag        =>  p_treaty_ben_allowed_flag
87       ,p_treaty_benefits_start_date     =>  p_treaty_benefits_start_date
88       ,p_effective_date                 =>  trunc(p_effective_date)
89       ,p_retro_loss_notification_sent   =>  p_retro_loss_notification_sent
90       ,p_current_analysis               =>  p_current_analysis
91       ,p_forecast_income_code           =>  p_forecast_income_code
92       );
93   exception
94     when hr_api.cannot_find_prog_unit then
95       hr_api.cannot_find_prog_unit_error
96         (
97          p_module_name => 'CREATE_ANALYZED_ALIEN_DET'
98         ,p_hook_type   => 'BP'
99         );
100     --
101     -- End of API User Hook for the before hook of create_analyzed_alien_det
102     --
103   end;
104   --
105   pqp_det_ins.ins
106     (
107      p_analyzed_data_details_id      => l_analyzed_data_details_id
108     ,p_analyzed_data_id              => p_analyzed_data_id
109     ,p_income_code                   => p_income_code
110     ,p_withholding_rate              => p_withholding_rate
111     ,p_income_code_sub_type          => p_income_code_sub_type
112     ,p_exemption_code                => p_exemption_code
113     ,p_maximum_benefit_amount        => p_maximum_benefit_amount
114     ,p_retro_lose_ben_amt_flag       => p_retro_lose_ben_amt_flag
115     ,p_date_benefit_ends             => p_date_benefit_ends
116     ,p_retro_lose_ben_date_flag      => p_retro_lose_ben_date_flag
117     ,p_nra_exempt_from_ss            => p_nra_exempt_from_ss
118     ,p_nra_exempt_from_medicare      => p_nra_exempt_from_medicare
119     ,p_student_exempt_from_ss        => p_student_exempt_from_ss
120     ,p_student_exempt_from_medi      => p_student_exempt_from_medi
121     ,p_addl_withholding_flag         => p_addl_withholding_flag
122     ,p_constant_addl_tax             => p_constant_addl_tax
123     ,p_addl_withholding_amt          => p_addl_withholding_amt
124     ,p_addl_wthldng_amt_period_type  => p_addl_wthldng_amt_period_type
125     ,p_personal_exemption            => p_personal_exemption
126     ,p_addl_exemption_allowed        => p_addl_exemption_allowed
127     ,p_treaty_ben_allowed_flag       => p_treaty_ben_allowed_flag
128     ,p_treaty_benefits_start_date    => p_treaty_benefits_start_date
129     ,p_object_version_number         => l_object_version_number
130     ,p_effective_date                => trunc(p_effective_date)
131     ,p_retro_loss_notification_sent  => p_retro_loss_notification_sent
132     ,p_current_analysis              =>  p_current_analysis
133     ,p_forecast_income_code          =>  p_forecast_income_code
134     );
135   --
136   begin
137     --
138     -- Start of API User Hook for the after hook of create_analyzed_alien_det
139     --
140     pqp_analyzed_alien_det_bk1.create_analyzed_alien_det_a
141       (
142        p_analyzed_data_details_id       =>  l_analyzed_data_details_id
143       ,p_analyzed_data_id               =>  p_analyzed_data_id
144       ,p_income_code                    =>  p_income_code
145       ,p_withholding_rate               =>  p_withholding_rate
146       ,p_income_code_sub_type           =>  p_income_code_sub_type
147       ,p_exemption_code                 =>  p_exemption_code
148       ,p_maximum_benefit_amount         =>  p_maximum_benefit_amount
149       ,p_retro_lose_ben_amt_flag        =>  p_retro_lose_ben_amt_flag
150       ,p_date_benefit_ends              =>  p_date_benefit_ends
151       ,p_retro_lose_ben_date_flag       =>  p_retro_lose_ben_date_flag
152       ,p_nra_exempt_from_ss             =>  p_nra_exempt_from_ss
153       ,p_nra_exempt_from_medicare       =>  p_nra_exempt_from_medicare
154       ,p_student_exempt_from_ss         =>  p_student_exempt_from_ss
155       ,p_student_exempt_from_medi       =>  p_student_exempt_from_medi
156       ,p_addl_withholding_flag          =>  p_addl_withholding_flag
157       ,p_constant_addl_tax              =>  p_constant_addl_tax
158       ,p_addl_withholding_amt           =>  p_addl_withholding_amt
159       ,p_addl_wthldng_amt_period_type   =>  p_addl_wthldng_amt_period_type
160       ,p_personal_exemption             =>  p_personal_exemption
161       ,p_addl_exemption_allowed         =>  p_addl_exemption_allowed
162       ,p_treaty_ben_allowed_flag        =>  p_treaty_ben_allowed_flag
163       ,p_treaty_benefits_start_date     =>  p_treaty_benefits_start_date
164       ,p_object_version_number          =>  l_object_version_number
165       ,p_effective_date                 => trunc(p_effective_date)
166       ,p_retro_loss_notification_sent   => p_retro_loss_notification_sent
167       ,p_current_analysis              =>  p_current_analysis
168       ,p_forecast_income_code          =>  p_forecast_income_code
169       );
170   exception
171     when hr_api.cannot_find_prog_unit then
172       hr_api.cannot_find_prog_unit_error
173         (p_module_name => 'CREATE_ANALYZED_ALIEN_DET'
174         ,p_hook_type   => 'AP'
175         );
176     --
177     -- End of API User Hook for the after hook of create_analyzed_alien_det
178     --
179   end;
180   --
181   hr_utility.set_location(l_proc, 60);
182   --
183   -- When in validation only mode raise the Validate_Enabled exception
184   --
185   if p_validate then
186     raise hr_api.validate_enabled;
187   end if;
188   --
189   -- Set all output arguments
190   --
191   p_analyzed_data_details_id := l_analyzed_data_details_id;
192   p_object_version_number := l_object_version_number;
193   --
194   hr_utility.set_location(' Leaving:'||l_proc, 70);
195   --
196 exception
197   --
198   when hr_api.validate_enabled then
199     --
200     -- As the Validate_Enabled exception has been raised
201     -- we must rollback to the savepoint
202     --
203     ROLLBACK TO create_analyzed_alien_det;
204     --
205     -- Only set output warning arguments
206     -- (Any key or derived arguments must be set to null
207     -- when validation only mode is being used.)
208     --
209     p_analyzed_data_details_id := null;
210     p_object_version_number  := null;
211     hr_utility.set_location(' Leaving:'||l_proc, 80);
212     --
213   when others then
214     --
215     -- A validation or unexpected error has occured
216     --
217     ROLLBACK TO create_analyzed_alien_det;
218     p_analyzed_data_details_id := null;
219     p_object_version_number := null;
220   --
221   hr_utility.set_location(' Leaving:'||l_proc, 90);
222 
223     raise;
224     --
225 end create_analyzed_alien_det;
226 -- ----------------------------------------------------------------------------
227 -- |------------------------< update_analyzed_alien_det >--- ------------------|
228 -- ----------------------------------------------------------------------------
229 --
230 procedure update_analyzed_alien_det
231   (p_validate                       in  boolean   default false
232   ,p_analyzed_data_details_id       in  number
233   ,p_analyzed_data_id               in  number    default hr_api.g_number
234   ,p_income_code                    in  varchar2  default hr_api.g_varchar2
235   ,p_withholding_rate               in  number    default hr_api.g_number
236   ,p_income_code_sub_type           in  varchar2  default hr_api.g_varchar2
237   ,p_exemption_code                 in  varchar2  default hr_api.g_varchar2
238   ,p_maximum_benefit_amount         in  number    default hr_api.g_number
239   ,p_retro_lose_ben_amt_flag        in  varchar2  default hr_api.g_varchar2
240   ,p_date_benefit_ends              in  date      default hr_api.g_date
241   ,p_retro_lose_ben_date_flag       in  varchar2  default hr_api.g_varchar2
242   ,p_nra_exempt_from_ss             in  varchar2  default hr_api.g_varchar2
243   ,p_nra_exempt_from_medicare       in  varchar2  default hr_api.g_varchar2
244   ,p_student_exempt_from_ss         in  varchar2  default hr_api.g_varchar2
245   ,p_student_exempt_from_medi       in  varchar2  default hr_api.g_varchar2
246   ,p_addl_withholding_flag          in  varchar2  default hr_api.g_varchar2
247   ,p_constant_addl_tax              in  number    default hr_api.g_number
248   ,p_addl_withholding_amt           in  number    default hr_api.g_number
249   ,p_addl_wthldng_amt_period_type   in  varchar2  default hr_api.g_varchar2
250   ,p_personal_exemption             in  number    default hr_api.g_number
251   ,p_addl_exemption_allowed         in  number    default hr_api.g_number
252   ,p_treaty_ben_allowed_flag        in  varchar2  default hr_api.g_varchar2
253   ,p_treaty_benefits_start_date     in  date      default hr_api.g_date
254   ,p_object_version_number          in  out nocopy number
255   ,p_effective_date                 in  date
256   ,p_retro_loss_notification_sent   in  varchar2  default hr_api.g_varchar2
257   ,p_current_analysis               in  varchar2  default hr_api.g_varchar2
258   ,p_forecast_income_code           in  varchar2  default hr_api.g_varchar2
259   ) is
260   --
261   -- Declare cursors and local variables
262   --
263   l_proc varchar2(72) := g_package||'update_analyzed_alien_det';
264   l_object_version_number pqp_analyzed_alien_details.object_version_number%TYPE;
265   --
266 begin
267   --
268   hr_utility.set_location('Entering:'|| l_proc, 10);
269   --
270   -- Issue a savepoint if operating in validation only mode
271   --
272   savepoint update_analyzed_alien_det;
273   --
274   hr_utility.set_location(l_proc, 20);
275   --
276   -- Process Logic
277   --
278   l_object_version_number := p_object_version_number;
279   --
280   begin
281     --
282     -- Start of API User Hook for the before hook of update_analyzed_alien_det
283     --
284     pqp_analyzed_alien_det_bk2.update_analyzed_alien_det_b
285       (
286        p_analyzed_data_details_id       =>  p_analyzed_data_details_id
287       ,p_analyzed_data_id               =>  p_analyzed_data_id
288       ,p_income_code                    =>  p_income_code
289       ,p_withholding_rate               =>  p_withholding_rate
290       ,p_income_code_sub_type           =>  p_income_code_sub_type
291       ,p_exemption_code                 =>  p_exemption_code
292       ,p_maximum_benefit_amount         =>  p_maximum_benefit_amount
293       ,p_retro_lose_ben_amt_flag        =>  p_retro_lose_ben_amt_flag
294       ,p_date_benefit_ends              =>  p_date_benefit_ends
295       ,p_retro_lose_ben_date_flag       =>  p_retro_lose_ben_date_flag
296       ,p_nra_exempt_from_ss             =>  p_nra_exempt_from_ss
297       ,p_nra_exempt_from_medicare       =>  p_nra_exempt_from_medicare
298       ,p_student_exempt_from_ss         =>  p_student_exempt_from_ss
299       ,p_student_exempt_from_medi       =>  p_student_exempt_from_medi
300       ,p_addl_withholding_flag          =>  p_addl_withholding_flag
301       ,p_constant_addl_tax              =>  p_constant_addl_tax
302       ,p_addl_withholding_amt           =>  p_addl_withholding_amt
303       ,p_addl_wthldng_amt_period_type   =>  p_addl_wthldng_amt_period_type
304       ,p_personal_exemption             =>  p_personal_exemption
305       ,p_addl_exemption_allowed         =>  p_addl_exemption_allowed
306       ,p_treaty_ben_allowed_flag        =>  p_treaty_ben_allowed_flag
307       ,p_treaty_benefits_start_date     =>  p_treaty_benefits_start_date
308       ,p_object_version_number          =>  p_object_version_number
309       ,p_effective_date                 =>  trunc(p_effective_date)
310       ,p_retro_loss_notification_sent   =>  p_retro_loss_notification_sent
311       ,p_current_analysis               =>  p_current_analysis
312       ,p_forecast_income_code           =>  p_forecast_income_code
313       );
314   exception
315     when hr_api.cannot_find_prog_unit then
316       hr_api.cannot_find_prog_unit_error
317         (p_module_name => 'UPDATE_ANALYZED_ALIEN_DET'
318         ,p_hook_type   => 'BP'
319         );
320     --
321     -- End of API User Hook for the before hook of update_analyzed_alien_det
322     --
323   end;
324   --
325   pqp_det_upd.upd
326     (
327      p_analyzed_data_details_id      => p_analyzed_data_details_id
328     ,p_analyzed_data_id              => p_analyzed_data_id
329     ,p_income_code                   => p_income_code
333     ,p_maximum_benefit_amount        => p_maximum_benefit_amount
330     ,p_withholding_rate              => p_withholding_rate
331     ,p_income_code_sub_type          => p_income_code_sub_type
332     ,p_exemption_code                => p_exemption_code
334     ,p_retro_lose_ben_amt_flag       => p_retro_lose_ben_amt_flag
335     ,p_date_benefit_ends             => p_date_benefit_ends
336     ,p_retro_lose_ben_date_flag      => p_retro_lose_ben_date_flag
337     ,p_nra_exempt_from_ss            => p_nra_exempt_from_ss
338     ,p_nra_exempt_from_medicare      => p_nra_exempt_from_medicare
339     ,p_student_exempt_from_ss        => p_student_exempt_from_ss
340     ,p_student_exempt_from_medi      => p_student_exempt_from_medi
341     ,p_addl_withholding_flag         => p_addl_withholding_flag
342     ,p_constant_addl_tax             => p_constant_addl_tax
343     ,p_addl_withholding_amt          => p_addl_withholding_amt
344     ,p_addl_wthldng_amt_period_type  => p_addl_wthldng_amt_period_type
345     ,p_personal_exemption            => p_personal_exemption
346     ,p_addl_exemption_allowed        => p_addl_exemption_allowed
347     ,p_treaty_ben_allowed_flag       => p_treaty_ben_allowed_flag
348     ,p_treaty_benefits_start_date    => p_treaty_benefits_start_date
349     ,p_object_version_number         => l_object_version_number
350     ,p_effective_date                => trunc(p_effective_date)
351     ,p_retro_loss_notification_sent  => p_retro_loss_notification_sent
352     ,p_current_analysis               =>  p_current_analysis
353     ,p_forecast_income_code           =>  p_forecast_income_code
354     );
355   --
356   begin
357     --
358     -- Start of API User Hook for the after hook of update_analyzed_alien_det
359     --
360     pqp_analyzed_alien_det_bk2.update_analyzed_alien_det_a
361       (
362        p_analyzed_data_details_id       =>  p_analyzed_data_details_id
363       ,p_analyzed_data_id               =>  p_analyzed_data_id
364       ,p_income_code                    =>  p_income_code
365       ,p_withholding_rate               =>  p_withholding_rate
366       ,p_income_code_sub_type           =>  p_income_code_sub_type
367       ,p_exemption_code                 =>  p_exemption_code
368       ,p_maximum_benefit_amount         =>  p_maximum_benefit_amount
369       ,p_retro_lose_ben_amt_flag        =>  p_retro_lose_ben_amt_flag
370       ,p_date_benefit_ends              =>  p_date_benefit_ends
371       ,p_retro_lose_ben_date_flag       =>  p_retro_lose_ben_date_flag
372       ,p_nra_exempt_from_ss             =>  p_nra_exempt_from_ss
373       ,p_nra_exempt_from_medicare       =>  p_nra_exempt_from_medicare
374       ,p_student_exempt_from_ss         =>  p_student_exempt_from_ss
375       ,p_student_exempt_from_medi       =>  p_student_exempt_from_medi
376       ,p_addl_withholding_flag          =>  p_addl_withholding_flag
377       ,p_constant_addl_tax              =>  p_constant_addl_tax
378       ,p_addl_withholding_amt           =>  p_addl_withholding_amt
379       ,p_addl_wthldng_amt_period_type   =>  p_addl_wthldng_amt_period_type
380       ,p_personal_exemption             =>  p_personal_exemption
381       ,p_addl_exemption_allowed         =>  p_addl_exemption_allowed
382       ,p_treaty_ben_allowed_flag        =>  p_treaty_ben_allowed_flag
383       ,p_treaty_benefits_start_date     =>  p_treaty_benefits_start_date
384       ,p_object_version_number          =>  l_object_version_number
385       ,p_effective_date                 => trunc(p_effective_date)
386       ,p_retro_loss_notification_sent   => p_retro_loss_notification_sent
387       ,p_current_analysis               =>  p_current_analysis
388       ,p_forecast_income_code           =>  p_forecast_income_code
389       );
390   exception
391     when hr_api.cannot_find_prog_unit then
392       hr_api.cannot_find_prog_unit_error
393         (p_module_name => 'UPDATE_ANALYZED_ALIEN_DET'
394         ,p_hook_type   => 'AP'
395         );
396     --
397     -- End of API User Hook for the after hook of update_analyzed_alien_det
398     --
399   end;
400   --
401   hr_utility.set_location(l_proc, 60);
402   --
403   -- When in validation only mode raise the Validate_Enabled exception
404   --
405   if p_validate then
406     raise hr_api.validate_enabled;
407   end if;
408   --
409   -- Set all output arguments
410   --
411   p_object_version_number := l_object_version_number;
412   --
413   hr_utility.set_location(' Leaving:'||l_proc, 70);
414   --
415 exception
416   --
417   when hr_api.validate_enabled then
418     --
419     -- As the Validate_Enabled exception has been raised
420     -- we must rollback to the savepoint
421     --
422     ROLLBACK TO update_analyzed_alien_det;
423     --
424     -- Only set output warning arguments
425     -- (Any key or derived arguments must be set to null
426     -- when validation only mode is being used.)
427     --
428     hr_utility.set_location(' Leaving:'||l_proc, 80);
429     --
430   when others then
431     --
432     -- A validation or unexpected error has occured
433     --
434     ROLLBACK TO update_analyzed_alien_det;
435     p_object_version_number := l_object_version_number;
436     hr_utility.set_location(' Leaving:'||l_proc, 90);
437     raise;
438     --
439 end update_analyzed_alien_det;
440 -- ----------------------------------------------------------------------------
441 -- |------------------------< delete_analyzed_alien_det >----------------------|
445   (p_validate                       in  boolean  default false
442 -- ----------------------------------------------------------------------------
443 --
444 procedure delete_analyzed_alien_det
446   ,p_analyzed_data_details_id       in  number
447   ,p_object_version_number          in  out nocopy number
448   ,p_effective_date                 in  date
449   ) is
450   --
451   -- Declare cursors and local variables
452   --
453   l_proc varchar2(72) := g_package||'update_analyzed_alien_det';
454   l_object_version_number pqp_analyzed_alien_details.object_version_number%TYPE;
455   --
456 begin
457   --
458   hr_utility.set_location('Entering:'|| l_proc, 10);
459   --
460   -- Issue a savepoint if operating in validation only mode
461   --
462   savepoint delete_analyzed_alien_det;
463   --
464   hr_utility.set_location(l_proc, 20);
465   --
466   -- Process Logic
467   --
468   l_object_version_number := p_object_version_number;
469   --
470   --
471   begin
472     --
473     -- Start of API User Hook for the before hook of delete_analyzed_alien_det
474     --
475     pqp_analyzed_alien_det_bk3.delete_analyzed_alien_det_b
476       (
477        p_analyzed_data_details_id       =>  p_analyzed_data_details_id
478       ,p_object_version_number          =>  p_object_version_number
479       ,p_effective_date                 => trunc(p_effective_date)
480       );
481   exception
482     when hr_api.cannot_find_prog_unit then
483       hr_api.cannot_find_prog_unit_error
484         (p_module_name => 'DELETE_ANALYZED_ALIEN_DET'
485         ,p_hook_type   => 'BP'
486         );
487     --
488     -- End of API User Hook for the before hook of delete_analyzed_alien_det
489     --
490   end;
491   --
492   pqp_det_del.del
493     (
494      p_analyzed_data_details_id      => p_analyzed_data_details_id
495     ,p_object_version_number         => l_object_version_number
496     ,p_effective_date                => p_effective_date
497     );
498   --
499   begin
500     --
501     -- Start of API User Hook for the after hook of delete_analyzed_alien_det
502     --
503     pqp_analyzed_alien_det_bk3.delete_analyzed_alien_det_a
504       (
505        p_analyzed_data_details_id       =>  p_analyzed_data_details_id
506       ,p_object_version_number          =>  l_object_version_number
507     ,p_effective_date                   => trunc(p_effective_date)
508       );
509   exception
510     when hr_api.cannot_find_prog_unit then
511       hr_api.cannot_find_prog_unit_error
512         (p_module_name => 'DELETE_ANALYZED_ALIEN_DET'
513         ,p_hook_type   => 'AP'
514         );
515     --
516     -- End of API User Hook for the after hook of delete_analyzed_alien_det
517     --
518   end;
519   --
520   hr_utility.set_location(l_proc, 60);
521   --
522   -- When in validation only mode raise the Validate_Enabled exception
523   --
524   if p_validate then
525     raise hr_api.validate_enabled;
526   end if;
527   --
528   hr_utility.set_location(' Leaving:'||l_proc, 70);
529   --
530 exception
531   --
532   when hr_api.validate_enabled then
533     --
534     -- As the Validate_Enabled exception has been raised
535     -- we must rollback to the savepoint
536     --
537     ROLLBACK TO delete_analyzed_alien_det;
538     --
539     -- Only set output warning arguments
540     -- (Any key or derived arguments must be set to null
541     -- when validation only mode is being used.)
542     --
543     --
544   when others then
545     --
546     -- A validation or unexpected error has occured
547     --
548     ROLLBACK TO delete_analyzed_alien_det;
549     p_object_version_number := l_object_version_number;
550     raise;
551     --
552 end delete_analyzed_alien_det;
553 --
554 -- ----------------------------------------------------------------------------
555 -- |-------------------------------< lck >------------------------------------|
556 -- ----------------------------------------------------------------------------
557 --
558 procedure lck
559   (
560    p_analyzed_data_details_id                   in     number
561   ,p_object_version_number          in     number
562   ) is
563   --
564   --
565   -- Declare cursors and local variables
566   --
567   l_proc varchar2(72) := g_package||'lck';
568   --
569 begin
570   --
571   hr_utility.set_location('Entering:'|| l_proc, 10);
572   --
573   pqp_det_shd.lck
574     (
575       p_analyzed_data_details_id                 => p_analyzed_data_details_id
576      ,p_object_version_number      => p_object_version_number
577     );
578   --
579   hr_utility.set_location(' Leaving:'||l_proc, 70);
580   --
581 end lck;
582 --
583 end pqp_analyzed_alien_det_api;