83: p_rec.object_version_number := 1; -- Initialise the object version
84: --
85: --
86: --
87: -- Insert the row into: pqh_role_extra_info
88: --
89: insert into pqh_role_extra_info
90: (role_extra_info_id
91: ,role_id
85: --
86: --
87: -- Insert the row into: pqh_role_extra_info
88: --
89: insert into pqh_role_extra_info
90: (role_extra_info_id
91: ,role_id
92: ,information_type
93: ,request_id
296: Procedure pre_insert
297: (p_rec in out nocopy pqh_rei_shd.g_rec_type
298: ) is
299: --
300: Cursor C_Sel1 is select pqh_role_extra_info_s.nextval from sys.dual;
301: --
302: Cursor C_Sel2 is
303: Select null
304: from pqh_role_extra_info
300: Cursor C_Sel1 is select pqh_role_extra_info_s.nextval from sys.dual;
301: --
302: Cursor C_Sel2 is
303: Select null
304: from pqh_role_extra_info
305: where role_extra_info_id =
306: pqh_rei_ins.g_role_extra_info_id_i;
307: --
308: l_proc varchar2(72) := g_package||'pre_insert';
322: --
323: -- The primary key values are already in use.
324: --
325: fnd_message.set_name('PER','PER_289391_KEY_ALREADY_USED');
326: fnd_message.set_token('TABLE_NAME','pqh_role_extra_info');
327: fnd_message.raise_error;
328: End If;
329: Close C_Sel2;
330: --
467: --
468: when hr_api.cannot_find_prog_unit then
469: --
470: hr_api.cannot_find_prog_unit_error
471: (p_module_name => 'PQH_ROLE_EXTRA_INFO'
472: ,p_hook_type => 'AI');
473: --
474: end;
475: --