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.1.12010000.2 2008/08/06 08:18:15 ubhat ship $ */
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 1115: hr_utility.set_location(' Leaving Procedure ARCHIVE_EMPLOYEE_DETAILS',170);

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

1823: l_amount NUMBER;
1824: l_UNIT NUMBER;
1825: BEGIN
1826: IF g_debug THEN
1827: hr_utility.set_location(' Entering Procedure ARCHIVE_ADD_ELEMENT',320);
1828: END IF;
1829: IF p_archive_flag = 'N' THEN
1830: ---------------------------------------------------
1831: --Check if global table has already been populated

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

2217: EXCEPTION WHEN OTHERS THEN
2218: g_err_num := SQLCODE;
2219: /*fnd_file.put_line(fnd_file.log,'ORA_ERR: ' || g_err_num || 'In ARCHIVE_ADD_ELEMENT');*/
2220: IF g_debug THEN
2221: hr_utility.set_location('ORA_ERR: ' || g_err_num || 'In ARCHIVE_ADD_ELEMENT',330);
2222: END IF;
2223: END;
2224: END LOOP;
2225: END IF;

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

2223: END;
2224: END LOOP;
2225: END IF;
2226: IF g_debug THEN
2227: hr_utility.set_location(' Leaving Procedure ARCHIVE_ADD_ELEMENT',340);
2228: END IF;
2229: END ARCHIVE_ADD_ELEMENT;
2230: /* OTHER BALANCES REGION */
2231: PROCEDURE ARCHIVE_OTH_BALANCE (p_archive_assact_id IN NUMBER,

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

2267: l_formatted_value VARCHAR2(50) := NULL;
2268: l_flag NUMBER := 0;
2269: BEGIN
2270: IF g_debug THEN
2271: hr_utility.set_location(' Entering Procedure ARCHIVE_OTH_BALANCE',350);
2272: END IF;
2273:
2274: --fnd_file.put_line(fnd_file.log,'Entering In ARCHIVE_OTH_BALANCE global');
2275: IF p_archive_flag = 'N' THEN

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

2337: EXCEPTION WHEN OTHERS THEN
2338: g_err_num := SQLCODE;
2339: --fnd_file.put_line(fnd_file.log,'ORA_ERR: ' || g_err_num || 'In ARCHIVE_OTH_BALANCE'||SQLERRM);
2340: IF g_debug THEN
2341: hr_utility.set_location('ORA_ERR: ' || g_err_num || 'In ARCHIVE_OTH_BALANCE',360);
2342: END IF;
2343: END ARCHIVE_OTH_BALANCE;
2344: /*Additional Employee Details*/
2345: PROCEDURE ARCHIVE_ADDL_EMP_DETAILS(p_archive_assact_id IN NUMBER

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

2636: l_fnd_session NUMBER := 0;
2637: l_prev_prepay NUMBER := 0;
2638: BEGIN
2639: IF g_debug THEN
2640: hr_utility.set_location(' Entering Procedure ARCHIVE_CODE',380);
2641: END IF;
2642: --fnd_file.put_line(fnd_file.log,'Entering ARCHIVE_CODE ' || p_assignment_action_id );
2643:
2644: OPEN csr_archive_payact(p_assignment_action_id);

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

2735:
2736: l_record_count := l_record_count + 1;
2737: END LOOP;
2738: IF g_debug THEN
2739: hr_utility.set_location(' Leaving Procedure ARCHIVE_CODE',390);
2740: END IF;
2741: END ARCHIVE_CODE;
2742:
2743: PROCEDURE ARCHIVE_MAIN_ELEMENTS

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

3066:
3067: BEGIN
3068:
3069: IF g_debug THEN
3070: hr_utility.set_location(' Entering Procedure ARCHIVE_MAIN_ELEMENTS',320);
3071: END IF;
3072:
3073: -- Archiving Earnings Elements
3074: FOR csr_rec IN csr_ear_element_info LOOP

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

3420: g_err_num := SQLCODE;
3421: /*fnd_file.put_line(fnd_file.log,'ORA_ERR: ' || g_err_num || 'In ARCHIVE_MAIN_ELEMENTS');*/
3422:
3423: IF g_debug THEN
3424: hr_utility.set_location('ORA_ERR: ' || g_err_num || 'In ARCHIVE_MAIN_ELEMENTS',330);
3425: END IF;
3426: END;
3427: END LOOP;
3428:

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

3731: g_err_num := SQLCODE;
3732: /*fnd_file.put_line(fnd_file.log,'ORA_ERR: ' || g_err_num || 'In ARCHIVE_MAIN_ELEMENTS');*/
3733:
3734: IF g_debug THEN
3735: hr_utility.set_location('ORA_ERR: ' || g_err_num || 'In ARCHIVE_MAIN_ELEMENTS',330);
3736: END IF;
3737: END;
3738: END LOOP;
3739:

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

3738: END LOOP;
3739:
3740:
3741: IF g_debug THEN
3742: hr_utility.set_location(' Leaving Procedure ARCHIVE_MAIN_ELEMENTS',340);
3743: END IF;
3744:
3745: END ARCHIVE_MAIN_ELEMENTS;
3746:

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

3803:
3804:
3805: BEGIN
3806: IF g_debug THEN
3807: hr_utility.set_location(' Entering Procedure DEINITIALIZATION_CODE',380);
3808: END IF;
3809:
3810: OPEN csr_effective_date(p_payroll_action_id);
3811: FETCH csr_effective_date INTO l_effective_date ;

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

3884: END LOOP;
3885:
3886: /*fnd_file.put_line(fnd_file.log,'Entering Procedure ARCHIVE_EMPLOYEE_DETAILS 10');*/
3887: IF g_debug THEN
3888: hr_utility.set_location(' Leaving Procedure DEINITIALIZATION_CODE',390);
3889: END IF;
3890:
3891: EXCEPTION
3892: WHEN others THEN

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

3890:
3891: EXCEPTION
3892: WHEN others THEN
3893: IF g_debug THEN
3894: hr_utility.set_location('error raised in DEINITIALIZATION_CODE ',5);
3895: END if;
3896: RAISE;
3897: END;
3898: