[Home] [Help]
470: -- Unless this function actually has to do anything, we can make call
471: -- to pay_db_pay_setup from ins_deduction_template.
472: --
473:
474: hr_utility.set_location('hr_user_init_dedn.ins_dedn_ele_type',10);
475:
476: IF p_ele_processing_type = 'N' THEN
477:
478: v_mult_entries_allowed := 'Y';
491: v_third_ppm := 'Y';
492:
493: END IF;
494:
495: hr_utility.set_location('hr_user_init_dedn.ins_dedn_ele_type',30);
496: ret := pay_db_pay_setup.create_element(
497: p_element_name => p_ele_name,
498: p_description => p_ele_description,
499: p_classification_name => p_ele_class,
542: v_ele_formula_id NUMBER(9);
543: v_ele_name VARCHAR2(80);
544:
545: BEGIN
546: hr_utility.set_location('hr_user_init_dedn.ins_formula',10);
547:
548: if p_ele_processing_type = 'R' then
549:
550: SELECT FF.formula_text, FF.formula_type_id
571:
572: end if; /* p_ele_processing_type */
573:
574: -- Replace element name placeholders with current element name:
575: hr_utility.set_location('hr_user_init_dedn.ins_formula',15);
576: v_ele_name := REPLACE(LTRIM(RTRIM(UPPER(p_ff_ele_name))),' ','_');
577:
578: v_ele_formula_text := REPLACE( v_skeleton_formula_text,
579: '
582: -- Make
583: --
584: IF p_amt_rule = 'PT' THEN
585: IF p_row_type NOT IN ('Salary Range', 'Age Range') THEN
586: hr_utility.set_location('hr_user_init_dedn.ins_formula',17);
587: v_ele_formula_text := REPLACE( v_ele_formula_text,
588: '
589: REPLACE(LTRIM(RTRIM(p_row_type)),' ','_'));
590:
587: v_ele_formula_text := REPLACE( v_ele_formula_text,
588: '
589: REPLACE(LTRIM(RTRIM(p_row_type)),' ','_'));
590:
591: hr_utility.set_location('hr_user_init_dedn.ins_formula',19);
592: v_ele_formula_text := REPLACE( v_ele_formula_text,
593: '
594: 'default for ' || REPLACE(LTRIM(RTRIM(p_row_type)),' ','_') || ' (text) is ''NOT ENTERED''');
595:
602: --
603: -- Do we need to handle when row type is Salary Range, ie. use ASS_SALARY dbi?
604: -- Do we also need to create Default For ASS_SALARY or PER_AGE as appropriate?
605: --
606: hr_utility.set_location('hr_user_init_dedn.ins_formula',20);
607: v_ele_formula_text := REPLACE( v_ele_formula_text,
608: '
609: 'To_Char(PER_AGE)');
610:
607: v_ele_formula_text := REPLACE( v_ele_formula_text,
608: '
609: 'To_Char(PER_AGE)');
610:
611: hr_utility.set_location('hr_user_init_dedn.ins_formula',21);
612: v_ele_formula_text := REPLACE( v_ele_formula_text,
613: '
614: ' ');
615:
621:
622: --
623: -- "Zero" benefits
624: --
625: hr_utility.set_location('hr_user_init_dedn.ins_formula',23);
626: v_ele_formula_text := REPLACE( v_ele_formula_text,
627: v_ele_name || '_BEN_EE_CONTR_VALUE',
628: '0');
629:
643:
644: --
645: -- Using benefits,
646: --
647: hr_utility.set_location('hr_user_init_dedn.ins_formula',25);
648: v_ele_formula_text := REPLACE( v_ele_formula_text,
649: '
650: 'default for ' || v_ele_name || '_BEN_EE_CONTR_VALUE is 0');
651:
670:
671: --
672: -- Clear out everything!
673: -- Clear out
674: hr_utility.set_location('hr_user_init_dedn.ins_formula',27);
675: v_ele_formula_text := REPLACE( v_ele_formula_text,
676: '
677: '''NOT ENTERED''');
678:
711: --
712: -- Insert the new formula into current business goup:
713: -- Get new id
714:
715: hr_utility.set_location('hr_user_init_dedn.ins_formula',30);
716: SELECT ff_formulas_s.nextval
717: INTO v_formula_id
718: FROM sys.dual;
719:
716: SELECT ff_formulas_s.nextval
717: INTO v_formula_id
718: FROM sys.dual;
719:
720: hr_utility.set_location('hr_user_init_dedn.ins_formula',40);
721: INSERT INTO ff_formulas_f (
722: FORMULA_ID,
723: EFFECTIVE_START_DATE,
724: EFFECTIVE_END_DATE,
895: IF UPPER(p_amount_rule) = 'PE' THEN
896: -- Set SCL:
897: -- IF UPPER(p_ele_class_name) = 'INVOLUNTARY DEDUCTIONS' THEN
898: -- Populate segments 1,2,3 w/Category, PayTab, PayTab Row.
899: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',05);
900: UPDATE pay_element_types_f
901: SET element_information_category = g_ele_info_cat,
902: element_information1 = p_ele_cat,
903: element_information2 = p_partial_dedn,
906: benefit_classification_id = p_ben_class_id
907: WHERE element_type_id = p_ele_id
908: AND business_group_id + 0 = p_bg_id;
909:
910: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',05);
911: UPDATE pay_element_types_f
912: SET element_information_category = g_ele_info_cat,
913: element_information1 = p_ele_cat,
914: element_information2 = p_partial_dedn,
918:
919:
920: If p_ele_proc_type = 'R' then /* Not required for NR Elements */
921:
922: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',05);
923: UPDATE pay_element_types_f
924: SET element_information_category = g_ele_info_cat,
925: element_information1 = p_ele_cat,
926: element_information2 = p_partial_dedn,
933: --
934: -- *1* Testing note: formula name should be '
935: -- in this case.
936: --
937: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',15);
938: v_calc_rule_formula_id := ins_formula (
939: p_ff_ele_name => p_ele_name,
940: p_ff_suffix => '_PERCENT_EARNINGS',
941: p_ff_desc => 'Percent Earnings calculation for deductions.',
943: p_amt_rule => NULL,
944: p_row_type => NULL,
945: p_ele_processing_type => p_ele_proc_type );
946:
947: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',17);
948: v_stat_proc_rule_id :=
949: pay_formula_results.ins_stat_proc_rule (
950: p_business_group_id => p_bg_id,
951: p_legislation_code => NULL,
960: -- Remember: NULL asst_status_type_id means "Standard" processing rule!
961:
962: -- REQUIRED FOR EACH INPUT VALUE CREATED IN THIS MANNER, TO (HERE).
963: -- Creating "Percentage" inpval
964: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',20);
965: g_inpval_disp_seq := g_inpval_disp_seq + 1;
966: v_inpval_name := 'Percentage';
967: v_inpval_uom := 'Number';
968: v_gen_dbi := 'Y';
986: p_business_group_name => p_bg_name,
987: p_effective_start_date => p_eff_start_date,
988: p_effective_end_date => p_eff_end_date);
989:
990: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',25);
991: hr_input_values.chk_input_value(
992: p_element_type_id => p_ele_id,
993: p_legislation_code => g_template_leg_code,
994: p_val_start_date => p_eff_start_date,
1010: p_formula_id => v_val_formula_id,
1011: p_generate_db_items_flag => v_gen_dbi,
1012: p_warning_or_error => NULL);
1013:
1014: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',27);
1015: hr_input_values.ins_3p_input_values(
1016: p_val_start_date => p_eff_start_date,
1017: p_val_end_date => p_eff_end_date,
1018: p_element_type_id => p_ele_id,
1045: --
1046: -- Now insert appropriate formula_result_rules for this element
1047: --
1048:
1049: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',47);
1050: v_fres_rule_id := pay_formula_results.ins_form_res_rule (
1051: p_business_group_id => p_bg_id,
1052: p_legislation_code => NULL,
1053: p_legislation_subgroup => g_template_leg_subgroup,
1060: p_severity_level => NULL,
1061: p_element_type_id => NULL);
1062:
1063: IF p_ele_proc_type = 'R' THEN
1064: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',50);
1065: v_fres_rule_id := pay_formula_results.ins_form_res_rule (
1066: p_business_group_id => p_bg_id,
1067: p_legislation_code => NULL,
1068: p_legislation_subgroup => g_template_leg_subgroup,
1103: -- Testing note: formula name should be '
1104: -- in this case.
1105: --
1106: -- Find table id
1107: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',53);
1108: SELECT user_table_id
1109: INTO v_paytab_id
1110: FROM pay_user_tables
1111: WHERE UPPER(user_table_name) = UPPER(p_paytab_name)
1110: FROM pay_user_tables
1111: WHERE UPPER(user_table_name) = UPPER(p_paytab_name)
1112: AND NVL(business_group_id, p_bg_id) = p_bg_id;
1113: -- Find row code
1114: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',55);
1115: SELECT lookup_code
1116: INTO v_row_code
1117: FROM hr_lookups
1118: WHERE UPPER(meaning) = UPPER(p_paytab_row_type)
1124: -- Previously stored the ID and Meaning (09 Feb 1994)
1125: --
1126: -- IF UPPER(p_ele_class_name) = 'INVOLUNTARY DEDUCTIONS' THEN
1127: -- Populate segments 1,2,3 w/Category, PayTab, PayTab Row.
1128: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',57);
1129: UPDATE pay_element_types_f
1130: SET element_information_category = g_ele_info_cat,
1131: element_information1 = p_ele_cat,
1132: element_information2 = p_partial_dedn,
1137: benefit_classification_id = p_ben_class_id
1138: WHERE element_type_id = p_ele_id
1139: AND business_group_id + 0 = p_bg_id;
1140:
1141: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',57);
1142: UPDATE pay_element_types_f
1143: SET element_information_category = g_ele_info_cat,
1144: element_information1 = p_ele_cat,
1145: element_information2 = p_partial_dedn,
1151:
1152:
1153: If p_ele_proc_type = 'R' Then /* Not required for NR Elements */
1154:
1155: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',57);
1156: UPDATE pay_element_types_f
1157: SET element_information_category = g_ele_info_cat,
1158: element_information1 = p_ele_cat,
1159: element_information2 = p_partial_dedn,
1164: AND business_group_id + 0 = p_bg_id;
1165:
1166: End if; /* Not required for NR Elements */
1167:
1168: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',59);
1169: v_calc_rule_formula_id := ins_formula (
1170: p_ff_ele_name => p_ele_name,
1171: p_ff_suffix => '_PAYROLL_TABLE',
1172: p_ff_desc => 'Payroll Table calculation for deductions.',
1174: p_amt_rule => p_amount_rule,
1175: p_row_type => p_paytab_row_type,
1176: p_ele_processing_type => p_ele_proc_type );
1177:
1178: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',60);
1179: v_stat_proc_rule_id :=
1180: pay_formula_results.ins_stat_proc_rule (
1181: p_business_group_id => p_bg_id,
1182: p_legislation_code => NULL,
1193: -- REQUIRED FOR EACH INPUT VALUE CREATED IN THIS MANNER, TO (HERE).
1194: --
1195: -- Creating "Table Column" inpval
1196: --
1197: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',65);
1198: g_inpval_disp_seq := g_inpval_disp_seq + 1;
1199: v_inpval_name := 'Table Column';
1200: v_inpval_uom := 'Character';
1201: v_gen_dbi := 'N';
1224: p_business_group_name => p_bg_name,
1225: p_effective_start_date => p_eff_start_date,
1226: p_effective_end_date => p_eff_end_date);
1227:
1228: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',67);
1229: hr_input_values.chk_input_value(
1230: p_element_type_id => p_ele_id,
1231: p_legislation_code => g_template_leg_code,
1232: p_val_start_date => p_eff_start_date,
1248: p_formula_id => v_val_formula_id,
1249: p_generate_db_items_flag => v_gen_dbi,
1250: p_warning_or_error => NULL);
1251:
1252: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',70);
1253: hr_input_values.ins_3p_input_values(
1254: p_val_start_date => p_eff_start_date,
1255: p_val_end_date => p_eff_end_date,
1256: p_element_type_id => p_ele_id,
1280: --
1281:
1282: IF p_paytab_row_type NOT IN ('Salary Range', 'Age Range') THEN
1283: -- Create inpval for row type.
1284: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',75);
1285: --
1286: -- Creating "Row Type" inpval
1287: --
1288: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',65);
1284: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',75);
1285: --
1286: -- Creating "Row Type" inpval
1287: --
1288: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',65);
1289: g_inpval_disp_seq := g_inpval_disp_seq + 1;
1290: v_inpval_name := p_paytab_row_type;
1291: v_inpval_uom := 'Character'; -- Get_Table_Value only accepts chars
1292: v_gen_dbi := 'Y';
1312: p_business_group_name => p_bg_name,
1313: p_effective_start_date => p_eff_start_date,
1314: p_effective_end_date => p_eff_end_date);
1315:
1316: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',67);
1317: hr_input_values.chk_input_value(
1318: p_element_type_id => p_ele_id,
1319: p_legislation_code => g_template_leg_code,
1320: p_val_start_date => p_eff_start_date,
1336: p_formula_id => v_val_formula_id,
1337: p_generate_db_items_flag => v_gen_dbi,
1338: p_warning_or_error => NULL);
1339:
1340: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',70);
1341: hr_input_values.ins_3p_input_values(
1342: p_val_start_date => p_eff_start_date,
1343: p_val_end_date => p_eff_end_date,
1344: p_element_type_id => p_ele_id,
1365: --
1366: -- Now insert appropriate formula_result_rules for this element
1367: --
1368:
1369: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',75);
1370: v_fres_rule_id := pay_formula_results.ins_form_res_rule (
1371: p_business_group_id => p_bg_id,
1372: p_legislation_code => NULL,
1373: p_legislation_subgroup => g_template_leg_subgroup,
1380: p_severity_level => NULL,
1381: p_element_type_id => NULL);
1382:
1383: IF p_ele_proc_type = 'R' THEN
1384: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',77);
1385: v_fres_rule_id := pay_formula_results.ins_form_res_rule (
1386: p_business_group_id => p_bg_id,
1387: p_legislation_code => NULL,
1388: p_legislation_subgroup => g_template_leg_subgroup,
1416: -- instead if [re]constructing it here.
1417: -- Set SCL:
1418: -- IF UPPER(p_ele_class_name) = 'INVOLUNTARY DEDUCTIONS' THEN
1419: -- Populate segments 1 w/Category
1420: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',81);
1421: UPDATE pay_element_types_f
1422: SET element_information_category = g_ele_info_cat,
1423: element_information1 = p_ele_cat,
1424: element_information2 = p_partial_dedn,
1427: benefit_classification_id = p_ben_class_id
1428: WHERE element_type_id = p_ele_id
1429: AND business_group_id + 0 = p_bg_id;
1430:
1431: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',83);
1432: UPDATE pay_element_types_f
1433: SET element_information_category = g_ele_info_cat,
1434: element_information1 = p_ele_cat,
1435: element_information2 = p_partial_dedn,
1438: AND business_group_id + 0 = p_bg_id;
1439:
1440: If p_ele_proc_type = 'R' then /* Not required for NR Elements */
1441:
1442: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',83);
1443: UPDATE pay_element_types_f
1444: SET element_information_category = g_ele_info_cat,
1445: element_information1 = p_ele_cat,
1446: element_information2 = p_partial_dedn,
1452:
1453: --
1454: -- Testing note: formula name should be '
1455: -- in this case.
1456: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',85);
1457: v_calc_rule_formula_id := ins_formula (
1458: p_ff_ele_name => p_ele_name,
1459: p_ff_suffix => '_BENEFITS_TABLE',
1460: p_ff_desc => 'Benefits Table calculation for deductions.',
1462: p_amt_rule => p_amount_rule,
1463: p_row_type => NULL,
1464: p_ele_processing_type => p_ele_proc_type );
1465:
1466: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',87);
1467: v_stat_proc_rule_id :=
1468: pay_formula_results.ins_stat_proc_rule (
1469: p_business_group_id => p_bg_id,
1470: p_legislation_code => NULL,
1481: -- REQUIRED FOR EACH INPUT VALUE CREATED IN THIS MANNER, TO (HERE).
1482: --
1483: -- Creating "Coverage" inpval
1484: --
1485: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',90);
1486: g_inpval_disp_seq := g_inpval_disp_seq + 1;
1487: v_inpval_name := 'Coverage';
1488: v_inpval_uom := 'Character';
1489: v_gen_dbi := 'Y';
1508: p_business_group_name => p_bg_name,
1509: p_effective_start_date => p_eff_start_date,
1510: p_effective_end_date => p_eff_end_date);
1511:
1512: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',95);
1513: hr_input_values.chk_input_value(
1514: p_element_type_id => p_ele_id,
1515: p_legislation_code => g_template_leg_code,
1516: p_val_start_date => p_eff_start_date,
1532: p_formula_id => v_val_formula_id,
1533: p_generate_db_items_flag => v_gen_dbi,
1534: p_warning_or_error => NULL);
1535:
1536: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',97);
1537: hr_input_values.ins_3p_input_values(
1538: p_val_start_date => p_eff_start_date,
1539: p_val_end_date => p_eff_end_date,
1540: p_element_type_id => p_ele_id,
1556: --
1557: --
1558: -- Creating "ER Contr" inpval
1559: --
1560: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',100);
1561: g_inpval_disp_seq := g_inpval_disp_seq + 1;
1562: v_inpval_name := 'ER Contr';
1563: v_inpval_uom := 'Money';
1564: v_gen_dbi := 'Y';
1583: p_business_group_name => p_bg_name,
1584: p_effective_start_date => p_eff_start_date,
1585: p_effective_end_date => p_eff_end_date);
1586:
1587: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',101);
1588: hr_input_values.chk_input_value(
1589: p_element_type_id => p_ele_id,
1590: p_legislation_code => g_template_leg_code,
1591: p_val_start_date => p_eff_start_date,
1607: p_formula_id => v_val_formula_id,
1608: p_generate_db_items_flag => v_gen_dbi,
1609: p_warning_or_error => NULL);
1610:
1611: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',102);
1612: hr_input_values.ins_3p_input_values(
1613: p_val_start_date => p_eff_start_date,
1614: p_val_end_date => p_eff_end_date,
1615: p_element_type_id => p_ele_id,
1631: --
1632: --
1633: -- Creating "EE Contr" inpval
1634: --
1635: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',103);
1636: g_inpval_disp_seq := g_inpval_disp_seq + 1;
1637: v_inpval_name := 'EE Contr';
1638: v_inpval_uom := 'Money';
1639: v_gen_dbi := 'Y';
1658: p_business_group_name => p_bg_name,
1659: p_effective_start_date => p_eff_start_date,
1660: p_effective_end_date => p_eff_end_date);
1661:
1662: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',105);
1663: hr_input_values.chk_input_value(
1664: p_element_type_id => p_ele_id,
1665: p_legislation_code => g_template_leg_code,
1666: p_val_start_date => p_eff_start_date,
1682: p_formula_id => v_val_formula_id,
1683: p_generate_db_items_flag => v_gen_dbi,
1684: p_warning_or_error => NULL);
1685:
1686: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',107);
1687: hr_input_values.ins_3p_input_values(
1688: p_val_start_date => p_eff_start_date,
1689: p_val_end_date => p_eff_end_date,
1690: p_element_type_id => p_ele_id,
1706: --
1707: --
1708: -- Now insert appropriate formula_result_rules for this element
1709: --
1710: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',109);
1711: v_fres_rule_id := pay_formula_results.ins_form_res_rule (
1712: p_business_group_id => p_bg_id,
1713: p_legislation_code => NULL,
1714: p_legislation_subgroup => g_template_leg_subgroup,
1721: p_severity_level => NULL,
1722: p_element_type_id => NULL);
1723:
1724: IF p_ele_proc_type = 'R' THEN
1725: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',111);
1726: v_fres_rule_id := pay_formula_results.ins_form_res_rule (
1727: p_business_group_id => p_bg_id,
1728: p_legislation_code => NULL,
1729: p_legislation_subgroup => g_template_leg_subgroup,
1740: -- In order to create indirect result feeding Employer Charge element for
1741: -- this benefit, we must find the input_value_id for the pay_value of the
1742: -- employer charge element.
1743: --
1744: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',70);
1745: v_payval_name := hr_input_values.get_pay_value_name(g_template_leg_code);
1746:
1747: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',80);
1748: -- We need inpval_id of pay value for this element:
1743: --
1744: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',70);
1745: v_payval_name := hr_input_values.get_pay_value_name(g_template_leg_code);
1746:
1747: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',80);
1748: -- We need inpval_id of pay value for this element:
1749: SELECT IV.input_value_id
1750: INTO v_er_payval_id
1751: FROM pay_input_values_f IV
1751: FROM pay_input_values_f IV
1752: WHERE IV.element_type_id = p_er_charge_eletype_id
1753: AND IV.name = v_payval_name;
1754: --
1755: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',115);
1756: v_fres_rule_id := pay_formula_results.ins_form_res_rule (
1757: p_business_group_id => p_bg_id,
1758: p_legislation_code => NULL,
1759: p_legislation_subgroup => g_template_leg_subgroup,
1783: -- (*) stop_entry --> Stop
1784: --
1785: -- Set DDF Segment values:
1786: --
1787: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',81);
1788: UPDATE pay_element_types_f
1789: SET element_information_category = g_ele_info_cat,
1790: element_information1 = p_ele_cat,
1791: element_information2 = p_partial_dedn,
1794: benefit_classification_id = p_ben_class_id
1795: WHERE element_type_id = p_ele_id
1796: AND business_group_id + 0 = p_bg_id;
1797:
1798: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',81);
1799: UPDATE pay_element_types_f
1800: SET element_information_category = g_ele_info_cat,
1801: element_information1 = p_ele_cat,
1802: element_information2 = p_partial_dedn,
1806:
1807:
1808: If p_ele_proc_type = 'R' then /* Not required for NR Elements */
1809:
1810: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',81);
1811: UPDATE pay_element_types_f
1812: SET element_information_category = g_ele_info_cat,
1813: element_information1 = p_ele_cat,
1814: element_information2 = p_partial_dedn,
1817: AND business_group_id + 0 = p_bg_id;
1818:
1819: End if; /* Not required for NR Elements */
1820:
1821: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',15);
1822: v_calc_rule_formula_id := ins_formula (
1823: p_ff_ele_name => p_ele_name,
1824: p_ff_suffix => '_FLAT_AMOUNT',
1825: p_ff_desc => 'Flat Amount calculation for deductions.',
1827: p_amt_rule => NULL,
1828: p_row_type => NULL,
1829: p_ele_processing_type => p_ele_proc_type );
1830:
1831: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',119);
1832: v_stat_proc_rule_id :=
1833: pay_formula_results.ins_stat_proc_rule (
1834: p_business_group_id => p_bg_id,
1835: p_legislation_code => NULL,
1842: p_processing_rule => v_proc_rule);
1843: --
1844: -- Flat "Amount" inpval.
1845: --
1846: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',40);
1847: g_inpval_disp_seq := g_inpval_disp_seq + 1;
1848: v_inpval_name := 'Amount';
1849: v_inpval_uom := 'Money';
1850: v_gen_dbi := 'Y';
1869: p_business_group_name => p_bg_name,
1870: p_effective_start_date => p_eff_start_date,
1871: p_effective_end_date => p_eff_end_date);
1872:
1873: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',50);
1874: hr_input_values.chk_input_value(
1875: p_element_type_id => p_ele_id,
1876: p_legislation_code => g_template_leg_code,
1877: p_val_start_date => p_eff_start_date,
1893: p_formula_id => NULL,
1894: p_generate_db_items_flag => v_gen_dbi,
1895: p_warning_or_error => NULL);
1896:
1897: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',60);
1898: hr_input_values.ins_3p_input_values(
1899: p_val_start_date => p_eff_start_date,
1900: p_val_end_date => p_eff_end_date,
1901: p_element_type_id => p_ele_id,
1915: -- Done inserting "Amount" input value.
1916: --
1917: -- Now insert appropriate formula_result_rules for this element
1918: --
1919: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',121);
1920: v_fres_rule_id := pay_formula_results.ins_form_res_rule (
1921: p_business_group_id => p_bg_id,
1922: p_legislation_code => NULL,
1923: p_legislation_subgroup => g_template_leg_subgroup,
1930: p_severity_level => NULL,
1931: p_element_type_id => NULL);
1932:
1933: IF p_ele_proc_type = 'R' THEN
1934: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',123);
1935: v_fres_rule_id := pay_formula_results.ins_form_res_rule (
1936: p_business_group_id => p_bg_id,
1937: p_legislation_code => NULL,
1938: p_legislation_subgroup => g_template_leg_subgroup,
1957: -- (*) DEDN_AMT --> Deduction Actually Taken -->
1958: --
1959:
1960: --
1961: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',983);
1962: g_er_inpval_disp_seq := g_er_inpval_disp_seq + 1;
1963: v_inpval_name := 'Deduction Actually Taken';
1964: v_inpval_uom := 'Money';
1965: v_gen_dbi := 'N';
1984: p_business_group_name => p_bg_name,
1985: p_effective_start_date => p_eff_start_date,
1986: p_effective_end_date => p_eff_end_date);
1987:
1988: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',984);
1989: hr_input_values.chk_input_value(
1990: p_element_type_id => v_er_charge_eletype_id,
1991: p_legislation_code => g_template_leg_code,
1992: p_val_start_date => p_eff_start_date,
2008: p_formula_id => NULL,
2009: p_generate_db_items_flag => v_gen_dbi,
2010: p_warning_or_error => NULL);
2011:
2012: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',985);
2013: hr_input_values.ins_3p_input_values(
2014: p_val_start_date => p_eff_start_date,
2015: p_val_end_date => p_eff_end_date,
2016: p_element_type_id => v_er_charge_eletype_id,
2029: p_startup_mode => NULL);
2030: --
2031: -- Done inserting "Deduction Actually Taken" input value.
2032:
2033: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',986);
2034: v_fres_rule_id := pay_formula_results.ins_form_res_rule (
2035: p_business_group_id => p_bg_id,
2036: p_legislation_code => NULL,
2037: p_legislation_subgroup => g_template_leg_subgroup,
2043: p_result_rule_type => 'I',
2044: p_severity_level => NULL,
2045: p_element_type_id => v_er_charge_eletype_id);
2046:
2047: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',987);
2048:
2049:
2050: END IF; -- ER matching component
2051:
2063: -- (*) bond_refund --> Indirect to
2064: --
2065: -- Creating "Purchase Price" inpval
2066: --
2067: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',125);
2068: g_inpval_disp_seq := g_inpval_disp_seq + 1;
2069: v_inpval_name := 'Purchase Price';
2070: v_inpval_uom := 'Money';
2071: v_gen_dbi := 'N'; -- Can be 'N', not needed by any other formulae
2089: p_business_group_name => p_bg_name,
2090: p_effective_start_date => p_eff_start_date,
2091: p_effective_end_date => p_eff_end_date);
2092:
2093: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',127);
2094: hr_input_values.chk_input_value(
2095: p_element_type_id => p_ele_id,
2096: p_legislation_code => g_template_leg_code,
2097: p_val_start_date => p_eff_start_date,
2113: p_formula_id => v_val_formula_id,
2114: p_generate_db_items_flag => v_gen_dbi,
2115: p_warning_or_error => NULL);
2116:
2117: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',129);
2118: hr_input_values.ins_3p_input_values(
2119: p_val_start_date => p_eff_start_date,
2120: p_val_end_date => p_eff_end_date,
2121: p_element_type_id => p_ele_id,
2137: --
2138: --
2139: -- Creating "Toward Purchase" inpval
2140: --
2141: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',125);
2142: g_shadow_inpval_disp_seq := g_shadow_inpval_disp_seq + 1;
2143: v_inpval_name := 'Toward Purchase';
2144: v_inpval_uom := 'Money';
2145: v_gen_dbi := 'N'; -- Can be 'N', not needed by any other formulae
2163: p_business_group_name => p_bg_name,
2164: p_effective_start_date => p_eff_start_date,
2165: p_effective_end_date => p_eff_end_date);
2166:
2167: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',127);
2168: hr_input_values.chk_input_value(
2169: p_element_type_id => p_shadow_ele_id,
2170: p_legislation_code => g_template_leg_code,
2171: p_val_start_date => p_eff_start_date,
2187: p_formula_id => v_val_formula_id,
2188: p_generate_db_items_flag => v_gen_dbi,
2189: p_warning_or_error => NULL);
2190:
2191: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',129);
2192: hr_input_values.ins_3p_input_values(
2193: p_val_start_date => p_eff_start_date,
2194: p_val_end_date => p_eff_end_date,
2195: p_element_type_id => p_shadow_ele_id,
2217: NON_PAYMENTS_FLAG = 'N' for class = 'Non-Payroll Payments'; but non-pay-flag
2218: was 'Y' for 'Employer Liab' class! So i hope it stays one way or the other.
2219: */
2220:
2221: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',140);
2222: SELECT inp.input_value_id
2223: INTO v_eerefund_payval_id
2224: FROM pay_input_values_f inp,
2225: hr_lookups hl
2227: AND inp.name = hl.meaning
2228: AND hl.lookup_code = 'PAY VALUE'
2229: AND hl.lookup_type = 'NAME_TRANSLATIONS';
2230:
2231: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',150);
2232: v_fres_rule_id := pay_formula_results.ins_form_res_rule (
2233: p_business_group_id => p_bg_id,
2234: p_legislation_code => NULL,
2235: p_legislation_subgroup => g_template_leg_subgroup,
2241: p_result_rule_type => 'I',
2242: p_severity_level => NULL,
2243: p_element_type_id => p_eerefund_eletype_id);
2244:
2245: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',150);
2246: v_fres_rule_id := pay_formula_results.ins_form_res_rule (
2247: p_business_group_id => p_bg_id,
2248: p_legislation_code => NULL,
2249: p_legislation_subgroup => g_template_leg_subgroup,
2255: p_result_rule_type => 'I',
2256: p_severity_level => NULL,
2257: p_element_type_id => p_shadow_ele_id);
2258:
2259: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',160);
2260:
2261: END IF; -- EE Bond
2262: --
2263: -- Start Rule checks.
2271: -- Creating "Threshold Balance" and "Threshold Dimension" inpval
2272: --
2273: -- Creating "Threshold Amount" inpval
2274: --
2275: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',230);
2276: g_inpval_disp_seq := g_inpval_disp_seq + 1;
2277: v_inpval_name := 'Threshold Amount';
2278: v_inpval_uom := 'Money';
2279: v_gen_dbi := 'N';
2297: p_business_group_name => p_bg_name,
2298: p_effective_start_date => p_eff_start_date,
2299: p_effective_end_date => p_eff_end_date);
2300:
2301: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',240);
2302: hr_input_values.chk_input_value(
2303: p_element_type_id => p_ele_id,
2304: p_legislation_code => g_template_leg_code,
2305: p_val_start_date => p_eff_start_date,
2321: p_formula_id => v_val_formula_id,
2322: p_generate_db_items_flag => v_gen_dbi,
2323: p_warning_or_error => NULL);
2324:
2325: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',250);
2326: hr_input_values.ins_3p_input_values(
2327: p_val_start_date => p_eff_start_date,
2328: p_val_end_date => p_eff_end_date,
2329: p_element_type_id => p_ele_id,
2348: -- (*) "Chained To"
2349: --
2350: -- Creating "Chained To" inpval
2351: --
2352: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',260);
2353: g_inpval_disp_seq := g_inpval_disp_seq + 1;
2354: v_inpval_name := 'Chained To';
2355: v_inpval_uom := 'Character';
2356: v_gen_dbi := 'N';
2374: p_business_group_name => p_bg_name,
2375: p_effective_start_date => p_eff_start_date,
2376: p_effective_end_date => p_eff_end_date);
2377:
2378: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',270);
2379: hr_input_values.chk_input_value(
2380: p_element_type_id => p_ele_id,
2381: p_legislation_code => g_template_leg_code,
2382: p_val_start_date => p_eff_start_date,
2398: p_formula_id => v_val_formula_id,
2399: p_generate_db_items_flag => v_gen_dbi,
2400: p_warning_or_error => NULL);
2401:
2402: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',280);
2403: hr_input_values.ins_3p_input_values(
2404: p_val_start_date => p_eff_start_date,
2405: p_val_end_date => p_eff_end_date,
2406: p_element_type_id => p_ele_id,
2435: -- (*) to_total_owed --> Upd Recurring to
2436: --
2437: -- Creating "Total Owed" inpval
2438: --
2439: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',290);
2440: g_inpval_disp_seq := g_inpval_disp_seq + 1;
2441: v_inpval_name := 'Total Owed';
2442: v_inpval_uom := 'Money';
2443: v_gen_dbi := 'N';
2461: p_business_group_name => p_bg_name,
2462: p_effective_start_date => p_eff_start_date,
2463: p_effective_end_date => p_eff_end_date);
2464:
2465: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',300);
2466: hr_input_values.chk_input_value(
2467: p_element_type_id => p_ele_id,
2468: p_legislation_code => g_template_leg_code,
2469: p_val_start_date => p_eff_start_date,
2485: p_formula_id => v_val_formula_id,
2486: p_generate_db_items_flag => v_gen_dbi,
2487: p_warning_or_error => NULL);
2488:
2489: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',310);
2490: hr_input_values.ins_3p_input_values(
2491: p_val_start_date => p_eff_start_date,
2492: p_val_end_date => p_eff_end_date,
2493: p_element_type_id => p_ele_id,
2509: --
2510: --
2511: -- Creating "Accrued" inpval
2512: --
2513: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',320);
2514: g_shadow_inpval_disp_seq := g_shadow_inpval_disp_seq + 1;
2515: v_inpval_name := 'Accrued';
2516: v_inpval_uom := 'Money';
2517: v_gen_dbi := 'N';
2535: p_business_group_name => p_bg_name,
2536: p_effective_start_date => p_eff_start_date,
2537: p_effective_end_date => p_eff_end_date);
2538:
2539: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',330);
2540: hr_input_values.chk_input_value(
2541: p_element_type_id => p_shadow_ele_id,
2542: p_legislation_code => g_template_leg_code,
2543: p_val_start_date => p_eff_start_date,
2559: p_formula_id => v_val_formula_id,
2560: p_generate_db_items_flag => v_gen_dbi,
2561: p_warning_or_error => NULL);
2562:
2563: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',340);
2564: hr_input_values.ins_3p_input_values(
2565: p_val_start_date => p_eff_start_date,
2566: p_val_end_date => p_eff_end_date,
2567: p_element_type_id => p_shadow_ele_id,
2581: --
2582: -- (HERE) Done inserting "Accrued" input value.
2583: --
2584: /*Added for Bug#13512417*/
2585: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',342);
2586: g_shadow_inpval_disp_seq := g_shadow_inpval_disp_seq + 1;
2587: v_inpval_name := 'Clear Earlier Accrual';
2588: v_inpval_uom := 'Money';
2589: v_gen_dbi := 'N';
2607: p_business_group_name => p_bg_name,
2608: p_effective_start_date => p_eff_start_date,
2609: p_effective_end_date => p_eff_end_date);
2610:
2611: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',345);
2612: hr_input_values.chk_input_value(
2613: p_element_type_id => p_shadow_ele_id,
2614: p_legislation_code => g_template_leg_code,
2615: p_val_start_date => p_eff_start_date,
2631: p_formula_id => v_val_formula_id,
2632: p_generate_db_items_flag => v_gen_dbi,
2633: p_warning_or_error => NULL);
2634:
2635: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',348);
2636: hr_input_values.ins_3p_input_values(
2637: p_val_start_date => p_eff_start_date,
2638: p_val_end_date => p_eff_end_date,
2639: p_element_type_id => p_shadow_ele_id,
2654: /*End of changes for Bug#13512417*/
2655: --
2656: -- Creating "Towards Owed" inpval
2657: --
2658: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',350);
2659: g_inpval_disp_seq := g_inpval_disp_seq + 1;
2660: v_inpval_name := 'Towards Owed';
2661: v_inpval_uom := 'Character';
2662: v_gen_dbi := 'N';
2680: p_business_group_name => p_bg_name,
2681: p_effective_start_date => p_eff_start_date,
2682: p_effective_end_date => p_eff_end_date);
2683:
2684: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',360);
2685: hr_input_values.chk_input_value(
2686: p_element_type_id => p_ele_id,
2687: p_legislation_code => g_template_leg_code,
2688: p_val_start_date => p_eff_start_date,
2704: p_formula_id => v_val_formula_id,
2705: p_generate_db_items_flag => v_gen_dbi,
2706: p_warning_or_error => NULL);
2707:
2708: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',370);
2709: hr_input_values.ins_3p_input_values(
2710: p_val_start_date => p_eff_start_date,
2711: p_val_end_date => p_eff_end_date,
2712: p_element_type_id => p_ele_id,
2726: --
2727: -- (HERE) Done inserting "Towards Owed" input value.
2728: --
2729: -- IF p_ele_proc_type = 'R' THEN
2730: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',380);
2731: --
2732: -- Note this indirect result feeds "Accrued" inpval on
2733: -- "
2734: --
2779: -- (*) not_taken --> Indirect to
2780:
2781: -- Creating "Clear Arrears" inpval
2782:
2783: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',381);
2784: g_inpval_disp_seq := g_inpval_disp_seq + 1;
2785: v_inpval_name := 'Clear Arrears';
2786: v_inpval_uom := 'Character';
2787: v_gen_dbi := 'N';
2805: p_business_group_name => p_bg_name,
2806: p_effective_start_date => p_eff_start_date,
2807: p_effective_end_date => p_eff_end_date);
2808:
2809: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',382);
2810: hr_input_values.chk_input_value(
2811: p_element_type_id => p_ele_id,
2812: p_legislation_code => g_template_leg_code,
2813: p_val_start_date => p_eff_start_date,
2829: p_formula_id => v_val_formula_id,
2830: p_generate_db_items_flag => v_gen_dbi,
2831: p_warning_or_error => NULL);
2832:
2833: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',383);
2834: hr_input_values.ins_3p_input_values(
2835: p_val_start_date => p_eff_start_date,
2836: p_val_end_date => p_eff_end_date,
2837: p_element_type_id => p_ele_id,
2849: p_legislation_code => NULL,
2850: p_startup_mode => NULL);
2851:
2852: -- Done inserting "Clear Arrears" input value.
2853: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',450);
2854: v_fres_rule_id := pay_formula_results.ins_form_res_rule (
2855: p_business_group_id => p_bg_id,
2856: p_legislation_code => NULL,
2857: p_legislation_subgroup => g_template_leg_subgroup,
2867: END IF;
2868:
2869: -- Creating "Arrears Contr" inpval
2870:
2871: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',390);
2872: g_shadow_inpval_disp_seq := g_shadow_inpval_disp_seq + 1;
2873: v_inpval_name := 'Arrears Contr';
2874: v_inpval_uom := 'Money';
2875: v_gen_dbi := 'N';
2893: p_business_group_name => p_bg_name,
2894: p_effective_start_date => p_eff_start_date,
2895: p_effective_end_date => p_eff_end_date);
2896:
2897: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',400);
2898: hr_input_values.chk_input_value(
2899: p_element_type_id => p_shadow_ele_id,
2900: p_legislation_code => g_template_leg_code,
2901: p_val_start_date => p_eff_start_date,
2917: p_formula_id => v_val_formula_id,
2918: p_generate_db_items_flag => v_gen_dbi,
2919: p_warning_or_error => NULL);
2920:
2921: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',410);
2922: hr_input_values.ins_3p_input_values(
2923: p_val_start_date => p_eff_start_date,
2924: p_val_end_date => p_eff_end_date,
2925: p_element_type_id => p_shadow_ele_id,
2943: -- Arrearage = 'N' for Nonrecurring deductions - but just in case something
2944: -- slips thru, we'll check proc_type again.
2945: --
2946: IF p_ele_proc_type = 'R' THEN
2947: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',450);
2948: v_fres_rule_id := pay_formula_results.ins_form_res_rule (
2949: p_business_group_id => p_bg_id,
2950: p_legislation_code => NULL,
2951: p_legislation_subgroup => g_template_leg_subgroup,
2965: -- No and dedn cannot be taken, then we need to see that on Dedns Not Taken
2966: -- report.
2967: -- Creating "Not Taken" inpval
2968:
2969: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',420);
2970: g_shadow_inpval_disp_seq := g_shadow_inpval_disp_seq + 1;
2971: v_inpval_name := 'Not Taken';
2972: v_inpval_uom := 'Money';
2973: v_gen_dbi := 'N';
2991: p_business_group_name => p_bg_name,
2992: p_effective_start_date => p_eff_start_date,
2993: p_effective_end_date => p_eff_end_date);
2994:
2995: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',430);
2996: hr_input_values.chk_input_value(
2997: p_element_type_id => p_shadow_ele_id,
2998: p_legislation_code => g_template_leg_code,
2999: p_val_start_date => p_eff_start_date,
3015: p_formula_id => v_val_formula_id,
3016: p_generate_db_items_flag => v_gen_dbi,
3017: p_warning_or_error => NULL);
3018:
3019: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',440);
3020: hr_input_values.ins_3p_input_values(
3021: p_val_start_date => p_eff_start_date,
3022: p_val_end_date => p_eff_end_date,
3023: p_element_type_id => p_shadow_ele_id,
3040: -- IF p_ele_proc_type = 'R' THEN
3041: -- Recurring/Nonrecurring has nothing to do with Partial Dedns, if an amount
3042: -- is not taken - then it is NOT TAKEN !
3043:
3044: hr_utility.set_location('hr_user_init_dedn.ins_dedn_formula_processing',460);
3045: v_fres_rule_id := pay_formula_results.ins_form_res_rule (
3046: p_business_group_id => p_bg_id,
3047: p_legislation_code => NULL,
3048: p_legislation_subgroup => g_template_leg_subgroup,
3065: -- taken as aftertax deductions?
3066: --
3067:
3068: --
3069: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',993);
3070: g_inpval_disp_seq := g_inpval_disp_seq + 1;
3071: v_inpval_name := 'Take OverLimit AT';
3072: v_inpval_uom := 'Character';
3073: v_gen_dbi := 'N';
3092: p_business_group_name => p_bg_name,
3093: p_effective_start_date => p_eff_start_date,
3094: p_effective_end_date => p_eff_end_date);
3095:
3096: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',994);
3097: hr_input_values.chk_input_value(
3098: p_element_type_id => p_ele_id,
3099: p_legislation_code => g_template_leg_code,
3100: p_val_start_date => p_eff_start_date,
3116: p_formula_id => NULL,
3117: p_generate_db_items_flag => v_gen_dbi,
3118: p_warning_or_error => NULL);
3119:
3120: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',995);
3121: hr_input_values.ins_3p_input_values(
3122: p_val_start_date => p_eff_start_date,
3123: p_val_end_date => p_eff_end_date,
3124: p_element_type_id => p_ele_id,
3190:
3191: --
3192: -- Create inpvals for "Special Inputs"
3193: --
3194: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',40);
3195: g_inputs_inpval_disp_seq := 1;
3196: v_inpval_name := 'Replace Amt';
3197: v_inpval_uom := 'Money';
3198: v_gen_dbi := 'N';
3217: p_business_group_name => p_bg_name,
3218: p_effective_start_date => p_eff_start,
3219: p_effective_end_date => p_eff_end);
3220:
3221: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',50);
3222: hr_input_values.chk_input_value(
3223: p_element_type_id => p_inputs_ele_type_id,
3224: p_legislation_code => g_template_leg_code,
3225: p_val_start_date => p_eff_start,
3241: p_formula_id => NULL,
3242: p_generate_db_items_flag => v_gen_dbi,
3243: p_warning_or_error => NULL);
3244:
3245: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',60);
3246: hr_input_values.ins_3p_input_values(
3247: p_val_start_date => p_eff_start,
3248: p_val_end_date => p_eff_end,
3249: p_element_type_id => p_inputs_ele_type_id,
3262: p_startup_mode => NULL);
3263: --
3264: -- Done inserting "Replacement Amt" input value.
3265: --
3266: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',70);
3267: g_inputs_inpval_disp_seq := g_inputs_inpval_disp_seq + 1;
3268: v_inpval_name := 'Addl Amt';
3269: v_inpval_uom := 'Money';
3270: v_gen_dbi := 'N';
3289: p_business_group_name => p_bg_name,
3290: p_effective_start_date => p_eff_start,
3291: p_effective_end_date => p_eff_end);
3292:
3293: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',75);
3294: hr_input_values.chk_input_value(
3295: p_element_type_id => p_inputs_ele_type_id,
3296: p_legislation_code => g_template_leg_code,
3297: p_val_start_date => p_eff_start,
3313: p_formula_id => NULL,
3314: p_generate_db_items_flag => v_gen_dbi,
3315: p_warning_or_error => NULL);
3316:
3317: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',80);
3318: hr_input_values.ins_3p_input_values(
3319: p_val_start_date => p_eff_start,
3320: p_val_end_date => p_eff_end,
3321: p_element_type_id => p_inputs_ele_type_id,
3333: p_legislation_code => NULL,
3334: p_startup_mode => NULL);
3335:
3336:
3337: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',81);
3338: g_inputs_inpval_disp_seq := g_inputs_inpval_disp_seq + 1;
3339: v_inpval_name := 'Adjust Arrears';
3340: v_inpval_uom := 'Money';
3341: v_gen_dbi := 'N';
3360: p_business_group_name => p_bg_name,
3361: p_effective_start_date => p_eff_start,
3362: p_effective_end_date => p_eff_end);
3363:
3364: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',50);
3365: hr_input_values.chk_input_value(
3366: p_element_type_id => p_inputs_ele_type_id,
3367: p_legislation_code => g_template_leg_code,
3368: p_val_start_date => p_eff_start,
3384: p_formula_id => NULL,
3385: p_generate_db_items_flag => v_gen_dbi,
3386: p_warning_or_error => NULL);
3387:
3388: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',60);
3389: hr_input_values.ins_3p_input_values(
3390: p_val_start_date => p_eff_start,
3391: p_val_end_date => p_eff_end,
3392: p_element_type_id => p_inputs_ele_type_id,
3412: --
3413:
3414: If p_ele_proc_type = 'R' then /* Not required for NR Elements */
3415:
3416: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',40);
3417: g_shadow_inpval_disp_seq := g_shadow_inpval_disp_seq + 1;
3418: v_inpval_name := 'Replacement Amt';
3419: v_inpval_uom := 'Money';
3420: v_gen_dbi := 'N';
3439: p_business_group_name => p_bg_name,
3440: p_effective_start_date => p_eff_start,
3441: p_effective_end_date => p_eff_end);
3442:
3443: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',50);
3444: hr_input_values.chk_input_value(
3445: p_element_type_id => p_shadow_ele_type_id,
3446: p_legislation_code => g_template_leg_code,
3447: p_val_start_date => p_eff_start,
3463: p_formula_id => NULL,
3464: p_generate_db_items_flag => v_gen_dbi,
3465: p_warning_or_error => NULL);
3466:
3467: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',60);
3468: hr_input_values.ins_3p_input_values(
3469: p_val_start_date => p_eff_start,
3470: p_val_end_date => p_eff_end,
3471: p_element_type_id => p_shadow_ele_type_id,
3484: p_startup_mode => NULL);
3485: --
3486: -- Done inserting "Replacement Amt" input value.
3487: --
3488: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',70);
3489: g_shadow_inpval_disp_seq := g_shadow_inpval_disp_seq + 1;
3490: v_inpval_name := 'Additional Amt';
3491: v_inpval_uom := 'Money';
3492: v_gen_dbi := 'N';
3511: p_business_group_name => p_bg_name,
3512: p_effective_start_date => p_eff_start,
3513: p_effective_end_date => p_eff_end);
3514:
3515: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',75);
3516: hr_input_values.chk_input_value(
3517: p_element_type_id => p_shadow_ele_type_id,
3518: p_legislation_code => g_template_leg_code,
3519: p_val_start_date => p_eff_start,
3535: p_formula_id => NULL,
3536: p_generate_db_items_flag => v_gen_dbi,
3537: p_warning_or_error => NULL);
3538:
3539: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',80);
3540: hr_input_values.ins_3p_input_values(
3541: p_val_start_date => p_eff_start,
3542: p_val_end_date => p_eff_end,
3543: p_element_type_id => p_shadow_ele_type_id,
3568: -- We know this must be the only one right now:
3569: --
3570: --
3571:
3572: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',85);
3573: SELECT status_processing_rule_id
3574: INTO v_status_proc_id
3575: FROM pay_status_processing_rules_f
3576: WHERE assignment_status_type_id IS NULL
3582: -- when trying to "update recurring" on a nonrecurring element (i think
3583: -- that's the prob).
3584: --
3585: IF p_ele_proc_type = 'R' THEN
3586: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',90);
3587: v_resrule_id := pay_formula_results.ins_form_res_rule (
3588: p_business_group_id => p_bg_id,
3589: p_legislation_code => NULL,
3590: p_legislation_subgroup => g_template_leg_subgroup,
3596: p_result_rule_type => 'I',
3597: p_severity_level => NULL,
3598: p_element_type_id => p_shadow_ele_type_id);
3599:
3600: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',95);
3601: v_resrule_id := pay_formula_results.ins_form_res_rule (
3602: p_business_group_id => p_bg_id,
3603: p_legislation_code => NULL,
3604: p_legislation_subgroup => g_template_leg_subgroup,
3612: p_element_type_id => p_shadow_ele_type_id);
3613:
3614: END IF;
3615:
3616: hr_utility.set_location('hr_user_init_dedn.ins_uie_inp_values',100);
3617: v_resrule_id := pay_formula_results.ins_form_res_rule (
3618: p_business_group_id => p_bg_id,
3619: p_legislation_code => NULL,
3620: p_legislation_subgroup => g_template_leg_subgroup,
3753: BEGIN
3754:
3755: --
3756: -- Set session date
3757: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',10);
3758: pay_db_pay_setup.set_session_date(nvl(p_ele_eff_start_date, sysdate));
3759: g_eff_start_date := nvl(p_ele_eff_start_date, sysdate);
3760: g_eff_end_date := nvl(p_ele_eff_end_date, c_end_of_time);
3761:
3760: g_eff_end_date := nvl(p_ele_eff_end_date, c_end_of_time);
3761:
3762:
3763: -- Set "globals": v_bg_name
3764: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',20);
3765: select name
3766: into v_bg_name
3767: from per_business_groups
3768: where business_group_id = p_bg_id;
3785: p_assignment_remuneration_flag varchar2
3786: ) is
3787: */
3788:
3789: hr_utility.set_location('pyusuidt',217);
3790: -- Check element name, ie. primary balance name, is unique to
3791: -- balances within this BG.
3792: pay_balance_types_pkg.chk_balance_type(
3793: p_row_id => NULL,
3796: p_balance_name => p_ele_name,
3797: p_reporting_name => p_ele_name,
3798: p_assignment_remuneration_flag => 'N');
3799:
3800: hr_utility.set_location('pyusuidt',317);
3801: -- Check element name, ie. primary balance name, is unique to
3802: -- balances provided as startup data.
3803: pay_balance_types_pkg.chk_balance_type(
3804: p_row_id => NULL,
3807: p_balance_name => p_ele_name,
3808: p_reporting_name => p_ele_name,
3809: p_assignment_remuneration_flag => 'N');
3810:
3811: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',25);
3812:
3813: -- Emp Balance for enhancement Bug 3311781
3814: if upper(p_ele_classification) = 'VOLUNTARY DEDUCTIONS' then
3815: l_balance_category := 'Voluntary Deductions';
3838: If p_ele_processing_type = 'R' then /* Not required for NR Elements */
3839:
3840: v_addl_amt_bal_name := SUBSTR(p_ele_name, 1, 67)||' Additional';
3841: --v_bal_rpt_name := SUBSTR(p_ele_name, 1, 17)||' Additional';
3842: hr_utility.set_location('pyusuidt',119);
3843: v_addl_amt_bal_type_id := pay_db_pay_setup.create_balance_type(
3844: p_balance_name => v_addl_amt_bal_name,
3845: p_uom => 'Money',
3846: p_reporting_name => v_addl_amt_bal_name,
3850: p_balance_category => l_balance_category, -- Bug 3311781
3851: p_bc_leg_code => 'US',
3852: p_effective_date => g_eff_start_date);
3853:
3854: hr_utility.set_location('pyusuidt',127);
3855: pay_db_pay_setup.create_defined_balance (
3856: p_balance_name => v_addl_amt_bal_name,
3857: p_balance_dimension => 'Assignment within Government Reporting Entity Inception to Date',
3858: p_business_group_name => v_bg_name,
3859: p_legislation_code => NULL);
3860:
3861: v_repl_amt_bal_name := SUBSTR(p_ele_name, 1, 67)||' Replacement';
3862: --v_bal_rpt_name := SUBSTR(p_ele_name, 1, 17)||' Replacement';
3863: hr_utility.set_location('pyusuidt',119);
3864: v_repl_amt_bal_type_id := pay_db_pay_setup.create_balance_type(
3865: p_balance_name => v_repl_amt_bal_name,
3866: p_uom => 'Money',
3867: p_reporting_name => v_repl_amt_bal_name,
3871: p_balance_category => l_balance_category, -- Bug 3311781
3872: p_bc_leg_code => 'US',
3873: p_effective_date => g_eff_start_date);
3874:
3875: hr_utility.set_location('pyusuidt',129);
3876: pay_db_pay_setup.create_defined_balance (
3877: p_balance_name => v_repl_amt_bal_name,
3878: p_balance_dimension => 'Assignment within Government Reporting Entity Inception to Date',
3879: p_business_group_name => v_bg_name,
3882: End if; /* Not required for NR Elements */
3883:
3884: v_balance_name := SUBSTR(p_ele_name, 1, 67)||' Not Taken';
3885: --v_bal_rpt_name := SUBSTR(p_ele_name, 1, 17)||' Not Taken';
3886: hr_utility.set_location('pyusuidt',130);
3887: v_notaken_bal_type_id := pay_db_pay_setup.create_balance_type(
3888: p_balance_name => v_balance_name,
3889: p_uom => 'Money',
3890: p_reporting_name => v_balance_name,
3894: p_balance_category => l_balance_category, -- Bug 3311781
3895: p_bc_leg_code => 'US',
3896: p_effective_date => g_eff_start_date);
3897:
3898: hr_utility.set_location('pyusuidt',131);
3899: pay_db_pay_setup.create_defined_balance (
3900: p_balance_name => v_balance_name,
3901: p_balance_dimension => 'Person Run',
3902: p_business_group_name => v_bg_name,
3907: p_balance_dimension => 'Person within Government Reporting Entity Run',
3908: p_business_group_name => v_bg_name,
3909: p_legislation_code => NULL);
3910:
3911: hr_utility.set_location('pyusuidt',131);
3912: pay_db_pay_setup.create_defined_balance (
3913: p_balance_name => v_balance_name,
3914: p_balance_dimension => 'Assignment-Level Current Run',
3915: p_business_group_name => v_bg_name,
3926: If p_ele_processing_type = 'R' then /* Not required for NR Elements */
3927:
3928: v_balance_name := substr(p_ele_name, 1, 55)||' Toward Bond Purchase';
3929: --v_bal_rpt_name := substr(p_ele_name, 1, 13)||' To Bond Purch';
3930: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',39);
3931: v_eepurch_bal_type_id := pay_db_pay_setup.create_balance_type(
3932: p_balance_name => v_balance_name,
3933: p_uom => 'Money',
3934: p_reporting_name => v_balance_name,
3938: p_balance_category => l_balance_category, -- Bug 3311781
3939: p_bc_leg_code => 'US',
3940: p_effective_date => g_eff_start_date);
3941:
3942: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',41);
3943: pay_db_pay_setup.create_defined_balance (
3944: p_balance_name => v_balance_name,
3945: p_balance_dimension => 'Assignment Inception to Date',
3946: p_business_group_name => v_bg_name,
3951: p_balance_dimension => 'Assignment within Government Reporting Entity Inception to Date',
3952: p_business_group_name => v_bg_name,
3953: p_legislation_code => NULL);
3954:
3955: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',43);
3956: v_balance_name := substr(p_ele_name, 1, 71)||' Accrued';
3957: --v_bal_rpt_name := substr(p_ele_name, 1, 21)||' Accrued';
3958: v_totowed_bal_type_id := pay_db_pay_setup.create_balance_type(
3959: p_balance_name => v_balance_name,
3965: p_balance_category => l_balance_category, -- Bug 3311781
3966: p_bc_leg_code => 'US',
3967: p_effective_date => g_eff_start_date);
3968:
3969: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',45);
3970: pay_db_pay_setup.create_defined_balance (
3971: p_balance_name => v_balance_name,
3972: p_balance_dimension => 'Assignment Inception to Date',
3973: p_business_group_name => v_bg_name,
4003: p_legislation_code => NULL);
4004:
4005: v_balance_name := substr(p_ele_name, 1, 71)||' Arrears';
4006: --v_bal_rpt_name := substr(p_ele_name, 1, 21)||' Arrears';
4007: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',47);
4008: v_arrears_bal_type_id := pay_db_pay_setup.create_balance_type(
4009: p_balance_name => v_balance_name,
4010: p_uom => 'Money',
4011: p_reporting_name => v_balance_name,
4015: p_balance_category => l_balance_category, -- Bug 3311781
4016: p_bc_leg_code => 'US',
4017: p_effective_date => g_eff_start_date);
4018:
4019: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',49);
4020: pay_db_pay_setup.create_defined_balance (
4021: p_balance_name => v_balance_name,
4022: p_balance_dimension => 'Assignment Inception to Date',
4023: p_business_group_name => v_bg_name,
4050:
4051: -- Begin Create Eligible Comp Balance
4052: v_balance_name := SUBSTR(p_ele_name, 1, 66)||' Eligible Comp';
4053: --v_bal_rpt_name := SUBSTR(p_ele_name, 1, 16)||' Eligible Comp';
4054: hr_utility.set_location('pyusuidt',240);
4055: v_eligiblecomp_bal_type_id := pay_db_pay_setup.create_balance_type(
4056: p_balance_name => v_balance_name,
4057: p_uom => 'Money',
4058: p_reporting_name => v_balance_name,
4091: close get_reg_earn_feeds;
4092:
4093: end if;
4094:
4095: hr_utility.set_location('pyusuidt',241);
4096: pay_db_pay_setup.create_defined_balance (
4097: p_balance_name => v_balance_name,
4098: p_balance_dimension => 'Person Run',
4099: p_business_group_name => v_bg_name,
4104: p_balance_dimension => 'Person within Government Reporting Entity Run',
4105: p_business_group_name => v_bg_name,
4106: p_legislation_code => NULL);
4107:
4108: hr_utility.set_location('pyusuidt',243);
4109: pay_db_pay_setup.create_defined_balance (
4110: p_balance_name => v_balance_name,
4111: p_balance_dimension => 'Assignment-Level Current Run',
4112: p_business_group_name => v_bg_name,
4133:
4134: --IF p_ele_at_component = 'Y' THEN
4135: v_balance_name := SUBSTR(p_ele_name, 1, 67)||' Overlimit';
4136: --v_bal_rpt_name := SUBSTR(p_ele_name, 1, 17)||' Overlimit';
4137: hr_utility.set_location('pyusuidt',245);
4138: --v_notaken_bal_type_id := pay_db_pay_setup.create_balance_type(
4139: v_overlimit_bal_type_id := pay_db_pay_setup.create_balance_type(
4140: p_balance_name => v_balance_name,
4141: p_uom => 'Money',
4146: p_balance_category => l_balance_category, -- Bug 3311781
4147: p_bc_leg_code => 'US',
4148: p_effective_date => g_eff_start_date);
4149:
4150: hr_utility.set_location('pyusuidt',246);
4151: pay_db_pay_setup.create_defined_balance (
4152: p_balance_name => v_balance_name,
4153: p_balance_dimension => 'Person Run',
4154: p_business_group_name => v_bg_name,
4154: p_business_group_name => v_bg_name,
4155: p_legislation_code => NULL);
4156:
4157:
4158: hr_utility.set_location('pyusuidt',247);
4159: pay_db_pay_setup.create_defined_balance (
4160: p_balance_name => v_balance_name,
4161: p_balance_dimension => 'Assignment-Level Current Run',
4162: p_business_group_name => v_bg_name,
4179: --
4180: -- Need to determine and get skip rule formula id and pass it
4181: -- create_element.
4182: --
4183: hr_utility.set_location('hr_user_init_dedn.ins_dedn_ele_type',10);
4184: --
4185: IF UPPER(p_ele_start_rule) = 'CHAINED' THEN
4186: hr_utility.set_location('hr_user_init_dedn.ins_dedn_ele_type',15);
4187: SELECT FF.formula_id
4182: --
4183: hr_utility.set_location('hr_user_init_dedn.ins_dedn_ele_type',10);
4184: --
4185: IF UPPER(p_ele_start_rule) = 'CHAINED' THEN
4186: hr_utility.set_location('hr_user_init_dedn.ins_dedn_ele_type',15);
4187: SELECT FF.formula_id
4188: INTO v_skip_formula_id
4189: FROM ff_formulas_f FF
4190: WHERE FF.formula_name = 'CHAINED_SKIP_FORMULA'
4195: AND p_ele_eff_start_date <= FF.effective_end_date
4196: AND FF.formula_id >= 0; --Bug 3349594
4197: --
4198: ELSIF UPPER(p_ele_start_rule) = 'ET' THEN
4199: hr_utility.set_location('hr_user_init_dedn.ins_dedn_ele_type',20);
4200: SELECT FF.formula_id
4201: INTO v_skip_formula_id
4202: FROM ff_formulas_f FF
4203: WHERE FF.formula_name = 'THRESHOLD_SKIP_FORMULA'
4209: AND FF.formula_id >= 0; --Bug 3349594
4210: -- AND FF.business_group_id IS NULL
4211: --
4212: ELSE -- Just check skip rule and separate check flag.
4213: hr_utility.set_location('hr_user_init_dedn.ins_dedn_ele_type',25);
4214: SELECT FF.formula_id
4215: INTO v_skip_formula_id
4216: FROM ff_formulas_f FF
4217: WHERE FF.formula_name = 'FREQ_RULE_SKIP_FORMULA'
4228: IF UPPER(p_ele_classification) = 'VOLUNTARY DEDUCTIONS' THEN
4229: g_ele_info_cat := 'US_VOLUNTARY DEDUCTIONS';
4230: END IF;
4231: --
4232: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',51);
4233: v_ele_type_id := ins_dedn_ele_type ( p_ele_name,
4234: p_ele_reporting_name,
4235: p_ele_description,
4236: p_ele_classification,
4247: --
4248: -- Need to find PRIMARY_CLASSIFICATION_ID of element type.
4249: -- For future calls to various API.
4250: --
4251: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',53);
4252:
4253: select distinct(classification_id)
4254: into v_primary_class_id
4255: from pay_element_types_f
4260: UPDATE pay_element_types_f
4261: SET post_termination_rule = p_termination_rule
4262: WHERE element_type_id = v_ele_type_id;
4263: --
4264: hr_utility.set_location('pyusuiet',130);
4265: SELECT default_low_priority,
4266: default_high_priority
4267: INTO v_class_lo_priority,
4268: v_class_hi_priority
4275: --
4276: --
4277: -- Create "special inputs" element
4278: --
4279: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',51);
4280: v_inputs_ele_name := SUBSTR(p_ele_name, 1, 61)||' Special Inputs';
4281: v_ele_repname := SUBSTR(p_ele_name, 1, 27)||' SI';
4282: v_inputs_ele_type_id := ins_dedn_ele_type (
4283: v_inputs_ele_name,
4307: --
4308: --
4309: -- Create "shadow" element
4310: --
4311: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',51);
4312: v_shadow_ele_name := SUBSTR(p_ele_name, 1, 61)||' Special Features';
4313: v_ele_repname := SUBSTR(p_ele_name, 1, 27)||' SF';
4314: v_shadow_ele_type_id := ins_dedn_ele_type (
4315: v_shadow_ele_name,
4338: -- Need to create employer charge element for Benefits Table deductions or
4339: -- deductions where there is an employer match component (e.g. 401k, 403b)
4340: --
4341: IF p_ele_amount_rule = 'BT' or p_ele_er_match = 'Y' THEN
4342: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',55);
4343: v_er_charge_ele_name := SUBSTR(p_ele_name, 1, 77)||' ER';
4344: v_ele_repname := SUBSTR(p_ele_name, 1, 27)||' ER';
4345: v_er_charge_eletype_id := ins_dedn_ele_type (
4346: v_er_charge_ele_name,
4357: g_eff_start_date,
4358: g_eff_end_date,
4359: v_bg_name);
4360: --
4361: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',57);
4362: --
4363: -- Create Pay Value for this element.
4364: --
4365: -- NO, "Employer Liabilities" has non-payments flag = 'N'!
4370:
4371: --
4372: -- Create "Primary" balance for this ER Liab and "associate" appropriately.
4373: --
4374: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',58);
4375: v_balance_name := v_er_charge_ele_name;
4376: --v_bal_rpt_name := v_ele_repname;
4377: v_er_charge_baltype_id := pay_db_pay_setup.create_balance_type(
4378: p_balance_name => v_balance_name,
4390:
4391: --
4392: -- Primary balance feeds
4393: --
4394: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',70);
4395: v_payval_name := hr_input_values.get_pay_value_name(g_template_leg_code);
4396:
4397: -- We need inpval_id of pay value for this element:
4398: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',80);
4394: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',70);
4395: v_payval_name := hr_input_values.get_pay_value_name(g_template_leg_code);
4396:
4397: -- We need inpval_id of pay value for this element:
4398: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',80);
4399: SELECT IV.input_value_id
4400: INTO v_payval_id
4401: FROM pay_input_values_f IV
4402: WHERE IV.element_type_id = v_er_charge_eletype_id
4406: -- Note, there is a packaged function "chk_ins_balance_feed" in pybalnce.pkb.
4407: -- Since this is definitely a new balance feed for a new element and balance,
4408: -- there is no chance for duplicating an existing feed.
4409: --
4410: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',90);
4411: hr_balances.ins_balance_feed(
4412: p_option => 'INS_MANUAL_FEED',
4413: p_input_value_id => v_payval_id,
4414: p_element_type_id => NULL,
4441: --
4442: END IF; -- Benefit
4443: --
4444: IF p_ele_ee_bond = 'Y' THEN
4445: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',63);
4446: v_eerefund_ele_name := SUBSTR(p_ele_name, 1, 72)||' Refund';
4447: v_ele_repname := SUBSTR(p_ele_name, 1, 22)||' Refund';
4448: v_eerefund_eletype_id := ins_dedn_ele_type (
4449: v_eerefund_ele_name,
4466: --
4467: -- Create "Primary" balance for this EE Bond Refund and
4468: -- "associate" appropriately.
4469: --
4470: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',58);
4471: v_balance_name := v_eerefund_ele_name;
4472: --v_bal_rpt_name := v_ele_repname;
4473: v_eerefund_baltype_id := pay_db_pay_setup.create_balance_type(
4474: p_balance_name => v_balance_name,
4493:
4494: --
4495: -- Primary balance feeds
4496: --
4497: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',70);
4498: v_payval_name := hr_input_values.get_pay_value_name(g_template_leg_code);
4499:
4500: -- We need inpval_id of pay value for this element:
4501: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',80);
4497: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',70);
4498: v_payval_name := hr_input_values.get_pay_value_name(g_template_leg_code);
4499:
4500: -- We need inpval_id of pay value for this element:
4501: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',80);
4502: SELECT IV.input_value_id
4503: INTO v_payval_id
4504: FROM pay_input_values_f IV
4505: WHERE IV.element_type_id = v_eerefund_eletype_id
4509: -- Note, there is a packaged function "chk_ins_balance_feed" in pybalnce.pkb.
4510: -- Since this is definitely a new balance feed for a new element and balance,
4511: -- there is no chance for duplicating an existing feed.
4512: --
4513: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',90);
4514: hr_balances.ins_balance_feed(
4515: p_option => 'INS_MANUAL_FEED',
4516: p_input_value_id => v_payval_id,
4517: p_element_type_id => NULL,
4530: END IF; -- EE Bond
4531: --
4532: -------------------------- Insert Formula Processing records -------------
4533: --
4534: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',68);
4535: ins_dedn_formula_processing ( v_ele_type_id,
4536: p_ele_name,
4537: v_shadow_ele_type_id,
4538: v_shadow_ele_name,
4564: -------------------------Insert Input Values --------------------------
4565: --
4566: -- Make insertion of all basic earnings input vals (ie. req'd for all
4567: -- earnings elements, not based on calc rule; instead on Class).
4568: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',69);
4569: ins_dedn_input_vals ( v_ele_type_id,
4570: p_ele_name,
4571: v_shadow_ele_type_id,
4572: v_shadow_ele_name,
4605: -- as appropriate.
4606: --
4607: -- And we need to update element type DDF with associated balances (G1241).
4608: --
4609: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',70);
4610: v_payval_name := hr_input_values.get_pay_value_name(g_template_leg_code);
4611:
4612: -- We need inpval_id of pay value for this element:
4613: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',80);
4609: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',70);
4610: v_payval_name := hr_input_values.get_pay_value_name(g_template_leg_code);
4611:
4612: -- We need inpval_id of pay value for this element:
4613: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',80);
4614: SELECT IV.input_value_id
4615: INTO v_payval_id
4616: FROM pay_input_values_f IV
4617: WHERE IV.element_type_id = v_ele_type_id
4621: -- Note, there is a packaged function "chk_ins_balance_feed" in pybalnce.pkb.
4622: -- Since this is definitely a new balance feed for a new element and balance,
4623: -- there is no chance for duplicating an existing feed.
4624: --
4625: hr_utility.set_location('hr_user_init_dedn.ins_deduction_template',90);
4626: hr_balances.ins_balance_feed(
4627: p_option => 'INS_MANUAL_FEED',
4628: p_input_value_id => v_payval_id,
4629: p_element_type_id => NULL,
4641: --
4642:
4643: if p_ele_processing_type = 'R' then /* Not required for NR Elements */
4644:
4645: hr_utility.set_location('pyusuiet',147);
4646: hr_balances.ins_balance_feed(
4647: p_option => 'INS_MANUAL_FEED',
4648: p_input_value_id => g_addl_inpval_id,
4649: p_element_type_id => NULL,
4657: p_legislation_code => NULL,
4658: p_mode => 'USER');
4659: --
4660: --
4661: hr_utility.set_location('pyusuiet',146);
4662: --
4663: -- Now, insert feed.
4664: -- Note, there is a packaged function "chk_ins_balance_feed" in pybalnce.pkb.
4665: -- Since this is definitely a new balance feed for a new element and balance,
4663: -- Now, insert feed.
4664: -- Note, there is a packaged function "chk_ins_balance_feed" in pybalnce.pkb.
4665: -- Since this is definitely a new balance feed for a new element and balance,
4666: -- there is no chance for duplicating an existing feed.
4667: hr_utility.set_location('pyusuiet',147);
4668: hr_balances.ins_balance_feed(
4669: p_option => 'INS_MANUAL_FEED',
4670: p_input_value_id => g_repl_inpval_id,
4671: p_element_type_id => NULL,
4680: p_mode => 'USER');
4681: --
4682: -- Addl/Repl Amount balance feeds from Special Inputs ele:
4683: --
4684: hr_utility.set_location('pyusuiet',147);
4685: hr_balances.ins_balance_feed(
4686: p_option => 'INS_MANUAL_FEED',
4687: p_input_value_id => gi_addl_inpval_id,
4688: p_element_type_id => NULL,
4696: p_legislation_code => NULL,
4697: p_mode => 'USER');
4698: --
4699: --
4700: hr_utility.set_location('pyusuiet',146);
4701: --
4702: -- Now, insert feed.
4703: -- Note, there is a packaged function "chk_ins_balance_feed" in pybalnce.pkb.
4704: -- Since this is definitely a new balance feed for a new element and balance,
4702: -- Now, insert feed.
4703: -- Note, there is a packaged function "chk_ins_balance_feed" in pybalnce.pkb.
4704: -- Since this is definitely a new balance feed for a new element and balance,
4705: -- there is no chance for duplicating an existing feed.
4706: hr_utility.set_location('pyusuiet',147);
4707: hr_balances.ins_balance_feed(
4708: p_option => 'INS_MANUAL_FEED',
4709: p_input_value_id => gi_repl_inpval_id,
4710: p_element_type_id => NULL,
4879:
4880: recinfo chk_for_lock%ROWTYPE;
4881:
4882: BEGIN
4883: hr_utility.set_location('hr_user_init_dedn.lock_template_rows',10);
4884: OPEN chk_for_lock;
4885: FETCH chk_for_lock INTO recinfo;
4886: CLOSE chk_for_lock;
4887:
4886: CLOSE chk_for_lock;
4887:
4888: -- Note: Not checking eff dates.
4889:
4890: hr_utility.set_location('hr_user_init_dedn.lock_template_rows',20);
4891: IF ( ( (recinfo.element_type_id = p_ele_type_id)
4892: OR (recinfo.element_type_id IS NULL AND p_ele_type_id IS NULL))
4893: -- AND ( (recinfo.effective_start_date = fnd_date.canonical_to_date(p_ele_eff_start_date))
4894: -- OR (recinfo.effective_start_date IS NULL
4913: OR (recinfo.processing_priority IS NULL AND p_ele_priority IS NULL))
4914: AND ( (recinfo.standard_link_flag = p_ele_standard_link)
4915: OR (recinfo.standard_link_flag IS NULL AND p_ele_standard_link IS NULL)))
4916: THEN
4917: hr_utility.set_location('hr_user_init_dedn.lock_template_rows',30);
4918: RETURN;
4919: ELSE
4920: hr_utility.set_location('hr_user_init_dedn.lock_template_rows',40);
4921: hr_utility.set_message(801,'PAY_xxxx_COULD_NOT_OBTAIN_LOCK');
4916: THEN
4917: hr_utility.set_location('hr_user_init_dedn.lock_template_rows',30);
4918: RETURN;
4919: ELSE
4920: hr_utility.set_location('hr_user_init_dedn.lock_template_rows',40);
4921: hr_utility.set_message(801,'PAY_xxxx_COULD_NOT_OBTAIN_LOCK');
4922: hr_utility.raise_error;
4923:
4924: -- FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED_BY_ANOTHER_USER');
4917: hr_utility.set_location('hr_user_init_dedn.lock_template_rows',30);
4918: RETURN;
4919: ELSE
4920: hr_utility.set_location('hr_user_init_dedn.lock_template_rows',40);
4921: hr_utility.set_message(801,'PAY_xxxx_COULD_NOT_OBTAIN_LOCK');
4922: hr_utility.raise_error;
4923:
4924: -- FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED_BY_ANOTHER_USER');
4925: -- APP_EXCEPTION.RAISE_EXCEPTION;
4918: RETURN;
4919: ELSE
4920: hr_utility.set_location('hr_user_init_dedn.lock_template_rows',40);
4921: hr_utility.set_message(801,'PAY_xxxx_COULD_NOT_OBTAIN_LOCK');
4922: hr_utility.raise_error;
4923:
4924: -- FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED_BY_ANOTHER_USER');
4925: -- APP_EXCEPTION.RAISE_EXCEPTION;
4926:
5308: --
5309: -- Do not allow deletion of Special Features element.
5310: --
5311: IF p_ele_name like '% Special Features' THEN
5312: hr_utility.set_location('hr_user_init_dedn.do_deletion',40);
5313: hr_utility.set_message(801,'PAY_xxxx_CANNOT_DEL_ELE');
5314: hr_utility.raise_error;
5315: END IF;
5316: --
5309: -- Do not allow deletion of Special Features element.
5310: --
5311: IF p_ele_name like '% Special Features' THEN
5312: hr_utility.set_location('hr_user_init_dedn.do_deletion',40);
5313: hr_utility.set_message(801,'PAY_xxxx_CANNOT_DEL_ELE');
5314: hr_utility.raise_error;
5315: END IF;
5316: --
5317: -- Do not allow deletion of Special Inputs element.
5310: --
5311: IF p_ele_name like '% Special Features' THEN
5312: hr_utility.set_location('hr_user_init_dedn.do_deletion',40);
5313: hr_utility.set_message(801,'PAY_xxxx_CANNOT_DEL_ELE');
5314: hr_utility.raise_error;
5315: END IF;
5316: --
5317: -- Do not allow deletion of Special Inputs element.
5318: --
5316: --
5317: -- Do not allow deletion of Special Inputs element.
5318: --
5319: IF p_ele_name like '% Special Inputs' THEN
5320: hr_utility.set_location('hr_user_init_dedn.do_deletion',40);
5321: hr_utility.set_message(801,'PAY_xxxx_CANNOT_DEL_ELE');
5322: hr_utility.raise_error;
5323: END IF;
5324: --
5317: -- Do not allow deletion of Special Inputs element.
5318: --
5319: IF p_ele_name like '% Special Inputs' THEN
5320: hr_utility.set_location('hr_user_init_dedn.do_deletion',40);
5321: hr_utility.set_message(801,'PAY_xxxx_CANNOT_DEL_ELE');
5322: hr_utility.raise_error;
5323: END IF;
5324: --
5325: -- Do not allow deletion of Withholding element.
5318: --
5319: IF p_ele_name like '% Special Inputs' THEN
5320: hr_utility.set_location('hr_user_init_dedn.do_deletion',40);
5321: hr_utility.set_message(801,'PAY_xxxx_CANNOT_DEL_ELE');
5322: hr_utility.raise_error;
5323: END IF;
5324: --
5325: -- Do not allow deletion of Withholding element.
5326: --
5324: --
5325: -- Do not allow deletion of Withholding element.
5326: --
5327: IF p_ele_name like '% Withholding' THEN
5328: hr_utility.set_location('hr_user_init_dedn.do_deletion',40);
5329: hr_utility.set_message(801,'PAY_xxxx_CANNOT_DEL_ELE');
5330: hr_utility.raise_error;
5331: END IF;
5332: --
5325: -- Do not allow deletion of Withholding element.
5326: --
5327: IF p_ele_name like '% Withholding' THEN
5328: hr_utility.set_location('hr_user_init_dedn.do_deletion',40);
5329: hr_utility.set_message(801,'PAY_xxxx_CANNOT_DEL_ELE');
5330: hr_utility.raise_error;
5331: END IF;
5332: --
5333:
5326: --
5327: IF p_ele_name like '% Withholding' THEN
5328: hr_utility.set_location('hr_user_init_dedn.do_deletion',40);
5329: hr_utility.set_message(801,'PAY_xxxx_CANNOT_DEL_ELE');
5330: hr_utility.raise_error;
5331: END IF;
5332: --
5333:
5334: --
5343: OPEN get_freqrule;
5344: LOOP
5345: FETCH get_freqrule INTO v_freqrule_id;
5346: EXIT WHEN get_freqrule%NOTFOUND;
5347: hr_utility.set_location('pyusuidt',153);
5348:
5349: begin
5350:
5351: DELETE FROM pay_freq_rule_periods
5424:
5425: FETCH get_spr INTO v_spr_id;
5426: EXIT WHEN get_spr%NOTFOUND;
5427:
5428: hr_utility.set_location('hr_us_garn_gen.delete_dedn', 10);
5429: hr_elements.del_status_processing_rules(
5430: p_element_type_id => assoc_eles(i),
5431: p_delete_mode => v_del_mode,
5432: p_val_session_date => v_del_sess_date,
5490: FOR i in 1..l_num_assoc_bals LOOP
5491:
5492: IF assoc_bals(i) IS NOT NULL THEN
5493:
5494: hr_utility.set_location('hr_us_garn_gen.delete_dedn', 50);
5495: hr_balances.del_balance_type_cascade (
5496: p_balance_type_id => assoc_bals(i),
5497: p_legislation_code => g_template_leg_code,
5498: p_mode => v_del_mode);
5496: p_balance_type_id => assoc_bals(i),
5497: p_legislation_code => g_template_leg_code,
5498: p_mode => v_del_mode);
5499:
5500: hr_utility.set_location('hr_us_garn_gen.delete_dedn', 60);
5501: DELETE FROM pay_balance_types
5502: WHERE balance_type_id = assoc_bals(i);
5503:
5504: END IF;
5521: where element_type_id = assoc_eles(j)
5522: and v_del_sess_date between effective_start_date
5523: and effective_end_date;
5524:
5525: hr_utility.set_location('hr_us_garn_gen.delete_dedn', 20);
5526: hr_elements.chk_del_element_type (
5527: p_mode => v_del_mode,
5528: p_element_type_id => assoc_eles(j),
5529: p_processing_priority => v_assoc_ele_priority,
5530: p_session_date => v_del_sess_date,
5531: p_val_start_date => v_del_val_start,
5532: p_val_end_date => v_del_val_end);
5533:
5534: hr_utility.set_location('hr_us_garn_gen.delete_dedn', 30);
5535: hr_elements.del_3p_element_type (
5536: p_element_type_id => assoc_eles(j),
5537: p_delete_mode => v_del_mode,
5538: p_val_session_date => v_del_sess_date,
5542: --
5543: -- Delete element type record:
5544: -- Remember, we're 'ZAP'ing, no need to worry about date-effective delete.
5545: --
5546: hr_utility.set_location('hr_us_garn_gen.delete_dedn', 35);
5547: delete from PAY_ELEMENT_TYPES_F
5548: where element_type_id = assoc_eles(j);
5549:
5550: END IF;
5578: p_balance_type_id => v_bal_type_id,
5579: p_legislation_code => g_template_leg_code,
5580: p_mode => v_del_mode);
5581:
5582: hr_utility.set_location('pyusuiet',165);
5583: delete from PAY_BALANCE_TYPES
5584: where balance_type_id = v_bal_type_id;
5585:
5586: exception when NO_DATA_FOUND then
5601: AND v_del_sess_date >= effective_start_date
5602: AND v_del_sess_date <= effective_end_date
5603: and business_group_id + 0 = p_business_group_id ;
5604:
5605: hr_utility.set_location('hr_user_init_dedn.do_deletions', 20);
5606: hr_elements.chk_del_element_type (
5607: p_mode => v_del_mode,
5608: p_element_type_id => v_eletype_id,
5609: p_processing_priority => NULL,
5610: p_session_date => v_del_sess_date,
5611: p_val_start_date => v_del_val_start,
5612: p_val_end_date => v_del_val_end);
5613:
5614: hr_utility.set_location('hr_user_init_dedn.do_deletions', 30);
5615: hr_elements.del_3p_element_type (
5616: p_element_type_id => v_eletype_id,
5617: p_delete_mode => v_del_mode,
5618: p_val_session_date => v_del_sess_date,
5622: --
5623: -- Delete element type record:
5624: -- Remember, we're 'ZAP'ing, so no need to worry about date-effective delete.
5625: --
5626: hr_utility.set_location('hr_user_init_dedn.do_deletions', 35);
5627: delete from PAY_ELEMENT_TYPES_F
5628: where element_type_id = v_eletype_id;
5629:
5630: exception when NO_DATA_FOUND then
5647: p_balance_type_id => v_bal_type_id,
5648: p_legislation_code => g_template_leg_code,
5649: p_mode => v_del_mode);
5650:
5651: hr_utility.set_location('pyusuiet',165);
5652: delete from PAY_BALANCE_TYPES
5653: where balance_type_id = v_bal_type_id;
5654:
5655: exception when NO_DATA_FOUND then
5662: in the where clause. Because now it is allowing to enter deduction with
5663: same name in different business groups( ref. Bug 502307), selection only by
5664: element name will fetch more than one row and raise error. **/
5665:
5666: hr_utility.set_location('hr_user_init_dedn.do_deletions', 17);
5667: SELECT DISTINCT element_type_id
5668: INTO v_eletype_id
5669: FROM pay_element_types_f
5670: WHERE element_name = p_ele_name || ' REFUND' --Bug 3349594
5671: AND v_del_sess_date >= effective_start_date
5672: AND v_del_sess_date <= effective_end_date
5673: and business_group_id + 0 = p_business_group_id ;
5674:
5675: hr_utility.set_location('hr_user_init_dedn.do_deletions', 20);
5676: hr_elements.chk_del_element_type (
5677: p_mode => v_del_mode,
5678: p_element_type_id => v_eletype_id,
5679: p_processing_priority => NULL,
5680: p_session_date => v_del_sess_date,
5681: p_val_start_date => v_del_val_start,
5682: p_val_end_date => v_del_val_end);
5683:
5684: hr_utility.set_location('hr_user_init_dedn.do_deletions', 30);
5685: hr_elements.del_3p_element_type (
5686: p_element_type_id => v_eletype_id,
5687: p_delete_mode => v_del_mode,
5688: p_val_session_date => v_del_sess_date,
5689: p_val_start_date => v_del_val_start,
5690: p_val_end_date => v_del_val_end,
5691: p_startup_mode => v_startup_mode);
5692:
5693: hr_utility.set_location('hr_user_init_dedn.do_deletions', 35);
5694: delete from PAY_ELEMENT_TYPES_F
5695: where element_type_id = v_eletype_id;
5696:
5697: exception when NO_DATA_FOUND then