DBA Data[Home] [Help]

APPS.PAY_NL_LIFE_SAVINGS_TEMPLATE dependencies on HR_UTILITY

Line 5: g_debug BOOLEAN := hr_utility.debug_enabled;

1: PACKAGE BODY PAY_NL_LIFE_SAVINGS_TEMPLATE AS
2: /* $Header: pynllssd.pkb 120.1.12010000.2 2009/07/15 12:31:24 rrajaman ship $ */
3:
4: g_proc_name VARCHAR2(80) := ' pay_nl_life_savings_template.';
5: g_debug BOOLEAN := hr_utility.debug_enabled;
6:
7:
8:
9: -- ---------------------------------------------------------------------

Line 326: hr_utility.set_location('Entering: '||l_proc_name, 10);

322: BEGIN
323: l_proc_name := g_proc_name||'Create_Retro_Usages';
324:
325: IF g_debug THEN
326: hr_utility.set_location('Entering: '||l_proc_name, 10);
327: END IF;
328: --
329: IF g_creator.name = p_creator_name AND
330: g_creator.type = p_creator_type

Line 399: hr_utility.set_location('Insert Retro Comp Usgs '||l_proc_name, 20);

395: INTO l_rc_usage_id
396: FROM dual;
397: --
398: IF g_debug THEN
399: hr_utility.set_location('Insert Retro Comp Usgs '||l_proc_name, 20);
400: END IF;
401:
402: INSERT INTO pay_retro_component_usages(
403: RETRO_COMPONENT_USAGE_ID,

Line 483: hr_utility.set_location('Insert Element Span Usgs '||l_proc_name, 30);

479: INTO l_es_usage_id
480: FROM dual;
481:
482: IF g_debug THEN
483: hr_utility.set_location('Insert Element Span Usgs '||l_proc_name, 30);
484: END IF;
485:
486: INSERT INTO pay_element_span_usages(
487: ELEMENT_SPAN_USAGE_ID,

Line 517: hr_utility.set_location('Leaving '||l_proc_name, 40);

513: END;
514: END IF;
515:
516: IF g_debug THEN
517: hr_utility.set_location('Leaving '||l_proc_name, 40);
518: END IF;
519: --
520: EXCEPTION WHEN no_data_found THEN
521: NULL;

Line 549: hr_utility.set_location('Entering: '||l_proc_name, 10);

545: BEGIN
546: l_proc_name := g_proc_name||'Update_Event_Group';
547:
548: IF g_debug THEN
549: hr_utility.set_location('Entering: '||l_proc_name, 10);
550: END IF;
551:
552: --Query up the retro event group id
553: OPEN c_get_retro_evg_id;

Line 556: hr_utility.set_location('Retro EVG id found: '||l_retro_evg_id,20);

552: --Query up the retro event group id
553: OPEN c_get_retro_evg_id;
554: FETCH c_get_retro_evg_id INTO l_retro_evg_id;
555: IF c_get_retro_evg_id%FOUND THEN
556: hr_utility.set_location('Retro EVG id found: '||l_retro_evg_id,20);
557: CLOSE c_get_retro_evg_id;
558:
559: --now update the elements with this recalc event grp id
560: UPDATE pay_element_types_f

Line 566: hr_utility.set_location('Retro EVG id not found',30);

562: WHERE element_name = p_element_name
563: AND business_group_id = p_business_group_id;
564: ELSE
565: --evg id was not found
566: hr_utility.set_location('Retro EVG id not found',30);
567: CLOSE c_get_retro_evg_id;
568: END IF;
569:
570: IF g_debug THEN

Line 571: hr_utility.set_location('Leaving: '||l_proc_name, 40);

567: CLOSE c_get_retro_evg_id;
568: END IF;
569:
570: IF g_debug THEN
571: hr_utility.set_location('Leaving: '||l_proc_name, 40);
572: END IF;
573:
574: EXCEPTION WHEN OTHERS THEN
575: NULL;

Line 600: hr_utility.set_location('Entering: '||l_proc_name, 10);

596: --
597: BEGIN
598: --
599: IF g_debug THEN
600: hr_utility.set_location('Entering: '||l_proc_name, 10);
601: END IF;
602: --
603: l_template_name := 'Dutch Life Savings Scheme Deduction';
604: --

Line 606: hr_utility.set_location(l_proc_name, 20);

602: --
603: l_template_name := 'Dutch Life Savings Scheme Deduction';
604: --
605: IF g_debug THEN
606: hr_utility.set_location(l_proc_name, 20);
607: END IF;
608: --
609: FOR csr_get_temp_id_rec IN csr_get_temp_id LOOP
610: l_template_id := csr_get_temp_id_rec.template_id;

Line 614: hr_utility.set_location('Leaving: '||l_proc_name, 30);

610: l_template_id := csr_get_temp_id_rec.template_id;
611: END LOOP;
612: --
613: IF g_debug THEN
614: hr_utility.set_location('Leaving: '||l_proc_name, 30);
615: END IF;
616: --
617: RETURN l_template_id;
618: --

Line 635: hr_utility.set_location('Entering : '||l_proc_name, 10);

631: l_proc_name VARCHAR2(72) := g_proc_name || 'Update_Input_Vaue_Col';
632:
633: BEGIN
634:
635: hr_utility.set_location('Entering : '||l_proc_name, 10);
636:
637: --
638: update pay_input_values_f
639: set mandatory_flag = c_mandatory_flag

Line 644: hr_utility.set_location('Leaving : '||l_proc_name, 50);

640: where element_type_id =c_element_type_id
641: and name = c_iv_name
642: and business_group_id = c_business_group_id;
643:
644: hr_utility.set_location('Leaving : '||l_proc_name, 50);
645:
646: END Update_Input_Vaue_Col;
647:
648: BEGIN

Line 653: hr_utility.set_location('Entering : '||l_proc_name, 10);

649: -- ---------------------------------------------------------------------
650: -- |-------------< Main Function : Create_User_Template Body >----------|
651: -- ---------------------------------------------------------------------
652: IF g_debug THEN
653: hr_utility.set_location('Entering : '||l_proc_name, 10);
654: END IF;
655:
656: IF LENGTH(p_scheme_prefix) > 8 THEN
657:

Line 671: hr_utility.set_location('Check unique scheme name : '||l_proc_name, 11);

667: --
668: pqp_nl_pension_template.chk_scheme_prefix(p_scheme_prefix);
669:
670: IF g_debug THEN
671: hr_utility.set_location('Check unique scheme name : '||l_proc_name, 11);
672: END IF;
673:
674: --
675: -- Check if the scheme being created is already in use.

Line 691: hr_utility.set_location('Fetching PT Details : '||l_proc_name, 12);

687: --
688: -- Fetch all pension type details
689: --
690: IF g_debug THEN
691: hr_utility.set_location('Fetching PT Details : '||l_proc_name, 12);
692: END IF;
693:
694: OPEN csr_pty1 (c_pension_type_id => p_pension_type_id
695: ,c_effective_date => p_effective_start_date);

Line 716: hr_utility.set_location('..Setting the Session Date', 15);

712: -- ---------------------------------------------------------------------
713: pay_db_pay_setup.set_session_date(NVL(p_effective_start_date, SYSDATE));
714: --
715: IF g_debug THEN
716: hr_utility.set_location('..Setting the Session Date', 15);
717: END IF;
718: -- ---------------------------------------------------------------------
719: -- Get Source Template Id for the PGGM template
720: -- ---------------------------------------------------------------------

Line 724: hr_utility.set_location('Derived the Src Template id', 15);

720: -- ---------------------------------------------------------------------
721: l_source_template_id := get_template_id
722: (p_legislation_code => g_template_leg_code);
723: IF g_debug THEN
724: hr_utility.set_location('Derived the Src Template id', 15);
725: END IF;
726: -- ---------------------------------------------------------------------
727: -- Exclusion rules
728: -- ---------------------------------------------------------------------

Line 730: hr_utility.set_location('..Checking all the Exclusion Rules', 20);

726: -- ---------------------------------------------------------------------
727: -- Exclusion rules
728: -- ---------------------------------------------------------------------
729: IF g_debug THEN
730: hr_utility.set_location('..Checking all the Exclusion Rules', 20);
731: END IF;
732:
733: -- Define the exclusion rules
734:

Line 775: hr_utility.set_location('..Creating template User structure', 25);

771: -- ---------------------------------------------------------------------
772: -- Create user structure from the template
773: -- ---------------------------------------------------------------------
774: IF g_debug THEN
775: hr_utility.set_location('..Creating template User structure', 25);
776: END IF;
777:
778: pay_element_template_api.create_user_structure
779: (p_validate => FALSE

Line 799: hr_utility.set_location('Done Creating User structure', 26);

795: ,p_object_version_number => l_object_version_number
796: );
797:
798: IF g_debug THEN
799: hr_utility.set_location('Done Creating User structure', 26);
800: hr_utility.set_location('Deriving element typ ids', 27);
801: END IF;
802:
803: -- ---------------------------------------------------------------------

Line 800: hr_utility.set_location('Deriving element typ ids', 27);

796: );
797:
798: IF g_debug THEN
799: hr_utility.set_location('Done Creating User structure', 26);
800: hr_utility.set_location('Deriving element typ ids', 27);
801: END IF;
802:
803: -- ---------------------------------------------------------------------
804: -- |-------------------< Update Shadow Structure >----------------------|

Line 1153: hr_utility.set_location('Finished deriving element typ ids', 28);

1149: END LOOP;
1150:
1151:
1152: IF g_debug THEN
1153: hr_utility.set_location('Finished deriving element typ ids', 28);
1154: hr_utility.set_location('..Updating the scheme shadow elements', 30);
1155: END IF;
1156:
1157: FOR i IN 1..l_count

Line 1154: hr_utility.set_location('..Updating the scheme shadow elements', 30);

1150:
1151:
1152: IF g_debug THEN
1153: hr_utility.set_location('Finished deriving element typ ids', 28);
1154: hr_utility.set_location('..Updating the scheme shadow elements', 30);
1155: END IF;
1156:
1157: FOR i IN 1..l_count
1158: LOOP

Line 1171: hr_utility.set_location('..After Updating the scheme shadow elements', 50);

1167: );
1168: END LOOP;
1169:
1170: IF g_debug THEN
1171: hr_utility.set_location('..After Updating the scheme shadow elements', 50);
1172: END IF;
1173: --
1174: -- Replace the spaces in the prefix with underscores. The formula name
1175: -- has underscores if the prefix name has spaces in it .

