DBA Data[Home] [Help]

APPS.PAY_SE_PAYSLIP_ARCHIVE dependencies on HR_UTILITY

Line 3: g_debug boolean := hr_utility.debug_enabled;

1: PACKAGE BODY PAY_SE_PAYSLIP_ARCHIVE AS
2: /* $Header: pysepysa.pkb 120.5 2010/10/28 08:56:01 vijranga noship $ */
3: g_debug boolean := hr_utility.debug_enabled;
4: TYPE element_rec IS RECORD (
5: classification_name VARCHAR2(60)
6: ,element_name VARCHAR2(60)
7: ,element_type_id NUMBER

Line 61: hr_utility.set_location(' Entering Function GET_PARAMETER',10);

57: l_proc VARCHAR2(40):= g_package||' get parameter ';
58: BEGIN
59: --
60: IF g_debug THEN
61: hr_utility.set_location(' Entering Function GET_PARAMETER',10);
62: END IF;
63: l_start_pos := instr(' '||p_parameter_string,l_delimiter||p_token||'=');
64: --
65: IF l_start_pos = 0 THEN

Line 87: hr_utility.set_location(' Leaving Function GET_PARAMETER',20);

83: END IF;
84: --
85: RETURN l_parameter;
86: IF g_debug THEN
87: hr_utility.set_location(' Leaving Function GET_PARAMETER',20);
88: END IF;
89: END;
90: /* GET ALL PARAMETERS */
91:

Line 123: hr_utility.set_location(' Leaving Procedure GET_ALL_PARAMETERS',30);

119: ,p_business_group_id;
120: CLOSE csr_parameter_info;
121: --
122: IF g_debug THEN
123: hr_utility.set_location(' Leaving Procedure GET_ALL_PARAMETERS',30);
124: END IF;
125: END GET_ALL_PARAMETERS;
126: /* RANGE CODE */
127: PROCEDURE RANGE_CODE (p_payroll_action_id IN NUMBER

Line 229: hr_utility.set_location(' Entering Procedure RANGE_CODE',40);

225: l_flag NUMBER := 0;
226: l_element_context VARCHAR2(5);
227: BEGIN
228: IF g_debug THEN
229: hr_utility.set_location(' Entering Procedure RANGE_CODE',40);
230: END IF;
231: --fnd_file.put_line(fnd_file.log,'Entering Procedure RANGE_CODE ');
232: PAY_SE_PAYSLIP_ARCHIVE.GET_ALL_PARAMETERS(p_payroll_action_id
233: ,l_business_group_id

Line 370: hr_utility.set_location(' Leaving Procedure RANGE_CODE',50);

366: AND ppa.business_group_id = ppf.business_group_id
367: ORDER BY ppf.person_id';
368: --fnd_file.put_line(fnd_file.log,' Leaving Procedure RANGE_CODE');
369: IF g_debug THEN
370: hr_utility.set_location(' Leaving Procedure RANGE_CODE',50);
371: END IF;
372: EXCEPTION
373: WHEN OTHERS THEN
374: -- Return cursor that selects no rows

Line 467: hr_utility.set_location(' Entering Procedure ASSIGNMENT_ACTION_CODE',60);

463: l_action_info_id NUMBER;
464: l_ovn NUMBER;
465: BEGIN
466: IF g_debug THEN
467: hr_utility.set_location(' Entering Procedure ASSIGNMENT_ACTION_CODE',60);
468: END IF;
469: --fnd_file.put_line(fnd_file.log,'Entering Procedure ASSIGNMENT_ACTION_CODE ');
470: --fnd_file.put_line(fnd_file.log,'p_payroll_action_id === ' || p_payroll_action_id);
471:

Line 512: hr_utility.set_location(' Leaving Procedure ASSIGNMENT_ACTION_CODE',70);

508: l_prepay_action_id := rec_prepaid_assignments.prepaid_action_id;
509: END LOOP;
510: --fnd_file.put_line(fnd_file.log,'Leaving Procedure ASSIGNMENT_ACTION_CODE ');
511: IF g_debug THEN
512: hr_utility.set_location(' Leaving Procedure ASSIGNMENT_ACTION_CODE',70);
513: END IF;
514: END ASSIGNMENT_ACTION_CODE;
515: /* INITIALIZATION CODE */
516: PROCEDURE INITIALIZATION_CODE(p_payroll_action_id IN NUMBER)

Line 574: hr_utility.set_location(' Entering Procedure INITIALIZATION_CODE',80);

570: l_consolidation_set NUMBER;
571: l_prev_prepay NUMBER := 0;
572: BEGIN
573: IF g_debug THEN
574: hr_utility.set_location(' Entering Procedure INITIALIZATION_CODE',80);
575: END IF;
576:
577: --fnd_file.put_line(fnd_file.log,'In INITIALIZATION_CODE 0');
578: GET_ALL_PARAMETERS(p_payroll_action_id

Line 623: hr_utility.set_location(' Leaving Procedure INITIALIZATION_CODE',90);

619: p_archive_flag => 'N');
620:
621: --fnd_file.put_line(fnd_file.log,'Leaving INITIALIZATION_CODE 0');
622: IF g_debug THEN
623: hr_utility.set_location(' Leaving Procedure INITIALIZATION_CODE',90);
624: END IF;
625: EXCEPTION WHEN OTHERS THEN
626: g_err_num := SQLCODE;
627: /*fnd_file.put_line(fnd_file.log,'ORA_ERR: ' || g_err_num || 'In INITIALIZATION_CODE');*/

Line 629: hr_utility.set_location('ORA_ERR: ' || g_err_num || 'In INITIALIZATION_CODE',180);

625: EXCEPTION WHEN OTHERS THEN
626: g_err_num := SQLCODE;
627: /*fnd_file.put_line(fnd_file.log,'ORA_ERR: ' || g_err_num || 'In INITIALIZATION_CODE');*/
628: IF g_debug THEN
629: hr_utility.set_location('ORA_ERR: ' || g_err_num || 'In INITIALIZATION_CODE',180);
630: END IF;
631: END INITIALIZATION_CODE;
632: PROCEDURE SETUP_ELEMENT_DEFINITIONS( p_classification_name IN VARCHAR2
633: ,p_element_name IN VARCHAR2

Line 643: hr_utility.set_location(' Entering Procedure SETUP_ELEMENT_DEFINITIONS',100);

639: ,p_archive_flag IN VARCHAR2)
640: IS
641: BEGIN
642: IF g_debug THEN
643: hr_utility.set_location(' Entering Procedure SETUP_ELEMENT_DEFINITIONS',100);
644: END IF;
645: g_index := g_index + 1;
646: /* Initialize global tables that hold Additional Element details */
647: g_element_table(g_index).classification_name := p_classification_name;

Line 656: hr_utility.set_location(' Leaving Procedure SETUP_ELEMENT_DEFINITIONS',110);

652: g_element_table(g_index).uom := p_uom;
653: --g_element_table(g_index).Element_code := p_uom;
654: g_element_table(g_index).archive_flag := p_archive_flag;
655: IF g_debug THEN
656: hr_utility.set_location(' Leaving Procedure SETUP_ELEMENT_DEFINITIONS',110);
657: END IF;
658: END SETUP_ELEMENT_DEFINITIONS;
659: PROCEDURE SETUP_BALANCE_DEFINITIONS(p_balance_name IN VARCHAR2
660: ,p_defined_balance_id IN NUMBER

Line 665: hr_utility.set_location(' Entering Procedure SETUP_BALANCE_DEFINITIONS',120);

661: ,p_balance_type_id IN NUMBER)
662: IS
663: BEGIN
664: IF g_debug THEN
665: hr_utility.set_location(' Entering Procedure SETUP_BALANCE_DEFINITIONS',120);
666: END IF;
667: g_index_bal := g_index_bal + 1;
668: /* Initialize global tables that hold Other Balances details */
669: g_user_balance_table(g_index_bal).balance_name := p_balance_name;

Line 674: hr_utility.set_location(' Leaving Procedure SETUP_BALANCE_DEFINITIONS',130);

670: g_user_balance_table(g_index_bal).defined_balance_id := p_defined_balance_id;
671: g_user_balance_table(g_index_bal).balance_type_id := p_balance_type_id;
672: /*fnd_file.put_line(fnd_file.log,'SETUP_BALANCE_DEFINITIONS ' ||p_balance_name); */
673: IF g_debug THEN
674: hr_utility.set_location(' Leaving Procedure SETUP_BALANCE_DEFINITIONS',130);
675: END IF;
676: END SETUP_BALANCE_DEFINITIONS;
677: /* GET COUNTRY NAME FROM CODE */
678: FUNCTION GET_COUNTRY_NAME(p_territory_code VARCHAR2)

Line 688: hr_utility.set_location(' Entering Function GET_COUNTRY_NAME',140);

684: WHERE territory_code = p_territory_code;
685: l_country fnd_territories_vl.territory_short_name%TYPE;
686: BEGIN
687: IF g_debug THEN
688: hr_utility.set_location(' Entering Function GET_COUNTRY_NAME',140);
689: END IF;
690: OPEN csr_get_territory_name(p_territory_code);
691: FETCH csr_get_territory_name into l_country;
692: CLOSE csr_get_territory_name;

Line 695: hr_utility.set_location(' Leaving Function GET_COUNTRY_NAME',150);

691: FETCH csr_get_territory_name into l_country;
692: CLOSE csr_get_territory_name;
693: RETURN l_country;
694: IF g_debug THEN
695: hr_utility.set_location(' Leaving Function GET_COUNTRY_NAME',150);
696: END IF;
697: END GET_COUNTRY_NAME;
698: /* EMPLOYEE DETAILS REGION */
699: PROCEDURE ARCHIVE_EMPLOYEE_DETAILS (p_archive_assact_id IN NUMBER

Line 884: hr_utility.set_location(' Entering Procedure ARCHIVE_EMPLOYEE_DETAILS',160);

880: -- l_lower_base NUMBER :=0;
881: -- l_upper_base NUMBER :=0;
882: BEGIN
883: IF g_debug THEN
884: hr_utility.set_location(' Entering Procedure ARCHIVE_EMPLOYEE_DETAILS',160);
885: END IF;
886: --fnd_file.put_line(fnd_file.log,'Entering Procedure ARCHIVE_EMPLOYEE_DETAILS');
887: /* PERSON AND ADDRESS DETAILS */
888: OPEN csr_person_details(p_assignment_id);

Line 1117: hr_utility.set_location(' Leaving Procedure ARCHIVE_EMPLOYEE_DETAILS',170);

1113: */
1114: /*fnd_file.put_line(fnd_file.log,'Entering Procedure ARCHIVE_EMPLOYEE_DETAILS 10');*/
1115: --
1116: IF g_debug THEN
1117: hr_utility.set_location(' Leaving Procedure ARCHIVE_EMPLOYEE_DETAILS',170);
1118: END IF;
1119: --
1120: EXCEPTION WHEN OTHERS THEN
1121: g_err_num := SQLCODE;

Line 1124: hr_utility.set_location('ORA_ERR: ' || g_err_num || 'In ARCHIVE_EMPLOYEE_DETAILS',180);

1120: EXCEPTION WHEN OTHERS THEN
1121: g_err_num := SQLCODE;
1122: /*fnd_file.put_line(fnd_file.log,'ORA_ERR: ' || g_err_num || 'In ARCHIVE_EMPLOYEE_DETAILS');*/
1123: IF g_debug THEN
1124: hr_utility.set_location('ORA_ERR: ' || g_err_num || 'In ARCHIVE_EMPLOYEE_DETAILS',180);
1125: END IF;
1126: END ARCHIVE_EMPLOYEE_DETAILS;
1127: /* EARNINGS REGION, DEDUCTIONS REGION */
1128: PROCEDURE ARCHIVE_ELEMENT_INFO(p_payroll_action_id IN NUMBER

Line 1253: hr_utility.set_location(' Entering Procedure ARCHIVE_ELEMENT_INFO',210);

1249: l_ovn NUMBER;
1250: l_flag NUMBER := 0;
1251: BEGIN
1252: IF g_debug THEN
1253: hr_utility.set_location(' Entering Procedure ARCHIVE_ELEMENT_INFO',210);
1254: END IF;
1255: --fnd_file.put_line(fnd_file.log,'Entering ARCHIVE_ELEMENT_INFO');
1256: --fnd_file.put_line(fnd_file.log,' EARNINGS ELEMENT');
1257: /* EARNINGS ELEMENT */

Line 1338: hr_utility.set_location(' Leaving Procedure ARCHIVE_ELEMENT_INFO',220);

1334: NULL;*/
1335: END;
1336: END LOOP;
1337: IF g_debug THEN
1338: hr_utility.set_location(' Leaving Procedure ARCHIVE_ELEMENT_INFO',220);
1339: END IF;
1340: EXCEPTION WHEN OTHERS THEN
1341: g_err_num := SQLCODE;
1342: /*fnd_file.put_line(fnd_file.log,'ORA_ERR: ' || g_err_num || 'In ARCHIVE_ELEMENT_INFO');*/

Line 1344: hr_utility.set_location('ORA_ERR: ' || g_err_num || 'ARCHIVE_ELEMENT_INFO',230);

1340: EXCEPTION WHEN OTHERS THEN
1341: g_err_num := SQLCODE;
1342: /*fnd_file.put_line(fnd_file.log,'ORA_ERR: ' || g_err_num || 'In ARCHIVE_ELEMENT_INFO');*/
1343: IF g_debug THEN
1344: hr_utility.set_location('ORA_ERR: ' || g_err_num || 'ARCHIVE_ELEMENT_INFO',230);
1345: END IF;
1346: END ARCHIVE_ELEMENT_INFO;
1347: /* GET DEFINED BALANCE ID */
1348: FUNCTION GET_DEFINED_BALANCE_ID(p_user_name IN VARCHAR2) RETURN NUMBER

Line 1363: hr_utility.set_location(' Entering Function GET_DEFINED_BALANCE_ID',240);

1359: AND u.creator_type = 'B';
1360: l_defined_balance_id ff_user_entities.user_entity_id%TYPE;
1361: BEGIN
1362: IF g_debug THEN
1363: hr_utility.set_location(' Entering Function GET_DEFINED_BALANCE_ID',240);
1364: END IF;
1365: OPEN csr_def_bal_id(p_user_name);
1366: FETCH csr_def_bal_id INTO l_defined_balance_id;
1367: CLOSE csr_def_bal_id;

Line 1370: hr_utility.set_location(' Leaving Function GET_DEFINED_BALANCE_ID',250);

1366: FETCH csr_def_bal_id INTO l_defined_balance_id;
1367: CLOSE csr_def_bal_id;
1368: RETURN l_defined_balance_id;
1369: IF g_debug THEN
1370: hr_utility.set_location(' Leaving Function GET_DEFINED_BALANCE_ID',250);
1371: END IF;
1372: END GET_DEFINED_BALANCE_ID;
1373: /* PAYMENT INFORMATION REGION */
1374: PROCEDURE ARCHIVE_PAYMENT_INFO(p_archive_assact_id IN NUMBER,

Line 1455: hr_utility.set_location(' Entering Procedure ARCHIVE_PAYMENT_INFO',260);

1451: rec_chk csr_chk%ROWTYPE;
1452: l_pay_value VARCHAR2(50) := NULL;
1453: BEGIN
1454: IF g_debug THEN
1455: hr_utility.set_location(' Entering Procedure ARCHIVE_PAYMENT_INFO',260);
1456: END IF;
1457:
1458: OPEN csr_chk(p_prepay_assact_id);
1459: LOOP

Line 1573: hr_utility.set_location(' Leaving Procedure ARCHIVE_PAYMENT_INFO',270);

1569: END LOOP;
1570: CLOSE csr_chk;
1571:
1572: IF g_debug THEN
1573: hr_utility.set_location(' Leaving Procedure ARCHIVE_PAYMENT_INFO',270);
1574: END IF;
1575: EXCEPTION WHEN OTHERS THEN
1576: g_err_num := SQLCODE;
1577: /*fnd_file.put_line(fnd_file.log,'ORA_ERR: ' || g_err_num || 'In ARCHIVE_PAYMENT_INFO');*/

Line 1579: hr_utility.set_location('ORA_ERR: ' || g_err_num || 'In ARCHIVE_PAYMENT_INFO',280);

1575: EXCEPTION WHEN OTHERS THEN
1576: g_err_num := SQLCODE;
1577: /*fnd_file.put_line(fnd_file.log,'ORA_ERR: ' || g_err_num || 'In ARCHIVE_PAYMENT_INFO');*/
1578: IF g_debug THEN
1579: hr_utility.set_location('ORA_ERR: ' || g_err_num || 'In ARCHIVE_PAYMENT_INFO',280);
1580: END IF;
1581: END ARCHIVE_PAYMENT_INFO;
1582:
1583: /* ADDITIONAL ELEMENTS REGION */

Line 1833: hr_utility.set_location(' Entering Procedure ARCHIVE_ADD_ELEMENT',320);

1829: l_amount NUMBER;
1830: l_UNIT NUMBER;
1831: BEGIN
1832: IF g_debug THEN
1833: hr_utility.set_location(' Entering Procedure ARCHIVE_ADD_ELEMENT',320);
1834: END IF;
1835: IF p_archive_flag = 'N' THEN
1836: ---------------------------------------------------
1837: --Check if global table has already been populated

Line 2233: hr_utility.set_location('ORA_ERR: ' || g_err_num || 'In ARCHIVE_ADD_ELEMENT',330);

2229: EXCEPTION WHEN OTHERS THEN
2230: g_err_num := SQLCODE;
2231: /*fnd_file.put_line(fnd_file.log,'ORA_ERR: ' || g_err_num || 'In ARCHIVE_ADD_ELEMENT');*/
2232: IF g_debug THEN
2233: hr_utility.set_location('ORA_ERR: ' || g_err_num || 'In ARCHIVE_ADD_ELEMENT',330);
2234: END IF;
2235: END;
2236: END LOOP;
2237: END IF;

Line 2239: hr_utility.set_location(' Leaving Procedure ARCHIVE_ADD_ELEMENT',340);

2235: END;
2236: END LOOP;
2237: END IF;
2238: IF g_debug THEN
2239: hr_utility.set_location(' Leaving Procedure ARCHIVE_ADD_ELEMENT',340);
2240: END IF;
2241: END ARCHIVE_ADD_ELEMENT;
2242: /* OTHER BALANCES REGION */
2243: PROCEDURE ARCHIVE_OTH_BALANCE (p_archive_assact_id IN NUMBER,

Line 2283: hr_utility.set_location(' Entering Procedure ARCHIVE_OTH_BALANCE',350);

2279: l_formatted_value VARCHAR2(50) := NULL;
2280: l_flag NUMBER := 0;
2281: BEGIN
2282: IF g_debug THEN
2283: hr_utility.set_location(' Entering Procedure ARCHIVE_OTH_BALANCE',350);
2284: END IF;
2285:
2286: --fnd_file.put_line(fnd_file.log,'Entering In ARCHIVE_OTH_BALANCE global');
2287: IF p_archive_flag = 'N' THEN

Line 2353: hr_utility.set_location('ORA_ERR: ' || g_err_num || 'In ARCHIVE_OTH_BALANCE',360);

2349: EXCEPTION WHEN OTHERS THEN
2350: g_err_num := SQLCODE;
2351: --fnd_file.put_line(fnd_file.log,'ORA_ERR: ' || g_err_num || 'In ARCHIVE_OTH_BALANCE'||SQLERRM);
2352: IF g_debug THEN
2353: hr_utility.set_location('ORA_ERR: ' || g_err_num || 'In ARCHIVE_OTH_BALANCE',360);
2354: END IF;
2355: END ARCHIVE_OTH_BALANCE;
2356: /*Additional Employee Details*/
2357: PROCEDURE ARCHIVE_ADDL_EMP_DETAILS(p_archive_assact_id IN NUMBER

Line 2652: hr_utility.set_location(' Entering Procedure ARCHIVE_CODE',380);

2648: l_fnd_session NUMBER := 0;
2649: l_prev_prepay NUMBER := 0;
2650: BEGIN
2651: IF g_debug THEN
2652: hr_utility.set_location(' Entering Procedure ARCHIVE_CODE',380);
2653: END IF;
2654: --fnd_file.put_line(fnd_file.log,'Entering ARCHIVE_CODE ' || p_assignment_action_id );
2655:
2656: OPEN csr_archive_payact(p_assignment_action_id);

Line 2751: hr_utility.set_location(' Leaving Procedure ARCHIVE_CODE',390);

2747:
2748: l_record_count := l_record_count + 1;
2749: END LOOP;
2750: IF g_debug THEN
2751: hr_utility.set_location(' Leaving Procedure ARCHIVE_CODE',390);
2752: END IF;
2753: END ARCHIVE_CODE;
2754:
2755: PROCEDURE ARCHIVE_MAIN_ELEMENTS

Line 3086: hr_utility.set_location(' Entering Procedure ARCHIVE_MAIN_ELEMENTS',320);

3082:
3083: BEGIN
3084:
3085: IF g_debug THEN
3086: hr_utility.set_location(' Entering Procedure ARCHIVE_MAIN_ELEMENTS',320);
3087: END IF;
3088:
3089: -- Archiving Earnings Elements
3090: FOR csr_rec IN csr_ear_element_info LOOP

Line 3444: hr_utility.set_location('ORA_ERR: ' || g_err_num || 'In ARCHIVE_MAIN_ELEMENTS',330);

3440: g_err_num := SQLCODE;
3441: /*fnd_file.put_line(fnd_file.log,'ORA_ERR: ' || g_err_num || 'In ARCHIVE_MAIN_ELEMENTS');*/
3442:
3443: IF g_debug THEN
3444: hr_utility.set_location('ORA_ERR: ' || g_err_num || 'In ARCHIVE_MAIN_ELEMENTS',330);
3445: END IF;
3446: END;
3447: END LOOP;
3448:

Line 3760: hr_utility.set_location('ORA_ERR: ' || g_err_num || 'In ARCHIVE_MAIN_ELEMENTS',330);

3756: g_err_num := SQLCODE;
3757: /*fnd_file.put_line(fnd_file.log,'ORA_ERR: ' || g_err_num || 'In ARCHIVE_MAIN_ELEMENTS');*/
3758:
3759: IF g_debug THEN
3760: hr_utility.set_location('ORA_ERR: ' || g_err_num || 'In ARCHIVE_MAIN_ELEMENTS',330);
3761: END IF;
3762: END;
3763: END LOOP;
3764:

Line 3767: hr_utility.set_location(' Leaving Procedure ARCHIVE_MAIN_ELEMENTS',340);

3763: END LOOP;
3764:
3765:
3766: IF g_debug THEN
3767: hr_utility.set_location(' Leaving Procedure ARCHIVE_MAIN_ELEMENTS',340);
3768: END IF;
3769:
3770: END ARCHIVE_MAIN_ELEMENTS;
3771:

Line 3832: hr_utility.set_location(' Entering Procedure DEINITIALIZATION_CODE',380);

3828:
3829:
3830: BEGIN
3831: IF g_debug THEN
3832: hr_utility.set_location(' Entering Procedure DEINITIALIZATION_CODE',380);
3833: END IF;
3834:
3835: OPEN csr_effective_date(p_payroll_action_id);
3836: FETCH csr_effective_date INTO l_effective_date ;

Line 3915: hr_utility.set_location(' Leaving Procedure DEINITIALIZATION_CODE',390);

3911: END LOOP;
3912:
3913: /*fnd_file.put_line(fnd_file.log,'Entering Procedure ARCHIVE_EMPLOYEE_DETAILS 10');*/
3914: IF g_debug THEN
3915: hr_utility.set_location(' Leaving Procedure DEINITIALIZATION_CODE',390);
3916: END IF;
3917:
3918: EXCEPTION
3919: WHEN others THEN

Line 3921: hr_utility.set_location('error raised in DEINITIALIZATION_CODE ',5);

3917:
3918: EXCEPTION
3919: WHEN others THEN
3920: IF g_debug THEN
3921: hr_utility.set_location('error raised in DEINITIALIZATION_CODE ',5);
3922: END if;
3923: RAISE;
3924: END;
3925: