56: --
57: l_proc varchar2(72) := g_package||'insert_dml';
58: --
59: Begin
60: hr_utility.set_location('Entering:'||l_proc, 5);
61: p_rec.object_version_number := 1; -- Initialise the object version
62: --
63: --
64: --
126: );
127: --
128: --
129: --
130: hr_utility.set_location(' Leaving:'||l_proc, 10);
131: Exception
132: When hr_api.check_integrity_violated Then
133: -- A check constraint has been violated
134: --
194: --
195: Cursor C_Sel1 is select per_cagr_retained_rights_s.nextval from sys.dual;
196: --
197: Begin
198: hr_utility.set_location('Entering:'||l_proc, 5);
199: --
200: --
201: -- Select the next sequence number
202: --
203: Open C_Sel1;
204: Fetch C_Sel1 Into p_rec.cagr_retained_right_id;
205: Close C_Sel1;
206: --
207: hr_utility.set_location(' Leaving:'||l_proc, 10);
208: End pre_insert;
209: --
210: -- ----------------------------------------------------------------------------
211: -- |-----------------------------< post_insert >------------------------------|
247: l_proc varchar2(72) := g_package||'post_insert';
248: --
249: Begin
250: /*
251: hr_utility.set_location('Entering:'||l_proc, 5);
252: begin
253: --
254: per_ret_rki.after_insert
255: (p_effective_date => p_effective_date
321: --
322: end;
323: */
324: --
325: hr_utility.set_location(' Leaving:'||l_proc, 10);
326: End post_insert;
327: --
328: -- ----------------------------------------------------------------------------
329: -- |---------------------------------< ins >----------------------------------|
335: --
336: l_proc varchar2(72) := g_package||'ins';
337: --
338: Begin
339: hr_utility.set_location('Entering:'||l_proc, 5);
340: --
341: -- Call the supporting insert validate operations
342: --
343: per_ret_bus.insert_validate
359: (p_effective_date
360: ,p_rec
361: );
362: --
363: hr_utility.set_location('Leaving:'||l_proc, 20);
364: end ins;
365: --
366: -- ----------------------------------------------------------------------------
367: -- |---------------------------------< ins >----------------------------------|
401: l_rec per_ret_shd.g_rec_type;
402: l_proc varchar2(72) := g_package||'ins';
403: --
404: Begin
405: hr_utility.set_location('Entering:'||l_proc, 5);
406: --
407: -- Call conversion function to turn arguments into the
408: -- p_rec structure.
409: --
452: --
453: p_cagr_retained_right_id := l_rec.cagr_retained_right_id;
454: p_object_version_number := l_rec.object_version_number;
455: --
456: hr_utility.set_location(' Leaving:'||l_proc, 10);
457: End ins;
458: --
459: end per_ret_ins;