[Home] [Help]
22: --
23: l_proc varchar2(72) := g_package||'set_base_key_value';
24: --
25: Begin
26: hr_utility.set_location('Entering:'||l_proc, 10);
27: --
28: pay_spr_ins.g_security_profile_id_i := p_security_profile_id;
29: pay_spr_ins.g_payroll_id_i := p_payroll_id;
30: --
27: --
28: pay_spr_ins.g_security_profile_id_i := p_security_profile_id;
29: pay_spr_ins.g_payroll_id_i := p_payroll_id;
30: --
31: hr_utility.set_location(' Leaving:'||l_proc, 20);
32: End set_base_key_value;
33: --
34: --
35: -- ----------------------------------------------------------------------------
81: --
82: l_proc varchar2(72) := g_package||'insert_dml';
83: --
84: Begin
85: hr_utility.set_location('Entering:'||l_proc, 5);
86: p_rec.object_version_number := 1; -- Initialise the object version
87: --
88: pay_spr_shd.g_api_dml := true; -- Set the api dml status
89: --
88: pay_spr_shd.g_api_dml := true; -- Set the api dml status
89: --
90: -- Insert the row into: pay_security_payrolls
91: --
92: hr_utility.set_location(to_char(p_rec.payroll_id),10);
93: insert into pay_security_payrolls
94: (business_group_id
95: ,security_profile_id
96: ,payroll_id
112: );
113: --
114: pay_spr_shd.g_api_dml := false; -- Unset the api dml status
115: --
116: hr_utility.set_location(' Leaving:'||l_proc, 10);
117: Exception
118: When hr_api.check_integrity_violated Then
119: -- A check constraint has been violated
120: pay_spr_shd.g_api_dml := false; -- Unset the api dml status
188: l_proc varchar2(72) := g_package||'pre_insert';
189: l_exists varchar2(1);
190: --
191: Begin
192: hr_utility.set_location('Entering:'||l_proc, 5);
193: --
194: If (pay_spr_ins.g_security_profile_id_i is not null and
195: pay_spr_ins.g_payroll_id_i is not null) Then
196: --
219: pay_spr_ins.g_payroll_id_i := null;
220:
221: End If;
222: --
223: hr_utility.set_location(' Leaving:'||l_proc, 10);
224: End pre_insert;
225: --
226: -- ----------------------------------------------------------------------------
227: -- |-----------------------------< post_insert >------------------------------|
262: --
263: l_proc varchar2(72) := g_package||'post_insert';
264: --
265: Begin
266: hr_utility.set_location('Entering:'||l_proc, 5);
267: begin
268: --
269: pay_spr_rki.after_insert
270: (p_effective_date => p_effective_date
287: ,p_hook_type => 'AI');
288: --
289: end;
290: --
291: hr_utility.set_location(' Leaving:'||l_proc, 10);
292: End post_insert;
293: --
294: -- ----------------------------------------------------------------------------
295: -- |---------------------------------< ins >----------------------------------|
301: --
302: l_proc varchar2(72) := g_package||'ins';
303: --
304: Begin
305: hr_utility.set_location('Entering:'||l_proc, 5);
306: --
307: -- Call the supporting insert validate operations
308: --
309: pay_spr_bus.insert_validate
331: --
332: -- Call to raise any errors on multi-message list
333: hr_multi_message.end_validation_set;
334: --
335: hr_utility.set_location('Leaving:'||l_proc, 20);
336: end ins;
337: --
338: -- ----------------------------------------------------------------------------
339: -- |---------------------------------< ins >----------------------------------|
349: l_proc varchar2(72) := g_package||'ins';
350: l_business_group_id number;
351: --
352: Begin
353: hr_utility.set_location('Entering:'||l_proc, 5);
354: --
355: -- Call the chk procedures that will return the business group id
356:
357: -- This two procedures are being called here instead of in
372: (p_payroll_id => p_payroll_id
373: ,p_security_profile_id => p_security_profile_id
374: ,p_business_group_id => l_business_group_id);
375:
376: hr_utility.set_location(l_proc, 7);
377: --
378: -- Call conversion function to turn arguments into the
379: -- p_rec structure.
380: --
395: );
396: --
397: p_object_version_number := l_rec.object_version_number;
398: --
399: hr_utility.set_location(' Leaving:'||l_proc, 10);
400: End ins;
401: --
402: end pay_spr_ins;