83: p_rec.object_version_number := 1; -- Initialise the object version
84: --
85: --
86: --
87: -- Insert the row into: pqh_fr_validations
88: --
89: insert into pqh_fr_validations
90: (validation_id
91: ,pension_fund_type_code
85: --
86: --
87: -- Insert the row into: pqh_fr_validations
88: --
89: insert into pqh_fr_validations
90: (validation_id
91: ,pension_fund_type_code
92: ,pension_fund_id
93: ,business_group_id
191: Procedure pre_insert
192: (p_rec in out nocopy pqh_vld_shd.g_rec_type
193: ) is
194: --
195: Cursor C_Sel1 is select pqh_fr_validations_s.nextval from sys.dual;
196: --
197: Cursor C_Sel2 is
198: Select null
199: from pqh_fr_validations
195: Cursor C_Sel1 is select pqh_fr_validations_s.nextval from sys.dual;
196: --
197: Cursor C_Sel2 is
198: Select null
199: from pqh_fr_validations
200: where validation_id =
201: pqh_vld_ins.g_validation_id_i;
202: --
203: l_proc varchar2(72) := g_package||'pre_insert';
217: --
218: -- The primary key values are already in use.
219: --
220: fnd_message.set_name('PER','PER_289391_KEY_ALREADY_USED');
221: fnd_message.set_token('TABLE_NAME','pqh_fr_validations');
222: fnd_message.raise_error;
223: End If;
224: Close C_Sel2;
225: --
330: --
331: when hr_api.cannot_find_prog_unit then
332: --
333: hr_api.cannot_find_prog_unit_error
334: (p_module_name => 'PQH_FR_VALIDATIONS'
335: ,p_hook_type => 'AI');
336: --
337: end;
338: --