[Home] [Help]
50: -- Internal Development Use Only.
51: --
52: -- {End Of Comments}
53: -- ----------------------------------------------------------------------------
54: Procedure update_dml(p_rec in out nocopy ota_tav_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: ota_tav_shd.g_api_dml := true; -- Set the api dml status
66: --
67: -- Update the ota_activity_versions Row
68: --
69: update ota_activity_versions
127: eres_enabled = p_rec.eres_enabled
128:
129: where activity_version_id = p_rec.activity_version_id;
130: --
131: ota_tav_shd.g_api_dml := false; -- Unset the api dml status
132: --
133: hr_utility.set_location(' Leaving:'||l_proc, 10);
134: --
135: Exception
134: --
135: Exception
136: When hr_api.check_integrity_violated Then
137: -- A check constraint has been violated
138: ota_tav_shd.g_api_dml := false; -- Unset the api dml status
139: ota_tav_shd.constraint_error
140: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
141: When hr_api.parent_integrity_violated Then
142: -- Parent integrity has been violated
135: Exception
136: When hr_api.check_integrity_violated Then
137: -- A check constraint has been violated
138: ota_tav_shd.g_api_dml := false; -- Unset the api dml status
139: ota_tav_shd.constraint_error
140: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
141: When hr_api.parent_integrity_violated Then
142: -- Parent integrity has been violated
143: ota_tav_shd.g_api_dml := false; -- Unset the api dml status
139: ota_tav_shd.constraint_error
140: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
141: When hr_api.parent_integrity_violated Then
142: -- Parent integrity has been violated
143: ota_tav_shd.g_api_dml := false; -- Unset the api dml status
144: ota_tav_shd.constraint_error
145: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
146: When hr_api.unique_integrity_violated Then
147: -- Unique integrity has been violated
140: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
141: When hr_api.parent_integrity_violated Then
142: -- Parent integrity has been violated
143: ota_tav_shd.g_api_dml := false; -- Unset the api dml status
144: ota_tav_shd.constraint_error
145: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
146: When hr_api.unique_integrity_violated Then
147: -- Unique integrity has been violated
148: ota_tav_shd.g_api_dml := false; -- Unset the api dml status
144: ota_tav_shd.constraint_error
145: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
146: When hr_api.unique_integrity_violated Then
147: -- Unique integrity has been violated
148: ota_tav_shd.g_api_dml := false; -- Unset the api dml status
149: ota_tav_shd.constraint_error
150: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
151: When Others Then
152: ota_tav_shd.g_api_dml := false; -- Unset the api dml status
145: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
146: When hr_api.unique_integrity_violated Then
147: -- Unique integrity has been violated
148: ota_tav_shd.g_api_dml := false; -- Unset the api dml status
149: ota_tav_shd.constraint_error
150: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
151: When Others Then
152: ota_tav_shd.g_api_dml := false; -- Unset the api dml status
153: Raise;
148: ota_tav_shd.g_api_dml := false; -- Unset the api dml status
149: ota_tav_shd.constraint_error
150: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
151: When Others Then
152: ota_tav_shd.g_api_dml := false; -- Unset the api dml status
153: Raise;
154: End update_dml;
155: --
156: -- ----------------------------------------------------------------------------
184: -- Internal Development Use Only.
185: --
186: -- {End Of Comments}
187: -- ----------------------------------------------------------------------------
188: Procedure pre_update(p_rec in ota_tav_shd.g_rec_type) is
189: --
190: l_proc varchar2(72) := g_package||'pre_update';
191: --
192: Begin
226: -- Internal Development Use Only.
227: --
228: -- {End Of Comments}
229: -- ----------------------------------------------------------------------------
230: Procedure post_update(p_rec in ota_tav_shd.g_rec_type) is
231: --
232: l_proc varchar2(72) := g_package||'post_update';
233: l_start_date_changed boolean := ota_general.value_changed(ota_tav_shd.g_old_rec.start_date, p_rec.start_date);
234: l_end_date_changed boolean := ota_general.value_changed(ota_tav_shd.g_old_rec.end_date, p_rec.end_date);
229: -- ----------------------------------------------------------------------------
230: Procedure post_update(p_rec in ota_tav_shd.g_rec_type) is
231: --
232: l_proc varchar2(72) := g_package||'post_update';
233: l_start_date_changed boolean := ota_general.value_changed(ota_tav_shd.g_old_rec.start_date, p_rec.start_date);
234: l_end_date_changed boolean := ota_general.value_changed(ota_tav_shd.g_old_rec.end_date, p_rec.end_date);
235: --
236: Begin
237: hr_utility.set_location('Entering:'||l_proc, 5);
230: Procedure post_update(p_rec in ota_tav_shd.g_rec_type) is
231: --
232: l_proc varchar2(72) := g_package||'post_update';
233: l_start_date_changed boolean := ota_general.value_changed(ota_tav_shd.g_old_rec.start_date, p_rec.start_date);
234: l_end_date_changed boolean := ota_general.value_changed(ota_tav_shd.g_old_rec.end_date, p_rec.end_date);
235: --
236: Begin
237: hr_utility.set_location('Entering:'||l_proc, 5);
238: --
240: return;
241: Else
242: /*
243: ota_rud_api.update_resource_usage_dates( p_rec.activity_version_id
244: ,ota_tav_shd.g_old_rec.start_date
245: , p_rec.start_date
246: , ota_tav_shd.g_old_rec.end_date
247: , p_rec.end_date
248: );
242: /*
243: ota_rud_api.update_resource_usage_dates( p_rec.activity_version_id
244: ,ota_tav_shd.g_old_rec.start_date
245: , p_rec.start_date
246: , ota_tav_shd.g_old_rec.end_date
247: , p_rec.end_date
248: );
249: */
250: hr_competence_element_api.update_delivered_dates
248: );
249: */
250: hr_competence_element_api.update_delivered_dates
251: ( p_rec.activity_version_id
252: ,ota_tav_shd.g_old_rec.start_date
253: , p_rec.start_date
254: , ota_tav_shd.g_old_rec.end_date
255: , p_rec.end_date
256: );
250: hr_competence_element_api.update_delivered_dates
251: ( p_rec.activity_version_id
252: ,ota_tav_shd.g_old_rec.start_date
253: , p_rec.start_date
254: , ota_tav_shd.g_old_rec.end_date
255: , p_rec.end_date
256: );
257: End if;
258: --
301: -- Internal Development Use Only.
302: --
303: -- {End Of Comments}
304: -- ----------------------------------------------------------------------------
305: Function convert_defs(p_rec in out nocopy ota_tav_shd.g_rec_type)
306: Return ota_tav_shd.g_rec_type is
307: --
308: l_proc varchar2(72) := g_package||'convert_defs';
309: --
302: --
303: -- {End Of Comments}
304: -- ----------------------------------------------------------------------------
305: Function convert_defs(p_rec in out nocopy ota_tav_shd.g_rec_type)
306: Return ota_tav_shd.g_rec_type is
307: --
308: l_proc varchar2(72) := g_package||'convert_defs';
309: --
310: Begin
317: -- is being used then we must set to the 'current' argument value.
318: --
319: If (p_rec.activity_id = hr_api.g_number) then
320: p_rec.activity_id :=
321: ota_tav_shd.g_old_rec.activity_id;
322: End If;
323: If (p_rec.superseded_by_act_version_id = hr_api.g_number) then
324: p_rec.superseded_by_act_version_id :=
325: ota_tav_shd.g_old_rec.superseded_by_act_version_id;
321: ota_tav_shd.g_old_rec.activity_id;
322: End If;
323: If (p_rec.superseded_by_act_version_id = hr_api.g_number) then
324: p_rec.superseded_by_act_version_id :=
325: ota_tav_shd.g_old_rec.superseded_by_act_version_id;
326: End If;
327: If (p_rec.developer_organization_id = hr_api.g_number) then
328: p_rec.developer_organization_id :=
329: ota_tav_shd.g_old_rec.developer_organization_id;
325: ota_tav_shd.g_old_rec.superseded_by_act_version_id;
326: End If;
327: If (p_rec.developer_organization_id = hr_api.g_number) then
328: p_rec.developer_organization_id :=
329: ota_tav_shd.g_old_rec.developer_organization_id;
330: End If;
331: If (p_rec.controlling_person_id = hr_api.g_number) then
332: p_rec.controlling_person_id :=
333: ota_tav_shd.g_old_rec.controlling_person_id;
329: ota_tav_shd.g_old_rec.developer_organization_id;
330: End If;
331: If (p_rec.controlling_person_id = hr_api.g_number) then
332: p_rec.controlling_person_id :=
333: ota_tav_shd.g_old_rec.controlling_person_id;
334: End If;
335: If (p_rec.version_name = hr_api.g_varchar2) then
336: p_rec.version_name :=
337: ota_tav_shd.g_old_rec.version_name;
333: ota_tav_shd.g_old_rec.controlling_person_id;
334: End If;
335: If (p_rec.version_name = hr_api.g_varchar2) then
336: p_rec.version_name :=
337: ota_tav_shd.g_old_rec.version_name;
338: End If;
339: If (p_rec.comments = hr_api.g_varchar2) then
340: p_rec.comments :=
341: ota_tav_shd.g_old_rec.comments;
337: ota_tav_shd.g_old_rec.version_name;
338: End If;
339: If (p_rec.comments = hr_api.g_varchar2) then
340: p_rec.comments :=
341: ota_tav_shd.g_old_rec.comments;
342: End If;
343: If (p_rec.description = hr_api.g_varchar2) then
344: p_rec.description :=
345: ota_tav_shd.g_old_rec.description;
341: ota_tav_shd.g_old_rec.comments;
342: End If;
343: If (p_rec.description = hr_api.g_varchar2) then
344: p_rec.description :=
345: ota_tav_shd.g_old_rec.description;
346: End If;
347: If (p_rec.duration = hr_api.g_number) then
348: p_rec.duration :=
349: ota_tav_shd.g_old_rec.duration;
345: ota_tav_shd.g_old_rec.description;
346: End If;
347: If (p_rec.duration = hr_api.g_number) then
348: p_rec.duration :=
349: ota_tav_shd.g_old_rec.duration;
350: End If;
351: If (p_rec.duration_units = hr_api.g_varchar2) then
352: p_rec.duration_units :=
353: ota_tav_shd.g_old_rec.duration_units;
349: ota_tav_shd.g_old_rec.duration;
350: End If;
351: If (p_rec.duration_units = hr_api.g_varchar2) then
352: p_rec.duration_units :=
353: ota_tav_shd.g_old_rec.duration_units;
354: End If;
355: If (p_rec.end_date = hr_api.g_date) then
356: p_rec.end_date :=
357: ota_tav_shd.g_old_rec.end_date;
353: ota_tav_shd.g_old_rec.duration_units;
354: End If;
355: If (p_rec.end_date = hr_api.g_date) then
356: p_rec.end_date :=
357: ota_tav_shd.g_old_rec.end_date;
358: End If;
359: If (p_rec.intended_audience = hr_api.g_varchar2) then
360: p_rec.intended_audience :=
361: ota_tav_shd.g_old_rec.intended_audience;
357: ota_tav_shd.g_old_rec.end_date;
358: End If;
359: If (p_rec.intended_audience = hr_api.g_varchar2) then
360: p_rec.intended_audience :=
361: ota_tav_shd.g_old_rec.intended_audience;
362: End If;
363: If (p_rec.language_id = hr_api.g_number) then
364: p_rec.language_id :=
365: ota_tav_shd.g_old_rec.language_id;
361: ota_tav_shd.g_old_rec.intended_audience;
362: End If;
363: If (p_rec.language_id = hr_api.g_number) then
364: p_rec.language_id :=
365: ota_tav_shd.g_old_rec.language_id;
366: End If;
367: If (p_rec.maximum_attendees = hr_api.g_number) then
368: p_rec.maximum_attendees :=
369: ota_tav_shd.g_old_rec.maximum_attendees;
365: ota_tav_shd.g_old_rec.language_id;
366: End If;
367: If (p_rec.maximum_attendees = hr_api.g_number) then
368: p_rec.maximum_attendees :=
369: ota_tav_shd.g_old_rec.maximum_attendees;
370: End If;
371: If (p_rec.minimum_attendees = hr_api.g_number) then
372: p_rec.minimum_attendees :=
373: ota_tav_shd.g_old_rec.minimum_attendees;
369: ota_tav_shd.g_old_rec.maximum_attendees;
370: End If;
371: If (p_rec.minimum_attendees = hr_api.g_number) then
372: p_rec.minimum_attendees :=
373: ota_tav_shd.g_old_rec.minimum_attendees;
374: End If;
375: If (p_rec.objectives = hr_api.g_varchar2) then
376: p_rec.objectives :=
377: ota_tav_shd.g_old_rec.objectives;
373: ota_tav_shd.g_old_rec.minimum_attendees;
374: End If;
375: If (p_rec.objectives = hr_api.g_varchar2) then
376: p_rec.objectives :=
377: ota_tav_shd.g_old_rec.objectives;
378: End If;
379: If (p_rec.start_date = hr_api.g_date) then
380: p_rec.start_date :=
381: ota_tav_shd.g_old_rec.start_date;
377: ota_tav_shd.g_old_rec.objectives;
378: End If;
379: If (p_rec.start_date = hr_api.g_date) then
380: p_rec.start_date :=
381: ota_tav_shd.g_old_rec.start_date;
382: End If;
383: If (p_rec.success_criteria = hr_api.g_varchar2) then
384: p_rec.success_criteria :=
385: ota_tav_shd.g_old_rec.success_criteria;
381: ota_tav_shd.g_old_rec.start_date;
382: End If;
383: If (p_rec.success_criteria = hr_api.g_varchar2) then
384: p_rec.success_criteria :=
385: ota_tav_shd.g_old_rec.success_criteria;
386: End If;
387: If (p_rec.user_status = hr_api.g_varchar2) then
388: p_rec.user_status :=
389: ota_tav_shd.g_old_rec.user_status;
385: ota_tav_shd.g_old_rec.success_criteria;
386: End If;
387: If (p_rec.user_status = hr_api.g_varchar2) then
388: p_rec.user_status :=
389: ota_tav_shd.g_old_rec.user_status;
390: End If;
391: If (p_rec.vendor_id = hr_api.g_number) then
392: p_rec.vendor_id :=
393: ota_tav_shd.g_old_rec.vendor_id;
389: ota_tav_shd.g_old_rec.user_status;
390: End If;
391: If (p_rec.vendor_id = hr_api.g_number) then
392: p_rec.vendor_id :=
393: ota_tav_shd.g_old_rec.vendor_id;
394: End If;
395: If (p_rec.actual_cost = hr_api.g_number) then
396: p_rec.actual_cost :=
397: ota_tav_shd.g_old_rec.actual_cost;
393: ota_tav_shd.g_old_rec.vendor_id;
394: End If;
395: If (p_rec.actual_cost = hr_api.g_number) then
396: p_rec.actual_cost :=
397: ota_tav_shd.g_old_rec.actual_cost;
398: End If;
399: If (p_rec.budget_cost = hr_api.g_number) then
400: p_rec.budget_cost :=
401: ota_tav_shd.g_old_rec.budget_cost;
397: ota_tav_shd.g_old_rec.actual_cost;
398: End If;
399: If (p_rec.budget_cost = hr_api.g_number) then
400: p_rec.budget_cost :=
401: ota_tav_shd.g_old_rec.budget_cost;
402: End If;
403: If (p_rec.budget_currency_code = hr_api.g_varchar2) then
404: p_rec.budget_currency_code :=
405: ota_tav_shd.g_old_rec.budget_currency_code;
401: ota_tav_shd.g_old_rec.budget_cost;
402: End If;
403: If (p_rec.budget_currency_code = hr_api.g_varchar2) then
404: p_rec.budget_currency_code :=
405: ota_tav_shd.g_old_rec.budget_currency_code;
406: End If;
407: If (p_rec.expenses_allowed = hr_api.g_varchar2) then
408: p_rec.expenses_allowed :=
409: ota_tav_shd.g_old_rec.expenses_allowed;
405: ota_tav_shd.g_old_rec.budget_currency_code;
406: End If;
407: If (p_rec.expenses_allowed = hr_api.g_varchar2) then
408: p_rec.expenses_allowed :=
409: ota_tav_shd.g_old_rec.expenses_allowed;
410: End If;
411: If (p_rec.professional_credit_type = hr_api.g_varchar2) then
412: p_rec.professional_credit_type :=
413: ota_tav_shd.g_old_rec.professional_credit_type;
409: ota_tav_shd.g_old_rec.expenses_allowed;
410: End If;
411: If (p_rec.professional_credit_type = hr_api.g_varchar2) then
412: p_rec.professional_credit_type :=
413: ota_tav_shd.g_old_rec.professional_credit_type;
414: End If;
415: If (p_rec.professional_credits = hr_api.g_number) then
416: p_rec.professional_credits :=
417: ota_tav_shd.g_old_rec.professional_credits;
413: ota_tav_shd.g_old_rec.professional_credit_type;
414: End If;
415: If (p_rec.professional_credits = hr_api.g_number) then
416: p_rec.professional_credits :=
417: ota_tav_shd.g_old_rec.professional_credits;
418: End If;
419: If (p_rec.maximum_internal_attendees = hr_api.g_number) then
420: p_rec.maximum_internal_attendees :=
421: ota_tav_shd.g_old_rec.maximum_internal_attendees;
417: ota_tav_shd.g_old_rec.professional_credits;
418: End If;
419: If (p_rec.maximum_internal_attendees = hr_api.g_number) then
420: p_rec.maximum_internal_attendees :=
421: ota_tav_shd.g_old_rec.maximum_internal_attendees;
422: End If;
423: If (p_rec.tav_information_category = hr_api.g_varchar2) then
424: p_rec.tav_information_category :=
425: ota_tav_shd.g_old_rec.tav_information_category;
421: ota_tav_shd.g_old_rec.maximum_internal_attendees;
422: End If;
423: If (p_rec.tav_information_category = hr_api.g_varchar2) then
424: p_rec.tav_information_category :=
425: ota_tav_shd.g_old_rec.tav_information_category;
426: End If;
427: If (p_rec.tav_information1 = hr_api.g_varchar2) then
428: p_rec.tav_information1 :=
429: ota_tav_shd.g_old_rec.tav_information1;
425: ota_tav_shd.g_old_rec.tav_information_category;
426: End If;
427: If (p_rec.tav_information1 = hr_api.g_varchar2) then
428: p_rec.tav_information1 :=
429: ota_tav_shd.g_old_rec.tav_information1;
430: End If;
431: If (p_rec.tav_information2 = hr_api.g_varchar2) then
432: p_rec.tav_information2 :=
433: ota_tav_shd.g_old_rec.tav_information2;
429: ota_tav_shd.g_old_rec.tav_information1;
430: End If;
431: If (p_rec.tav_information2 = hr_api.g_varchar2) then
432: p_rec.tav_information2 :=
433: ota_tav_shd.g_old_rec.tav_information2;
434: End If;
435: If (p_rec.tav_information3 = hr_api.g_varchar2) then
436: p_rec.tav_information3 :=
437: ota_tav_shd.g_old_rec.tav_information3;
433: ota_tav_shd.g_old_rec.tav_information2;
434: End If;
435: If (p_rec.tav_information3 = hr_api.g_varchar2) then
436: p_rec.tav_information3 :=
437: ota_tav_shd.g_old_rec.tav_information3;
438: End If;
439: If (p_rec.tav_information4 = hr_api.g_varchar2) then
440: p_rec.tav_information4 :=
441: ota_tav_shd.g_old_rec.tav_information4;
437: ota_tav_shd.g_old_rec.tav_information3;
438: End If;
439: If (p_rec.tav_information4 = hr_api.g_varchar2) then
440: p_rec.tav_information4 :=
441: ota_tav_shd.g_old_rec.tav_information4;
442: End If;
443: If (p_rec.tav_information5 = hr_api.g_varchar2) then
444: p_rec.tav_information5 :=
445: ota_tav_shd.g_old_rec.tav_information5;
441: ota_tav_shd.g_old_rec.tav_information4;
442: End If;
443: If (p_rec.tav_information5 = hr_api.g_varchar2) then
444: p_rec.tav_information5 :=
445: ota_tav_shd.g_old_rec.tav_information5;
446: End If;
447: If (p_rec.tav_information6 = hr_api.g_varchar2) then
448: p_rec.tav_information6 :=
449: ota_tav_shd.g_old_rec.tav_information6;
445: ota_tav_shd.g_old_rec.tav_information5;
446: End If;
447: If (p_rec.tav_information6 = hr_api.g_varchar2) then
448: p_rec.tav_information6 :=
449: ota_tav_shd.g_old_rec.tav_information6;
450: End If;
451: If (p_rec.tav_information7 = hr_api.g_varchar2) then
452: p_rec.tav_information7 :=
453: ota_tav_shd.g_old_rec.tav_information7;
449: ota_tav_shd.g_old_rec.tav_information6;
450: End If;
451: If (p_rec.tav_information7 = hr_api.g_varchar2) then
452: p_rec.tav_information7 :=
453: ota_tav_shd.g_old_rec.tav_information7;
454: End If;
455: If (p_rec.tav_information8 = hr_api.g_varchar2) then
456: p_rec.tav_information8 :=
457: ota_tav_shd.g_old_rec.tav_information8;
453: ota_tav_shd.g_old_rec.tav_information7;
454: End If;
455: If (p_rec.tav_information8 = hr_api.g_varchar2) then
456: p_rec.tav_information8 :=
457: ota_tav_shd.g_old_rec.tav_information8;
458: End If;
459: If (p_rec.tav_information9 = hr_api.g_varchar2) then
460: p_rec.tav_information9 :=
461: ota_tav_shd.g_old_rec.tav_information9;
457: ota_tav_shd.g_old_rec.tav_information8;
458: End If;
459: If (p_rec.tav_information9 = hr_api.g_varchar2) then
460: p_rec.tav_information9 :=
461: ota_tav_shd.g_old_rec.tav_information9;
462: End If;
463: If (p_rec.tav_information10 = hr_api.g_varchar2) then
464: p_rec.tav_information10 :=
465: ota_tav_shd.g_old_rec.tav_information10;
461: ota_tav_shd.g_old_rec.tav_information9;
462: End If;
463: If (p_rec.tav_information10 = hr_api.g_varchar2) then
464: p_rec.tav_information10 :=
465: ota_tav_shd.g_old_rec.tav_information10;
466: End If;
467: If (p_rec.tav_information11 = hr_api.g_varchar2) then
468: p_rec.tav_information11 :=
469: ota_tav_shd.g_old_rec.tav_information11;
465: ota_tav_shd.g_old_rec.tav_information10;
466: End If;
467: If (p_rec.tav_information11 = hr_api.g_varchar2) then
468: p_rec.tav_information11 :=
469: ota_tav_shd.g_old_rec.tav_information11;
470: End If;
471: If (p_rec.tav_information12 = hr_api.g_varchar2) then
472: p_rec.tav_information12 :=
473: ota_tav_shd.g_old_rec.tav_information12;
469: ota_tav_shd.g_old_rec.tav_information11;
470: End If;
471: If (p_rec.tav_information12 = hr_api.g_varchar2) then
472: p_rec.tav_information12 :=
473: ota_tav_shd.g_old_rec.tav_information12;
474: End If;
475: If (p_rec.tav_information13 = hr_api.g_varchar2) then
476: p_rec.tav_information13 :=
477: ota_tav_shd.g_old_rec.tav_information13;
473: ota_tav_shd.g_old_rec.tav_information12;
474: End If;
475: If (p_rec.tav_information13 = hr_api.g_varchar2) then
476: p_rec.tav_information13 :=
477: ota_tav_shd.g_old_rec.tav_information13;
478: End If;
479: If (p_rec.tav_information14 = hr_api.g_varchar2) then
480: p_rec.tav_information14 :=
481: ota_tav_shd.g_old_rec.tav_information14;
477: ota_tav_shd.g_old_rec.tav_information13;
478: End If;
479: If (p_rec.tav_information14 = hr_api.g_varchar2) then
480: p_rec.tav_information14 :=
481: ota_tav_shd.g_old_rec.tav_information14;
482: End If;
483: If (p_rec.tav_information15 = hr_api.g_varchar2) then
484: p_rec.tav_information15 :=
485: ota_tav_shd.g_old_rec.tav_information15;
481: ota_tav_shd.g_old_rec.tav_information14;
482: End If;
483: If (p_rec.tav_information15 = hr_api.g_varchar2) then
484: p_rec.tav_information15 :=
485: ota_tav_shd.g_old_rec.tav_information15;
486: End If;
487: If (p_rec.tav_information16 = hr_api.g_varchar2) then
488: p_rec.tav_information16 :=
489: ota_tav_shd.g_old_rec.tav_information16;
485: ota_tav_shd.g_old_rec.tav_information15;
486: End If;
487: If (p_rec.tav_information16 = hr_api.g_varchar2) then
488: p_rec.tav_information16 :=
489: ota_tav_shd.g_old_rec.tav_information16;
490: End If;
491: If (p_rec.tav_information17 = hr_api.g_varchar2) then
492: p_rec.tav_information17 :=
493: ota_tav_shd.g_old_rec.tav_information17;
489: ota_tav_shd.g_old_rec.tav_information16;
490: End If;
491: If (p_rec.tav_information17 = hr_api.g_varchar2) then
492: p_rec.tav_information17 :=
493: ota_tav_shd.g_old_rec.tav_information17;
494: End If;
495: If (p_rec.tav_information18 = hr_api.g_varchar2) then
496: p_rec.tav_information18 :=
497: ota_tav_shd.g_old_rec.tav_information18;
493: ota_tav_shd.g_old_rec.tav_information17;
494: End If;
495: If (p_rec.tav_information18 = hr_api.g_varchar2) then
496: p_rec.tav_information18 :=
497: ota_tav_shd.g_old_rec.tav_information18;
498: End If;
499: If (p_rec.tav_information19 = hr_api.g_varchar2) then
500: p_rec.tav_information19 :=
501: ota_tav_shd.g_old_rec.tav_information19;
497: ota_tav_shd.g_old_rec.tav_information18;
498: End If;
499: If (p_rec.tav_information19 = hr_api.g_varchar2) then
500: p_rec.tav_information19 :=
501: ota_tav_shd.g_old_rec.tav_information19;
502: End If;
503: If (p_rec.tav_information20 = hr_api.g_varchar2) then
504: p_rec.tav_information20 :=
505: ota_tav_shd.g_old_rec.tav_information20;
501: ota_tav_shd.g_old_rec.tav_information19;
502: End If;
503: If (p_rec.tav_information20 = hr_api.g_varchar2) then
504: p_rec.tav_information20 :=
505: ota_tav_shd.g_old_rec.tav_information20;
506: End If;
507: If (p_rec.inventory_item_id = hr_api.g_number) then
508: p_rec.inventory_item_id :=
509: ota_tav_shd.g_old_rec.inventory_item_id;
505: ota_tav_shd.g_old_rec.tav_information20;
506: End If;
507: If (p_rec.inventory_item_id = hr_api.g_number) then
508: p_rec.inventory_item_id :=
509: ota_tav_shd.g_old_rec.inventory_item_id;
510: End If;
511: If (p_rec.organization_id = hr_api.g_number) then
512: p_rec.organization_id :=
513: ota_tav_shd.g_old_rec.organization_id;
509: ota_tav_shd.g_old_rec.inventory_item_id;
510: End If;
511: If (p_rec.organization_id = hr_api.g_number) then
512: p_rec.organization_id :=
513: ota_tav_shd.g_old_rec.organization_id;
514: End If;
515: If (p_rec.rco_id = hr_api.g_number) then
516: p_rec.rco_id :=
517: ota_tav_shd.g_old_rec.rco_id;
513: ota_tav_shd.g_old_rec.organization_id;
514: End If;
515: If (p_rec.rco_id = hr_api.g_number) then
516: p_rec.rco_id :=
517: ota_tav_shd.g_old_rec.rco_id;
518: End If;
519: If (p_rec.version_code = hr_api.g_varchar2) then
520: p_rec.version_code :=
521: ota_tav_shd.g_old_rec.version_code;
517: ota_tav_shd.g_old_rec.rco_id;
518: End If;
519: If (p_rec.version_code = hr_api.g_varchar2) then
520: p_rec.version_code :=
521: ota_tav_shd.g_old_rec.version_code;
522: End If;
523: If (p_rec.business_group_id = hr_api.g_number) then
524: p_rec.business_group_id :=
525: ota_tav_shd.g_old_rec.business_group_id;
521: ota_tav_shd.g_old_rec.version_code;
522: End If;
523: If (p_rec.business_group_id = hr_api.g_number) then
524: p_rec.business_group_id :=
525: ota_tav_shd.g_old_rec.business_group_id;
526: End If;
527: If (p_rec.data_source = hr_api.g_varchar2) then
528: p_rec.data_source :=
529: ota_tav_shd.g_old_rec.data_source;
525: ota_tav_shd.g_old_rec.business_group_id;
526: End If;
527: If (p_rec.data_source = hr_api.g_varchar2) then
528: p_rec.data_source :=
529: ota_tav_shd.g_old_rec.data_source;
530: End If;
531: If (p_rec.competency_update_level = hr_api.g_varchar2) then
532: p_rec.competency_update_level :=
533: ota_tav_shd.g_old_rec.competency_update_level;
529: ota_tav_shd.g_old_rec.data_source;
530: End If;
531: If (p_rec.competency_update_level = hr_api.g_varchar2) then
532: p_rec.competency_update_level :=
533: ota_tav_shd.g_old_rec.competency_update_level;
534: End If;
535: If (p_rec.eres_enabled = hr_api.g_varchar2) then
536: p_rec.eres_enabled :=
537: ota_tav_shd.g_old_rec.eres_enabled;
533: ota_tav_shd.g_old_rec.competency_update_level;
534: End If;
535: If (p_rec.eres_enabled = hr_api.g_varchar2) then
536: p_rec.eres_enabled :=
537: ota_tav_shd.g_old_rec.eres_enabled;
538: End If;
539: --
540: -- Return the plsql record structure.
541: --
548: -- |---------------------------------< upd >----------------------------------|
549: -- ----------------------------------------------------------------------------
550: Procedure upd
551: (
552: p_rec in out nocopy ota_tav_shd.g_rec_type,
553: p_validate in boolean
554: ) is
555: --
556: l_proc varchar2(72) := g_package||'upd';
568: End If;
569: --
570: -- We must lock the row which we need to update.
571: --
572: ota_tav_shd.lck
573: (
574: p_rec.activity_version_id,
575: p_rec.object_version_number
576: );
683: p_eres_enabled in varchar2
684:
685: ) is
686: --
687: l_rec ota_tav_shd.g_rec_type;
688: l_proc varchar2(72) := g_package||'upd';
689: --
690: Begin
691: hr_utility.set_location('Entering:'||l_proc, 5);
693: -- Call conversion function to turn arguments into the
694: -- l_rec structure.
695: --
696: l_rec :=
697: ota_tav_shd.convert_args
698: (
699: p_activity_version_id,
700: p_activity_id,
701: p_superseded_by_act_version_id,