[Home] [Help]
1: package body hr_entry_api as
2: /* $Header: pyentapi.pkb 120.7.12010000.2 2008/10/01 06:13:39 ankagarw ship $ */
3: --
4: -- Record defined to hold information about a entry element that is being
5: -- updated.
100: processing_type varchar2(30),
101: non_payments_flag varchar2(30),
102: personal_payment_method_id number);
103: --
104: g_package constant varchar2 (32) := 'hr_entry_api.';
105: g_override_user_ent_chk varchar2(1);
106:
107: -- Hold context variables for formula validation. (Fix 1123084).
108: -- We do not need to hold the DATE_EARNED context as a variable
119: ------------------------------------------------------------------------------
120: -- Dave Harris, 01-Feb-1994, G590 --
121: -- --
122: -- NAME --
123: -- hr_entry_api.element_entry_changed PRIVATE FUNCTION --
124: -- --
125: -- DESCRIPTION --
126: -- Determines if the entry to be updated will cause a change on either --
127: -- the PAY_ELEMENT_ENTRIES_F or PAY_ELEMENT_ENTRY_VALUES_F tables. --
166: p_attribute18 in varchar2,
167: p_attribute19 in varchar2,
168: p_attribute20 in varchar2,
169: p_num_entry_values in number,
170: p_input_value_id_tbl in hr_entry.number_table,
171: p_entry_value_tbl in hr_entry.varchar2_table,
172: -- --
173: p_entry_information_category in varchar2,
174: p_entry_information1 in varchar2,
167: p_attribute19 in varchar2,
168: p_attribute20 in varchar2,
169: p_num_entry_values in number,
170: p_input_value_id_tbl in hr_entry.number_table,
171: p_entry_value_tbl in hr_entry.varchar2_table,
172: -- --
173: p_entry_information_category in varchar2,
174: p_entry_information1 in varchar2,
175: p_entry_information2 in varchar2,
225: --
226: -- Function error variables
227: --
228: l_appid number := 801;
229: l_proc_func_name varchar2(60) := 'hr_entry_api.element_entry_changed';
230: l_proc_func_error varchar2(30) := 'HR_6153_ALL_PROCEDURE_FAIL';
231: --
232: begin
233: --
514: end element_entry_changed;
515: --
516: ------------------------------------------------------------------------------
517: -- NAME --
518: -- hr_entry_api.set_formula_contexts PRIVATE FUNCTION --
519: -- --
520: -- DESCRIPTION --
521: --
522: -- Called to cache some (global) information about the assignment passed. --
579: end set_formula_contexts;
580: --
581: ------------------------------------------------------------------------------
582: -- NAME --
583: -- hr_entry_api.run_validation_formula PRIVATE FUNCTION --
584: -- --
585: -- DESCRIPTION --
586: --
587: -- Calls input validation formula to check entry value.
630: else
631: -- No context recognised.
632: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
633: hr_utility.set_message_token('PROCEDURE',
634: 'hr_entry_api.run_validation_formula');
635: hr_utility.set_message_token('STEP','10');
636: hr_utility.raise_error;
637: end if;
638: end loop;
644: -- exactly two outputs.
645: if v_outputs.count <> 2 then
646: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
647: hr_utility.set_message_token('PROCEDURE',
648: 'hr_entry_api.run_validation_formula');
649: hr_utility.set_message_token('STEP','20');
650: hr_utility.raise_error;
651: end if;
652: --
659: v_formula_status := upper(v_outputs(i).value);
660: else
661: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
662: hr_utility.set_message_token('PROCEDURE',
663: 'hr_entry_api.run_validation_formula');
664: hr_utility.set_message_token('STEP','30');
665: hr_utility.raise_error;
666: end if;
667: end loop;
695: end run_validation_formula;
696: --
697: ------------------------------------------------------------------------------
698: -- NAME --
699: -- hr_entry.validate_entry_value --
700: -- --
701: -- DESCRIPTION --
702: -- Validates and converts an entry value to DB format. --
703: -- --
803: g_debug := hr_utility.debug_enabled;
804: --
805: -- Need to determine the defaulted value of the entry value.
806: --
807: hr_entry.derive_default_value
808: (p_element_link_id,
809: p_input_value_id,
810: p_session_date,
811: p_input_currency_code,
829: if (p_lookup_type is null and
830: p_value_set_id is null and
831: NOT v_hot_defaulted) then
832: --
833: hr_entry.check_format
834: (p_element_link_id,
835: p_input_value_id,
836: p_session_date,
837: p_screen_format,
929: if v_session_date is null then
930:
931: close csr_benefit_entry;
932: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
933: hr_utility.set_message_token('PROCEDURE','hr_entry_api.validate_entry_value');
934: hr_utility.set_message_token('STEP','10');
935: hr_utility.raise_error;
936:
937: end if;
980: end validate_entry_value;
981: --
982: ------------------------------------------------------------------------------
983: -- NAME
984: -- hr_entry_api.chk_user_enterable
985: --
986: -- DESCRIPTION
987: -- additional validation on User Enterable IV_IDs and associated EVs,
988: -- preconditions, only called if creator type in forms or MIX and the
1012: --
1013: --
1014: BEGIN
1015: if g_debug then
1016: hr_utility.trace('> hr_entry_api.chk_user_enterable');
1017: hr_utility.trace('| p_el_id>' || p_el_id || '<');
1018: hr_utility.trace('| p_lookup_type>' || p_lookup_type || '<');
1019: hr_utility.trace('| p_value_set_id>' || p_value_set_id || '<');
1020: hr_utility.trace('| p_default_value>' || p_default_value || '<');
1047: EXCEPTION
1048: WHEN NO_DATA_FOUND THEN
1049: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1050: hr_utility.set_message_token('PROCEDURE',
1051: 'hr_entry_api.chk_user_enterable');
1052: hr_utility.set_message_token('STEP','1');
1053: hr_utility.raise_error;
1054: END;
1055: --
1059: -- screen format,
1060: -- return default screen and database formatted values in either a cold
1061: -- or hot format for the specified EL and IV
1062: --
1063: hr_entry.derive_default_value(
1064: p_element_link_id => p_el_id,
1065: p_input_value_id => p_iv_id,
1066: p_session_date => p_session_date,
1067: p_input_currency_code => p_input_currency_code,
1099: exception
1100: when NO_DATA_FOUND then
1101: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1102: hr_utility.set_message_token('PROCEDURE',
1103: 'hr_entry_api.chk_user_enterable');
1104: hr_utility.set_message_token('STEP','2');
1105: hr_utility.raise_error;
1106: end;
1107: --
1179: --
1180: END IF; */
1181: --
1182: if g_debug then
1183: hr_utility.trace('< hr_entry_api.chk_user_enterable');
1184: end if;
1185: END chk_user_enterable;
1186: --
1187: ------------------------------------------------------------------------------
1185: END chk_user_enterable;
1186: --
1187: ------------------------------------------------------------------------------
1188: -- NAME --
1189: -- hr_entry_api.conv_entry_values_to_table --
1190: -- --
1191: -- DESCRIPTION --
1192: -- Converts a set of predefined parameters containing the INPUT_VALUE_IDs --
1193: -- and SCREEN_ENTRY_VALUEs for an element entry to a pair of PLSQL tables --
1233: p_entry_value13 varchar2,
1234: p_entry_value14 varchar2,
1235: p_entry_value15 varchar2,
1236: p_num_entry_values out nocopy number,
1237: p_input_value_id_tbl out nocopy hr_entry.number_table,
1238: p_entry_value_tbl out nocopy hr_entry.varchar2_table
1239: ) is
1240: --
1241: -- Local variables
1234: p_entry_value14 varchar2,
1235: p_entry_value15 varchar2,
1236: p_num_entry_values out nocopy number,
1237: p_input_value_id_tbl out nocopy hr_entry.number_table,
1238: p_entry_value_tbl out nocopy hr_entry.varchar2_table
1239: ) is
1240: --
1241: -- Local variables
1242: --
1248: v_count number := 0;
1249: v_input_value_id number;
1250: v_input_currency_code varchar2(30);
1251: v_entry_value varchar2(30);
1252: v_input_value_id_tbl hr_entry.number_table;
1253: v_entry_value_tbl hr_entry.varchar2_table;
1254: --
1255: -- Selects all the link input values for a specified element link. Each one
1256: -- retrieved is compared with the entry values specified by the user. If it
1249: v_input_value_id number;
1250: v_input_currency_code varchar2(30);
1251: v_entry_value varchar2(30);
1252: v_input_value_id_tbl hr_entry.number_table;
1253: v_entry_value_tbl hr_entry.varchar2_table;
1254: --
1255: -- Selects all the link input values for a specified element link. Each one
1256: -- retrieved is compared with the entry values specified by the user. If it
1257: -- has been specified by the user then the value for the entry value is
1413: begin
1414: g_debug := hr_utility.debug_enabled;
1415: --
1416: if g_debug then
1417: hr_utility.set_location('hr_entry.conv_entry_values_to_table',5);
1418: end if;
1419: --
1420: if p_creator_type = hr_api.g_varchar2 then
1421: open csr_creator_type(p_element_entry_id,p_session_date);
1433: --
1434: if p_element_link_id is not null then
1435: --
1436: if g_debug then
1437: hr_utility.set_location('hr_entry.conv_entry_values_to_table',10);
1438: end if;
1439: --
1440: -- Find all the entry values for the specified element entry NB. it is a
1441: -- new element entry so have to get the details of the entry values from
1444: for v_link_value in csr_link_input_value(p_element_link_id,
1445: p_session_date) loop
1446: --
1447: if g_debug then
1448: hr_utility.set_location('hr_entry.conv_entry_values_to_table',15);
1449: end if;
1450: --
1451: -- Keep a count of the number of entry values and put input_value_id of
1452: -- entry value into table.
1505: --
1506: -- only raise the error if the EV does not match the
1507: -- default value stored on PLIV
1508: --
1509: hr_entry_api.chk_user_enterable(
1510: p_el_id => p_element_link_id,
1511: p_lookup_type => v_link_value.lookup_type,
1512: p_value_set_id => v_link_value.value_set_id,
1513: p_uom => v_link_value.uom,
1529: --
1530: v_screen_format := v_link_value.entry_value;
1531: v_db_format := v_screen_format;
1532: --
1533: hr_entry_api.validate_entry_value
1534: (p_element_link_id,
1535: v_link_value.input_value_id,
1536: p_session_date,
1537: v_screen_format,
1551: v_link_value.hot_default_flag = 'N' then
1552: --
1553: -- Get any default if it has been set up.
1554: --
1555: hr_entry.derive_default_value
1556: (p_element_link_id,
1557: v_input_value_id_tbl(v_count),
1558: p_session_date,
1559: v_link_value.input_currency_code,
1586: --
1587: elsif p_element_entry_id is not null then
1588: --
1589: if g_debug then
1590: hr_utility.set_location('hr_entry.conv_entry_values_to_table',20);
1591: end if;
1592: --
1593: -- Find all the entry values for the specified element entry.
1594: --
1595: for v_entry_value in csr_entry_input_value(p_element_entry_id,
1596: p_session_date) loop
1597: --
1598: if g_debug then
1599: hr_utility.set_location('hr_entry.conv_entry_values_to_table',25);
1600: hr_utility.trace('v_entry_value.element_link_id: '||to_char(v_entry_value.element_link_id) );
1601: hr_utility.trace('v_entry_value.input_value_id: '||to_char(v_entry_value.input_value_id) );
1602: hr_utility.trace('v_entry_value.lookup_type: '||v_entry_value.lookup_type) ;
1603: hr_utility.trace('v_entry_value.value_set_id: '||to_char(v_entry_value.value_set_id) );
1636: --
1637: -- only raise the error if the EV does not match the
1638: -- existing value.
1639: --
1640: hr_entry_api.chk_user_enterable(
1641: p_el_id => v_entry_value.element_link_id,
1642: p_lookup_type => v_entry_value.lookup_type,
1643: p_value_set_id => v_entry_value.value_set_id,
1644: p_uom => v_entry_value.uom,
1658: v_screen_format := v_entry_value.entry_value;
1659: v_db_format := v_screen_format;
1660: --
1661: if g_debug then
1662: hr_utility.set_location('hr_entry.conv_entry_values_to_table',27);
1663: end if;
1664: --
1665: hr_entry_api.validate_entry_value
1666: (v_entry_value.element_link_id,
1661: if g_debug then
1662: hr_utility.set_location('hr_entry.conv_entry_values_to_table',27);
1663: end if;
1664: --
1665: hr_entry_api.validate_entry_value
1666: (v_entry_value.element_link_id,
1667: v_entry_value.input_value_id,
1668: p_session_date,
1669: v_screen_format,
1689: --
1690: end if;
1691: --
1692: if g_debug then
1693: hr_utility.set_location('hr_entry.conv_entry_values_to_table',30);
1694: end if;
1695: --
1696: -- Return tables containing the entry values in DB format.
1697: --
1702: end conv_entry_values_to_table;
1703: --
1704: ------------------------------------------------------------------------------
1705: -- NAME --
1706: -- hr_entry.conv_table_to_table --
1707: -- --
1708: -- DESCRIPTION --
1709: -- Given a table of entry values it converts to DB format if required. Any --
1710: -- entry values that are not specified are derived NB. when inserting the --
1719: p_element_link_id number,
1720: p_num_entry_values in out nocopy number,
1721: p_creator_type varchar2,
1722: p_entry_type varchar2,
1723: p_input_value_id_tbl in out nocopy hr_entry.number_table,
1724: p_entry_value_tbl in out nocopy hr_entry.varchar2_table
1725: ) is
1726: --
1727: -- Selects all the link input values for a specified element link.
1720: p_num_entry_values in out nocopy number,
1721: p_creator_type varchar2,
1722: p_entry_type varchar2,
1723: p_input_value_id_tbl in out nocopy hr_entry.number_table,
1724: p_entry_value_tbl in out nocopy hr_entry.varchar2_table
1725: ) is
1726: --
1727: -- Selects all the link input values for a specified element link.
1728: --
1806: -- Local Variables
1807: --
1808: v_creator_type varchar2(30);
1809: v_num_entry_values number := 0;
1810: v_input_value_id_tbl hr_entry.number_table;
1811: v_entry_value_tbl hr_entry.varchar2_table;
1812: --v_screen_format varchar2(60);
1813: v_screen_format varchar2(80);
1814: --v_db_format varchar2(60);
1807: --
1808: v_creator_type varchar2(30);
1809: v_num_entry_values number := 0;
1810: v_input_value_id_tbl hr_entry.number_table;
1811: v_entry_value_tbl hr_entry.varchar2_table;
1812: --v_screen_format varchar2(60);
1813: v_screen_format varchar2(80);
1814: --v_db_format varchar2(60);
1815: v_db_format varchar2(80);
1819: begin
1820: g_debug := hr_utility.debug_enabled;
1821: --
1822: if g_debug then
1823: hr_utility.set_location('hr_entry.conv_to_table',5);
1824: end if;
1825: --
1826: --
1827: if p_creator_type = hr_api.g_varchar2 then
1899: --
1900: -- only raise the error if the EV does not match the
1901: -- default value stored on PLIV
1902: --
1903: hr_entry_api.chk_user_enterable(
1904: p_el_id => p_element_link_id,
1905: p_lookup_type => v_link_value.lookup_type,
1906: p_value_set_id => v_link_value.value_set_id,
1907: p_uom => v_link_value.uom,
1930: -- the value of the PREVIOUS input value
1931: v_db_format := v_screen_format;
1932: -- end bug 900288
1933: --
1934: hr_entry_api.validate_entry_value
1935: (p_element_link_id,
1936: v_link_value.input_value_id,
1937: p_session_date,
1938: v_screen_format,
1974: if v_link_value.hot_default_flag = 'N' then
1975: --
1976: -- Get any default if it has been set up.
1977: --
1978: hr_entry.derive_default_value
1979: (p_element_link_id,
1980: v_input_value_id_tbl(v_num_entry_values),
1981: p_session_date,
1982: v_link_value.input_currency_code,
2048: --
2049: -- only raise the error if the EV does not match the
2050: -- existing value.
2051: --
2052: hr_entry_api.chk_user_enterable(
2053: p_el_id => v_entry_value.element_link_id,
2054: p_lookup_type => v_entry_value.lookup_type,
2055: p_value_set_id => v_entry_value.value_set_id,
2056: p_uom => v_entry_value.uom,
2070: v_screen_format := p_entry_value_tbl(v_loop);
2071: -- bug 900288
2072: v_db_format := v_screen_format;
2073: -- end bug 900288
2074: hr_entry_api.validate_entry_value
2075: (v_entry_value.element_link_id,
2076: v_entry_value.input_value_id,
2077: p_session_date,
2078: v_screen_format,
2122: --
2123: end if;
2124: --
2125: if g_debug then
2126: hr_utility.set_location('hr_entry.conv_table_to_table',10);
2127: end if;
2128: --
2129: -- Return tables containing the entry values in DB format.
2130: --
2135: end conv_table_to_table;
2136: --
2137: ------------------------------------------------------------------------------
2138: -- NAME --
2139: -- hr_entry_api.get_link --
2140: -- --
2141: -- DESCRIPTION --
2142: -- Returns for the element link that represents the assignments eligibility --
2143: -- for a particular element type on a given date. --
2205: end get_link;
2206: --
2207: ------------------------------------------------------------------------------
2208: -- NAME
2209: -- hr_entry_api.validate_ppm_id
2210: --
2211: -- DESCRIPTION
2212: -- Make sure personal_payment_method_id exists
2213: ------------------------------------------------------------------------------
2315: --
2316: end validate_ppm_id;
2317: ------------------------------------------------------------------------------
2318: -- NAME
2319: -- hr_entry_api.validate_date_earned
2320: --
2321: -- DESCRIPTION
2322: -- Validate the date_earned column
2323: ------------------------------------------------------------------------------
2391: --
2392: end validate_date_earned;
2393: ------------------------------------------------------------------------------
2394: -- NAME --
2395: -- hr_entry_api.val_assignment ==
2396: -- --
2397: -- DESCRIPTION --
2398: -- Make sure assignment exists. --
2399: ------------------------------------------------------------------------------
2429: end val_assignment;
2430: --
2431: ------------------------------------------------------------------------------
2432: -- NAME --
2433: -- hr_entry_api.val_element_link --
2434: -- --
2435: -- DESCRIPTION --
2436: -- Make sure element link exists. --
2437: ------------------------------------------------------------------------------
2467: end val_element_link;
2468: --
2469: ------------------------------------------------------------------------------
2470: -- NAME --
2471: -- hr_entry_api.val_cost_allocation --
2472: -- --
2473: -- DESCRIPTION --
2474: -- Make sure cost allocation exists. --
2475: ------------------------------------------------------------------------------
2531: end val_cost_allocation;
2532: --
2533: ------------------------------------------------------------------------------
2534: -- NAME --
2535: -- hr_entry_api.val_comment --
2536: -- --
2537: -- DESCRIPTION --
2538: -- Make sure comment exists. --
2539: ------------------------------------------------------------------------------
2564: end val_comment;
2565: --
2566: ------------------------------------------------------------------------------
2567: -- NAME --
2568: -- hr_entry_api.val_adjustment --
2569: -- --
2570: -- DESCRIPTION --
2571: -- Make sure adjustment is valid. --
2572: ------------------------------------------------------------------------------
2614: end val_adjustment;
2615: --
2616: ------------------------------------------------------------------------------
2617: -- NAME --
2618: -- hr_entry_api.val_original_entry --
2619: -- --
2620: -- DESCRIPTION --
2621: -- Make sure original entry is valid. --
2622: ------------------------------------------------------------------------------
2670: and p_effective_date between et.effective_start_date
2671: and et.effective_end_date
2672: ;
2673: --
2674: l_proc varchar2(80):= 'hr_entry_api.val_original_entry';
2675: --
2676: begin
2677: --
2678: if g_debug then
2749: end val_original_entry;
2750: --
2751: ------------------------------------------------------------------------------
2752: -- NAME --
2753: -- hr_entry_api.val_reason --
2754: -- --
2755: -- DESCRIPTION --
2756: -- Make sure reason is valid. --
2757: ------------------------------------------------------------------------------
2787: end val_reason;
2788: --
2789: -------------------------------------------------------------------------------
2790: -- NAME --
2791: -- hr_entry_api.derive_element_type_id --
2792: -- --
2793: -- DESCRIPTION --
2794: -- Derives the element_type_id from the previously validated element_link_id --
2795: -- The resulting element_type_id will populate the denormalised column, --
2815: END derive_element_type_id;
2816: --
2817: -------------------------------------------------------------------------------
2818: -- NAME --
2819: -- hr_entry_api.derive_all_entry_values_null --
2820: -- --
2821: -- DESCRIPTION --
2822: -- If one or more Element Entry Values exist for the current Element Entry --
2823: -- and the SCREEN_ENTRY_VALUE for all those Entry Values is NULL, this --
2824: -- function returns 'Y', otherwise it returns NULL. --
2825: -- --
2826: -------------------------------------------------------------------------------
2827: FUNCTION derive_all_entry_values_null (
2828: p_entry_value_tbl in hr_entry.varchar2_table
2829: ) RETURN varchar2
2830: IS
2831: --
2832: l_all_entry_values_null varchar2(30);
2837: g_debug := hr_utility.debug_enabled;
2838: --
2839: if g_debug then
2840: hr_utility.set_location(
2841: 'Entering hr_entry_api.derive_all_entry_values_null', 5
2842: );
2843: end if;
2844: --
2845: -- First, check to see if there are any entry values...
2910: END derive_all_entry_values_null;
2911: --
2912: ------------------------------------------------------------------------------
2913: -- NAME --
2914: -- hr_entry_api.ins_ele_entry_param_val --
2915: -- --
2916: -- DESCRIPTION --
2917: -- Validates the parameters passed to hr_entry.insert_element_entry. See --
2918: -- below for a list of the validation steps : --
2913: -- NAME --
2914: -- hr_entry_api.ins_ele_entry_param_val --
2915: -- --
2916: -- DESCRIPTION --
2917: -- Validates the parameters passed to hr_entry.insert_element_entry. See --
2918: -- below for a list of the validation steps : --
2919: -- --
2920: -- 1. Check assignment exists. --
2921: -- 2. Check element link exists. --
2952: begin
2953: --
2954: -- Make sure assignment exists
2955: --
2956: hr_entry_api.val_assignment
2957: (p_assignment_id,
2958: p_effective_start_date);
2959: --
2960: -- Make sure element link exists
2958: p_effective_start_date);
2959: --
2960: -- Make sure element link exists
2961: --
2962: hr_entry_api.val_element_link
2963: (p_element_link_id,
2964: p_effective_start_date);
2965: --
2966: -- If specified make sure cost allocation exists
2966: -- If specified make sure cost allocation exists
2967: --
2968: if p_cost_allocation_keyflex_id is not null then
2969: --
2970: hr_entry_api.val_cost_allocation
2971: (p_cost_allocation_keyflex_id);
2972: --
2973: end if;
2974: --
2975: -- If specified make sure reason is a valid lookup
2976: --
2977: if p_reason is not null then
2978: --
2979: hr_entry_api.val_reason
2980: (p_reason,
2981: p_effective_start_date);
2982: --
2983: end if;
2985: -- If specified make sure comment exists
2986: --
2987: if p_comment_id is not null then
2988: --
2989: hr_entry_api.val_comment
2990: (p_comment_id);
2991: --
2992: end if;
2993: --
2995: -- element link as the element entry being created
2996: --
2997: if p_original_entry_id is not null then
2998: --
2999: hr_entry_api.val_original_entry
3000: (p_original_entry_id,
3001: p_assignment_id,
3002: p_element_link_id,
3003: p_entry_type,
3009: -- and that it is a normal entry for a recurring element
3010: --
3011: if p_entry_type in ('R','A') then
3012: --
3013: hr_entry_api.val_adjustment
3014: (p_assignment_id,
3015: p_element_link_id,
3016: p_target_entry_id,
3017: p_entry_type,
3596: -- --
3597: --
3598: ------------------------------------------------------------------------------
3599: -- NAME --
3600: -- hr_entry_api.ins_element_entry --
3601: -- --
3602: -- DESCRIPTION --
3603: -- Inserts an element entry providing full validation and also making sure --
3604: -- the end date is set correctly ie. taking into account future entries, --
3655: --
3656: -- Element Entry Values Table
3657: --
3658: p_num_entry_values number,
3659: p_input_value_id_tbl hr_entry.number_table,
3660: p_entry_value_tbl hr_entry.varchar2_table,
3661: --
3662: -- J.Bailie Element Entries DDF
3663: --
3656: -- Element Entry Values Table
3657: --
3658: p_num_entry_values number,
3659: p_input_value_id_tbl hr_entry.number_table,
3660: p_entry_value_tbl hr_entry.varchar2_table,
3661: --
3662: -- J.Bailie Element Entries DDF
3663: --
3664: p_entry_information_category varchar2,
3724: l_effective_date := p_effective_start_date;
3725: --
3726: -- Validate the parameters
3727: --
3728: hr_entry_api.ins_ele_entry_param_val
3729: (p_effective_start_date,
3730: p_assignment_id,
3731: p_element_link_id,
3732: p_creator_type,
3741: --
3742: -- Validate the entry that is about to be created and also returns the
3743: -- valid start and end dates.
3744: --
3745: hr_entry.chk_element_entry_main
3746: (null,
3747: null,
3748: p_effective_start_date,
3749: p_element_link_id,
3778: --
3779: -- Trigger workload shifting if creation of element entry overlaps with the
3780: -- latest payroll run for the assignment and workload shifting is enabled.
3781: --
3782: hr_entry.trigger_workload_shifting
3783: ('ELEMENT_ENTRY',
3784: p_assignment_id,
3785: p_effective_start_date,
3786: p_effective_end_date);
3813: if g_debug then
3814: hr_utility.trace('| element entry context in use, do validation');
3815: end if;
3816:
3817: hr_entry_api.ddf_insert_validate(
3818: p_entry_information_category,
3819: p_entry_information1,
3820: p_entry_information2,
3821: p_entry_information3,
3859: ,p_effective_date => l_effective_date);
3860: --
3861: --
3862: --
3863: v_element_entry_id := hr_entry.generate_entry_id;
3864: --
3865: -- Bugfix 3110853
3866: -- Derive the OVN here instead of in the database trigger in order to
3867: -- avoid the ORA-04091 error
4052: );
4053: --
4054: -- Create the entry values
4055: --
4056: hr_entry.ins_3p_entry_values
4057: (p_element_link_id,
4058: v_element_entry_id,
4059: p_effective_start_date,
4060: p_num_entry_values,
4233:
4234: --
4235: ------------------------------------------------------------------------------
4236: -- NAME --
4237: -- hr_entry_api.insert_element_entry --
4238: -- --
4239: -- DESCRIPTION --
4240: -- Cover routine for call to hr_entry_api.ins_element_entry that accepts --
4241: -- entry values passed as a table. It converts the entry values to DB --
4236: -- NAME --
4237: -- hr_entry_api.insert_element_entry --
4238: -- --
4239: -- DESCRIPTION --
4240: -- Cover routine for call to hr_entry_api.ins_element_entry that accepts --
4241: -- entry values passed as a table. It converts the entry values to DB --
4242: -- format and also defaults any entry values that were not specified. --
4243: -- NB. all entry values specified are validated ! --
4244: ------------------------------------------------------------------------------
4295: --
4296: -- Element Entry Values Table
4297: --
4298: p_num_entry_values number,
4299: p_input_value_id_tbl hr_entry.number_table,
4300: p_entry_value_tbl hr_entry.varchar2_table
4301: ) is
4302: --
4303: -- Local Variables
4296: -- Element Entry Values Table
4297: --
4298: p_num_entry_values number,
4299: p_input_value_id_tbl hr_entry.number_table,
4300: p_entry_value_tbl hr_entry.varchar2_table
4301: ) is
4302: --
4303: -- Local Variables
4304: --
4302: --
4303: -- Local Variables
4304: --
4305: v_num_entry_values number;
4306: v_input_value_id_tbl hr_entry.number_table;
4307: v_entry_value_tbl hr_entry.varchar2_table;
4308: --
4309: begin
4310: g_debug := hr_utility.debug_enabled;
4303: -- Local Variables
4304: --
4305: v_num_entry_values number;
4306: v_input_value_id_tbl hr_entry.number_table;
4307: v_entry_value_tbl hr_entry.varchar2_table;
4308: --
4309: begin
4310: g_debug := hr_utility.debug_enabled;
4311:
4324: --
4325: -- Make sure PLSQL table contains all the entry values ie. fill in missing
4326: -- entry values not specified by the user.
4327: --
4328: hr_entry_api.conv_table_to_table
4329: ('SCREEN',
4330: p_effective_start_date,
4331: null,
4332: p_element_link_id,
4337: v_entry_value_tbl);
4338: --
4339: -- Do real insertion of element entry.
4340: --
4341: hr_entry_api.ins_element_entry
4342: (p_effective_start_date,
4343: p_effective_end_date,
4344: p_element_entry_id,
4345: p_original_entry_id,
4422: end insert_element_entry;
4423: --
4424: ------------------------------------------------------------------------------
4425: -- NAME --
4426: -- hr_entry_api.insert_element_entry --
4427: -- --
4428: -- DESCRIPTION --
4429: -- Cover routine for call to hr_entry_api.ins_element_entry that accepts --
4430: -- entry values passed as parameters. It converts the entry values to DB --
4425: -- NAME --
4426: -- hr_entry_api.insert_element_entry --
4427: -- --
4428: -- DESCRIPTION --
4429: -- Cover routine for call to hr_entry_api.ins_element_entry that accepts --
4430: -- entry values passed as parameters. It converts the entry values to DB --
4431: -- format and also defaults any entry values that were not specified. --
4432: -- NB. all entry values specified are validated ! --
4433: ------------------------------------------------------------------------------
4518: --
4519: -- Local Variables
4520: --
4521: v_num_entry_values number;
4522: v_input_value_id_tbl hr_entry.number_table;
4523: v_entry_value_tbl hr_entry.varchar2_table;
4524: --
4525: begin
4526: g_debug := hr_utility.debug_enabled;
4519: -- Local Variables
4520: --
4521: v_num_entry_values number;
4522: v_input_value_id_tbl hr_entry.number_table;
4523: v_entry_value_tbl hr_entry.varchar2_table;
4524: --
4525: begin
4526: g_debug := hr_utility.debug_enabled;
4527: --
4534: -- Copy entry values into PLSQL table and make sure PLSQL table contains
4535: -- all the entry values ie. fill in missing entry values not specified by
4536: -- the user.
4537: --
4538: hr_entry_api.conv_entry_values_to_table
4539: ('SCREEN',
4540: null,
4541: p_element_link_id,
4542: p_effective_start_date,
4577: v_entry_value_tbl);
4578: --
4579: -- Do real insertion of element entry.
4580: --
4581: hr_entry_api.ins_element_entry
4582: (p_effective_start_date,
4583: p_effective_end_date,
4584: p_element_entry_id,
4585: p_original_entry_id,
4664: -- --
4665: --
4666: ------------------------------------------------------------------------------
4667: -- NAME --
4668: -- hr_entry_api.insert_element_entry --
4669: -- --
4670: -- DESCRIPTION --
4671: -- Cover routine for call to hr_entry_api.ins_element_entry that accepts --
4672: -- entry values passed as a table. It converts the entry values to DB --
4667: -- NAME --
4668: -- hr_entry_api.insert_element_entry --
4669: -- --
4670: -- DESCRIPTION --
4671: -- Cover routine for call to hr_entry_api.ins_element_entry that accepts --
4672: -- entry values passed as a table. It converts the entry values to DB --
4673: -- format and also defaults any entry values that were not specified. --
4674: -- NB. all entry values specified are validated ! --
4675: ------------------------------------------------------------------------------
4724: --
4725: -- Element Entry Values Table
4726: --
4727: p_num_entry_values number,
4728: p_input_value_id_tbl hr_entry.number_table,
4729: p_entry_value_tbl hr_entry.varchar2_table,
4730: --
4731: -- J.Bailie Element Entries DDF
4732: --
4725: -- Element Entry Values Table
4726: --
4727: p_num_entry_values number,
4728: p_input_value_id_tbl hr_entry.number_table,
4729: p_entry_value_tbl hr_entry.varchar2_table,
4730: --
4731: -- J.Bailie Element Entries DDF
4732: --
4733: p_entry_information_category varchar2 ,
4767: --
4768: -- Local Variables
4769: --
4770: v_num_entry_values number;
4771: v_input_value_id_tbl hr_entry.number_table;
4772: v_entry_value_tbl hr_entry.varchar2_table;
4773: --
4774: begin
4775: g_debug := hr_utility.debug_enabled;
4768: -- Local Variables
4769: --
4770: v_num_entry_values number;
4771: v_input_value_id_tbl hr_entry.number_table;
4772: v_entry_value_tbl hr_entry.varchar2_table;
4773: --
4774: begin
4775: g_debug := hr_utility.debug_enabled;
4776: --
4788: --
4789: -- Make sure PLSQL table contains all the entry values ie. fill in missing
4790: -- entry values not specified by the user.
4791: --
4792: hr_entry_api.conv_table_to_table
4793: ('SCREEN',
4794: p_effective_start_date,
4795: null,
4796: p_element_link_id,
4801: v_entry_value_tbl);
4802: --
4803: -- Do real insertion of element entry.
4804: --
4805: hr_entry_api.ins_element_entry
4806: (p_effective_start_date,
4807: p_effective_end_date,
4808: p_element_entry_id,
4809: p_original_entry_id,
4887: -- --
4888: --
4889: ------------------------------------------------------------------------------
4890: -- NAME --
4891: -- hr_entry_api.insert_element_entry --
4892: -- --
4893: -- DESCRIPTION --
4894: -- Cover routine for call to hr_entry_api.ins_element_entry that accepts --
4895: -- entry values passed as parameters. It converts the entry values to DB --
4890: -- NAME --
4891: -- hr_entry_api.insert_element_entry --
4892: -- --
4893: -- DESCRIPTION --
4894: -- Cover routine for call to hr_entry_api.ins_element_entry that accepts --
4895: -- entry values passed as parameters. It converts the entry values to DB --
4896: -- format and also defaults any entry values that were not specified. --
4897: -- NB. all entry values specified are validated ! --
4898: ------------------------------------------------------------------------------
5017: --
5018: -- Local Variables
5019: --
5020: v_num_entry_values number;
5021: v_input_value_id_tbl hr_entry.number_table;
5022: v_entry_value_tbl hr_entry.varchar2_table;
5023: --
5024: begin
5025: g_debug := hr_utility.debug_enabled;
5018: -- Local Variables
5019: --
5020: v_num_entry_values number;
5021: v_input_value_id_tbl hr_entry.number_table;
5022: v_entry_value_tbl hr_entry.varchar2_table;
5023: --
5024: begin
5025: g_debug := hr_utility.debug_enabled;
5026: --
5033: -- Copy entry values into PLSQL table and make sure PLSQL table contains
5034: -- all the entry values ie. fill in missing entry values not specified by
5035: -- the user.
5036: --
5037: hr_entry_api.conv_entry_values_to_table
5038: ('SCREEN',
5039: null,
5040: p_element_link_id,
5041: p_effective_start_date,
5076: v_entry_value_tbl);
5077: --
5078: -- Do real insertion of element entry.
5079: --
5080: hr_entry_api.ins_element_entry
5081: (p_effective_start_date,
5082: p_effective_end_date,
5083: p_element_entry_id,
5084: p_original_entry_id,
5160: end insert_element_entry;
5161: --
5162: ------------------------------------------------------------------------------
5163: -- NAME
5164: -- hr_entry_api.check_salary_admin_updates
5165: --
5166: -- DESCRIPTION
5167: -- Validates the rules for updating Salary Admin entries
5168: ------------------------------------------------------------------------------
5168: ------------------------------------------------------------------------------
5169: procedure check_salary_admin_updates
5170: (
5171: p_element_entry_id number,
5172: p_new_entry hr_entry_api.t_update_entry_rec,
5173: p_effective_date date,
5174: p_dt_update_mode varchar2
5175: ) is
5176: --
5219: --
5220: begin
5221: --
5222: if g_debug then
5223: l_proc := 'hr_entry_api.check_salary_admin_updates';
5224: check_parameters;
5225: end if;
5226: --
5227: if
5317: --
5318: end check_salary_admin_updates;
5319: ------------------------------------------------------------------------------
5320: -- NAME --
5321: -- hr_entry_api.upd_ele_entry_param_val --
5322: -- --
5323: -- DESCRIPTION --
5324: -- Validates the parameters passed to hr_entry_api.update_element_entry. --
5325: ------------------------------------------------------------------------------
5320: -- NAME --
5321: -- hr_entry_api.upd_ele_entry_param_val --
5322: -- --
5323: -- DESCRIPTION --
5324: -- Validates the parameters passed to hr_entry_api.update_element_entry. --
5325: ------------------------------------------------------------------------------
5326: procedure upd_ele_entry_param_val
5327: (
5328: --
5403: p_entry_information27 varchar2,
5404: p_entry_information28 varchar2,
5405: p_entry_information29 varchar2,
5406: p_entry_information30 varchar2,
5407: p_entry_rec out nocopy hr_entry_api.t_update_entry_rec
5408: ) is
5409: --
5410: -- Local Variables
5411: --
5408: ) is
5409: --
5410: -- Local Variables
5411: --
5412: v_entry_rec hr_entry_api.t_update_entry_rec;
5413: --
5414: begin
5415: --
5416: -- Cache entry details taking into account if the user has specifed a
5514: exception
5515: when no_data_found then
5516: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
5517: hr_utility.set_message_token('PROCEDURE',
5518: 'hr_entry_api.upd_ele_entry_param_val');
5519: hr_utility.set_message_token('STEP','1');
5520: hr_utility.raise_error;
5521: end;
5522: --
5522: --
5523: -- If specified make sure cost allocation exists
5524: --
5525: if p_cost_allocation_keyflex_id <> hr_api.g_number then
5526: hr_entry_api.val_cost_allocation
5527: (p_cost_allocation_keyflex_id);
5528: end if;
5529: --
5530: -- If specified make sure reason is a valid lookup
5529: --
5530: -- If specified make sure reason is a valid lookup
5531: --
5532: if p_reason <> hr_api.g_varchar2 then
5533: hr_entry_api.val_reason
5534: (p_reason,
5535: p_session_date);
5536: end if;
5537: --
5537: --
5538: -- If specified make sure comment exists
5539: --
5540: if p_comment_id <> hr_api.g_number then
5541: hr_entry_api.val_comment
5542: (p_comment_id);
5543: end if;
5544: --
5545: -- If specified make sure original entry is for the same assignment and
5545: -- If specified make sure original entry is for the same assignment and
5546: -- element link as the element entry being created
5547: --
5548: if p_original_entry_id <> hr_api.g_number then
5549: hr_entry_api.val_original_entry
5550: (p_original_entry_id,
5551: v_entry_rec.assignment_id,
5552: v_entry_rec.element_link_id,
5553: v_entry_rec.entry_type,
5604: -- --
5605: --
5606: ------------------------------------------------------------------------------
5607: -- NAME --
5608: -- hr_entry_api.upd_element_entry --
5609: -- --
5610: -- DESCRIPTION --
5611: -- Updates an element entry providing full validation. --
5612: ------------------------------------------------------------------------------
5664: --
5665: -- Element Entry Values Table
5666: --
5667: p_num_entry_values number,
5668: p_input_value_id_tbl hr_entry.number_table,
5669: p_entry_value_tbl hr_entry.varchar2_table,
5670: --
5671: -- J.Bailie Element Entries DDF
5672: --
5665: -- Element Entry Values Table
5666: --
5667: p_num_entry_values number,
5668: p_input_value_id_tbl hr_entry.number_table,
5669: p_entry_value_tbl hr_entry.varchar2_table,
5670: --
5671: -- J.Bailie Element Entries DDF
5672: --
5673: p_entry_information_category varchar2,
5821: v_validation_start_date date;
5822: v_validation_end_date date;
5823: v_max_effective_end_date date;
5824: v_dt_update_mode varchar2(30) := p_dt_update_mode;
5825: v_entry_rec hr_entry_api.t_update_entry_rec;
5826: v_entry_being_changed boolean := true;
5827: v_pay_proposal_id number;
5828: l_all_entry_values_null varchar2(30);
5829: -- bug 666197
5996: close csr_old_entry_values;
5997: exception
5998: when no_data_found then
5999: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
6000: hr_utility.set_message_token('PROCEDURE','hr_entry_api.upd_element_entry');
6001: hr_utility.set_message_token('STEP','10');
6002: hr_utility.raise_error;
6003: end;
6004: -- If the entry row is to be checked for a changed attribute then
6005: -- check to see if the entry row is being changed.
6006: --
6007: if (p_check_for_update = 'Y') then
6008: v_entry_being_changed :=
6009: hr_entry_api.element_entry_changed
6010: (p_session_date,
6011: p_element_entry_id,
6012: p_cost_allocation_keyflex_id,
6013: p_updating_action_id,
6079: end if;
6080: --
6081: if v_entry_being_changed then
6082: -- Validate the parameters and return details of the current element entry.
6083: hr_entry_api.upd_ele_entry_param_val
6084: (v_dt_update_mode,
6085: p_session_date,
6086: p_element_entry_id,
6087: p_cost_allocation_keyflex_id,
6188: l_entry_type_o);
6189: --
6190: --
6191: -- Make sure the update is valid.
6192: hr_entry.chk_element_entry_main
6193: (p_element_entry_id,
6194: v_entry_rec.original_entry_id,
6195: p_session_date,
6196: v_entry_rec.element_link_id,
6207: p_creator_type);
6208: --
6209: -- Validate salary admin updates to user-enterable fields
6210: --
6211: hr_entry_api.check_salary_admin_updates (
6212: --
6213: p_element_entry_id => p_element_entry_id,
6214: p_new_entry => v_entry_rec,
6215: p_effective_date => p_session_date,
6223: v_entry_rec.assignment_id);
6224: --
6225: -- Trigger workload shifting if change to element entry overlaps with the
6226: -- latest payroll run for the assignment and workload shifting is enabled.
6227: hr_entry.trigger_workload_shifting
6228: ('ELEMENT_ENTRY',
6229: v_entry_rec.assignment_id,
6230: v_validation_start_date,
6231: v_validation_end_date);
6253: if g_debug then
6254: hr_utility.trace('| element entry context in use, do validation');
6255: end if;
6256:
6257: hr_entry_api.ddf_update_validate(
6258: p_entry_information_category => p_entry_information_category
6259: , p_entry_information1 => p_entry_information1
6260: , p_entry_information2 => p_entry_information2
6261: , p_entry_information3 => p_entry_information3
6634: End Loop;
6635:
6636: --
6637: -- Update element entry values.
6638: hr_entry.upd_3p_entry_values
6639: (p_element_entry_id,
6640: v_entry_rec.element_type_id,
6641: v_entry_rec.element_link_id,
6642: v_entry_rec.cost_allocation_keyflex_id,
6929:
6930:
6931: ------------------------------------------------------------------------------
6932: -- NAME --
6933: -- hr_entry_api.update_element_entry --
6934: -- --
6935: -- DESCRIPTION --
6936: -- Cover routine for call to hr_entry_api.upd_element_entry that accepts --
6937: -- entry values passed as a table. It converts the entry values to DB --
6932: -- NAME --
6933: -- hr_entry_api.update_element_entry --
6934: -- --
6935: -- DESCRIPTION --
6936: -- Cover routine for call to hr_entry_api.upd_element_entry that accepts --
6937: -- entry values passed as a table. It converts the entry values to DB --
6938: -- format. Any entry values that were not specified are copied from the --
6939: -- element entry being updated. --
6940: -- NB. all entry values specified are validated ! --
6994: --
6995: -- Element Entry Values Table
6996: --
6997: p_num_entry_values number,
6998: p_input_value_id_tbl hr_entry.number_table,
6999: p_entry_value_tbl hr_entry.varchar2_table
7000: ) is
7001: --
7002: -- Local Variables
6995: -- Element Entry Values Table
6996: --
6997: p_num_entry_values number,
6998: p_input_value_id_tbl hr_entry.number_table,
6999: p_entry_value_tbl hr_entry.varchar2_table
7000: ) is
7001: --
7002: -- Local Variables
7003: v_num_entry_values number;
7000: ) is
7001: --
7002: -- Local Variables
7003: v_num_entry_values number;
7004: v_input_value_id_tbl hr_entry.number_table;
7005: v_entry_value_tbl hr_entry.varchar2_table;
7006: l_entry_type VARCHAR2(1);
7007: v_assignment_id number;
7008: --
7001: --
7002: -- Local Variables
7003: v_num_entry_values number;
7004: v_input_value_id_tbl hr_entry.number_table;
7005: v_entry_value_tbl hr_entry.varchar2_table;
7006: l_entry_type VARCHAR2(1);
7007: v_assignment_id number;
7008: --
7009: -- Local Cursors
7038: -- Formula validation of Input Values.
7039: --
7040: set_formula_contexts (v_assignment_id, p_session_date);
7041: --
7042: hr_entry_api.conv_table_to_table
7043: ('SCREEN',
7044: p_session_date,
7045: p_element_entry_id,
7046: null,
7049: l_entry_type,
7050: v_input_value_id_tbl,
7051: v_entry_value_tbl);
7052: --
7053: hr_entry_api.upd_element_entry
7054: (p_dt_update_mode,
7055: p_session_date,
7056: p_check_for_update,
7057: p_element_entry_id,
7130: end update_element_entry;
7131: --
7132: ------------------------------------------------------------------------------
7133: -- NAME --
7134: -- hr_entry_api.update_element_entry --
7135: -- --
7136: -- DESCRIPTION --
7137: -- Cover routine for call to hr_entry_api.upd_element_entry that accepts --
7138: -- entry values passed as parameters. It converts the entry values to DB --
7133: -- NAME --
7134: -- hr_entry_api.update_element_entry --
7135: -- --
7136: -- DESCRIPTION --
7137: -- Cover routine for call to hr_entry_api.upd_element_entry that accepts --
7138: -- entry values passed as parameters. It converts the entry values to DB --
7139: -- format. Any entry values that were not specified are copied from the --
7140: -- element entry being updated. --
7141: -- NB. all entry values specified are validated ! --
7228: ) is
7229: --
7230: -- Local Variables
7231: v_num_entry_values number;
7232: v_input_value_id_tbl hr_entry.number_table;
7233: v_entry_value_tbl hr_entry.varchar2_table;
7234: l_entry_type VARCHAR2(1);
7235: v_assignment_id number;
7236: --
7229: --
7230: -- Local Variables
7231: v_num_entry_values number;
7232: v_input_value_id_tbl hr_entry.number_table;
7233: v_entry_value_tbl hr_entry.varchar2_table;
7234: l_entry_type VARCHAR2(1);
7235: v_assignment_id number;
7236: --
7237: -- Local Cursors
7266: -- Convert entry value details ie. INPUT_VALUE_ID and SCREEN_ENTRY_VALUE
7267: -- into two tables to be passed into the overloaded version of
7268: -- update_element_entry. The overloaded version is capable of handling
7269: -- unlimited numbers of entry values.
7270: hr_entry_api.conv_entry_values_to_table
7271: ('SCREEN',
7272: p_element_entry_id,
7273: null,
7274: p_session_date,
7307: v_num_entry_values,
7308: v_input_value_id_tbl,
7309: v_entry_value_tbl);
7310: --
7311: hr_entry_api.upd_element_entry
7312: (p_dt_update_mode,
7313: p_session_date,
7314: p_check_for_update,
7315: p_element_entry_id,
7390: -- --
7391: --
7392: ------------------------------------------------------------------------------
7393: -- NAME --
7394: -- hr_entry_api.update_element_entry --
7395: -- --
7396: -- DESCRIPTION --
7397: -- Cover routine for call to hr_entry_api.upd_element_entry that accepts --
7398: -- entry values passed as a table. It converts the entry values to DB --
7393: -- NAME --
7394: -- hr_entry_api.update_element_entry --
7395: -- --
7396: -- DESCRIPTION --
7397: -- Cover routine for call to hr_entry_api.upd_element_entry that accepts --
7398: -- entry values passed as a table. It converts the entry values to DB --
7399: -- format. Any entry values that were not specified are copied from the --
7400: -- element entry being updated. --
7401: -- NB. all entry values specified are validated ! --
7454: --
7455: -- Element Entry Values Table
7456: --
7457: p_num_entry_values number,
7458: p_input_value_id_tbl hr_entry.number_table,
7459: p_entry_value_tbl hr_entry.varchar2_table,
7460: p_entry_information_category varchar2 ,
7461: p_entry_information1 varchar2 default hr_api.g_varchar2,
7462: p_entry_information2 varchar2 default hr_api.g_varchar2,
7455: -- Element Entry Values Table
7456: --
7457: p_num_entry_values number,
7458: p_input_value_id_tbl hr_entry.number_table,
7459: p_entry_value_tbl hr_entry.varchar2_table,
7460: p_entry_information_category varchar2 ,
7461: p_entry_information1 varchar2 default hr_api.g_varchar2,
7462: p_entry_information2 varchar2 default hr_api.g_varchar2,
7463: p_entry_information3 varchar2 default hr_api.g_varchar2,
7492: ) is
7493: --
7494: -- Local Variables
7495: v_num_entry_values number;
7496: v_input_value_id_tbl hr_entry.number_table;
7497: v_entry_value_tbl hr_entry.varchar2_table;
7498: l_entry_type VARCHAR2(1);
7499: v_assignment_id number;
7500: --
7493: --
7494: -- Local Variables
7495: v_num_entry_values number;
7496: v_input_value_id_tbl hr_entry.number_table;
7497: v_entry_value_tbl hr_entry.varchar2_table;
7498: l_entry_type VARCHAR2(1);
7499: v_assignment_id number;
7500: --
7501: -- Local Cursors
7530: -- Formula validation of Input Values.
7531: --
7532: set_formula_contexts (v_assignment_id, p_session_date);
7533: --
7534: hr_entry_api.conv_table_to_table
7535: ('SCREEN',
7536: p_session_date,
7537: p_element_entry_id,
7538: null,
7541: l_entry_type,
7542: v_input_value_id_tbl,
7543: v_entry_value_tbl);
7544: --
7545: hr_entry_api.upd_element_entry
7546: (p_dt_update_mode,
7547: p_session_date,
7548: p_check_for_update,
7549: p_element_entry_id,
7623: -- --
7624: --
7625: ------------------------------------------------------------------------------
7626: -- NAME --
7627: -- hr_entry_api.update_element_entry --
7628: -- --
7629: -- DESCRIPTION --
7630: -- Cover routine for call to hr_entry_api.upd_element_entry that accepts --
7631: -- entry values passed as parameters. It converts the entry values to DB --
7626: -- NAME --
7627: -- hr_entry_api.update_element_entry --
7628: -- --
7629: -- DESCRIPTION --
7630: -- Cover routine for call to hr_entry_api.upd_element_entry that accepts --
7631: -- entry values passed as parameters. It converts the entry values to DB --
7632: -- format. Any entry values that were not specified are copied from the --
7633: -- element entry being updated. --
7634: -- NB. all entry values specified are validated ! --
7752: ) is
7753: --
7754: -- Local Variables
7755: v_num_entry_values number;
7756: v_input_value_id_tbl hr_entry.number_table;
7757: v_entry_value_tbl hr_entry.varchar2_table;
7758: l_entry_type VARCHAR2(1);
7759: v_assignment_id number;
7760: --
7753: --
7754: -- Local Variables
7755: v_num_entry_values number;
7756: v_input_value_id_tbl hr_entry.number_table;
7757: v_entry_value_tbl hr_entry.varchar2_table;
7758: l_entry_type VARCHAR2(1);
7759: v_assignment_id number;
7760: --
7761: -- Local Cursors
7790: -- Convert entry value details ie. INPUT_VALUE_ID and SCREEN_ENTRY_VALUE
7791: -- into two tables to be passed into the overloaded version of
7792: -- update_element_entry. The overloaded version is capable of handling
7793: -- unlimited numbers of entry values.
7794: hr_entry_api.conv_entry_values_to_table
7795: ('SCREEN',
7796: p_element_entry_id,
7797: null,
7798: p_session_date,
7831: v_num_entry_values,
7832: v_input_value_id_tbl,
7833: v_entry_value_tbl);
7834: --
7835: hr_entry_api.upd_element_entry
7836: (p_dt_update_mode,
7837: p_session_date,
7838: p_check_for_update,
7839: p_element_entry_id,
7911: end update_element_entry;
7912: --
7913: ------------------------------------------------------------------------------
7914: -- NAME --
7915: -- hr_entry_api.del_ele_entry_param_val --
7916: -- --
7917: -- DESCRIPTION --
7918: -- Validates the parameters passed to hr_entry_api.delete_element_entry. --
7919: ------------------------------------------------------------------------------
7914: -- NAME --
7915: -- hr_entry_api.del_ele_entry_param_val --
7916: -- --
7917: -- DESCRIPTION --
7918: -- Validates the parameters passed to hr_entry_api.delete_element_entry. --
7919: ------------------------------------------------------------------------------
7920: function del_ele_entry_param_val
7921: (
7922: p_dt_delete_mode in out nocopy varchar2,
7922: p_dt_delete_mode in out nocopy varchar2,
7923: p_session_date date,
7924: p_element_entry_id number,
7925: p_assignment_id number,
7926: p_entry_rec out nocopy hr_entry_api.t_delete_entry_rec
7927: ) return boolean is
7928: --
7929: -- Local Variables
7930: --
7928: --
7929: -- Local Variables
7930: --
7931: l_processed varchar2(1) := 'N';
7932: v_entry_rec hr_entry_api.t_delete_entry_rec;
7933:
7934: --Added for bug:6809717
7935: l_assign_exist number:=0;
7936: l_before_ovm number;
8004: exception
8005: when no_data_found then
8006: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
8007: hr_utility.set_message_token('PROCEDURE',
8008: 'hr_entry_api.delete_element_entry');
8009: hr_utility.set_message_token('STEP','1');
8010: hr_utility.raise_error;
8011: when too_many_rows then
8012: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
8010: hr_utility.raise_error;
8011: when too_many_rows then
8012: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
8013: hr_utility.set_message_token('PROCEDURE',
8014: 'hr_entry_api.delete_element_entry');
8015: hr_utility.set_message_token('STEP','2');
8016: hr_utility.raise_error;
8017: end;
8018: --
8160: end del_ele_entry_param_val;
8161: --
8162: ------------------------------------------------------------------------------
8163: -- NAME --
8164: -- hr_entry_api.delete_element_entry --
8165: -- --
8166: -- DESCRIPTION --
8167: -- Deletes an element entry providing full validation. --
8168: ------------------------------------------------------------------------------
8268: v_validation_start_date date;
8269: v_validation_end_date date;
8270: v_next_effective_end_date date;
8271: v_dt_delete_mode varchar2(30) := p_dt_delete_mode;
8272: v_entry_rec hr_entry_api.t_delete_entry_rec;
8273: v_pay_proposal_id number;
8274: -- bug 666197
8275: l_effective_start_date date;
8276: l_effective_end_date date;
8438: begin
8439: g_debug := hr_utility.debug_enabled;
8440: --
8441: if g_debug then
8442: hr_utility.set_location('hr_entry_api.delete_element_entry', 5);
8443: end if;
8444: --
8445: -- bug 666197, retrieve and store old values for the entry row
8446: --
8494: close csr_old_entry_values;
8495: exception
8496: when no_data_found then
8497: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
8498: hr_utility.set_message_token('PROCEDURE','hr_entry_api.upd_element_entry');
8499: hr_utility.set_message_token('STEP','10');
8500: hr_utility.raise_error;
8501: end;
8502: --
8504: -- Validate the parameter and return element entry details.
8505: --
8506: set_formula_contexts(l_assignment_id_o, p_session_date);
8507: --
8508: if hr_entry_api.del_ele_entry_param_val
8509: (v_dt_delete_mode,
8510: p_session_date,
8511: p_element_entry_id,
8512: l_assignment_id_o,
8517: --
8518: if v_dt_delete_mode = 'DELETE_NEXT_CHANGE' then
8519: --
8520: if g_debug then
8521: hr_utility.set_location('hr_entry_api.delete_element_entry', 15);
8522: end if;
8523: --
8524: begin
8525: select min(ee.effective_end_date)
8556: -- for purge. We check this here because the v_dt_delete_mode
8557: -- can be changed by the previous call.
8558: --
8559: if g_debug then
8560: hr_utility.set_location('hr_entry_api.delete_element_entry', 18);
8561: end if;
8562: -- Start by reading the value.
8563: fnd_profile.get('HR_ELE_ENTRY_PURGE_CONTROL', l_prof_value);
8564: --
8587: --
8588: end if;
8589: --
8590: if g_debug then
8591: hr_utility.set_location('hr_entry_api.delete_element_entry', 20);
8592: end if;
8593: --
8594: -- Make sure the delete is valid.
8595: --
8608: hr_utility.raise_error;
8609: --
8610: end if;
8611: --
8612: hr_entry.chk_element_entry_main
8613: (p_element_entry_id,
8614: v_entry_rec.original_entry_id,
8615: p_session_date,
8616: v_entry_rec.element_link_id,
8634: open csr_accepted_pay_proposals(p_element_entry_id,
8635: v_entry_rec.assignment_id);
8636: --
8637: if g_debug then
8638: hr_utility.set_location('hr_entry_api.delete_element_entry', 25);
8639: end if;
8640: --
8641: -- Trigger workload shifting if change to element entry overlaps with the
8642: -- latest payroll run for the assignment and workload shifting is enabled.
8640: --
8641: -- Trigger workload shifting if change to element entry overlaps with the
8642: -- latest payroll run for the assignment and workload shifting is enabled.
8643: --
8644: hr_entry.trigger_workload_shifting
8645: ('ELEMENT_ENTRY',
8646: v_entry_rec.assignment_id,
8647: v_validation_start_date,
8648: v_validation_end_date);
8655: --
8656: if v_dt_delete_mode = 'DELETE' or p_dt_delete_mode = 'ZAP' then
8657: --
8658: if g_debug then
8659: hr_utility.set_location('hr_entry_api.delete_element_entry', 30);
8660: end if;
8661: --
8662: -- Enhancement 3368211
8663: --
8695: --
8696: if v_dt_delete_mode = 'DELETE_NEXT_CHANGE' then
8697: --
8698: if g_debug then
8699: hr_utility.set_location('hr_entry_api.delete_element_entry', 40);
8700: end if;
8701: --
8702: delete from pay_element_entries_f ee
8703: where ee.element_entry_id = p_element_entry_id
8716: --
8717: elsif v_dt_delete_mode = 'FUTURE_CHANGE' then
8718: --
8719: if g_debug then
8720: hr_utility.set_location('hr_entry_api.delete_element_entry', 45);
8721: end if;
8722: --
8723: delete from pay_element_entries_f ee
8724: where ee.element_entry_id = p_element_entry_id
8734: --
8735: elsif v_dt_delete_mode = 'DELETE' then
8736: --
8737: if g_debug then
8738: hr_utility.set_location('hr_entry_api.delete_element_entry', 50);
8739: end if;
8740: --
8741: delete from pay_element_entries_f ee
8742: where ee.element_entry_id = p_element_entry_id
8752: --
8753: elsif v_dt_delete_mode = 'ZAP' then
8754: --
8755: if g_debug then
8756: hr_utility.set_location('hr_entry_api.delete_element_entry', 55);
8757: end if;
8758: --
8759: -- For Zap mode, delete any balance exclusions rows for the entry
8760: --
8767: --
8768: end if;
8769: --
8770: if g_debug then
8771: hr_utility.set_location('hr_entry_api.delete_element_entry', 60);
8772: end if;
8773: --
8774: -- Delete element entry values
8775: --
8772: end if;
8773: --
8774: -- Delete element entry values
8775: --
8776: hr_entry.del_3p_entry_values
8777: (v_entry_rec.assignment_id,
8778: p_element_entry_id,
8779: v_entry_rec.element_type_id,
8780: v_entry_rec.element_link_id,
8787: v_validation_start_date,
8788: v_validation_end_date);
8789: --
8790: if g_debug then
8791: hr_utility.set_location('hr_entry_api.delete_element_entry', 65);
8792: end if;
8793: --
8794: -- Go through list of accepted pay proposals for the assignment /
8795: -- element entry to see if any of the pay proosals have lost the element
8813: and ee.effective_start_date = pp.change_date);
8814: --
8815: end loop;
8816: --
8817: else -- hr_entry_api.del_ele_entry_param_val returned 'FALSE'
8818: --
8819: if v_entry_rec.processing_type = 'N' and
8820: --v_dt_delete_mode in ('DELETE_NEXT_CHANGE','FUTURE_CHANGE') then
8821: v_dt_delete_mode in ('DELETE_NEXT_CHANGE','FUTURE_CHANGE','DELETE') then
8820: --v_dt_delete_mode in ('DELETE_NEXT_CHANGE','FUTURE_CHANGE') then
8821: v_dt_delete_mode in ('DELETE_NEXT_CHANGE','FUTURE_CHANGE','DELETE') then
8822: --
8823: if g_debug then
8824: hr_utility.set_location('hr_entry_api.delete_element_entry', 67);
8825: end if;
8826: --
8827: -- We do not wish to continue processing
8828: --
8844: --
8845: begin
8846: --
8847: -- NB bug 3057670 has highlighted the fact that the orig delete_mode can be altered
8848: -- in the earlier call to hr_entry_api.del_ele_entry_param_val
8849: -- Therefore the passed value can be p_dt_delete_mode or v_dt_delete_mode.
8850: -- From JUL FP 03 this has been made the latter, ie if we handle a DELETE as a ZAP
8851: -- as in the bug above, then tell the hook (and DYT's etc) that we have just
8852: -- performed a ZAP
8948: end;
8949: --
8950: --
8951: if g_debug then
8952: hr_utility.set_location('hr_entry_api.delete_element_entry', 70);
8953: end if;
8954: --
8955:
8956: --
8970: end if;
8971:
8972: end delete_element_entry;
8973: --
8974: end hr_entry_api;