150: --
151: hr_utility.set_location(' Leaving:'||l_proc, 10);
152: --
153: Exception
154: When hr_api.check_integrity_violated Then
155: -- A check constraint has been violated
156: ota_tdb_shd.g_api_dml := false; -- Unset the api dml status
157: ota_tdb_shd.constraint_error
158: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
154: When hr_api.check_integrity_violated Then
155: -- A check constraint has been violated
156: ota_tdb_shd.g_api_dml := false; -- Unset the api dml status
157: ota_tdb_shd.constraint_error
158: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
159: When hr_api.parent_integrity_violated Then
160: -- Parent integrity has been violated
161: ota_tdb_shd.g_api_dml := false; -- Unset the api dml status
162: ota_tdb_shd.constraint_error
155: -- A check constraint has been violated
156: ota_tdb_shd.g_api_dml := false; -- Unset the api dml status
157: ota_tdb_shd.constraint_error
158: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
159: When hr_api.parent_integrity_violated Then
160: -- Parent integrity has been violated
161: ota_tdb_shd.g_api_dml := false; -- Unset the api dml status
162: ota_tdb_shd.constraint_error
163: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
159: When hr_api.parent_integrity_violated Then
160: -- Parent integrity has been violated
161: ota_tdb_shd.g_api_dml := false; -- Unset the api dml status
162: ota_tdb_shd.constraint_error
163: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
164: When hr_api.unique_integrity_violated Then
165: -- Unique integrity has been violated
166: ota_tdb_shd.g_api_dml := false; -- Unset the api dml status
167: ota_tdb_shd.constraint_error
160: -- Parent integrity has been violated
161: ota_tdb_shd.g_api_dml := false; -- Unset the api dml status
162: ota_tdb_shd.constraint_error
163: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
164: When hr_api.unique_integrity_violated Then
165: -- Unique integrity has been violated
166: ota_tdb_shd.g_api_dml := false; -- Unset the api dml status
167: ota_tdb_shd.constraint_error
168: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
164: When hr_api.unique_integrity_violated Then
165: -- Unique integrity has been violated
166: ota_tdb_shd.g_api_dml := false; -- Unset the api dml status
167: ota_tdb_shd.constraint_error
168: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
169: When Others Then
170: ota_tdb_shd.g_api_dml := false; -- Unset the api dml status
171: Raise;
172: End update_dml;
330: -- p_rec plsql record structure
331: -- to see if a system default is being used. If a system default
332: -- is being used then we must set to the 'current' argument value.
333: --
334: If (p_rec.booking_status_type_id = hr_api.g_number) then
335: p_rec.booking_status_type_id :=
336: ota_tdb_shd.g_old_rec.booking_status_type_id;
337: End If;
338: If (p_rec.delegate_person_id = hr_api.g_number) then
334: If (p_rec.booking_status_type_id = hr_api.g_number) then
335: p_rec.booking_status_type_id :=
336: ota_tdb_shd.g_old_rec.booking_status_type_id;
337: End If;
338: If (p_rec.delegate_person_id = hr_api.g_number) then
339: p_rec.delegate_person_id :=
340: ota_tdb_shd.g_old_rec.delegate_person_id;
341: End If;
342: If (p_rec.contact_id = hr_api.g_number) then
338: If (p_rec.delegate_person_id = hr_api.g_number) then
339: p_rec.delegate_person_id :=
340: ota_tdb_shd.g_old_rec.delegate_person_id;
341: End If;
342: If (p_rec.contact_id = hr_api.g_number) then
343: p_rec.contact_id :=
344: ota_tdb_shd.g_old_rec.contact_id;
345: End If;
346: If (p_rec.business_group_id = hr_api.g_number) then
342: If (p_rec.contact_id = hr_api.g_number) then
343: p_rec.contact_id :=
344: ota_tdb_shd.g_old_rec.contact_id;
345: End If;
346: If (p_rec.business_group_id = hr_api.g_number) then
347: p_rec.business_group_id :=
348: ota_tdb_shd.g_old_rec.business_group_id;
349: End If;
350: If (p_rec.event_id = hr_api.g_number) then
346: If (p_rec.business_group_id = hr_api.g_number) then
347: p_rec.business_group_id :=
348: ota_tdb_shd.g_old_rec.business_group_id;
349: End If;
350: If (p_rec.event_id = hr_api.g_number) then
351: p_rec.event_id :=
352: ota_tdb_shd.g_old_rec.event_id;
353: End If;
354: If (p_rec.customer_id = hr_api.g_number) then
350: If (p_rec.event_id = hr_api.g_number) then
351: p_rec.event_id :=
352: ota_tdb_shd.g_old_rec.event_id;
353: End If;
354: If (p_rec.customer_id = hr_api.g_number) then
355: p_rec.customer_id :=
356: ota_tdb_shd.g_old_rec.customer_id;
357: End If;
358: If (p_rec.authorizer_person_id = hr_api.g_number) then
354: If (p_rec.customer_id = hr_api.g_number) then
355: p_rec.customer_id :=
356: ota_tdb_shd.g_old_rec.customer_id;
357: End If;
358: If (p_rec.authorizer_person_id = hr_api.g_number) then
359: p_rec.authorizer_person_id :=
360: ota_tdb_shd.g_old_rec.authorizer_person_id;
361: End If;
362: If (p_rec.date_booking_placed = hr_api.g_date) then
358: If (p_rec.authorizer_person_id = hr_api.g_number) then
359: p_rec.authorizer_person_id :=
360: ota_tdb_shd.g_old_rec.authorizer_person_id;
361: End If;
362: If (p_rec.date_booking_placed = hr_api.g_date) then
363: p_rec.date_booking_placed :=
364: ota_tdb_shd.g_old_rec.date_booking_placed;
365: End If;
366: If (p_rec.corespondent = hr_api.g_varchar2) then
362: If (p_rec.date_booking_placed = hr_api.g_date) then
363: p_rec.date_booking_placed :=
364: ota_tdb_shd.g_old_rec.date_booking_placed;
365: End If;
366: If (p_rec.corespondent = hr_api.g_varchar2) then
367: p_rec.corespondent :=
368: ota_tdb_shd.g_old_rec.corespondent;
369: End If;
370: If (p_rec.internal_booking_flag = hr_api.g_varchar2) then
366: If (p_rec.corespondent = hr_api.g_varchar2) then
367: p_rec.corespondent :=
368: ota_tdb_shd.g_old_rec.corespondent;
369: End If;
370: If (p_rec.internal_booking_flag = hr_api.g_varchar2) then
371: p_rec.internal_booking_flag :=
372: ota_tdb_shd.g_old_rec.internal_booking_flag;
373: End If;
374: If (p_rec.number_of_places = hr_api.g_number) then
370: If (p_rec.internal_booking_flag = hr_api.g_varchar2) then
371: p_rec.internal_booking_flag :=
372: ota_tdb_shd.g_old_rec.internal_booking_flag;
373: End If;
374: If (p_rec.number_of_places = hr_api.g_number) then
375: p_rec.number_of_places :=
376: ota_tdb_shd.g_old_rec.number_of_places;
377: End If;
378: If (p_rec.administrator = hr_api.g_number) then
374: If (p_rec.number_of_places = hr_api.g_number) then
375: p_rec.number_of_places :=
376: ota_tdb_shd.g_old_rec.number_of_places;
377: End If;
378: If (p_rec.administrator = hr_api.g_number) then
379: p_rec.administrator :=
380: ota_tdb_shd.g_old_rec.administrator;
381: End If;
382: If (p_rec.booking_priority = hr_api.g_varchar2) then
378: If (p_rec.administrator = hr_api.g_number) then
379: p_rec.administrator :=
380: ota_tdb_shd.g_old_rec.administrator;
381: End If;
382: If (p_rec.booking_priority = hr_api.g_varchar2) then
383: p_rec.booking_priority :=
384: ota_tdb_shd.g_old_rec.booking_priority;
385: End If;
386: If (p_rec.comments = hr_api.g_varchar2) then
382: If (p_rec.booking_priority = hr_api.g_varchar2) then
383: p_rec.booking_priority :=
384: ota_tdb_shd.g_old_rec.booking_priority;
385: End If;
386: If (p_rec.comments = hr_api.g_varchar2) then
387: p_rec.comments :=
388: ota_tdb_shd.g_old_rec.comments;
389: End If;
390: If (p_rec.contact_address_id = hr_api.g_number) then
386: If (p_rec.comments = hr_api.g_varchar2) then
387: p_rec.comments :=
388: ota_tdb_shd.g_old_rec.comments;
389: End If;
390: If (p_rec.contact_address_id = hr_api.g_number) then
391: p_rec.contact_address_id :=
392: ota_tdb_shd.g_old_rec.contact_address_id;
393: End If;
394: If (p_rec.delegate_contact_phone = hr_api.g_varchar2) then
390: If (p_rec.contact_address_id = hr_api.g_number) then
391: p_rec.contact_address_id :=
392: ota_tdb_shd.g_old_rec.contact_address_id;
393: End If;
394: If (p_rec.delegate_contact_phone = hr_api.g_varchar2) then
395: p_rec.delegate_contact_phone :=
396: ota_tdb_shd.g_old_rec.delegate_contact_phone;
397: End If;
398: If (p_rec.delegate_contact_fax = hr_api.g_varchar2) then
394: If (p_rec.delegate_contact_phone = hr_api.g_varchar2) then
395: p_rec.delegate_contact_phone :=
396: ota_tdb_shd.g_old_rec.delegate_contact_phone;
397: End If;
398: If (p_rec.delegate_contact_fax = hr_api.g_varchar2) then
399: p_rec.delegate_contact_fax :=
400: ota_tdb_shd.g_old_rec.delegate_contact_fax;
401: End If;
402: If (p_rec.third_party_customer_id = hr_api.g_number) then
398: If (p_rec.delegate_contact_fax = hr_api.g_varchar2) then
399: p_rec.delegate_contact_fax :=
400: ota_tdb_shd.g_old_rec.delegate_contact_fax;
401: End If;
402: If (p_rec.third_party_customer_id = hr_api.g_number) then
403: p_rec.third_party_customer_id :=
404: ota_tdb_shd.g_old_rec.third_party_customer_id;
405: End If;
406: If (p_rec.third_party_contact_id = hr_api.g_number) then
402: If (p_rec.third_party_customer_id = hr_api.g_number) then
403: p_rec.third_party_customer_id :=
404: ota_tdb_shd.g_old_rec.third_party_customer_id;
405: End If;
406: If (p_rec.third_party_contact_id = hr_api.g_number) then
407: p_rec.third_party_contact_id :=
408: ota_tdb_shd.g_old_rec.third_party_contact_id;
409: End If;
410: If (p_rec.third_party_address_id = hr_api.g_number) then
406: If (p_rec.third_party_contact_id = hr_api.g_number) then
407: p_rec.third_party_contact_id :=
408: ota_tdb_shd.g_old_rec.third_party_contact_id;
409: End If;
410: If (p_rec.third_party_address_id = hr_api.g_number) then
411: p_rec.third_party_address_id :=
412: ota_tdb_shd.g_old_rec.third_party_address_id;
413: End If;
414: If (p_rec.third_party_contact_phone = hr_api.g_varchar2) then
410: If (p_rec.third_party_address_id = hr_api.g_number) then
411: p_rec.third_party_address_id :=
412: ota_tdb_shd.g_old_rec.third_party_address_id;
413: End If;
414: If (p_rec.third_party_contact_phone = hr_api.g_varchar2) then
415: p_rec.third_party_contact_phone :=
416: ota_tdb_shd.g_old_rec.third_party_contact_phone;
417: End If;
418: If (p_rec.third_party_contact_fax = hr_api.g_varchar2) then
414: If (p_rec.third_party_contact_phone = hr_api.g_varchar2) then
415: p_rec.third_party_contact_phone :=
416: ota_tdb_shd.g_old_rec.third_party_contact_phone;
417: End If;
418: If (p_rec.third_party_contact_fax = hr_api.g_varchar2) then
419: p_rec.third_party_contact_fax :=
420: ota_tdb_shd.g_old_rec.third_party_contact_fax;
421: End If;
422: If (p_rec.date_status_changed = hr_api.g_date) then
418: If (p_rec.third_party_contact_fax = hr_api.g_varchar2) then
419: p_rec.third_party_contact_fax :=
420: ota_tdb_shd.g_old_rec.third_party_contact_fax;
421: End If;
422: If (p_rec.date_status_changed = hr_api.g_date) then
423: p_rec.date_status_changed :=
424: ota_tdb_shd.g_old_rec.date_status_changed;
425: End If;
426: If (p_rec.failure_reason = hr_api.g_varchar2) then
422: If (p_rec.date_status_changed = hr_api.g_date) then
423: p_rec.date_status_changed :=
424: ota_tdb_shd.g_old_rec.date_status_changed;
425: End If;
426: If (p_rec.failure_reason = hr_api.g_varchar2) then
427: p_rec.failure_reason :=
428: ota_tdb_shd.g_old_rec.failure_reason;
429: End If;
430: If (p_rec.attendance_result = hr_api.g_varchar2) then
426: If (p_rec.failure_reason = hr_api.g_varchar2) then
427: p_rec.failure_reason :=
428: ota_tdb_shd.g_old_rec.failure_reason;
429: End If;
430: If (p_rec.attendance_result = hr_api.g_varchar2) then
431: p_rec.attendance_result :=
432: ota_tdb_shd.g_old_rec.attendance_result;
433: End If;
434: If (p_rec.language_id = hr_api.g_number) then
430: If (p_rec.attendance_result = hr_api.g_varchar2) then
431: p_rec.attendance_result :=
432: ota_tdb_shd.g_old_rec.attendance_result;
433: End If;
434: If (p_rec.language_id = hr_api.g_number) then
435: p_rec.language_id :=
436: ota_tdb_shd.g_old_rec.language_id;
437: End If;
438: If (p_rec.source_of_booking = hr_api.g_varchar2) then
434: If (p_rec.language_id = hr_api.g_number) then
435: p_rec.language_id :=
436: ota_tdb_shd.g_old_rec.language_id;
437: End If;
438: If (p_rec.source_of_booking = hr_api.g_varchar2) then
439: p_rec.source_of_booking :=
440: ota_tdb_shd.g_old_rec.source_of_booking;
441: End If;
442: If (p_rec.special_booking_instructions = hr_api.g_varchar2) then
438: If (p_rec.source_of_booking = hr_api.g_varchar2) then
439: p_rec.source_of_booking :=
440: ota_tdb_shd.g_old_rec.source_of_booking;
441: End If;
442: If (p_rec.special_booking_instructions = hr_api.g_varchar2) then
443: p_rec.special_booking_instructions :=
444: ota_tdb_shd.g_old_rec.special_booking_instructions;
445: End If;
446: If (p_rec.successful_attendance_flag = hr_api.g_varchar2) then
442: If (p_rec.special_booking_instructions = hr_api.g_varchar2) then
443: p_rec.special_booking_instructions :=
444: ota_tdb_shd.g_old_rec.special_booking_instructions;
445: End If;
446: If (p_rec.successful_attendance_flag = hr_api.g_varchar2) then
447: p_rec.successful_attendance_flag :=
448: ota_tdb_shd.g_old_rec.successful_attendance_flag;
449: End If;
450: If (p_rec.tdb_information_category = hr_api.g_varchar2) then
446: If (p_rec.successful_attendance_flag = hr_api.g_varchar2) then
447: p_rec.successful_attendance_flag :=
448: ota_tdb_shd.g_old_rec.successful_attendance_flag;
449: End If;
450: If (p_rec.tdb_information_category = hr_api.g_varchar2) then
451: p_rec.tdb_information_category :=
452: ota_tdb_shd.g_old_rec.tdb_information_category;
453: End If;
454: If (p_rec.tdb_information1 = hr_api.g_varchar2) then
450: If (p_rec.tdb_information_category = hr_api.g_varchar2) then
451: p_rec.tdb_information_category :=
452: ota_tdb_shd.g_old_rec.tdb_information_category;
453: End If;
454: If (p_rec.tdb_information1 = hr_api.g_varchar2) then
455: p_rec.tdb_information1 :=
456: ota_tdb_shd.g_old_rec.tdb_information1;
457: End If;
458: If (p_rec.tdb_information2 = hr_api.g_varchar2) then
454: If (p_rec.tdb_information1 = hr_api.g_varchar2) then
455: p_rec.tdb_information1 :=
456: ota_tdb_shd.g_old_rec.tdb_information1;
457: End If;
458: If (p_rec.tdb_information2 = hr_api.g_varchar2) then
459: p_rec.tdb_information2 :=
460: ota_tdb_shd.g_old_rec.tdb_information2;
461: End If;
462: If (p_rec.tdb_information3 = hr_api.g_varchar2) then
458: If (p_rec.tdb_information2 = hr_api.g_varchar2) then
459: p_rec.tdb_information2 :=
460: ota_tdb_shd.g_old_rec.tdb_information2;
461: End If;
462: If (p_rec.tdb_information3 = hr_api.g_varchar2) then
463: p_rec.tdb_information3 :=
464: ota_tdb_shd.g_old_rec.tdb_information3;
465: End If;
466: If (p_rec.tdb_information4 = hr_api.g_varchar2) then
462: If (p_rec.tdb_information3 = hr_api.g_varchar2) then
463: p_rec.tdb_information3 :=
464: ota_tdb_shd.g_old_rec.tdb_information3;
465: End If;
466: If (p_rec.tdb_information4 = hr_api.g_varchar2) then
467: p_rec.tdb_information4 :=
468: ota_tdb_shd.g_old_rec.tdb_information4;
469: End If;
470: If (p_rec.tdb_information5 = hr_api.g_varchar2) then
466: If (p_rec.tdb_information4 = hr_api.g_varchar2) then
467: p_rec.tdb_information4 :=
468: ota_tdb_shd.g_old_rec.tdb_information4;
469: End If;
470: If (p_rec.tdb_information5 = hr_api.g_varchar2) then
471: p_rec.tdb_information5 :=
472: ota_tdb_shd.g_old_rec.tdb_information5;
473: End If;
474: If (p_rec.tdb_information6 = hr_api.g_varchar2) then
470: If (p_rec.tdb_information5 = hr_api.g_varchar2) then
471: p_rec.tdb_information5 :=
472: ota_tdb_shd.g_old_rec.tdb_information5;
473: End If;
474: If (p_rec.tdb_information6 = hr_api.g_varchar2) then
475: p_rec.tdb_information6 :=
476: ota_tdb_shd.g_old_rec.tdb_information6;
477: End If;
478: If (p_rec.tdb_information7 = hr_api.g_varchar2) then
474: If (p_rec.tdb_information6 = hr_api.g_varchar2) then
475: p_rec.tdb_information6 :=
476: ota_tdb_shd.g_old_rec.tdb_information6;
477: End If;
478: If (p_rec.tdb_information7 = hr_api.g_varchar2) then
479: p_rec.tdb_information7 :=
480: ota_tdb_shd.g_old_rec.tdb_information7;
481: End If;
482: If (p_rec.tdb_information8 = hr_api.g_varchar2) then
478: If (p_rec.tdb_information7 = hr_api.g_varchar2) then
479: p_rec.tdb_information7 :=
480: ota_tdb_shd.g_old_rec.tdb_information7;
481: End If;
482: If (p_rec.tdb_information8 = hr_api.g_varchar2) then
483: p_rec.tdb_information8 :=
484: ota_tdb_shd.g_old_rec.tdb_information8;
485: End If;
486: If (p_rec.tdb_information9 = hr_api.g_varchar2) then
482: If (p_rec.tdb_information8 = hr_api.g_varchar2) then
483: p_rec.tdb_information8 :=
484: ota_tdb_shd.g_old_rec.tdb_information8;
485: End If;
486: If (p_rec.tdb_information9 = hr_api.g_varchar2) then
487: p_rec.tdb_information9 :=
488: ota_tdb_shd.g_old_rec.tdb_information9;
489: End If;
490: If (p_rec.tdb_information10 = hr_api.g_varchar2) then
486: If (p_rec.tdb_information9 = hr_api.g_varchar2) then
487: p_rec.tdb_information9 :=
488: ota_tdb_shd.g_old_rec.tdb_information9;
489: End If;
490: If (p_rec.tdb_information10 = hr_api.g_varchar2) then
491: p_rec.tdb_information10 :=
492: ota_tdb_shd.g_old_rec.tdb_information10;
493: End If;
494: If (p_rec.tdb_information11 = hr_api.g_varchar2) then
490: If (p_rec.tdb_information10 = hr_api.g_varchar2) then
491: p_rec.tdb_information10 :=
492: ota_tdb_shd.g_old_rec.tdb_information10;
493: End If;
494: If (p_rec.tdb_information11 = hr_api.g_varchar2) then
495: p_rec.tdb_information11 :=
496: ota_tdb_shd.g_old_rec.tdb_information11;
497: End If;
498: If (p_rec.tdb_information12 = hr_api.g_varchar2) then
494: If (p_rec.tdb_information11 = hr_api.g_varchar2) then
495: p_rec.tdb_information11 :=
496: ota_tdb_shd.g_old_rec.tdb_information11;
497: End If;
498: If (p_rec.tdb_information12 = hr_api.g_varchar2) then
499: p_rec.tdb_information12 :=
500: ota_tdb_shd.g_old_rec.tdb_information12;
501: End If;
502: If (p_rec.tdb_information13 = hr_api.g_varchar2) then
498: If (p_rec.tdb_information12 = hr_api.g_varchar2) then
499: p_rec.tdb_information12 :=
500: ota_tdb_shd.g_old_rec.tdb_information12;
501: End If;
502: If (p_rec.tdb_information13 = hr_api.g_varchar2) then
503: p_rec.tdb_information13 :=
504: ota_tdb_shd.g_old_rec.tdb_information13;
505: End If;
506: If (p_rec.tdb_information14 = hr_api.g_varchar2) then
502: If (p_rec.tdb_information13 = hr_api.g_varchar2) then
503: p_rec.tdb_information13 :=
504: ota_tdb_shd.g_old_rec.tdb_information13;
505: End If;
506: If (p_rec.tdb_information14 = hr_api.g_varchar2) then
507: p_rec.tdb_information14 :=
508: ota_tdb_shd.g_old_rec.tdb_information14;
509: End If;
510: If (p_rec.tdb_information15 = hr_api.g_varchar2) then
506: If (p_rec.tdb_information14 = hr_api.g_varchar2) then
507: p_rec.tdb_information14 :=
508: ota_tdb_shd.g_old_rec.tdb_information14;
509: End If;
510: If (p_rec.tdb_information15 = hr_api.g_varchar2) then
511: p_rec.tdb_information15 :=
512: ota_tdb_shd.g_old_rec.tdb_information15;
513: End If;
514: If (p_rec.tdb_information16 = hr_api.g_varchar2) then
510: If (p_rec.tdb_information15 = hr_api.g_varchar2) then
511: p_rec.tdb_information15 :=
512: ota_tdb_shd.g_old_rec.tdb_information15;
513: End If;
514: If (p_rec.tdb_information16 = hr_api.g_varchar2) then
515: p_rec.tdb_information16 :=
516: ota_tdb_shd.g_old_rec.tdb_information16;
517: End If;
518: If (p_rec.tdb_information17 = hr_api.g_varchar2) then
514: If (p_rec.tdb_information16 = hr_api.g_varchar2) then
515: p_rec.tdb_information16 :=
516: ota_tdb_shd.g_old_rec.tdb_information16;
517: End If;
518: If (p_rec.tdb_information17 = hr_api.g_varchar2) then
519: p_rec.tdb_information17 :=
520: ota_tdb_shd.g_old_rec.tdb_information17;
521: End If;
522: If (p_rec.tdb_information18 = hr_api.g_varchar2) then
518: If (p_rec.tdb_information17 = hr_api.g_varchar2) then
519: p_rec.tdb_information17 :=
520: ota_tdb_shd.g_old_rec.tdb_information17;
521: End If;
522: If (p_rec.tdb_information18 = hr_api.g_varchar2) then
523: p_rec.tdb_information18 :=
524: ota_tdb_shd.g_old_rec.tdb_information18;
525: End If;
526: If (p_rec.tdb_information19 = hr_api.g_varchar2) then
522: If (p_rec.tdb_information18 = hr_api.g_varchar2) then
523: p_rec.tdb_information18 :=
524: ota_tdb_shd.g_old_rec.tdb_information18;
525: End If;
526: If (p_rec.tdb_information19 = hr_api.g_varchar2) then
527: p_rec.tdb_information19 :=
528: ota_tdb_shd.g_old_rec.tdb_information19;
529: End If;
530: If (p_rec.tdb_information20 = hr_api.g_varchar2) then
526: If (p_rec.tdb_information19 = hr_api.g_varchar2) then
527: p_rec.tdb_information19 :=
528: ota_tdb_shd.g_old_rec.tdb_information19;
529: End If;
530: If (p_rec.tdb_information20 = hr_api.g_varchar2) then
531: p_rec.tdb_information20 :=
532: ota_tdb_shd.g_old_rec.tdb_information20;
533: End If;
534: If (p_rec.organization_id = hr_api.g_number) then
530: If (p_rec.tdb_information20 = hr_api.g_varchar2) then
531: p_rec.tdb_information20 :=
532: ota_tdb_shd.g_old_rec.tdb_information20;
533: End If;
534: If (p_rec.organization_id = hr_api.g_number) then
535: p_rec.organization_id :=
536: ota_tdb_shd.g_old_rec.organization_id;
537: End If;
538: If (p_rec.sponsor_person_id = hr_api.g_number) then
534: If (p_rec.organization_id = hr_api.g_number) then
535: p_rec.organization_id :=
536: ota_tdb_shd.g_old_rec.organization_id;
537: End If;
538: If (p_rec.sponsor_person_id = hr_api.g_number) then
539: p_rec.sponsor_person_id :=
540: ota_tdb_shd.g_old_rec.sponsor_person_id;
541: End If;
542: If (p_rec.sponsor_assignment_id = hr_api.g_number) then
538: If (p_rec.sponsor_person_id = hr_api.g_number) then
539: p_rec.sponsor_person_id :=
540: ota_tdb_shd.g_old_rec.sponsor_person_id;
541: End If;
542: If (p_rec.sponsor_assignment_id = hr_api.g_number) then
543: p_rec.sponsor_assignment_id :=
544: ota_tdb_shd.g_old_rec.sponsor_assignment_id;
545: End If;
546: If (p_rec.person_address_id = hr_api.g_number) then
542: If (p_rec.sponsor_assignment_id = hr_api.g_number) then
543: p_rec.sponsor_assignment_id :=
544: ota_tdb_shd.g_old_rec.sponsor_assignment_id;
545: End If;
546: If (p_rec.person_address_id = hr_api.g_number) then
547: p_rec.person_address_id :=
548: ota_tdb_shd.g_old_rec.person_address_id;
549: End If;
550: If (p_rec.delegate_assignment_id = hr_api.g_number) then
546: If (p_rec.person_address_id = hr_api.g_number) then
547: p_rec.person_address_id :=
548: ota_tdb_shd.g_old_rec.person_address_id;
549: End If;
550: If (p_rec.delegate_assignment_id = hr_api.g_number) then
551: p_rec.delegate_assignment_id :=
552: ota_tdb_shd.g_old_rec.delegate_assignment_id;
553: End If;
554: If (p_rec.delegate_contact_id = hr_api.g_number) then
550: If (p_rec.delegate_assignment_id = hr_api.g_number) then
551: p_rec.delegate_assignment_id :=
552: ota_tdb_shd.g_old_rec.delegate_assignment_id;
553: End If;
554: If (p_rec.delegate_contact_id = hr_api.g_number) then
555: p_rec.delegate_contact_id :=
556: ota_tdb_shd.g_old_rec.delegate_contact_id;
557: End If;
558: If (p_rec.delegate_contact_email = hr_api.g_varchar2) then
554: If (p_rec.delegate_contact_id = hr_api.g_number) then
555: p_rec.delegate_contact_id :=
556: ota_tdb_shd.g_old_rec.delegate_contact_id;
557: End If;
558: If (p_rec.delegate_contact_email = hr_api.g_varchar2) then
559: p_rec.delegate_contact_email :=
560: ota_tdb_shd.g_old_rec.delegate_contact_email;
561: End If;
562: If (p_rec.third_party_email = hr_api.g_varchar2) then
558: If (p_rec.delegate_contact_email = hr_api.g_varchar2) then
559: p_rec.delegate_contact_email :=
560: ota_tdb_shd.g_old_rec.delegate_contact_email;
561: End If;
562: If (p_rec.third_party_email = hr_api.g_varchar2) then
563: p_rec.third_party_email :=
564: ota_tdb_shd.g_old_rec.third_party_email;
565: End If;
566: If (p_rec.person_address_type = hr_api.g_varchar2) then
562: If (p_rec.third_party_email = hr_api.g_varchar2) then
563: p_rec.third_party_email :=
564: ota_tdb_shd.g_old_rec.third_party_email;
565: End If;
566: If (p_rec.person_address_type = hr_api.g_varchar2) then
567: p_rec.person_address_type :=
568: ota_tdb_shd.g_old_rec.person_address_type;
569: End If;
570: If (p_rec.line_id = hr_api.g_number) then
566: If (p_rec.person_address_type = hr_api.g_varchar2) then
567: p_rec.person_address_type :=
568: ota_tdb_shd.g_old_rec.person_address_type;
569: End If;
570: If (p_rec.line_id = hr_api.g_number) then
571: p_rec.line_id :=
572: ota_tdb_shd.g_old_rec.line_id;
573: End If;
574: If (p_rec.org_id = hr_api.g_number) then
570: If (p_rec.line_id = hr_api.g_number) then
571: p_rec.line_id :=
572: ota_tdb_shd.g_old_rec.line_id;
573: End If;
574: If (p_rec.org_id = hr_api.g_number) then
575: p_rec.org_id :=
576: ota_tdb_shd.g_old_rec.org_id;
577: End If;
578: If (p_rec.daemon_flag = hr_api.g_varchar2) then
574: If (p_rec.org_id = hr_api.g_number) then
575: p_rec.org_id :=
576: ota_tdb_shd.g_old_rec.org_id;
577: End If;
578: If (p_rec.daemon_flag = hr_api.g_varchar2) then
579: p_rec.daemon_flag :=
580: ota_tdb_shd.g_old_rec.daemon_flag;
581: End If;
582: If (p_rec.daemon_type = hr_api.g_varchar2) then
578: If (p_rec.daemon_flag = hr_api.g_varchar2) then
579: p_rec.daemon_flag :=
580: ota_tdb_shd.g_old_rec.daemon_flag;
581: End If;
582: If (p_rec.daemon_type = hr_api.g_varchar2) then
583: p_rec.daemon_type :=
584: ota_tdb_shd.g_old_rec.daemon_type;
585: End If;
586:
583: p_rec.daemon_type :=
584: ota_tdb_shd.g_old_rec.daemon_type;
585: End If;
586:
587: If (p_rec.old_event_id = hr_api.g_number) then
588: p_rec.old_event_id :=
589: ota_tdb_shd.g_old_rec.old_event_id;
590: End If;
591:
588: p_rec.old_event_id :=
589: ota_tdb_shd.g_old_rec.old_event_id;
590: End If;
591:
592: If (p_rec.quote_line_id = hr_api.g_number) then
593: p_rec.quote_line_id :=
594: ota_tdb_shd.g_old_rec.quote_line_id;
595: End If;
596:
593: p_rec.quote_line_id :=
594: ota_tdb_shd.g_old_rec.quote_line_id;
595: End If;
596:
597: If (p_rec.interface_source = hr_api.g_varchar2) then
598: p_rec.interface_source :=
599: ota_tdb_shd.g_old_rec.interface_source;
600: End If;
601:
598: p_rec.interface_source :=
599: ota_tdb_shd.g_old_rec.interface_source;
600: End If;
601:
602: If (p_rec.total_training_time = hr_api.g_varchar2) then
603: p_rec.total_training_time :=
604: ota_tdb_shd.g_old_rec.total_training_time ;
605: End If;
606:
603: p_rec.total_training_time :=
604: ota_tdb_shd.g_old_rec.total_training_time ;
605: End If;
606:
607: If (p_rec.content_player_status= hr_api.g_varchar2) then
608: p_rec.content_player_status:=
609: ota_tdb_shd.g_old_rec.content_player_status;
610: End If;
611:
608: p_rec.content_player_status:=
609: ota_tdb_shd.g_old_rec.content_player_status;
610: End If;
611:
612: If (p_rec.score = hr_api.g_number) then
613: p_rec.score:=
614: ota_tdb_shd.g_old_rec.score;
615: End If;
616: If (p_rec.completed_content= hr_api.g_number) then
612: If (p_rec.score = hr_api.g_number) then
613: p_rec.score:=
614: ota_tdb_shd.g_old_rec.score;
615: End If;
616: If (p_rec.completed_content= hr_api.g_number) then
617: p_rec.completed_content:=
618: ota_tdb_shd.g_old_rec.completed_content;
619: End If;
620: If (p_rec.total_content = hr_api.g_number) then
616: If (p_rec.completed_content= hr_api.g_number) then
617: p_rec.completed_content:=
618: ota_tdb_shd.g_old_rec.completed_content;
619: End If;
620: If (p_rec.total_content = hr_api.g_number) then
621: p_rec.total_content :=
622: ota_tdb_shd.g_old_rec.total_content ;
623: End If;
624: if (p_rec.booking_justification_id = hr_api.g_number) then
620: If (p_rec.total_content = hr_api.g_number) then
621: p_rec.total_content :=
622: ota_tdb_shd.g_old_rec.total_content ;
623: End If;
624: if (p_rec.booking_justification_id = hr_api.g_number) then
625: p_rec.booking_justification_id :=
626: ota_tdb_shd.g_old_rec.booking_justification_id;
627: End If;
628: if (p_rec.is_history_flag = hr_api.g_varchar2) then
624: if (p_rec.booking_justification_id = hr_api.g_number) then
625: p_rec.booking_justification_id :=
626: ota_tdb_shd.g_old_rec.booking_justification_id;
627: End If;
628: if (p_rec.is_history_flag = hr_api.g_varchar2) then
629: p_rec.is_history_flag :=
630: ota_tdb_shd.g_old_rec.is_history_flag;
631: End If;
632: --
702: --
703: -- If we are validating then raise the Validate_Enabled exception
704: --
705: If p_validate then
706: Raise HR_Api.Validate_Enabled;
707: End If;
708: --
709: hr_utility.set_location(' Leaving:'||l_proc, 10);
710: Exception
707: End If;
708: --
709: hr_utility.set_location(' Leaving:'||l_proc, 10);
710: Exception
711: When HR_Api.Validate_Enabled Then
712: --
713: -- As the Validate_Enabled exception has been raised
714: -- we must rollback to the savepoint
715: --