51: --
52: -- {End Of Comments}
53: -- ----------------------------------------------------------------------------
54: Procedure update_dml
55: (p_rec in out nocopy per_evt_shd.g_rec_type
56: ) is
57: --
58: l_proc varchar2(72) := g_package||'update_dml';
59: --
63: -- Increment the object version
64: p_rec.object_version_number := p_rec.object_version_number + 1;
65: --
66:
67: per_evt_shd.g_api_dml := true; -- Set the api dml status
68: --
69: -- Update the per_events Row
70: --
71: update per_events
114: ,party_id = p_rec.party_id
115: ,object_version_number = p_rec.object_version_number
116: where event_id = p_rec.event_id;
117: --
118: per_evt_shd.g_api_dml := false; -- Unset the api dml status
119: --
120: hr_utility.set_location(' Leaving:'||l_proc, 20);
121: --
122: Exception
121: --
122: Exception
123: When hr_api.check_integrity_violated Then
124: -- A check constraint has been violated
125: per_evt_shd.g_api_dml := false; -- Unset the api dml status
126: per_evt_shd.constraint_error
127: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
128: When hr_api.parent_integrity_violated Then
129: -- Parent integrity has been violated
122: Exception
123: When hr_api.check_integrity_violated Then
124: -- A check constraint has been violated
125: per_evt_shd.g_api_dml := false; -- Unset the api dml status
126: per_evt_shd.constraint_error
127: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
128: When hr_api.parent_integrity_violated Then
129: -- Parent integrity has been violated
130: per_evt_shd.g_api_dml := false; -- Unset the api dml status
126: per_evt_shd.constraint_error
127: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
128: When hr_api.parent_integrity_violated Then
129: -- Parent integrity has been violated
130: per_evt_shd.g_api_dml := false; -- Unset the api dml status
131: per_evt_shd.constraint_error
132: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
133: When hr_api.unique_integrity_violated Then
134: -- Unique integrity has been violated
127: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
128: When hr_api.parent_integrity_violated Then
129: -- Parent integrity has been violated
130: per_evt_shd.g_api_dml := false; -- Unset the api dml status
131: per_evt_shd.constraint_error
132: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
133: When hr_api.unique_integrity_violated Then
134: -- Unique integrity has been violated
135: per_evt_shd.g_api_dml := false; -- Unset the api dml status
131: per_evt_shd.constraint_error
132: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
133: When hr_api.unique_integrity_violated Then
134: -- Unique integrity has been violated
135: per_evt_shd.g_api_dml := false; -- Unset the api dml status
136: per_evt_shd.constraint_error
137: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
138: When Others Then
139: per_evt_shd.g_api_dml := false; -- Unset the api dml status
132: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
133: When hr_api.unique_integrity_violated Then
134: -- Unique integrity has been violated
135: per_evt_shd.g_api_dml := false; -- Unset the api dml status
136: per_evt_shd.constraint_error
137: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
138: When Others Then
139: per_evt_shd.g_api_dml := false; -- Unset the api dml status
140: Raise;
135: per_evt_shd.g_api_dml := false; -- Unset the api dml status
136: per_evt_shd.constraint_error
137: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
138: When Others Then
139: per_evt_shd.g_api_dml := false; -- Unset the api dml status
140: Raise;
141: End update_dml;
142: --
143: -- ----------------------------------------------------------------------------
172: --
173: -- {End Of Comments}
174: -- ----------------------------------------------------------------------------
175: Procedure pre_update
176: (p_rec in per_evt_shd.g_rec_type
177: ) is
178: --
179: l_proc varchar2(72) := g_package||'pre_update';
180: --
216: --
217: -- {End Of Comments}
218: -- ----------------------------------------------------------------------------
219: Procedure post_update
220: (p_rec in per_evt_shd.g_rec_type
221: ) is
222: --
223: l_proc varchar2(72) := g_package||'post_update';
224: --
311: => p_rec.party_id
312: ,p_object_version_number
313: => p_rec.object_version_number
314: ,p_location_id_o
315: => per_evt_shd.g_old_rec.location_id
316: ,p_internal_contact_person_id_o
317: => per_evt_shd.g_old_rec.internal_contact_person_id
318: ,p_organization_run_by_id_o
319: => per_evt_shd.g_old_rec.organization_run_by_id
313: => p_rec.object_version_number
314: ,p_location_id_o
315: => per_evt_shd.g_old_rec.location_id
316: ,p_internal_contact_person_id_o
317: => per_evt_shd.g_old_rec.internal_contact_person_id
318: ,p_organization_run_by_id_o
319: => per_evt_shd.g_old_rec.organization_run_by_id
320: ,p_assignment_id_o
321: => per_evt_shd.g_old_rec.assignment_id
315: => per_evt_shd.g_old_rec.location_id
316: ,p_internal_contact_person_id_o
317: => per_evt_shd.g_old_rec.internal_contact_person_id
318: ,p_organization_run_by_id_o
319: => per_evt_shd.g_old_rec.organization_run_by_id
320: ,p_assignment_id_o
321: => per_evt_shd.g_old_rec.assignment_id
322: ,p_date_start_o
323: => per_evt_shd.g_old_rec.date_start
317: => per_evt_shd.g_old_rec.internal_contact_person_id
318: ,p_organization_run_by_id_o
319: => per_evt_shd.g_old_rec.organization_run_by_id
320: ,p_assignment_id_o
321: => per_evt_shd.g_old_rec.assignment_id
322: ,p_date_start_o
323: => per_evt_shd.g_old_rec.date_start
324: ,p_type_o
325: => per_evt_shd.g_old_rec.type
319: => per_evt_shd.g_old_rec.organization_run_by_id
320: ,p_assignment_id_o
321: => per_evt_shd.g_old_rec.assignment_id
322: ,p_date_start_o
323: => per_evt_shd.g_old_rec.date_start
324: ,p_type_o
325: => per_evt_shd.g_old_rec.type
326: ,p_comments_o
327: => per_evt_shd.g_old_rec.comments
321: => per_evt_shd.g_old_rec.assignment_id
322: ,p_date_start_o
323: => per_evt_shd.g_old_rec.date_start
324: ,p_type_o
325: => per_evt_shd.g_old_rec.type
326: ,p_comments_o
327: => per_evt_shd.g_old_rec.comments
328: ,p_contact_telephone_number_o
329: => per_evt_shd.g_old_rec.contact_telephone_number
323: => per_evt_shd.g_old_rec.date_start
324: ,p_type_o
325: => per_evt_shd.g_old_rec.type
326: ,p_comments_o
327: => per_evt_shd.g_old_rec.comments
328: ,p_contact_telephone_number_o
329: => per_evt_shd.g_old_rec.contact_telephone_number
330: ,p_date_end_o
331: => per_evt_shd.g_old_rec.date_end
325: => per_evt_shd.g_old_rec.type
326: ,p_comments_o
327: => per_evt_shd.g_old_rec.comments
328: ,p_contact_telephone_number_o
329: => per_evt_shd.g_old_rec.contact_telephone_number
330: ,p_date_end_o
331: => per_evt_shd.g_old_rec.date_end
332: ,p_emp_or_apl_o
333: => per_evt_shd.g_old_rec.emp_or_apl
327: => per_evt_shd.g_old_rec.comments
328: ,p_contact_telephone_number_o
329: => per_evt_shd.g_old_rec.contact_telephone_number
330: ,p_date_end_o
331: => per_evt_shd.g_old_rec.date_end
332: ,p_emp_or_apl_o
333: => per_evt_shd.g_old_rec.emp_or_apl
334: ,p_event_or_interview_o
335: => per_evt_shd.g_old_rec.event_or_interview
329: => per_evt_shd.g_old_rec.contact_telephone_number
330: ,p_date_end_o
331: => per_evt_shd.g_old_rec.date_end
332: ,p_emp_or_apl_o
333: => per_evt_shd.g_old_rec.emp_or_apl
334: ,p_event_or_interview_o
335: => per_evt_shd.g_old_rec.event_or_interview
336: ,p_external_contact_o
337: => per_evt_shd.g_old_rec.external_contact
331: => per_evt_shd.g_old_rec.date_end
332: ,p_emp_or_apl_o
333: => per_evt_shd.g_old_rec.emp_or_apl
334: ,p_event_or_interview_o
335: => per_evt_shd.g_old_rec.event_or_interview
336: ,p_external_contact_o
337: => per_evt_shd.g_old_rec.external_contact
338: ,p_time_end_o
339: => per_evt_shd.g_old_rec.time_end
333: => per_evt_shd.g_old_rec.emp_or_apl
334: ,p_event_or_interview_o
335: => per_evt_shd.g_old_rec.event_or_interview
336: ,p_external_contact_o
337: => per_evt_shd.g_old_rec.external_contact
338: ,p_time_end_o
339: => per_evt_shd.g_old_rec.time_end
340: ,p_time_start_o
341: => per_evt_shd.g_old_rec.time_start
335: => per_evt_shd.g_old_rec.event_or_interview
336: ,p_external_contact_o
337: => per_evt_shd.g_old_rec.external_contact
338: ,p_time_end_o
339: => per_evt_shd.g_old_rec.time_end
340: ,p_time_start_o
341: => per_evt_shd.g_old_rec.time_start
342: ,p_request_id_o
343: => per_evt_shd.g_old_rec.request_id
337: => per_evt_shd.g_old_rec.external_contact
338: ,p_time_end_o
339: => per_evt_shd.g_old_rec.time_end
340: ,p_time_start_o
341: => per_evt_shd.g_old_rec.time_start
342: ,p_request_id_o
343: => per_evt_shd.g_old_rec.request_id
344: ,p_program_application_id_o
345: => per_evt_shd.g_old_rec.program_application_id
339: => per_evt_shd.g_old_rec.time_end
340: ,p_time_start_o
341: => per_evt_shd.g_old_rec.time_start
342: ,p_request_id_o
343: => per_evt_shd.g_old_rec.request_id
344: ,p_program_application_id_o
345: => per_evt_shd.g_old_rec.program_application_id
346: ,p_program_id_o
347: => per_evt_shd.g_old_rec.program_id
341: => per_evt_shd.g_old_rec.time_start
342: ,p_request_id_o
343: => per_evt_shd.g_old_rec.request_id
344: ,p_program_application_id_o
345: => per_evt_shd.g_old_rec.program_application_id
346: ,p_program_id_o
347: => per_evt_shd.g_old_rec.program_id
348: ,p_program_update_date_o
349: => per_evt_shd.g_old_rec.program_update_date
343: => per_evt_shd.g_old_rec.request_id
344: ,p_program_application_id_o
345: => per_evt_shd.g_old_rec.program_application_id
346: ,p_program_id_o
347: => per_evt_shd.g_old_rec.program_id
348: ,p_program_update_date_o
349: => per_evt_shd.g_old_rec.program_update_date
350: ,p_attribute_category_o
351: => per_evt_shd.g_old_rec.attribute_category
345: => per_evt_shd.g_old_rec.program_application_id
346: ,p_program_id_o
347: => per_evt_shd.g_old_rec.program_id
348: ,p_program_update_date_o
349: => per_evt_shd.g_old_rec.program_update_date
350: ,p_attribute_category_o
351: => per_evt_shd.g_old_rec.attribute_category
352: ,p_attribute1_o
353: => per_evt_shd.g_old_rec.attribute1
347: => per_evt_shd.g_old_rec.program_id
348: ,p_program_update_date_o
349: => per_evt_shd.g_old_rec.program_update_date
350: ,p_attribute_category_o
351: => per_evt_shd.g_old_rec.attribute_category
352: ,p_attribute1_o
353: => per_evt_shd.g_old_rec.attribute1
354: ,p_attribute2_o
355: => per_evt_shd.g_old_rec.attribute2
349: => per_evt_shd.g_old_rec.program_update_date
350: ,p_attribute_category_o
351: => per_evt_shd.g_old_rec.attribute_category
352: ,p_attribute1_o
353: => per_evt_shd.g_old_rec.attribute1
354: ,p_attribute2_o
355: => per_evt_shd.g_old_rec.attribute2
356: ,p_attribute3_o
357: => per_evt_shd.g_old_rec.attribute3
351: => per_evt_shd.g_old_rec.attribute_category
352: ,p_attribute1_o
353: => per_evt_shd.g_old_rec.attribute1
354: ,p_attribute2_o
355: => per_evt_shd.g_old_rec.attribute2
356: ,p_attribute3_o
357: => per_evt_shd.g_old_rec.attribute3
358: ,p_attribute4_o
359: => per_evt_shd.g_old_rec.attribute4
353: => per_evt_shd.g_old_rec.attribute1
354: ,p_attribute2_o
355: => per_evt_shd.g_old_rec.attribute2
356: ,p_attribute3_o
357: => per_evt_shd.g_old_rec.attribute3
358: ,p_attribute4_o
359: => per_evt_shd.g_old_rec.attribute4
360: ,p_attribute5_o
361: => per_evt_shd.g_old_rec.attribute5
355: => per_evt_shd.g_old_rec.attribute2
356: ,p_attribute3_o
357: => per_evt_shd.g_old_rec.attribute3
358: ,p_attribute4_o
359: => per_evt_shd.g_old_rec.attribute4
360: ,p_attribute5_o
361: => per_evt_shd.g_old_rec.attribute5
362: ,p_attribute6_o
363: => per_evt_shd.g_old_rec.attribute6
357: => per_evt_shd.g_old_rec.attribute3
358: ,p_attribute4_o
359: => per_evt_shd.g_old_rec.attribute4
360: ,p_attribute5_o
361: => per_evt_shd.g_old_rec.attribute5
362: ,p_attribute6_o
363: => per_evt_shd.g_old_rec.attribute6
364: ,p_attribute7_o
365: => per_evt_shd.g_old_rec.attribute7
359: => per_evt_shd.g_old_rec.attribute4
360: ,p_attribute5_o
361: => per_evt_shd.g_old_rec.attribute5
362: ,p_attribute6_o
363: => per_evt_shd.g_old_rec.attribute6
364: ,p_attribute7_o
365: => per_evt_shd.g_old_rec.attribute7
366: ,p_attribute8_o
367: => per_evt_shd.g_old_rec.attribute8
361: => per_evt_shd.g_old_rec.attribute5
362: ,p_attribute6_o
363: => per_evt_shd.g_old_rec.attribute6
364: ,p_attribute7_o
365: => per_evt_shd.g_old_rec.attribute7
366: ,p_attribute8_o
367: => per_evt_shd.g_old_rec.attribute8
368: ,p_attribute9_o
369: => per_evt_shd.g_old_rec.attribute9
363: => per_evt_shd.g_old_rec.attribute6
364: ,p_attribute7_o
365: => per_evt_shd.g_old_rec.attribute7
366: ,p_attribute8_o
367: => per_evt_shd.g_old_rec.attribute8
368: ,p_attribute9_o
369: => per_evt_shd.g_old_rec.attribute9
370: ,p_attribute10_o
371: => per_evt_shd.g_old_rec.attribute10
365: => per_evt_shd.g_old_rec.attribute7
366: ,p_attribute8_o
367: => per_evt_shd.g_old_rec.attribute8
368: ,p_attribute9_o
369: => per_evt_shd.g_old_rec.attribute9
370: ,p_attribute10_o
371: => per_evt_shd.g_old_rec.attribute10
372: ,p_attribute11_o
373: => per_evt_shd.g_old_rec.attribute11
367: => per_evt_shd.g_old_rec.attribute8
368: ,p_attribute9_o
369: => per_evt_shd.g_old_rec.attribute9
370: ,p_attribute10_o
371: => per_evt_shd.g_old_rec.attribute10
372: ,p_attribute11_o
373: => per_evt_shd.g_old_rec.attribute11
374: ,p_attribute12_o
375: => per_evt_shd.g_old_rec.attribute12
369: => per_evt_shd.g_old_rec.attribute9
370: ,p_attribute10_o
371: => per_evt_shd.g_old_rec.attribute10
372: ,p_attribute11_o
373: => per_evt_shd.g_old_rec.attribute11
374: ,p_attribute12_o
375: => per_evt_shd.g_old_rec.attribute12
376: ,p_attribute13_o
377: => per_evt_shd.g_old_rec.attribute13
371: => per_evt_shd.g_old_rec.attribute10
372: ,p_attribute11_o
373: => per_evt_shd.g_old_rec.attribute11
374: ,p_attribute12_o
375: => per_evt_shd.g_old_rec.attribute12
376: ,p_attribute13_o
377: => per_evt_shd.g_old_rec.attribute13
378: ,p_attribute14_o
379: => per_evt_shd.g_old_rec.attribute14
373: => per_evt_shd.g_old_rec.attribute11
374: ,p_attribute12_o
375: => per_evt_shd.g_old_rec.attribute12
376: ,p_attribute13_o
377: => per_evt_shd.g_old_rec.attribute13
378: ,p_attribute14_o
379: => per_evt_shd.g_old_rec.attribute14
380: ,p_attribute15_o
381: => per_evt_shd.g_old_rec.attribute15
375: => per_evt_shd.g_old_rec.attribute12
376: ,p_attribute13_o
377: => per_evt_shd.g_old_rec.attribute13
378: ,p_attribute14_o
379: => per_evt_shd.g_old_rec.attribute14
380: ,p_attribute15_o
381: => per_evt_shd.g_old_rec.attribute15
382: ,p_attribute16_o
383: => per_evt_shd.g_old_rec.attribute16
377: => per_evt_shd.g_old_rec.attribute13
378: ,p_attribute14_o
379: => per_evt_shd.g_old_rec.attribute14
380: ,p_attribute15_o
381: => per_evt_shd.g_old_rec.attribute15
382: ,p_attribute16_o
383: => per_evt_shd.g_old_rec.attribute16
384: ,p_attribute17_o
385: => per_evt_shd.g_old_rec.attribute17
379: => per_evt_shd.g_old_rec.attribute14
380: ,p_attribute15_o
381: => per_evt_shd.g_old_rec.attribute15
382: ,p_attribute16_o
383: => per_evt_shd.g_old_rec.attribute16
384: ,p_attribute17_o
385: => per_evt_shd.g_old_rec.attribute17
386: ,p_attribute18_o
387: => per_evt_shd.g_old_rec.attribute18
381: => per_evt_shd.g_old_rec.attribute15
382: ,p_attribute16_o
383: => per_evt_shd.g_old_rec.attribute16
384: ,p_attribute17_o
385: => per_evt_shd.g_old_rec.attribute17
386: ,p_attribute18_o
387: => per_evt_shd.g_old_rec.attribute18
388: ,p_attribute19_o
389: => per_evt_shd.g_old_rec.attribute19
383: => per_evt_shd.g_old_rec.attribute16
384: ,p_attribute17_o
385: => per_evt_shd.g_old_rec.attribute17
386: ,p_attribute18_o
387: => per_evt_shd.g_old_rec.attribute18
388: ,p_attribute19_o
389: => per_evt_shd.g_old_rec.attribute19
390: ,p_attribute20_o
391: => per_evt_shd.g_old_rec.attribute20
385: => per_evt_shd.g_old_rec.attribute17
386: ,p_attribute18_o
387: => per_evt_shd.g_old_rec.attribute18
388: ,p_attribute19_o
389: => per_evt_shd.g_old_rec.attribute19
390: ,p_attribute20_o
391: => per_evt_shd.g_old_rec.attribute20
392: ,p_party_id_o
393: => per_evt_shd.g_old_rec.party_id
387: => per_evt_shd.g_old_rec.attribute18
388: ,p_attribute19_o
389: => per_evt_shd.g_old_rec.attribute19
390: ,p_attribute20_o
391: => per_evt_shd.g_old_rec.attribute20
392: ,p_party_id_o
393: => per_evt_shd.g_old_rec.party_id
394: ,p_object_version_number_o
395: => per_evt_shd.g_old_rec.object_version_number
389: => per_evt_shd.g_old_rec.attribute19
390: ,p_attribute20_o
391: => per_evt_shd.g_old_rec.attribute20
392: ,p_party_id_o
393: => per_evt_shd.g_old_rec.party_id
394: ,p_object_version_number_o
395: => per_evt_shd.g_old_rec.object_version_number
396: );
397: --
391: => per_evt_shd.g_old_rec.attribute20
392: ,p_party_id_o
393: => per_evt_shd.g_old_rec.party_id
394: ,p_object_version_number_o
395: => per_evt_shd.g_old_rec.object_version_number
396: );
397: --
398: exception
399: --
451: --
452: -- {End Of Comments}
453: -- ----------------------------------------------------------------------------
454: Procedure convert_defs
455: (p_rec in out nocopy per_evt_shd.g_rec_type
456: ) is
457: --
458: Begin
459: --
463: -- is being used then we must set to the 'current' argument value.
464: --
465: If (p_rec.business_group_id = hr_api.g_number) then
466: p_rec.business_group_id :=
467: per_evt_shd.g_old_rec.business_group_id;
468: End If;
469: If (p_rec.location_id = hr_api.g_number) then
470: p_rec.location_id :=
471: per_evt_shd.g_old_rec.location_id;
467: per_evt_shd.g_old_rec.business_group_id;
468: End If;
469: If (p_rec.location_id = hr_api.g_number) then
470: p_rec.location_id :=
471: per_evt_shd.g_old_rec.location_id;
472: End If;
473: If (p_rec.internal_contact_person_id = hr_api.g_number) then
474: p_rec.internal_contact_person_id :=
475: per_evt_shd.g_old_rec.internal_contact_person_id;
471: per_evt_shd.g_old_rec.location_id;
472: End If;
473: If (p_rec.internal_contact_person_id = hr_api.g_number) then
474: p_rec.internal_contact_person_id :=
475: per_evt_shd.g_old_rec.internal_contact_person_id;
476: End If;
477: If (p_rec.organization_run_by_id = hr_api.g_number) then
478: p_rec.organization_run_by_id :=
479: per_evt_shd.g_old_rec.organization_run_by_id;
475: per_evt_shd.g_old_rec.internal_contact_person_id;
476: End If;
477: If (p_rec.organization_run_by_id = hr_api.g_number) then
478: p_rec.organization_run_by_id :=
479: per_evt_shd.g_old_rec.organization_run_by_id;
480: End If;
481: If (p_rec.assignment_id = hr_api.g_number) then
482: p_rec.assignment_id :=
483: per_evt_shd.g_old_rec.assignment_id;
479: per_evt_shd.g_old_rec.organization_run_by_id;
480: End If;
481: If (p_rec.assignment_id = hr_api.g_number) then
482: p_rec.assignment_id :=
483: per_evt_shd.g_old_rec.assignment_id;
484: End If;
485: If (p_rec.date_start = hr_api.g_date) then
486: p_rec.date_start :=
487: per_evt_shd.g_old_rec.date_start;
483: per_evt_shd.g_old_rec.assignment_id;
484: End If;
485: If (p_rec.date_start = hr_api.g_date) then
486: p_rec.date_start :=
487: per_evt_shd.g_old_rec.date_start;
488: End If;
489: If (p_rec.type = hr_api.g_varchar2) then
490: p_rec.type :=
491: per_evt_shd.g_old_rec.type;
487: per_evt_shd.g_old_rec.date_start;
488: End If;
489: If (p_rec.type = hr_api.g_varchar2) then
490: p_rec.type :=
491: per_evt_shd.g_old_rec.type;
492: End If;
493: If (p_rec.comments = hr_api.g_varchar2) then
494: p_rec.comments :=
495: per_evt_shd.g_old_rec.comments;
491: per_evt_shd.g_old_rec.type;
492: End If;
493: If (p_rec.comments = hr_api.g_varchar2) then
494: p_rec.comments :=
495: per_evt_shd.g_old_rec.comments;
496: End If;
497: If (p_rec.contact_telephone_number = hr_api.g_varchar2) then
498: p_rec.contact_telephone_number :=
499: per_evt_shd.g_old_rec.contact_telephone_number;
495: per_evt_shd.g_old_rec.comments;
496: End If;
497: If (p_rec.contact_telephone_number = hr_api.g_varchar2) then
498: p_rec.contact_telephone_number :=
499: per_evt_shd.g_old_rec.contact_telephone_number;
500: End If;
501: If (p_rec.date_end = hr_api.g_date) then
502: p_rec.date_end :=
503: per_evt_shd.g_old_rec.date_end;
499: per_evt_shd.g_old_rec.contact_telephone_number;
500: End If;
501: If (p_rec.date_end = hr_api.g_date) then
502: p_rec.date_end :=
503: per_evt_shd.g_old_rec.date_end;
504: End If;
505: If (p_rec.emp_or_apl = hr_api.g_varchar2) then
506: p_rec.emp_or_apl :=
507: per_evt_shd.g_old_rec.emp_or_apl;
503: per_evt_shd.g_old_rec.date_end;
504: End If;
505: If (p_rec.emp_or_apl = hr_api.g_varchar2) then
506: p_rec.emp_or_apl :=
507: per_evt_shd.g_old_rec.emp_or_apl;
508: End If;
509: If (p_rec.event_or_interview = hr_api.g_varchar2) then
510: p_rec.event_or_interview :=
511: per_evt_shd.g_old_rec.event_or_interview;
507: per_evt_shd.g_old_rec.emp_or_apl;
508: End If;
509: If (p_rec.event_or_interview = hr_api.g_varchar2) then
510: p_rec.event_or_interview :=
511: per_evt_shd.g_old_rec.event_or_interview;
512: End If;
513: If (p_rec.external_contact = hr_api.g_varchar2) then
514: p_rec.external_contact :=
515: per_evt_shd.g_old_rec.external_contact;
511: per_evt_shd.g_old_rec.event_or_interview;
512: End If;
513: If (p_rec.external_contact = hr_api.g_varchar2) then
514: p_rec.external_contact :=
515: per_evt_shd.g_old_rec.external_contact;
516: End If;
517: If (p_rec.time_end = hr_api.g_varchar2) then
518: p_rec.time_end :=
519: per_evt_shd.g_old_rec.time_end;
515: per_evt_shd.g_old_rec.external_contact;
516: End If;
517: If (p_rec.time_end = hr_api.g_varchar2) then
518: p_rec.time_end :=
519: per_evt_shd.g_old_rec.time_end;
520: End If;
521: If (p_rec.time_start = hr_api.g_varchar2) then
522: p_rec.time_start :=
523: per_evt_shd.g_old_rec.time_start;
519: per_evt_shd.g_old_rec.time_end;
520: End If;
521: If (p_rec.time_start = hr_api.g_varchar2) then
522: p_rec.time_start :=
523: per_evt_shd.g_old_rec.time_start;
524: End If;
525: If (p_rec.request_id = hr_api.g_number) then
526: p_rec.request_id :=
527: per_evt_shd.g_old_rec.request_id;
523: per_evt_shd.g_old_rec.time_start;
524: End If;
525: If (p_rec.request_id = hr_api.g_number) then
526: p_rec.request_id :=
527: per_evt_shd.g_old_rec.request_id;
528: End If;
529: If (p_rec.program_application_id = hr_api.g_number) then
530: p_rec.program_application_id :=
531: per_evt_shd.g_old_rec.program_application_id;
527: per_evt_shd.g_old_rec.request_id;
528: End If;
529: If (p_rec.program_application_id = hr_api.g_number) then
530: p_rec.program_application_id :=
531: per_evt_shd.g_old_rec.program_application_id;
532: End If;
533: If (p_rec.program_id = hr_api.g_number) then
534: p_rec.program_id :=
535: per_evt_shd.g_old_rec.program_id;
531: per_evt_shd.g_old_rec.program_application_id;
532: End If;
533: If (p_rec.program_id = hr_api.g_number) then
534: p_rec.program_id :=
535: per_evt_shd.g_old_rec.program_id;
536: End If;
537: If (p_rec.program_update_date = hr_api.g_date) then
538: p_rec.program_update_date :=
539: per_evt_shd.g_old_rec.program_update_date;
535: per_evt_shd.g_old_rec.program_id;
536: End If;
537: If (p_rec.program_update_date = hr_api.g_date) then
538: p_rec.program_update_date :=
539: per_evt_shd.g_old_rec.program_update_date;
540: End If;
541: If (p_rec.attribute_category = hr_api.g_varchar2) then
542: p_rec.attribute_category :=
543: per_evt_shd.g_old_rec.attribute_category;
539: per_evt_shd.g_old_rec.program_update_date;
540: End If;
541: If (p_rec.attribute_category = hr_api.g_varchar2) then
542: p_rec.attribute_category :=
543: per_evt_shd.g_old_rec.attribute_category;
544: End If;
545: If (p_rec.attribute1 = hr_api.g_varchar2) then
546: p_rec.attribute1 :=
547: per_evt_shd.g_old_rec.attribute1;
543: per_evt_shd.g_old_rec.attribute_category;
544: End If;
545: If (p_rec.attribute1 = hr_api.g_varchar2) then
546: p_rec.attribute1 :=
547: per_evt_shd.g_old_rec.attribute1;
548: End If;
549: If (p_rec.attribute2 = hr_api.g_varchar2) then
550: p_rec.attribute2 :=
551: per_evt_shd.g_old_rec.attribute2;
547: per_evt_shd.g_old_rec.attribute1;
548: End If;
549: If (p_rec.attribute2 = hr_api.g_varchar2) then
550: p_rec.attribute2 :=
551: per_evt_shd.g_old_rec.attribute2;
552: End If;
553: If (p_rec.attribute3 = hr_api.g_varchar2) then
554: p_rec.attribute3 :=
555: per_evt_shd.g_old_rec.attribute3;
551: per_evt_shd.g_old_rec.attribute2;
552: End If;
553: If (p_rec.attribute3 = hr_api.g_varchar2) then
554: p_rec.attribute3 :=
555: per_evt_shd.g_old_rec.attribute3;
556: End If;
557: If (p_rec.attribute4 = hr_api.g_varchar2) then
558: p_rec.attribute4 :=
559: per_evt_shd.g_old_rec.attribute4;
555: per_evt_shd.g_old_rec.attribute3;
556: End If;
557: If (p_rec.attribute4 = hr_api.g_varchar2) then
558: p_rec.attribute4 :=
559: per_evt_shd.g_old_rec.attribute4;
560: End If;
561: If (p_rec.attribute5 = hr_api.g_varchar2) then
562: p_rec.attribute5 :=
563: per_evt_shd.g_old_rec.attribute5;
559: per_evt_shd.g_old_rec.attribute4;
560: End If;
561: If (p_rec.attribute5 = hr_api.g_varchar2) then
562: p_rec.attribute5 :=
563: per_evt_shd.g_old_rec.attribute5;
564: End If;
565: If (p_rec.attribute6 = hr_api.g_varchar2) then
566: p_rec.attribute6 :=
567: per_evt_shd.g_old_rec.attribute6;
563: per_evt_shd.g_old_rec.attribute5;
564: End If;
565: If (p_rec.attribute6 = hr_api.g_varchar2) then
566: p_rec.attribute6 :=
567: per_evt_shd.g_old_rec.attribute6;
568: End If;
569: If (p_rec.attribute7 = hr_api.g_varchar2) then
570: p_rec.attribute7 :=
571: per_evt_shd.g_old_rec.attribute7;
567: per_evt_shd.g_old_rec.attribute6;
568: End If;
569: If (p_rec.attribute7 = hr_api.g_varchar2) then
570: p_rec.attribute7 :=
571: per_evt_shd.g_old_rec.attribute7;
572: End If;
573: If (p_rec.attribute8 = hr_api.g_varchar2) then
574: p_rec.attribute8 :=
575: per_evt_shd.g_old_rec.attribute8;
571: per_evt_shd.g_old_rec.attribute7;
572: End If;
573: If (p_rec.attribute8 = hr_api.g_varchar2) then
574: p_rec.attribute8 :=
575: per_evt_shd.g_old_rec.attribute8;
576: End If;
577: If (p_rec.attribute9 = hr_api.g_varchar2) then
578: p_rec.attribute9 :=
579: per_evt_shd.g_old_rec.attribute9;
575: per_evt_shd.g_old_rec.attribute8;
576: End If;
577: If (p_rec.attribute9 = hr_api.g_varchar2) then
578: p_rec.attribute9 :=
579: per_evt_shd.g_old_rec.attribute9;
580: End If;
581: If (p_rec.attribute10 = hr_api.g_varchar2) then
582: p_rec.attribute10 :=
583: per_evt_shd.g_old_rec.attribute10;
579: per_evt_shd.g_old_rec.attribute9;
580: End If;
581: If (p_rec.attribute10 = hr_api.g_varchar2) then
582: p_rec.attribute10 :=
583: per_evt_shd.g_old_rec.attribute10;
584: End If;
585: If (p_rec.attribute11 = hr_api.g_varchar2) then
586: p_rec.attribute11 :=
587: per_evt_shd.g_old_rec.attribute11;
583: per_evt_shd.g_old_rec.attribute10;
584: End If;
585: If (p_rec.attribute11 = hr_api.g_varchar2) then
586: p_rec.attribute11 :=
587: per_evt_shd.g_old_rec.attribute11;
588: End If;
589: If (p_rec.attribute12 = hr_api.g_varchar2) then
590: p_rec.attribute12 :=
591: per_evt_shd.g_old_rec.attribute12;
587: per_evt_shd.g_old_rec.attribute11;
588: End If;
589: If (p_rec.attribute12 = hr_api.g_varchar2) then
590: p_rec.attribute12 :=
591: per_evt_shd.g_old_rec.attribute12;
592: End If;
593: If (p_rec.attribute13 = hr_api.g_varchar2) then
594: p_rec.attribute13 :=
595: per_evt_shd.g_old_rec.attribute13;
591: per_evt_shd.g_old_rec.attribute12;
592: End If;
593: If (p_rec.attribute13 = hr_api.g_varchar2) then
594: p_rec.attribute13 :=
595: per_evt_shd.g_old_rec.attribute13;
596: End If;
597: If (p_rec.attribute14 = hr_api.g_varchar2) then
598: p_rec.attribute14 :=
599: per_evt_shd.g_old_rec.attribute14;
595: per_evt_shd.g_old_rec.attribute13;
596: End If;
597: If (p_rec.attribute14 = hr_api.g_varchar2) then
598: p_rec.attribute14 :=
599: per_evt_shd.g_old_rec.attribute14;
600: End If;
601: If (p_rec.attribute15 = hr_api.g_varchar2) then
602: p_rec.attribute15 :=
603: per_evt_shd.g_old_rec.attribute15;
599: per_evt_shd.g_old_rec.attribute14;
600: End If;
601: If (p_rec.attribute15 = hr_api.g_varchar2) then
602: p_rec.attribute15 :=
603: per_evt_shd.g_old_rec.attribute15;
604: End If;
605: If (p_rec.attribute16 = hr_api.g_varchar2) then
606: p_rec.attribute16 :=
607: per_evt_shd.g_old_rec.attribute16;
603: per_evt_shd.g_old_rec.attribute15;
604: End If;
605: If (p_rec.attribute16 = hr_api.g_varchar2) then
606: p_rec.attribute16 :=
607: per_evt_shd.g_old_rec.attribute16;
608: End If;
609: If (p_rec.attribute17 = hr_api.g_varchar2) then
610: p_rec.attribute17 :=
611: per_evt_shd.g_old_rec.attribute17;
607: per_evt_shd.g_old_rec.attribute16;
608: End If;
609: If (p_rec.attribute17 = hr_api.g_varchar2) then
610: p_rec.attribute17 :=
611: per_evt_shd.g_old_rec.attribute17;
612: End If;
613: If (p_rec.attribute18 = hr_api.g_varchar2) then
614: p_rec.attribute18 :=
615: per_evt_shd.g_old_rec.attribute18;
611: per_evt_shd.g_old_rec.attribute17;
612: End If;
613: If (p_rec.attribute18 = hr_api.g_varchar2) then
614: p_rec.attribute18 :=
615: per_evt_shd.g_old_rec.attribute18;
616: End If;
617: If (p_rec.attribute19 = hr_api.g_varchar2) then
618: p_rec.attribute19 :=
619: per_evt_shd.g_old_rec.attribute19;
615: per_evt_shd.g_old_rec.attribute18;
616: End If;
617: If (p_rec.attribute19 = hr_api.g_varchar2) then
618: p_rec.attribute19 :=
619: per_evt_shd.g_old_rec.attribute19;
620: End If;
621: If (p_rec.attribute20 = hr_api.g_varchar2) then
622: p_rec.attribute20 :=
623: per_evt_shd.g_old_rec.attribute20;
619: per_evt_shd.g_old_rec.attribute19;
620: End If;
621: If (p_rec.attribute20 = hr_api.g_varchar2) then
622: p_rec.attribute20 :=
623: per_evt_shd.g_old_rec.attribute20;
624: End If;
625: If (p_rec.party_id = hr_api.g_number) then
626: p_rec.party_id :=
627: per_evt_shd.g_old_rec.party_id;
623: per_evt_shd.g_old_rec.attribute20;
624: End If;
625: If (p_rec.party_id = hr_api.g_number) then
626: p_rec.party_id :=
627: per_evt_shd.g_old_rec.party_id;
628: End If;
629: --
630: End convert_defs;
631: --
632: -- ----------------------------------------------------------------------------
633: -- |---------------------------------< upd >----------------------------------|
634: -- ----------------------------------------------------------------------------
635: Procedure upd
636: (p_rec in out nocopy per_evt_shd.g_rec_type
637: ) is
638: --
639: l_proc varchar2(72) := g_package||'upd';
640: --
642: hr_utility.set_location('Entering:'||l_proc, 10);
643: --
644: -- We must lock the row which we need to update.
645: --
646: per_evt_shd.lck
647: (p_rec.event_id
648: ,p_rec.object_version_number
649: );
650: --
723: ,p_attribute20 in varchar2 default hr_api.g_varchar2
724: ,p_party_id in number default hr_api.g_number
725: ) is
726: --
727: l_rec per_evt_shd.g_rec_type;
728: l_proc varchar2(72) := g_package||'upd';
729: --
730: Begin
731: hr_utility.set_location('Entering:'||l_proc, 10);
733: -- Call conversion function to turn arguments into the
734: -- l_rec structure.
735: --
736: l_rec :=
737: per_evt_shd.convert_args
738: (p_event_id
739: ,p_business_group_id
740: ,p_location_id
741: ,p_internal_contact_person_id