DBA Data[Home] [Help]

PACKAGE BODY: APPS.HR_PL_CONTACT_REL_API

Source


1 Package body hr_pl_contact_rel_api as
2 -- $Header: pecrlpli.pkb 120.1 2005/09/27 03:05:21 mseshadr noship $
3 --
4 -- Package Variables
5 
6    g_package   VARCHAR2(33);
7 
8 /*Old procedure,code replaced with call to new procedure*/
9 PROCEDURE create_pl_contact
10   (p_validate                     in        boolean     default false
11   ,p_start_date                   in        date
12   ,p_business_group_id            in        number
13   ,p_person_id                    in        number
14   ,p_contact_person_id            in        number      default null
15   ,p_contact_type                 in        varchar2
16   ,p_ctr_comments                 in        varchar2    default null
17   ,p_primary_contact_flag         in        varchar2    default 'N'
18   ,p_date_start                   in        date        default null
19   ,p_start_life_reason_id         in        number      default null
20   ,p_date_end                     in        date        default null
21   ,p_end_life_reason_id           in        number      default null
22   ,p_rltd_per_rsds_w_dsgntr_flag  in        varchar2    default 'N'
23   ,p_personal_flag                in        varchar2    default 'N'
24   ,p_sequence_number              in        number      default null
25   ,p_cont_attribute_category      in        varchar2    default null
26   ,p_cont_attribute1              in        varchar2    default null
27   ,p_cont_attribute2              in        varchar2    default null
28   ,p_cont_attribute3              in        varchar2    default null
29   ,p_cont_attribute4              in        varchar2    default null
30   ,p_cont_attribute5              in        varchar2    default null
31   ,p_cont_attribute6              in        varchar2    default null
32   ,p_cont_attribute7              in        varchar2    default null
33   ,p_cont_attribute8              in        varchar2    default null
34   ,p_cont_attribute9              in        varchar2    default null
35   ,p_cont_attribute10             in        varchar2    default null
36   ,p_cont_attribute11             in        varchar2    default null
37   ,p_cont_attribute12             in        varchar2    default null
38   ,p_cont_attribute13             in        varchar2    default null
39   ,p_cont_attribute14             in        varchar2    default null
40   ,p_cont_attribute15             in        varchar2    default null
41   ,p_cont_attribute16             in        varchar2    default null
42   ,p_cont_attribute17             in        varchar2    default null
43   ,p_cont_attribute18             in        varchar2    default null
44   ,p_cont_attribute19             in        varchar2    default null
45   ,p_cont_attribute20             in        varchar2    default null
46   ,p_cont_information_category      in        varchar2    default null
47   ,Relationship_Info                in        varchar2    default null
48   ,Address_Info                     in        varchar2    default null
49   ,p_cont_information3              in        varchar2    default null
50   ,p_cont_information4              in        varchar2    default null
51   ,p_cont_information5              in        varchar2    default null
52   ,p_cont_information6              in        varchar2    default null
53   ,p_cont_information7              in        varchar2    default null
54   ,p_cont_information8              in        varchar2    default null
55   ,p_cont_information9              in        varchar2    default null
56   ,p_cont_information10             in        varchar2    default null
57   ,p_cont_information11             in        varchar2    default null
58   ,p_cont_information12             in        varchar2    default null
59   ,p_cont_information13             in        varchar2    default null
60   ,p_cont_information14             in        varchar2    default null
61   ,p_cont_information15             in        varchar2    default null
62   ,p_cont_information16             in        varchar2    default null
63   ,p_cont_information17             in        varchar2    default null
64   ,p_cont_information18             in        varchar2    default null
65   ,p_cont_information19             in        varchar2    default null
66   ,p_cont_information20             in        varchar2    default null
67   ,p_third_party_pay_flag         in        varchar2    default 'N'
68   ,p_bondholder_flag              in        varchar2    default 'N'
69   ,p_dependent_flag               in        varchar2    default 'N'
70   ,p_beneficiary_flag             in        varchar2    default 'N'
71   ,p_last_name                    in        varchar2    default null
72   ,p_sex                          in        varchar2    default null
73   ,p_person_type_id               in        number      default null
74   ,p_per_comments                 in        varchar2    default null
75   ,p_date_of_birth                in        date        default null
76   ,p_email_address                in        varchar2    default null
77   ,p_first_name                   in        varchar2    default null
78   ,p_known_as                     in        varchar2    default null
79   ,p_marital_status               in        varchar2    default null
80   ,p_middle_names                 in        varchar2    default null
81   ,p_nationality                  in        varchar2    default null
82   ,p_national_identifier          in        varchar2    default null
83   ,p_previous_last_name           in        varchar2    default null
84   ,p_registered_disabled_flag     in        varchar2    default null
85   ,p_title                        in        varchar2    default null
86   ,p_work_telephone               in        varchar2    default null
87   ,p_attribute_category           in        varchar2    default null
88   ,p_attribute1                   in        varchar2    default null
89   ,p_attribute2                   in        varchar2    default null
90   ,p_attribute3                   in        varchar2    default null
91   ,p_attribute4                   in        varchar2    default null
92   ,p_attribute5                   in        varchar2    default null
93   ,p_attribute6                   in        varchar2    default null
94   ,p_attribute7                   in        varchar2    default null
95   ,p_attribute8                   in        varchar2    default null
96   ,p_attribute9                   in        varchar2    default null
97   ,p_attribute10                  in        varchar2    default null
98   ,p_attribute11                  in        varchar2    default null
99   ,p_attribute12                  in        varchar2    default null
100   ,p_attribute13                  in        varchar2    default null
101   ,p_attribute14                  in        varchar2    default null
102   ,p_attribute15                  in        varchar2    default null
103   ,p_attribute16                  in        varchar2    default null
104   ,p_attribute17                  in        varchar2    default null
105   ,p_attribute18                  in        varchar2    default null
106   ,p_attribute19                  in        varchar2    default null
107   ,p_attribute20                  in        varchar2    default null
108   ,p_attribute21                  in        varchar2    default null
109   ,p_attribute22                  in        varchar2    default null
110   ,p_attribute23                  in        varchar2    default null
111   ,p_attribute24                  in        varchar2    default null
112   ,p_attribute25                  in        varchar2    default null
113   ,p_attribute26                  in        varchar2    default null
114   ,p_attribute27                  in        varchar2    default null
115   ,p_attribute28                  in        varchar2    default null
116   ,p_attribute29                  in        varchar2    default null
117   ,p_attribute30                  in        varchar2    default null
118   ,p_per_information_category     in        varchar2    default null
119   ,NIP                            in        varchar2    default null
120   ,Insured_by_Employee            in        varchar2
121   ,Inheritor                      in        varchar2
122   ,p_per_information4             in        varchar2    default null
123   ,p_per_information5             in        varchar2    default null
124   ,p_per_information6             in        varchar2    default null
125   ,p_per_information7             in        varchar2    default null
126   ,p_per_information8             in        varchar2    default null
127   ,p_per_information9             in        varchar2    default null
128   ,p_per_information10            in        varchar2    default null
129   ,p_per_information11            in        varchar2    default null
130   ,p_per_information12            in        varchar2    default null
131   ,p_per_information13            in        varchar2    default null
132   ,p_per_information14            in        varchar2    default null
133   ,p_per_information15            in        varchar2    default null
134   ,p_per_information16            in        varchar2    default null
135   ,p_per_information17            in        varchar2    default null
136   ,p_per_information18            in        varchar2    default null
137   ,p_per_information19            in        varchar2    default null
138   ,p_per_information20            in        varchar2    default null
139   ,p_per_information21            in        varchar2    default null
140   ,p_per_information22            in        varchar2    default null
141   ,p_per_information23            in        varchar2    default null
142   ,p_per_information24            in        varchar2    default null
143   ,p_per_information25            in        varchar2    default null
144   ,p_per_information26            in        varchar2    default null
145   ,p_per_information27            in        varchar2    default null
146   ,p_per_information28            in        varchar2    default null
147   ,p_per_information29            in        varchar2    default null
148   ,p_per_information30            in        varchar2    default null
149   ,p_correspondence_language      in        varchar2    default null
150   ,p_honors                       in        varchar2    default null
151   ,p_pre_name_adjunct             in        varchar2    default null
152   ,p_suffix                       in        varchar2    default null
153   ,p_create_mirror_flag           in        varchar2    default 'N'
154   ,p_mirror_type                  in        varchar2    default null
155   ,p_mirror_cont_attribute_cat    in        varchar2    default null
156   ,p_mirror_cont_attribute1       in        varchar2    default null
157   ,p_mirror_cont_attribute2       in        varchar2    default null
158   ,p_mirror_cont_attribute3       in        varchar2    default null
159   ,p_mirror_cont_attribute4       in        varchar2    default null
160   ,p_mirror_cont_attribute5       in        varchar2    default null
161   ,p_mirror_cont_attribute6       in        varchar2    default null
162   ,p_mirror_cont_attribute7       in        varchar2    default null
163   ,p_mirror_cont_attribute8       in        varchar2    default null
164   ,p_mirror_cont_attribute9       in        varchar2    default null
165   ,p_mirror_cont_attribute10      in        varchar2    default null
166   ,p_mirror_cont_attribute11      in        varchar2    default null
167   ,p_mirror_cont_attribute12      in        varchar2    default null
168   ,p_mirror_cont_attribute13      in        varchar2    default null
169   ,p_mirror_cont_attribute14      in        varchar2    default null
170   ,p_mirror_cont_attribute15      in        varchar2    default null
171   ,p_mirror_cont_attribute16      in        varchar2    default null
172   ,p_mirror_cont_attribute17      in        varchar2    default null
173   ,p_mirror_cont_attribute18      in        varchar2    default null
174   ,p_mirror_cont_attribute19      in        varchar2    default null
175   ,p_mirror_cont_attribute20      in        varchar2    default null
176   ,p_mirror_cont_information_cat    in        varchar2    default null
177   ,p_mirror_cont_information1       in        varchar2    default null
178   ,p_mirror_cont_information2       in        varchar2    default null
179   ,p_mirror_cont_information3       in        varchar2    default null
180   ,p_mirror_cont_information4       in        varchar2    default null
181   ,p_mirror_cont_information5       in        varchar2    default null
182   ,p_mirror_cont_information6       in        varchar2    default null
183   ,p_mirror_cont_information7       in        varchar2    default null
184   ,p_mirror_cont_information8       in        varchar2    default null
185   ,p_mirror_cont_information9       in        varchar2    default null
186   ,p_mirror_cont_information10      in        varchar2    default null
187   ,p_mirror_cont_information11      in        varchar2    default null
188   ,p_mirror_cont_information12      in        varchar2    default null
189   ,p_mirror_cont_information13      in        varchar2    default null
190   ,p_mirror_cont_information14      in        varchar2    default null
191   ,p_mirror_cont_information15      in        varchar2    default null
192   ,p_mirror_cont_information16      in        varchar2    default null
193   ,p_mirror_cont_information17      in        varchar2    default null
194   ,p_mirror_cont_information18      in        varchar2    default null
195   ,p_mirror_cont_information19      in        varchar2    default null
196   ,p_mirror_cont_information20      in        varchar2    default null
197   ,p_contact_relationship_id      out nocopy number
198   ,p_ctr_object_version_number    out nocopy number
199   ,p_per_person_id                out nocopy number
200   ,p_per_object_version_number    out nocopy number
201   ,p_per_effective_start_date     out nocopy date
202   ,p_per_effective_end_date       out nocopy date
203   ,p_full_name                    out nocopy varchar2
204   ,p_per_comment_id               out nocopy number
205   ,p_name_combination_warning     out nocopy boolean
206   ,p_orig_hire_warning            out nocopy boolean) IS
207 
208 -- Declare cursors and local variables
209   --
210    l_proc                 varchar2(72);
211 begin
212 
213    g_package := 'hr_pl_contact_rel_api.';
214    l_proc    := g_package||'create_pl_contact OLD';
215 /*
216  Code replaced with call to new overloaded procedure
217   --
218   -- Validation in addition to Row Handlers
219   --
220   -- Check that the specified business group is valid.
221   --
222   open csr_bg;
223   fetch csr_bg
224   into l_legislation_code;
225   if csr_bg%notfound then
226     close csr_bg;
227     hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
228     hr_utility.raise_error;
229   end if;
230   close csr_bg;
231   --
232   -- Check that the legislation of the specified business group is 'PL'.
233   --
234   if l_legislation_code <> 'PL' then
235     hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
236     hr_utility.set_message_token('LEG_CODE','PL');
237     hr_utility.raise_error;
238   end if;
239 
240      hr_utility.set_location('Entering:'|| l_proc, 5);
241   --
242 
243 
244 hr_contact_rel_api.create_contact
245 
246 */
247 hr_pl_contact_rel_api.create_pl_contact
248  (p_validate                       => p_validate
249  ,p_start_date                     =>p_start_date
250  ,p_business_group_id              =>p_business_group_id
251  ,p_person_id                      =>p_person_id
252  ,p_contact_person_id              =>p_contact_person_id
253  ,p_contact_type                   =>p_contact_type
254  ,p_ctr_comments                   =>p_ctr_comments
255  ,p_primary_contact_flag           =>p_primary_contact_flag
256  ,p_date_start                     =>p_date_start
257  ,p_start_life_reason_id           =>p_start_life_reason_id
258  ,p_date_end                       =>p_date_end
259  ,p_end_life_reason_id             =>p_end_life_reason_id
260  ,p_rltd_per_rsds_w_dsgntr_flag    =>p_rltd_per_rsds_w_dsgntr_flag
261  ,p_personal_flag                  =>p_personal_flag
262  ,p_sequence_number                =>p_sequence_number
263  ,p_cont_attribute_category        =>p_cont_attribute_category
264  ,p_cont_attribute1                =>p_cont_attribute1
265  ,p_cont_attribute2                =>p_cont_attribute2
266  ,p_cont_attribute3                =>p_cont_attribute3
267  ,p_cont_attribute4                =>p_cont_attribute4
268  ,p_cont_attribute5                =>p_cont_attribute5
269  ,p_cont_attribute6                =>p_cont_attribute6
270  ,p_cont_attribute7                =>p_cont_attribute7
271  ,p_cont_attribute8                =>p_cont_attribute8
272  ,p_cont_attribute9                =>p_cont_attribute9
273  ,p_cont_attribute10               =>p_cont_attribute10
274  ,p_cont_attribute11               =>p_cont_attribute11
275  ,p_cont_attribute12               =>p_cont_attribute12
276  ,p_cont_attribute13               =>p_cont_attribute13
277  ,p_cont_attribute14               =>p_cont_attribute14
278  ,p_cont_attribute15               =>p_cont_attribute15
279  ,p_cont_attribute16               =>p_cont_attribute16
280  ,p_cont_attribute17               =>p_cont_attribute17
281  ,p_cont_attribute18               =>p_cont_attribute18
282  ,p_cont_attribute19               =>p_cont_attribute19
283  ,p_cont_attribute20               =>p_cont_attribute20
284  ,p_cont_information_category      =>p_cont_information_category
285  ,Relationship_Info                =>Relationship_Info
286  ,Address_Info                     =>Address_Info
287  ,p_cont_information3              =>p_cont_information3
288  ,p_cont_information4              =>p_cont_information4
289  ,p_cont_information5              =>p_cont_information5
290  ,p_cont_information6              =>p_cont_information6
291  ,p_cont_information7              =>p_cont_information7
292  ,p_cont_information8              =>p_cont_information8
293  ,p_cont_information9              =>p_cont_information9
294  ,p_cont_information10             =>p_cont_information10
295  ,p_cont_information11             =>p_cont_information11
296  ,p_cont_information12             =>p_cont_information12
297  ,p_cont_information13             =>p_cont_information13
298  ,p_cont_information14             =>p_cont_information14
299  ,p_cont_information15             =>p_cont_information15
300  ,p_cont_information16             =>p_cont_information16
301  ,p_cont_information17             =>p_cont_information17
302  ,p_cont_information18             =>p_cont_information18
303  ,p_cont_information19             =>p_cont_information19
304  ,p_cont_information20             =>p_cont_information20
305  ,p_third_party_pay_flag           =>p_third_party_pay_flag
306  ,p_bondholder_flag                =>p_bondholder_flag
307  ,p_dependent_flag                 =>p_dependent_flag
308  ,p_beneficiary_flag               =>p_beneficiary_flag
309  ,p_last_name                      =>p_last_name
310  ,p_sex                            =>p_sex
311  ,p_person_type_id                 =>p_person_type_id
312  ,p_per_comments                   =>p_per_comments
313  ,p_date_of_birth                  =>p_date_of_birth
314  ,p_email_address                  =>p_email_address
315  ,p_first_name                     =>p_first_name
316  ,p_known_as                       =>p_known_as
317  ,p_marital_status                 =>p_marital_status
318  ,p_middle_names                   =>p_middle_names
319  ,p_nationality                    =>p_nationality
320  ,p_pesel                          =>p_national_identifier
321  ,p_previous_last_name             =>p_previous_last_name
322  ,p_registered_disabled_flag       =>p_registered_disabled_flag
323  ,p_title                          =>p_title
324  ,p_work_telephone                 =>p_work_telephone
325  ,p_attribute_category             =>p_attribute_category
326  ,p_attribute1                     =>p_attribute1
327  ,p_attribute2                     =>p_attribute2
328  ,p_attribute3                     =>p_attribute3
329  ,p_attribute4                     =>p_attribute4
330  ,p_attribute5                     =>p_attribute5
331  ,p_attribute6                     =>p_attribute6
332  ,p_attribute7                     =>p_attribute7
333  ,p_attribute8                     =>p_attribute8
334  ,p_attribute9                     =>p_attribute9
335  ,p_attribute10                    =>p_attribute10
336  ,p_attribute11                    =>p_attribute11
337  ,p_attribute12                    =>p_attribute12
338  ,p_attribute13                    =>p_attribute13
339  ,p_attribute14                    =>p_attribute14
340  ,p_attribute15                    =>p_attribute15
341  ,p_attribute16                    =>p_attribute16
342  ,p_attribute17                    =>p_attribute17
343  ,p_attribute18                    =>p_attribute18
344  ,p_attribute19                    =>p_attribute19
345  ,p_attribute20                    =>p_attribute20
346  ,p_attribute21                    =>p_attribute21
347  ,p_attribute22                    =>p_attribute22
348  ,p_attribute23                    =>p_attribute23
349  ,p_attribute24                    =>p_attribute24
350  ,p_attribute25                    =>p_attribute25
351  ,p_attribute26                    =>p_attribute26
352  ,p_attribute27                    =>p_attribute27
353  ,p_attribute28                    =>p_attribute28
354  ,p_attribute29                    =>p_attribute29
355  ,p_attribute30                    =>p_attribute30
356  ,p_per_information_category       =>p_per_information_category
357  ,p_nip                            =>NIP
358  ,p_insured_by_employee            =>Insured_by_Employee
359  ,p_inheritor                      =>Inheritor
360  ,p_oldage_pension_rights          =>p_per_information4
361  ,p_national_fund_of_health        =>p_per_information5
362  ,p_tax_office                     =>p_per_information6
363  ,p_legal_employer                 =>p_per_information7
364  ,p_citizenship                    =>p_per_information8
365  ,p_correspondence_language        =>p_correspondence_language
366  ,p_honors                         =>p_honors
367  ,p_pre_name_adjunct               =>p_pre_name_adjunct
368  ,p_suffix                         =>p_suffix
369  ,p_create_mirror_flag             =>p_create_mirror_flag
370  ,p_mirror_type                    =>p_mirror_type
371  ,p_mirror_cont_attribute_cat      =>p_mirror_cont_attribute_cat
372  ,p_mirror_cont_attribute1         =>p_mirror_cont_attribute1
373  ,p_mirror_cont_attribute2         =>p_mirror_cont_attribute2
374  ,p_mirror_cont_attribute3         =>p_mirror_cont_attribute3
375  ,p_mirror_cont_attribute4         =>p_mirror_cont_attribute4
376  ,p_mirror_cont_attribute5         =>p_mirror_cont_attribute5
377  ,p_mirror_cont_attribute6         =>p_mirror_cont_attribute6
378  ,p_mirror_cont_attribute7         =>p_mirror_cont_attribute7
379  ,p_mirror_cont_attribute8         =>p_mirror_cont_attribute8
380  ,p_mirror_cont_attribute9         =>p_mirror_cont_attribute9
381  ,p_mirror_cont_attribute10        =>p_mirror_cont_attribute10
382  ,p_mirror_cont_attribute11        =>p_mirror_cont_attribute11
383  ,p_mirror_cont_attribute12        =>p_mirror_cont_attribute12
384  ,p_mirror_cont_attribute13        =>p_mirror_cont_attribute13
385  ,p_mirror_cont_attribute14        =>p_mirror_cont_attribute14
386  ,p_mirror_cont_attribute15        =>p_mirror_cont_attribute15
387  ,p_mirror_cont_attribute16        =>p_mirror_cont_attribute16
388  ,p_mirror_cont_attribute17        =>p_mirror_cont_attribute17
389  ,p_mirror_cont_attribute18        =>p_mirror_cont_attribute18
390  ,p_mirror_cont_attribute19        =>p_mirror_cont_attribute19
391  ,p_mirror_cont_attribute20        =>p_mirror_cont_attribute20
392  ,p_mirror_cont_information_cat    =>p_mirror_cont_information_cat
393  ,p_mirror_cont_information1       =>p_mirror_cont_information1
394  ,p_mirror_cont_information2       =>p_mirror_cont_information2
395  ,p_mirror_cont_information3       =>p_mirror_cont_information3
396  ,p_mirror_cont_information4       =>p_mirror_cont_information4
397  ,p_mirror_cont_information5       =>p_mirror_cont_information5
398  ,p_mirror_cont_information6       =>p_mirror_cont_information6
399  ,p_mirror_cont_information7       =>p_mirror_cont_information7
400  ,p_mirror_cont_information8       =>p_mirror_cont_information8
401  ,p_mirror_cont_information9       =>p_mirror_cont_information9
402  ,p_mirror_cont_information10      =>p_mirror_cont_information10
403  ,p_mirror_cont_information11      =>p_mirror_cont_information11
404  ,p_mirror_cont_information12      =>p_mirror_cont_information12
405  ,p_mirror_cont_information13      =>p_mirror_cont_information13
406  ,p_mirror_cont_information14      =>p_mirror_cont_information14
407  ,p_mirror_cont_information15      =>p_mirror_cont_information15
408  ,p_mirror_cont_information16      =>p_mirror_cont_information16
409  ,p_mirror_cont_information17      =>p_mirror_cont_information17
410  ,p_mirror_cont_information18      =>p_mirror_cont_information18
411  ,p_mirror_cont_information19      =>p_mirror_cont_information19
412  ,p_mirror_cont_information20      =>p_mirror_cont_information20
413  ,p_contact_relationship_id        =>p_contact_relationship_id
414  ,p_ctr_object_version_number      =>p_ctr_object_version_number
415  ,p_per_person_id                  =>p_per_person_id
416  ,p_per_object_version_number      =>p_per_object_version_number
417  ,p_per_effective_start_date       =>p_per_effective_start_date
418  ,p_per_effective_end_date         =>p_per_effective_end_date
419  ,p_full_name                      =>p_full_name
420  ,p_per_comment_id                 =>p_per_comment_id
421  ,p_name_combination_warning       =>p_name_combination_warning
422  ,p_orig_hire_warning              =>p_orig_hire_warning
423  );
424 
425 
426 
427  END create_pl_contact;
428 
429 /*New overloaded Procedure*/
430 PROCEDURE create_pl_contact
431   (p_validate                     in        boolean     default false
432   ,p_start_date                   in        date
433   ,p_business_group_id            in        number
434   ,p_person_id                    in        number
435   ,p_contact_person_id            in        number      default null
436   ,p_contact_type                 in        varchar2
437   ,p_ctr_comments                 in        varchar2    default null
438   ,p_primary_contact_flag         in        varchar2    default 'N'
439   ,p_date_start                   in        date        default null
440   ,p_start_life_reason_id         in        number      default null
441   ,p_date_end                     in        date        default null
442   ,p_end_life_reason_id           in        number      default null
443   ,p_rltd_per_rsds_w_dsgntr_flag  in        varchar2    default 'N'
444   ,p_personal_flag                in        varchar2    default 'N'
445   ,p_sequence_number              in        number      default null
446   ,p_cont_attribute_category      in        varchar2    default null
447   ,p_cont_attribute1              in        varchar2    default null
448   ,p_cont_attribute2              in        varchar2    default null
449   ,p_cont_attribute3              in        varchar2    default null
450   ,p_cont_attribute4              in        varchar2    default null
451   ,p_cont_attribute5              in        varchar2    default null
452   ,p_cont_attribute6              in        varchar2    default null
453   ,p_cont_attribute7              in        varchar2    default null
454   ,p_cont_attribute8              in        varchar2    default null
455   ,p_cont_attribute9              in        varchar2    default null
456   ,p_cont_attribute10             in        varchar2    default null
457   ,p_cont_attribute11             in        varchar2    default null
458   ,p_cont_attribute12             in        varchar2    default null
459   ,p_cont_attribute13             in        varchar2    default null
460   ,p_cont_attribute14             in        varchar2    default null
461   ,p_cont_attribute15             in        varchar2    default null
462   ,p_cont_attribute16             in        varchar2    default null
463   ,p_cont_attribute17             in        varchar2    default null
464   ,p_cont_attribute18             in        varchar2    default null
465   ,p_cont_attribute19             in        varchar2    default null
466   ,p_cont_attribute20             in        varchar2    default null
467   ,p_cont_information_category      in        varchar2    default null
468   ,Relationship_Info                in        varchar2    default null
469   ,Address_Info                     in        varchar2    default null
470   ,p_cont_information3              in        varchar2    default null
471   ,p_cont_information4              in        varchar2    default null
472   ,p_cont_information5              in        varchar2    default null
473   ,p_cont_information6              in        varchar2    default null
474   ,p_cont_information7              in        varchar2    default null
475   ,p_cont_information8              in        varchar2    default null
476   ,p_cont_information9              in        varchar2    default null
477   ,p_cont_information10             in        varchar2    default null
478   ,p_cont_information11             in        varchar2    default null
479   ,p_cont_information12             in        varchar2    default null
480   ,p_cont_information13             in        varchar2    default null
481   ,p_cont_information14             in        varchar2    default null
482   ,p_cont_information15             in        varchar2    default null
483   ,p_cont_information16             in        varchar2    default null
484   ,p_cont_information17             in        varchar2    default null
485   ,p_cont_information18             in        varchar2    default null
486   ,p_cont_information19             in        varchar2    default null
487   ,p_cont_information20             in        varchar2    default null
488   ,p_third_party_pay_flag         in        varchar2    default 'N'
489   ,p_bondholder_flag              in        varchar2    default 'N'
490   ,p_dependent_flag               in        varchar2    default 'N'
491   ,p_beneficiary_flag             in        varchar2    default 'N'
492   ,p_last_name                    in        varchar2
493   ,p_sex                          in        varchar2    default null
494   ,p_person_type_id               in        number      default null
495   ,p_per_comments                 in        varchar2    default null
496   ,p_date_of_birth                in        date        default null
497   ,p_email_address                in        varchar2    default null
498   ,p_first_name                   in        varchar2    default null
499   ,p_known_as                     in        varchar2    default null
500   ,p_marital_status               in        varchar2    default null
501   ,p_middle_names                 in        varchar2    default null
502   ,p_nationality                  in        varchar2    default null
503   ,p_pesel                        in        varchar2    default null
504   ,p_previous_last_name           in        varchar2    default null
505   ,p_registered_disabled_flag     in        varchar2    default null
506   ,p_title                        in        varchar2    default null
507   ,p_work_telephone               in        varchar2    default null
508   ,p_attribute_category           in        varchar2    default null
509   ,p_attribute1                   in        varchar2    default null
510   ,p_attribute2                   in        varchar2    default null
511   ,p_attribute3                   in        varchar2    default null
512   ,p_attribute4                   in        varchar2    default null
513   ,p_attribute5                   in        varchar2    default null
514   ,p_attribute6                   in        varchar2    default null
515   ,p_attribute7                   in        varchar2    default null
516   ,p_attribute8                   in        varchar2    default null
517   ,p_attribute9                   in        varchar2    default null
518   ,p_attribute10                  in        varchar2    default null
519   ,p_attribute11                  in        varchar2    default null
520   ,p_attribute12                  in        varchar2    default null
521   ,p_attribute13                  in        varchar2    default null
522   ,p_attribute14                  in        varchar2    default null
523   ,p_attribute15                  in        varchar2    default null
524   ,p_attribute16                  in        varchar2    default null
525   ,p_attribute17                  in        varchar2    default null
526   ,p_attribute18                  in        varchar2    default null
527   ,p_attribute19                  in        varchar2    default null
528   ,p_attribute20                  in        varchar2    default null
529   ,p_attribute21                  in        varchar2    default null
530   ,p_attribute22                  in        varchar2    default null
531   ,p_attribute23                  in        varchar2    default null
532   ,p_attribute24                  in        varchar2    default null
533   ,p_attribute25                  in        varchar2    default null
534   ,p_attribute26                  in        varchar2    default null
535   ,p_attribute27                  in        varchar2    default null
536   ,p_attribute28                  in        varchar2    default null
537   ,p_attribute29                  in        varchar2    default null
538   ,p_attribute30                  in        varchar2    default null
539   ,p_per_information_category     in        varchar2    default null
540   ,p_nip                          in        varchar2    default null
541   ,p_insured_by_employee          in        varchar2    default null
542   ,p_inheritor                    in        varchar2    default null
543   ,p_oldage_pension_rights        in        varchar2    default null
544   ,p_national_fund_of_health      in        varchar2    default null
545   ,p_tax_office                   in        varchar2    default null
546   ,p_legal_employer               in        varchar2    default null
547   ,p_citizenship                  in        varchar2    default null
548   ,p_correspondence_language      in        varchar2    default null
549   ,p_honors                       in        varchar2    default null
550   ,p_pre_name_adjunct             in        varchar2    default null
551   ,p_suffix                       in        varchar2    default null
552   ,p_create_mirror_flag           in        varchar2    default 'N'
553   ,p_mirror_type                  in        varchar2    default null
554   ,p_mirror_cont_attribute_cat    in        varchar2    default null
555   ,p_mirror_cont_attribute1       in        varchar2    default null
556   ,p_mirror_cont_attribute2       in        varchar2    default null
557   ,p_mirror_cont_attribute3       in        varchar2    default null
558   ,p_mirror_cont_attribute4       in        varchar2    default null
559   ,p_mirror_cont_attribute5       in        varchar2    default null
560   ,p_mirror_cont_attribute6       in        varchar2    default null
561   ,p_mirror_cont_attribute7       in        varchar2    default null
562   ,p_mirror_cont_attribute8       in        varchar2    default null
563   ,p_mirror_cont_attribute9       in        varchar2    default null
564   ,p_mirror_cont_attribute10      in        varchar2    default null
565   ,p_mirror_cont_attribute11      in        varchar2    default null
566   ,p_mirror_cont_attribute12      in        varchar2    default null
567   ,p_mirror_cont_attribute13      in        varchar2    default null
568   ,p_mirror_cont_attribute14      in        varchar2    default null
569   ,p_mirror_cont_attribute15      in        varchar2    default null
570   ,p_mirror_cont_attribute16      in        varchar2    default null
571   ,p_mirror_cont_attribute17      in        varchar2    default null
572   ,p_mirror_cont_attribute18      in        varchar2    default null
573   ,p_mirror_cont_attribute19      in        varchar2    default null
574   ,p_mirror_cont_attribute20      in        varchar2    default null
575   ,p_mirror_cont_information_cat    in        varchar2    default null
576   ,p_mirror_cont_information1       in        varchar2    default null
577   ,p_mirror_cont_information2       in        varchar2    default null
578   ,p_mirror_cont_information3       in        varchar2    default null
579   ,p_mirror_cont_information4       in        varchar2    default null
580   ,p_mirror_cont_information5       in        varchar2    default null
581   ,p_mirror_cont_information6       in        varchar2    default null
582   ,p_mirror_cont_information7       in        varchar2    default null
583   ,p_mirror_cont_information8       in        varchar2    default null
584   ,p_mirror_cont_information9       in        varchar2    default null
585   ,p_mirror_cont_information10      in        varchar2    default null
586   ,p_mirror_cont_information11      in        varchar2    default null
587   ,p_mirror_cont_information12      in        varchar2    default null
588   ,p_mirror_cont_information13      in        varchar2    default null
589   ,p_mirror_cont_information14      in        varchar2    default null
590   ,p_mirror_cont_information15      in        varchar2    default null
591   ,p_mirror_cont_information16      in        varchar2    default null
592   ,p_mirror_cont_information17      in        varchar2    default null
593   ,p_mirror_cont_information18      in        varchar2    default null
594   ,p_mirror_cont_information19      in        varchar2    default null
595   ,p_mirror_cont_information20      in        varchar2    default null
596   ,p_contact_relationship_id      out nocopy number
597   ,p_ctr_object_version_number    out nocopy number
598   ,p_per_person_id                out nocopy number
599   ,p_per_object_version_number    out nocopy number
600   ,p_per_effective_start_date     out nocopy date
601   ,p_per_effective_end_date       out nocopy date
602   ,p_full_name                    out nocopy varchar2
603   ,p_per_comment_id               out nocopy number
604   ,p_name_combination_warning     out nocopy boolean
605   ,p_orig_hire_warning            out nocopy boolean) IS
606 
607 -- Declare cursors and local variables
608   --
609    l_proc                 varchar2(72);
610    l_legislation_code     varchar2(2);
611 
612 cursor csr_bg is
613     select legislation_code
614     from per_business_groups pbg
615     where pbg.business_group_id = p_business_group_id;
616 
617 begin
618 
619    g_package := 'hr_pl_contact_rel_api.';
620    l_proc    := g_package||'create_pl_contact';
621   --
622   -- Validation in addition to Row Handlers
623   --
624   -- Check that the specified business group is valid.
625   --
626   open csr_bg;
627   fetch csr_bg
628   into l_legislation_code;
629   if csr_bg%notfound then
630     close csr_bg;
631     hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
632     hr_utility.raise_error;
633   end if;
634   close csr_bg;
635   --
636   -- Check that the legislation of the specified business group is 'PL'.
637   --
638   if l_legislation_code <> 'PL' then
639     hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
640     hr_utility.set_message_token('LEG_CODE','PL');
641     hr_utility.raise_error;
642   end if;
643 
644      hr_utility.set_location('Entering:'|| l_proc, 5);
645   --
646 
647 
648 hr_contact_rel_api.create_contact
649 (p_validate                             => p_validate
650 ,p_start_date                           => p_start_date
651 ,p_business_group_id                    => p_business_group_id
652 ,p_person_id                            => p_person_id
653 ,p_contact_person_id                    => p_contact_person_id
654 ,p_contact_type                         => p_contact_type
655 ,p_ctr_comments                         => p_ctr_comments
656 ,p_primary_contact_flag                 => p_primary_contact_flag
657 ,p_date_start                           => p_date_start
658 ,p_start_life_reason_id                 => p_start_life_reason_id
659 ,p_date_end                             => p_date_end
660 ,p_end_life_reason_id                   => p_end_life_reason_id
661 ,p_rltd_per_rsds_w_dsgntr_flag          => p_rltd_per_rsds_w_dsgntr_flag
662 ,p_personal_flag                        => p_personal_flag
663 ,p_sequence_number                      => p_sequence_number
664 ,p_cont_attribute_category              => p_cont_attribute_category
665 ,p_cont_attribute1                      => p_cont_attribute1
666 ,p_cont_attribute2                      => p_cont_attribute2
667 ,p_cont_attribute3                      => p_cont_attribute3
668 ,p_cont_attribute4                      => p_cont_attribute4
669 ,p_cont_attribute5                      => p_cont_attribute5
670 ,p_cont_attribute6                      => p_cont_attribute6
671 ,p_cont_attribute7                      => p_cont_attribute7
672 ,p_cont_attribute8                      => p_cont_attribute8
673 ,p_cont_attribute9                      => p_cont_attribute9
674 ,p_cont_attribute10                     => p_cont_attribute10
675 ,p_cont_attribute11                     => p_cont_attribute11
676 ,p_cont_attribute12                     => p_cont_attribute12
677 ,p_cont_attribute13                     => p_cont_attribute13
678 ,p_cont_attribute14                     => p_cont_attribute14
679 ,p_cont_attribute15                     => p_cont_attribute15
680 ,p_cont_attribute16                     => p_cont_attribute16
681 ,p_cont_attribute17                     => p_cont_attribute17
682 ,p_cont_attribute18                     => p_cont_attribute18
683 ,p_cont_attribute19                     => p_cont_attribute19
684 ,p_cont_attribute20                     => p_cont_attribute20
685 ,p_cont_information_category            => p_cont_information_category
686 ,p_cont_information1                    => Relationship_Info
687 ,p_cont_information2                    => Address_Info
688 ,p_cont_information3                    => p_cont_information3
689 ,p_cont_information4                    => p_cont_information4
690 ,p_cont_information5                    => p_cont_information5
691 ,p_cont_information6                    => p_cont_information6
692 ,p_cont_information7                    => p_cont_information7
693 ,p_cont_information8                    => p_cont_information8
694 ,p_cont_information9                    => p_cont_information9
695 ,p_cont_information10                   => p_cont_information10
696 ,p_cont_information11                   => p_cont_information11
697 ,p_cont_information12                   => p_cont_information12
698 ,p_cont_information13                   => p_cont_information13
699 ,p_cont_information14                   => p_cont_information14
700 ,p_cont_information15                   => p_cont_information15
701 ,p_cont_information16                   => p_cont_information16
702 ,p_cont_information17                   => p_cont_information17
703 ,p_cont_information18                   => p_cont_information18
704 ,p_cont_information19                   => p_cont_information19
705 ,p_cont_information20                   => p_cont_information20
706 ,p_third_party_pay_flag                 =>p_third_party_pay_flag
707 ,p_bondholder_flag                      => p_bondholder_flag
708 ,p_dependent_flag                       => p_dependent_flag
709 ,p_beneficiary_flag                     => p_beneficiary_flag
710 ,p_last_name                            => p_last_name
711 ,p_sex                                  => p_sex
712 ,p_person_type_id                       => p_person_type_id
713 ,p_per_comments                         => p_per_comments
714 ,p_date_of_birth                        => p_date_of_birth
715 ,p_email_address                        => p_email_address
716 ,p_first_name                           => p_first_name
717 ,p_known_as                             => p_known_as
718 ,p_marital_status                       => p_marital_status
719 ,p_middle_names                         => p_middle_names
720 ,p_nationality                          => p_nationality
721 ,p_national_identifier                  => p_pesel
722 ,p_previous_last_name                   => p_previous_last_name
723 ,p_registered_disabled_flag             => p_registered_disabled_flag
724 ,p_title                                => p_title
725 ,p_work_telephone                       => p_work_telephone
726 ,p_attribute_category                   => p_attribute_category
727 ,p_attribute1                           => p_attribute1
728 ,p_attribute2                           => p_attribute2
729 ,p_attribute3                           => p_attribute3
730 ,p_attribute4                           => p_attribute4
731 ,p_attribute5                           => p_attribute5
732 ,p_attribute6                           => p_attribute6
733 ,p_attribute7                           => p_attribute7
734 ,p_attribute8                           => p_attribute8
735 ,p_attribute9                           => p_attribute9
736 ,p_attribute10                          => p_attribute10
737 ,p_attribute11                          => p_attribute11
738 ,p_attribute12                          => p_attribute12
739 ,p_attribute13                          => p_attribute13
740 ,p_attribute14                          => p_attribute14
741 ,p_attribute15				=> p_attribute15
742 ,p_attribute16				=> p_attribute16
743 ,p_attribute17				=> p_attribute17
744 ,p_attribute18				=> p_attribute18
745 ,p_attribute19				=> p_attribute19
746 ,p_attribute20				=> p_attribute20
747 ,p_attribute21				=> p_attribute21
748 ,p_attribute22				=> p_attribute22
749 ,p_attribute23				=> p_attribute23
750 ,p_attribute24				=> p_attribute24
751 ,p_attribute25				=> p_attribute25
752 ,p_attribute26				=> p_attribute26
753 ,p_attribute27				=> p_attribute27
754 ,p_attribute28				=> p_attribute28
755 ,p_attribute29				=> p_attribute29
756 ,p_attribute30				=> p_attribute30
757 ,p_per_information_category		=> 'PL'
758 ,p_per_information1			=> p_nip
759 ,p_per_information2			=> p_insured_by_employee
760 ,p_per_information3			=> p_inheritor
761 ,p_per_information4			=> p_oldage_pension_rights
762 ,p_per_information5			=> p_national_fund_of_health
763 ,p_per_information6			=> p_tax_office
764 ,p_per_information7			=> p_legal_employer
765 ,p_per_information8			=> p_citizenship
766 ,p_correspondence_language		=> p_correspondence_language
767 ,p_honors				=> p_honors
768 ,p_pre_name_adjunct			=> p_pre_name_adjunct
769 ,p_suffix				=> p_suffix
770 ,p_create_mirror_flag			=> p_create_mirror_flag
771 ,p_mirror_type				=> p_mirror_type
772 ,p_mirror_cont_attribute_cat		=> p_mirror_cont_attribute_cat
773 ,p_mirror_cont_attribute1		=> p_mirror_cont_attribute1
774 ,p_mirror_cont_attribute2		=> p_mirror_cont_attribute2
775 ,p_mirror_cont_attribute3		=> p_mirror_cont_attribute3
776 ,p_mirror_cont_attribute4		=> p_mirror_cont_attribute4
777 ,p_mirror_cont_attribute5		=> p_mirror_cont_attribute5
778 ,p_mirror_cont_attribute6		=> p_mirror_cont_attribute6
779 ,p_mirror_cont_attribute7		=> p_mirror_cont_attribute7
780 ,p_mirror_cont_attribute8		=> p_mirror_cont_attribute8
781 ,p_mirror_cont_attribute9		=> p_mirror_cont_attribute9
782 ,p_mirror_cont_attribute10		=> p_mirror_cont_attribute10
783 ,p_mirror_cont_attribute11		=> p_mirror_cont_attribute11
784 ,p_mirror_cont_attribute12		=> p_mirror_cont_attribute12
785 ,p_mirror_cont_attribute13		=> p_mirror_cont_attribute13
786 ,p_mirror_cont_attribute14		=> p_mirror_cont_attribute14
787 ,p_mirror_cont_attribute15		=> p_mirror_cont_attribute15
788 ,p_mirror_cont_attribute16		=> p_mirror_cont_attribute16
789 ,p_mirror_cont_attribute17		=> p_mirror_cont_attribute17
790 ,p_mirror_cont_attribute18		=> p_mirror_cont_attribute18
791 ,p_mirror_cont_attribute19		=> p_mirror_cont_attribute19
792 ,p_mirror_cont_attribute20		=> p_mirror_cont_attribute20
793 ,p_mirror_cont_information_cat		=> p_mirror_cont_information_cat
794 ,p_mirror_cont_information1		=> p_mirror_cont_information1
795 ,p_mirror_cont_information2		=> p_mirror_cont_information2
796 ,p_mirror_cont_information3		=> p_mirror_cont_information3
797 ,p_mirror_cont_information4		=> p_mirror_cont_information4
798 ,p_mirror_cont_information5		=> p_mirror_cont_information5
799 ,p_mirror_cont_information6		=> p_mirror_cont_information6
800 ,p_mirror_cont_information7		=> p_mirror_cont_information7
801 ,p_mirror_cont_information8		=> p_mirror_cont_information8
802 ,p_mirror_cont_information9		=> p_mirror_cont_information9
803 ,p_mirror_cont_information10		=> p_mirror_cont_information10
804 ,p_mirror_cont_information11		=> p_mirror_cont_information11
805 ,p_mirror_cont_information12		=> p_mirror_cont_information12
806 ,p_mirror_cont_information13		=> p_mirror_cont_information13
807 ,p_mirror_cont_information14		=> p_mirror_cont_information14
808 ,p_mirror_cont_information15		=> p_mirror_cont_information15
809 ,p_mirror_cont_information16		=> p_mirror_cont_information16
810 ,p_mirror_cont_information17		=> p_mirror_cont_information17
811 ,p_mirror_cont_information18		=> p_mirror_cont_information18
812 ,p_mirror_cont_information19		=> p_mirror_cont_information19
813 ,p_mirror_cont_information20		=> p_mirror_cont_information20
814 ,p_contact_relationship_id		=> p_contact_relationship_id
815 ,p_ctr_object_version_number		=> p_ctr_object_version_number
816 ,p_per_person_id			=> p_per_person_id
817 ,p_per_object_version_number		=> p_per_object_version_number
818 ,p_per_effective_start_date		=> p_per_effective_start_date
819 ,p_per_effective_end_date		=> p_per_effective_end_date
820 ,p_full_name				=> p_full_name
821 ,p_per_comment_id			=> p_per_comment_id
822 ,p_name_combination_warning		=> p_name_combination_warning
823 ,p_orig_hire_warning			=> p_orig_hire_warning);
824 
825  END create_pl_contact;
826 
827 
828 
829 
830 PROCEDURE update_pl_contact_relationship
831   (p_validate                          in        boolean   default false
832   ,p_effective_date                    in        date
833   ,p_contact_relationship_id           in        number
834   ,p_contact_type                      in        varchar2  default hr_api.g_varchar2
835   ,p_comments                          in        long      default hr_api.g_varchar2
836   ,p_primary_contact_flag              in        varchar2  default hr_api.g_varchar2
837   ,p_third_party_pay_flag              in        varchar2  default hr_api.g_varchar2
838   ,p_bondholder_flag                   in        varchar2  default hr_api.g_varchar2
839   ,p_date_start                        in        date      default hr_api.g_date
840   ,p_start_life_reason_id              in        number    default hr_api.g_number
841   ,p_date_end                          in        date      default hr_api.g_date
842   ,p_end_life_reason_id                in        number    default hr_api.g_number
843   ,p_rltd_per_rsds_w_dsgntr_flag       in        varchar2  default hr_api.g_varchar2
844   ,p_personal_flag                     in        varchar2  default hr_api.g_varchar2
845   ,p_sequence_number                   in        number    default hr_api.g_number
846   ,p_dependent_flag                    in        varchar2  default hr_api.g_varchar2
847   ,p_beneficiary_flag                  in        varchar2  default hr_api.g_varchar2
848   ,p_cont_attribute_category           in        varchar2  default hr_api.g_varchar2
849   ,p_cont_attribute1                   in        varchar2  default hr_api.g_varchar2
850   ,p_cont_attribute2                   in        varchar2  default hr_api.g_varchar2
851   ,p_cont_attribute3                   in        varchar2  default hr_api.g_varchar2
852   ,p_cont_attribute4                   in        varchar2  default hr_api.g_varchar2
853   ,p_cont_attribute5                   in        varchar2  default hr_api.g_varchar2
854   ,p_cont_attribute6                   in        varchar2  default hr_api.g_varchar2
855   ,p_cont_attribute7                   in        varchar2  default hr_api.g_varchar2
856   ,p_cont_attribute8                   in        varchar2  default hr_api.g_varchar2
857   ,p_cont_attribute9                   in        varchar2  default hr_api.g_varchar2
858   ,p_cont_attribute10                  in        varchar2  default hr_api.g_varchar2
859   ,p_cont_attribute11                  in        varchar2  default hr_api.g_varchar2
860   ,p_cont_attribute12                  in        varchar2  default hr_api.g_varchar2
861   ,p_cont_attribute13                  in        varchar2  default hr_api.g_varchar2
862   ,p_cont_attribute14                  in        varchar2  default hr_api.g_varchar2
863   ,p_cont_attribute15                  in        varchar2  default hr_api.g_varchar2
864   ,p_cont_attribute16                  in        varchar2  default hr_api.g_varchar2
865   ,p_cont_attribute17                  in        varchar2  default hr_api.g_varchar2
866   ,p_cont_attribute18                  in        varchar2  default hr_api.g_varchar2
867   ,p_cont_attribute19                  in        varchar2  default hr_api.g_varchar2
868   ,p_cont_attribute20                  in        varchar2  default hr_api.g_varchar2
869   ,p_cont_information_category           in        varchar2  default hr_api.g_varchar2
870   ,Relationship_Info                     in        varchar2  default hr_api.g_varchar2
871   ,Address_Info                          in        varchar2  default hr_api.g_varchar2
872   ,p_cont_information3                   in        varchar2  default hr_api.g_varchar2
873   ,p_cont_information4                   in        varchar2  default hr_api.g_varchar2
874   ,p_cont_information5                   in        varchar2  default hr_api.g_varchar2
875   ,p_cont_information6                   in        varchar2  default hr_api.g_varchar2
876   ,p_cont_information7                   in        varchar2  default hr_api.g_varchar2
877   ,p_cont_information8                   in        varchar2  default hr_api.g_varchar2
878   ,p_cont_information9                   in        varchar2  default hr_api.g_varchar2
879   ,p_cont_information10                  in        varchar2  default hr_api.g_varchar2
880   ,p_cont_information11                  in        varchar2  default hr_api.g_varchar2
881   ,p_cont_information12                  in        varchar2  default hr_api.g_varchar2
882   ,p_cont_information13                  in        varchar2  default hr_api.g_varchar2
883   ,p_cont_information14                  in        varchar2  default hr_api.g_varchar2
884   ,p_cont_information15                  in        varchar2  default hr_api.g_varchar2
885   ,p_cont_information16                  in        varchar2  default hr_api.g_varchar2
886   ,p_cont_information17                  in        varchar2  default hr_api.g_varchar2
887   ,p_cont_information18                  in        varchar2  default hr_api.g_varchar2
888   ,p_cont_information19                  in        varchar2  default hr_api.g_varchar2
889   ,p_cont_information20                  in        varchar2  default hr_api.g_varchar2
890   ,p_object_version_number             in out nocopy    number) IS
891 
892 
893 -- Declare cursors and local variables
894   --
895   l_proc                 varchar2(72);
896   l_legislation_code     varchar2(2);
897   --
898   cursor csr_bg is
899     select legislation_code
900     from per_business_groups pbg
901     where pbg.business_group_id in (select pr.business_group_id
902     from  per_contact_relationships pr
903     where pr.contact_relationship_id = p_contact_relationship_id);
904   --
905 begin
906 
907    g_package := 'hr_pl_contact_rel_api.';
908    l_proc    := g_package||'update_pl_contact_relationship';
909 
910   --
911   -- Validation in addition to Row Handlers
912   --
913   -- Check that the specified business group is valid.
914   --
915   open csr_bg;
916   fetch csr_bg
917   into l_legislation_code;
918   if csr_bg%notfound then
919     close csr_bg;
920     hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
921     hr_utility.raise_error;
922   end if;
923   close csr_bg;
924   --
925   -- Check that the legislation of the specified business group is 'PL'.
926   --
927   if l_legislation_code <> 'PL' then
928     hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
929     hr_utility.set_message_token('LEG_CODE','PL');
930     hr_utility.raise_error;
931   end if;
932 
933   hr_utility.set_location('Entering:'|| l_proc, 5);
934 
935 
936 
937 hr_contact_rel_api.update_contact_relationship(
938 p_validate                             => p_validate
939 ,p_effective_date                       => p_effective_date
940 ,p_contact_relationship_id              => p_contact_relationship_id
941 ,p_contact_type                         => p_contact_type
942 ,p_comments                             => p_comments
943 ,p_primary_contact_flag                 => p_primary_contact_flag
944 ,p_third_party_pay_flag                 => p_third_party_pay_flag
945 ,p_bondholder_flag 			=> p_bondholder_flag
946 ,p_date_start				=> p_date_start
947 ,p_start_life_reason_id                 => p_start_life_reason_id
948 ,p_date_end                             => p_date_end
949 ,p_end_life_reason_id                   => p_end_life_reason_id
950 ,p_rltd_per_rsds_w_dsgntr_flag          => p_rltd_per_rsds_w_dsgntr_flag
951 ,p_personal_flag                        => p_personal_flag
952 ,p_sequence_number                      => p_sequence_number
953 ,p_dependent_flag			=> p_dependent_flag
954 ,p_beneficiary_flag			=> p_beneficiary_flag
955 ,p_cont_attribute_category              => p_cont_attribute_category
956 ,p_cont_attribute1                      => p_cont_attribute1
957 ,p_cont_attribute2                      => p_cont_attribute2
958 ,p_cont_attribute3                      => p_cont_attribute3
959 ,p_cont_attribute4                      => p_cont_attribute4
960 ,p_cont_attribute5                      => p_cont_attribute5
961 ,p_cont_attribute6                      => p_cont_attribute6
962 ,p_cont_attribute7                      => p_cont_attribute7
963 ,p_cont_attribute8                      => p_cont_attribute8
964 ,p_cont_attribute9                      => p_cont_attribute9
965 ,p_cont_attribute10                     => p_cont_attribute10
966 ,p_cont_attribute11                     => p_cont_attribute11
967 ,p_cont_attribute12                     => p_cont_attribute12
968 ,p_cont_attribute13                     => p_cont_attribute13
969 ,p_cont_attribute14                     => p_cont_attribute14
970 ,p_cont_attribute15                     => p_cont_attribute15
971 ,p_cont_attribute16                     => p_cont_attribute16
972 ,p_cont_attribute17                     => p_cont_attribute17
973 ,p_cont_attribute18                     => p_cont_attribute18
974 ,p_cont_attribute19                     => p_cont_attribute19
975 ,p_cont_attribute20                     => p_cont_attribute20
976 ,p_cont_information_category            => p_cont_information_category
977 ,p_cont_information1                    => Relationship_Info
978 ,p_cont_information2                    => Address_Info
979 ,p_cont_information3                    => p_cont_information3
980 ,p_cont_information4                    => p_cont_information4
981 ,p_cont_information5                    => p_cont_information5
982 ,p_cont_information6                    => p_cont_information6
983 ,p_cont_information7                    => p_cont_information7
984 ,p_cont_information8                    => p_cont_information8
985 ,p_cont_information9                    => p_cont_information9
986 ,p_cont_information10                   => p_cont_information10
987 ,p_cont_information11                   => p_cont_information11
988 ,p_cont_information12                   => p_cont_information12
989 ,p_cont_information13                   => p_cont_information13
990 ,p_cont_information14                   => p_cont_information14
991 ,p_cont_information15                   => p_cont_information15
992 ,p_cont_information16                   => p_cont_information16
993 ,p_cont_information17                   => p_cont_information17
994 ,p_cont_information18                   => p_cont_information18
995 ,p_cont_information19                   => p_cont_information19
996 ,p_cont_information20                   => p_cont_information20
997 ,p_object_version_number		=> p_object_version_number);
998 
999 END UPDATE_PL_CONTACT_RELATIONSHIP;
1000 
1001 END HR_PL_CONTACT_REL_API;