32: and p_effective_date between grr.effective_start_date
33: and grr.effective_end_date;
34: --
35: begin
36: hr_utility.set_location('Entering:'|| l_proc, 5);
37: --
38: -- Check that the Grade Rule identified is for a Grade Rate.
39: --
40: open csr_get_rate_type;
43: if csr_get_rate_type%notfound then
44: --
45: close csr_get_rate_type;
46: --
47: hr_utility.set_location(l_proc, 7);
48: --
49: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
50: hr_utility.raise_error;
51: --
45: close csr_get_rate_type;
46: --
47: hr_utility.set_location(l_proc, 7);
48: --
49: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
50: hr_utility.raise_error;
51: --
52: else
53: --
46: --
47: hr_utility.set_location(l_proc, 7);
48: --
49: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
50: hr_utility.raise_error;
51: --
52: else
53: --
54: close csr_get_rate_type;
54: close csr_get_rate_type;
55: --
56: if l_rate_type <> 'SP' then
57: --
58: hr_utility.set_location(l_proc, 8);
59: --
60: hr_utility.set_message(801, 'HR_7855_GRR_INV_NOT_SP_RATE_TY');
61: hr_utility.raise_error;
62: --
56: if l_rate_type <> 'SP' then
57: --
58: hr_utility.set_location(l_proc, 8);
59: --
60: hr_utility.set_message(801, 'HR_7855_GRR_INV_NOT_SP_RATE_TY');
61: hr_utility.raise_error;
62: --
63: end if;
64: end if;
57: --
58: hr_utility.set_location(l_proc, 8);
59: --
60: hr_utility.set_message(801, 'HR_7855_GRR_INV_NOT_SP_RATE_TY');
61: hr_utility.raise_error;
62: --
63: end if;
64: end if;
65: --
62: --
63: end if;
64: end if;
65: --
66: hr_utility.set_location(' Leaving:'||l_proc, 11);
67: end;
68: --
69: -- ----------------------------------------------------------------------------
70: -- |-------------------------< create_pay_scale_value >-----------------------|
105: -- Set l_effective_date equal to truncated version of p_effective_date for
106: -- API work. Stops dates being passed to row handlers with time portion.
107: --
108: l_effective_date := trunc(p_effective_date);
109: hr_utility.set_location('Entering:'|| l_proc, 5);
110: --
111: -- Issue a savepoint.
112: --
113: savepoint create_pay_scale_value;
110: --
111: -- Issue a savepoint.
112: --
113: savepoint create_pay_scale_value;
114: hr_utility.set_location(l_proc, 6);
115: --
116: -- Check that p_spinal_point_id is not null as it is used in the cursor.
117: --
118: hr_api.mandatory_arg_error
128: l_sequence;
129: --
130: if csr_get_der_args%notfound then
131: close csr_get_der_args;
132: hr_utility.set_message(801, 'HR_7312_GRR_INVALID_SPNL_POINT');
133: hr_utility.raise_error;
134: end if;
135: --
136: close csr_get_der_args;
129: --
130: if csr_get_der_args%notfound then
131: close csr_get_der_args;
132: hr_utility.set_message(801, 'HR_7312_GRR_INVALID_SPNL_POINT');
133: hr_utility.raise_error;
134: end if;
135: --
136: close csr_get_der_args;
137: --
136: close csr_get_der_args;
137: --
138: --
139: --
140: hr_utility.set_location(l_proc, 7);
141: --
142: -- Insert Progression Point Value.
143: --
144: hr_rate_values_api.create_rate_value(
155: ,p_effective_start_date => l_effective_start_date
156: ,p_effective_end_date => l_effective_end_date
157: );
158: --
159: hr_utility.set_location(l_proc, 8);
160: --
161: -- When in validation only mode raise the Validate_Enabled exception
162: --
163: if p_validate then
170: p_object_version_number := l_object_version_number;
171: p_effective_start_date := l_effective_start_date;
172: p_effective_end_date := l_effective_end_date;
173: --
174: hr_utility.set_location(' Leaving:'||l_proc, 11);
175: exception
176: when hr_api.validate_enabled then
177: --
178: -- As the Validate_Enabled exception has been raised
299: -- Set l_effective_date equal to truncated version of p_effective_date for
300: -- API work. Stops dates being passed to row handlers with time portion.
301: --
302: l_effective_date := trunc(p_effective_date);
303: hr_utility.set_location('Entering:'|| l_proc, 5);
304: --
305: -- Issue a savepoint.
306: --
307: savepoint update_pay_scale_value;
305: -- Issue a savepoint.
306: --
307: savepoint update_pay_scale_value;
308: --
309: hr_utility.set_location(l_proc, 6);
310: --
311: -- Check that the Grade Rule identified is for a Pay Scale.
312: --
313: --
317: );
318: --
319:
320: -- Start changes for bug 9328526
321: hr_utility.set_location(l_proc, 7);
322:
323: open c_get_rate_id;
324: fetch c_get_rate_id into l_rate_id;
325: if c_get_rate_id%notfound then
323: open c_get_rate_id;
324: fetch c_get_rate_id into l_rate_id;
325: if c_get_rate_id%notfound then
326: close c_get_rate_id;
327: hr_utility.set_message(800, 'HR_289683_INVALID_ASG_RATE');
328: hr_utility.raise_error;
329: else
330: close c_get_rate_id;
331: end if;
324: fetch c_get_rate_id into l_rate_id;
325: if c_get_rate_id%notfound then
326: close c_get_rate_id;
327: hr_utility.set_message(800, 'HR_289683_INVALID_ASG_RATE');
328: hr_utility.raise_error;
329: else
330: close c_get_rate_id;
331: end if;
332:
329: else
330: close c_get_rate_id;
331: end if;
332:
333: hr_utility.set_location(l_proc, 8);
334:
335: if nvl(p_called_from,'API') <> 'GSPW' then
336: pqh_gsp_utility.chk_rate_for_upd_del(
337: p_rate_id => l_rate_id
339: end if;
340:
341: -- End changes for bug 9328526
342:
343: hr_utility.set_location(l_proc, 9);
344: --
345: --
346: l_object_version_number_temp := p_object_version_number;
347: l_object_version_number := p_object_version_number;
362: ,p_effective_end_date => l_effective_end_date
363: );
364: --
365: --
366: hr_utility.set_location(l_proc, 10);
367: --
368: -- When in validation only mode raise the Validate_Enabled exception
369: --
370: if p_validate then
376: p_object_version_number := l_object_version_number;
377: p_effective_start_date := l_effective_start_date;
378: p_effective_end_date := l_effective_end_date;
379: --
380: hr_utility.set_location(' Leaving:'||l_proc, 11);
381: exception
382: when hr_api.validate_enabled then
383: --
384: -- As the Validate_Enabled exception has been raised
489: -- Set l_effective_date equal to truncated version of p_effective_date for
490: -- API work. Stops dates being passed to row handlers with time portion.
491: --
492: l_effective_date := trunc(p_effective_date);
493: hr_utility.set_location('Entering:'|| l_proc, 5);
494: --
495: -- Issue a savepoint.
496: --
497: savepoint delete_pay_scale_value;
495: -- Issue a savepoint.
496: --
497: savepoint delete_pay_scale_value;
498: --
499: hr_utility.set_location(l_proc, 6);
500: --
501: -- Check that the Grade Rule identified is for a Pay Scale.
502: --
503: --
507: );
508: --
509:
510: -- Start changes for bug 9328526
511: hr_utility.set_location(l_proc, 7);
512:
513: open c_get_rate_id;
514: fetch c_get_rate_id into l_rate_id;
515: if c_get_rate_id%notfound then
513: open c_get_rate_id;
514: fetch c_get_rate_id into l_rate_id;
515: if c_get_rate_id%notfound then
516: close c_get_rate_id;
517: hr_utility.set_message(800, 'HR_289683_INVALID_ASG_RATE');
518: hr_utility.raise_error;
519: else
520: close c_get_rate_id;
521: end if;
514: fetch c_get_rate_id into l_rate_id;
515: if c_get_rate_id%notfound then
516: close c_get_rate_id;
517: hr_utility.set_message(800, 'HR_289683_INVALID_ASG_RATE');
518: hr_utility.raise_error;
519: else
520: close c_get_rate_id;
521: end if;
522:
519: else
520: close c_get_rate_id;
521: end if;
522:
523: hr_utility.set_location(l_proc, 8);
524:
525: if nvl(p_called_from,'API') <> 'GSPW' then
526: pqh_gsp_utility.chk_rate_for_upd_del(
527: p_rate_id => l_rate_id
528: ,p_entity => 'RATE_VALUE');
529: End if;
530: -- End changes for bug 9328526
531:
532: hr_utility.set_location(l_proc, 9);
533:
534: --
535: --
536: l_object_version_number_temp := p_object_version_number;
546: ,p_effective_start_date => l_effective_start_date
547: ,p_effective_end_date => l_effective_end_date
548: );
549: --
550: hr_utility.set_location(l_proc, 10);
551: --
552: -- When in validation only mode raise the Validate_Enabled exception
553: --
554: if p_validate then
558: p_object_version_number := l_object_version_number;
559: p_effective_start_date := l_effective_start_date;
560: p_effective_end_date := l_effective_end_date;
561: --
562: hr_utility.set_location(' Leaving:'||l_proc, 11);
563: exception
564: when hr_api.validate_enabled then
565: --
566: -- As the Validate_Enabled exception has been raised