80: p_rec.object_version_number := 1; -- Initialise the object version
81: --
82: per_abs_shd.g_api_dml := true; -- Set the api dml status
83: --
84: -- Insert the row into: per_absence_attendances
85: --
86: insert into per_absence_attendances
87: (absence_attendance_id
88: ,business_group_id
82: per_abs_shd.g_api_dml := true; -- Set the api dml status
83: --
84: -- Insert the row into: per_absence_attendances
85: --
86: insert into per_absence_attendances
87: (absence_attendance_id
88: ,business_group_id
89: ,absence_attendance_type_id
90: ,abs_attendance_reason_id
333: l_proc varchar2(72) := g_package||'pre_insert';
334: l_occurrence number;
335: l_exists varchar2(1);
336: --
337: Cursor C_Sel1 is select per_absence_attendances_s.nextval from sys.dual;
338:
339: Cursor C_Sel2 is
340: select null
341: from per_absence_attendances
337: Cursor C_Sel1 is select per_absence_attendances_s.nextval from sys.dual;
338:
339: Cursor C_Sel2 is
340: select null
341: from per_absence_attendances
342: where absence_attendance_id = per_abs_ins.g_absence_attendance_id_i;
343:
344:
345: Cursor c_get_occurrence is
343:
344:
345: Cursor c_get_occurrence is
346: select nvl(max(abs.occurrence), 0) + 1
347: from per_absence_attendances abs
348: where abs.business_group_id = p_rec.business_group_id
349: and abs.absence_attendance_type_id = p_rec.absence_attendance_type_id
350: and abs.person_id = p_rec.person_id;
351:
388: --
389: -- The primary key values are already in use.
390: --
391: fnd_message.set_name('PER','PER_289391_KEY_ALREADY_USED');
392: fnd_message.set_token('TABLE_NAME','PER_ABSENCE_ATTENDANCES');
393: fnd_message.raise_error;
394: end if;
395: Close C_Sel2;
396: --
663: --
664: when hr_api.cannot_find_prog_unit then
665: --
666: hr_api.cannot_find_prog_unit_error
667: (p_module_name => 'PER_ABSENCE_ATTENDANCES'
668: ,p_hook_type => 'AI');
669: --
670: end;
671: --