131: --
132: hr_utility.set_location(' Leaving:'||l_proc, 10);
133: --
134: Exception
135: When hr_api.check_integrity_violated Then
136: -- A check constraint has been violated
137: ota_tav_shd.g_api_dml := false; -- Unset the api dml status
138: ota_tav_shd.constraint_error
139: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
135: When hr_api.check_integrity_violated Then
136: -- A check constraint has been violated
137: ota_tav_shd.g_api_dml := false; -- Unset the api dml status
138: ota_tav_shd.constraint_error
139: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
140: When hr_api.parent_integrity_violated Then
141: -- Parent integrity has been violated
142: ota_tav_shd.g_api_dml := false; -- Unset the api dml status
143: ota_tav_shd.constraint_error
136: -- A check constraint has been violated
137: ota_tav_shd.g_api_dml := false; -- Unset the api dml status
138: ota_tav_shd.constraint_error
139: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
140: When hr_api.parent_integrity_violated Then
141: -- Parent integrity has been violated
142: ota_tav_shd.g_api_dml := false; -- Unset the api dml status
143: ota_tav_shd.constraint_error
144: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
140: When hr_api.parent_integrity_violated Then
141: -- Parent integrity has been violated
142: ota_tav_shd.g_api_dml := false; -- Unset the api dml status
143: ota_tav_shd.constraint_error
144: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
145: When hr_api.unique_integrity_violated Then
146: -- Unique integrity has been violated
147: ota_tav_shd.g_api_dml := false; -- Unset the api dml status
148: ota_tav_shd.constraint_error
141: -- Parent integrity has been violated
142: ota_tav_shd.g_api_dml := false; -- Unset the api dml status
143: ota_tav_shd.constraint_error
144: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
145: When hr_api.unique_integrity_violated Then
146: -- Unique integrity has been violated
147: ota_tav_shd.g_api_dml := false; -- Unset the api dml status
148: ota_tav_shd.constraint_error
149: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
145: When hr_api.unique_integrity_violated Then
146: -- Unique integrity has been violated
147: ota_tav_shd.g_api_dml := false; -- Unset the api dml status
148: ota_tav_shd.constraint_error
149: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
150: When Others Then
151: ota_tav_shd.g_api_dml := false; -- Unset the api dml status
152: Raise;
153: End update_dml;
314: -- p_rec plsql record structure
315: -- to see if a system default is being used. If a system default
316: -- is being used then we must set to the 'current' argument value.
317: --
318: If (p_rec.activity_id = hr_api.g_number) then
319: p_rec.activity_id :=
320: ota_tav_shd.g_old_rec.activity_id;
321: End If;
322: If (p_rec.superseded_by_act_version_id = hr_api.g_number) then
318: If (p_rec.activity_id = hr_api.g_number) then
319: p_rec.activity_id :=
320: ota_tav_shd.g_old_rec.activity_id;
321: End If;
322: If (p_rec.superseded_by_act_version_id = hr_api.g_number) then
323: p_rec.superseded_by_act_version_id :=
324: ota_tav_shd.g_old_rec.superseded_by_act_version_id;
325: End If;
326: If (p_rec.developer_organization_id = hr_api.g_number) then
322: If (p_rec.superseded_by_act_version_id = hr_api.g_number) then
323: p_rec.superseded_by_act_version_id :=
324: ota_tav_shd.g_old_rec.superseded_by_act_version_id;
325: End If;
326: If (p_rec.developer_organization_id = hr_api.g_number) then
327: p_rec.developer_organization_id :=
328: ota_tav_shd.g_old_rec.developer_organization_id;
329: End If;
330: If (p_rec.controlling_person_id = hr_api.g_number) then
326: If (p_rec.developer_organization_id = hr_api.g_number) then
327: p_rec.developer_organization_id :=
328: ota_tav_shd.g_old_rec.developer_organization_id;
329: End If;
330: If (p_rec.controlling_person_id = hr_api.g_number) then
331: p_rec.controlling_person_id :=
332: ota_tav_shd.g_old_rec.controlling_person_id;
333: End If;
334: If (p_rec.version_name = hr_api.g_varchar2) then
330: If (p_rec.controlling_person_id = hr_api.g_number) then
331: p_rec.controlling_person_id :=
332: ota_tav_shd.g_old_rec.controlling_person_id;
333: End If;
334: If (p_rec.version_name = hr_api.g_varchar2) then
335: p_rec.version_name :=
336: ota_tav_shd.g_old_rec.version_name;
337: End If;
338: If (p_rec.comments = hr_api.g_varchar2) then
334: If (p_rec.version_name = hr_api.g_varchar2) then
335: p_rec.version_name :=
336: ota_tav_shd.g_old_rec.version_name;
337: End If;
338: If (p_rec.comments = hr_api.g_varchar2) then
339: p_rec.comments :=
340: ota_tav_shd.g_old_rec.comments;
341: End If;
342: If (p_rec.description = hr_api.g_varchar2) then
338: If (p_rec.comments = hr_api.g_varchar2) then
339: p_rec.comments :=
340: ota_tav_shd.g_old_rec.comments;
341: End If;
342: If (p_rec.description = hr_api.g_varchar2) then
343: p_rec.description :=
344: ota_tav_shd.g_old_rec.description;
345: End If;
346: If (p_rec.duration = hr_api.g_number) then
342: If (p_rec.description = hr_api.g_varchar2) then
343: p_rec.description :=
344: ota_tav_shd.g_old_rec.description;
345: End If;
346: If (p_rec.duration = hr_api.g_number) then
347: p_rec.duration :=
348: ota_tav_shd.g_old_rec.duration;
349: End If;
350: If (p_rec.duration_units = hr_api.g_varchar2) then
346: If (p_rec.duration = hr_api.g_number) then
347: p_rec.duration :=
348: ota_tav_shd.g_old_rec.duration;
349: End If;
350: If (p_rec.duration_units = hr_api.g_varchar2) then
351: p_rec.duration_units :=
352: ota_tav_shd.g_old_rec.duration_units;
353: End If;
354: If (p_rec.end_date = hr_api.g_date) then
350: If (p_rec.duration_units = hr_api.g_varchar2) then
351: p_rec.duration_units :=
352: ota_tav_shd.g_old_rec.duration_units;
353: End If;
354: If (p_rec.end_date = hr_api.g_date) then
355: p_rec.end_date :=
356: ota_tav_shd.g_old_rec.end_date;
357: End If;
358: If (p_rec.intended_audience = hr_api.g_varchar2) then
354: If (p_rec.end_date = hr_api.g_date) then
355: p_rec.end_date :=
356: ota_tav_shd.g_old_rec.end_date;
357: End If;
358: If (p_rec.intended_audience = hr_api.g_varchar2) then
359: p_rec.intended_audience :=
360: ota_tav_shd.g_old_rec.intended_audience;
361: End If;
362: If (p_rec.language_id = hr_api.g_number) then
358: If (p_rec.intended_audience = hr_api.g_varchar2) then
359: p_rec.intended_audience :=
360: ota_tav_shd.g_old_rec.intended_audience;
361: End If;
362: If (p_rec.language_id = hr_api.g_number) then
363: p_rec.language_id :=
364: ota_tav_shd.g_old_rec.language_id;
365: End If;
366: If (p_rec.maximum_attendees = hr_api.g_number) then
362: If (p_rec.language_id = hr_api.g_number) then
363: p_rec.language_id :=
364: ota_tav_shd.g_old_rec.language_id;
365: End If;
366: If (p_rec.maximum_attendees = hr_api.g_number) then
367: p_rec.maximum_attendees :=
368: ota_tav_shd.g_old_rec.maximum_attendees;
369: End If;
370: If (p_rec.minimum_attendees = hr_api.g_number) then
366: If (p_rec.maximum_attendees = hr_api.g_number) then
367: p_rec.maximum_attendees :=
368: ota_tav_shd.g_old_rec.maximum_attendees;
369: End If;
370: If (p_rec.minimum_attendees = hr_api.g_number) then
371: p_rec.minimum_attendees :=
372: ota_tav_shd.g_old_rec.minimum_attendees;
373: End If;
374: If (p_rec.objectives = hr_api.g_varchar2) then
370: If (p_rec.minimum_attendees = hr_api.g_number) then
371: p_rec.minimum_attendees :=
372: ota_tav_shd.g_old_rec.minimum_attendees;
373: End If;
374: If (p_rec.objectives = hr_api.g_varchar2) then
375: p_rec.objectives :=
376: ota_tav_shd.g_old_rec.objectives;
377: End If;
378: If (p_rec.start_date = hr_api.g_date) then
374: If (p_rec.objectives = hr_api.g_varchar2) then
375: p_rec.objectives :=
376: ota_tav_shd.g_old_rec.objectives;
377: End If;
378: If (p_rec.start_date = hr_api.g_date) then
379: p_rec.start_date :=
380: ota_tav_shd.g_old_rec.start_date;
381: End If;
382: If (p_rec.success_criteria = hr_api.g_varchar2) then
378: If (p_rec.start_date = hr_api.g_date) then
379: p_rec.start_date :=
380: ota_tav_shd.g_old_rec.start_date;
381: End If;
382: If (p_rec.success_criteria = hr_api.g_varchar2) then
383: p_rec.success_criteria :=
384: ota_tav_shd.g_old_rec.success_criteria;
385: End If;
386: If (p_rec.user_status = hr_api.g_varchar2) then
382: If (p_rec.success_criteria = hr_api.g_varchar2) then
383: p_rec.success_criteria :=
384: ota_tav_shd.g_old_rec.success_criteria;
385: End If;
386: If (p_rec.user_status = hr_api.g_varchar2) then
387: p_rec.user_status :=
388: ota_tav_shd.g_old_rec.user_status;
389: End If;
390: If (p_rec.vendor_id = hr_api.g_number) then
386: If (p_rec.user_status = hr_api.g_varchar2) then
387: p_rec.user_status :=
388: ota_tav_shd.g_old_rec.user_status;
389: End If;
390: If (p_rec.vendor_id = hr_api.g_number) then
391: p_rec.vendor_id :=
392: ota_tav_shd.g_old_rec.vendor_id;
393: End If;
394: If (p_rec.actual_cost = hr_api.g_number) then
390: If (p_rec.vendor_id = hr_api.g_number) then
391: p_rec.vendor_id :=
392: ota_tav_shd.g_old_rec.vendor_id;
393: End If;
394: If (p_rec.actual_cost = hr_api.g_number) then
395: p_rec.actual_cost :=
396: ota_tav_shd.g_old_rec.actual_cost;
397: End If;
398: If (p_rec.budget_cost = hr_api.g_number) then
394: If (p_rec.actual_cost = hr_api.g_number) then
395: p_rec.actual_cost :=
396: ota_tav_shd.g_old_rec.actual_cost;
397: End If;
398: If (p_rec.budget_cost = hr_api.g_number) then
399: p_rec.budget_cost :=
400: ota_tav_shd.g_old_rec.budget_cost;
401: End If;
402: If (p_rec.budget_currency_code = hr_api.g_varchar2) then
398: If (p_rec.budget_cost = hr_api.g_number) then
399: p_rec.budget_cost :=
400: ota_tav_shd.g_old_rec.budget_cost;
401: End If;
402: If (p_rec.budget_currency_code = hr_api.g_varchar2) then
403: p_rec.budget_currency_code :=
404: ota_tav_shd.g_old_rec.budget_currency_code;
405: End If;
406: If (p_rec.expenses_allowed = hr_api.g_varchar2) then
402: If (p_rec.budget_currency_code = hr_api.g_varchar2) then
403: p_rec.budget_currency_code :=
404: ota_tav_shd.g_old_rec.budget_currency_code;
405: End If;
406: If (p_rec.expenses_allowed = hr_api.g_varchar2) then
407: p_rec.expenses_allowed :=
408: ota_tav_shd.g_old_rec.expenses_allowed;
409: End If;
410: If (p_rec.professional_credit_type = hr_api.g_varchar2) then
406: If (p_rec.expenses_allowed = hr_api.g_varchar2) then
407: p_rec.expenses_allowed :=
408: ota_tav_shd.g_old_rec.expenses_allowed;
409: End If;
410: If (p_rec.professional_credit_type = hr_api.g_varchar2) then
411: p_rec.professional_credit_type :=
412: ota_tav_shd.g_old_rec.professional_credit_type;
413: End If;
414: If (p_rec.professional_credits = hr_api.g_number) then
410: If (p_rec.professional_credit_type = hr_api.g_varchar2) then
411: p_rec.professional_credit_type :=
412: ota_tav_shd.g_old_rec.professional_credit_type;
413: End If;
414: If (p_rec.professional_credits = hr_api.g_number) then
415: p_rec.professional_credits :=
416: ota_tav_shd.g_old_rec.professional_credits;
417: End If;
418: If (p_rec.maximum_internal_attendees = hr_api.g_number) then
414: If (p_rec.professional_credits = hr_api.g_number) then
415: p_rec.professional_credits :=
416: ota_tav_shd.g_old_rec.professional_credits;
417: End If;
418: If (p_rec.maximum_internal_attendees = hr_api.g_number) then
419: p_rec.maximum_internal_attendees :=
420: ota_tav_shd.g_old_rec.maximum_internal_attendees;
421: End If;
422: If (p_rec.tav_information_category = hr_api.g_varchar2) then
418: If (p_rec.maximum_internal_attendees = hr_api.g_number) then
419: p_rec.maximum_internal_attendees :=
420: ota_tav_shd.g_old_rec.maximum_internal_attendees;
421: End If;
422: If (p_rec.tav_information_category = hr_api.g_varchar2) then
423: p_rec.tav_information_category :=
424: ota_tav_shd.g_old_rec.tav_information_category;
425: End If;
426: If (p_rec.tav_information1 = hr_api.g_varchar2) then
422: If (p_rec.tav_information_category = hr_api.g_varchar2) then
423: p_rec.tav_information_category :=
424: ota_tav_shd.g_old_rec.tav_information_category;
425: End If;
426: If (p_rec.tav_information1 = hr_api.g_varchar2) then
427: p_rec.tav_information1 :=
428: ota_tav_shd.g_old_rec.tav_information1;
429: End If;
430: If (p_rec.tav_information2 = hr_api.g_varchar2) then
426: If (p_rec.tav_information1 = hr_api.g_varchar2) then
427: p_rec.tav_information1 :=
428: ota_tav_shd.g_old_rec.tav_information1;
429: End If;
430: If (p_rec.tav_information2 = hr_api.g_varchar2) then
431: p_rec.tav_information2 :=
432: ota_tav_shd.g_old_rec.tav_information2;
433: End If;
434: If (p_rec.tav_information3 = hr_api.g_varchar2) then
430: If (p_rec.tav_information2 = hr_api.g_varchar2) then
431: p_rec.tav_information2 :=
432: ota_tav_shd.g_old_rec.tav_information2;
433: End If;
434: If (p_rec.tav_information3 = hr_api.g_varchar2) then
435: p_rec.tav_information3 :=
436: ota_tav_shd.g_old_rec.tav_information3;
437: End If;
438: If (p_rec.tav_information4 = hr_api.g_varchar2) then
434: If (p_rec.tav_information3 = hr_api.g_varchar2) then
435: p_rec.tav_information3 :=
436: ota_tav_shd.g_old_rec.tav_information3;
437: End If;
438: If (p_rec.tav_information4 = hr_api.g_varchar2) then
439: p_rec.tav_information4 :=
440: ota_tav_shd.g_old_rec.tav_information4;
441: End If;
442: If (p_rec.tav_information5 = hr_api.g_varchar2) then
438: If (p_rec.tav_information4 = hr_api.g_varchar2) then
439: p_rec.tav_information4 :=
440: ota_tav_shd.g_old_rec.tav_information4;
441: End If;
442: If (p_rec.tav_information5 = hr_api.g_varchar2) then
443: p_rec.tav_information5 :=
444: ota_tav_shd.g_old_rec.tav_information5;
445: End If;
446: If (p_rec.tav_information6 = hr_api.g_varchar2) then
442: If (p_rec.tav_information5 = hr_api.g_varchar2) then
443: p_rec.tav_information5 :=
444: ota_tav_shd.g_old_rec.tav_information5;
445: End If;
446: If (p_rec.tav_information6 = hr_api.g_varchar2) then
447: p_rec.tav_information6 :=
448: ota_tav_shd.g_old_rec.tav_information6;
449: End If;
450: If (p_rec.tav_information7 = hr_api.g_varchar2) then
446: If (p_rec.tav_information6 = hr_api.g_varchar2) then
447: p_rec.tav_information6 :=
448: ota_tav_shd.g_old_rec.tav_information6;
449: End If;
450: If (p_rec.tav_information7 = hr_api.g_varchar2) then
451: p_rec.tav_information7 :=
452: ota_tav_shd.g_old_rec.tav_information7;
453: End If;
454: If (p_rec.tav_information8 = hr_api.g_varchar2) then
450: If (p_rec.tav_information7 = hr_api.g_varchar2) then
451: p_rec.tav_information7 :=
452: ota_tav_shd.g_old_rec.tav_information7;
453: End If;
454: If (p_rec.tav_information8 = hr_api.g_varchar2) then
455: p_rec.tav_information8 :=
456: ota_tav_shd.g_old_rec.tav_information8;
457: End If;
458: If (p_rec.tav_information9 = hr_api.g_varchar2) then
454: If (p_rec.tav_information8 = hr_api.g_varchar2) then
455: p_rec.tav_information8 :=
456: ota_tav_shd.g_old_rec.tav_information8;
457: End If;
458: If (p_rec.tav_information9 = hr_api.g_varchar2) then
459: p_rec.tav_information9 :=
460: ota_tav_shd.g_old_rec.tav_information9;
461: End If;
462: If (p_rec.tav_information10 = hr_api.g_varchar2) then
458: If (p_rec.tav_information9 = hr_api.g_varchar2) then
459: p_rec.tav_information9 :=
460: ota_tav_shd.g_old_rec.tav_information9;
461: End If;
462: If (p_rec.tav_information10 = hr_api.g_varchar2) then
463: p_rec.tav_information10 :=
464: ota_tav_shd.g_old_rec.tav_information10;
465: End If;
466: If (p_rec.tav_information11 = hr_api.g_varchar2) then
462: If (p_rec.tav_information10 = hr_api.g_varchar2) then
463: p_rec.tav_information10 :=
464: ota_tav_shd.g_old_rec.tav_information10;
465: End If;
466: If (p_rec.tav_information11 = hr_api.g_varchar2) then
467: p_rec.tav_information11 :=
468: ota_tav_shd.g_old_rec.tav_information11;
469: End If;
470: If (p_rec.tav_information12 = hr_api.g_varchar2) then
466: If (p_rec.tav_information11 = hr_api.g_varchar2) then
467: p_rec.tav_information11 :=
468: ota_tav_shd.g_old_rec.tav_information11;
469: End If;
470: If (p_rec.tav_information12 = hr_api.g_varchar2) then
471: p_rec.tav_information12 :=
472: ota_tav_shd.g_old_rec.tav_information12;
473: End If;
474: If (p_rec.tav_information13 = hr_api.g_varchar2) then
470: If (p_rec.tav_information12 = hr_api.g_varchar2) then
471: p_rec.tav_information12 :=
472: ota_tav_shd.g_old_rec.tav_information12;
473: End If;
474: If (p_rec.tav_information13 = hr_api.g_varchar2) then
475: p_rec.tav_information13 :=
476: ota_tav_shd.g_old_rec.tav_information13;
477: End If;
478: If (p_rec.tav_information14 = hr_api.g_varchar2) then
474: If (p_rec.tav_information13 = hr_api.g_varchar2) then
475: p_rec.tav_information13 :=
476: ota_tav_shd.g_old_rec.tav_information13;
477: End If;
478: If (p_rec.tav_information14 = hr_api.g_varchar2) then
479: p_rec.tav_information14 :=
480: ota_tav_shd.g_old_rec.tav_information14;
481: End If;
482: If (p_rec.tav_information15 = hr_api.g_varchar2) then
478: If (p_rec.tav_information14 = hr_api.g_varchar2) then
479: p_rec.tav_information14 :=
480: ota_tav_shd.g_old_rec.tav_information14;
481: End If;
482: If (p_rec.tav_information15 = hr_api.g_varchar2) then
483: p_rec.tav_information15 :=
484: ota_tav_shd.g_old_rec.tav_information15;
485: End If;
486: If (p_rec.tav_information16 = hr_api.g_varchar2) then
482: If (p_rec.tav_information15 = hr_api.g_varchar2) then
483: p_rec.tav_information15 :=
484: ota_tav_shd.g_old_rec.tav_information15;
485: End If;
486: If (p_rec.tav_information16 = hr_api.g_varchar2) then
487: p_rec.tav_information16 :=
488: ota_tav_shd.g_old_rec.tav_information16;
489: End If;
490: If (p_rec.tav_information17 = hr_api.g_varchar2) then
486: If (p_rec.tav_information16 = hr_api.g_varchar2) then
487: p_rec.tav_information16 :=
488: ota_tav_shd.g_old_rec.tav_information16;
489: End If;
490: If (p_rec.tav_information17 = hr_api.g_varchar2) then
491: p_rec.tav_information17 :=
492: ota_tav_shd.g_old_rec.tav_information17;
493: End If;
494: If (p_rec.tav_information18 = hr_api.g_varchar2) then
490: If (p_rec.tav_information17 = hr_api.g_varchar2) then
491: p_rec.tav_information17 :=
492: ota_tav_shd.g_old_rec.tav_information17;
493: End If;
494: If (p_rec.tav_information18 = hr_api.g_varchar2) then
495: p_rec.tav_information18 :=
496: ota_tav_shd.g_old_rec.tav_information18;
497: End If;
498: If (p_rec.tav_information19 = hr_api.g_varchar2) then
494: If (p_rec.tav_information18 = hr_api.g_varchar2) then
495: p_rec.tav_information18 :=
496: ota_tav_shd.g_old_rec.tav_information18;
497: End If;
498: If (p_rec.tav_information19 = hr_api.g_varchar2) then
499: p_rec.tav_information19 :=
500: ota_tav_shd.g_old_rec.tav_information19;
501: End If;
502: If (p_rec.tav_information20 = hr_api.g_varchar2) then
498: If (p_rec.tav_information19 = hr_api.g_varchar2) then
499: p_rec.tav_information19 :=
500: ota_tav_shd.g_old_rec.tav_information19;
501: End If;
502: If (p_rec.tav_information20 = hr_api.g_varchar2) then
503: p_rec.tav_information20 :=
504: ota_tav_shd.g_old_rec.tav_information20;
505: End If;
506: If (p_rec.inventory_item_id = hr_api.g_number) then
502: If (p_rec.tav_information20 = hr_api.g_varchar2) then
503: p_rec.tav_information20 :=
504: ota_tav_shd.g_old_rec.tav_information20;
505: End If;
506: If (p_rec.inventory_item_id = hr_api.g_number) then
507: p_rec.inventory_item_id :=
508: ota_tav_shd.g_old_rec.inventory_item_id;
509: End If;
510: If (p_rec.organization_id = hr_api.g_number) then
506: If (p_rec.inventory_item_id = hr_api.g_number) then
507: p_rec.inventory_item_id :=
508: ota_tav_shd.g_old_rec.inventory_item_id;
509: End If;
510: If (p_rec.organization_id = hr_api.g_number) then
511: p_rec.organization_id :=
512: ota_tav_shd.g_old_rec.organization_id;
513: End If;
514: If (p_rec.rco_id = hr_api.g_number) then
510: If (p_rec.organization_id = hr_api.g_number) then
511: p_rec.organization_id :=
512: ota_tav_shd.g_old_rec.organization_id;
513: End If;
514: If (p_rec.rco_id = hr_api.g_number) then
515: p_rec.rco_id :=
516: ota_tav_shd.g_old_rec.rco_id;
517: End If;
518: If (p_rec.version_code = hr_api.g_varchar2) then
514: If (p_rec.rco_id = hr_api.g_number) then
515: p_rec.rco_id :=
516: ota_tav_shd.g_old_rec.rco_id;
517: End If;
518: If (p_rec.version_code = hr_api.g_varchar2) then
519: p_rec.version_code :=
520: ota_tav_shd.g_old_rec.version_code;
521: End If;
522: If (p_rec.business_group_id = hr_api.g_number) then
518: If (p_rec.version_code = hr_api.g_varchar2) then
519: p_rec.version_code :=
520: ota_tav_shd.g_old_rec.version_code;
521: End If;
522: If (p_rec.business_group_id = hr_api.g_number) then
523: p_rec.business_group_id :=
524: ota_tav_shd.g_old_rec.business_group_id;
525: End If;
526: If (p_rec.data_source = hr_api.g_varchar2) then
522: If (p_rec.business_group_id = hr_api.g_number) then
523: p_rec.business_group_id :=
524: ota_tav_shd.g_old_rec.business_group_id;
525: End If;
526: If (p_rec.data_source = hr_api.g_varchar2) then
527: p_rec.data_source :=
528: ota_tav_shd.g_old_rec.data_source;
529: End If;
530: If (p_rec.competency_update_level = hr_api.g_varchar2) then
526: If (p_rec.data_source = hr_api.g_varchar2) then
527: p_rec.data_source :=
528: ota_tav_shd.g_old_rec.data_source;
529: End If;
530: If (p_rec.competency_update_level = hr_api.g_varchar2) then
531: p_rec.competency_update_level :=
532: ota_tav_shd.g_old_rec.competency_update_level;
533: End If;
534:
599: --
600: -- If we are validating then raise the Validate_Enabled exception
601: --
602: If p_validate then
603: Raise HR_Api.Validate_Enabled;
604: End If;
605: --
606: hr_utility.set_location(' Leaving:'||l_proc, 10);
607: Exception
604: End If;
605: --
606: hr_utility.set_location(' Leaving:'||l_proc, 10);
607: Exception
608: When HR_Api.Validate_Enabled Then
609: --
610: -- As the Validate_Enabled exception has been raised
611: -- we must rollback to the savepoint
612: --