Line 1187: hr_utility.set_location('Replacing Balance Name in the formula', 51);

1183: (l_scheme_prefix||'_EMPLOYEE_LIFE_SAVINGS_DEDUCTION'
1184: ,p_business_group_id);
1185:
1186: IF g_debug THEN
1187: hr_utility.set_location('Replacing Balance Name in the formula', 51);
1188: END IF;
1189:
1190: IF r_pty_rec.ee_contribution_bal_type_id IS NOT NULL THEN
1191:

Line 1238: hr_utility.set_location('Replacing Tax SI string in the formula', 51);

1234: -- Replace the taxation and social insurance
1235: -- balance reduction text in the formula
1236: --
1237: IF g_debug THEN
1238: hr_utility.set_location('Replacing Tax SI string in the formula', 51);
1239: END IF;
1240:
1241: pqp_pension_functions.gen_dynamic_formula
1242: (p_pension_type_id => p_pension_type_id

Line 1399: hr_utility.set_location('Done replacing Tax SI string in the formula', 51);

1395: END LOOP;
1396:
1397:
1398: IF g_debug THEN
1399: hr_utility.set_location('Done replacing Tax SI string in the formula', 51);
1400: hr_utility.set_location('Generating Core objects : Part - 1', 50);
1401: END IF;
1402: -- ---------------------------------------------------------------------
1403: -- |-------------------< Generate Core Objects >------------------------|

Line 1400: hr_utility.set_location('Generating Core objects : Part - 1', 50);

1396:
1397:
1398: IF g_debug THEN
1399: hr_utility.set_location('Done replacing Tax SI string in the formula', 51);
1400: hr_utility.set_location('Generating Core objects : Part - 1', 50);
1401: END IF;
1402: -- ---------------------------------------------------------------------
1403: -- |-------------------< Generate Core Objects >------------------------|
1404: -- ---------------------------------------------------------------------

Line 1413: hr_utility.set_location('..After Generating Core objects : Part - 1', 50);

1409: ,p_hr_to_payroll => FALSE
1410: ,p_template_id => l_template_id);
1411: --
1412: IF g_debug THEN
1413: hr_utility.set_location('..After Generating Core objects : Part - 1', 50);
1414: hr_utility.set_location('..After Generating Core objects : Part - 2', 50);
1415: END IF;
1416:
1417: pay_element_template_api.generate_part2

