[Home] [Help]
51: --
52: l_proc varchar2(72) := g_package||'insert_dml';
53: --
54: Begin
55: hr_utility.set_location('Entering:'||l_proc, 5);
56: --
57: pay_pgp_shd.g_api_dml := true; -- Set the api dml status
58: --
59: -- Insert the row into: pay_people_groups
138: );
139: --
140: pay_pgp_shd.g_api_dml := false; -- Unset the api dml status
141: --
142: hr_utility.set_location(' Leaving:'||l_proc, 10);
143: Exception
144: When hr_api.check_integrity_violated Then
145: -- A check constraint has been violated
146: pay_pgp_shd.g_api_dml := false; -- Unset the api dml status
204: --
205: Cursor C_Sel1 is select pay_people_groups_s.nextval from sys.dual;
206: --
207: Begin
208: hr_utility.set_location('Entering:'||l_proc, 5);
209: --
210: --
211: -- Select the next sequence number
212: --
260: p_segment28 => p_rec.segment28,
261: p_segment29 => p_rec.segment29,
262: p_segment30 => p_rec.segment30);
263: --
264: hr_utility.set_location(' Leaving:'||l_proc, 10);
265: End pre_insert;
266: --
267: -- ----------------------------------------------------------------------------
268: -- |-----------------------------< post_insert >------------------------------|
300: --
301: l_proc varchar2(72) := g_package||'post_insert';
302: --
303: Begin
304: hr_utility.set_location('Entering:'||l_proc, 5);
305: --
306: hr_utility.set_location(' Leaving:'||l_proc, 10);
307: End post_insert;
308: --
302: --
303: Begin
304: hr_utility.set_location('Entering:'||l_proc, 5);
305: --
306: hr_utility.set_location(' Leaving:'||l_proc, 10);
307: End post_insert;
308: --
309: -- ----------------------------------------------------------------------------
310: -- |---------------------------------< ins >----------------------------------|
317: --
318: l_proc varchar2(72) := g_package||'ins';
319: --
320: Begin
321: hr_utility.set_location('Entering:'||l_proc, 5);
322: --
323: -- Determine if the business process is to be validated.
324: --
325: If p_validate then
350: If p_validate then
351: Raise HR_Api.Validate_Enabled;
352: End If;
353: --
354: hr_utility.set_location(' Leaving:'||l_proc, 10);
355: Exception
356: When HR_Api.Validate_Enabled Then
357: --
358: -- As the Validate_Enabled exception has been raised
409: l_rec pay_pgp_shd.g_rec_type;
410: l_proc varchar2(72) := g_package||'ins';
411: --
412: Begin
413: hr_utility.set_location('Entering:'||l_proc, 5);
414: --
415: -- Call conversion function to turn arguments into the
416: -- p_rec structure.
417: --
467: --
468: p_people_group_id := l_rec.people_group_id;
469: p_group_name := l_rec.group_name;
470: --
471: hr_utility.set_location(' Leaving:'||l_proc, 10);
472: End ins;
473: --
474: -- ----------------------------------------------------------------------------
475: -- |-------------------------------< ins_or_sel >-----------------------------|
516: l_proc varchar2(72) := g_package||'ins_or_sel';
517: --
518: --
519: begin
520: hr_utility.set_location('Entering:'||l_proc, 5);
521: --
522: -- determine if a people group combination exists
523: --
524: pay_pgp_shd.segment_combination_check
566: -- null The segment combination is null
567: -- id A segment combination has been found
568: --
569: if (l_people_group_id = -1) then
570: hr_utility.set_location(l_proc, 10);
571: --
572: -- a new combination needs to be inserted
573: --
574: pay_pgp_ins.ins
624: --
625: p_people_group_id := null;
626: p_group_name := null;
627: end if;
628: hr_utility.set_location(' Leaving:'||l_proc, 10);
629: end ins_or_sel;
630: --
631: end pay_pgp_ins;