82: hr_utility.set_location('Entering:'||l_proc, 5);
83: p_rec.object_version_number := 1; -- Initialise the object version
84: --
85: --
86: -- Insert the row into: per_perf_mgmt_plans
87: --
88: insert into per_perf_mgmt_plans
89: (plan_id
90: ,object_version_number
84: --
85: --
86: -- Insert the row into: per_perf_mgmt_plans
87: --
88: insert into per_perf_mgmt_plans
89: (plan_id
90: ,object_version_number
91: ,plan_name
92: ,administrator_person_id
279: Procedure pre_insert
280: (p_rec in out nocopy per_pmp_shd.g_rec_type
281: ) is
282: --
283: Cursor C_Sel1 is select per_perf_mgmt_plans_s.nextval from sys.dual;
284: --
285: Cursor C_Sel2 is
286: Select null
287: from per_perf_mgmt_plans
283: Cursor C_Sel1 is select per_perf_mgmt_plans_s.nextval from sys.dual;
284: --
285: Cursor C_Sel2 is
286: Select null
287: from per_perf_mgmt_plans
288: where plan_id =
289: per_pmp_ins.g_plan_id_i;
290: --
291: l_proc varchar2(72) := g_package||'pre_insert';
305: --
306: -- The primary key values are already in use.
307: --
308: fnd_message.set_name('PER','PER_289391_KEY_ALREADY_USED');
309: fnd_message.set_token('TABLE_NAME','per_perf_mgmt_plans');
310: fnd_message.raise_error;
311: End If;
312: Close C_Sel2;
313: --
509: --
510: when hr_api.cannot_find_prog_unit then
511: --
512: hr_api.cannot_find_prog_unit_error
513: (p_module_name => 'PER_PERF_MGMT_PLANS'
514: ,p_hook_type => 'AI');
515: --
516: end;
517: --