Line 1414: hr_utility.set_location('..After Generating Core objects : Part - 2', 50);

1410: ,p_template_id => l_template_id);
1411: --
1412: IF g_debug THEN
1413: hr_utility.set_location('..After Generating Core objects : Part - 1', 50);
1414: hr_utility.set_location('..After Generating Core objects : Part - 2', 50);
1415: END IF;
1416:
1417: pay_element_template_api.generate_part2
1418: (p_validate => FALSE

Line 1423: hr_utility.set_location('..After Generating Core objects : Part - 2', 50);

1419: ,p_effective_date => p_effective_start_date
1420: ,p_template_id => l_template_id);
1421: --
1422: IF g_debug THEN
1423: hr_utility.set_location('..After Generating Core objects : Part - 2', 50);
1424: hr_utility.set_location('Updating Input Values..', 50);
1425: END IF;
1426:
1427: -- ------------------------------------------------------------------------

Line 1424: hr_utility.set_location('Updating Input Values..', 50);

1420: ,p_template_id => l_template_id);
1421: --
1422: IF g_debug THEN
1423: hr_utility.set_location('..After Generating Core objects : Part - 2', 50);
1424: hr_utility.set_location('Updating Input Values..', 50);
1425: END IF;
1426:
1427: -- ------------------------------------------------------------------------
1428: -- Create a row in pay_element_extra_info with all the element information

