[Home] [Help]
51: --
52: -- {End Of Comments}
53: -- ----------------------------------------------------------------------------
54: Procedure update_dml
55: (p_rec in out nocopy irc_cmp_shd.g_rec_type
56: ) is
57: --
58: l_proc varchar2(72) := g_package||'update_dml';
59: --
109: Exception
110: When hr_api.check_integrity_violated Then
111: -- A check constraint has been violated
112: --
113: irc_cmp_shd.constraint_error
114: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
115: When hr_api.parent_integrity_violated Then
116: -- Parent integrity has been violated
117: --
114: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
115: When hr_api.parent_integrity_violated Then
116: -- Parent integrity has been violated
117: --
118: irc_cmp_shd.constraint_error
119: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
120: When hr_api.unique_integrity_violated Then
121: -- Unique integrity has been violated
122: --
119: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
120: When hr_api.unique_integrity_violated Then
121: -- Unique integrity has been violated
122: --
123: irc_cmp_shd.constraint_error
124: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
125: When Others Then
126: --
127: Raise;
159: --
160: -- {End Of Comments}
161: -- ----------------------------------------------------------------------------
162: Procedure pre_update
163: (p_rec in irc_cmp_shd.g_rec_type
164: ) is
165: --
166: l_proc varchar2(72) := g_package||'pre_update';
167: --
204: -- {End Of Comments}
205: -- ----------------------------------------------------------------------------
206: Procedure post_update
207: (p_effective_date in date
208: ,p_rec in irc_cmp_shd.g_rec_type
209: ) is
210: --
211: l_proc varchar2(72) := g_package||'post_update';
212: --
278: => p_rec.information10
279: ,p_object_version_number
280: => p_rec.object_version_number
281: ,p_object_type_o
282: => irc_cmp_shd.g_old_rec.object_type
283: ,p_object_id_o
284: => irc_cmp_shd.g_old_rec.object_id
285: ,p_default_comm_status_o
286: => irc_cmp_shd.g_old_rec.default_comm_status
280: => p_rec.object_version_number
281: ,p_object_type_o
282: => irc_cmp_shd.g_old_rec.object_type
283: ,p_object_id_o
284: => irc_cmp_shd.g_old_rec.object_id
285: ,p_default_comm_status_o
286: => irc_cmp_shd.g_old_rec.default_comm_status
287: ,p_allow_attachment_flag_o
288: => irc_cmp_shd.g_old_rec.allow_attachment_flag
282: => irc_cmp_shd.g_old_rec.object_type
283: ,p_object_id_o
284: => irc_cmp_shd.g_old_rec.object_id
285: ,p_default_comm_status_o
286: => irc_cmp_shd.g_old_rec.default_comm_status
287: ,p_allow_attachment_flag_o
288: => irc_cmp_shd.g_old_rec.allow_attachment_flag
289: ,p_auto_notification_flag_o
290: => irc_cmp_shd.g_old_rec.auto_notification_flag
284: => irc_cmp_shd.g_old_rec.object_id
285: ,p_default_comm_status_o
286: => irc_cmp_shd.g_old_rec.default_comm_status
287: ,p_allow_attachment_flag_o
288: => irc_cmp_shd.g_old_rec.allow_attachment_flag
289: ,p_auto_notification_flag_o
290: => irc_cmp_shd.g_old_rec.auto_notification_flag
291: ,p_allow_add_recipients_o
292: => irc_cmp_shd.g_old_rec.allow_add_recipients
286: => irc_cmp_shd.g_old_rec.default_comm_status
287: ,p_allow_attachment_flag_o
288: => irc_cmp_shd.g_old_rec.allow_attachment_flag
289: ,p_auto_notification_flag_o
290: => irc_cmp_shd.g_old_rec.auto_notification_flag
291: ,p_allow_add_recipients_o
292: => irc_cmp_shd.g_old_rec.allow_add_recipients
293: ,p_default_moderator_o
294: => irc_cmp_shd.g_old_rec.default_moderator
288: => irc_cmp_shd.g_old_rec.allow_attachment_flag
289: ,p_auto_notification_flag_o
290: => irc_cmp_shd.g_old_rec.auto_notification_flag
291: ,p_allow_add_recipients_o
292: => irc_cmp_shd.g_old_rec.allow_add_recipients
293: ,p_default_moderator_o
294: => irc_cmp_shd.g_old_rec.default_moderator
295: ,p_attribute_category_o
296: => irc_cmp_shd.g_old_rec.attribute_category
290: => irc_cmp_shd.g_old_rec.auto_notification_flag
291: ,p_allow_add_recipients_o
292: => irc_cmp_shd.g_old_rec.allow_add_recipients
293: ,p_default_moderator_o
294: => irc_cmp_shd.g_old_rec.default_moderator
295: ,p_attribute_category_o
296: => irc_cmp_shd.g_old_rec.attribute_category
297: ,p_attribute1_o
298: => irc_cmp_shd.g_old_rec.attribute1
292: => irc_cmp_shd.g_old_rec.allow_add_recipients
293: ,p_default_moderator_o
294: => irc_cmp_shd.g_old_rec.default_moderator
295: ,p_attribute_category_o
296: => irc_cmp_shd.g_old_rec.attribute_category
297: ,p_attribute1_o
298: => irc_cmp_shd.g_old_rec.attribute1
299: ,p_attribute2_o
300: => irc_cmp_shd.g_old_rec.attribute2
294: => irc_cmp_shd.g_old_rec.default_moderator
295: ,p_attribute_category_o
296: => irc_cmp_shd.g_old_rec.attribute_category
297: ,p_attribute1_o
298: => irc_cmp_shd.g_old_rec.attribute1
299: ,p_attribute2_o
300: => irc_cmp_shd.g_old_rec.attribute2
301: ,p_attribute3_o
302: => irc_cmp_shd.g_old_rec.attribute3
296: => irc_cmp_shd.g_old_rec.attribute_category
297: ,p_attribute1_o
298: => irc_cmp_shd.g_old_rec.attribute1
299: ,p_attribute2_o
300: => irc_cmp_shd.g_old_rec.attribute2
301: ,p_attribute3_o
302: => irc_cmp_shd.g_old_rec.attribute3
303: ,p_attribute4_o
304: => irc_cmp_shd.g_old_rec.attribute4
298: => irc_cmp_shd.g_old_rec.attribute1
299: ,p_attribute2_o
300: => irc_cmp_shd.g_old_rec.attribute2
301: ,p_attribute3_o
302: => irc_cmp_shd.g_old_rec.attribute3
303: ,p_attribute4_o
304: => irc_cmp_shd.g_old_rec.attribute4
305: ,p_attribute5_o
306: => irc_cmp_shd.g_old_rec.attribute5
300: => irc_cmp_shd.g_old_rec.attribute2
301: ,p_attribute3_o
302: => irc_cmp_shd.g_old_rec.attribute3
303: ,p_attribute4_o
304: => irc_cmp_shd.g_old_rec.attribute4
305: ,p_attribute5_o
306: => irc_cmp_shd.g_old_rec.attribute5
307: ,p_attribute6_o
308: => irc_cmp_shd.g_old_rec.attribute6
302: => irc_cmp_shd.g_old_rec.attribute3
303: ,p_attribute4_o
304: => irc_cmp_shd.g_old_rec.attribute4
305: ,p_attribute5_o
306: => irc_cmp_shd.g_old_rec.attribute5
307: ,p_attribute6_o
308: => irc_cmp_shd.g_old_rec.attribute6
309: ,p_attribute7_o
310: => irc_cmp_shd.g_old_rec.attribute7
304: => irc_cmp_shd.g_old_rec.attribute4
305: ,p_attribute5_o
306: => irc_cmp_shd.g_old_rec.attribute5
307: ,p_attribute6_o
308: => irc_cmp_shd.g_old_rec.attribute6
309: ,p_attribute7_o
310: => irc_cmp_shd.g_old_rec.attribute7
311: ,p_attribute8_o
312: => irc_cmp_shd.g_old_rec.attribute8
306: => irc_cmp_shd.g_old_rec.attribute5
307: ,p_attribute6_o
308: => irc_cmp_shd.g_old_rec.attribute6
309: ,p_attribute7_o
310: => irc_cmp_shd.g_old_rec.attribute7
311: ,p_attribute8_o
312: => irc_cmp_shd.g_old_rec.attribute8
313: ,p_attribute9_o
314: => irc_cmp_shd.g_old_rec.attribute9
308: => irc_cmp_shd.g_old_rec.attribute6
309: ,p_attribute7_o
310: => irc_cmp_shd.g_old_rec.attribute7
311: ,p_attribute8_o
312: => irc_cmp_shd.g_old_rec.attribute8
313: ,p_attribute9_o
314: => irc_cmp_shd.g_old_rec.attribute9
315: ,p_attribute10_o
316: => irc_cmp_shd.g_old_rec.attribute10
310: => irc_cmp_shd.g_old_rec.attribute7
311: ,p_attribute8_o
312: => irc_cmp_shd.g_old_rec.attribute8
313: ,p_attribute9_o
314: => irc_cmp_shd.g_old_rec.attribute9
315: ,p_attribute10_o
316: => irc_cmp_shd.g_old_rec.attribute10
317: ,p_information_category_o
318: => irc_cmp_shd.g_old_rec.information_category
312: => irc_cmp_shd.g_old_rec.attribute8
313: ,p_attribute9_o
314: => irc_cmp_shd.g_old_rec.attribute9
315: ,p_attribute10_o
316: => irc_cmp_shd.g_old_rec.attribute10
317: ,p_information_category_o
318: => irc_cmp_shd.g_old_rec.information_category
319: ,p_information1_o
320: => irc_cmp_shd.g_old_rec.information1
314: => irc_cmp_shd.g_old_rec.attribute9
315: ,p_attribute10_o
316: => irc_cmp_shd.g_old_rec.attribute10
317: ,p_information_category_o
318: => irc_cmp_shd.g_old_rec.information_category
319: ,p_information1_o
320: => irc_cmp_shd.g_old_rec.information1
321: ,p_information2_o
322: => irc_cmp_shd.g_old_rec.information2
316: => irc_cmp_shd.g_old_rec.attribute10
317: ,p_information_category_o
318: => irc_cmp_shd.g_old_rec.information_category
319: ,p_information1_o
320: => irc_cmp_shd.g_old_rec.information1
321: ,p_information2_o
322: => irc_cmp_shd.g_old_rec.information2
323: ,p_information3_o
324: => irc_cmp_shd.g_old_rec.information3
318: => irc_cmp_shd.g_old_rec.information_category
319: ,p_information1_o
320: => irc_cmp_shd.g_old_rec.information1
321: ,p_information2_o
322: => irc_cmp_shd.g_old_rec.information2
323: ,p_information3_o
324: => irc_cmp_shd.g_old_rec.information3
325: ,p_information4_o
326: => irc_cmp_shd.g_old_rec.information4
320: => irc_cmp_shd.g_old_rec.information1
321: ,p_information2_o
322: => irc_cmp_shd.g_old_rec.information2
323: ,p_information3_o
324: => irc_cmp_shd.g_old_rec.information3
325: ,p_information4_o
326: => irc_cmp_shd.g_old_rec.information4
327: ,p_information5_o
328: => irc_cmp_shd.g_old_rec.information5
322: => irc_cmp_shd.g_old_rec.information2
323: ,p_information3_o
324: => irc_cmp_shd.g_old_rec.information3
325: ,p_information4_o
326: => irc_cmp_shd.g_old_rec.information4
327: ,p_information5_o
328: => irc_cmp_shd.g_old_rec.information5
329: ,p_information6_o
330: => irc_cmp_shd.g_old_rec.information6
324: => irc_cmp_shd.g_old_rec.information3
325: ,p_information4_o
326: => irc_cmp_shd.g_old_rec.information4
327: ,p_information5_o
328: => irc_cmp_shd.g_old_rec.information5
329: ,p_information6_o
330: => irc_cmp_shd.g_old_rec.information6
331: ,p_information7_o
332: => irc_cmp_shd.g_old_rec.information7
326: => irc_cmp_shd.g_old_rec.information4
327: ,p_information5_o
328: => irc_cmp_shd.g_old_rec.information5
329: ,p_information6_o
330: => irc_cmp_shd.g_old_rec.information6
331: ,p_information7_o
332: => irc_cmp_shd.g_old_rec.information7
333: ,p_information8_o
334: => irc_cmp_shd.g_old_rec.information8
328: => irc_cmp_shd.g_old_rec.information5
329: ,p_information6_o
330: => irc_cmp_shd.g_old_rec.information6
331: ,p_information7_o
332: => irc_cmp_shd.g_old_rec.information7
333: ,p_information8_o
334: => irc_cmp_shd.g_old_rec.information8
335: ,p_information9_o
336: => irc_cmp_shd.g_old_rec.information9
330: => irc_cmp_shd.g_old_rec.information6
331: ,p_information7_o
332: => irc_cmp_shd.g_old_rec.information7
333: ,p_information8_o
334: => irc_cmp_shd.g_old_rec.information8
335: ,p_information9_o
336: => irc_cmp_shd.g_old_rec.information9
337: ,p_information10_o
338: => irc_cmp_shd.g_old_rec.information10
332: => irc_cmp_shd.g_old_rec.information7
333: ,p_information8_o
334: => irc_cmp_shd.g_old_rec.information8
335: ,p_information9_o
336: => irc_cmp_shd.g_old_rec.information9
337: ,p_information10_o
338: => irc_cmp_shd.g_old_rec.information10
339: ,p_object_version_number_o
340: => irc_cmp_shd.g_old_rec.object_version_number
334: => irc_cmp_shd.g_old_rec.information8
335: ,p_information9_o
336: => irc_cmp_shd.g_old_rec.information9
337: ,p_information10_o
338: => irc_cmp_shd.g_old_rec.information10
339: ,p_object_version_number_o
340: => irc_cmp_shd.g_old_rec.object_version_number
341: );
342: --
336: => irc_cmp_shd.g_old_rec.information9
337: ,p_information10_o
338: => irc_cmp_shd.g_old_rec.information10
339: ,p_object_version_number_o
340: => irc_cmp_shd.g_old_rec.object_version_number
341: );
342: --
343: exception
344: --
396: --
397: -- {End Of Comments}
398: -- ----------------------------------------------------------------------------
399: Procedure convert_defs
400: (p_rec in out nocopy irc_cmp_shd.g_rec_type
401: ) is
402: --
403: Begin
404: --
408: -- is being used then we must set to the 'current' argument value.
409: --
410: If (p_rec.object_type = hr_api.g_varchar2) then
411: p_rec.object_type :=
412: irc_cmp_shd.g_old_rec.object_type;
413: End If;
414: If (p_rec.object_id = hr_api.g_number) then
415: p_rec.object_id :=
416: irc_cmp_shd.g_old_rec.object_id;
412: irc_cmp_shd.g_old_rec.object_type;
413: End If;
414: If (p_rec.object_id = hr_api.g_number) then
415: p_rec.object_id :=
416: irc_cmp_shd.g_old_rec.object_id;
417: End If;
418: If (p_rec.default_comm_status = hr_api.g_varchar2) then
419: p_rec.default_comm_status :=
420: irc_cmp_shd.g_old_rec.default_comm_status;
416: irc_cmp_shd.g_old_rec.object_id;
417: End If;
418: If (p_rec.default_comm_status = hr_api.g_varchar2) then
419: p_rec.default_comm_status :=
420: irc_cmp_shd.g_old_rec.default_comm_status;
421: End If;
422: If (p_rec.allow_attachment_flag = hr_api.g_varchar2) then
423: p_rec.allow_attachment_flag :=
424: irc_cmp_shd.g_old_rec.allow_attachment_flag;
420: irc_cmp_shd.g_old_rec.default_comm_status;
421: End If;
422: If (p_rec.allow_attachment_flag = hr_api.g_varchar2) then
423: p_rec.allow_attachment_flag :=
424: irc_cmp_shd.g_old_rec.allow_attachment_flag;
425: End If;
426: If (p_rec.auto_notification_flag = hr_api.g_varchar2) then
427: p_rec.auto_notification_flag :=
428: irc_cmp_shd.g_old_rec.auto_notification_flag;
424: irc_cmp_shd.g_old_rec.allow_attachment_flag;
425: End If;
426: If (p_rec.auto_notification_flag = hr_api.g_varchar2) then
427: p_rec.auto_notification_flag :=
428: irc_cmp_shd.g_old_rec.auto_notification_flag;
429: End If;
430: If (p_rec.allow_add_recipients = hr_api.g_varchar2) then
431: p_rec.allow_add_recipients :=
432: irc_cmp_shd.g_old_rec.allow_add_recipients;
428: irc_cmp_shd.g_old_rec.auto_notification_flag;
429: End If;
430: If (p_rec.allow_add_recipients = hr_api.g_varchar2) then
431: p_rec.allow_add_recipients :=
432: irc_cmp_shd.g_old_rec.allow_add_recipients;
433: End If;
434: If (p_rec.default_moderator = hr_api.g_varchar2) then
435: p_rec.default_moderator :=
436: irc_cmp_shd.g_old_rec.default_moderator;
432: irc_cmp_shd.g_old_rec.allow_add_recipients;
433: End If;
434: If (p_rec.default_moderator = hr_api.g_varchar2) then
435: p_rec.default_moderator :=
436: irc_cmp_shd.g_old_rec.default_moderator;
437: End If;
438: If (p_rec.attribute_category = hr_api.g_varchar2) then
439: p_rec.attribute_category :=
440: irc_cmp_shd.g_old_rec.attribute_category;
436: irc_cmp_shd.g_old_rec.default_moderator;
437: End If;
438: If (p_rec.attribute_category = hr_api.g_varchar2) then
439: p_rec.attribute_category :=
440: irc_cmp_shd.g_old_rec.attribute_category;
441: End If;
442: If (p_rec.attribute1 = hr_api.g_varchar2) then
443: p_rec.attribute1 :=
444: irc_cmp_shd.g_old_rec.attribute1;
440: irc_cmp_shd.g_old_rec.attribute_category;
441: End If;
442: If (p_rec.attribute1 = hr_api.g_varchar2) then
443: p_rec.attribute1 :=
444: irc_cmp_shd.g_old_rec.attribute1;
445: End If;
446: If (p_rec.attribute2 = hr_api.g_varchar2) then
447: p_rec.attribute2 :=
448: irc_cmp_shd.g_old_rec.attribute2;
444: irc_cmp_shd.g_old_rec.attribute1;
445: End If;
446: If (p_rec.attribute2 = hr_api.g_varchar2) then
447: p_rec.attribute2 :=
448: irc_cmp_shd.g_old_rec.attribute2;
449: End If;
450: If (p_rec.attribute3 = hr_api.g_varchar2) then
451: p_rec.attribute3 :=
452: irc_cmp_shd.g_old_rec.attribute3;
448: irc_cmp_shd.g_old_rec.attribute2;
449: End If;
450: If (p_rec.attribute3 = hr_api.g_varchar2) then
451: p_rec.attribute3 :=
452: irc_cmp_shd.g_old_rec.attribute3;
453: End If;
454: If (p_rec.attribute4 = hr_api.g_varchar2) then
455: p_rec.attribute4 :=
456: irc_cmp_shd.g_old_rec.attribute4;
452: irc_cmp_shd.g_old_rec.attribute3;
453: End If;
454: If (p_rec.attribute4 = hr_api.g_varchar2) then
455: p_rec.attribute4 :=
456: irc_cmp_shd.g_old_rec.attribute4;
457: End If;
458: If (p_rec.attribute5 = hr_api.g_varchar2) then
459: p_rec.attribute5 :=
460: irc_cmp_shd.g_old_rec.attribute5;
456: irc_cmp_shd.g_old_rec.attribute4;
457: End If;
458: If (p_rec.attribute5 = hr_api.g_varchar2) then
459: p_rec.attribute5 :=
460: irc_cmp_shd.g_old_rec.attribute5;
461: End If;
462: If (p_rec.attribute6 = hr_api.g_varchar2) then
463: p_rec.attribute6 :=
464: irc_cmp_shd.g_old_rec.attribute6;
460: irc_cmp_shd.g_old_rec.attribute5;
461: End If;
462: If (p_rec.attribute6 = hr_api.g_varchar2) then
463: p_rec.attribute6 :=
464: irc_cmp_shd.g_old_rec.attribute6;
465: End If;
466: If (p_rec.attribute7 = hr_api.g_varchar2) then
467: p_rec.attribute7 :=
468: irc_cmp_shd.g_old_rec.attribute7;
464: irc_cmp_shd.g_old_rec.attribute6;
465: End If;
466: If (p_rec.attribute7 = hr_api.g_varchar2) then
467: p_rec.attribute7 :=
468: irc_cmp_shd.g_old_rec.attribute7;
469: End If;
470: If (p_rec.attribute8 = hr_api.g_varchar2) then
471: p_rec.attribute8 :=
472: irc_cmp_shd.g_old_rec.attribute8;
468: irc_cmp_shd.g_old_rec.attribute7;
469: End If;
470: If (p_rec.attribute8 = hr_api.g_varchar2) then
471: p_rec.attribute8 :=
472: irc_cmp_shd.g_old_rec.attribute8;
473: End If;
474: If (p_rec.attribute9 = hr_api.g_varchar2) then
475: p_rec.attribute9 :=
476: irc_cmp_shd.g_old_rec.attribute9;
472: irc_cmp_shd.g_old_rec.attribute8;
473: End If;
474: If (p_rec.attribute9 = hr_api.g_varchar2) then
475: p_rec.attribute9 :=
476: irc_cmp_shd.g_old_rec.attribute9;
477: End If;
478: If (p_rec.attribute10 = hr_api.g_varchar2) then
479: p_rec.attribute10 :=
480: irc_cmp_shd.g_old_rec.attribute10;
476: irc_cmp_shd.g_old_rec.attribute9;
477: End If;
478: If (p_rec.attribute10 = hr_api.g_varchar2) then
479: p_rec.attribute10 :=
480: irc_cmp_shd.g_old_rec.attribute10;
481: End If;
482: If (p_rec.information_category = hr_api.g_varchar2) then
483: p_rec.information_category :=
484: irc_cmp_shd.g_old_rec.information_category;
480: irc_cmp_shd.g_old_rec.attribute10;
481: End If;
482: If (p_rec.information_category = hr_api.g_varchar2) then
483: p_rec.information_category :=
484: irc_cmp_shd.g_old_rec.information_category;
485: End If;
486: If (p_rec.information1 = hr_api.g_varchar2) then
487: p_rec.information1 :=
488: irc_cmp_shd.g_old_rec.information1;
484: irc_cmp_shd.g_old_rec.information_category;
485: End If;
486: If (p_rec.information1 = hr_api.g_varchar2) then
487: p_rec.information1 :=
488: irc_cmp_shd.g_old_rec.information1;
489: End If;
490: If (p_rec.information2 = hr_api.g_varchar2) then
491: p_rec.information2 :=
492: irc_cmp_shd.g_old_rec.information2;
488: irc_cmp_shd.g_old_rec.information1;
489: End If;
490: If (p_rec.information2 = hr_api.g_varchar2) then
491: p_rec.information2 :=
492: irc_cmp_shd.g_old_rec.information2;
493: End If;
494: If (p_rec.information3 = hr_api.g_varchar2) then
495: p_rec.information3 :=
496: irc_cmp_shd.g_old_rec.information3;
492: irc_cmp_shd.g_old_rec.information2;
493: End If;
494: If (p_rec.information3 = hr_api.g_varchar2) then
495: p_rec.information3 :=
496: irc_cmp_shd.g_old_rec.information3;
497: End If;
498: If (p_rec.information4 = hr_api.g_varchar2) then
499: p_rec.information4 :=
500: irc_cmp_shd.g_old_rec.information4;
496: irc_cmp_shd.g_old_rec.information3;
497: End If;
498: If (p_rec.information4 = hr_api.g_varchar2) then
499: p_rec.information4 :=
500: irc_cmp_shd.g_old_rec.information4;
501: End If;
502: If (p_rec.information5 = hr_api.g_varchar2) then
503: p_rec.information5 :=
504: irc_cmp_shd.g_old_rec.information5;
500: irc_cmp_shd.g_old_rec.information4;
501: End If;
502: If (p_rec.information5 = hr_api.g_varchar2) then
503: p_rec.information5 :=
504: irc_cmp_shd.g_old_rec.information5;
505: End If;
506: If (p_rec.information6 = hr_api.g_varchar2) then
507: p_rec.information6 :=
508: irc_cmp_shd.g_old_rec.information6;
504: irc_cmp_shd.g_old_rec.information5;
505: End If;
506: If (p_rec.information6 = hr_api.g_varchar2) then
507: p_rec.information6 :=
508: irc_cmp_shd.g_old_rec.information6;
509: End If;
510: If (p_rec.information7 = hr_api.g_varchar2) then
511: p_rec.information7 :=
512: irc_cmp_shd.g_old_rec.information7;
508: irc_cmp_shd.g_old_rec.information6;
509: End If;
510: If (p_rec.information7 = hr_api.g_varchar2) then
511: p_rec.information7 :=
512: irc_cmp_shd.g_old_rec.information7;
513: End If;
514: If (p_rec.information8 = hr_api.g_varchar2) then
515: p_rec.information8 :=
516: irc_cmp_shd.g_old_rec.information8;
512: irc_cmp_shd.g_old_rec.information7;
513: End If;
514: If (p_rec.information8 = hr_api.g_varchar2) then
515: p_rec.information8 :=
516: irc_cmp_shd.g_old_rec.information8;
517: End If;
518: If (p_rec.information9 = hr_api.g_varchar2) then
519: p_rec.information9 :=
520: irc_cmp_shd.g_old_rec.information9;
516: irc_cmp_shd.g_old_rec.information8;
517: End If;
518: If (p_rec.information9 = hr_api.g_varchar2) then
519: p_rec.information9 :=
520: irc_cmp_shd.g_old_rec.information9;
521: End If;
522: If (p_rec.information10 = hr_api.g_varchar2) then
523: p_rec.information10 :=
524: irc_cmp_shd.g_old_rec.information10;
520: irc_cmp_shd.g_old_rec.information9;
521: End If;
522: If (p_rec.information10 = hr_api.g_varchar2) then
523: p_rec.information10 :=
524: irc_cmp_shd.g_old_rec.information10;
525: End If;
526: --
527: End convert_defs;
528: --
530: -- |---------------------------------< upd >----------------------------------|
531: -- ----------------------------------------------------------------------------
532: Procedure upd
533: (p_effective_date in date
534: ,p_rec in out nocopy irc_cmp_shd.g_rec_type
535: ) is
536: --
537: l_proc varchar2(72) := g_package||'upd';
538: --
540: hr_utility.set_location('Entering:'||l_proc, 5);
541: --
542: -- We must lock the row which we need to update.
543: --
544: irc_cmp_shd.lck
545: (p_rec.communication_property_id
546: ,p_rec.object_version_number
547: );
548: --
617: ,p_information9 in varchar2 default hr_api.g_varchar2
618: ,p_information10 in varchar2 default hr_api.g_varchar2
619: ) is
620: --
621: l_rec irc_cmp_shd.g_rec_type;
622: l_proc varchar2(72) := g_package||'upd';
623: --
624: Begin
625: hr_utility.set_location('Entering:'||l_proc, 5);
627: -- Call conversion function to turn arguments into the
628: -- l_rec structure.
629: --
630: l_rec :=
631: irc_cmp_shd.convert_args
632: (p_communication_property_id
633: ,p_object_type
634: ,p_object_id
635: ,p_default_comm_status