50: -- Internal Table Handler Use Only.
51: --
52: -- {End Of Comments}
53: -- ----------------------------------------------------------------------------
54: Procedure update_dml(p_rec in out nocopy ssp_mat_shd.g_rec_type) is
55: --
56: l_proc varchar2(72) := g_package||'update_dml';
57: --
58: Begin
61: -- Increment the object version
62: --
63: p_rec.object_version_number := p_rec.object_version_number + 1;
64: --
65: ssp_mat_shd.g_api_dml := true; -- Set the api dml status
66: --
67: -- Update the ssp_maternities Row
68: --
69: update ssp_maternities
141: partner_return_to_work = p_rec.partner_return_to_work ,
142: partner_death_date = p_rec.partner_death_date
143: where maternity_id = p_rec.maternity_id;
144: --
145: ssp_mat_shd.g_api_dml := false; -- Unset the api dml status
146: --
147: hr_utility.set_location(' Leaving:'||l_proc, 10);
148: --
149: Exception
148: --
149: Exception
150: When hr_api.check_integrity_violated Then
151: -- A check constraint has been violated
152: ssp_mat_shd.g_api_dml := false; -- Unset the api dml status
153: ssp_mat_shd.constraint_error
154: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
155: When hr_api.parent_integrity_violated Then
156: -- Parent integrity has been violated
149: Exception
150: When hr_api.check_integrity_violated Then
151: -- A check constraint has been violated
152: ssp_mat_shd.g_api_dml := false; -- Unset the api dml status
153: ssp_mat_shd.constraint_error
154: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
155: When hr_api.parent_integrity_violated Then
156: -- Parent integrity has been violated
157: ssp_mat_shd.g_api_dml := false; -- Unset the api dml status
153: ssp_mat_shd.constraint_error
154: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
155: When hr_api.parent_integrity_violated Then
156: -- Parent integrity has been violated
157: ssp_mat_shd.g_api_dml := false; -- Unset the api dml status
158: ssp_mat_shd.constraint_error
159: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
160: When hr_api.unique_integrity_violated Then
161: -- Unique integrity has been violated
154: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
155: When hr_api.parent_integrity_violated Then
156: -- Parent integrity has been violated
157: ssp_mat_shd.g_api_dml := false; -- Unset the api dml status
158: ssp_mat_shd.constraint_error
159: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
160: When hr_api.unique_integrity_violated Then
161: -- Unique integrity has been violated
162: ssp_mat_shd.g_api_dml := false; -- Unset the api dml status
158: ssp_mat_shd.constraint_error
159: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
160: When hr_api.unique_integrity_violated Then
161: -- Unique integrity has been violated
162: ssp_mat_shd.g_api_dml := false; -- Unset the api dml status
163: ssp_mat_shd.constraint_error
164: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
165: When Others Then
166: ssp_mat_shd.g_api_dml := false; -- Unset the api dml status
159: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
160: When hr_api.unique_integrity_violated Then
161: -- Unique integrity has been violated
162: ssp_mat_shd.g_api_dml := false; -- Unset the api dml status
163: ssp_mat_shd.constraint_error
164: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
165: When Others Then
166: ssp_mat_shd.g_api_dml := false; -- Unset the api dml status
167: Raise;
162: ssp_mat_shd.g_api_dml := false; -- Unset the api dml status
163: ssp_mat_shd.constraint_error
164: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
165: When Others Then
166: ssp_mat_shd.g_api_dml := false; -- Unset the api dml status
167: Raise;
168: End update_dml;
169: --
170: -- ----------------------------------------------------------------------------
198: -- Internal Table Handler Use Only.
199: --
200: -- {End Of Comments}
201: -- ----------------------------------------------------------------------------
202: Procedure pre_update(p_rec in ssp_mat_shd.g_rec_type) is
203: --
204: l_proc varchar2(72) := g_package||'pre_update';
205: --
206: Begin
240: -- Internal Table Handler Use Only.
241: --
242: -- {End Of Comments}
243: -- ----------------------------------------------------------------------------
244: Procedure post_update(p_rec in ssp_mat_shd.g_rec_type) is
245: --
246: l_proc varchar2(72) := g_package||'post_update';
247: --
248: Begin
294: -- Internal Table Handler Use Only.
295: --
296: -- {End Of Comments}
297: -- ----------------------------------------------------------------------------
298: Procedure convert_defs(p_rec in out nocopy ssp_mat_shd.g_rec_type) is
299: --
300: l_proc varchar2(72) := g_package||'convert_defs';
301: --
302: Begin
309: -- is being used then we must set to the 'current' argument value.
310: --
311: If (p_rec.due_date = hr_api.g_date) then
312: p_rec.due_date :=
313: ssp_mat_shd.g_old_rec.due_date;
314: End If;
315: If (p_rec.person_id = hr_api.g_number) then
316: p_rec.person_id :=
317: ssp_mat_shd.g_old_rec.person_id;
313: ssp_mat_shd.g_old_rec.due_date;
314: End If;
315: If (p_rec.person_id = hr_api.g_number) then
316: p_rec.person_id :=
317: ssp_mat_shd.g_old_rec.person_id;
318: End If;
319: If (p_rec.start_date_maternity_allowance = hr_api.g_date) then
320: p_rec.start_date_maternity_allowance :=
321: ssp_mat_shd.g_old_rec.start_date_maternity_allowance;
317: ssp_mat_shd.g_old_rec.person_id;
318: End If;
319: If (p_rec.start_date_maternity_allowance = hr_api.g_date) then
320: p_rec.start_date_maternity_allowance :=
321: ssp_mat_shd.g_old_rec.start_date_maternity_allowance;
322: End If;
323: If (p_rec.notification_of_birth_date = hr_api.g_date) then
324: p_rec.notification_of_birth_date :=
325: ssp_mat_shd.g_old_rec.notification_of_birth_date;
321: ssp_mat_shd.g_old_rec.start_date_maternity_allowance;
322: End If;
323: If (p_rec.notification_of_birth_date = hr_api.g_date) then
324: p_rec.notification_of_birth_date :=
325: ssp_mat_shd.g_old_rec.notification_of_birth_date;
326: End If;
327: If (p_rec.unfit_for_scheduled_return = hr_api.g_varchar2) then
328: p_rec.unfit_for_scheduled_return :=
329: ssp_mat_shd.g_old_rec.unfit_for_scheduled_return;
325: ssp_mat_shd.g_old_rec.notification_of_birth_date;
326: End If;
327: If (p_rec.unfit_for_scheduled_return = hr_api.g_varchar2) then
328: p_rec.unfit_for_scheduled_return :=
329: ssp_mat_shd.g_old_rec.unfit_for_scheduled_return;
330: End If;
331: If (p_rec.stated_return_date = hr_api.g_date) then
332: p_rec.stated_return_date :=
333: ssp_mat_shd.g_old_rec.stated_return_date;
329: ssp_mat_shd.g_old_rec.unfit_for_scheduled_return;
330: End If;
331: If (p_rec.stated_return_date = hr_api.g_date) then
332: p_rec.stated_return_date :=
333: ssp_mat_shd.g_old_rec.stated_return_date;
334: End If;
335: If (p_rec.intend_to_return_flag = hr_api.g_varchar2) then
336: p_rec.intend_to_return_flag :=
337: ssp_mat_shd.g_old_rec.intend_to_return_flag;
333: ssp_mat_shd.g_old_rec.stated_return_date;
334: End If;
335: If (p_rec.intend_to_return_flag = hr_api.g_varchar2) then
336: p_rec.intend_to_return_flag :=
337: ssp_mat_shd.g_old_rec.intend_to_return_flag;
338: End If;
339: If (p_rec.start_date_with_new_employer = hr_api.g_date) then
340: p_rec.start_date_with_new_employer :=
341: ssp_mat_shd.g_old_rec.start_date_with_new_employer;
337: ssp_mat_shd.g_old_rec.intend_to_return_flag;
338: End If;
339: If (p_rec.start_date_with_new_employer = hr_api.g_date) then
340: p_rec.start_date_with_new_employer :=
341: ssp_mat_shd.g_old_rec.start_date_with_new_employer;
342: End If;
343: If (p_rec.smp_must_be_paid_by_date = hr_api.g_date) then
344: p_rec.smp_must_be_paid_by_date :=
345: ssp_mat_shd.g_old_rec.smp_must_be_paid_by_date;
341: ssp_mat_shd.g_old_rec.start_date_with_new_employer;
342: End If;
343: If (p_rec.smp_must_be_paid_by_date = hr_api.g_date) then
344: p_rec.smp_must_be_paid_by_date :=
345: ssp_mat_shd.g_old_rec.smp_must_be_paid_by_date;
346: End If;
347: If (p_rec.pay_smp_as_lump_sum = hr_api.g_varchar2) then
348: p_rec.pay_smp_as_lump_sum :=
349: ssp_mat_shd.g_old_rec.pay_smp_as_lump_sum;
345: ssp_mat_shd.g_old_rec.smp_must_be_paid_by_date;
346: End If;
347: If (p_rec.pay_smp_as_lump_sum = hr_api.g_varchar2) then
348: p_rec.pay_smp_as_lump_sum :=
349: ssp_mat_shd.g_old_rec.pay_smp_as_lump_sum;
350: End If;
351: If (p_rec.live_birth_flag = hr_api.g_varchar2) then
352: p_rec.live_birth_flag :=
353: ssp_mat_shd.g_old_rec.live_birth_flag;
349: ssp_mat_shd.g_old_rec.pay_smp_as_lump_sum;
350: End If;
351: If (p_rec.live_birth_flag = hr_api.g_varchar2) then
352: p_rec.live_birth_flag :=
353: ssp_mat_shd.g_old_rec.live_birth_flag;
354: End If;
355: If (p_rec.actual_birth_date = hr_api.g_date) then
356: p_rec.actual_birth_date :=
357: ssp_mat_shd.g_old_rec.actual_birth_date;
353: ssp_mat_shd.g_old_rec.live_birth_flag;
354: End If;
355: If (p_rec.actual_birth_date = hr_api.g_date) then
356: p_rec.actual_birth_date :=
357: ssp_mat_shd.g_old_rec.actual_birth_date;
358: End If;
359: If (p_rec.mpp_start_date = hr_api.g_date) then
360: p_rec.mpp_start_date :=
361: ssp_mat_shd.g_old_rec.mpp_start_date;
357: ssp_mat_shd.g_old_rec.actual_birth_date;
358: End If;
359: If (p_rec.mpp_start_date = hr_api.g_date) then
360: p_rec.mpp_start_date :=
361: ssp_mat_shd.g_old_rec.mpp_start_date;
362: End If;
363: If (p_rec.attribute_category = hr_api.g_varchar2) then
364: p_rec.attribute_category :=
365: ssp_mat_shd.g_old_rec.attribute_category;
361: ssp_mat_shd.g_old_rec.mpp_start_date;
362: End If;
363: If (p_rec.attribute_category = hr_api.g_varchar2) then
364: p_rec.attribute_category :=
365: ssp_mat_shd.g_old_rec.attribute_category;
366: End If;
367: If (p_rec.attribute1 = hr_api.g_varchar2) then
368: p_rec.attribute1 :=
369: ssp_mat_shd.g_old_rec.attribute1;
365: ssp_mat_shd.g_old_rec.attribute_category;
366: End If;
367: If (p_rec.attribute1 = hr_api.g_varchar2) then
368: p_rec.attribute1 :=
369: ssp_mat_shd.g_old_rec.attribute1;
370: End If;
371: If (p_rec.attribute2 = hr_api.g_varchar2) then
372: p_rec.attribute2 :=
373: ssp_mat_shd.g_old_rec.attribute2;
369: ssp_mat_shd.g_old_rec.attribute1;
370: End If;
371: If (p_rec.attribute2 = hr_api.g_varchar2) then
372: p_rec.attribute2 :=
373: ssp_mat_shd.g_old_rec.attribute2;
374: End If;
375: If (p_rec.attribute3 = hr_api.g_varchar2) then
376: p_rec.attribute3 :=
377: ssp_mat_shd.g_old_rec.attribute3;
373: ssp_mat_shd.g_old_rec.attribute2;
374: End If;
375: If (p_rec.attribute3 = hr_api.g_varchar2) then
376: p_rec.attribute3 :=
377: ssp_mat_shd.g_old_rec.attribute3;
378: End If;
379: If (p_rec.attribute4 = hr_api.g_varchar2) then
380: p_rec.attribute4 :=
381: ssp_mat_shd.g_old_rec.attribute4;
377: ssp_mat_shd.g_old_rec.attribute3;
378: End If;
379: If (p_rec.attribute4 = hr_api.g_varchar2) then
380: p_rec.attribute4 :=
381: ssp_mat_shd.g_old_rec.attribute4;
382: End If;
383: If (p_rec.attribute5 = hr_api.g_varchar2) then
384: p_rec.attribute5 :=
385: ssp_mat_shd.g_old_rec.attribute5;
381: ssp_mat_shd.g_old_rec.attribute4;
382: End If;
383: If (p_rec.attribute5 = hr_api.g_varchar2) then
384: p_rec.attribute5 :=
385: ssp_mat_shd.g_old_rec.attribute5;
386: End If;
387: If (p_rec.attribute6 = hr_api.g_varchar2) then
388: p_rec.attribute6 :=
389: ssp_mat_shd.g_old_rec.attribute6;
385: ssp_mat_shd.g_old_rec.attribute5;
386: End If;
387: If (p_rec.attribute6 = hr_api.g_varchar2) then
388: p_rec.attribute6 :=
389: ssp_mat_shd.g_old_rec.attribute6;
390: End If;
391: If (p_rec.attribute7 = hr_api.g_varchar2) then
392: p_rec.attribute7 :=
393: ssp_mat_shd.g_old_rec.attribute7;
389: ssp_mat_shd.g_old_rec.attribute6;
390: End If;
391: If (p_rec.attribute7 = hr_api.g_varchar2) then
392: p_rec.attribute7 :=
393: ssp_mat_shd.g_old_rec.attribute7;
394: End If;
395: If (p_rec.attribute8 = hr_api.g_varchar2) then
396: p_rec.attribute8 :=
397: ssp_mat_shd.g_old_rec.attribute8;
393: ssp_mat_shd.g_old_rec.attribute7;
394: End If;
395: If (p_rec.attribute8 = hr_api.g_varchar2) then
396: p_rec.attribute8 :=
397: ssp_mat_shd.g_old_rec.attribute8;
398: End If;
399: If (p_rec.attribute9 = hr_api.g_varchar2) then
400: p_rec.attribute9 :=
401: ssp_mat_shd.g_old_rec.attribute9;
397: ssp_mat_shd.g_old_rec.attribute8;
398: End If;
399: If (p_rec.attribute9 = hr_api.g_varchar2) then
400: p_rec.attribute9 :=
401: ssp_mat_shd.g_old_rec.attribute9;
402: End If;
403: If (p_rec.attribute10 = hr_api.g_varchar2) then
404: p_rec.attribute10 :=
405: ssp_mat_shd.g_old_rec.attribute10;
401: ssp_mat_shd.g_old_rec.attribute9;
402: End If;
403: If (p_rec.attribute10 = hr_api.g_varchar2) then
404: p_rec.attribute10 :=
405: ssp_mat_shd.g_old_rec.attribute10;
406: End If;
407: If (p_rec.attribute11 = hr_api.g_varchar2) then
408: p_rec.attribute11 :=
409: ssp_mat_shd.g_old_rec.attribute11;
405: ssp_mat_shd.g_old_rec.attribute10;
406: End If;
407: If (p_rec.attribute11 = hr_api.g_varchar2) then
408: p_rec.attribute11 :=
409: ssp_mat_shd.g_old_rec.attribute11;
410: End If;
411: If (p_rec.attribute12 = hr_api.g_varchar2) then
412: p_rec.attribute12 :=
413: ssp_mat_shd.g_old_rec.attribute12;
409: ssp_mat_shd.g_old_rec.attribute11;
410: End If;
411: If (p_rec.attribute12 = hr_api.g_varchar2) then
412: p_rec.attribute12 :=
413: ssp_mat_shd.g_old_rec.attribute12;
414: End If;
415: If (p_rec.attribute13 = hr_api.g_varchar2) then
416: p_rec.attribute13 :=
417: ssp_mat_shd.g_old_rec.attribute13;
413: ssp_mat_shd.g_old_rec.attribute12;
414: End If;
415: If (p_rec.attribute13 = hr_api.g_varchar2) then
416: p_rec.attribute13 :=
417: ssp_mat_shd.g_old_rec.attribute13;
418: End If;
419: If (p_rec.attribute14 = hr_api.g_varchar2) then
420: p_rec.attribute14 :=
421: ssp_mat_shd.g_old_rec.attribute14;
417: ssp_mat_shd.g_old_rec.attribute13;
418: End If;
419: If (p_rec.attribute14 = hr_api.g_varchar2) then
420: p_rec.attribute14 :=
421: ssp_mat_shd.g_old_rec.attribute14;
422: End If;
423: If (p_rec.attribute15 = hr_api.g_varchar2) then
424: p_rec.attribute15 :=
425: ssp_mat_shd.g_old_rec.attribute15;
421: ssp_mat_shd.g_old_rec.attribute14;
422: End If;
423: If (p_rec.attribute15 = hr_api.g_varchar2) then
424: p_rec.attribute15 :=
425: ssp_mat_shd.g_old_rec.attribute15;
426: End If;
427: If (p_rec.attribute16 = hr_api.g_varchar2) then
428: p_rec.attribute16 :=
429: ssp_mat_shd.g_old_rec.attribute16;
425: ssp_mat_shd.g_old_rec.attribute15;
426: End If;
427: If (p_rec.attribute16 = hr_api.g_varchar2) then
428: p_rec.attribute16 :=
429: ssp_mat_shd.g_old_rec.attribute16;
430: End If;
431: If (p_rec.attribute17 = hr_api.g_varchar2) then
432: p_rec.attribute17 :=
433: ssp_mat_shd.g_old_rec.attribute17;
429: ssp_mat_shd.g_old_rec.attribute16;
430: End If;
431: If (p_rec.attribute17 = hr_api.g_varchar2) then
432: p_rec.attribute17 :=
433: ssp_mat_shd.g_old_rec.attribute17;
434: End If;
435: If (p_rec.attribute18 = hr_api.g_varchar2) then
436: p_rec.attribute18 :=
437: ssp_mat_shd.g_old_rec.attribute18;
433: ssp_mat_shd.g_old_rec.attribute17;
434: End If;
435: If (p_rec.attribute18 = hr_api.g_varchar2) then
436: p_rec.attribute18 :=
437: ssp_mat_shd.g_old_rec.attribute18;
438: End If;
439: If (p_rec.attribute19 = hr_api.g_varchar2) then
440: p_rec.attribute19 :=
441: ssp_mat_shd.g_old_rec.attribute19;
437: ssp_mat_shd.g_old_rec.attribute18;
438: End If;
439: If (p_rec.attribute19 = hr_api.g_varchar2) then
440: p_rec.attribute19 :=
441: ssp_mat_shd.g_old_rec.attribute19;
442: End If;
443: If (p_rec.attribute20 = hr_api.g_varchar2) then
444: p_rec.attribute20 :=
445: ssp_mat_shd.g_old_rec.attribute20;
441: ssp_mat_shd.g_old_rec.attribute19;
442: End If;
443: If (p_rec.attribute20 = hr_api.g_varchar2) then
444: p_rec.attribute20 :=
445: ssp_mat_shd.g_old_rec.attribute20;
446: End If;
447:
448: If (p_rec.LEAVE_TYPE = hr_api.g_varchar2) then
449: p_rec.LEAVE_TYPE :=
446: End If;
447:
448: If (p_rec.LEAVE_TYPE = hr_api.g_varchar2) then
449: p_rec.LEAVE_TYPE :=
450: ssp_mat_shd.g_old_rec.LEAVE_TYPE;
451: End If;
452:
453: If (p_rec.MATCHING_DATE = hr_api.g_date) then
454: p_rec.MATCHING_DATE :=
451: End If;
452:
453: If (p_rec.MATCHING_DATE = hr_api.g_date) then
454: p_rec.MATCHING_DATE :=
455: ssp_mat_shd.g_old_rec.MATCHING_DATE;
456: End If;
457:
458: If (p_rec.PLACEMENT_DATE = hr_api.g_date) then
459: p_rec.PLACEMENT_DATE :=
456: End If;
457:
458: If (p_rec.PLACEMENT_DATE = hr_api.g_date) then
459: p_rec.PLACEMENT_DATE :=
460: ssp_mat_shd.g_old_rec.PLACEMENT_DATE;
461: End If;
462:
463: If (p_rec.DISRUPTED_PLACEMENT_DATE = hr_api.g_date) then
464: p_rec.DISRUPTED_PLACEMENT_DATE :=
461: End If;
462:
463: If (p_rec.DISRUPTED_PLACEMENT_DATE = hr_api.g_date) then
464: p_rec.DISRUPTED_PLACEMENT_DATE :=
465: ssp_mat_shd.g_old_rec.DISRUPTED_PLACEMENT_DATE;
466: End If;
467:
468: If (p_rec.mat_information_category = hr_api.g_varchar2) then
469: p_rec.mat_information_category :=
466: End If;
467:
468: If (p_rec.mat_information_category = hr_api.g_varchar2) then
469: p_rec.mat_information_category :=
470: ssp_mat_shd.g_old_rec.mat_information_category;
471: End If;
472: If (p_rec.mat_information1 = hr_api.g_varchar2) then
473: p_rec.mat_information1 :=
474: ssp_mat_shd.g_old_rec.mat_information1;
470: ssp_mat_shd.g_old_rec.mat_information_category;
471: End If;
472: If (p_rec.mat_information1 = hr_api.g_varchar2) then
473: p_rec.mat_information1 :=
474: ssp_mat_shd.g_old_rec.mat_information1;
475: End If;
476: If (p_rec.mat_information1 = hr_api.g_varchar2) then
477: p_rec.mat_information1 :=
478: ssp_mat_shd.g_old_rec.mat_information1;
474: ssp_mat_shd.g_old_rec.mat_information1;
475: End If;
476: If (p_rec.mat_information1 = hr_api.g_varchar2) then
477: p_rec.mat_information1 :=
478: ssp_mat_shd.g_old_rec.mat_information1;
479: End If;
480: If (p_rec.mat_information2 = hr_api.g_varchar2) then
481: p_rec.mat_information2 :=
482: ssp_mat_shd.g_old_rec.mat_information2;
478: ssp_mat_shd.g_old_rec.mat_information1;
479: End If;
480: If (p_rec.mat_information2 = hr_api.g_varchar2) then
481: p_rec.mat_information2 :=
482: ssp_mat_shd.g_old_rec.mat_information2;
483: End If;
484: If (p_rec.mat_information3 = hr_api.g_varchar2) then
485: p_rec.mat_information3 :=
486: ssp_mat_shd.g_old_rec.mat_information3;
482: ssp_mat_shd.g_old_rec.mat_information2;
483: End If;
484: If (p_rec.mat_information3 = hr_api.g_varchar2) then
485: p_rec.mat_information3 :=
486: ssp_mat_shd.g_old_rec.mat_information3;
487: End If;
488: If (p_rec.mat_information4 = hr_api.g_varchar2) then
489: p_rec.mat_information4 :=
490: ssp_mat_shd.g_old_rec.mat_information4;
486: ssp_mat_shd.g_old_rec.mat_information3;
487: End If;
488: If (p_rec.mat_information4 = hr_api.g_varchar2) then
489: p_rec.mat_information4 :=
490: ssp_mat_shd.g_old_rec.mat_information4;
491: End If;
492: If (p_rec.mat_information5 = hr_api.g_varchar2) then
493: p_rec.mat_information5 :=
494: ssp_mat_shd.g_old_rec.mat_information5;
490: ssp_mat_shd.g_old_rec.mat_information4;
491: End If;
492: If (p_rec.mat_information5 = hr_api.g_varchar2) then
493: p_rec.mat_information5 :=
494: ssp_mat_shd.g_old_rec.mat_information5;
495: End If;
496: If (p_rec.mat_information6 = hr_api.g_varchar2) then
497: p_rec.mat_information6 :=
498: ssp_mat_shd.g_old_rec.mat_information6;
494: ssp_mat_shd.g_old_rec.mat_information5;
495: End If;
496: If (p_rec.mat_information6 = hr_api.g_varchar2) then
497: p_rec.mat_information6 :=
498: ssp_mat_shd.g_old_rec.mat_information6;
499: End If;
500: If (p_rec.mat_information7 = hr_api.g_varchar2) then
501: p_rec.mat_information7 :=
502: ssp_mat_shd.g_old_rec.mat_information7;
498: ssp_mat_shd.g_old_rec.mat_information6;
499: End If;
500: If (p_rec.mat_information7 = hr_api.g_varchar2) then
501: p_rec.mat_information7 :=
502: ssp_mat_shd.g_old_rec.mat_information7;
503: End If;
504: If (p_rec.mat_information8 = hr_api.g_varchar2) then
505: p_rec.mat_information8 :=
506: ssp_mat_shd.g_old_rec.mat_information8;
502: ssp_mat_shd.g_old_rec.mat_information7;
503: End If;
504: If (p_rec.mat_information8 = hr_api.g_varchar2) then
505: p_rec.mat_information8 :=
506: ssp_mat_shd.g_old_rec.mat_information8;
507: End If;
508: If (p_rec.mat_information9 = hr_api.g_varchar2) then
509: p_rec.mat_information9 :=
510: ssp_mat_shd.g_old_rec.mat_information9;
506: ssp_mat_shd.g_old_rec.mat_information8;
507: End If;
508: If (p_rec.mat_information9 = hr_api.g_varchar2) then
509: p_rec.mat_information9 :=
510: ssp_mat_shd.g_old_rec.mat_information9;
511: End If;
512: If (p_rec.mat_information10 = hr_api.g_varchar2) then
513: p_rec.mat_information10 :=
514: ssp_mat_shd.g_old_rec.mat_information10;
510: ssp_mat_shd.g_old_rec.mat_information9;
511: End If;
512: If (p_rec.mat_information10 = hr_api.g_varchar2) then
513: p_rec.mat_information10 :=
514: ssp_mat_shd.g_old_rec.mat_information10;
515: End If;
516: If (p_rec.mat_information11 = hr_api.g_varchar2) then
517: p_rec.mat_information11 :=
518: ssp_mat_shd.g_old_rec.mat_information11;
514: ssp_mat_shd.g_old_rec.mat_information10;
515: End If;
516: If (p_rec.mat_information11 = hr_api.g_varchar2) then
517: p_rec.mat_information11 :=
518: ssp_mat_shd.g_old_rec.mat_information11;
519: End If;
520: If (p_rec.mat_information12 = hr_api.g_varchar2) then
521: p_rec.mat_information12 :=
522: ssp_mat_shd.g_old_rec.mat_information12;
518: ssp_mat_shd.g_old_rec.mat_information11;
519: End If;
520: If (p_rec.mat_information12 = hr_api.g_varchar2) then
521: p_rec.mat_information12 :=
522: ssp_mat_shd.g_old_rec.mat_information12;
523: End If;
524: If (p_rec.mat_information13 = hr_api.g_varchar2) then
525: p_rec.mat_information13 :=
526: ssp_mat_shd.g_old_rec.mat_information13;
522: ssp_mat_shd.g_old_rec.mat_information12;
523: End If;
524: If (p_rec.mat_information13 = hr_api.g_varchar2) then
525: p_rec.mat_information13 :=
526: ssp_mat_shd.g_old_rec.mat_information13;
527: End If;
528: If (p_rec.mat_information14 = hr_api.g_varchar2) then
529: p_rec.mat_information14 :=
530: ssp_mat_shd.g_old_rec.mat_information14;
526: ssp_mat_shd.g_old_rec.mat_information13;
527: End If;
528: If (p_rec.mat_information14 = hr_api.g_varchar2) then
529: p_rec.mat_information14 :=
530: ssp_mat_shd.g_old_rec.mat_information14;
531: End If;
532: If (p_rec.mat_information15 = hr_api.g_varchar2) then
533: p_rec.mat_information15 :=
534: ssp_mat_shd.g_old_rec.mat_information15;
530: ssp_mat_shd.g_old_rec.mat_information14;
531: End If;
532: If (p_rec.mat_information15 = hr_api.g_varchar2) then
533: p_rec.mat_information15 :=
534: ssp_mat_shd.g_old_rec.mat_information15;
535: End If;
536: If (p_rec.mat_information16 = hr_api.g_varchar2) then
537: p_rec.mat_information16 :=
538: ssp_mat_shd.g_old_rec.mat_information16;
534: ssp_mat_shd.g_old_rec.mat_information15;
535: End If;
536: If (p_rec.mat_information16 = hr_api.g_varchar2) then
537: p_rec.mat_information16 :=
538: ssp_mat_shd.g_old_rec.mat_information16;
539: End If;
540: If (p_rec.mat_information17 = hr_api.g_varchar2) then
541: p_rec.mat_information17 :=
542: ssp_mat_shd.g_old_rec.mat_information17;
538: ssp_mat_shd.g_old_rec.mat_information16;
539: End If;
540: If (p_rec.mat_information17 = hr_api.g_varchar2) then
541: p_rec.mat_information17 :=
542: ssp_mat_shd.g_old_rec.mat_information17;
543: End If;
544: If (p_rec.mat_information18 = hr_api.g_varchar2) then
545: p_rec.mat_information18 :=
546: ssp_mat_shd.g_old_rec.mat_information18;
542: ssp_mat_shd.g_old_rec.mat_information17;
543: End If;
544: If (p_rec.mat_information18 = hr_api.g_varchar2) then
545: p_rec.mat_information18 :=
546: ssp_mat_shd.g_old_rec.mat_information18;
547: End If;
548: If (p_rec.mat_information19 = hr_api.g_varchar2) then
549: p_rec.mat_information19 :=
550: ssp_mat_shd.g_old_rec.mat_information19;
546: ssp_mat_shd.g_old_rec.mat_information18;
547: End If;
548: If (p_rec.mat_information19 = hr_api.g_varchar2) then
549: p_rec.mat_information19 :=
550: ssp_mat_shd.g_old_rec.mat_information19;
551: End If;
552: If (p_rec.mat_information20 = hr_api.g_varchar2) then
553: p_rec.mat_information20 :=
554: ssp_mat_shd.g_old_rec.mat_information20;
550: ssp_mat_shd.g_old_rec.mat_information19;
551: End If;
552: If (p_rec.mat_information20 = hr_api.g_varchar2) then
553: p_rec.mat_information20 :=
554: ssp_mat_shd.g_old_rec.mat_information20;
555: End If;
556: If (p_rec.mat_information21 = hr_api.g_varchar2) then
557: p_rec.mat_information21 :=
558: ssp_mat_shd.g_old_rec.mat_information21;
554: ssp_mat_shd.g_old_rec.mat_information20;
555: End If;
556: If (p_rec.mat_information21 = hr_api.g_varchar2) then
557: p_rec.mat_information21 :=
558: ssp_mat_shd.g_old_rec.mat_information21;
559: End If;
560: If (p_rec.mat_information22 = hr_api.g_varchar2) then
561: p_rec.mat_information12 :=
562: ssp_mat_shd.g_old_rec.mat_information22;
558: ssp_mat_shd.g_old_rec.mat_information21;
559: End If;
560: If (p_rec.mat_information22 = hr_api.g_varchar2) then
561: p_rec.mat_information12 :=
562: ssp_mat_shd.g_old_rec.mat_information22;
563: End If;
564: If (p_rec.mat_information23 = hr_api.g_varchar2) then
565: p_rec.mat_information23 :=
566: ssp_mat_shd.g_old_rec.mat_information23;
562: ssp_mat_shd.g_old_rec.mat_information22;
563: End If;
564: If (p_rec.mat_information23 = hr_api.g_varchar2) then
565: p_rec.mat_information23 :=
566: ssp_mat_shd.g_old_rec.mat_information23;
567: End If;
568: If (p_rec.mat_information24 = hr_api.g_varchar2) then
569: p_rec.mat_information24 :=
570: ssp_mat_shd.g_old_rec.mat_information24;
566: ssp_mat_shd.g_old_rec.mat_information23;
567: End If;
568: If (p_rec.mat_information24 = hr_api.g_varchar2) then
569: p_rec.mat_information24 :=
570: ssp_mat_shd.g_old_rec.mat_information24;
571: End If;
572: If (p_rec.mat_information25 = hr_api.g_varchar2) then
573: p_rec.mat_information25 :=
574: ssp_mat_shd.g_old_rec.mat_information25;
570: ssp_mat_shd.g_old_rec.mat_information24;
571: End If;
572: If (p_rec.mat_information25 = hr_api.g_varchar2) then
573: p_rec.mat_information25 :=
574: ssp_mat_shd.g_old_rec.mat_information25;
575: End If;
576: If (p_rec.mat_information26 = hr_api.g_varchar2) then
577: p_rec.mat_information26 :=
578: ssp_mat_shd.g_old_rec.mat_information26;
574: ssp_mat_shd.g_old_rec.mat_information25;
575: End If;
576: If (p_rec.mat_information26 = hr_api.g_varchar2) then
577: p_rec.mat_information26 :=
578: ssp_mat_shd.g_old_rec.mat_information26;
579: End If;
580: If (p_rec.mat_information27 = hr_api.g_varchar2) then
581: p_rec.mat_information27 :=
582: ssp_mat_shd.g_old_rec.mat_information27;
578: ssp_mat_shd.g_old_rec.mat_information26;
579: End If;
580: If (p_rec.mat_information27 = hr_api.g_varchar2) then
581: p_rec.mat_information27 :=
582: ssp_mat_shd.g_old_rec.mat_information27;
583: End If;
584: If (p_rec.mat_information28 = hr_api.g_varchar2) then
585: p_rec.mat_information28 :=
586: ssp_mat_shd.g_old_rec.mat_information28;
582: ssp_mat_shd.g_old_rec.mat_information27;
583: End If;
584: If (p_rec.mat_information28 = hr_api.g_varchar2) then
585: p_rec.mat_information28 :=
586: ssp_mat_shd.g_old_rec.mat_information28;
587: End If;
588: If (p_rec.mat_information29 = hr_api.g_varchar2) then
589: p_rec.mat_information29 :=
590: ssp_mat_shd.g_old_rec.mat_information29;
586: ssp_mat_shd.g_old_rec.mat_information28;
587: End If;
588: If (p_rec.mat_information29 = hr_api.g_varchar2) then
589: p_rec.mat_information29 :=
590: ssp_mat_shd.g_old_rec.mat_information29;
591: End If;
592: If (p_rec.mat_information30 = hr_api.g_varchar2) then
593: p_rec.mat_information30 :=
594: ssp_mat_shd.g_old_rec.mat_information30;
590: ssp_mat_shd.g_old_rec.mat_information29;
591: End If;
592: If (p_rec.mat_information30 = hr_api.g_varchar2) then
593: p_rec.mat_information30 :=
594: ssp_mat_shd.g_old_rec.mat_information30;
595: End If;
596:
597: If (p_rec.partner_stat_pay_start_date = hr_api.g_date) then
598: p_rec.partner_stat_pay_start_date :=
595: End If;
596:
597: If (p_rec.partner_stat_pay_start_date = hr_api.g_date) then
598: p_rec.partner_stat_pay_start_date :=
599: ssp_mat_shd.g_old_rec.partner_stat_pay_start_date;
600: End If;
601: If (p_rec.partner_return_to_work = hr_api.g_date) then
602: p_rec.partner_return_to_work :=
603: ssp_mat_shd.g_old_rec.partner_return_to_work;
599: ssp_mat_shd.g_old_rec.partner_stat_pay_start_date;
600: End If;
601: If (p_rec.partner_return_to_work = hr_api.g_date) then
602: p_rec.partner_return_to_work :=
603: ssp_mat_shd.g_old_rec.partner_return_to_work;
604: End If;
605: If (p_rec.partner_death_date = hr_api.g_date) then
606: p_rec.partner_death_date :=
607: ssp_mat_shd.g_old_rec.partner_death_date ;
603: ssp_mat_shd.g_old_rec.partner_return_to_work;
604: End If;
605: If (p_rec.partner_death_date = hr_api.g_date) then
606: p_rec.partner_death_date :=
607: ssp_mat_shd.g_old_rec.partner_death_date ;
608: End If;
609:
610: --
611: hr_utility.set_location(' Leaving:'||l_proc, 10);
616: -- |---------------------------------< upd >----------------------------------|
617: -- ----------------------------------------------------------------------------
618: Procedure upd
619: (
620: p_rec in out nocopy ssp_mat_shd.g_rec_type,
621: p_validate in boolean default false
622: ) is
623: --
624: l_proc varchar2(72) := g_package||'upd';
636: End If;
637: --
638: -- We must lock the row which we need to update.
639: --
640: ssp_mat_shd.lck
641: (
642: p_rec.maternity_id,
643: p_rec.object_version_number
644: );
760: p_partner_return_to_work in date default hr_api.g_date,
761: p_partner_death_date in date default hr_api.g_date
762: ) is
763: --
764: l_rec ssp_mat_shd.g_rec_type;
765: l_proc varchar2(72) := g_package||'upd';
766: --
767: Begin
768: hr_utility.set_location('Entering:'||l_proc, 5);
770: -- Call conversion function to turn arguments into the
771: -- l_rec structure.
772: --
773: l_rec :=
774: ssp_mat_shd.convert_args
775: (
776: p_maternity_id,
777: p_due_date,
778: hr_api.g_number,