[Home] [Help]
83: p_rec.object_version_number := 1; -- Initialise the object version
84: --
85: per_ors_shd.g_api_dml := true; -- Set the api dml status
86: --
87: -- Insert the row into: per_organization_structures
88: --
89: insert into per_organization_structures
90: (organization_structure_id
91: ,business_group_id
85: per_ors_shd.g_api_dml := true; -- Set the api dml status
86: --
87: -- Insert the row into: per_organization_structures
88: --
89: insert into per_organization_structures
90: (organization_structure_id
91: ,business_group_id
92: ,name
93: ,comments
219: Procedure pre_insert
220: (p_rec in out nocopy per_ors_shd.g_rec_type
221: ) is
222: --
223: Cursor C_Sel1 is select per_organization_structures_s.nextval from sys.dual;
224: --
225: Cursor C_Sel2 is
226: Select null
227: from per_organization_structures
223: Cursor C_Sel1 is select per_organization_structures_s.nextval from sys.dual;
224: --
225: Cursor C_Sel2 is
226: Select null
227: from per_organization_structures
228: where organization_structure_id =
229: per_ors_ins.g_organization_structure_id_i;
230: --
231: l_proc varchar2(72) := g_package||'pre_insert';
245: --
246: -- The primary key values are already in use.
247: --
248: fnd_message.set_name('PER','PER_289391_KEY_ALREADY_USED');
249: fnd_message.set_token('TABLE_NAME','per_organization_structures');
250: fnd_message.raise_error;
251: End If;
252: Close C_Sel2;
253: --
386: --
387: when hr_api.cannot_find_prog_unit then
388: --
389: hr_api.cannot_find_prog_unit_error
390: (p_module_name => 'PER_ORGANIZATION_STRUCTURES'
391: ,p_hook_type => 'AI');
392: --
393: end;
394: --