Line 1431: hr_utility.set_location('..Creating element extra information', 50);

1427: -- ------------------------------------------------------------------------
1428: -- Create a row in pay_element_extra_info with all the element information
1429: -- ------------------------------------------------------------------------
1430: IF g_debug THEN
1431: hr_utility.set_location('..Creating element extra information', 50);
1432: END IF;
1433:
1434: l_base_element_type_id := pqp_nl_pension_template.Get_Object_ID ('ELE',
1435: p_scheme_prefix||' Employee Savings Deduction',

Line 1495: hr_utility.set_location('Done Updating Input Values..', 50);

1491:
1492:
1493:
1494: IF g_debug THEN
1495: hr_utility.set_location('Done Updating Input Values..', 50);
1496: -- hr_utility.set_location('Deriving Element Type Ids..', 50);
1497: END IF;
1498:
1499:

Line 1496: -- hr_utility.set_location('Deriving Element Type Ids..', 50);

1492:
1493:
1494: IF g_debug THEN
1495: hr_utility.set_location('Done Updating Input Values..', 50);
1496: -- hr_utility.set_location('Deriving Element Type Ids..', 50);
1497: END IF;
1498:
1499:
1500: -------------------------------------------------------------------------------

Line 1555: hr_utility.set_location('..After Creating element extra information', 50);

1551:
1552:
1553:
1554: IF g_debug THEN
1555: hr_utility.set_location('..After Creating element extra information', 50);
1556:
1557: -- ---------------------------------------------------------------------
1558: -- Create the Retro Component usage associations between the retro and
1559: -- pension deduction elements

Line 1561: hr_utility.set_location('Creating Retro Comp Usgs', 50);

1557: -- ---------------------------------------------------------------------
1558: -- Create the Retro Component usage associations between the retro and
1559: -- pension deduction elements
1560: -- ---------------------------------------------------------------------
1561: hr_utility.set_location('Creating Retro Comp Usgs', 50);
1562: END IF;
1563:
1564: Create_Retro_Usages
1565: (p_creator_name => p_scheme_prefix||' Employee Savings Deduction'

Line 1721: hr_utility.set_location('Done Creating Retro Comp Usgs', 50);

1717:
1718:
1719:
1720: IF g_debug THEN
1721: hr_utility.set_location('Done Creating Retro Comp Usgs', 50);
1722: END IF;
1723:
1724: IF g_debug THEN
1725: hr_utility.set_location('Adding Event Group',60);

Line 1725: hr_utility.set_location('Adding Event Group',60);

1721: hr_utility.set_location('Done Creating Retro Comp Usgs', 50);
1722: END IF;
1723:
1724: IF g_debug THEN
1725: hr_utility.set_location('Adding Event Group',60);
1726: END IF;
1727:
1728: Update_Event_Group
1729: (p_element_name => p_scheme_prefix||' Employee Savings Deduction'

Line 1739: hr_utility.set_location('Done Adding the Event Group', 60);

1735:
1736:
1737:
1738: IF g_debug THEN
1739: hr_utility.set_location('Done Adding the Event Group', 60);
1740: END IF;
1741:
1742: -- ---------------------------------------------------------------------
1743: -- Compile the base element's standard formula

Line 1745: hr_utility.set_location('Compile EE Formula', 50);

1741:
1742: -- ---------------------------------------------------------------------
1743: -- Compile the base element's standard formula
1744: -- ---------------------------------------------------------------------
1745: hr_utility.set_location('Compile EE Formula', 50);
1746:
1747: pqp_nl_pension_template.Compile_Formula
1748: (p_element_type_id => l_base_element_type_id
1749: ,p_effective_start_date => p_effective_start_date

Line 1756: hr_utility.set_location('Done Compile EE Formula', 50);

1752: ,p_request_id => l_request_id
1753: );
1754:
1755: IF g_debug THEN
1756: hr_utility.set_location('Done Compile EE Formula', 50);
1757: hr_utility.set_location('Compile ER Formula', 50);
1758: END IF;
1759:
1760: pqp_nl_pension_template.Compile_Formula

Line 1757: hr_utility.set_location('Compile ER Formula', 50);

1753: );
1754:
1755: IF g_debug THEN
1756: hr_utility.set_location('Done Compile EE Formula', 50);
1757: hr_utility.set_location('Compile ER Formula', 50);
1758: END IF;
1759:
1760: pqp_nl_pension_template.Compile_Formula
1761: (p_element_type_id => l_er_base_element_type_id

Line 1769: hr_utility.set_location('Done Compile ER Formula', 50);

1765: ,p_request_id => l_er_request_id
1766: );
1767:
1768: IF g_debug THEN
1769: hr_utility.set_location('Done Compile ER Formula', 50);
1770: hr_utility.set_location('Leaving :'||l_proc_name, 190);
1771: END IF;
1772:
1773: RETURN l_base_element_type_id;

Line 1770: hr_utility.set_location('Leaving :'||l_proc_name, 190);

1766: );
1767:
1768: IF g_debug THEN
1769: hr_utility.set_location('Done Compile ER Formula', 50);
1770: hr_utility.set_location('Leaving :'||l_proc_name, 190);
1771: END IF;
1772:
1773: RETURN l_base_element_type_id;
1774:

Line 1814: hr_utility.set_location(' Entering:' || l_proc,10);

1810: l_proc VARCHAR2(72) := 'Create_User_Template_Swi';
1811: BEGIN
1812:
1813: IF g_debug THEN
1814: hr_utility.set_location(' Entering:' || l_proc,10);
1815: END IF;
1816:
1817: l_element_type_id := -1;
1818: --

Line 1878: hr_utility.set_location(' Leaving:' || l_proc,20);

1874: --
1875: l_return_status := hr_multi_message.get_return_status_disable;
1876:
1877: IF g_debug THEN
1878: hr_utility.set_location(' Leaving:' || l_proc,20);
1879: END IF;
1880:
1881: RETURN l_element_type_id;
1882:

Line 1898: hr_utility.set_location(' Leaving:' || l_proc, 30);

1894: --
1895: RETURN l_element_type_id;
1896:
1897: IF g_debug THEN
1898: hr_utility.set_location(' Leaving:' || l_proc, 30);
1899: END IF;
1900:
1901: WHEN others THEN
1902: --

Line 1912: hr_utility.set_location(' Leaving:' || l_proc,40);

1908: --
1909: ROLLBACK TO Create_User_Template_Swi;
1910: IF hr_multi_message.unexpected_error_add(l_proc) THEN
1911: IF g_debug THEN
1912: hr_utility.set_location(' Leaving:' || l_proc,40);
1913: END IF;
1914: RAISE;
1915: END IF;
1916: --

Line 1923: hr_utility.set_location(' Leaving:' || l_proc,50);

1919: l_return_status := hr_multi_message.get_return_status_disable;
1920: RETURN l_element_type_id;
1921:
1922: IF g_debug THEN
1923: hr_utility.set_location(' Leaving:' || l_proc,50);
1924: END IF;
1925:
1926: END Create_User_Template_Swi;
1927:

Line 1958: hr_utility.set_location('Entering :'||l_proc, 10);

1954: l_template_id Number(9);
1955: l_proc Varchar2(60) := g_proc_name||'Delete_User_Template';
1956:
1957: begin
1958: hr_utility.set_location('Entering :'||l_proc, 10);
1959: --
1960: for c1_rec in c1 loop
1961: l_template_id := c1_rec.template_id;
1962: end loop;

Line 1981: hr_utility.set_location('Leaving :'||l_proc, 50);

1977: (p_element_type_extra_info_id => temp_rec.element_type_extra_info_id
1978: ,p_object_version_number => temp_rec.object_version_number);
1979: END LOOP;
1980:
1981: hr_utility.set_location('Leaving :'||l_proc, 50);
1982: end Delete_User_Template;
1983:
1984:
1985: -- ---------------------------------------------------------------------

Line 2010: hr_utility.set_location(' Entering:' || l_proc,10);

2006: l_proc varchar2(72) := 'Delete_User_Template_Swi';
2007:
2008: Begin
2009:
2010: hr_utility.set_location(' Entering:' || l_proc,10);
2011: --
2012: -- Issue a savepoint
2013: --
2014: savepoint Delete_User_Template_Swi;

Line 2055: hr_utility.set_location(' Leaving:' || l_proc,20);

2051: -- messages of any type exist in the Multiple Message List.
2052: -- Also disable Multiple Message Detection.
2053: --
2054: l_return_status := hr_multi_message.get_return_status_disable;
2055: hr_utility.set_location(' Leaving:' || l_proc,20);
2056:
2057: --
2058: exception
2059: when hr_multi_message.error_message_exist then

Line 2069: hr_utility.set_location(' Leaving:' || l_proc, 30);

2065: rollback to Delete_User_Template_Swi;
2066: --
2067: -- Reset IN OUT parameters and set OUT parameters
2068: --
2069: hr_utility.set_location(' Leaving:' || l_proc, 30);
2070:
2071: when others then
2072: --
2073: -- When Multiple Message Detection is enabled catch

Line 2081: hr_utility.set_location(' Leaving:' || l_proc,40);

2077: -- error.
2078: --
2079: rollback to Delete_User_Template_Swi;
2080: if hr_multi_message.unexpected_error_add(l_proc) then
2081: hr_utility.set_location(' Leaving:' || l_proc,40);
2082: raise;
2083: end if;
2084: --
2085: -- Reset IN OUT and set OUT parameters

Line 2088: hr_utility.set_location(' Leaving:' || l_proc,50);

2084: --
2085: -- Reset IN OUT and set OUT parameters
2086: --
2087: l_return_status := hr_multi_message.get_return_status_disable;
2088: hr_utility.set_location(' Leaving:' || l_proc,50);
2089:
2090: END delete_user_template_swi;
2091:
2092: End pay_nl_life_savings_template;