131: p_rec.object_version_number := 1; -- Initialise the object version
132: --
133: pay_put_shd.g_api_dml := true; -- Set the api dml status
134: --
135: -- Insert the row into: pay_user_tables
136: --
137: insert into pay_user_tables
138: (user_table_id
139: ,business_group_id
133: pay_put_shd.g_api_dml := true; -- Set the api dml status
134: --
135: -- Insert the row into: pay_user_tables
136: --
137: insert into pay_user_tables
138: (user_table_id
139: ,business_group_id
140: ,legislation_code
141: ,range_or_match
219: Procedure pre_insert
220: (p_rec in out nocopy pay_put_shd.g_rec_type
221: ) is
222: --
223: Cursor C_Sel1 is select pay_user_tables_s.nextval from sys.dual;
224: --
225: Cursor C_Sel2 is
226: Select null
227: from pay_user_tables
223: Cursor C_Sel1 is select pay_user_tables_s.nextval from sys.dual;
224: --
225: Cursor C_Sel2 is
226: Select null
227: from pay_user_tables
228: where user_table_id =
229: pay_put_ins.g_user_table_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','pay_user_tables');
250: fnd_message.raise_error;
251: End If;
252: Close C_Sel2;
253: --
345: --
346: when hr_api.cannot_find_prog_unit then
347: --
348: hr_api.cannot_find_prog_unit_error
349: (p_module_name => 'PAY_USER_TABLES'
350: ,p_hook_type => 'AI');
351: --
352: end;
353: --