DBA Data[Home] [Help]

PACKAGE BODY: APPS.HR_CONTACT_EXTRA_INFO_SWI

Source


1 package body hr_contact_extra_info_swi as
2 /* $Header: pereiswi.pkb 120.0.12000000.1 2007/02/08 10:26:13 ssutar noship $ */
3 --
4 -- Package variables
5 --
6 g_package  varchar2(33) := 'hr_contact_extra_info_swi.';
7 --
8 ----------------------------------------------------------------------------
9 procedure create_contact_extra_info(
10     p_validate                    IN      NUMBER,
11     p_contact_extra_info_id       IN      NUMBER,
12     p_effective_date              IN      DATE,
13     p_contact_relationship_id     IN      NUMBER,
14     p_information_type            IN      VARCHAR2,
15     p_cei_information_category    IN      VARCHAR2        DEFAULT NULL,
16     p_cei_information1            IN      VARCHAR2        DEFAULT NULL,
17     p_cei_information2            IN      VARCHAR2        DEFAULT NULL,
18     p_cei_information3            IN      VARCHAR2        DEFAULT NULL,
19     p_cei_information4            IN      VARCHAR2        DEFAULT NULL,
20     p_cei_information5            IN      VARCHAR2        DEFAULT NULL,
21     p_cei_information6            IN      VARCHAR2        DEFAULT NULL,
22     p_cei_information7            IN      VARCHAR2        DEFAULT NULL,
23     p_cei_information8            IN      VARCHAR2        DEFAULT NULL,
24     p_cei_information9            IN      VARCHAR2        DEFAULT NULL,
25     p_cei_information10           IN      VARCHAR2        DEFAULT NULL,
26     p_cei_information11           IN      VARCHAR2        DEFAULT NULL,
27     p_cei_information12           IN      VARCHAR2        DEFAULT NULL,
28     p_cei_information13           IN      VARCHAR2        DEFAULT NULL,
29     p_cei_information14           IN      VARCHAR2        DEFAULT NULL,
30     p_cei_information15           IN      VARCHAR2        DEFAULT NULL,
31     p_cei_information16           IN      VARCHAR2        DEFAULT NULL,
32     p_cei_information17           IN      VARCHAR2        DEFAULT NULL,
33     p_cei_information18           IN      VARCHAR2        DEFAULT NULL,
34     p_cei_information19           IN      VARCHAR2        DEFAULT NULL,
35     p_cei_information20           IN      VARCHAR2        DEFAULT NULL,
36     p_cei_information21           IN      VARCHAR2        DEFAULT NULL,
37     p_cei_information22           IN      VARCHAR2        DEFAULT NULL,
38     p_cei_information23           IN      VARCHAR2        DEFAULT NULL,
39     p_cei_information24           IN      VARCHAR2        DEFAULT NULL,
40     p_cei_information25           IN      VARCHAR2        DEFAULT NULL,
41     p_cei_information26           IN      VARCHAR2        DEFAULT NULL,
42     p_cei_information27           IN      VARCHAR2        DEFAULT NULL,
43     p_cei_information28           IN      VARCHAR2        DEFAULT NULL,
44     p_cei_information29           IN      VARCHAR2        DEFAULT NULL,
45     p_cei_information30           IN      VARCHAR2        DEFAULT NULL,
46     p_cei_attribute_category      IN      VARCHAR2        DEFAULT NULL,
47     p_cei_attribute1              IN      VARCHAR2        DEFAULT NULL,
48     p_cei_attribute2              IN      VARCHAR2        DEFAULT NULL,
49     p_cei_attribute3              IN      VARCHAR2        DEFAULT NULL,
50     p_cei_attribute4              IN      VARCHAR2        DEFAULT NULL,
51     p_cei_attribute5              IN      VARCHAR2        DEFAULT NULL,
52     p_cei_attribute6              IN      VARCHAR2        DEFAULT NULL,
53     p_cei_attribute7              IN      VARCHAR2        DEFAULT NULL,
54     p_cei_attribute8              IN      VARCHAR2        DEFAULT NULL,
55     p_cei_attribute9              IN      VARCHAR2        DEFAULT NULL,
56     p_cei_attribute10             IN      VARCHAR2        DEFAULT NULL,
57     p_cei_attribute11             IN      VARCHAR2        DEFAULT NULL,
58     p_cei_attribute12             IN      VARCHAR2        DEFAULT NULL,
59     p_cei_attribute13             IN      VARCHAR2        DEFAULT NULL,
60     p_cei_attribute14             IN      VARCHAR2        DEFAULT NULL,
61     p_cei_attribute15             IN      VARCHAR2        DEFAULT NULL,
62     p_cei_attribute16             IN      VARCHAR2        DEFAULT NULL,
63     p_cei_attribute17             IN      VARCHAR2        DEFAULT NULL,
64     p_cei_attribute18             IN      VARCHAR2        DEFAULT NULL,
65     p_cei_attribute19             IN      VARCHAR2        DEFAULT NULL,
66     p_cei_attribute20             IN      VARCHAR2        DEFAULT NULL,
67     p_object_version_number       OUT     NOCOPY NUMBER,
68     p_effective_start_date        OUT     NOCOPY DATE,
69     p_effective_end_date          OUT     NOCOPY DATE,
70     p_return_status               OUT     NOCOPY VARCHAR2
71 ) as
72 
73     --
74     -- Variables for API Boolean parameters
75     l_validate                      boolean;
76     --
77     -- Variables for IN/OUT parameters
78     --
79     -- Other variables
80     l_contact_extra_info_id        number;
81     l_proc    varchar2(72) := g_package ||'insert';
82 
83 begin
84 
85     hr_utility.set_location(' Entering:' || l_proc,10);
86     --
87     -- Issue a savepoint
88     --
89     savepoint create_contact_extra_info_swi;
90     --
91     -- Initialise Multiple Message Detection
92     --
93     hr_multi_message.enable_message_list;
94     --
95     -- Remember IN OUT parameter IN values
96     --
97     --
98     -- Convert constant values to their corresponding boolean value
99     --
100     l_validate := hr_api.constant_to_boolean (p_constant_value => p_validate);
101     --
102     -- Register Surrogate ID or user key values
103     --
104 
105     per_rei_ins.set_base_key_value (
106         p_contact_extra_info_id => p_contact_extra_info_id
107     );
108 
109     --
110     -- Call API
111     --
112 
113     hr_contact_extra_info_api.create_contact_extra_info(
114         p_validate                     => l_validate,
115         p_effective_date               => p_effective_date,
116         p_contact_relationship_id      => p_contact_relationship_id,
117         p_information_type             => p_information_type,
118         p_cei_information_category     => p_cei_information_category,
119         p_cei_information1             => p_cei_information1,
120         p_cei_information2             => p_cei_information2,
121         p_cei_information3             => p_cei_information3,
122         p_cei_information4             => p_cei_information4,
123         p_cei_information5             => p_cei_information5,
124         p_cei_information6             => p_cei_information6,
125         p_cei_information7             => p_cei_information7,
126         p_cei_information8             => p_cei_information8,
127         p_cei_information9             => p_cei_information9,
128         p_cei_information10            => p_cei_information10,
129         p_cei_information11            => p_cei_information11,
130         p_cei_information12            => p_cei_information12,
131         p_cei_information13            => p_cei_information13,
132         p_cei_information14            => p_cei_information14,
133         p_cei_information15            => p_cei_information15,
134         p_cei_information16            => p_cei_information16,
135         p_cei_information17            => p_cei_information17,
136         p_cei_information18            => p_cei_information18,
137         p_cei_information19            => p_cei_information19,
138         p_cei_information20            => p_cei_information20,
139         p_cei_information21            => p_cei_information21,
140         p_cei_information22            => p_cei_information22,
141         p_cei_information23            => p_cei_information23,
142         p_cei_information24            => p_cei_information24,
143         p_cei_information25            => p_cei_information25,
144         p_cei_information26            => p_cei_information26,
145         p_cei_information27            => p_cei_information27,
146         p_cei_information28            => p_cei_information28,
147         p_cei_information29            => p_cei_information29,
148         p_cei_information30            => p_cei_information30,
149         p_cei_attribute_category       => p_cei_attribute_category,
150         p_cei_attribute1               => p_cei_attribute1,
151         p_cei_attribute2               => p_cei_attribute2,
152         p_cei_attribute3               => p_cei_attribute3,
153         p_cei_attribute4               => p_cei_attribute4,
154         p_cei_attribute5               => p_cei_attribute5,
155         p_cei_attribute6               => p_cei_attribute6,
156         p_cei_attribute7               => p_cei_attribute7,
157         p_cei_attribute8               => p_cei_attribute8,
158         p_cei_attribute9               => p_cei_attribute9,
159         p_cei_attribute10              => p_cei_attribute10,
160         p_cei_attribute11              => p_cei_attribute11,
161         p_cei_attribute12              => p_cei_attribute12,
162         p_cei_attribute13              => p_cei_attribute13,
163         p_cei_attribute14              => p_cei_attribute14,
164         p_cei_attribute15              => p_cei_attribute15,
165         p_cei_attribute16              => p_cei_attribute16,
166         p_cei_attribute17              => p_cei_attribute17,
167         p_cei_attribute18              => p_cei_attribute18,
168         p_cei_attribute19              => p_cei_attribute19,
169         p_cei_attribute20              => p_cei_attribute20,
170         p_contact_extra_info_id        => l_contact_extra_info_id,
171         p_object_version_number        => p_object_version_number,
172         p_effective_start_date         => p_effective_start_date,
173         p_effective_end_date           => p_effective_end_date);
174 
175     --
176     -- Convert API warning boolean parameter values to specific
177     -- messages and add them to Multiple Message List
178     --
179     --
180     -- Convert API non-warning boolean parameter values
181     --
182     --
183     -- Derive the API return status value based on whether
184     -- messages of any type exist in the Multiple Message List.
185     -- Also disable Multiple Message Detection.
186     --
187     If l_validate = TRUE Then
188         rollback to create_contact_extra_info_swi;
189     End If;
190     --
191     p_return_status := hr_multi_message.get_return_status_disable;
192     hr_utility.set_location(' Leaving:' || l_proc,20);
193     --
194 exception
195     when hr_multi_message.error_message_exist then
196         --
197         -- Catch the Multiple Message List exception which
198         -- indicates API processing has been aborted because
199         -- at least one message exists in the list.
200         --
201         rollback to create_contact_extra_info_swi;
202         --
203         -- Reset IN OUT parameters and set OUT parameters
204         --
205         p_object_version_number        := null;
206         p_effective_start_date         := null;
207         p_effective_end_date           := null;
208         p_return_status := hr_multi_message.get_return_status_disable;
209         hr_utility.set_location(' Leaving:' || l_proc, 30);
210     when others then
211         --
212         -- When Multiple Message Detection is enabled catch
213         -- any Application specific or other unexpected
214         -- exceptions.  Adding appropriate details to the
215         -- Multiple Message List.  Otherwise re-raise the
216         -- error.
217         --
218         rollback to create_contact_extra_info_swi;
219         if hr_multi_message.unexpected_error_add(l_proc) then
220            hr_utility.set_location(' Leaving:' || l_proc,40);
221            raise;
222         end if;
223         --
224         -- Reset IN OUT and set OUT parameters
225         --
226         p_object_version_number        := null;
227         p_effective_start_date         := null;
228         p_effective_end_date           := null;
229         p_return_status := hr_multi_message.get_return_status_disable;
230         hr_utility.set_location(' Leaving:' || l_proc,50);
231 
232 end create_contact_extra_info;
233 
234 ----------------------------------------------------------------------------
235 
236 procedure update_contact_extra_info(
237     p_validate                    IN      NUMBER,
238     p_effective_date              IN      DATE,
239     p_datetrack_update_mode       IN      VARCHAR2,
240     p_contact_extra_info_id       IN      NUMBER,
241     p_contact_relationship_id     IN      NUMBER          DEFAULT hr_api.g_number,
242     p_information_type            IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
243     p_object_version_number       IN      OUT NOCOPY NUMBER,
244     p_cei_information_category    IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
245     p_cei_information1            IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
246     p_cei_information2            IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
247     p_cei_information3            IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
248     p_cei_information4            IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
249     p_cei_information5            IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
250     p_cei_information6            IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
251     p_cei_information7            IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
252     p_cei_information8            IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
253     p_cei_information9            IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
254     p_cei_information10           IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
255     p_cei_information11           IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
256     p_cei_information12           IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
257     p_cei_information13           IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
258     p_cei_information14           IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
259     p_cei_information15           IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
260     p_cei_information16           IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
261     p_cei_information17           IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
262     p_cei_information18           IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
263     p_cei_information19           IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
264     p_cei_information20           IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
265     p_cei_information21           IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
266     p_cei_information22           IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
267     p_cei_information23           IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
268     p_cei_information24           IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
269     p_cei_information25           IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
270     p_cei_information26           IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
271     p_cei_information27           IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
272     p_cei_information28           IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
273     p_cei_information29           IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
274     p_cei_information30           IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
275     p_cei_attribute_category      IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
276     p_cei_attribute1              IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
277     p_cei_attribute2              IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
278     p_cei_attribute3              IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
279     p_cei_attribute4              IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
280     p_cei_attribute5              IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
281     p_cei_attribute6              IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
282     p_cei_attribute7              IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
283     p_cei_attribute8              IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
284     p_cei_attribute9              IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
285     p_cei_attribute10             IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
286     p_cei_attribute11             IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
287     p_cei_attribute12             IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
288     p_cei_attribute13             IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
289     p_cei_attribute14             IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
290     p_cei_attribute15             IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
291     p_cei_attribute16             IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
292     p_cei_attribute17             IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
293     p_cei_attribute18             IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
294     p_cei_attribute19             IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
295     p_cei_attribute20             IN      VARCHAR2        DEFAULT hr_api.g_varchar2,
296     p_effective_start_date        OUT     NOCOPY DATE,
297     p_effective_end_date          OUT     NOCOPY DATE,
298     p_return_status               OUT     NOCOPY VARCHAR2)
299 is
300     --
301     -- Variables for API Boolean parameters
302     l_validate                      boolean;
303     --
304     -- Variables for IN/OUT parameters
305     l_object_version_number         number;
306 
307     l_proc    varchar2(72) := g_package ||' update_contact_extra_info';
308 
309 begin
310     hr_utility.set_location(' Entering:' || l_proc,10);
311     --
312     -- Issue a savepoint
313     --
314     savepoint update_contact_extra_info_swi;
315     --
316     -- Initialise Multiple Message Detection
317     --
318     hr_multi_message.enable_message_list;
319     --
320     -- Remember IN OUT parameter IN values
321     --
322     l_object_version_number         := p_object_version_number;
323     --
324     -- Convert constant values to their corresponding boolean value
325     --
326     l_validate := hr_api.constant_to_boolean (p_constant_value => p_validate);
327     --
328     -- API call
329 
330     hr_contact_extra_info_api.update_contact_extra_info(
331         p_validate                    => l_validate,
332         p_effective_date              => p_effective_date,
333         p_datetrack_update_mode       => p_datetrack_update_mode,
334         p_contact_extra_info_id       => p_contact_extra_info_id,
335         p_contact_relationship_id     => p_contact_relationship_id,
336         p_information_type            => p_information_type,
337         p_object_version_number       => p_object_version_number,
338         p_cei_information_category    => p_cei_information_category,
339         p_cei_information1            => p_cei_information1,
340         p_cei_information2            => p_cei_information2,
341         p_cei_information3            => p_cei_information3,
342         p_cei_information4            => p_cei_information4,
343         p_cei_information5            => p_cei_information5,
344         p_cei_information6            => p_cei_information6,
345         p_cei_information7            => p_cei_information7,
346         p_cei_information8            => p_cei_information8,
347         p_cei_information9            => p_cei_information9,
348         p_cei_information10           => p_cei_information10,
349         p_cei_information11           => p_cei_information11,
350         p_cei_information12           => p_cei_information12,
351         p_cei_information13           => p_cei_information13,
352         p_cei_information14           => p_cei_information14,
353         p_cei_information15           => p_cei_information15,
354         p_cei_information16           => p_cei_information16,
355         p_cei_information17           => p_cei_information17,
356         p_cei_information18           => p_cei_information18,
357         p_cei_information19           => p_cei_information19,
358         p_cei_information20           => p_cei_information20,
359         p_cei_information21           => p_cei_information21,
360         p_cei_information22           => p_cei_information22,
361         p_cei_information23           => p_cei_information23,
362         p_cei_information24           => p_cei_information24,
363         p_cei_information25           => p_cei_information25,
364         p_cei_information26           => p_cei_information26,
365         p_cei_information27           => p_cei_information27,
366         p_cei_information28           => p_cei_information28,
367         p_cei_information29           => p_cei_information29,
368         p_cei_information30           => p_cei_information30,
369         p_cei_attribute_category      => p_cei_attribute_category,
370         p_cei_attribute1              => p_cei_attribute1,
371         p_cei_attribute2              => p_cei_attribute2,
372         p_cei_attribute3              => p_cei_attribute3,
373         p_cei_attribute4              => p_cei_attribute4,
374         p_cei_attribute5              => p_cei_attribute5,
375         p_cei_attribute6              => p_cei_attribute6,
376         p_cei_attribute7              => p_cei_attribute7,
377         p_cei_attribute8              => p_cei_attribute8,
378         p_cei_attribute9              => p_cei_attribute9,
379         p_cei_attribute10             => p_cei_attribute10,
380         p_cei_attribute11             => p_cei_attribute11,
381         p_cei_attribute12             => p_cei_attribute12,
382         p_cei_attribute13             => p_cei_attribute13,
383         p_cei_attribute14             => p_cei_attribute14,
384         p_cei_attribute15             => p_cei_attribute15,
385         p_cei_attribute16             => p_cei_attribute16,
386         p_cei_attribute17             => p_cei_attribute17,
387         p_cei_attribute18             => p_cei_attribute18,
388         p_cei_attribute19             => p_cei_attribute19,
389         p_cei_attribute20             => p_cei_attribute20,
390         p_effective_start_date        => p_effective_start_date,
391         p_effective_end_date          => p_effective_end_date
392     );
393 
394     If l_validate = TRUE Then
395         rollback to update_contact_extra_info_swi;
396     End If;
397     --
398     p_return_status := hr_multi_message.get_return_status_disable;
399     hr_utility.set_location(' Leaving:' || l_proc,20);
400   --
401 exception
402     when hr_multi_message.error_message_exist then
403         --
404         rollback to update_contact_extra_info_swi;
405         --
406         --
407         p_object_version_number        := l_object_version_number;
408         p_effective_start_date         := null;
409         p_effective_end_date           := null;
410 
411         p_return_status := hr_multi_message.get_return_status_disable;
412         hr_utility.set_location(' Leaving:' || l_proc, 30);
413 
414     when others then
415         --
416         rollback to update_contact_extra_info_swi;
417 
418         if hr_multi_message.unexpected_error_add(l_proc) then
419             hr_utility.set_location(' Leaving:' || l_proc,40);
420             raise;
421         end if;
422         --
423         p_object_version_number        := l_object_version_number;
424         p_effective_start_date         := null;
425         p_effective_end_date           := null;
426 
427         p_return_status := hr_multi_message.get_return_status_disable;
428         hr_utility.set_location(' Leaving:' || l_proc,50);
429 
430 end update_contact_extra_info;
431 
432 ----------------------------------------------------------------------------
433 
434 procedure delete_contact_extra_info(
435     p_validate                    in      number,
436     p_effective_date              in      date,
437     p_datetrack_delete_mode       in      varchar2,
438     p_contact_extra_info_id       in      number,
439     p_object_version_number       in      out nocopy number,
440     p_effective_start_date        out     nocopy date,
441     p_effective_end_date          out     nocopy date,
442     p_return_status               out     nocopy varchar2)
443 is
444 
445     --
446     -- Variables for API Boolean parameters
447     l_validate                      boolean;
448     --
449     -- Variables for IN/OUT parameters
450     --
451     -- Other variables
452     l_proc    varchar2(72) := g_package ||'delete_contact_extra_info';
453 
454 begin
455 
456     hr_utility.set_location(' Entering:' || l_proc,10);
457     -- Issue a savepoint
458     savepoint delete_contact_extra_info_swi;
459     -- Initialise Multiple Message Detection
460     hr_multi_message.enable_message_list;
461     -- Convert constant values to their corresponding boolean value
462     l_validate := hr_api.constant_to_boolean (p_constant_value => p_validate);
463     --
464     -- Call API
465     hr_contact_extra_info_api.delete_contact_extra_info(
466         p_validate                    => l_validate,
467         p_effective_date              => p_effective_date,
468         p_datetrack_delete_mode       => p_datetrack_delete_mode,
469         p_contact_extra_info_id       => p_contact_extra_info_id,
470         p_object_version_number       => p_object_version_number,
471         p_effective_start_date        => p_effective_start_date,
472         p_effective_end_date          => p_effective_end_date);
473 
474     If l_validate = TRUE Then
475         rollback to delete_contact_extra_info_swi;
476     End If;
477 
478     p_return_status := hr_multi_message.get_return_status_disable;
479     hr_utility.set_location(' Leaving:' || l_proc,20);
480 
481 exception
482     when hr_multi_message.error_message_exist then
483         --
484         -- Catch the Multiple Message List exception which
485         -- indicates API processing has been aborted because
486         -- at least one message exists in the list.
487         --
488         rollback to delete_contact_extra_info_swi;
489         --
490         -- Reset IN OUT parameters and set OUT parameters
491         --
492         p_return_status         := hr_multi_message.get_return_status_disable;
493         p_effective_start_date  := null;
494         p_effective_end_date    := null;
495 
496         hr_utility.set_location(' Leaving:' || l_proc, 30);
497     when others then
498         --
499         -- When Multiple Message Detection is enabled catch
500         -- any Application specific or other unexpected
501         -- exceptions.  Adding appropriate details to the
502         -- Multiple Message List.  Otherwise re-raise the
503         -- error.
504         --
505         rollback to delete_contact_extra_info_swi;
506         if hr_multi_message.unexpected_error_add(l_proc) then
507            hr_utility.set_location(' Leaving:' || l_proc,40);
508            raise;
509         end if;
510         --
511         -- Reset IN OUT and set OUT parameters
512         --
513         p_return_status := hr_multi_message.get_return_status_disable;
514         p_effective_start_date  := null;
515         p_effective_end_date    := null;
516 
517         hr_utility.set_location(' Leaving:' || l_proc,50);
518 end delete_contact_extra_info;
519 
520 end hr_contact_extra_info_swi;