[Home] [Help]
515: -- the session_date restriction that was used to ensure only one row would
516: -- be returned. This allow the employee termination procedure to proceed
517: -- for elements only defined after the termination date.
518: cursor c1 is select pet.process_in_run_flag
519: from pay_element_types_f pet
520: where pet.element_type_id = p_element_type_id;
521: --
522: begin
523: begin
1081: -- a value_error would have been raised by the assert_condition call
1082: -- in the main body code otherwise.
1083: --
1084: select elt_tl.element_name
1085: from pay_element_types_f_tl ELT_TL,
1086: pay_element_types_f ELT,
1087: pay_element_links_f LINK
1088: where elt.element_type_id = link.element_type_id
1089: and elt_tl.element_type_id = elt.element_type_id
1082: -- in the main body code otherwise.
1083: --
1084: select elt_tl.element_name
1085: from pay_element_types_f_tl ELT_TL,
1086: pay_element_types_f ELT,
1087: pay_element_links_f LINK
1088: where elt.element_type_id = link.element_type_id
1089: and elt_tl.element_type_id = elt.element_type_id
1090: and P_ELEMENT_LINK_ID = link.element_link_id
1273: select pet.post_termination_rule,
1274: pet.processing_type
1275: into v_post_termination_rule,
1276: v_processing_type
1277: from pay_element_types_f pet,
1278: pay_element_links_f pel
1279: where p_session_date between pel.effective_start_date
1280: and pel.effective_end_date
1281: and pel.element_link_id = p_element_link_id
2112: -- DESCRIPTION
2113: -- This procedure does the following checks:
2114: -- 1) Ensure that the element type is not closed for entry currently
2115: -- or in the future by determining the value of the
2116: -- CLOSED_FOR_ENTRY_FLAG attribute on PAY_ELEMENT_TYPES_F.
2117: -- 2) If the employee assignment is to a payroll then ensure that
2118: -- the current and future periods as of session date are open.
2119: -- If the period is closed, you can only change entries providing
2120: -- they are not to be processed in a payroll run.
2127: p_validation_end_date in date,
2128: p_assignment_id in number
2129: ) is
2130: --
2131: l_element_name pay_element_types_f.element_name%TYPE;
2132: l_legislation_code pay_element_types_f.legislation_code%TYPE;
2133: l_us_except boolean := FALSE;
2134:
2135: cursor csr_element_type
2128: p_assignment_id in number
2129: ) is
2130: --
2131: l_element_name pay_element_types_f.element_name%TYPE;
2132: l_legislation_code pay_element_types_f.legislation_code%TYPE;
2133: l_us_except boolean := FALSE;
2134:
2135: cursor csr_element_type
2136: (
2140: ) is
2141: select et_tl.element_name,
2142: et.closed_for_entry_flag,
2143: et.legislation_code
2144: from pay_element_types_f_tl et_tl,
2145: pay_element_types_f et
2146: where et.element_type_id = et_tl.element_type_id
2147: and et.element_type_id = p_element_type_id
2148: and userenv('LANG') = et_tl.language
2141: select et_tl.element_name,
2142: et.closed_for_entry_flag,
2143: et.legislation_code
2144: from pay_element_types_f_tl et_tl,
2145: pay_element_types_f et
2146: where et.element_type_id = et_tl.element_type_id
2147: and et.element_type_id = p_element_type_id
2148: and userenv('LANG') = et_tl.language
2149: and et.effective_start_date <= p_validation_end_date
2174: -- LOCK the element type table in share mode so that no other user can take
2175: -- out an exclusive lock to change the data. This provides a stable view
2176: -- of the element type table. See if the element type has been closed for
2177: -- entry over the period of change. If it has then error !
2178: --lock table pay_element_types_f in share mode;
2179: --
2180: for v_element_type in csr_element_type(p_element_type_id,
2181: p_validation_start_date,
2182: p_validation_end_date) loop
2801: cursor c_cwk_element_check is
2802: -- Should not allow these PTO elements for CWKs
2803: select 'Y'
2804: from pay_element_links_f pel
2805: ,pay_element_types_f pet
2806: ,pay_accrual_plans pap
2807: where pel.element_link_id = p_element_link_id
2808: and p_session_date between pel.effective_start_date
2809: and pel.effective_end_date
2814: union all
2815: -- Should not allow these absence elements for CWKs
2816: select 'Y'
2817: from pay_element_links_f pel
2818: ,pay_element_types_f pet
2819: ,pay_input_values_f piv
2820: ,per_absence_attendance_types abt
2821: where pel.element_link_id = p_element_link_id
2822: and p_session_date between pel.effective_start_date
2857: v_third_party_pay_only_flag,
2858: v_element_name,
2859: v_classification_name
2860: from pay_element_links_f el,
2861: pay_element_types_f et,
2862: pay_element_classifications ec
2863: where el.element_link_id = p_element_link_id
2864: and et.element_type_id = el.element_type_id
2865: and et.classification_id = ec.classification_id
3485: v_input_currency_code,
3486: v_output_currency_code
3487: from pay_element_entries_f ee,
3488: pay_element_links_f el,
3489: pay_element_types_f et
3490: where ee.element_entry_id = p_element_entry_id
3491: and el.element_link_id = ee.element_link_id
3492: and et.element_type_id = el.element_type_id
3493: and p_session_date between ee.effective_start_date
5035: -- being validated.
5036: begin
5037: --
5038: -- Dave Harris, 13-Oct-1994
5039: -- Bug G1420: restricted pay_element_types_f using date effective dates.
5040: --
5041: -- INDEX hint added following NHS project recommendation
5042: select /*+ INDEX(liv, pay_link_input_values_f_n2) */
5043: iv.uom,
5062: v_maximum_value,
5063: v_warning_or_error
5064: from pay_link_input_values_f liv,
5065: pay_input_values_f iv,
5066: pay_element_types_f et
5067: where liv.element_link_id = p_element_link_id
5068: and liv.input_value_id = p_input_value_id
5069: and iv.input_value_id = liv.input_value_id
5070: and et.element_type_id = iv.element_type_id