[Home] [Help]
1: package body PAY_STATUS_RULES_PKG as
2: /* $Header: pyspr.pkb 120.0.12020000.2 2012/07/05 02:45:23 amnaraya ship $ */
3: --
4: --------------------------------------------------------------------------------
5: g_dummy number(1) := null; -- dummy output from cursors
237: v_end_date date;
238: --
239: begin
240: --
241: hr_utility.set_location ('PAY_STATUS_RULES_PKG',1);
242: --
243: open csr_spr_end_date;
244: fetch csr_spr_end_date into v_date1;
245: close csr_spr_end_date;
293: for update;
294: --
295: begin
296: --
297: hr_utility.set_location ('PAY_STATUS_RULES_PKG.PARENT_DELETED',1);
298: --
299: <
300: for fetched_rule in csr_rows_owned_by_parent LOOP
301: --
310: if p_delete_mode = 'ZAP' -- ie delete all rows
311: or (p_delete_mode = 'DELETE' -- ie delete all future rows
312: and fetched_rule.effective_start_date > p_session_date) then
313: --
314: hr_utility.set_location ('PAY_STATUS_RULES_PKG.PARENT_DELETED',2);
315: --
316: delete from pay_status_processing_rules_f
317: where current of csr_rows_owned_by_parent;
318: --
315: --
316: delete from pay_status_processing_rules_f
317: where current of csr_rows_owned_by_parent;
318: --
319: hr_utility.set_location ('PAY_STATUS_RULES_PKG.PARENT_DELETED',3);
320: --
321: delete from hr_application_ownerships
322: where key_name = 'STATUS_PROCESSING_RULE_ID'
323: and key_value = fetched_rule.status_processing_rule_id;
325: elsif p_delete_mode = 'DELETE'
326: and p_session_date between fetched_rule.effective_start_date
327: and fetched_rule.effective_end_date then
328: --
329: hr_utility.set_location ('PAY_STATUS_RULES_PKG.PARENT_DELETED',4);
330: --
331: update pay_status_processing_rules_f
332: set effective_end_date = p_session_date
333: where current of csr_rows_owned_by_parent;
333: where current of csr_rows_owned_by_parent;
334: --
335: end if;
336: --
337: hr_utility.set_location ('PAY_STATUS_RULES_PKG.PARENT_DELETED',5);
338: --
339: -- Cascade the action to formula result rules for this SPR
340: pay_formula_result_rules_pkg.parent_deleted (
341: --
423: v_match_not_found boolean := FALSE;
424: --
425: begin
426: --
427: hr_utility.set_location('PAY_STATUS_RULES_PKG.NO_INPUT_VALUES_MATCH_FORMULA',1);
428: --
429: open csr_number_of_input_values;
430: fetch csr_number_of_input_values into v_number_to_match;
431: close csr_number_of_input_values;
429: open csr_number_of_input_values;
430: fetch csr_number_of_input_values into v_number_to_match;
431: close csr_number_of_input_values;
432: --
433: hr_utility.set_location('PAY_STATUS_RULES_PKG.NO_INPUT_VALUES_MATCH_FORMULA',5);
434: open csr_matching_data_types;
435: fetch csr_matching_data_types into v_number_of_matches;
436: close csr_matching_data_types;
437: --
466: date_effective_updates_exist boolean := FALSE;
467:
468: begin
469:
470: hr_utility.set_location ('PAY_STATUS_RULES_PKG.DATE_EFFECTIVELY_UPDATED',1);
471:
472: open csr_dated_updates;
473: fetch csr_dated_updates into g_dummy;
474: date_effective_updates_exist := csr_dated_updates%found;
507:
508: end result_rules_exist;
509: ------------------------------------------------------------------------------
510: -- NAME --
511: -- pay_status_rules_pkg.status_rule_end_date --
512: -- --
513: -- DESCRIPTION --
514: -- Returns the correct end date for a status rule. It takes into account --
515: -- the end date of the formula and also any future status rules --
624: return v_status_rule_end_date;
625: --
626: end status_rule_end_date;
627: --------------------------------------------------------------------------------
628: end PAY_STATUS_RULES_PKG;