[Home] [Help]
9: -- terminated.
10: -- If the assignment has not been terminated then the returned
11: -- actual_termination_date date will be null.
12: --
13: g_debug boolean := hr_utility.debug_enabled;
14: g_target_entry_id pay_element_entries_f.target_entry_id%type;
15: function return_termination_date(p_assignment_id in number,
16: p_session_date in date)
17: return date is
21: -- Select the actual termination date is the assignment has been
22: -- terminated.
23: --
24: if g_debug then
25: hr_utility.set_location('hr_entry.return_termination_date', 1);
26: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
27: hr_utility.trace(' p_session_date : '|| p_session_date);
28: end if;
29: begin
22: -- terminated.
23: --
24: if g_debug then
25: hr_utility.set_location('hr_entry.return_termination_date', 1);
26: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
27: hr_utility.trace(' p_session_date : '|| p_session_date);
28: end if;
29: begin
30: select pos.actual_termination_date
23: --
24: if g_debug then
25: hr_utility.set_location('hr_entry.return_termination_date', 1);
26: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
27: hr_utility.trace(' p_session_date : '|| p_session_date);
28: end if;
29: begin
30: select pos.actual_termination_date
31: into l_actual_termination_date
75: v_start_date date;
76: v_end_date date;
77: --
78: begin
79: g_debug := hr_utility.debug_enabled;
80: --
81: if g_debug then
82: hr_utility.set_location('hr_entry.get_nonrecurring_dates',5);
83: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
78: begin
79: g_debug := hr_utility.debug_enabled;
80: --
81: if g_debug then
82: hr_utility.set_location('hr_entry.get_nonrecurring_dates',5);
83: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
84: hr_utility.trace(' p_session_date : '|| p_session_date);
85: end if;
86: --
79: g_debug := hr_utility.debug_enabled;
80: --
81: if g_debug then
82: hr_utility.set_location('hr_entry.get_nonrecurring_dates',5);
83: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
84: hr_utility.trace(' p_session_date : '|| p_session_date);
85: end if;
86: --
87: -- Retrieve the payroll for the assignment on the date the nonrecurring
80: --
81: if g_debug then
82: hr_utility.set_location('hr_entry.get_nonrecurring_dates',5);
83: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
84: hr_utility.trace(' p_session_date : '|| p_session_date);
85: end if;
86: --
87: -- Retrieve the payroll for the assignment on the date the nonrecurring
88: -- entry is being created NB if there is no payroll then it is invalid to
102: and asg.effective_end_date;
103: --
104: exception
105: when no_data_found then
106: hr_utility.set_message(801, 'HR_6047_ELE_ENTRY_NO_PAYROLL');
107: hr_utility.raise_error;
108: end;
109: --
110: if g_debug then
103: --
104: exception
105: when no_data_found then
106: hr_utility.set_message(801, 'HR_6047_ELE_ENTRY_NO_PAYROLL');
107: hr_utility.raise_error;
108: end;
109: --
110: if g_debug then
111: hr_utility.set_location('hr_entry.get_nonrecurring_dates',10);
107: hr_utility.raise_error;
108: end;
109: --
110: if g_debug then
111: hr_utility.set_location('hr_entry.get_nonrecurring_dates',10);
112: hr_utility.trace(' v_payroll_id : '|| v_payroll_id);
113: hr_utility.trace(' v_asg_effective_start_date : '|| v_asg_effective_start_date);
114: hr_utility.trace(' v_asg_effective_end_date : '|| v_asg_effective_end_date);
115: end if;
108: end;
109: --
110: if g_debug then
111: hr_utility.set_location('hr_entry.get_nonrecurring_dates',10);
112: hr_utility.trace(' v_payroll_id : '|| v_payroll_id);
113: hr_utility.trace(' v_asg_effective_start_date : '|| v_asg_effective_start_date);
114: hr_utility.trace(' v_asg_effective_end_date : '|| v_asg_effective_end_date);
115: end if;
116: --
109: --
110: if g_debug then
111: hr_utility.set_location('hr_entry.get_nonrecurring_dates',10);
112: hr_utility.trace(' v_payroll_id : '|| v_payroll_id);
113: hr_utility.trace(' v_asg_effective_start_date : '|| v_asg_effective_start_date);
114: hr_utility.trace(' v_asg_effective_end_date : '|| v_asg_effective_end_date);
115: end if;
116: --
117: -- Retrieve the start and end dates of the period for the payroll on the
110: if g_debug then
111: hr_utility.set_location('hr_entry.get_nonrecurring_dates',10);
112: hr_utility.trace(' v_payroll_id : '|| v_payroll_id);
113: hr_utility.trace(' v_asg_effective_start_date : '|| v_asg_effective_start_date);
114: hr_utility.trace(' v_asg_effective_end_date : '|| v_asg_effective_end_date);
115: end if;
116: --
117: -- Retrieve the start and end dates of the period for the payroll on the
118: -- date on which the nonrecurring entry is being created NB. a payroll
129: and tim.end_date;
130: --
131: exception
132: when no_data_found then
133: hr_utility.set_message(801, 'HR_6614_PAY_NO_TIME_PERIOD');
134: hr_utility.raise_error;
135: end;
136: --
137: if g_debug then
130: --
131: exception
132: when no_data_found then
133: hr_utility.set_message(801, 'HR_6614_PAY_NO_TIME_PERIOD');
134: hr_utility.raise_error;
135: end;
136: --
137: if g_debug then
138: hr_utility.set_location('hr_entry.get_nonrecurring_dates',15);
134: hr_utility.raise_error;
135: end;
136: --
137: if g_debug then
138: hr_utility.set_location('hr_entry.get_nonrecurring_dates',15);
139: hr_utility.trace(' v_time_period_start_date : '|| v_time_period_start_date);
140: hr_utility.trace(' v_time_period_end_date : '|| v_time_period_end_date);
141: end if;
142: --
135: end;
136: --
137: if g_debug then
138: hr_utility.set_location('hr_entry.get_nonrecurring_dates',15);
139: hr_utility.trace(' v_time_period_start_date : '|| v_time_period_start_date);
140: hr_utility.trace(' v_time_period_end_date : '|| v_time_period_end_date);
141: end if;
142: --
143: -- Current assignment record starts after the beginning of the time period.
136: --
137: if g_debug then
138: hr_utility.set_location('hr_entry.get_nonrecurring_dates',15);
139: hr_utility.trace(' v_time_period_start_date : '|| v_time_period_start_date);
140: hr_utility.trace(' v_time_period_end_date : '|| v_time_period_end_date);
141: end if;
142: --
143: -- Current assignment record starts after the beginning of the time period.
144: -- 8798020 Removed date track joins from below query
168: --
169: end if;
170: --
171: if g_debug then
172: hr_utility.set_location('hr_entry.get_nonrecurring_dates',20);
173: hr_utility.trace(' v_start_date : '|| v_start_date);
174: end if;
175: --
176: -- Current assignment record ends before the finish of the time period.
169: end if;
170: --
171: if g_debug then
172: hr_utility.set_location('hr_entry.get_nonrecurring_dates',20);
173: hr_utility.trace(' v_start_date : '|| v_start_date);
174: end if;
175: --
176: -- Current assignment record ends before the finish of the time period.
177: -- 8798020 Removed date track joins from below query
201: --
202: end if;
203: --
204: if g_debug then
205: hr_utility.set_location('hr_entry.get_nonrecurring_dates',25);
206: hr_utility.trace(' v_end_date : '|| v_end_date);
207: end if;
208: --
209: -- Return the start and end dates of the nonrecurring entry.
202: end if;
203: --
204: if g_debug then
205: hr_utility.set_location('hr_entry.get_nonrecurring_dates',25);
206: hr_utility.trace(' v_end_date : '|| v_end_date);
207: end if;
208: --
209: -- Return the start and end dates of the nonrecurring entry.
210: p_effective_start_date := greatest(v_asg_effective_start_date,
212: p_effective_end_date := least(v_asg_effective_end_date,
213: v_time_period_end_date);
214:
215: if g_debug then
216: hr_utility.trace(' p_effective_start_date : '|| p_effective_start_date);
217: hr_utility.trace(' p_effective_end_date : '|| p_effective_end_date);
218: end if;
219: --
220: -- Return the payroll and the start and end dates for the period.
213: v_time_period_end_date);
214:
215: if g_debug then
216: hr_utility.trace(' p_effective_start_date : '|| p_effective_start_date);
217: hr_utility.trace(' p_effective_end_date : '|| p_effective_end_date);
218: end if;
219: --
220: -- Return the payroll and the start and end dates for the period.
221: p_payroll_id := v_payroll_id;
262: --
263: begin
264: --
265: if g_debug then
266: hr_utility.set_location('hr_entry.chk_entry_overlap',5);
267: hr_utility.trace(' p_element_entry_id : '|| p_element_entry_id);
268: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
269: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
270: hr_utility.trace(' p_processing_type : '|| p_processing_type);
263: begin
264: --
265: if g_debug then
266: hr_utility.set_location('hr_entry.chk_entry_overlap',5);
267: hr_utility.trace(' p_element_entry_id : '|| p_element_entry_id);
268: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
269: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
270: hr_utility.trace(' p_processing_type : '|| p_processing_type);
271: hr_utility.trace(' p_entry_type : '|| p_entry_type);
264: --
265: if g_debug then
266: hr_utility.set_location('hr_entry.chk_entry_overlap',5);
267: hr_utility.trace(' p_element_entry_id : '|| p_element_entry_id);
268: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
269: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
270: hr_utility.trace(' p_processing_type : '|| p_processing_type);
271: hr_utility.trace(' p_entry_type : '|| p_entry_type);
272: hr_utility.trace(' p_mult_entries_allowed_flag : '|| p_mult_entries_allowed_flag);
265: if g_debug then
266: hr_utility.set_location('hr_entry.chk_entry_overlap',5);
267: hr_utility.trace(' p_element_entry_id : '|| p_element_entry_id);
268: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
269: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
270: hr_utility.trace(' p_processing_type : '|| p_processing_type);
271: hr_utility.trace(' p_entry_type : '|| p_entry_type);
272: hr_utility.trace(' p_mult_entries_allowed_flag : '|| p_mult_entries_allowed_flag);
273: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
266: hr_utility.set_location('hr_entry.chk_entry_overlap',5);
267: hr_utility.trace(' p_element_entry_id : '|| p_element_entry_id);
268: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
269: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
270: hr_utility.trace(' p_processing_type : '|| p_processing_type);
271: hr_utility.trace(' p_entry_type : '|| p_entry_type);
272: hr_utility.trace(' p_mult_entries_allowed_flag : '|| p_mult_entries_allowed_flag);
273: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
274: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
267: hr_utility.trace(' p_element_entry_id : '|| p_element_entry_id);
268: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
269: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
270: hr_utility.trace(' p_processing_type : '|| p_processing_type);
271: hr_utility.trace(' p_entry_type : '|| p_entry_type);
272: hr_utility.trace(' p_mult_entries_allowed_flag : '|| p_mult_entries_allowed_flag);
273: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
274: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
275: hr_utility.trace(' p_period_start_date : '|| p_period_start_date);
268: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
269: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
270: hr_utility.trace(' p_processing_type : '|| p_processing_type);
271: hr_utility.trace(' p_entry_type : '|| p_entry_type);
272: hr_utility.trace(' p_mult_entries_allowed_flag : '|| p_mult_entries_allowed_flag);
273: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
274: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
275: hr_utility.trace(' p_period_start_date : '|| p_period_start_date);
276: hr_utility.trace(' p_period_end_date : '|| p_period_end_date);
269: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
270: hr_utility.trace(' p_processing_type : '|| p_processing_type);
271: hr_utility.trace(' p_entry_type : '|| p_entry_type);
272: hr_utility.trace(' p_mult_entries_allowed_flag : '|| p_mult_entries_allowed_flag);
273: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
274: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
275: hr_utility.trace(' p_period_start_date : '|| p_period_start_date);
276: hr_utility.trace(' p_period_end_date : '|| p_period_end_date);
277: end if;
270: hr_utility.trace(' p_processing_type : '|| p_processing_type);
271: hr_utility.trace(' p_entry_type : '|| p_entry_type);
272: hr_utility.trace(' p_mult_entries_allowed_flag : '|| p_mult_entries_allowed_flag);
273: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
274: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
275: hr_utility.trace(' p_period_start_date : '|| p_period_start_date);
276: hr_utility.trace(' p_period_end_date : '|| p_period_end_date);
277: end if;
278: --
271: hr_utility.trace(' p_entry_type : '|| p_entry_type);
272: hr_utility.trace(' p_mult_entries_allowed_flag : '|| p_mult_entries_allowed_flag);
273: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
274: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
275: hr_utility.trace(' p_period_start_date : '|| p_period_start_date);
276: hr_utility.trace(' p_period_end_date : '|| p_period_end_date);
277: end if;
278: --
279: -- Only do check if the entry being altered is a normal entry ie. not
272: hr_utility.trace(' p_mult_entries_allowed_flag : '|| p_mult_entries_allowed_flag);
273: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
274: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
275: hr_utility.trace(' p_period_start_date : '|| p_period_start_date);
276: hr_utility.trace(' p_period_end_date : '|| p_period_end_date);
277: end if;
278: --
279: -- Only do check if the entry being altered is a normal entry ie. not
280: -- adjustment, additional etc ... If multiple concurrent entries are not
309: end if;
310: --
311: if v_overlap_occurred = 'Y' then
312: --
313: hr_utility.set_message(801, 'HR_6956_ELE_ENTRY_OVERLAP');
314: hr_utility.raise_error;
315: --
316: end if;
317: --
310: --
311: if v_overlap_occurred = 'Y' then
312: --
313: hr_utility.set_message(801, 'HR_6956_ELE_ENTRY_OVERLAP');
314: hr_utility.raise_error;
315: --
316: end if;
317: --
318: end chk_entry_overlap;
379: from per_all_people_f papf
380: where papf.person_id = asg.person_id);
381: --
382: begin
383: g_debug := hr_utility.debug_enabled;
384:
385: if g_debug then
386: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
387: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
382: begin
383: g_debug := hr_utility.debug_enabled;
384:
385: if g_debug then
386: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
387: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
388: hr_utility.trace(' p_session_date : '|| p_session_date);
389: end if;
390: --
383: g_debug := hr_utility.debug_enabled;
384:
385: if g_debug then
386: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
387: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
388: hr_utility.trace(' p_session_date : '|| p_session_date);
389: end if;
390: --
391: -- Ensure all the passed parameters exist
384:
385: if g_debug then
386: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
387: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
388: hr_utility.trace(' p_session_date : '|| p_session_date);
389: end if;
390: --
391: -- Ensure all the passed parameters exist
392: --
392: --
393: if (p_assignment_id is null or
394: p_element_link_id is null or
395: p_session_date is null) then
396: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
397: hr_utility.set_message_token('PROCEDURE',
398: 'hr_entry.return_qualifying_conditions');
399: hr_utility.set_message_token('STEP','1');
400: hr_utility.raise_error;
393: if (p_assignment_id is null or
394: p_element_link_id is null or
395: p_session_date is null) then
396: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
397: hr_utility.set_message_token('PROCEDURE',
398: 'hr_entry.return_qualifying_conditions');
399: hr_utility.set_message_token('STEP','1');
400: hr_utility.raise_error;
401: end if;
395: p_session_date is null) then
396: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
397: hr_utility.set_message_token('PROCEDURE',
398: 'hr_entry.return_qualifying_conditions');
399: hr_utility.set_message_token('STEP','1');
400: hr_utility.raise_error;
401: end if;
402: --
403: -- select the qualifying conditions for los.
396: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
397: hr_utility.set_message_token('PROCEDURE',
398: 'hr_entry.return_qualifying_conditions');
399: hr_utility.set_message_token('STEP','1');
400: hr_utility.raise_error;
401: end if;
402: --
403: -- select the qualifying conditions for los.
404: --
403: -- select the qualifying conditions for los.
404: --
405: begin
406: if g_debug then
407: hr_utility.set_location('hr_entry.return_qualifying_conditions', 5);
408: end if;
409: select pel.qualifying_age,
410: pel.qualifying_length_of_service,
411: pel.qualifying_units
418: between pel.effective_start_date
419: and pel.effective_end_date;
420: exception
421: when NO_DATA_FOUND then
422: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
423: hr_utility.set_message_token('PROCEDURE',
424: 'hr_entry.return_qualifying_conditions');
425: hr_utility.set_message_token('STEP','5');
426: hr_utility.raise_error;
419: and pel.effective_end_date;
420: exception
421: when NO_DATA_FOUND then
422: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
423: hr_utility.set_message_token('PROCEDURE',
424: 'hr_entry.return_qualifying_conditions');
425: hr_utility.set_message_token('STEP','5');
426: hr_utility.raise_error;
427: end;
421: when NO_DATA_FOUND then
422: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
423: hr_utility.set_message_token('PROCEDURE',
424: 'hr_entry.return_qualifying_conditions');
425: hr_utility.set_message_token('STEP','5');
426: hr_utility.raise_error;
427: end;
428: --
429: if (l_qualifying_los is not null) then
422: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
423: hr_utility.set_message_token('PROCEDURE',
424: 'hr_entry.return_qualifying_conditions');
425: hr_utility.set_message_token('STEP','5');
426: hr_utility.raise_error;
427: end;
428: --
429: if (l_qualifying_los is not null) then
430: --
431: -- Need to select the valid los date
432: --
433: begin
434: if g_debug then
435: hr_utility.set_location('hr_entry.return_qualifying_conditions', 10);
436: end if;
437: open csr_los_date;
438: fetch csr_los_date into p_los_date;
439: close csr_los_date;
438: fetch csr_los_date into p_los_date;
439: close csr_los_date;
440: exception
441: when NO_DATA_FOUND then
442: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
443: hr_utility.set_message_token('PROCEDURE',
444: 'hr_entry.return_qualifying_conditions');
445: hr_utility.set_message_token('STEP','10');
446: hr_utility.raise_error;
439: close csr_los_date;
440: exception
441: when NO_DATA_FOUND then
442: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
443: hr_utility.set_message_token('PROCEDURE',
444: 'hr_entry.return_qualifying_conditions');
445: hr_utility.set_message_token('STEP','10');
446: hr_utility.raise_error;
447: end;
441: when NO_DATA_FOUND then
442: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
443: hr_utility.set_message_token('PROCEDURE',
444: 'hr_entry.return_qualifying_conditions');
445: hr_utility.set_message_token('STEP','10');
446: hr_utility.raise_error;
447: end;
448: --
449: end if;
442: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
443: hr_utility.set_message_token('PROCEDURE',
444: 'hr_entry.return_qualifying_conditions');
445: hr_utility.set_message_token('STEP','10');
446: hr_utility.raise_error;
447: end;
448: --
449: end if;
450: --
457: if (l_qualifying_age is not null) then
458: --
459: begin
460: if g_debug then
461: hr_utility.set_location('hr_entry.return_qualifying_conditions', 15);
462: end if;
463: open csr_age_date;
464: fetch csr_age_date into p_age_date;
465: close csr_age_date;
491: INTO v_element_entry_id
492: FROM SYS.DUAL;
493: exception
494: when NO_DATA_FOUND then
495: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
496: hr_utility.set_message_token('PROCEDURE','hr_entry.generate_entry_id');
497: hr_utility.set_message_token('STEP','1');
498: hr_utility.raise_error;
499: end;
492: FROM SYS.DUAL;
493: exception
494: when NO_DATA_FOUND then
495: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
496: hr_utility.set_message_token('PROCEDURE','hr_entry.generate_entry_id');
497: hr_utility.set_message_token('STEP','1');
498: hr_utility.raise_error;
499: end;
500: --
493: exception
494: when NO_DATA_FOUND then
495: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
496: hr_utility.set_message_token('PROCEDURE','hr_entry.generate_entry_id');
497: hr_utility.set_message_token('STEP','1');
498: hr_utility.raise_error;
499: end;
500: --
501: -- Return the next element_entry_id unique primary key id
494: when NO_DATA_FOUND then
495: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
496: hr_utility.set_message_token('PROCEDURE','hr_entry.generate_entry_id');
497: hr_utility.set_message_token('STEP','1');
498: hr_utility.raise_error;
499: end;
500: --
501: -- Return the next element_entry_id unique primary key id
502: --
523: INTO v_run_result_id
524: FROM SYS.DUAL;
525: exception
526: when NO_DATA_FOUND then
527: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
528: hr_utility.set_message_token('PROCEDURE','hr_entry.generate_run_result_id');
529: hr_utility.set_message_token('STEP','1');
530: hr_utility.raise_error;
531: end;
524: FROM SYS.DUAL;
525: exception
526: when NO_DATA_FOUND then
527: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
528: hr_utility.set_message_token('PROCEDURE','hr_entry.generate_run_result_id');
529: hr_utility.set_message_token('STEP','1');
530: hr_utility.raise_error;
531: end;
532: --
525: exception
526: when NO_DATA_FOUND then
527: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
528: hr_utility.set_message_token('PROCEDURE','hr_entry.generate_run_result_id');
529: hr_utility.set_message_token('STEP','1');
530: hr_utility.raise_error;
531: end;
532: --
533: -- Return the next run_result_id unique primary key id
526: when NO_DATA_FOUND then
527: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
528: hr_utility.set_message_token('PROCEDURE','hr_entry.generate_run_result_id');
529: hr_utility.set_message_token('STEP','1');
530: hr_utility.raise_error;
531: end;
532: --
533: -- Return the next run_result_id unique primary key id
534: --
558: --
559: begin
560:
561: if g_debug then
562: hr_utility.trace(' p_element_type_id : '|| p_element_type_id);
563: hr_utility.trace(' p_session_date : '|| p_session_date);
564: end if;
565:
566: begin
559: begin
560:
561: if g_debug then
562: hr_utility.trace(' p_element_type_id : '|| p_element_type_id);
563: hr_utility.trace(' p_session_date : '|| p_session_date);
564: end if;
565:
566: begin
567: open c1;
567: open c1;
568: fetch c1 into v_process_in_run_flag;
569: if c1%NOTFOUND then
570: close c1;
571: hr_utility.set_message(801, 'HR_6884_ELE_ENTRY_NO_ELEMENT');
572: hr_utility.set_message_token('DATE_SUPPLIED',p_session_date);
573: hr_utility.raise_error;
574: end if;
575: close c1;
568: fetch c1 into v_process_in_run_flag;
569: if c1%NOTFOUND then
570: close c1;
571: hr_utility.set_message(801, 'HR_6884_ELE_ENTRY_NO_ELEMENT');
572: hr_utility.set_message_token('DATE_SUPPLIED',p_session_date);
573: hr_utility.raise_error;
574: end if;
575: close c1;
576: end;
569: if c1%NOTFOUND then
570: close c1;
571: hr_utility.set_message(801, 'HR_6884_ELE_ENTRY_NO_ELEMENT');
572: hr_utility.set_message_token('DATE_SUPPLIED',p_session_date);
573: hr_utility.raise_error;
574: end if;
575: close c1;
576: end;
577: --
713: --
714: begin
715:
716: if g_debug then
717: hr_utility.trace('In hr_entry.assignment_eligible_for_link');
718: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
719: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
720: hr_utility.trace(' p_effective_date : '|| p_effective_date);
721: hr_utility.trace(' p_creator_type : '|| p_creator_type);
714: begin
715:
716: if g_debug then
717: hr_utility.trace('In hr_entry.assignment_eligible_for_link');
718: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
719: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
720: hr_utility.trace(' p_effective_date : '|| p_effective_date);
721: hr_utility.trace(' p_creator_type : '|| p_creator_type);
722: end if;
715:
716: if g_debug then
717: hr_utility.trace('In hr_entry.assignment_eligible_for_link');
718: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
719: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
720: hr_utility.trace(' p_effective_date : '|| p_effective_date);
721: hr_utility.trace(' p_creator_type : '|| p_creator_type);
722: end if;
723: --
716: if g_debug then
717: hr_utility.trace('In hr_entry.assignment_eligible_for_link');
718: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
719: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
720: hr_utility.trace(' p_effective_date : '|| p_effective_date);
721: hr_utility.trace(' p_creator_type : '|| p_creator_type);
722: end if;
723: --
724: hr_general.assert_condition (all_parameters_are_valid);
717: hr_utility.trace('In hr_entry.assignment_eligible_for_link');
718: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
719: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
720: hr_utility.trace(' p_effective_date : '|| p_effective_date);
721: hr_utility.trace(' p_creator_type : '|| p_creator_type);
722: end if;
723: --
724: hr_general.assert_condition (all_parameters_are_valid);
725: --
726: open csr_eligibility;
727: fetch csr_eligibility into l_eligibility;
728: close csr_eligibility;
729: --
730: hr_utility.trace(' l_eligibility : '|| l_eligibility);
731: --
732: return l_eligibility;
733: --
734: end assignment_eligible_for_link;
784: v_asg_visible number;
785: begin
786: --
787: if g_debug then
788: hr_utility.set_location('hr_entry.chk_asg_visible', 1);
789: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
790: hr_utility.trace(' p_session_date : '|| p_session_date);
791: end if;
792: --
785: begin
786: --
787: if g_debug then
788: hr_utility.set_location('hr_entry.chk_asg_visible', 1);
789: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
790: hr_utility.trace(' p_session_date : '|| p_session_date);
791: end if;
792: --
793: -- Check to see if this assignment is visible to a secure user.
786: --
787: if g_debug then
788: hr_utility.set_location('hr_entry.chk_asg_visible', 1);
789: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
790: hr_utility.trace(' p_session_date : '|| p_session_date);
791: end if;
792: --
793: -- Check to see if this assignment is visible to a secure user.
794: -- If not then raise error.
796: --
797: open csr_sec_asg(p_assignment_id, p_session_date);
798: fetch csr_sec_asg into v_asg_visible;
799:
800: hr_utility.trace(' v_asg_visible : '|| v_asg_visible);
801: --
802: if csr_sec_asg%notfound then
803: --
804: if g_debug then
801: --
802: if csr_sec_asg%notfound then
803: --
804: if g_debug then
805: hr_utility.set_location('hr_entry.chk_asg_visible', 2);
806: hr_utility.trace(' Assignment ID Not Found: '||p_assignment_id);
807: end if;
808: --
809: -- The user is not authorized to process this assignment.
802: if csr_sec_asg%notfound then
803: --
804: if g_debug then
805: hr_utility.set_location('hr_entry.chk_asg_visible', 2);
806: hr_utility.trace(' Assignment ID Not Found: '||p_assignment_id);
807: end if;
808: --
809: -- The user is not authorized to process this assignment.
810: --
809: -- The user is not authorized to process this assignment.
810: --
811: close csr_sec_asg;
812: --
813: hr_utility.set_message(801,'PAY_34811_ENTRY_MAINT_SEC_ASG');
814: hr_utility.raise_error;
815: --
816: end if;
817: --
810: --
811: close csr_sec_asg;
812: --
813: hr_utility.set_message(801,'PAY_34811_ENTRY_MAINT_SEC_ASG');
814: hr_utility.raise_error;
815: --
816: end if;
817: --
818: close csr_sec_asg;
817: --
818: close csr_sec_asg;
819: --
820: if g_debug then
821: hr_utility.set_location('hr_entry.chk_asg_visible', 3);
822: end if;
823: --
824: end chk_asg_visible;
825: --------------------------------------------------------------------------------
941: --
942: begin
943: --
944: if g_debug then
945: hr_utility.set_location(l_procedure_name,1);
946: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
947: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
948: hr_utility.trace(' p_session_date : '|| p_session_date);
949: hr_utility.trace(' p_creator_type : '|| p_creator_type);
942: begin
943: --
944: if g_debug then
945: hr_utility.set_location(l_procedure_name,1);
946: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
947: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
948: hr_utility.trace(' p_session_date : '|| p_session_date);
949: hr_utility.trace(' p_creator_type : '|| p_creator_type);
950: hr_utility.trace(' p_time_period_start_date : '|| p_time_period_start_date);
943: --
944: if g_debug then
945: hr_utility.set_location(l_procedure_name,1);
946: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
947: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
948: hr_utility.trace(' p_session_date : '|| p_session_date);
949: hr_utility.trace(' p_creator_type : '|| p_creator_type);
950: hr_utility.trace(' p_time_period_start_date : '|| p_time_period_start_date);
951: hr_utility.trace(' p_time_period_end_date : '|| p_time_period_end_date);
944: if g_debug then
945: hr_utility.set_location(l_procedure_name,1);
946: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
947: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
948: hr_utility.trace(' p_session_date : '|| p_session_date);
949: hr_utility.trace(' p_creator_type : '|| p_creator_type);
950: hr_utility.trace(' p_time_period_start_date : '|| p_time_period_start_date);
951: hr_utility.trace(' p_time_period_end_date : '|| p_time_period_end_date);
952: hr_utility.trace(' p_min_eligibility_date : '|| p_min_eligibility_date);
945: hr_utility.set_location(l_procedure_name,1);
946: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
947: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
948: hr_utility.trace(' p_session_date : '|| p_session_date);
949: hr_utility.trace(' p_creator_type : '|| p_creator_type);
950: hr_utility.trace(' p_time_period_start_date : '|| p_time_period_start_date);
951: hr_utility.trace(' p_time_period_end_date : '|| p_time_period_end_date);
952: hr_utility.trace(' p_min_eligibility_date : '|| p_min_eligibility_date);
953: hr_utility.trace(' p_max_eligibility_date : '|| p_max_eligibility_date);
946: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
947: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
948: hr_utility.trace(' p_session_date : '|| p_session_date);
949: hr_utility.trace(' p_creator_type : '|| p_creator_type);
950: hr_utility.trace(' p_time_period_start_date : '|| p_time_period_start_date);
951: hr_utility.trace(' p_time_period_end_date : '|| p_time_period_end_date);
952: hr_utility.trace(' p_min_eligibility_date : '|| p_min_eligibility_date);
953: hr_utility.trace(' p_max_eligibility_date : '|| p_max_eligibility_date);
954: end if;
947: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
948: hr_utility.trace(' p_session_date : '|| p_session_date);
949: hr_utility.trace(' p_creator_type : '|| p_creator_type);
950: hr_utility.trace(' p_time_period_start_date : '|| p_time_period_start_date);
951: hr_utility.trace(' p_time_period_end_date : '|| p_time_period_end_date);
952: hr_utility.trace(' p_min_eligibility_date : '|| p_min_eligibility_date);
953: hr_utility.trace(' p_max_eligibility_date : '|| p_max_eligibility_date);
954: end if;
955: --
948: hr_utility.trace(' p_session_date : '|| p_session_date);
949: hr_utility.trace(' p_creator_type : '|| p_creator_type);
950: hr_utility.trace(' p_time_period_start_date : '|| p_time_period_start_date);
951: hr_utility.trace(' p_time_period_end_date : '|| p_time_period_end_date);
952: hr_utility.trace(' p_min_eligibility_date : '|| p_min_eligibility_date);
953: hr_utility.trace(' p_max_eligibility_date : '|| p_max_eligibility_date);
954: end if;
955: --
956: -- Initialize "out" parameters
949: hr_utility.trace(' p_creator_type : '|| p_creator_type);
950: hr_utility.trace(' p_time_period_start_date : '|| p_time_period_start_date);
951: hr_utility.trace(' p_time_period_end_date : '|| p_time_period_end_date);
952: hr_utility.trace(' p_min_eligibility_date : '|| p_min_eligibility_date);
953: hr_utility.trace(' p_max_eligibility_date : '|| p_max_eligibility_date);
954: end if;
955: --
956: -- Initialize "out" parameters
957: --
958: P_MIN_ELIGIBILITY_DATE := null;
959: P_MAX_ELIGIBILITY_DATE := null;
960: --
961: if g_debug then
962: hr_utility.set_location(l_procedure_name,2);
963: end if;
964: --
965: -- Get the outer bounds of the link
966: --
974: fetch csr_assignment_bounds into l_assignment;
975: close csr_assignment_bounds;
976: --
977: if g_debug then
978: hr_utility.trace(' l_link.LINK_START : '|| l_link.LINK_START);
979: hr_utility.trace(' l_link.LINK_END : '|| l_link.LINK_END);
980: hr_utility.trace(' l_assignment.ASGT_START : '|| l_assignment.ASGT_START);
981: hr_utility.trace(' l_assignment.ASGT_END : '|| l_assignment.ASGT_END);
982: end if;
975: close csr_assignment_bounds;
976: --
977: if g_debug then
978: hr_utility.trace(' l_link.LINK_START : '|| l_link.LINK_START);
979: hr_utility.trace(' l_link.LINK_END : '|| l_link.LINK_END);
980: hr_utility.trace(' l_assignment.ASGT_START : '|| l_assignment.ASGT_START);
981: hr_utility.trace(' l_assignment.ASGT_END : '|| l_assignment.ASGT_END);
982: end if;
983: --
976: --
977: if g_debug then
978: hr_utility.trace(' l_link.LINK_START : '|| l_link.LINK_START);
979: hr_utility.trace(' l_link.LINK_END : '|| l_link.LINK_END);
980: hr_utility.trace(' l_assignment.ASGT_START : '|| l_assignment.ASGT_START);
981: hr_utility.trace(' l_assignment.ASGT_END : '|| l_assignment.ASGT_END);
982: end if;
983: --
984: if
977: if g_debug then
978: hr_utility.trace(' l_link.LINK_START : '|| l_link.LINK_START);
979: hr_utility.trace(' l_link.LINK_END : '|| l_link.LINK_END);
980: hr_utility.trace(' l_assignment.ASGT_START : '|| l_assignment.ASGT_START);
981: hr_utility.trace(' l_assignment.ASGT_END : '|| l_assignment.ASGT_END);
982: end if;
983: --
984: if
985: -- if the link does not exist as at session date
994: --
995: end if;
996: --
997: if g_debug then
998: hr_utility.set_location(l_procedure_name,3);
999: end if;
1000: --
1001: -- Check that the parameters are valid (doing it here allows us to
1002: -- encompass a check that the cursors returned values correctly)
1014: -- the appropriate privileges to edit the assignment as at the session
1015: -- date, raise an error
1016: --
1017: if g_debug then
1018: hr_utility.set_location(l_procedure_name,4);
1019: end if;
1020: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1021: hr_utility.set_message_token('PROCEDURE',
1022: 'hr_entry.get_eligibility_period');
1016: --
1017: if g_debug then
1018: hr_utility.set_location(l_procedure_name,4);
1019: end if;
1020: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1021: hr_utility.set_message_token('PROCEDURE',
1022: 'hr_entry.get_eligibility_period');
1023: hr_utility.set_message_token('STEP','4');
1024: hr_utility.raise_error;
1017: if g_debug then
1018: hr_utility.set_location(l_procedure_name,4);
1019: end if;
1020: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1021: hr_utility.set_message_token('PROCEDURE',
1022: 'hr_entry.get_eligibility_period');
1023: hr_utility.set_message_token('STEP','4');
1024: hr_utility.raise_error;
1025: --
1019: end if;
1020: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1021: hr_utility.set_message_token('PROCEDURE',
1022: 'hr_entry.get_eligibility_period');
1023: hr_utility.set_message_token('STEP','4');
1024: hr_utility.raise_error;
1025: --
1026: end if;
1027: --
1020: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1021: hr_utility.set_message_token('PROCEDURE',
1022: 'hr_entry.get_eligibility_period');
1023: hr_utility.set_message_token('STEP','4');
1024: hr_utility.raise_error;
1025: --
1026: end if;
1027: --
1028: if g_debug then
1025: --
1026: end if;
1027: --
1028: if g_debug then
1029: hr_utility.set_location(l_procedure_name,5);
1030: end if;
1031: --
1032: -- Get the minimum date on which the assignment is eligible for the
1033: -- link in an unbroken period encompassing the session date. The cursor
1086: -- Default the time period end date to the 'end of time' if null...
1087: l_time_period_end_date := nvl(p_time_period_end_date, hr_general.end_of_time);
1088: --
1089: if g_debug then
1090: hr_utility.trace(' l_time_period_start_date: '||to_char(l_time_period_start_date,'DD-MON-YYYY'));
1091: hr_utility.trace(' l_time_period_end_date: '||to_char(l_time_period_end_date,'DD-MON-YYYY'));
1092: end if;
1093: -- Bugfix 5135065
1094: -- We are not interested in assignment pieces that end before the beginning
1087: l_time_period_end_date := nvl(p_time_period_end_date, hr_general.end_of_time);
1088: --
1089: if g_debug then
1090: hr_utility.trace(' l_time_period_start_date: '||to_char(l_time_period_start_date,'DD-MON-YYYY'));
1091: hr_utility.trace(' l_time_period_end_date: '||to_char(l_time_period_end_date,'DD-MON-YYYY'));
1092: end if;
1093: -- Bugfix 5135065
1094: -- We are not interested in assignment pieces that end before the beginning
1095: -- of the time period, so we pass the time period start date to csr_minimum
1109: end if;
1110: end loop;
1111:
1112: if g_debug then
1113: hr_utility.trace(' After csr_minimum, P_MIN_ELIGIBILITY_DATE : '|| P_MIN_ELIGIBILITY_DATE);
1114: end if;
1115: --
1116: -- Bugfix 4114282, handle the potentially null min eligibility date...
1117: --
1119: P_MIN_ELIGIBILITY_DATE := greatest (l_assignment.asgt_start, l_link.link_start);
1120: end if;
1121: --
1122: if g_debug then
1123: hr_utility.trace (' P_MIN_ELIGIBILITY_DATE = '||to_char (P_MIN_ELIGIBILITY_DATE));
1124: end if;
1125: if P_MIN_ELIGIBILITY_DATE > lpi_session_date then
1126: raise no_current_eligibility;
1127: end if;
1126: raise no_current_eligibility;
1127: end if;
1128: --
1129: if g_debug then
1130: hr_utility.set_location(l_procedure_name,6);
1131: end if;
1132: --
1133: -- Get the maximum date on which the assignment is eligible for the
1134: -- link in an unbroken period encompassing the session date. See above
1193:
1194: l_eff_term_date := null;
1195:
1196: if g_debug then
1197: hr_utility.trace ('ATD: '||l_service_rec.actual_termination_date);
1198: hr_utility.trace ('LSP: '||l_service_rec.last_standard_process_date);
1199: hr_utility.trace ('FPD: '||l_service_rec.final_process_date);
1200: end if;
1201:
1194: l_eff_term_date := null;
1195:
1196: if g_debug then
1197: hr_utility.trace ('ATD: '||l_service_rec.actual_termination_date);
1198: hr_utility.trace ('LSP: '||l_service_rec.last_standard_process_date);
1199: hr_utility.trace ('FPD: '||l_service_rec.final_process_date);
1200: end if;
1201:
1202: -- if terminated employee, set element termination rule date as max elig date
1195:
1196: if g_debug then
1197: hr_utility.trace ('ATD: '||l_service_rec.actual_termination_date);
1198: hr_utility.trace ('LSP: '||l_service_rec.last_standard_process_date);
1199: hr_utility.trace ('FPD: '||l_service_rec.final_process_date);
1200: end if;
1201:
1202: -- if terminated employee, set element termination rule date as max elig date
1203: if (l_service_rec.actual_termination_date is not null or
1210: into l_eff_term_date
1211: from dual;
1212:
1213: if g_debug then
1214: hr_utility.trace ('Terminated Employee. l_eff_term_date = '||l_eff_term_date);
1215: end if;
1216:
1217: end if;
1218:
1230: end if;
1231: end loop;
1232:
1233: if g_debug then
1234: hr_utility.trace(' After csr_maximum, P_MAX_ELIGIBILITY_DATE : '|| P_MAX_ELIGIBILITY_DATE);
1235: end if;
1236:
1237: -- If the max date is null, there were no rows returned.
1238: if(P_MAX_ELIGIBILITY_DATE is null) then
1240: end if;
1241:
1242: --
1243: if g_debug then
1244: hr_utility.trace (' P_MAX_ELIGIBILITY_DATE = '||to_char (P_MAX_ELIGIBILITY_DATE));
1245: end if;
1246: if P_MAX_ELIGIBILITY_DATE < lpi_session_date then
1247: raise no_current_eligibility;
1248: end if;
1247: raise no_current_eligibility;
1248: end if;
1249: --
1250: if g_debug then
1251: hr_utility.set_location(l_procedure_name,7);
1252: end if;
1253: --
1254: exception
1255: --
1259: -- Provide a helpful error message explaining which assignment
1260: -- and element failed, and on what date.
1261: --
1262: if g_debug then
1263: hr_utility.set_location (l_procedure_name,999);
1264: end if;
1265: --
1266: declare
1267: --
1310: open csr_error_assignment;
1311: fetch csr_error_assignment into l_assignment;
1312: close csr_error_assignment;
1313: --
1314: hr_utility.set_message(801, 'HR_51271_ELE_NOT_ELIGIBLE');
1315: hr_utility.set_message_token ('ELEMENT_NAME', l_element.element_name);
1316: hr_utility.set_message_token ('ASSIGNMENT_NUMBER', l_assignment.assignment_number);
1317: hr_utility.set_message_token ('SESSION_DATE', to_char (lpi_session_date));
1318: hr_utility.raise_error;
1311: fetch csr_error_assignment into l_assignment;
1312: close csr_error_assignment;
1313: --
1314: hr_utility.set_message(801, 'HR_51271_ELE_NOT_ELIGIBLE');
1315: hr_utility.set_message_token ('ELEMENT_NAME', l_element.element_name);
1316: hr_utility.set_message_token ('ASSIGNMENT_NUMBER', l_assignment.assignment_number);
1317: hr_utility.set_message_token ('SESSION_DATE', to_char (lpi_session_date));
1318: hr_utility.raise_error;
1319: --
1312: close csr_error_assignment;
1313: --
1314: hr_utility.set_message(801, 'HR_51271_ELE_NOT_ELIGIBLE');
1315: hr_utility.set_message_token ('ELEMENT_NAME', l_element.element_name);
1316: hr_utility.set_message_token ('ASSIGNMENT_NUMBER', l_assignment.assignment_number);
1317: hr_utility.set_message_token ('SESSION_DATE', to_char (lpi_session_date));
1318: hr_utility.raise_error;
1319: --
1320: end;
1313: --
1314: hr_utility.set_message(801, 'HR_51271_ELE_NOT_ELIGIBLE');
1315: hr_utility.set_message_token ('ELEMENT_NAME', l_element.element_name);
1316: hr_utility.set_message_token ('ASSIGNMENT_NUMBER', l_assignment.assignment_number);
1317: hr_utility.set_message_token ('SESSION_DATE', to_char (lpi_session_date));
1318: hr_utility.raise_error;
1319: --
1320: end;
1321: --
1314: hr_utility.set_message(801, 'HR_51271_ELE_NOT_ELIGIBLE');
1315: hr_utility.set_message_token ('ELEMENT_NAME', l_element.element_name);
1316: hr_utility.set_message_token ('ASSIGNMENT_NUMBER', l_assignment.assignment_number);
1317: hr_utility.set_message_token ('SESSION_DATE', to_char (lpi_session_date));
1318: hr_utility.raise_error;
1319: --
1320: end;
1321: --
1322: end get_eligibility_period;
1416: -- v_payroll_start_date Holds the payroll start date.
1417: -- v_payroll_end_date Holds the payroll end date.
1418: --
1419: begin
1420: g_debug := hr_utility.debug_enabled;
1421: --
1422: -- Ensure all mandatory parameters exist.
1423: --
1424: hr_general.assert_condition (p_assignment_id is not null
1427: and p_session_date = trunc (p_session_date));
1428: --
1429: if g_debug then
1430: --
1431: hr_utility.trace('begin hr_entry.entry_asg_pay_link_dates');
1432: hr_utility.trace(' p_session_date:' || To_Char(p_session_date,'DD-MON-YYYY'));
1433: hr_utility.trace(' p_assignment_id:' || p_assignment_id);
1434: hr_utility.trace(' p_element_link_id:' || p_element_link_id);
1435: --
1428: --
1429: if g_debug then
1430: --
1431: hr_utility.trace('begin hr_entry.entry_asg_pay_link_dates');
1432: hr_utility.trace(' p_session_date:' || To_Char(p_session_date,'DD-MON-YYYY'));
1433: hr_utility.trace(' p_assignment_id:' || p_assignment_id);
1434: hr_utility.trace(' p_element_link_id:' || p_element_link_id);
1435: --
1436: end if;
1429: if g_debug then
1430: --
1431: hr_utility.trace('begin hr_entry.entry_asg_pay_link_dates');
1432: hr_utility.trace(' p_session_date:' || To_Char(p_session_date,'DD-MON-YYYY'));
1433: hr_utility.trace(' p_assignment_id:' || p_assignment_id);
1434: hr_utility.trace(' p_element_link_id:' || p_element_link_id);
1435: --
1436: end if;
1437: --
1430: --
1431: hr_utility.trace('begin hr_entry.entry_asg_pay_link_dates');
1432: hr_utility.trace(' p_session_date:' || To_Char(p_session_date,'DD-MON-YYYY'));
1433: hr_utility.trace(' p_assignment_id:' || p_assignment_id);
1434: hr_utility.trace(' p_element_link_id:' || p_element_link_id);
1435: --
1436: end if;
1437: --
1438: -- Select the element termination processing rule, assignment period of
1438: -- Select the element termination processing rule, assignment period of
1439: -- service and assignment primary flag
1440: --
1441: if g_debug then
1442: hr_utility.set_location('hr_entry.entry_asg_pay_link_dates', 1);
1443: end if;
1444: --
1445: begin
1446: --
1462: and p_session_date between asg.effective_start_date
1463: and asg.effective_end_date;
1464:
1465: if g_debug then
1466: hr_utility.trace(' v_period_of_service_id : '|| v_period_of_service_id);
1467: hr_utility.trace(' v_primary_flag : '|| v_primary_flag);
1468: hr_utility.trace(' v_actual_termination_date : '|| v_actual_termination_date);
1469: hr_utility.trace(' v_last_standard_process_date : '|| v_last_standard_process_date);
1470: hr_utility.trace(' v_final_process_date : '|| v_final_process_date);
1463: and asg.effective_end_date;
1464:
1465: if g_debug then
1466: hr_utility.trace(' v_period_of_service_id : '|| v_period_of_service_id);
1467: hr_utility.trace(' v_primary_flag : '|| v_primary_flag);
1468: hr_utility.trace(' v_actual_termination_date : '|| v_actual_termination_date);
1469: hr_utility.trace(' v_last_standard_process_date : '|| v_last_standard_process_date);
1470: hr_utility.trace(' v_final_process_date : '|| v_final_process_date);
1471: end if;
1464:
1465: if g_debug then
1466: hr_utility.trace(' v_period_of_service_id : '|| v_period_of_service_id);
1467: hr_utility.trace(' v_primary_flag : '|| v_primary_flag);
1468: hr_utility.trace(' v_actual_termination_date : '|| v_actual_termination_date);
1469: hr_utility.trace(' v_last_standard_process_date : '|| v_last_standard_process_date);
1470: hr_utility.trace(' v_final_process_date : '|| v_final_process_date);
1471: end if;
1472: --
1465: if g_debug then
1466: hr_utility.trace(' v_period_of_service_id : '|| v_period_of_service_id);
1467: hr_utility.trace(' v_primary_flag : '|| v_primary_flag);
1468: hr_utility.trace(' v_actual_termination_date : '|| v_actual_termination_date);
1469: hr_utility.trace(' v_last_standard_process_date : '|| v_last_standard_process_date);
1470: hr_utility.trace(' v_final_process_date : '|| v_final_process_date);
1471: end if;
1472: --
1473: select pet.post_termination_rule,
1466: hr_utility.trace(' v_period_of_service_id : '|| v_period_of_service_id);
1467: hr_utility.trace(' v_primary_flag : '|| v_primary_flag);
1468: hr_utility.trace(' v_actual_termination_date : '|| v_actual_termination_date);
1469: hr_utility.trace(' v_last_standard_process_date : '|| v_last_standard_process_date);
1470: hr_utility.trace(' v_final_process_date : '|| v_final_process_date);
1471: end if;
1472: --
1473: select pet.post_termination_rule,
1474: pet.processing_type
1485: --
1486: exception
1487: --
1488: when NO_DATA_FOUND then
1489: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1490: hr_utility.set_message_token('PROCEDURE',
1491: 'hr_entry.entry_asg_pay_link_dates');
1492: hr_utility.set_message_token('STEP','2');
1493: end;
1486: exception
1487: --
1488: when NO_DATA_FOUND then
1489: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1490: hr_utility.set_message_token('PROCEDURE',
1491: 'hr_entry.entry_asg_pay_link_dates');
1492: hr_utility.set_message_token('STEP','2');
1493: end;
1494: --
1488: when NO_DATA_FOUND then
1489: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1490: hr_utility.set_message_token('PROCEDURE',
1491: 'hr_entry.entry_asg_pay_link_dates');
1492: hr_utility.set_message_token('STEP','2');
1493: end;
1494: --
1495: if g_debug then
1496: --
1493: end;
1494: --
1495: if g_debug then
1496: --
1497: hr_utility.trace(' v_post_termination_rule :' || v_post_termination_rule);
1498: hr_utility.trace(' v_processing_type :' || v_processing_type);
1499: --
1500: -- Actual termination date...
1501: if v_actual_termination_date is not null then
1494: --
1495: if g_debug then
1496: --
1497: hr_utility.trace(' v_post_termination_rule :' || v_post_termination_rule);
1498: hr_utility.trace(' v_processing_type :' || v_processing_type);
1499: --
1500: -- Actual termination date...
1501: if v_actual_termination_date is not null then
1502: hr_utility.trace(' v_actual_termination_date>' ||
1498: hr_utility.trace(' v_processing_type :' || v_processing_type);
1499: --
1500: -- Actual termination date...
1501: if v_actual_termination_date is not null then
1502: hr_utility.trace(' v_actual_termination_date>' ||
1503: to_char(v_actual_termination_date, 'DD-MON-YYYY') || '<');
1504: else
1505: hr_utility.trace(' v_actual_termination_date><');
1506: end if;
1501: if v_actual_termination_date is not null then
1502: hr_utility.trace(' v_actual_termination_date>' ||
1503: to_char(v_actual_termination_date, 'DD-MON-YYYY') || '<');
1504: else
1505: hr_utility.trace(' v_actual_termination_date><');
1506: end if;
1507: --
1508: -- Last standard process date...
1509: if v_last_standard_process_date is not null then
1506: end if;
1507: --
1508: -- Last standard process date...
1509: if v_last_standard_process_date is not null then
1510: hr_utility.trace(' v_last_standard_process_date>' ||
1511: to_char(v_last_standard_process_date, 'DD-MON-YYYY') || '<');
1512: else
1513: hr_utility.trace(' v_last_standard_process_date><');
1514: end if;
1509: if v_last_standard_process_date is not null then
1510: hr_utility.trace(' v_last_standard_process_date>' ||
1511: to_char(v_last_standard_process_date, 'DD-MON-YYYY') || '<');
1512: else
1513: hr_utility.trace(' v_last_standard_process_date><');
1514: end if;
1515: --
1516: -- Final process date...
1517: if v_final_process_date is not null then
1514: end if;
1515: --
1516: -- Final process date...
1517: if v_final_process_date is not null then
1518: hr_utility.trace(' v_final_process_date>' ||
1519: to_char(v_final_process_date, 'DD-MON-YYYY') || '<');
1520: else
1521: hr_utility.trace(' v_final_process_date><');
1522: end if;
1517: if v_final_process_date is not null then
1518: hr_utility.trace(' v_final_process_date>' ||
1519: to_char(v_final_process_date, 'DD-MON-YYYY') || '<');
1520: else
1521: hr_utility.trace(' v_final_process_date><');
1522: end if;
1523: --
1524: end if; -- if g_debug.
1525: --
1537: v_orig_term_rule_date_func := 'N';
1538: end if;
1539: --
1540: if g_debug then
1541: hr_utility.trace(' v_orig_term_rule_date_func: '||v_orig_term_rule_date_func);
1542: end if;
1543: --
1544: v_employee_terminated :=
1545: (v_actual_termination_date is not null or
1560: if (v_orig_term_rule_date_func = 'N' and v_employee_terminated) or -- New behaviour
1561: (v_orig_term_rule_date_func = 'Y' and v_primary_flag = 'Y') then -- Old behaviour
1562: --
1563: if g_debug then
1564: hr_utility.trace(' employee terminated');
1565: hr_utility.set_location('hr_entry.entry_asg_pay_link_dates', 2);
1566: hr_utility.trace(' v_post_termination_rule :' || v_post_termination_rule);
1567: end if;
1568: --
1561: (v_orig_term_rule_date_func = 'Y' and v_primary_flag = 'Y') then -- Old behaviour
1562: --
1563: if g_debug then
1564: hr_utility.trace(' employee terminated');
1565: hr_utility.set_location('hr_entry.entry_asg_pay_link_dates', 2);
1566: hr_utility.trace(' v_post_termination_rule :' || v_post_termination_rule);
1567: end if;
1568: --
1569: -- Get the termination rule date
1562: --
1563: if g_debug then
1564: hr_utility.trace(' employee terminated');
1565: hr_utility.set_location('hr_entry.entry_asg_pay_link_dates', 2);
1566: hr_utility.trace(' v_post_termination_rule :' || v_post_termination_rule);
1567: end if;
1568: --
1569: -- Get the termination rule date
1570: --
1622: --
1623: -- Logic for non-terminated, primary/Secondary assignment...
1624: --
1625: if g_debug then
1626: hr_utility.trace(' employee NOT terminated');
1627: hr_utility.trace(' primary/Secondary assignment');
1628: end if;
1629: --
1630: -- The assignment is NOT a PRIMARY assignment therefore we need to check
1623: -- Logic for non-terminated, primary/Secondary assignment...
1624: --
1625: if g_debug then
1626: hr_utility.trace(' employee NOT terminated');
1627: hr_utility.trace(' primary/Secondary assignment');
1628: end if;
1629: --
1630: -- The assignment is NOT a PRIMARY assignment therefore we need to check
1631: -- if the current or future assignment has an assignment status of
1634: -- First we need to check if the current or future assignment rows have
1635: -- a 'TERM_ASSIGN' status.
1636: --
1637: if g_debug then
1638: hr_utility.set_location('hr_entry.entry_asg_pay_link_dates', 3);
1639: end if;
1640: begin
1641: select min(asg.effective_start_date)
1642: into v_asg_term_date
1653: --
1654: if v_asg_term_date is null then
1655: --
1656: if g_debug then
1657: hr_utility.set_location('hr_entry.entry_asg_pay_link_dates', 4);
1658: end if;
1659: --
1660: begin
1661: select asg.effective_start_date
1725: v_element_term_rule_date := v_asg_term_date - 1;
1726: end if;
1727: elsif (v_post_termination_rule = 'F') then
1728: if g_debug then
1729: hr_utility.set_location('hr_entry.entry_asg_pay_link_dates', 5);
1730: end if;
1731: begin
1732: select max(asg.effective_end_date)
1733: into v_element_term_rule_date
1736: and asg.effective_start_date >= v_asg_term_date;
1737: end;
1738: elsif (v_post_termination_rule = 'L') then
1739: if g_debug then
1740: hr_utility.set_location('hr_entry.entry_asg_pay_link_dates', 6);
1741: end if;
1742: /*
1743: begin
1744: select ptp.end_date
1791: --
1792: -- Logic for non-terminated, primary assignment...
1793: --
1794: -- if g_debug then
1795: -- hr_utility.trace(' employee NOT terminated');
1796: -- hr_utility.trace(' PRIMARY assignment');
1797: -- end if;
1798: --
1799: -- v_element_term_rule_date := hr_general.end_of_time;
1792: -- Logic for non-terminated, primary assignment...
1793: --
1794: -- if g_debug then
1795: -- hr_utility.trace(' employee NOT terminated');
1796: -- hr_utility.trace(' PRIMARY assignment');
1797: -- end if;
1798: --
1799: -- v_element_term_rule_date := hr_general.end_of_time;
1800: --
1801: /*End Comment*/
1802: end if;
1803: --
1804: if g_debug then
1805: hr_utility.trace(' v_element_term_rule_date: ' || to_char(v_element_term_rule_date,'DD-MON-YYYY'));
1806: end if;
1807: --
1808: -- check to see if the v_element_term_rule_date is being set to before
1809: -- the session date.
1810: --
1811: if ((v_element_term_rule_date <> hr_general.end_of_time) and
1812: (v_element_term_rule_date < p_session_date) and p_entry_mode) then
1813: --
1814: hr_utility.set_message(801, 'HR_6370_ELE_ENTRY_NO_TERM');
1815: hr_utility.raise_error;
1816: --
1817: end if;
1818: --
1811: if ((v_element_term_rule_date <> hr_general.end_of_time) and
1812: (v_element_term_rule_date < p_session_date) and p_entry_mode) then
1813: --
1814: hr_utility.set_message(801, 'HR_6370_ELE_ENTRY_NO_TERM');
1815: hr_utility.raise_error;
1816: --
1817: end if;
1818: --
1819: -- Select the minimum and maximum element link dates.
1818: --
1819: -- Select the minimum and maximum element link dates.
1820: --
1821: if g_debug then
1822: hr_utility.set_location('hr_entry.entry_asg_pay_link_dates', 7);
1823: end if;
1824: --
1825: begin
1826: select min(pel.effective_start_date),
1832: end;
1833: --
1834: if (v_element_link_start_date > p_session_date) or
1835: (v_element_link_end_date < p_session_date) then
1836: hr_utility.set_message(801, 'HR_6132_ELE_ENTRY_LINK_MISSING');
1837: hr_utility.raise_error;
1838: end if;
1839: --
1840: -- If the assignment is to a payroll then,
1833: --
1834: if (v_element_link_start_date > p_session_date) or
1835: (v_element_link_end_date < p_session_date) then
1836: hr_utility.set_message(801, 'HR_6132_ELE_ENTRY_LINK_MISSING');
1837: hr_utility.raise_error;
1838: end if;
1839: --
1840: -- If the assignment is to a payroll then,
1841: -- we must select the minimum and maximum effective dates of the payroll.
1840: -- If the assignment is to a payroll then,
1841: -- we must select the minimum and maximum effective dates of the payroll.
1842: --
1843: if g_debug then
1844: hr_utility.set_location('hr_entry.entry_asg_pay_link_dates', 8);
1845: end if;
1846: begin
1847: select min(pay.effective_start_date),
1848: max(pay.effective_end_date)
1863: if ((v_payroll_start_date is not null and
1864: v_payroll_end_date is not null) and
1865: (v_payroll_start_date > p_session_date or
1866: v_payroll_end_date < p_session_date)) then
1867: hr_utility.set_message(801, 'HR_6399_ELE_ENTRY_NO_PAYROLL');
1868: hr_utility.raise_error;
1869: end if;
1870: --
1871: -- Set values to be returned by procedure.
1864: v_payroll_end_date is not null) and
1865: (v_payroll_start_date > p_session_date or
1866: v_payroll_end_date < p_session_date)) then
1867: hr_utility.set_message(801, 'HR_6399_ELE_ENTRY_NO_PAYROLL');
1868: hr_utility.raise_error;
1869: end if;
1870: --
1871: -- Set values to be returned by procedure.
1872: --
1876: p_payroll_start_date := v_payroll_start_date;
1877: p_payroll_end_date := v_payroll_end_date;
1878: --
1879: if g_debug then
1880: hr_utility.trace(' end hr_entry.entry_asg_pay_link_dates');
1881: end if;
1882: --
1883: end entry_asg_pay_link_dates;
1884: --
1946: -- v_recurring_end_date Holds the end date of the recurring entry which is
1947: -- returned by the function.
1948: --
1949: begin
1950: g_debug := hr_utility.debug_enabled;
1951:
1952: if g_debug then
1953: hr_utility.trace('In hr_entry.recurring_entry_end_date');
1954: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
1949: begin
1950: g_debug := hr_utility.debug_enabled;
1951:
1952: if g_debug then
1953: hr_utility.trace('In hr_entry.recurring_entry_end_date');
1954: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
1955: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
1956: hr_utility.trace(' p_session_date : '|| p_session_date);
1957: hr_utility.trace(' p_overlap_chk : '|| p_overlap_chk);
1950: g_debug := hr_utility.debug_enabled;
1951:
1952: if g_debug then
1953: hr_utility.trace('In hr_entry.recurring_entry_end_date');
1954: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
1955: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
1956: hr_utility.trace(' p_session_date : '|| p_session_date);
1957: hr_utility.trace(' p_overlap_chk : '|| p_overlap_chk);
1958: hr_utility.trace(' p_mult_entries_allowed_flag : '|| p_mult_entries_allowed_flag);
1951:
1952: if g_debug then
1953: hr_utility.trace('In hr_entry.recurring_entry_end_date');
1954: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
1955: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
1956: hr_utility.trace(' p_session_date : '|| p_session_date);
1957: hr_utility.trace(' p_overlap_chk : '|| p_overlap_chk);
1958: hr_utility.trace(' p_mult_entries_allowed_flag : '|| p_mult_entries_allowed_flag);
1959: hr_utility.trace(' p_element_entry_id : '|| p_element_entry_id);
1952: if g_debug then
1953: hr_utility.trace('In hr_entry.recurring_entry_end_date');
1954: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
1955: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
1956: hr_utility.trace(' p_session_date : '|| p_session_date);
1957: hr_utility.trace(' p_overlap_chk : '|| p_overlap_chk);
1958: hr_utility.trace(' p_mult_entries_allowed_flag : '|| p_mult_entries_allowed_flag);
1959: hr_utility.trace(' p_element_entry_id : '|| p_element_entry_id);
1960: hr_utility.trace(' p_original_entry_id : '|| p_original_entry_id);
1953: hr_utility.trace('In hr_entry.recurring_entry_end_date');
1954: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
1955: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
1956: hr_utility.trace(' p_session_date : '|| p_session_date);
1957: hr_utility.trace(' p_overlap_chk : '|| p_overlap_chk);
1958: hr_utility.trace(' p_mult_entries_allowed_flag : '|| p_mult_entries_allowed_flag);
1959: hr_utility.trace(' p_element_entry_id : '|| p_element_entry_id);
1960: hr_utility.trace(' p_original_entry_id : '|| p_original_entry_id);
1961: end if;
1954: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
1955: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
1956: hr_utility.trace(' p_session_date : '|| p_session_date);
1957: hr_utility.trace(' p_overlap_chk : '|| p_overlap_chk);
1958: hr_utility.trace(' p_mult_entries_allowed_flag : '|| p_mult_entries_allowed_flag);
1959: hr_utility.trace(' p_element_entry_id : '|| p_element_entry_id);
1960: hr_utility.trace(' p_original_entry_id : '|| p_original_entry_id);
1961: end if;
1962: --
1955: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
1956: hr_utility.trace(' p_session_date : '|| p_session_date);
1957: hr_utility.trace(' p_overlap_chk : '|| p_overlap_chk);
1958: hr_utility.trace(' p_mult_entries_allowed_flag : '|| p_mult_entries_allowed_flag);
1959: hr_utility.trace(' p_element_entry_id : '|| p_element_entry_id);
1960: hr_utility.trace(' p_original_entry_id : '|| p_original_entry_id);
1961: end if;
1962: --
1963: -- Initialiize local parameters
1956: hr_utility.trace(' p_session_date : '|| p_session_date);
1957: hr_utility.trace(' p_overlap_chk : '|| p_overlap_chk);
1958: hr_utility.trace(' p_mult_entries_allowed_flag : '|| p_mult_entries_allowed_flag);
1959: hr_utility.trace(' p_element_entry_id : '|| p_element_entry_id);
1960: hr_utility.trace(' p_original_entry_id : '|| p_original_entry_id);
1961: end if;
1962: --
1963: -- Initialiize local parameters
1964: --
1976: -- delete next/future changes therefore set the current_effective_end_date
1977: --
1978: if p_element_entry_id is not null then
1979: if g_debug then
1980: hr_utility.set_location('hr_entry.recurring_entry_end_date', 0);
1981: end if;
1982: begin
1983: select e.effective_end_date
1984: into v_current_effective_end_date
1991: when NO_DATA_FOUND then NULL;
1992: end;
1993: end if;
1994:
1995: hr_utility.trace(' v_current_effective_end_date : '|| v_current_effective_end_date);
1996: --
1997: -- If the p_overlap_chk is set to 'Y' then we must check to see if any
1998: -- recurring entries of the same link for the assignment exist in the future.
1999: -- If yes, then we must take the min(effective_start_date) -1
1999: -- If yes, then we must take the min(effective_start_date) -1
2000: --
2001: if upper (p_overlap_chk) = 'Y' then
2002: if g_debug then
2003: hr_utility.set_location('hr_entry.recurring_entry_end_date', 1);
2004: end if;
2005: begin
2006: -- INDEX hint added following NHS project recommendation
2007: select /*+ INDEX(pee, pay_element_entries_f_n51) */
2018: or (p_mult_entries_allowed_flag = 'N'))
2019: and pee.effective_start_date > p_session_date;
2020: end;
2021:
2022: hr_utility.trace(' v_future_recurring_end_date : '|| v_future_recurring_end_date);
2023: --
2024: -- If we are doing a date-effective delete then we must ensure that the
2025: -- date returned is not the same as the current effective_end_date.
2026: --
2026: --
2027: if ((v_current_effective_end_date is not null and
2028: v_current_effective_end_date = v_future_recurring_end_date) or
2029: v_future_recurring_end_date < p_session_date) then
2030: hr_utility.set_message(801, 'HR_7699_ELE_ENTRY_REC_EXISTS');
2031: hr_utility.raise_error;
2032: end if;
2033: --
2034: end if;
2027: if ((v_current_effective_end_date is not null and
2028: v_current_effective_end_date = v_future_recurring_end_date) or
2029: v_future_recurring_end_date < p_session_date) then
2030: hr_utility.set_message(801, 'HR_7699_ELE_ENTRY_REC_EXISTS');
2031: hr_utility.raise_error;
2032: end if;
2033: --
2034: end if;
2035: --
2084: --
2085: -- Check to see if the error was at the element link.
2086: --
2087: if v_element_link_end_date = v_current_effective_end_date then
2088: hr_utility.set_message(801, 'HR_6281_ELE_ENTRY_DT_DEL_LINK');
2089: hr_utility.raise_error;
2090: end if;
2091: --
2092: -- Check to see if the error was at the element termination processing rule.
2085: -- Check to see if the error was at the element link.
2086: --
2087: if v_element_link_end_date = v_current_effective_end_date then
2088: hr_utility.set_message(801, 'HR_6281_ELE_ENTRY_DT_DEL_LINK');
2089: hr_utility.raise_error;
2090: end if;
2091: --
2092: -- Check to see if the error was at the element termination processing rule.
2093: --
2091: --
2092: -- Check to see if the error was at the element termination processing rule.
2093: --
2094: if v_element_term_rule_date = v_current_effective_end_date then
2095: hr_utility.set_message(801, 'HR_6283_ELE_ENTRY_DT_ELE_DEL');
2096: hr_utility.raise_error;
2097: end if;
2098: --
2099: -- Check to see if the error was at the eligibility level.
2092: -- Check to see if the error was at the element termination processing rule.
2093: --
2094: if v_element_term_rule_date = v_current_effective_end_date then
2095: hr_utility.set_message(801, 'HR_6283_ELE_ENTRY_DT_ELE_DEL');
2096: hr_utility.raise_error;
2097: end if;
2098: --
2099: -- Check to see if the error was at the eligibility level.
2100: --
2098: --
2099: -- Check to see if the error was at the eligibility level.
2100: --
2101: if v_asg_max_eligibility_date = v_current_effective_end_date then
2102: hr_utility.set_message(801, 'HR_6284_ELE_ENTRY_DT_ASG_DEL');
2103: hr_utility.raise_error;
2104: end if;
2105: end if;
2106: --
2099: -- Check to see if the error was at the eligibility level.
2100: --
2101: if v_asg_max_eligibility_date = v_current_effective_end_date then
2102: hr_utility.set_message(801, 'HR_6284_ELE_ENTRY_DT_ASG_DEL');
2103: hr_utility.raise_error;
2104: end if;
2105: end if;
2106: --
2107: -- Return the recurring effective end date
2203: -- date.
2204: begin
2205:
2206: if g_debug then
2207: hr_utility.trace('In hr_entry.chk_element_entry_eligibility');
2208: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
2209: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
2210: hr_utility.trace(' p_session_date : '|| p_session_date);
2211: hr_utility.trace(' p_usage : '|| p_usage);
2204: begin
2205:
2206: if g_debug then
2207: hr_utility.trace('In hr_entry.chk_element_entry_eligibility');
2208: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
2209: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
2210: hr_utility.trace(' p_session_date : '|| p_session_date);
2211: hr_utility.trace(' p_usage : '|| p_usage);
2212: hr_utility.trace(' p_creator_type : '|| p_creator_type);
2205:
2206: if g_debug then
2207: hr_utility.trace('In hr_entry.chk_element_entry_eligibility');
2208: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
2209: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
2210: hr_utility.trace(' p_session_date : '|| p_session_date);
2211: hr_utility.trace(' p_usage : '|| p_usage);
2212: hr_utility.trace(' p_creator_type : '|| p_creator_type);
2213: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
2206: if g_debug then
2207: hr_utility.trace('In hr_entry.chk_element_entry_eligibility');
2208: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
2209: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
2210: hr_utility.trace(' p_session_date : '|| p_session_date);
2211: hr_utility.trace(' p_usage : '|| p_usage);
2212: hr_utility.trace(' p_creator_type : '|| p_creator_type);
2213: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
2214: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
2207: hr_utility.trace('In hr_entry.chk_element_entry_eligibility');
2208: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
2209: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
2210: hr_utility.trace(' p_session_date : '|| p_session_date);
2211: hr_utility.trace(' p_usage : '|| p_usage);
2212: hr_utility.trace(' p_creator_type : '|| p_creator_type);
2213: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
2214: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
2215: hr_utility.trace(' p_time_period_start_date : '|| p_time_period_start_date);
2208: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
2209: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
2210: hr_utility.trace(' p_session_date : '|| p_session_date);
2211: hr_utility.trace(' p_usage : '|| p_usage);
2212: hr_utility.trace(' p_creator_type : '|| p_creator_type);
2213: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
2214: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
2215: hr_utility.trace(' p_time_period_start_date : '|| p_time_period_start_date);
2216: hr_utility.trace(' p_time_period_end_date : '|| p_time_period_end_date);
2209: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
2210: hr_utility.trace(' p_session_date : '|| p_session_date);
2211: hr_utility.trace(' p_usage : '|| p_usage);
2212: hr_utility.trace(' p_creator_type : '|| p_creator_type);
2213: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
2214: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
2215: hr_utility.trace(' p_time_period_start_date : '|| p_time_period_start_date);
2216: hr_utility.trace(' p_time_period_end_date : '|| p_time_period_end_date);
2217: end if;
2210: hr_utility.trace(' p_session_date : '|| p_session_date);
2211: hr_utility.trace(' p_usage : '|| p_usage);
2212: hr_utility.trace(' p_creator_type : '|| p_creator_type);
2213: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
2214: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
2215: hr_utility.trace(' p_time_period_start_date : '|| p_time_period_start_date);
2216: hr_utility.trace(' p_time_period_end_date : '|| p_time_period_end_date);
2217: end if;
2218: --
2211: hr_utility.trace(' p_usage : '|| p_usage);
2212: hr_utility.trace(' p_creator_type : '|| p_creator_type);
2213: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
2214: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
2215: hr_utility.trace(' p_time_period_start_date : '|| p_time_period_start_date);
2216: hr_utility.trace(' p_time_period_end_date : '|| p_time_period_end_date);
2217: end if;
2218: --
2219: -- Bug 5867658.
2212: hr_utility.trace(' p_creator_type : '|| p_creator_type);
2213: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
2214: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
2215: hr_utility.trace(' p_time_period_start_date : '|| p_time_period_start_date);
2216: hr_utility.trace(' p_time_period_end_date : '|| p_time_period_end_date);
2217: end if;
2218: --
2219: -- Bug 5867658.
2220: -- Ensure assignment is visible to (possibly secure) user before continuing.
2262: -- when inserting an nonrecurring entry.
2263: --
2264: if (greatest(p_validation_start_date,v_min_eligibility_date) < v_element_link_start_date) or
2265: (least(p_validation_end_date,v_max_eligibility_date) > v_element_link_end_date) then
2266: hr_utility.set_message(801, 'HR_6132_ELE_ENTRY_LINK_MISSING');
2267: hr_utility.raise_error;
2268: end if;
2269: */
2270: --
2263: --
2264: if (greatest(p_validation_start_date,v_min_eligibility_date) < v_element_link_start_date) or
2265: (least(p_validation_end_date,v_max_eligibility_date) > v_element_link_end_date) then
2266: hr_utility.set_message(801, 'HR_6132_ELE_ENTRY_LINK_MISSING');
2267: hr_utility.raise_error;
2268: end if;
2269: */
2270: --
2271: -- If the employee assignment has been terminated then we must ensure that
2272: -- the validation end date is before the element termination date.
2273: --
2274: if (v_element_term_rule_date is not null and
2275: (v_element_term_rule_date < p_validation_end_date)) then
2276: hr_utility.set_message(801, 'HR_6370_ELE_ENTRY_NO_TERM');
2277: hr_utility.raise_error;
2278: end if;
2279: --
2280: else
2273: --
2274: if (v_element_term_rule_date is not null and
2275: (v_element_term_rule_date < p_validation_end_date)) then
2276: hr_utility.set_message(801, 'HR_6370_ELE_ENTRY_NO_TERM');
2277: hr_utility.raise_error;
2278: end if;
2279: --
2280: else
2281: --
2282: -- Ensure that the element link does not terminate before the
2283: -- validation_end_date.
2284: --
2285: if (p_validation_end_date > v_element_link_end_date) then
2286: hr_utility.set_message(801, 'HR_6281_ELE_ENTRY_DT_DEL_LINK');
2287: hr_utility.raise_error;
2288: end if;
2289: --
2290: -- If the employee assignment has been terminated then we must ensure that
2283: -- validation_end_date.
2284: --
2285: if (p_validation_end_date > v_element_link_end_date) then
2286: hr_utility.set_message(801, 'HR_6281_ELE_ENTRY_DT_DEL_LINK');
2287: hr_utility.raise_error;
2288: end if;
2289: --
2290: -- If the employee assignment has been terminated then we must ensure that
2291: -- the validation end date is before the element termination date.
2291: -- the validation end date is before the element termination date.
2292: --
2293: if (v_element_term_rule_date is not null and
2294: (v_element_term_rule_date < p_validation_end_date)) then
2295: hr_utility.set_message(801, 'HR_6283_ELE_ENTRY_DT_ELE_DEL');
2296: hr_utility.raise_error;
2297: end if;
2298: --
2299: end if;
2292: --
2293: if (v_element_term_rule_date is not null and
2294: (v_element_term_rule_date < p_validation_end_date)) then
2295: hr_utility.set_message(801, 'HR_6283_ELE_ENTRY_DT_ELE_DEL');
2296: hr_utility.raise_error;
2297: end if;
2298: --
2299: end if;
2300: --
2302: -- for non INSERT cases. This is part of a change to
2303: -- fix bug 2183279.
2304: if(p_usage <> 'INSERT') then
2305: if (v_max_eligibility_date < p_validation_end_date) then
2306: hr_utility.set_message(801, 'HR_6284_ELE_ENTRY_DT_ASG_DEL');
2307: hr_utility.raise_error;
2308: end if;
2309: end if;
2310: --
2303: -- fix bug 2183279.
2304: if(p_usage <> 'INSERT') then
2305: if (v_max_eligibility_date < p_validation_end_date) then
2306: hr_utility.set_message(801, 'HR_6284_ELE_ENTRY_DT_ASG_DEL');
2307: hr_utility.raise_error;
2308: end if;
2309: end if;
2310: --
2311: end chk_element_entry_eligibility;
2414: --
2415: begin
2416: --
2417: if g_debug then
2418: hr_utility.trace('In hr_entry.chk_element_entry_open');
2419: hr_utility.trace(' p_element_type_id : '|| p_element_type_id);
2420: hr_utility.trace(' p_session_date : '|| p_session_date);
2421: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
2422: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
2415: begin
2416: --
2417: if g_debug then
2418: hr_utility.trace('In hr_entry.chk_element_entry_open');
2419: hr_utility.trace(' p_element_type_id : '|| p_element_type_id);
2420: hr_utility.trace(' p_session_date : '|| p_session_date);
2421: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
2422: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
2423: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
2416: --
2417: if g_debug then
2418: hr_utility.trace('In hr_entry.chk_element_entry_open');
2419: hr_utility.trace(' p_element_type_id : '|| p_element_type_id);
2420: hr_utility.trace(' p_session_date : '|| p_session_date);
2421: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
2422: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
2423: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
2424: end if;
2417: if g_debug then
2418: hr_utility.trace('In hr_entry.chk_element_entry_open');
2419: hr_utility.trace(' p_element_type_id : '|| p_element_type_id);
2420: hr_utility.trace(' p_session_date : '|| p_session_date);
2421: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
2422: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
2423: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
2424: end if;
2425: -- LOCK the element type table in share mode so that no other user can take
2418: hr_utility.trace('In hr_entry.chk_element_entry_open');
2419: hr_utility.trace(' p_element_type_id : '|| p_element_type_id);
2420: hr_utility.trace(' p_session_date : '|| p_session_date);
2421: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
2422: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
2423: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
2424: end if;
2425: -- LOCK the element type table in share mode so that no other user can take
2426: -- out an exclusive lock to change the data. This provides a stable view
2419: hr_utility.trace(' p_element_type_id : '|| p_element_type_id);
2420: hr_utility.trace(' p_session_date : '|| p_session_date);
2421: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
2422: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
2423: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
2424: end if;
2425: -- LOCK the element type table in share mode so that no other user can take
2426: -- out an exclusive lock to change the data. This provides a stable view
2427: -- of the element type table. See if the element type has been closed for
2433: p_validation_end_date) loop
2434: --
2435: if v_element_type.closed_for_entry_flag = 'Y' then
2436: --
2437: hr_utility.set_message(801, 'HR_6064_ELE_ENTRY_CLOSED_ELE');
2438: hr_utility.set_message_token('element_name',v_element_type.element_name);
2439: hr_utility.raise_error;
2440: --
2441: end if;
2434: --
2435: if v_element_type.closed_for_entry_flag = 'Y' then
2436: --
2437: hr_utility.set_message(801, 'HR_6064_ELE_ENTRY_CLOSED_ELE');
2438: hr_utility.set_message_token('element_name',v_element_type.element_name);
2439: hr_utility.raise_error;
2440: --
2441: end if;
2442: l_element_name := v_element_type.element_name;
2435: if v_element_type.closed_for_entry_flag = 'Y' then
2436: --
2437: hr_utility.set_message(801, 'HR_6064_ELE_ENTRY_CLOSED_ELE');
2438: hr_utility.set_message_token('element_name',v_element_type.element_name);
2439: hr_utility.raise_error;
2440: --
2441: end if;
2442: l_element_name := v_element_type.element_name;
2443: l_legislation_code := v_element_type.legislation_code;
2471: l_us_except := TRUE;
2472: end if;
2473:
2474: if not l_us_except then
2475: hr_utility.set_message(801, 'HR_6074_ELE_ENTRY_CLOSE_PERIOD');
2476: hr_utility.raise_error;
2477: end if;
2478: --
2479: end if;
2472: end if;
2473:
2474: if not l_us_except then
2475: hr_utility.set_message(801, 'HR_6074_ELE_ENTRY_CLOSE_PERIOD');
2476: hr_utility.raise_error;
2477: end if;
2478: --
2479: end if;
2480: --
2547: -- be converted into a screen format.
2548: -- v_value_format_out Holds the screen format value which has been
2549: -- converted.
2550: begin
2551: g_debug := hr_utility.debug_enabled;
2552: --
2553: -- Ensure that the p_min_max_def parameters contains either MINL, MAXL, DEF
2554: -- oe DEFL as a value.
2555: --
2558: p_min_max_def = 'DEFL' or
2559: p_min_max_def = 'DEF') then
2560: null;
2561: else
2562: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2563: hr_utility.set_message_token('PROCEDURE','hr_entry.derive_default_value');
2564: hr_utility.set_message_token('STEP',1);
2565: hr_utility.raise_error;
2566: end if;
2559: p_min_max_def = 'DEF') then
2560: null;
2561: else
2562: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2563: hr_utility.set_message_token('PROCEDURE','hr_entry.derive_default_value');
2564: hr_utility.set_message_token('STEP',1);
2565: hr_utility.raise_error;
2566: end if;
2567: --
2560: null;
2561: else
2562: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2563: hr_utility.set_message_token('PROCEDURE','hr_entry.derive_default_value');
2564: hr_utility.set_message_token('STEP',1);
2565: hr_utility.raise_error;
2566: end if;
2567: --
2568: -- Need to determine the input value unit of measure and if it is using
2561: else
2562: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2563: hr_utility.set_message_token('PROCEDURE','hr_entry.derive_default_value');
2564: hr_utility.set_message_token('STEP',1);
2565: hr_utility.raise_error;
2566: end if;
2567: --
2568: -- Need to determine the input value unit of measure and if it is using
2569: -- hot or cold defaults.
2568: -- Need to determine the input value unit of measure and if it is using
2569: -- hot or cold defaults.
2570: --
2571: if g_debug then
2572: hr_utility.set_location('hr_entry.derive_default_value', 2);
2573: end if;
2574: begin
2575: select iv.uom,
2576: iv.hot_default_flag,
2585: and p_session_date
2586: between iv.effective_start_date and iv.effective_end_date;
2587: exception
2588: when NO_DATA_FOUND then
2589: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2590: hr_utility.set_message_token('PROCEDURE',
2591: 'hr_entry.derive_default_value');
2592: hr_utility.set_message_token('STEP','2');
2593: hr_utility.raise_error;
2586: between iv.effective_start_date and iv.effective_end_date;
2587: exception
2588: when NO_DATA_FOUND then
2589: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2590: hr_utility.set_message_token('PROCEDURE',
2591: 'hr_entry.derive_default_value');
2592: hr_utility.set_message_token('STEP','2');
2593: hr_utility.raise_error;
2594: end;
2588: when NO_DATA_FOUND then
2589: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2590: hr_utility.set_message_token('PROCEDURE',
2591: 'hr_entry.derive_default_value');
2592: hr_utility.set_message_token('STEP','2');
2593: hr_utility.raise_error;
2594: end;
2595: --
2596: -- If using cold defaults then, we must select the value at the link level.
2589: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2590: hr_utility.set_message_token('PROCEDURE',
2591: 'hr_entry.derive_default_value');
2592: hr_utility.set_message_token('STEP','2');
2593: hr_utility.raise_error;
2594: end;
2595: --
2596: -- If using cold defaults then, we must select the value at the link level.
2597: --
2596: -- If using cold defaults then, we must select the value at the link level.
2597: --
2598: if v_hot_default_flag = 'N' then
2599: if g_debug then
2600: hr_utility.set_location('hr_entry.derive_default_value', 3);
2601: end if;
2602: begin
2603: -- INDEX hint added following NHS project recommendation
2604: select /*+ INDEX(l, pay_link_input_values_f_n2) */
2614: and p_session_date
2615: between l.effective_start_date and l.effective_end_date;
2616: exception
2617: when NO_DATA_FOUND then
2618: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2619: hr_utility.set_message_token('PROCEDURE',
2620: 'hr_entry.derive_default_value');
2621: hr_utility.set_message_token('STEP','3');
2622: hr_utility.raise_error;
2615: between l.effective_start_date and l.effective_end_date;
2616: exception
2617: when NO_DATA_FOUND then
2618: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2619: hr_utility.set_message_token('PROCEDURE',
2620: 'hr_entry.derive_default_value');
2621: hr_utility.set_message_token('STEP','3');
2622: hr_utility.raise_error;
2623: end;
2617: when NO_DATA_FOUND then
2618: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2619: hr_utility.set_message_token('PROCEDURE',
2620: 'hr_entry.derive_default_value');
2621: hr_utility.set_message_token('STEP','3');
2622: hr_utility.raise_error;
2623: end;
2624: else
2625: --
2618: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2619: hr_utility.set_message_token('PROCEDURE',
2620: 'hr_entry.derive_default_value');
2621: hr_utility.set_message_token('STEP','3');
2622: hr_utility.raise_error;
2623: end;
2624: else
2625: --
2626: -- The input is hot defaulted therefore we can deduce that the values held
2628: -- the hot default values and encapsulated in quotations (").
2629: --
2630: if (p_min_max_def = 'DEF') then
2631: if g_debug then
2632: hr_utility.set_location('hr_entry.derive_default_value', 4);
2633: end if;
2634: begin
2635: select decode(l.default_value,
2636: '',i.default_value,
2646: and p_session_date
2647: between l.effective_start_date and l.effective_end_date;
2648: exception
2649: when NO_DATA_FOUND then
2650: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2651: hr_utility.set_message_token('PROCEDURE',
2652: 'hr_entry.derive_default_value');
2653: hr_utility.set_message_token('STEP','4');
2654: hr_utility.raise_error;
2647: between l.effective_start_date and l.effective_end_date;
2648: exception
2649: when NO_DATA_FOUND then
2650: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2651: hr_utility.set_message_token('PROCEDURE',
2652: 'hr_entry.derive_default_value');
2653: hr_utility.set_message_token('STEP','4');
2654: hr_utility.raise_error;
2655: end;
2649: when NO_DATA_FOUND then
2650: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2651: hr_utility.set_message_token('PROCEDURE',
2652: 'hr_entry.derive_default_value');
2653: hr_utility.set_message_token('STEP','4');
2654: hr_utility.raise_error;
2655: end;
2656: else
2657: if g_debug then
2650: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2651: hr_utility.set_message_token('PROCEDURE',
2652: 'hr_entry.derive_default_value');
2653: hr_utility.set_message_token('STEP','4');
2654: hr_utility.raise_error;
2655: end;
2656: else
2657: if g_debug then
2658: hr_utility.set_location('hr_entry.derive_default_value', 5);
2654: hr_utility.raise_error;
2655: end;
2656: else
2657: if g_debug then
2658: hr_utility.set_location('hr_entry.derive_default_value', 5);
2659: end if;
2660: begin
2661: select i.default_value,
2662: i.min_value,
2669: and p_session_date
2670: between i.effective_start_date and i.effective_end_date;
2671: exception
2672: when NO_DATA_FOUND then
2673: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2674: hr_utility.set_message_token('PROCEDURE',
2675: 'hr_entry.derive_default_value');
2676: hr_utility.set_message_token('STEP','5');
2677: hr_utility.raise_error;
2670: between i.effective_start_date and i.effective_end_date;
2671: exception
2672: when NO_DATA_FOUND then
2673: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2674: hr_utility.set_message_token('PROCEDURE',
2675: 'hr_entry.derive_default_value');
2676: hr_utility.set_message_token('STEP','5');
2677: hr_utility.raise_error;
2678: end;
2672: when NO_DATA_FOUND then
2673: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2674: hr_utility.set_message_token('PROCEDURE',
2675: 'hr_entry.derive_default_value');
2676: hr_utility.set_message_token('STEP','5');
2677: hr_utility.raise_error;
2678: end;
2679: end if;
2680: --
2673: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2674: hr_utility.set_message_token('PROCEDURE',
2675: 'hr_entry.derive_default_value');
2676: hr_utility.set_message_token('STEP','5');
2677: hr_utility.raise_error;
2678: end;
2679: end if;
2680: --
2681: end if;
2697: --
2698: if (v_lookup_type is not null and
2699: v_value_format_in is not null) then
2700: if g_debug then
2701: hr_utility.set_location('hr_entry.derive_default_value', 6);
2702: end if;
2703: begin
2704: select h.meaning
2705: into v_value_format_out
2707: where h.lookup_type = v_lookup_type
2708: and h.lookup_code = v_value_format_in;
2709: exception
2710: when NO_DATA_FOUND then
2711: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2712: hr_utility.set_message_token('PROCEDURE',
2713: 'hr_entry.derive_default_value');
2714: hr_utility.set_message_token('STEP','6');
2715: hr_utility.raise_error;
2708: and h.lookup_code = v_value_format_in;
2709: exception
2710: when NO_DATA_FOUND then
2711: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2712: hr_utility.set_message_token('PROCEDURE',
2713: 'hr_entry.derive_default_value');
2714: hr_utility.set_message_token('STEP','6');
2715: hr_utility.raise_error;
2716: end;
2710: when NO_DATA_FOUND then
2711: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2712: hr_utility.set_message_token('PROCEDURE',
2713: 'hr_entry.derive_default_value');
2714: hr_utility.set_message_token('STEP','6');
2715: hr_utility.raise_error;
2716: end;
2717: --
2718: -- Enhancement 2793978
2711: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2712: hr_utility.set_message_token('PROCEDURE',
2713: 'hr_entry.derive_default_value');
2714: hr_utility.set_message_token('STEP','6');
2715: hr_utility.raise_error;
2716: end;
2717: --
2718: -- Enhancement 2793978
2719: -- If the value uses a value set for validation we need to decode
2721: --
2722: elsif (v_value_set_id is not null and
2723: v_value_format_in is not null) then
2724: if g_debug then
2725: hr_utility.set_location('hr_entry.derive_default_value', 7);
2726: end if;
2727: v_value_format_out := pay_input_values_pkg.decode_vset_value(
2728: v_value_set_id,v_value_format_in);
2729: if v_value_format_out is null then
2730: --
2731: -- The value must have been invalid for the value set since no
2732: -- corresponding meaning was found, raise an error
2733: --
2734: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
2735: hr_utility.set_message_token('PROCEDURE',
2736: 'hr_entry.derive_default_value');
2737: hr_utility.set_message_token('STEP','7');
2738: hr_utility.raise_error;
2731: -- The value must have been invalid for the value set since no
2732: -- corresponding meaning was found, raise an error
2733: --
2734: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
2735: hr_utility.set_message_token('PROCEDURE',
2736: 'hr_entry.derive_default_value');
2737: hr_utility.set_message_token('STEP','7');
2738: hr_utility.raise_error;
2739: end if;
2733: --
2734: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
2735: hr_utility.set_message_token('PROCEDURE',
2736: 'hr_entry.derive_default_value');
2737: hr_utility.set_message_token('STEP','7');
2738: hr_utility.raise_error;
2739: end if;
2740: else
2741: hr_chkfmt.changeformat (v_value_format_in,
2734: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
2735: hr_utility.set_message_token('PROCEDURE',
2736: 'hr_entry.derive_default_value');
2737: hr_utility.set_message_token('STEP','7');
2738: hr_utility.raise_error;
2739: end if;
2740: else
2741: hr_chkfmt.changeformat (v_value_format_in,
2742: v_value_format_out,
2782: v_name varchar2(80);
2783: v_default_value varchar2(60);
2784: --
2785: begin
2786: g_debug := hr_utility.debug_enabled;
2787: if g_debug then
2788: hr_utility.set_location ('hr_entry.chk_mandatory_input_value',1);
2789: end if;
2790: hr_general.assert_condition (p_session_date = trunc (p_session_date)
2784: --
2785: begin
2786: g_debug := hr_utility.debug_enabled;
2787: if g_debug then
2788: hr_utility.set_location ('hr_entry.chk_mandatory_input_value',1);
2789: end if;
2790: hr_general.assert_condition (p_session_date = trunc (p_session_date)
2791: and p_input_value_id is not null
2792: and p_session_date is not null);
2793: --
2794: if (p_input_value_id is not null and
2795: p_entry_value is null) then
2796: if g_debug then
2797: hr_utility.set_location('hr_entry.chk_mandatory_input_value', 1);
2798: end if;
2799: --
2800: -- Select the hot/mandatory flag details.
2801: --
2815: between i.effective_start_date
2816: and i.effective_end_date;
2817: exception
2818: when NO_DATA_FOUND then
2819: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2820: hr_utility.set_message_token('PROCEDURE',
2821: 'hr_entry.chk_mandatory_input_value');
2822: hr_utility.set_message_token('STEP','1');
2823: hr_utility.raise_error;
2816: and i.effective_end_date;
2817: exception
2818: when NO_DATA_FOUND then
2819: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2820: hr_utility.set_message_token('PROCEDURE',
2821: 'hr_entry.chk_mandatory_input_value');
2822: hr_utility.set_message_token('STEP','1');
2823: hr_utility.raise_error;
2824: end;
2818: when NO_DATA_FOUND then
2819: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2820: hr_utility.set_message_token('PROCEDURE',
2821: 'hr_entry.chk_mandatory_input_value');
2822: hr_utility.set_message_token('STEP','1');
2823: hr_utility.raise_error;
2824: end;
2825: --
2826: -- If the input value is mandatory ensure a value exists.
2819: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
2820: hr_utility.set_message_token('PROCEDURE',
2821: 'hr_entry.chk_mandatory_input_value');
2822: hr_utility.set_message_token('STEP','1');
2823: hr_utility.raise_error;
2824: end;
2825: --
2826: -- If the input value is mandatory ensure a value exists.
2827: --
2829: if v_hot_default_flag = 'N' then
2830: --
2831: -- Cold check.
2832: --
2833: hr_utility.set_message(801, 'HR_6127_ELE_ENTRY_VALUE_MAND');
2834: hr_utility.set_message_token('INPUT_VALUE_NAME',v_name);
2835: hr_utility.raise_error;
2836: else
2837: --
2830: --
2831: -- Cold check.
2832: --
2833: hr_utility.set_message(801, 'HR_6127_ELE_ENTRY_VALUE_MAND');
2834: hr_utility.set_message_token('INPUT_VALUE_NAME',v_name);
2835: hr_utility.raise_error;
2836: else
2837: --
2838: -- Hot check.
2831: -- Cold check.
2832: --
2833: hr_utility.set_message(801, 'HR_6127_ELE_ENTRY_VALUE_MAND');
2834: hr_utility.set_message_token('INPUT_VALUE_NAME',v_name);
2835: hr_utility.raise_error;
2836: else
2837: --
2838: -- Hot check.
2839: --
2837: --
2838: -- Hot check.
2839: --
2840: if g_debug then
2841: hr_utility.set_location('hr_entry.chk_mandatory_input_value', 5);
2842: end if;
2843: begin
2844: select nvl(l.default_value,i.default_value)
2845: into v_default_value
2854: between l.effective_start_date and l.effective_end_date;
2855: end;
2856: --
2857: if v_default_value is null then
2858: hr_utility.set_message(801, 'HR_6128_ELE_ENTRY_MAND_HOT');
2859: hr_utility.set_message_token('INPUT_VALUE_NAME',v_name);
2860: hr_utility.raise_error;
2861: end if;
2862: end if;
2855: end;
2856: --
2857: if v_default_value is null then
2858: hr_utility.set_message(801, 'HR_6128_ELE_ENTRY_MAND_HOT');
2859: hr_utility.set_message_token('INPUT_VALUE_NAME',v_name);
2860: hr_utility.raise_error;
2861: end if;
2862: end if;
2863: end if;
2856: --
2857: if v_default_value is null then
2858: hr_utility.set_message(801, 'HR_6128_ELE_ENTRY_MAND_HOT');
2859: hr_utility.set_message_token('INPUT_VALUE_NAME',v_name);
2860: hr_utility.raise_error;
2861: end if;
2862: end if;
2863: end if;
2864: end if;
2874: ) is
2875: --
2876: begin
2877: if g_debug then
2878: hr_utility.set_location ('hr_entry.chk_mandatory_entry_values',1);
2879: end if;
2880: hr_general.assert_condition (
2881: p_validation_start_date = trunc (p_validation_start_date));
2882: --
2942: p_usage in varchar2,
2943: p_target_entry_id in number
2944: ) is
2945: begin
2946: g_debug := hr_utility.debug_enabled;
2947:
2948: if g_debug then
2949:
2950: hr_utility.trace('In hr_entry.chk_element_entry');
2946: g_debug := hr_utility.debug_enabled;
2947:
2948: if g_debug then
2949:
2950: hr_utility.trace('In hr_entry.chk_element_entry');
2951: hr_utility.trace(' p_element_entry_id : '|| p_element_entry_id);
2952: hr_utility.trace(' p_original_entry_id : '|| p_original_entry_id);
2953: hr_utility.trace(' p_session_date : '|| p_session_date);
2954: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
2947:
2948: if g_debug then
2949:
2950: hr_utility.trace('In hr_entry.chk_element_entry');
2951: hr_utility.trace(' p_element_entry_id : '|| p_element_entry_id);
2952: hr_utility.trace(' p_original_entry_id : '|| p_original_entry_id);
2953: hr_utility.trace(' p_session_date : '|| p_session_date);
2954: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
2955: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
2948: if g_debug then
2949:
2950: hr_utility.trace('In hr_entry.chk_element_entry');
2951: hr_utility.trace(' p_element_entry_id : '|| p_element_entry_id);
2952: hr_utility.trace(' p_original_entry_id : '|| p_original_entry_id);
2953: hr_utility.trace(' p_session_date : '|| p_session_date);
2954: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
2955: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
2956: hr_utility.trace(' p_entry_type : '|| p_entry_type);
2949:
2950: hr_utility.trace('In hr_entry.chk_element_entry');
2951: hr_utility.trace(' p_element_entry_id : '|| p_element_entry_id);
2952: hr_utility.trace(' p_original_entry_id : '|| p_original_entry_id);
2953: hr_utility.trace(' p_session_date : '|| p_session_date);
2954: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
2955: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
2956: hr_utility.trace(' p_entry_type : '|| p_entry_type);
2957: hr_utility.trace(' p_effective_start_date : '|| p_effective_start_date);
2950: hr_utility.trace('In hr_entry.chk_element_entry');
2951: hr_utility.trace(' p_element_entry_id : '|| p_element_entry_id);
2952: hr_utility.trace(' p_original_entry_id : '|| p_original_entry_id);
2953: hr_utility.trace(' p_session_date : '|| p_session_date);
2954: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
2955: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
2956: hr_utility.trace(' p_entry_type : '|| p_entry_type);
2957: hr_utility.trace(' p_effective_start_date : '|| p_effective_start_date);
2958: hr_utility.trace(' p_effective_end_date : '|| p_effective_end_date);
2951: hr_utility.trace(' p_element_entry_id : '|| p_element_entry_id);
2952: hr_utility.trace(' p_original_entry_id : '|| p_original_entry_id);
2953: hr_utility.trace(' p_session_date : '|| p_session_date);
2954: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
2955: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
2956: hr_utility.trace(' p_entry_type : '|| p_entry_type);
2957: hr_utility.trace(' p_effective_start_date : '|| p_effective_start_date);
2958: hr_utility.trace(' p_effective_end_date : '|| p_effective_end_date);
2959: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
2952: hr_utility.trace(' p_original_entry_id : '|| p_original_entry_id);
2953: hr_utility.trace(' p_session_date : '|| p_session_date);
2954: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
2955: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
2956: hr_utility.trace(' p_entry_type : '|| p_entry_type);
2957: hr_utility.trace(' p_effective_start_date : '|| p_effective_start_date);
2958: hr_utility.trace(' p_effective_end_date : '|| p_effective_end_date);
2959: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
2960: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
2953: hr_utility.trace(' p_session_date : '|| p_session_date);
2954: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
2955: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
2956: hr_utility.trace(' p_entry_type : '|| p_entry_type);
2957: hr_utility.trace(' p_effective_start_date : '|| p_effective_start_date);
2958: hr_utility.trace(' p_effective_end_date : '|| p_effective_end_date);
2959: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
2960: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
2961: hr_utility.trace(' p_dt_update_mode : '|| p_dt_update_mode);
2954: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
2955: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
2956: hr_utility.trace(' p_entry_type : '|| p_entry_type);
2957: hr_utility.trace(' p_effective_start_date : '|| p_effective_start_date);
2958: hr_utility.trace(' p_effective_end_date : '|| p_effective_end_date);
2959: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
2960: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
2961: hr_utility.trace(' p_dt_update_mode : '|| p_dt_update_mode);
2962: hr_utility.trace(' p_dt_delete_mode : '|| p_dt_delete_mode);
2955: hr_utility.trace(' p_assignment_id : '|| p_assignment_id);
2956: hr_utility.trace(' p_entry_type : '|| p_entry_type);
2957: hr_utility.trace(' p_effective_start_date : '|| p_effective_start_date);
2958: hr_utility.trace(' p_effective_end_date : '|| p_effective_end_date);
2959: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
2960: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
2961: hr_utility.trace(' p_dt_update_mode : '|| p_dt_update_mode);
2962: hr_utility.trace(' p_dt_delete_mode : '|| p_dt_delete_mode);
2963: hr_utility.trace(' p_usage : '|| p_usage);
2956: hr_utility.trace(' p_entry_type : '|| p_entry_type);
2957: hr_utility.trace(' p_effective_start_date : '|| p_effective_start_date);
2958: hr_utility.trace(' p_effective_end_date : '|| p_effective_end_date);
2959: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
2960: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
2961: hr_utility.trace(' p_dt_update_mode : '|| p_dt_update_mode);
2962: hr_utility.trace(' p_dt_delete_mode : '|| p_dt_delete_mode);
2963: hr_utility.trace(' p_usage : '|| p_usage);
2964: hr_utility.trace(' p_target_entry_id : '|| p_target_entry_id);
2957: hr_utility.trace(' p_effective_start_date : '|| p_effective_start_date);
2958: hr_utility.trace(' p_effective_end_date : '|| p_effective_end_date);
2959: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
2960: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
2961: hr_utility.trace(' p_dt_update_mode : '|| p_dt_update_mode);
2962: hr_utility.trace(' p_dt_delete_mode : '|| p_dt_delete_mode);
2963: hr_utility.trace(' p_usage : '|| p_usage);
2964: hr_utility.trace(' p_target_entry_id : '|| p_target_entry_id);
2965:
2958: hr_utility.trace(' p_effective_end_date : '|| p_effective_end_date);
2959: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
2960: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
2961: hr_utility.trace(' p_dt_update_mode : '|| p_dt_update_mode);
2962: hr_utility.trace(' p_dt_delete_mode : '|| p_dt_delete_mode);
2963: hr_utility.trace(' p_usage : '|| p_usage);
2964: hr_utility.trace(' p_target_entry_id : '|| p_target_entry_id);
2965:
2966: end if;
2959: hr_utility.trace(' p_validation_start_date : '|| p_validation_start_date);
2960: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
2961: hr_utility.trace(' p_dt_update_mode : '|| p_dt_update_mode);
2962: hr_utility.trace(' p_dt_delete_mode : '|| p_dt_delete_mode);
2963: hr_utility.trace(' p_usage : '|| p_usage);
2964: hr_utility.trace(' p_target_entry_id : '|| p_target_entry_id);
2965:
2966: end if;
2967: --
2960: hr_utility.trace(' p_validation_end_date : '|| p_validation_end_date);
2961: hr_utility.trace(' p_dt_update_mode : '|| p_dt_update_mode);
2962: hr_utility.trace(' p_dt_delete_mode : '|| p_dt_delete_mode);
2963: hr_utility.trace(' p_usage : '|| p_usage);
2964: hr_utility.trace(' p_target_entry_id : '|| p_target_entry_id);
2965:
2966: end if;
2967: --
2968: -- simply call chk_element_entry_main with a null p_creator_type
3108: --
3109: v_dummy varchar2(1);
3110:
3111: begin
3112: g_debug := hr_utility.debug_enabled;
3113: --
3114: if g_debug then
3115: hr_utility.set_location('hr_entry.chk_element_entry_main', 5);
3116: end if;
3111: begin
3112: g_debug := hr_utility.debug_enabled;
3113: --
3114: if g_debug then
3115: hr_utility.set_location('hr_entry.chk_element_entry_main', 5);
3116: end if;
3117: --
3118: -- Fetch element type information relevent to the creation of element
3119: -- entries
3144: and p_session_date between et.effective_start_date
3145: and et.effective_end_date;
3146:
3147: if g_debug then
3148: hr_utility.trace(' v_element_type_id : '|| v_element_type_id);
3149: hr_utility.trace(' v_processing_type : '|| v_processing_type);
3150: hr_utility.trace(' v_mult_entries_allowed_flag : '|| v_mult_entries_allowed_flag);
3151: hr_utility.trace(' v_third_party_pay_only_flag : '|| v_third_party_pay_only_flag);
3152: hr_utility.trace(' v_element_name : '|| v_element_name);
3145: and et.effective_end_date;
3146:
3147: if g_debug then
3148: hr_utility.trace(' v_element_type_id : '|| v_element_type_id);
3149: hr_utility.trace(' v_processing_type : '|| v_processing_type);
3150: hr_utility.trace(' v_mult_entries_allowed_flag : '|| v_mult_entries_allowed_flag);
3151: hr_utility.trace(' v_third_party_pay_only_flag : '|| v_third_party_pay_only_flag);
3152: hr_utility.trace(' v_element_name : '|| v_element_name);
3153: hr_utility.trace(' v_classification_name : '|| v_classification_name);
3146:
3147: if g_debug then
3148: hr_utility.trace(' v_element_type_id : '|| v_element_type_id);
3149: hr_utility.trace(' v_processing_type : '|| v_processing_type);
3150: hr_utility.trace(' v_mult_entries_allowed_flag : '|| v_mult_entries_allowed_flag);
3151: hr_utility.trace(' v_third_party_pay_only_flag : '|| v_third_party_pay_only_flag);
3152: hr_utility.trace(' v_element_name : '|| v_element_name);
3153: hr_utility.trace(' v_classification_name : '|| v_classification_name);
3154:
3147: if g_debug then
3148: hr_utility.trace(' v_element_type_id : '|| v_element_type_id);
3149: hr_utility.trace(' v_processing_type : '|| v_processing_type);
3150: hr_utility.trace(' v_mult_entries_allowed_flag : '|| v_mult_entries_allowed_flag);
3151: hr_utility.trace(' v_third_party_pay_only_flag : '|| v_third_party_pay_only_flag);
3152: hr_utility.trace(' v_element_name : '|| v_element_name);
3153: hr_utility.trace(' v_classification_name : '|| v_classification_name);
3154:
3155: end if;
3148: hr_utility.trace(' v_element_type_id : '|| v_element_type_id);
3149: hr_utility.trace(' v_processing_type : '|| v_processing_type);
3150: hr_utility.trace(' v_mult_entries_allowed_flag : '|| v_mult_entries_allowed_flag);
3151: hr_utility.trace(' v_third_party_pay_only_flag : '|| v_third_party_pay_only_flag);
3152: hr_utility.trace(' v_element_name : '|| v_element_name);
3153: hr_utility.trace(' v_classification_name : '|| v_classification_name);
3154:
3155: end if;
3156: --
3149: hr_utility.trace(' v_processing_type : '|| v_processing_type);
3150: hr_utility.trace(' v_mult_entries_allowed_flag : '|| v_mult_entries_allowed_flag);
3151: hr_utility.trace(' v_third_party_pay_only_flag : '|| v_third_party_pay_only_flag);
3152: hr_utility.trace(' v_element_name : '|| v_element_name);
3153: hr_utility.trace(' v_classification_name : '|| v_classification_name);
3154:
3155: end if;
3156: --
3157: -- Bugfix 2866619
3165: and asg.effective_end_date;
3166: --
3167:
3168: if g_debug then
3169: hr_utility.trace(' v_assignment_type : '|| v_assignment_type);
3170: hr_utility.trace(' v_assignment_number : '|| v_assignment_number);
3171: end if;
3172:
3173: exception
3166: --
3167:
3168: if g_debug then
3169: hr_utility.trace(' v_assignment_type : '|| v_assignment_type);
3170: hr_utility.trace(' v_assignment_number : '|| v_assignment_number);
3171: end if;
3172:
3173: exception
3174: when no_data_found then
3171: end if;
3172:
3173: exception
3174: when no_data_found then
3175: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
3176: hr_utility.set_message_token('PROCEDURE',
3177: 'hr_entry.chk_element_entry');
3178: hr_utility.set_message_token('STEP','1');
3179: hr_utility.raise_error;
3172:
3173: exception
3174: when no_data_found then
3175: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
3176: hr_utility.set_message_token('PROCEDURE',
3177: 'hr_entry.chk_element_entry');
3178: hr_utility.set_message_token('STEP','1');
3179: hr_utility.raise_error;
3180: end;
3174: when no_data_found then
3175: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
3176: hr_utility.set_message_token('PROCEDURE',
3177: 'hr_entry.chk_element_entry');
3178: hr_utility.set_message_token('STEP','1');
3179: hr_utility.raise_error;
3180: end;
3181: --
3182: -- Bugfix 2866619
3175: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
3176: hr_utility.set_message_token('PROCEDURE',
3177: 'hr_entry.chk_element_entry');
3178: hr_utility.set_message_token('STEP','1');
3179: hr_utility.raise_error;
3180: end;
3181: --
3182: -- Bugfix 2866619
3183: -- Check the assignment type to ensure assignment is eligible for
3188: --
3189: -- Contingent workers can only have recurring entries of
3190: -- 'Information' classification
3191: --
3192: hr_utility.set_message(801, 'HR_33155_ENTRY_INVALID_FOR_CWK');
3193: hr_utility.set_message_token('ELEMENT_NAME',v_element_name);
3194: hr_utility.set_message_token('ASSIGNMENT_NUMBER',v_assignment_number);
3195: hr_utility.set_message_token('SESSION_DATE',to_char(p_session_date));
3196: hr_utility.raise_error;
3189: -- Contingent workers can only have recurring entries of
3190: -- 'Information' classification
3191: --
3192: hr_utility.set_message(801, 'HR_33155_ENTRY_INVALID_FOR_CWK');
3193: hr_utility.set_message_token('ELEMENT_NAME',v_element_name);
3194: hr_utility.set_message_token('ASSIGNMENT_NUMBER',v_assignment_number);
3195: hr_utility.set_message_token('SESSION_DATE',to_char(p_session_date));
3196: hr_utility.raise_error;
3197: --
3190: -- 'Information' classification
3191: --
3192: hr_utility.set_message(801, 'HR_33155_ENTRY_INVALID_FOR_CWK');
3193: hr_utility.set_message_token('ELEMENT_NAME',v_element_name);
3194: hr_utility.set_message_token('ASSIGNMENT_NUMBER',v_assignment_number);
3195: hr_utility.set_message_token('SESSION_DATE',to_char(p_session_date));
3196: hr_utility.raise_error;
3197: --
3198: elsif v_assignment_type = 'C' and v_processing_type = 'R'
3191: --
3192: hr_utility.set_message(801, 'HR_33155_ENTRY_INVALID_FOR_CWK');
3193: hr_utility.set_message_token('ELEMENT_NAME',v_element_name);
3194: hr_utility.set_message_token('ASSIGNMENT_NUMBER',v_assignment_number);
3195: hr_utility.set_message_token('SESSION_DATE',to_char(p_session_date));
3196: hr_utility.raise_error;
3197: --
3198: elsif v_assignment_type = 'C' and v_processing_type = 'R'
3199: and v_classification_name = 'Information' then
3192: hr_utility.set_message(801, 'HR_33155_ENTRY_INVALID_FOR_CWK');
3193: hr_utility.set_message_token('ELEMENT_NAME',v_element_name);
3194: hr_utility.set_message_token('ASSIGNMENT_NUMBER',v_assignment_number);
3195: hr_utility.set_message_token('SESSION_DATE',to_char(p_session_date));
3196: hr_utility.raise_error;
3197: --
3198: elsif v_assignment_type = 'C' and v_processing_type = 'R'
3199: and v_classification_name = 'Information' then
3200: --
3205: --
3206: if c_cwk_element_check%found then
3207: close c_cwk_element_check;
3208: --
3209: hr_utility.set_message(801, 'HR_33155_ENTRY_INVALID_FOR_CWK');
3210: hr_utility.set_message_token('ELEMENT_NAME',v_element_name);
3211: hr_utility.set_message_token('ASSIGNMENT_NUMBER',v_assignment_number);
3212: hr_utility.set_message_token('SESSION_DATE',to_char(p_session_date));
3213: hr_utility.raise_error;
3206: if c_cwk_element_check%found then
3207: close c_cwk_element_check;
3208: --
3209: hr_utility.set_message(801, 'HR_33155_ENTRY_INVALID_FOR_CWK');
3210: hr_utility.set_message_token('ELEMENT_NAME',v_element_name);
3211: hr_utility.set_message_token('ASSIGNMENT_NUMBER',v_assignment_number);
3212: hr_utility.set_message_token('SESSION_DATE',to_char(p_session_date));
3213: hr_utility.raise_error;
3214: --
3207: close c_cwk_element_check;
3208: --
3209: hr_utility.set_message(801, 'HR_33155_ENTRY_INVALID_FOR_CWK');
3210: hr_utility.set_message_token('ELEMENT_NAME',v_element_name);
3211: hr_utility.set_message_token('ASSIGNMENT_NUMBER',v_assignment_number);
3212: hr_utility.set_message_token('SESSION_DATE',to_char(p_session_date));
3213: hr_utility.raise_error;
3214: --
3215: end if;
3208: --
3209: hr_utility.set_message(801, 'HR_33155_ENTRY_INVALID_FOR_CWK');
3210: hr_utility.set_message_token('ELEMENT_NAME',v_element_name);
3211: hr_utility.set_message_token('ASSIGNMENT_NUMBER',v_assignment_number);
3212: hr_utility.set_message_token('SESSION_DATE',to_char(p_session_date));
3213: hr_utility.raise_error;
3214: --
3215: end if;
3216: close c_cwk_element_check;
3209: hr_utility.set_message(801, 'HR_33155_ENTRY_INVALID_FOR_CWK');
3210: hr_utility.set_message_token('ELEMENT_NAME',v_element_name);
3211: hr_utility.set_message_token('ASSIGNMENT_NUMBER',v_assignment_number);
3212: hr_utility.set_message_token('SESSION_DATE',to_char(p_session_date));
3213: hr_utility.raise_error;
3214: --
3215: end if;
3216: close c_cwk_element_check;
3217: --
3230: (p_dt_delete_mode = 'DELETE_NEXT_CHANGE' and
3231: p_validation_end_date = hr_general.end_of_time)) then
3232: --
3233: if g_debug then
3234: hr_utility.set_location('hr_entry.chk_element_entry_main', 10);
3235: end if;
3236: --
3237: -- If we are inserting or doing date-effective delete next/future
3238: -- changes then we must set the effective_end_date to be passed back
3263: v_validation_end_date := p_validation_end_date;
3264: end if;
3265:
3266: if g_debug then
3267: hr_utility.trace(' v_validation_start_date : '|| v_validation_start_date);
3268: hr_utility.trace(' v_validation_end_date : '|| v_validation_end_date);
3269: end if;
3270: --
3271: -- As the entry is nonrecurring:
3264: end if;
3265:
3266: if g_debug then
3267: hr_utility.trace(' v_validation_start_date : '|| v_validation_start_date);
3268: hr_utility.trace(' v_validation_end_date : '|| v_validation_end_date);
3269: end if;
3270: --
3271: -- As the entry is nonrecurring:
3272: --
3272: --
3273: else
3274: --
3275: if g_debug then
3276: hr_utility.set_location('hr_entry.chk_element_entry_main', 15);
3277: end if;
3278: /*Bug 8798020 Added below call to get the eligibility dates */
3279: /*Bug 12829063 Passing the creator type as p_creator_type instead of null*/
3280: If nvl(p_dt_delete_mode,'NULL') <> 'ZAP' then
3291: p_max_eligibility_date =>v_max_eligible_date
3292: );
3293:
3294: if g_debug then
3295: hr_utility.trace(' v_min_eligible_date : '|| to_char(v_min_eligible_date,'DD-MON-YYYY'));
3296: hr_utility.trace(' v_max_eligible_date : '|| to_char(v_max_eligible_date,'DD-MON-YYYY'));
3297: end if;
3298:
3299: --
3292: );
3293:
3294: if g_debug then
3295: hr_utility.trace(' v_min_eligible_date : '|| to_char(v_min_eligible_date,'DD-MON-YYYY'));
3296: hr_utility.trace(' v_max_eligible_date : '|| to_char(v_max_eligible_date,'DD-MON-YYYY'));
3297: end if;
3298:
3299: --
3300: -- Validate that it is OK to create a nonrecurring entry ie. assignment
3310: v_period_start_date,
3311: v_period_end_date);
3312: --
3313: if g_debug then
3314: hr_utility.trace(' v_payroll_id : '|| v_payroll_id);
3315: hr_utility.trace(' v_period_start_date: '||to_char(v_period_start_date,'DD-MON-YYYY'));
3316: hr_utility.trace(' v_period_end_date: '||to_char(v_period_end_date,'DD-MON-YYYY'));
3317: hr_utility.trace(' v_validation_start_date: '||to_char(v_validation_start_date,'DD-MON-YYYY'));
3318: hr_utility.trace(' v_validation_end_date: '||to_char(v_validation_end_date,'DD-MON-YYYY'));
3311: v_period_end_date);
3312: --
3313: if g_debug then
3314: hr_utility.trace(' v_payroll_id : '|| v_payroll_id);
3315: hr_utility.trace(' v_period_start_date: '||to_char(v_period_start_date,'DD-MON-YYYY'));
3316: hr_utility.trace(' v_period_end_date: '||to_char(v_period_end_date,'DD-MON-YYYY'));
3317: hr_utility.trace(' v_validation_start_date: '||to_char(v_validation_start_date,'DD-MON-YYYY'));
3318: hr_utility.trace(' v_validation_end_date: '||to_char(v_validation_end_date,'DD-MON-YYYY'));
3319: end if;
3312: --
3313: if g_debug then
3314: hr_utility.trace(' v_payroll_id : '|| v_payroll_id);
3315: hr_utility.trace(' v_period_start_date: '||to_char(v_period_start_date,'DD-MON-YYYY'));
3316: hr_utility.trace(' v_period_end_date: '||to_char(v_period_end_date,'DD-MON-YYYY'));
3317: hr_utility.trace(' v_validation_start_date: '||to_char(v_validation_start_date,'DD-MON-YYYY'));
3318: hr_utility.trace(' v_validation_end_date: '||to_char(v_validation_end_date,'DD-MON-YYYY'));
3319: end if;
3320:
3313: if g_debug then
3314: hr_utility.trace(' v_payroll_id : '|| v_payroll_id);
3315: hr_utility.trace(' v_period_start_date: '||to_char(v_period_start_date,'DD-MON-YYYY'));
3316: hr_utility.trace(' v_period_end_date: '||to_char(v_period_end_date,'DD-MON-YYYY'));
3317: hr_utility.trace(' v_validation_start_date: '||to_char(v_validation_start_date,'DD-MON-YYYY'));
3318: hr_utility.trace(' v_validation_end_date: '||to_char(v_validation_end_date,'DD-MON-YYYY'));
3319: end if;
3320:
3321: /*Bug 8798020 Added below code to take the eligible dates */
3314: hr_utility.trace(' v_payroll_id : '|| v_payroll_id);
3315: hr_utility.trace(' v_period_start_date: '||to_char(v_period_start_date,'DD-MON-YYYY'));
3316: hr_utility.trace(' v_period_end_date: '||to_char(v_period_end_date,'DD-MON-YYYY'));
3317: hr_utility.trace(' v_validation_start_date: '||to_char(v_validation_start_date,'DD-MON-YYYY'));
3318: hr_utility.trace(' v_validation_end_date: '||to_char(v_validation_end_date,'DD-MON-YYYY'));
3319: end if;
3320:
3321: /*Bug 8798020 Added below code to take the eligible dates */
3322: v_validation_start_date :=greatest(v_validation_start_date,nvl(v_min_eligible_date,v_validation_start_date));
3346: and pos.actual_termination_date >= p_session_date;
3347:
3348: exception
3349: when no_data_found then
3350: hr_utility.trace('Post termination rule is null');
3351: hr_utility.trace('Or Actual termination date is null');
3352: v_post_termination_rule := null;
3353: v_actual_termination_date := null;
3354: end;
3347:
3348: exception
3349: when no_data_found then
3350: hr_utility.trace('Post termination rule is null');
3351: hr_utility.trace('Or Actual termination date is null');
3352: v_post_termination_rule := null;
3353: v_actual_termination_date := null;
3354: end;
3355:
3367: -- wmcveagh, bug 493056. Use element effective start date rather than
3368: -- validation start date if vsd is later.
3369: --
3370: if g_debug then
3371: hr_utility.set_location('hr_entry.chk_element_entry_main', 17);
3372: end if;
3373: --
3374: open c_element_start_date ;
3375: fetch c_element_start_date into v_element_effective_start_date;
3374: open c_element_start_date ;
3375: fetch c_element_start_date into v_element_effective_start_date;
3376: close c_element_start_date;
3377: --
3378: hr_utility.trace(' v_element_effective_start_date : '|| v_element_effective_start_date);
3379: --
3380: if v_validation_start_date < v_element_effective_start_date then
3381: if g_debug then
3382: hr_utility.set_location('hr_entry.chk_element_entry_main', 18);
3378: hr_utility.trace(' v_element_effective_start_date : '|| v_element_effective_start_date);
3379: --
3380: if v_validation_start_date < v_element_effective_start_date then
3381: if g_debug then
3382: hr_utility.set_location('hr_entry.chk_element_entry_main', 18);
3383: end if;
3384: v_validation_start_date := v_element_effective_start_date;
3385: end if;
3386: --
3385: end if;
3386: --
3387: end if;
3388:
3389: hr_utility.trace(' v_validation_start_date : '|| v_validation_start_date);
3390: --
3391: -- Only do check when the entry is being created or extended.
3392: --
3393: if ((p_usage = 'INSERT' or
3395: (p_dt_delete_mode = 'DELETE_NEXT_CHANGE' and
3396: p_validation_end_date = hr_general.end_of_time)) then
3397: --
3398: if g_debug then
3399: hr_utility.set_location('hr_entry.chk_element_entry_main', 20);
3400: end if;
3401: -- start 115.26
3402: -- bugfix 1827998
3403: declare
3439: end if;
3440: end if;
3441: --
3442: if g_debug then
3443: hr_utility.set_location('hr_entry.chk_element_entry_main', 25);
3444: end if;
3445: --
3446: -- Call the procedure: chk_element_entry_open
3447: -- This procedure does common checks for insert/update/delete
3466: p_entry_type <> 'E') or
3467: v_processing_type = 'N')) then
3468: --
3469: if g_debug then
3470: hr_utility.set_location('hr_entry.chk_element_entry_main', 30);
3471: end if;
3472: --
3473: -- We must ensure that the entry is eligible to be inserted.
3474: --
3499: p_creator_type not in ('EE', 'RR', 'AD', 'AE', 'NR', 'PR') and
3500: p_usage = 'INSERT') then
3501: --
3502: if g_debug then
3503: hr_utility.set_location('hr_entry.chk_element_entry_main', 35);
3504: end if;
3505: --
3506: -- Additional Entry is trying to be inserted therefore, check for
3507: -- another existing Additional Entry within the current period.
3523: when no_data_found then null;
3524: end;
3525: --
3526: if v_error_flag = 'Y' then
3527: hr_utility.set_message(801, 'HR_7700_ELE_ENTRY_REC_EXISTS');
3528: hr_utility.raise_error;
3529: end if;
3530: --
3531: end if;
3524: end;
3525: --
3526: if v_error_flag = 'Y' then
3527: hr_utility.set_message(801, 'HR_7700_ELE_ENTRY_REC_EXISTS');
3528: hr_utility.raise_error;
3529: end if;
3530: --
3531: end if;
3532: --
3537: (p_dt_delete_mode = 'ZAP' or
3538: p_dt_delete_mode = 'DELETE')) then
3539: --
3540: if g_debug then
3541: hr_utility.set_location('hr_entry.chk_element_entry_main', 40);
3542: end if;
3543: --
3544: -- If the p_dt_delete_mode is not null then need to ensure that
3545: -- the entry being deleted does not orphan any adjustments.
3561: when no_data_found then null;
3562: end;
3563: --
3564: if v_error_flag = 'Y' then
3565: hr_utility.set_message(801, 'HR_6304_ELE_ENTRY_DT_DEL_ADJ');
3566: hr_utility.raise_error;
3567: end if;
3568: --
3569: end if;
3562: end;
3563: --
3564: if v_error_flag = 'Y' then
3565: hr_utility.set_message(801, 'HR_6304_ELE_ENTRY_DT_DEL_ADJ');
3566: hr_utility.raise_error;
3567: end if;
3568: --
3569: end if;
3570: --
3573: if (p_entry_type = 'S' and
3574: p_usage = 'INSERT') then
3575: --
3576: if g_debug then
3577: hr_utility.set_location('hr_entry.chk_element_entry_main', 45);
3578: end if;
3579: --
3580: -- Ensure that no other override exists within the current
3581: -- period for the same element for the assignment.
3597: when no_data_found then null;
3598: end;
3599: --
3600: if v_error_flag = 'Y' then
3601: hr_utility.set_message(801, 'HR_6187_ELE_ENTRY_OVER_EXISTS');
3602: hr_utility.raise_error;
3603: end if;
3604: --
3605: if g_debug then
3598: end;
3599: --
3600: if v_error_flag = 'Y' then
3601: hr_utility.set_message(801, 'HR_6187_ELE_ENTRY_OVER_EXISTS');
3602: hr_utility.raise_error;
3603: end if;
3604: --
3605: if g_debug then
3606: hr_utility.set_location('hr_entry.chk_element_entry_main', 50);
3602: hr_utility.raise_error;
3603: end if;
3604: --
3605: if g_debug then
3606: hr_utility.set_location('hr_entry.chk_element_entry_main', 50);
3607: end if;
3608: --
3609: -- Ensure that an adjustment entry does not exist when trying to
3610: -- insert override.
3627: when no_data_found then null;
3628: end;
3629: --
3630: if v_error_flag = 'Y' then
3631: hr_utility.set_message(801, 'HR_6189_ELE_ENTRY_ADJ_EXISTS');
3632: hr_utility.raise_error;
3633: end if;
3634: --
3635: -- You are not allowed to insert an override entry
3628: end;
3629: --
3630: if v_error_flag = 'Y' then
3631: hr_utility.set_message(801, 'HR_6189_ELE_ENTRY_ADJ_EXISTS');
3632: hr_utility.raise_error;
3633: end if;
3634: --
3635: -- You are not allowed to insert an override entry
3636: -- for an element type that has the third party only
3635: -- You are not allowed to insert an override entry
3636: -- for an element type that has the third party only
3637: -- flag set to 'Y'.
3638: if v_third_party_pay_only_flag = 'Y' then
3639: hr_utility.set_message(801, 'PAY_289106_CANT_OVER_THIRD');
3640: hr_utility.raise_error;
3641: end if;
3642: --
3643: end if;
3636: -- for an element type that has the third party only
3637: -- flag set to 'Y'.
3638: if v_third_party_pay_only_flag = 'Y' then
3639: hr_utility.set_message(801, 'PAY_289106_CANT_OVER_THIRD');
3640: hr_utility.raise_error;
3641: end if;
3642: --
3643: end if;
3644: --
3648: p_entry_type = 'A') and
3649: p_usage = 'INSERT') then
3650: --
3651: if g_debug then
3652: hr_utility.set_location('hr_entry.chk_element_entry_main', 55);
3653: end if;
3654: --
3655: -- Ensure that the parent entry of the adjustment exists for the
3656: -- duration of the adjustment.
3673: when no_data_found then null;
3674: end;
3675: --
3676: if v_error_flag = 'Y' then
3677: hr_utility.set_message(801, 'HR_6194_ELE_ENTRY_ADJ_PARENT');
3678: hr_utility.raise_error;
3679: end if;
3680: --
3681: if g_debug then
3674: end;
3675: --
3676: if v_error_flag = 'Y' then
3677: hr_utility.set_message(801, 'HR_6194_ELE_ENTRY_ADJ_PARENT');
3678: hr_utility.raise_error;
3679: end if;
3680: --
3681: if g_debug then
3682: hr_utility.set_location('hr_entry.chk_element_entry_main', 60);
3678: hr_utility.raise_error;
3679: end if;
3680: --
3681: if g_debug then
3682: hr_utility.set_location('hr_entry.chk_element_entry_main', 60);
3683: end if;
3684: --
3685: -- Ensure that an override does not exist for the entry which is to be
3686: -- adjusted.
3703: when no_data_found then null;
3704: end;
3705: --
3706: if v_error_flag = 'Y' then
3707: hr_utility.set_message(801, 'HR_6195_ELE_ENTRY_OADJ_EXISTS');
3708: hr_utility.raise_error;
3709: end if;
3710: --
3711: if g_debug then
3704: end;
3705: --
3706: if v_error_flag = 'Y' then
3707: hr_utility.set_message(801, 'HR_6195_ELE_ENTRY_OADJ_EXISTS');
3708: hr_utility.raise_error;
3709: end if;
3710: --
3711: if g_debug then
3712: hr_utility.set_location('hr_entry.chk_element_entry_main', 65);
3708: hr_utility.raise_error;
3709: end if;
3710: --
3711: if g_debug then
3712: hr_utility.set_location('hr_entry.chk_element_entry_main', 65);
3713: end if;
3714: --
3715: -- Ensure that an existing adjustment for this entry does not exist for
3716: -- the current period/assignment.
3732: when no_data_found then null;
3733: end;
3734: --
3735: if v_error_flag = 'Y' then
3736: hr_utility.set_message(801, 'HR_6196_ELE_ENTRY_ADJ_EXISTS');
3737: hr_utility.raise_error;
3738: end if;
3739: --
3740: end if;
3733: end;
3734: --
3735: if v_error_flag = 'Y' then
3736: hr_utility.set_message(801, 'HR_6196_ELE_ENTRY_ADJ_EXISTS');
3737: hr_utility.raise_error;
3738: end if;
3739: --
3740: end if;
3741: --
3831: --
3832: begin
3833: --
3834: if g_debug then
3835: hr_utility.set_location('hr_entry.ins_3p_entry_values', 1);
3836: end if;
3837: begin
3838: --
3839: select ee.element_entry_id,
3874: and et.effective_end_date;
3875: --
3876: exception
3877: when NO_DATA_FOUND then
3878: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
3879: hr_utility.set_message_token('PROCEDURE',
3880: 'hr_entry.ins_3p_entry_values');
3881: hr_utility.set_message_token('STEP','6');
3882: hr_utility.raise_error;
3875: --
3876: exception
3877: when NO_DATA_FOUND then
3878: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
3879: hr_utility.set_message_token('PROCEDURE',
3880: 'hr_entry.ins_3p_entry_values');
3881: hr_utility.set_message_token('STEP','6');
3882: hr_utility.raise_error;
3883: end;
3877: when NO_DATA_FOUND then
3878: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
3879: hr_utility.set_message_token('PROCEDURE',
3880: 'hr_entry.ins_3p_entry_values');
3881: hr_utility.set_message_token('STEP','6');
3882: hr_utility.raise_error;
3883: end;
3884: --
3885: if g_debug then
3878: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
3879: hr_utility.set_message_token('PROCEDURE',
3880: 'hr_entry.ins_3p_entry_values');
3881: hr_utility.set_message_token('STEP','6');
3882: hr_utility.raise_error;
3883: end;
3884: --
3885: if g_debug then
3886: hr_utility.set_location('hr_entry.ins_3p_entry_values', 2);
3882: hr_utility.raise_error;
3883: end;
3884: --
3885: if g_debug then
3886: hr_utility.set_location('hr_entry.ins_3p_entry_values', 2);
3887: end if;
3888: --
3889: -- Insert all the entry values if there are any.
3890: if p_num_entry_values > 0 then
3999: -- rate
4000: if v_input_currency_code <> v_output_currency_code then
4001: begin
4002: if g_debug then
4003: hr_utility.set_location('hr_entry.ins_3p_entry_values', 4);
4004: end if;
4005: --
4006: select business_group_id
4007: into v_bg_id
4014: v_currency_type:=hr_currency_pkg.get_rate_type
4015: (v_bg_id,p_session_date,'P');
4016: if (v_currency_type is NULL)
4017: then
4018: hr_utility.set_message(801,'HR_52349_NO_RATE_TYPE');
4019: hr_utility.raise_error;
4020: end if;
4021: end;
4022: --
4015: (v_bg_id,p_session_date,'P');
4016: if (v_currency_type is NULL)
4017: then
4018: hr_utility.set_message(801,'HR_52349_NO_RATE_TYPE');
4019: hr_utility.raise_error;
4020: end if;
4021: end;
4022: --
4023: end if;
4032: v_run_result_id := hr_entry.generate_run_result_id;
4033: --
4034: -- Insert Run Result. Step 6.
4035: if g_debug then
4036: hr_utility.set_location('hr_entry.ins_3p_entry_values', 6);
4037: end if;
4038: -- First get the Jurisdiction if one exists.
4039: begin
4040: select eev.screen_entry_value
4079: v_jurisdiction);
4080: --
4081: exception
4082: when NO_DATA_FOUND then
4083: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
4084: hr_utility.set_message_token('PROCEDURE',
4085: 'hr_entry.ins_3p_entry_values');
4086: hr_utility.set_message_token('STEP','6');
4087: hr_utility.raise_error;
4080: --
4081: exception
4082: when NO_DATA_FOUND then
4083: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
4084: hr_utility.set_message_token('PROCEDURE',
4085: 'hr_entry.ins_3p_entry_values');
4086: hr_utility.set_message_token('STEP','6');
4087: hr_utility.raise_error;
4088: end;
4082: when NO_DATA_FOUND then
4083: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
4084: hr_utility.set_message_token('PROCEDURE',
4085: 'hr_entry.ins_3p_entry_values');
4086: hr_utility.set_message_token('STEP','6');
4087: hr_utility.raise_error;
4088: end;
4089: --
4090: -- Insert Run Result Values. Step 7.
4083: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
4084: hr_utility.set_message_token('PROCEDURE',
4085: 'hr_entry.ins_3p_entry_values');
4086: hr_utility.set_message_token('STEP','6');
4087: hr_utility.raise_error;
4088: end;
4089: --
4090: -- Insert Run Result Values. Step 7.
4091: if (v_entry_type = 'B' and
4093: --
4094: -- insert run results values converting all money uom's to the output
4095: -- currency value.
4096: if g_debug then
4097: hr_utility.set_location('hr_entry.ins_3p_entry_values', 7);
4098: end if;
4099: begin
4100:
4101: for peev in get_b_eevs(p_element_entry_id, p_session_date) loop
4109: peev.value,
4110: v_currency_type);
4111: exception
4112: when gl_currency_api.NO_RATE then
4113: hr_utility.set_message(801,'HR_6405_PAYM_NO_EXCHANGE_RATE');
4114: hr_utility.set_message_token('RATE1', v_input_currency_code);
4115: hr_utility.set_message_token('RATE2', v_output_currency_code);
4116: hr_utility.raise_error;
4117: when gl_currency_api.INVALID_CURRENCY then
4110: v_currency_type);
4111: exception
4112: when gl_currency_api.NO_RATE then
4113: hr_utility.set_message(801,'HR_6405_PAYM_NO_EXCHANGE_RATE');
4114: hr_utility.set_message_token('RATE1', v_input_currency_code);
4115: hr_utility.set_message_token('RATE2', v_output_currency_code);
4116: hr_utility.raise_error;
4117: when gl_currency_api.INVALID_CURRENCY then
4118: hr_utility.set_message(801,'HR_52350_INVALID_CURRENCY');
4111: exception
4112: when gl_currency_api.NO_RATE then
4113: hr_utility.set_message(801,'HR_6405_PAYM_NO_EXCHANGE_RATE');
4114: hr_utility.set_message_token('RATE1', v_input_currency_code);
4115: hr_utility.set_message_token('RATE2', v_output_currency_code);
4116: hr_utility.raise_error;
4117: when gl_currency_api.INVALID_CURRENCY then
4118: hr_utility.set_message(801,'HR_52350_INVALID_CURRENCY');
4119: hr_utility.set_message_token('RATE1', v_input_currency_code);
4112: when gl_currency_api.NO_RATE then
4113: hr_utility.set_message(801,'HR_6405_PAYM_NO_EXCHANGE_RATE');
4114: hr_utility.set_message_token('RATE1', v_input_currency_code);
4115: hr_utility.set_message_token('RATE2', v_output_currency_code);
4116: hr_utility.raise_error;
4117: when gl_currency_api.INVALID_CURRENCY then
4118: hr_utility.set_message(801,'HR_52350_INVALID_CURRENCY');
4119: hr_utility.set_message_token('RATE1', v_input_currency_code);
4120: hr_utility.set_message_token('RATE2', v_output_currency_code);
4114: hr_utility.set_message_token('RATE1', v_input_currency_code);
4115: hr_utility.set_message_token('RATE2', v_output_currency_code);
4116: hr_utility.raise_error;
4117: when gl_currency_api.INVALID_CURRENCY then
4118: hr_utility.set_message(801,'HR_52350_INVALID_CURRENCY');
4119: hr_utility.set_message_token('RATE1', v_input_currency_code);
4120: hr_utility.set_message_token('RATE2', v_output_currency_code);
4121: hr_utility.raise_error;
4122: end;
4115: hr_utility.set_message_token('RATE2', v_output_currency_code);
4116: hr_utility.raise_error;
4117: when gl_currency_api.INVALID_CURRENCY then
4118: hr_utility.set_message(801,'HR_52350_INVALID_CURRENCY');
4119: hr_utility.set_message_token('RATE1', v_input_currency_code);
4120: hr_utility.set_message_token('RATE2', v_output_currency_code);
4121: hr_utility.raise_error;
4122: end;
4123: else
4116: hr_utility.raise_error;
4117: when gl_currency_api.INVALID_CURRENCY then
4118: hr_utility.set_message(801,'HR_52350_INVALID_CURRENCY');
4119: hr_utility.set_message_token('RATE1', v_input_currency_code);
4120: hr_utility.set_message_token('RATE2', v_output_currency_code);
4121: hr_utility.raise_error;
4122: end;
4123: else
4124: v_amount:=peev.value;
4117: when gl_currency_api.INVALID_CURRENCY then
4118: hr_utility.set_message(801,'HR_52350_INVALID_CURRENCY');
4119: hr_utility.set_message_token('RATE1', v_input_currency_code);
4120: hr_utility.set_message_token('RATE2', v_output_currency_code);
4121: hr_utility.raise_error;
4122: end;
4123: else
4124: v_amount:=peev.value;
4125: end if;
4135: end loop;
4136: --
4137: exception
4138: when no_data_found then
4139: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
4140: hr_utility.set_message_token('PROCEDURE',
4141: 'hr_entry.ins_3p_entry_values');
4142: hr_utility.set_message_token('STEP','7');
4143: hr_utility.raise_error;
4136: --
4137: exception
4138: when no_data_found then
4139: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
4140: hr_utility.set_message_token('PROCEDURE',
4141: 'hr_entry.ins_3p_entry_values');
4142: hr_utility.set_message_token('STEP','7');
4143: hr_utility.raise_error;
4144: end;
4138: when no_data_found then
4139: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
4140: hr_utility.set_message_token('PROCEDURE',
4141: 'hr_entry.ins_3p_entry_values');
4142: hr_utility.set_message_token('STEP','7');
4143: hr_utility.raise_error;
4144: end;
4145:
4146: --
4139: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
4140: hr_utility.set_message_token('PROCEDURE',
4141: 'hr_entry.ins_3p_entry_values');
4142: hr_utility.set_message_token('STEP','7');
4143: hr_utility.raise_error;
4144: end;
4145:
4146: --
4147: -- insert run result values which do not have to be converted.
4147: -- insert run result values which do not have to be converted.
4148: else
4149: --
4150: if g_debug then
4151: hr_utility.set_location('hr_entry.ins_3p_entry_values', 8);
4152: end if;
4153: begin
4154: --
4155: insert into pay_run_result_values
4166: and peev.effective_end_date;
4167: --
4168: exception
4169: when no_data_found then
4170: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
4171: hr_utility.set_message_token('PROCEDURE',
4172: 'hr_entry.ins_3p_entry_values');
4173: hr_utility.set_message_token('STEP','8');
4174: hr_utility.raise_error;
4167: --
4168: exception
4169: when no_data_found then
4170: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
4171: hr_utility.set_message_token('PROCEDURE',
4172: 'hr_entry.ins_3p_entry_values');
4173: hr_utility.set_message_token('STEP','8');
4174: hr_utility.raise_error;
4175: end;
4169: when no_data_found then
4170: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
4171: hr_utility.set_message_token('PROCEDURE',
4172: 'hr_entry.ins_3p_entry_values');
4173: hr_utility.set_message_token('STEP','8');
4174: hr_utility.raise_error;
4175: end;
4176: --
4177: end if;
4170: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
4171: hr_utility.set_message_token('PROCEDURE',
4172: 'hr_entry.ins_3p_entry_values');
4173: hr_utility.set_message_token('STEP','8');
4174: hr_utility.raise_error;
4175: end;
4176: --
4177: end if;
4178: --
4594: --
4595: end extend_dependants;
4596: ----------------------
4597: begin
4598: g_debug := hr_utility.debug_enabled;
4599: --
4600: if g_debug then
4601: hr_utility.set_location('hr_entry.del_3p_entry_values', 1);
4602: end if;
4597: begin
4598: g_debug := hr_utility.debug_enabled;
4599: --
4600: if g_debug then
4601: hr_utility.set_location('hr_entry.del_3p_entry_values', 1);
4602: end if;
4603: --
4604: -- Fix for 1904110.
4605: -- The delete mode is always set to the parameter passed in because
4657: -- Step 2:
4658: --
4659: if v_process_in_run_flag = 'Y' then
4660: if g_debug then
4661: hr_utility.set_location('hr_entry.del_3p_entry_values', 2);
4662: end if;
4663: begin
4664: delete from pay_run_result_values rrv
4665: where rrv.run_result_id =
4676: -- DT_DELETE_MODE: ZAP
4677: -- Step 3:
4678: --
4679: if g_debug then
4680: hr_utility.set_location('hr_entry.del_3p_entry_values', 3);
4681: end if;
4682: begin
4683: delete from pay_run_results rr
4684: where rr.element_type_id + 0 = p_element_type_id
4698: --
4699: if (p_creator_type = 'F'
4700: or p_element_entry_id is not null) then
4701: if g_debug then
4702: hr_utility.set_location('hr_entry.del_3p_entry_values', 4);
4703: end if;
4704: begin
4705: delete from pay_element_entry_values_f eev
4706: where eev.element_entry_id = p_element_entry_id;
4715: -- 2) This is specific to absences.
4716: -- Step 5:
4717: --
4718: if g_debug then
4719: hr_utility.set_location('hr_entry.del_3p_entry_values', 5);
4720: end if;
4721: begin
4722: delete from pay_element_entry_values_f eev
4723: where eev.element_entry_id in
4741: -- DT_DELETE_MODE: ZAP
4742: -- Step 6:
4743: --
4744: if g_debug then
4745: hr_utility.set_location('hr_entry.del_3p_entry_values', 6);
4746: end if;
4747: begin
4748: delete from pay_element_entries_f ee
4749: where ee.element_entry_id = p_element_entry_id;
4756: -- As the entry is an absence then delete all entries for the absence
4757: -- attendence.
4758: --
4759: if g_debug then
4760: hr_utility.set_location('hr_entry.del_3p_entry_values', 7);
4761: end if;
4762: begin
4763: delete from pay_element_entries_f ee
4764: where ee.creator_type = p_creator_type
4775: -- DT_DELETE_MODE: DELETE
4776: -- Step 8:
4777: --
4778: if g_debug then
4779: hr_utility.set_location('hr_entry.del_3p_entry_values', 8);
4780: end if;
4781: begin
4782: update pay_element_entry_values_f eev
4783: set eev.effective_end_date = p_session_date
4785: and p_session_date between eev.effective_start_date
4786: and eev.effective_end_date;
4787: exception
4788: when NO_DATA_FOUND then
4789: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
4790: hr_utility.set_message_token('PROCEDURE','hr_entry.del_3p_entry_values');
4791: hr_utility.set_message_token('STEP','8');
4792: hr_utility.raise_error;
4793: end;
4786: and eev.effective_end_date;
4787: exception
4788: when NO_DATA_FOUND then
4789: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
4790: hr_utility.set_message_token('PROCEDURE','hr_entry.del_3p_entry_values');
4791: hr_utility.set_message_token('STEP','8');
4792: hr_utility.raise_error;
4793: end;
4794: --
4787: exception
4788: when NO_DATA_FOUND then
4789: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
4790: hr_utility.set_message_token('PROCEDURE','hr_entry.del_3p_entry_values');
4791: hr_utility.set_message_token('STEP','8');
4792: hr_utility.raise_error;
4793: end;
4794: --
4795: if g_debug then
4788: when NO_DATA_FOUND then
4789: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
4790: hr_utility.set_message_token('PROCEDURE','hr_entry.del_3p_entry_values');
4791: hr_utility.set_message_token('STEP','8');
4792: hr_utility.raise_error;
4793: end;
4794: --
4795: if g_debug then
4796: hr_utility.set_location('hr_entry.del_3p_entry_values', 9);
4792: hr_utility.raise_error;
4793: end;
4794: --
4795: if g_debug then
4796: hr_utility.set_location('hr_entry.del_3p_entry_values', 9);
4797: end if;
4798: begin
4799: delete from pay_element_entry_values_f eev
4800: where eev.element_entry_id = p_element_entry_id
4810: -- DT_DELETE_MODE: DELETE_NEXT_CHANGE/FUTURE_CHANGE
4811: -- Step 9:
4812: --
4813: if g_debug then
4814: hr_utility.set_location('hr_entry.del_3p_entry_values', 9);
4815: end if;
4816: begin
4817: delete from pay_element_entry_values_f eev
4818: where eev.element_entry_id = p_element_entry_id
4826: -- Update the current effective_end_date on the entry values rows.
4827: -- DT_DELETE_MODE: DELETE_NEXT_CHANGE/FUTURE_CHANGE
4828: -- Step 10:
4829: if g_debug then
4830: hr_utility.set_location('hr_entry.del_3p_entry_values', 10);
4831: end if;
4832: begin
4833: update pay_element_entry_values_f eev
4834: -- bug 384948. Changed set clouse to supply effective_end_date of the
4841: and p_session_date between eev.effective_start_date
4842: and eev.effective_end_date;
4843: exception
4844: when NO_DATA_FOUND then
4845: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
4846: hr_utility.set_message_token('PROCEDURE','hr_entry.del_3p_entry_values');
4847: hr_utility.set_message_token('STEP','10');
4848: hr_utility.raise_error;
4849: end;
4842: and eev.effective_end_date;
4843: exception
4844: when NO_DATA_FOUND then
4845: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
4846: hr_utility.set_message_token('PROCEDURE','hr_entry.del_3p_entry_values');
4847: hr_utility.set_message_token('STEP','10');
4848: hr_utility.raise_error;
4849: end;
4850: --
4843: exception
4844: when NO_DATA_FOUND then
4845: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
4846: hr_utility.set_message_token('PROCEDURE','hr_entry.del_3p_entry_values');
4847: hr_utility.set_message_token('STEP','10');
4848: hr_utility.raise_error;
4849: end;
4850: --
4851: extend_beneficiaries;
4844: when NO_DATA_FOUND then
4845: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
4846: hr_utility.set_message_token('PROCEDURE','hr_entry.del_3p_entry_values');
4847: hr_utility.set_message_token('STEP','10');
4848: hr_utility.raise_error;
4849: end;
4850: --
4851: extend_beneficiaries;
4852: extend_dependants;
4881: v_return_entry_id number;
4882: --
4883: begin
4884: if g_debug then
4885: hr_utility.set_location('hr_entry.upd_3p_entry_values', 1);
4886: end if;
4887: hr_general.assert_condition (p_processing_type is not null
4888: and p_dt_update_mode is not null
4889: and p_element_entry_id is not null
4943: and eev.effective_end_date;
4944: --
4945: exception
4946: when NO_DATA_FOUND then
4947: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
4948: hr_utility.set_message_token('PROCEDURE',
4949: 'hr_entry.upd_3p_entry_values');
4950: hr_utility.set_message_token('STEP','1');
4951: hr_utility.raise_error;
4944: --
4945: exception
4946: when NO_DATA_FOUND then
4947: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
4948: hr_utility.set_message_token('PROCEDURE',
4949: 'hr_entry.upd_3p_entry_values');
4950: hr_utility.set_message_token('STEP','1');
4951: hr_utility.raise_error;
4952: end;
4946: when NO_DATA_FOUND then
4947: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
4948: hr_utility.set_message_token('PROCEDURE',
4949: 'hr_entry.upd_3p_entry_values');
4950: hr_utility.set_message_token('STEP','1');
4951: hr_utility.raise_error;
4952: end;
4953: --
4954: end loop;
4947: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
4948: hr_utility.set_message_token('PROCEDURE',
4949: 'hr_entry.upd_3p_entry_values');
4950: hr_utility.set_message_token('STEP','1');
4951: hr_utility.raise_error;
4952: end;
4953: --
4954: end loop;
4955: --
4967: p_entry_type = 'E' and
4968: p_input_currency_code = p_output_currency_code and
4969: hr_entry.entry_process_in_run(p_element_type_id, p_session_date)) then
4970: if g_debug then
4971: hr_utility.set_location('hr_entry.upd_3p_entry_values', 3);
4972: end if;
4973: begin
4974: UPDATE PAY_RUN_RESULT_VALUES PRRV1
4975: SET PRRV1.RESULT_VALUE =
5000: p_dt_update_mode = 'UPDATE_CHANGE_INSERT' or
5001: p_dt_update_mode = 'UPDATE_OVERRIDE') and
5002: p_processing_type = 'R') then
5003: if g_debug then
5004: hr_utility.set_location('hr_entry.upd_3p_entry_values', 4);
5005: end if;
5006: begin
5007: UPDATE PAY_ELEMENT_ENTRY_VALUES_F PEEV1
5008: SET PEEV1.EFFECTIVE_END_DATE = p_validation_start_date - 1
5010: AND p_session_date
5011: BETWEEN PEEV1.EFFECTIVE_START_DATE AND PEEV1.EFFECTIVE_END_DATE;
5012: exception
5013: when NO_DATA_FOUND then
5014: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
5015: hr_utility.set_message_token('PROCEDURE','hr_entry.upd_3p_entry_values');
5016: hr_utility.set_message_token('STEP','4');
5017: hr_utility.raise_error;
5018: end;
5011: BETWEEN PEEV1.EFFECTIVE_START_DATE AND PEEV1.EFFECTIVE_END_DATE;
5012: exception
5013: when NO_DATA_FOUND then
5014: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
5015: hr_utility.set_message_token('PROCEDURE','hr_entry.upd_3p_entry_values');
5016: hr_utility.set_message_token('STEP','4');
5017: hr_utility.raise_error;
5018: end;
5019: --
5012: exception
5013: when NO_DATA_FOUND then
5014: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
5015: hr_utility.set_message_token('PROCEDURE','hr_entry.upd_3p_entry_values');
5016: hr_utility.set_message_token('STEP','4');
5017: hr_utility.raise_error;
5018: end;
5019: --
5020: -- If the update mode = 'UPDATE_OVERRIDE' then delete all entry values that
5013: when NO_DATA_FOUND then
5014: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
5015: hr_utility.set_message_token('PROCEDURE','hr_entry.upd_3p_entry_values');
5016: hr_utility.set_message_token('STEP','4');
5017: hr_utility.raise_error;
5018: end;
5019: --
5020: -- If the update mode = 'UPDATE_OVERRIDE' then delete all entry values that
5021: -- are greater or equal to the validation_start_date
5022: -- Step 4:
5023: --
5024: if p_dt_update_mode = 'UPDATE_OVERRIDE' then
5025: if g_debug then
5026: hr_utility.set_location('hr_entry.upd_3p_entry_values', 5);
5027: end if;
5028: begin
5029: DELETE FROM PAY_ELEMENT_ENTRY_VALUES_F PEEV1
5030: WHERE PEEV1.ELEMENT_ENTRY_ID = p_element_entry_id
5190: v_input_value_id_tbl hr_entry.number_table;
5191: v_entry_value_tbl hr_entry.varchar2_table;
5192: --
5193: begin
5194: g_debug := hr_utility.debug_enabled;
5195: --
5196: if g_debug then
5197: hr_utility.set_location('hr_entry.upd_3p_entry_values',100);
5198: end if;
5193: begin
5194: g_debug := hr_utility.debug_enabled;
5195: --
5196: if g_debug then
5197: hr_utility.set_location('hr_entry.upd_3p_entry_values',100);
5198: end if;
5199: --
5200: -- Convert entry value details ie. INPUT_VALUE_ID and SCREEN_ENTRY_VALUE
5201: -- into two tables to be passed into the overloaded version of
5243: v_input_value_id_tbl,
5244: v_entry_value_tbl);
5245: --
5246: if g_debug then
5247: hr_utility.set_location('hr_entry.upd_3p_entry_values',105);
5248: end if;
5249: --
5250: hr_entry.upd_3p_ent_values
5251: (p_element_entry_id,
5400: v_formatted_min_value varchar2(60);
5401: v_formatted_max_value varchar2(60);
5402: --
5403: begin
5404: g_debug := hr_utility.debug_enabled;
5405: --
5406: if g_debug then
5407: hr_utility.set_location('hr_entry.check_format',5);
5408: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
5403: begin
5404: g_debug := hr_utility.debug_enabled;
5405: --
5406: if g_debug then
5407: hr_utility.set_location('hr_entry.check_format',5);
5408: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
5409: hr_utility.trace(' p_input_value_id : '|| p_input_value_id);
5410: hr_utility.trace(' p_session_date : '|| p_session_date);
5411: hr_utility.trace(' p_formatted_value : '|| p_formatted_value);
5404: g_debug := hr_utility.debug_enabled;
5405: --
5406: if g_debug then
5407: hr_utility.set_location('hr_entry.check_format',5);
5408: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
5409: hr_utility.trace(' p_input_value_id : '|| p_input_value_id);
5410: hr_utility.trace(' p_session_date : '|| p_session_date);
5411: hr_utility.trace(' p_formatted_value : '|| p_formatted_value);
5412: hr_utility.trace(' p_database_value : '|| p_database_value);
5405: --
5406: if g_debug then
5407: hr_utility.set_location('hr_entry.check_format',5);
5408: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
5409: hr_utility.trace(' p_input_value_id : '|| p_input_value_id);
5410: hr_utility.trace(' p_session_date : '|| p_session_date);
5411: hr_utility.trace(' p_formatted_value : '|| p_formatted_value);
5412: hr_utility.trace(' p_database_value : '|| p_database_value);
5413: hr_utility.trace(' p_nullok : '|| p_nullok);
5406: if g_debug then
5407: hr_utility.set_location('hr_entry.check_format',5);
5408: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
5409: hr_utility.trace(' p_input_value_id : '|| p_input_value_id);
5410: hr_utility.trace(' p_session_date : '|| p_session_date);
5411: hr_utility.trace(' p_formatted_value : '|| p_formatted_value);
5412: hr_utility.trace(' p_database_value : '|| p_database_value);
5413: hr_utility.trace(' p_nullok : '|| p_nullok);
5414: hr_utility.trace(' p_min_max_failure : '|| p_min_max_failure);
5407: hr_utility.set_location('hr_entry.check_format',5);
5408: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
5409: hr_utility.trace(' p_input_value_id : '|| p_input_value_id);
5410: hr_utility.trace(' p_session_date : '|| p_session_date);
5411: hr_utility.trace(' p_formatted_value : '|| p_formatted_value);
5412: hr_utility.trace(' p_database_value : '|| p_database_value);
5413: hr_utility.trace(' p_nullok : '|| p_nullok);
5414: hr_utility.trace(' p_min_max_failure : '|| p_min_max_failure);
5415: end if;
5408: hr_utility.trace(' p_element_link_id : '|| p_element_link_id);
5409: hr_utility.trace(' p_input_value_id : '|| p_input_value_id);
5410: hr_utility.trace(' p_session_date : '|| p_session_date);
5411: hr_utility.trace(' p_formatted_value : '|| p_formatted_value);
5412: hr_utility.trace(' p_database_value : '|| p_database_value);
5413: hr_utility.trace(' p_nullok : '|| p_nullok);
5414: hr_utility.trace(' p_min_max_failure : '|| p_min_max_failure);
5415: end if;
5416: --
5409: hr_utility.trace(' p_input_value_id : '|| p_input_value_id);
5410: hr_utility.trace(' p_session_date : '|| p_session_date);
5411: hr_utility.trace(' p_formatted_value : '|| p_formatted_value);
5412: hr_utility.trace(' p_database_value : '|| p_database_value);
5413: hr_utility.trace(' p_nullok : '|| p_nullok);
5414: hr_utility.trace(' p_min_max_failure : '|| p_min_max_failure);
5415: end if;
5416: --
5417: -- Get uom , min / max and hot default details for the entry value
5410: hr_utility.trace(' p_session_date : '|| p_session_date);
5411: hr_utility.trace(' p_formatted_value : '|| p_formatted_value);
5412: hr_utility.trace(' p_database_value : '|| p_database_value);
5413: hr_utility.trace(' p_nullok : '|| p_nullok);
5414: hr_utility.trace(' p_min_max_failure : '|| p_min_max_failure);
5415: end if;
5416: --
5417: -- Get uom , min / max and hot default details for the entry value
5418: -- being validated.
5462: p_warning_or_error := v_warning_or_error;
5463: --
5464: exception
5465: when no_data_found then
5466: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
5467: hr_utility.set_message_token('PROCEDURE',
5468: 'hr_entry.check_format');
5469: hr_utility.set_message_token('STEP','1');
5470: hr_utility.raise_error;
5463: --
5464: exception
5465: when no_data_found then
5466: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
5467: hr_utility.set_message_token('PROCEDURE',
5468: 'hr_entry.check_format');
5469: hr_utility.set_message_token('STEP','1');
5470: hr_utility.raise_error;
5471: end;
5465: when no_data_found then
5466: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
5467: hr_utility.set_message_token('PROCEDURE',
5468: 'hr_entry.check_format');
5469: hr_utility.set_message_token('STEP','1');
5470: hr_utility.raise_error;
5471: end;
5472: --
5473: if g_debug then
5466: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
5467: hr_utility.set_message_token('PROCEDURE',
5468: 'hr_entry.check_format');
5469: hr_utility.set_message_token('STEP','1');
5470: hr_utility.raise_error;
5471: end;
5472: --
5473: if g_debug then
5474: hr_utility.set_location('hr_entry.check_format',10);
5470: hr_utility.raise_error;
5471: end;
5472: --
5473: if g_debug then
5474: hr_utility.set_location('hr_entry.check_format',10);
5475: hr_utility.trace(' v_uom : '|| v_uom);
5476: hr_utility.trace(' v_hot_default_flag : '|| v_hot_default_flag);
5477: hr_utility.trace(' v_input_currency_code : '|| v_input_currency_code);
5478: hr_utility.trace(' v_minimum_value : '|| v_minimum_value);
5471: end;
5472: --
5473: if g_debug then
5474: hr_utility.set_location('hr_entry.check_format',10);
5475: hr_utility.trace(' v_uom : '|| v_uom);
5476: hr_utility.trace(' v_hot_default_flag : '|| v_hot_default_flag);
5477: hr_utility.trace(' v_input_currency_code : '|| v_input_currency_code);
5478: hr_utility.trace(' v_minimum_value : '|| v_minimum_value);
5479: hr_utility.trace(' v_maximum_value : '|| v_maximum_value);
5472: --
5473: if g_debug then
5474: hr_utility.set_location('hr_entry.check_format',10);
5475: hr_utility.trace(' v_uom : '|| v_uom);
5476: hr_utility.trace(' v_hot_default_flag : '|| v_hot_default_flag);
5477: hr_utility.trace(' v_input_currency_code : '|| v_input_currency_code);
5478: hr_utility.trace(' v_minimum_value : '|| v_minimum_value);
5479: hr_utility.trace(' v_maximum_value : '|| v_maximum_value);
5480: hr_utility.trace(' v_warning_or_error : '|| v_warning_or_error);
5473: if g_debug then
5474: hr_utility.set_location('hr_entry.check_format',10);
5475: hr_utility.trace(' v_uom : '|| v_uom);
5476: hr_utility.trace(' v_hot_default_flag : '|| v_hot_default_flag);
5477: hr_utility.trace(' v_input_currency_code : '|| v_input_currency_code);
5478: hr_utility.trace(' v_minimum_value : '|| v_minimum_value);
5479: hr_utility.trace(' v_maximum_value : '|| v_maximum_value);
5480: hr_utility.trace(' v_warning_or_error : '|| v_warning_or_error);
5481: end if;
5474: hr_utility.set_location('hr_entry.check_format',10);
5475: hr_utility.trace(' v_uom : '|| v_uom);
5476: hr_utility.trace(' v_hot_default_flag : '|| v_hot_default_flag);
5477: hr_utility.trace(' v_input_currency_code : '|| v_input_currency_code);
5478: hr_utility.trace(' v_minimum_value : '|| v_minimum_value);
5479: hr_utility.trace(' v_maximum_value : '|| v_maximum_value);
5480: hr_utility.trace(' v_warning_or_error : '|| v_warning_or_error);
5481: end if;
5482: --
5475: hr_utility.trace(' v_uom : '|| v_uom);
5476: hr_utility.trace(' v_hot_default_flag : '|| v_hot_default_flag);
5477: hr_utility.trace(' v_input_currency_code : '|| v_input_currency_code);
5478: hr_utility.trace(' v_minimum_value : '|| v_minimum_value);
5479: hr_utility.trace(' v_maximum_value : '|| v_maximum_value);
5480: hr_utility.trace(' v_warning_or_error : '|| v_warning_or_error);
5481: end if;
5482: --
5483: IF ((v_uom = 'M') AND (v_input_currency_code IS NULL)) THEN
5476: hr_utility.trace(' v_hot_default_flag : '|| v_hot_default_flag);
5477: hr_utility.trace(' v_input_currency_code : '|| v_input_currency_code);
5478: hr_utility.trace(' v_minimum_value : '|| v_minimum_value);
5479: hr_utility.trace(' v_maximum_value : '|| v_maximum_value);
5480: hr_utility.trace(' v_warning_or_error : '|| v_warning_or_error);
5481: end if;
5482: --
5483: IF ((v_uom = 'M') AND (v_input_currency_code IS NULL)) THEN
5484: hr_utility.set_message (801,'HR_51106_ELEMENT_CURR_REQ');
5480: hr_utility.trace(' v_warning_or_error : '|| v_warning_or_error);
5481: end if;
5482: --
5483: IF ((v_uom = 'M') AND (v_input_currency_code IS NULL)) THEN
5484: hr_utility.set_message (801,'HR_51106_ELEMENT_CURR_REQ');
5485: hr_utility.raise_error;
5486: END IF;
5487: --
5488: if v_minimum_value is not null then
5481: end if;
5482: --
5483: IF ((v_uom = 'M') AND (v_input_currency_code IS NULL)) THEN
5484: hr_utility.set_message (801,'HR_51106_ELEMENT_CURR_REQ');
5485: hr_utility.raise_error;
5486: END IF;
5487: --
5488: if v_minimum_value is not null then
5489: --
5513: p_nullok,
5514: p_min_max_failure,
5515: v_input_currency_code);
5516: exception
5517: when hr_utility.hr_error then
5518: v_checkformat_error := true;
5519: end;
5520: --
5521: if g_debug then
5518: v_checkformat_error := true;
5519: end;
5520: --
5521: if g_debug then
5522: hr_utility.set_location('hr_entry.check_format',10);
5523: end if;
5524: --
5525: -- Value is not correct for unit of measure
5526: if (v_checkformat_error) then
5534: and lookup_code = v_uom;
5535: --
5536: exception
5537: when no_data_found then
5538: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
5539: hr_utility.set_message_token('PROCEDURE', 'hr_entry.check_format');
5540: hr_utility.set_message_token('STEP', '2');
5541: hr_utility.raise_error;
5542: end;
5535: --
5536: exception
5537: when no_data_found then
5538: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
5539: hr_utility.set_message_token('PROCEDURE', 'hr_entry.check_format');
5540: hr_utility.set_message_token('STEP', '2');
5541: hr_utility.raise_error;
5542: end;
5543: --
5536: exception
5537: when no_data_found then
5538: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
5539: hr_utility.set_message_token('PROCEDURE', 'hr_entry.check_format');
5540: hr_utility.set_message_token('STEP', '2');
5541: hr_utility.raise_error;
5542: end;
5543: --
5544: hr_utility.set_message(801, 'PAY_6306_INPUT_VALUE_FORMAT');
5537: when no_data_found then
5538: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
5539: hr_utility.set_message_token('PROCEDURE', 'hr_entry.check_format');
5540: hr_utility.set_message_token('STEP', '2');
5541: hr_utility.raise_error;
5542: end;
5543: --
5544: hr_utility.set_message(801, 'PAY_6306_INPUT_VALUE_FORMAT');
5545: hr_utility.set_message_token('UNIT_OF_MEASURE', v_message_text);
5540: hr_utility.set_message_token('STEP', '2');
5541: hr_utility.raise_error;
5542: end;
5543: --
5544: hr_utility.set_message(801, 'PAY_6306_INPUT_VALUE_FORMAT');
5545: hr_utility.set_message_token('UNIT_OF_MEASURE', v_message_text);
5546: hr_utility.raise_error;
5547: --
5548: end if;
5541: hr_utility.raise_error;
5542: end;
5543: --
5544: hr_utility.set_message(801, 'PAY_6306_INPUT_VALUE_FORMAT');
5545: hr_utility.set_message_token('UNIT_OF_MEASURE', v_message_text);
5546: hr_utility.raise_error;
5547: --
5548: end if;
5549: --
5542: end;
5543: --
5544: hr_utility.set_message(801, 'PAY_6306_INPUT_VALUE_FORMAT');
5545: hr_utility.set_message_token('UNIT_OF_MEASURE', v_message_text);
5546: hr_utility.raise_error;
5547: --
5548: end if;
5549: --
5550: if g_debug then
5547: --
5548: end if;
5549: --
5550: if g_debug then
5551: hr_utility.set_location('hr_entry.check_format',15);
5552: end if;
5553: --
5554: -- Minimum / maximum conditions have been broken by value
5555: if p_min_max_failure = 'F' then
5554: -- Minimum / maximum conditions have been broken by value
5555: if p_min_max_failure = 'F' then
5556: --
5557: if g_debug then
5558: hr_utility.set_location('hr_entry.check_format',20);
5559: end if;
5560: --
5561: -- If minimum value was specified, translate into screen format for use
5562: -- in error meessages
5564: p_minimum_value := v_formatted_min_value;
5565: end if;
5566: --
5567: if g_debug then
5568: hr_utility.set_location('hr_entry.check_format',25);
5569: end if;
5570: --
5571: -- If maximum value was specified, translate into screen format for use
5572: -- in error meessages
5659: v_cal_cost_segs varchar2(3); -- user profile
5660: l_are_dynamic_inserts_allowed varchar2(2) := null;
5661: --
5662: begin
5663: g_debug := hr_utility.debug_enabled;
5664:
5665: -- A cost_keyflex_id has been specified so confirm it still is valid.
5666: if (l_cost_allocation_keyflex_id is not null and
5667: l_cost_allocation_keyflex_id <> -1) then
5685: --
5686: -- Need to check for a partial value.
5687: --
5688: if g_debug then
5689: hr_utility.set_location('hr_entry.maintain_cost_keyflex', 1);
5690: end if;
5691: --
5692: segment(1) := p_segment1;
5693: segment(2) := p_segment2;
5734: end if;
5735: end loop;
5736: --
5737: if g_debug then
5738: hr_utility.set_location('hr_entry.maintain_cost_keyflex', 2);
5739: end if;
5740: --
5741: sql_curs := dbms_sql.open_cursor;
5742: --
5753: end loop;
5754: dbms_sql.define_column(sql_curs, 1, l_cost_allocation_keyflex_id);
5755: --
5756: if g_debug then
5757: hr_utility.set_location('hr_entry.maintain_cost_keyflex', 3);
5758: end if;
5759: --
5760: rows_processed := dbms_sql.execute(sql_curs);
5761: --
5759: --
5760: rows_processed := dbms_sql.execute(sql_curs);
5761: --
5762: if g_debug then
5763: hr_utility.set_location('hr_entry.maintain_cost_keyflex ', 4);
5764: end if;
5765: --
5766: if dbms_sql.fetch_rows(sql_curs) > 0 then
5767: --
5765: --
5766: if dbms_sql.fetch_rows(sql_curs) > 0 then
5767: --
5768: if g_debug then
5769: hr_utility.set_location('hr_entry.maintain_cost_keyflex', 5);
5770: end if;
5771: dbms_sql.column_value(sql_curs, 1, l_cost_allocation_keyflex_id);
5772: --
5773: if (l_cost_allocation_keyflex_id is null)
5772: --
5773: if (l_cost_allocation_keyflex_id is null)
5774: then
5775: if g_debug then
5776: hr_utility.set_location('hr_entry.maintain_cost_keyflex', 6);
5777: end if;
5778: l_cost_allocation_keyflex_id := -1;
5779: end if;
5780: else
5778: l_cost_allocation_keyflex_id := -1;
5779: end if;
5780: else
5781: if g_debug then
5782: hr_utility.set_location('hr_entry.maintain_cost_keyflex', 7);
5783: end if;
5784: l_cost_allocation_keyflex_id := -1;
5785: end if;
5786: --
5808: and dynamic_inserts_allowed_flag = 'Y';
5809:
5810: exception
5811: when no_data_found then
5812: hr_utility.set_location('hr_entry.maintain_cost_keyflex', 7);
5813: hr_utility.set_message(801, 'PAY_34809_CANT_INS_INTO_CSTKFF');
5814: hr_utility.raise_error;
5815: end;
5816:
5809:
5810: exception
5811: when no_data_found then
5812: hr_utility.set_location('hr_entry.maintain_cost_keyflex', 7);
5813: hr_utility.set_message(801, 'PAY_34809_CANT_INS_INTO_CSTKFF');
5814: hr_utility.raise_error;
5815: end;
5816:
5817: --
5810: exception
5811: when no_data_found then
5812: hr_utility.set_location('hr_entry.maintain_cost_keyflex', 7);
5813: hr_utility.set_message(801, 'PAY_34809_CANT_INS_INTO_CSTKFF');
5814: hr_utility.raise_error;
5815: end;
5816:
5817: --
5818: -- Select the next sequence value for the cost allocation keyflex.
5817: --
5818: -- Select the next sequence value for the cost allocation keyflex.
5819: --
5820: if g_debug then
5821: hr_utility.set_location('hr_entry.maintain_cost_keyflex', 8);
5822: end if;
5823: begin
5824: select pay_cost_allocation_keyflex_s.nextval
5825: into l_cost_allocation_keyflex_id
5825: into l_cost_allocation_keyflex_id
5826: from sys.dual;
5827: exception
5828: when NO_DATA_FOUND then
5829: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
5830: hr_utility.set_message_token('PROCEDURE',
5831: 'hr_entry.maintain_cost_keyflex');
5832: hr_utility.set_message_token('STEP','5');
5833: hr_utility.raise_error;
5826: from sys.dual;
5827: exception
5828: when NO_DATA_FOUND then
5829: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
5830: hr_utility.set_message_token('PROCEDURE',
5831: 'hr_entry.maintain_cost_keyflex');
5832: hr_utility.set_message_token('STEP','5');
5833: hr_utility.raise_error;
5834: end;
5828: when NO_DATA_FOUND then
5829: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
5830: hr_utility.set_message_token('PROCEDURE',
5831: 'hr_entry.maintain_cost_keyflex');
5832: hr_utility.set_message_token('STEP','5');
5833: hr_utility.raise_error;
5834: end;
5835: --
5836: -- Calculate concatenated_segments if a null value was passed in
5829: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
5830: hr_utility.set_message_token('PROCEDURE',
5831: 'hr_entry.maintain_cost_keyflex');
5832: hr_utility.set_message_token('STEP','5');
5833: hr_utility.raise_error;
5834: end;
5835: --
5836: -- Calculate concatenated_segments if a null value was passed in
5837: --
5837: --
5838: if p_concatenated_segments is null then
5839: --
5840: if g_debug then
5841: hr_utility.set_location('hr_entry.maintain_cost_keyflex', 15);
5842: end if;
5843: -- get delimiter
5844: l_delimiter := fnd_flex_ext.get_delimiter
5845: ('PAY'
5847: ,p_cost_keyflex_structure
5848: );
5849: --
5850: if g_debug then
5851: hr_utility.set_location('hr_entry.maintain_cost_keyflex', 20);
5852: end if;
5853: --
5854: first_seg := true;
5855:
5874: l_concatenated_segments := substr(l_concat_string, 1, 240);
5875: else
5876: --
5877: if g_debug then
5878: hr_utility.set_location('hr_entry.maintain_cost_keyflex', 25);
5879: end if;
5880: --
5881: l_concatenated_segments := p_concatenated_segments;
5882: end if;
5906: ) = FALSE
5907: then
5908: --
5909: if g_debug then
5910: hr_utility.set_location('hr_entry.maintain_cost_keyflex', 27);
5911: end if;
5912: --
5913: -- Handle error raised to create a nice error message!
5914: --
5916: FND_FLEX_KEYVAL.encoded_error_message);
5917: fnd_message.raise_error;
5918: else
5919: if g_debug then
5920: hr_utility.set_location('hr_entry.maintain_cost_keyflex', 28);
5921: end if;
5922:
5923: end if;
5924: end if;
5925: --
5926: -- Insert the new row.
5927: --
5928: if g_debug then
5929: hr_utility.set_location('hr_entry.maintain_cost_keyflex', 30);
5930: end if;
5931: begin
5932: insert into pay_cost_allocation_keyflex
5933: (cost_allocation_keyflex_id
6046: l_end_date date;
6047: l_skip_further_checks varchar2(30) := 'N';
6048: l_run_result_status varchar2(30);
6049: begin
6050: g_debug := hr_utility.debug_enabled;
6051: --
6052: -- We need to get the standard assignment payroll and time period details
6053: --
6054: if g_debug then
6051: --
6052: -- We need to get the standard assignment payroll and time period details
6053: --
6054: if g_debug then
6055: hr_utility.set_location('hr_entry.return_entry_display_status', 1);
6056: end if;
6057: begin
6058: select a.payroll_id,
6059: t.start_date,
6079: --
6080: -- 1: lets set the additional value.
6081: --
6082: if g_debug then
6083: hr_utility.set_location('hr_entry.return_entry_display_status', 5);
6084: end if;
6085: if (p_entry_type = 'D') then
6086: p_additional := 'Y';
6087: else
6090: --
6091: -- 2: lets see if current entry has been processed.
6092: --
6093: if g_debug then
6094: hr_utility.set_location('hr_entry.return_entry_display_status', 10);
6095: end if;
6096: if (l_payroll_id is not null) then
6097: begin
6098: select max(ppr.run_result_id)
6122: -- If the run result was processed and is an override then it cannot itself
6123: -- be overridden or adjusted.
6124: --
6125: if g_debug then
6126: hr_utility.set_location('hr_entry.return_entry_display_status', 15);
6127: end if;
6128: if (l_run_result_id is not null and
6129: p_entry_type = 'S') then
6130: p_processed := 'Y';
6139: -- As the entry was processed we need to check if it was overridden or
6140: -- Adjusted.
6141: --
6142: if g_debug then
6143: hr_utility.set_location('hr_entry.return_entry_display_status', 20);
6144: end if;
6145: begin
6146: select prr.status
6147: into l_run_result_status
6155: -- If the l_run_result_status is NOT in 'PA', 'R', 'O' then set the
6156: -- l_override, l_adjusted to 'N' and to don't do any further checks.
6157: --
6158: if g_debug then
6159: hr_utility.set_location('hr_entry.return_entry_display_status', 25);
6160: end if;
6161: if (l_run_result_status <> 'PA' or
6162: l_run_result_status <> 'R' or
6163: l_run_result_status <> 'O') then
6175: --
6176: -- 3: Check to see if the entry is overridden.
6177: --
6178: if g_debug then
6179: hr_utility.set_location('hr_entry.return_entry_display_status', 30);
6180: end if;
6181: begin
6182: select 'Y'
6183: into l_overridden
6198: -- 4: If the entry is NOT overridden then check to see if has been adjusted.
6199: --
6200: if (l_overridden = 'N') then
6201: if g_debug then
6202: hr_utility.set_location('hr_entry.return_entry_display_status', 35);
6203: end if;
6204: begin
6205: select 'Y'
6206: into p_adjustment
6244: l_error_flag varchar2(30) := 'N';
6245: l_dt_update_mode varchar2(30) := nvl(p_dt_update_mode, 'CORRECTION');
6246: l_dt_delete_mode varchar2(30) := nvl(p_dt_delete_mode, 'ZAP');
6247: begin
6248: g_debug := hr_utility.debug_enabled;
6249: if (p_creator_type = 'A' or
6250: p_creator_type = 'M' or
6251: p_creator_type = 'S' or
6252: p_creator_type = 'UT' or
6268: -- B: Balance Adjustment
6269: -- SP: Salary Admin
6270: --
6271: if g_debug then
6272: hr_utility.set_location('hr_entry.chk_creator_type', 5);
6273: end if;
6274: begin
6275: select h.meaning
6276: into l_creator_meaning
6282: null;
6283: end;
6284: --
6285: if (p_dml_operation = 'UPDATE') then
6286: hr_utility.set_message(801, 'HR_7014_ELE_ENTRY_CREATOR_UPD');
6287: hr_utility.set_message_token('CREATOR_MEANING', l_creator_meaning);
6288: hr_utility.raise_error;
6289: else
6290: hr_utility.set_message(801, 'HR_7015_ELE_ENTRY_CREATOR_DEL');
6283: end;
6284: --
6285: if (p_dml_operation = 'UPDATE') then
6286: hr_utility.set_message(801, 'HR_7014_ELE_ENTRY_CREATOR_UPD');
6287: hr_utility.set_message_token('CREATOR_MEANING', l_creator_meaning);
6288: hr_utility.raise_error;
6289: else
6290: hr_utility.set_message(801, 'HR_7015_ELE_ENTRY_CREATOR_DEL');
6291: hr_utility.set_message_token('CREATOR_MEANING', l_creator_meaning);
6284: --
6285: if (p_dml_operation = 'UPDATE') then
6286: hr_utility.set_message(801, 'HR_7014_ELE_ENTRY_CREATOR_UPD');
6287: hr_utility.set_message_token('CREATOR_MEANING', l_creator_meaning);
6288: hr_utility.raise_error;
6289: else
6290: hr_utility.set_message(801, 'HR_7015_ELE_ENTRY_CREATOR_DEL');
6291: hr_utility.set_message_token('CREATOR_MEANING', l_creator_meaning);
6292: hr_utility.raise_error;
6286: hr_utility.set_message(801, 'HR_7014_ELE_ENTRY_CREATOR_UPD');
6287: hr_utility.set_message_token('CREATOR_MEANING', l_creator_meaning);
6288: hr_utility.raise_error;
6289: else
6290: hr_utility.set_message(801, 'HR_7015_ELE_ENTRY_CREATOR_DEL');
6291: hr_utility.set_message_token('CREATOR_MEANING', l_creator_meaning);
6292: hr_utility.raise_error;
6293: end if;
6294: --
6287: hr_utility.set_message_token('CREATOR_MEANING', l_creator_meaning);
6288: hr_utility.raise_error;
6289: else
6290: hr_utility.set_message(801, 'HR_7015_ELE_ENTRY_CREATOR_DEL');
6291: hr_utility.set_message_token('CREATOR_MEANING', l_creator_meaning);
6292: hr_utility.raise_error;
6293: end if;
6294: --
6295: -- If the creator_type = 'F' then we need to ensure that we are NOT extending
6288: hr_utility.raise_error;
6289: else
6290: hr_utility.set_message(801, 'HR_7015_ELE_ENTRY_CREATOR_DEL');
6291: hr_utility.set_message_token('CREATOR_MEANING', l_creator_meaning);
6292: hr_utility.raise_error;
6293: end if;
6294: --
6295: -- If the creator_type = 'F' then we need to ensure that we are NOT extending
6296: -- or removing entries where a parent 'SP' (Salary Admin) record exists.
6313: (p_dml_operation = 'UPDATE' and
6314: l_dt_update_mode = 'UPDATE_OVERRIDE')))) then
6315: --
6316: if g_debug then
6317: hr_utility.set_location('hr_entry.chk_creator_type', 10);
6318: end if;
6319: begin
6320: select 'Y'
6321: into l_error_flag
6333: --
6334: -- Check to see if the Salary Admin Entry exists:
6335: --
6336: if (l_error_flag = 'Y') then
6337: hr_utility.set_message(801, 'HR_7017_ELE_ENTRY_SP_CORRECT');
6338: hr_utility.raise_error;
6339: end if;
6340: end if;
6341: --
6334: -- Check to see if the Salary Admin Entry exists:
6335: --
6336: if (l_error_flag = 'Y') then
6337: hr_utility.set_message(801, 'HR_7017_ELE_ENTRY_SP_CORRECT');
6338: hr_utility.raise_error;
6339: end if;
6340: end if;
6341: --
6342: end chk_creator_type;
6389: -- bug 10008908 cater for datetrack events that cause entry to be deleted and replaced
6390: -- with new entry- point dependent rows at new replacement entry
6391:
6392: if g_debug then
6393: hr_utility.trace('hr_entry.maintain_covered_dependants. entry replaced. dependants entry_id:'||
6394: to_char(p_element_entry_id)||
6395: ' switched to ' ||to_char(p_new_element_entry_id));
6396: end if;
6397: