DBA Data[Home] [Help]

APPS.PAY_IN_REPORTS_PKG dependencies on HR_UTILITY

Line 1066: g_debug := hr_utility.debug_enabled;

1062:
1063: --
1064: BEGIN
1065:
1066: g_debug := hr_utility.debug_enabled;
1067: l_procedure := g_package ||'get_location_details';
1068: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1069:
1070: OPEN csr_add;

Line 1269: g_debug := hr_utility.debug_enabled;

1265:
1266:
1267: BEGIN
1268:
1269: g_debug := hr_utility.debug_enabled;
1270: l_procedure := g_package ||'create_form27A_xml';
1271: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1272:
1273: IF g_debug THEN

Line 1538: --hr_utility.trace_on(null,'ORACLE1234');

1534:
1535:
1536: BEGIN
1537:
1538: --hr_utility.trace_on(null,'ORACLE1234');
1539: g_debug := hr_utility.debug_enabled;
1540: l_procedure := g_package ||'create_ecr_xml';
1541: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1542:

Line 1539: g_debug := hr_utility.debug_enabled;

1535:
1536: BEGIN
1537:
1538: --hr_utility.trace_on(null,'ORACLE1234');
1539: g_debug := hr_utility.debug_enabled;
1540: l_procedure := g_package ||'create_ecr_xml';
1541: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1542:
1543: IF g_debug THEN

Line 1589: hr_utility.raise_error;

1585:
1586: IF(c.asg_cnt>1) THEN
1587: fnd_message.set_name('PER', 'PER_IN_DUPLICATE_PF_NUMBER');
1588: fnd_message.set_token('DUPLICATE_PF',c.member_id, translate => true );
1589: hr_utility.raise_error;
1590: END IF;
1591:
1592: END LOOP;
1593:

Line 1617: hr_utility.raise_error; /* raise invalid pf account number error */

1613: dbms_lob.writeAppend(g_xml_data, length(l_tag), l_tag);
1614: ELSE
1615: fnd_message.set_name('PER', 'PER_IN_INVALID_PF_NUMBER');
1616: fnd_message.set_token('PF_NUMBER',c_rec.member_id, translate => true );
1617: hr_utility.raise_error; /* raise invalid pf account number error */
1618: END IF;
1619:
1620: l_memb_id := c_rec.member_id;
1621: l_memb_name := c_rec.member_name;

Line 1675: hr_utility.raise_error; /* raise invalid name error */

1671: 'abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789. ',' ')),' ','')) > 0
1672: THEN
1673: fnd_message.set_name('PER', 'PER_IN_INVALID_NAME');
1674: fnd_message.set_token('EMP_NAME',l_member_name_1, translate => true );
1675: hr_utility.raise_error; /* raise invalid name error */
1676: ELSE
1677: l_tag :=pay_in_xml_utils.getTag('c_1_memeber_name',l_member_name_1);
1678: dbms_lob.writeAppend(g_xml_data, length(l_tag), l_tag);
1679:

Line 1690: hr_utility.raise_error; /* raise no decimal error */

1686: dbms_lob.writeAppend(g_xml_data, length(l_tag), l_tag);
1687: ELSE
1688: fnd_message.set_name('PER', 'PER_IN_DECIMAL_VALUE');
1689: fnd_message.set_token('NUM_VAL',l_epf_wages_1, translate => true );
1690: hr_utility.raise_error; /* raise no decimal error */
1691: END IF;
1692:
1693: l_is_number := to_number(l_eps_wages_1);
1694: IF l_is_number = trunc(l_is_number) THEN

Line 1700: hr_utility.raise_error; /* raise no decimal error */

1696: dbms_lob.writeAppend(g_xml_data, length(l_tag), l_tag);
1697: ELSE
1698: fnd_message.set_name('PER', 'PER_IN_DECIMAL_VALUE');
1699: fnd_message.set_token('NUM_VAL',l_eps_wages_1, translate => true );
1700: hr_utility.raise_error; /* raise no decimal error */
1701: END IF;
1702:
1703: l_is_number := to_number(l_epf_contribution_employee_1);
1704:

Line 1714: hr_utility.raise_error; /* raise no decimal error */

1710: dbms_lob.writeAppend(g_xml_data, length(l_tag), l_tag);
1711: ELSE
1712: fnd_message.set_name('PER', 'PER_IN_DECIMAL_VALUE');
1713: fnd_message.set_token('NUM_VAL',l_epf_contribution_employee_1, translate => true );
1714: hr_utility.raise_error; /* raise no decimal error */
1715: END IF;
1716:
1717: l_is_number := to_number(l_employer_contr_towards_eps_1);
1718:

Line 1728: hr_utility.raise_error; /* raise no decimal error */

1724: dbms_lob.writeAppend(g_xml_data, length(l_tag), l_tag);
1725: ELSE
1726: fnd_message.set_name('PER', 'PER_IN_DECIMAL_VALUE');
1727: fnd_message.set_token('NUM_VAL',l_employer_contr_towards_eps_1, translate => true );
1728: hr_utility.raise_error; /* raise no decimal error */
1729: END IF;
1730:
1731: l_is_number := to_number(l_employer_contr_towards_pf_1);
1732: IF l_is_number = trunc(l_is_number) THEN

Line 1741: hr_utility.raise_error; /* raise no decimal error */

1737: dbms_lob.writeAppend(g_xml_data, length(l_tag), l_tag);
1738: ELSE
1739: fnd_message.set_name('PER', 'PER_IN_DECIMAL_VALUE');
1740: fnd_message.set_token('NUM_VAL',l_employer_contr_towards_pf_1, translate => true );
1741: hr_utility.raise_error; /* raise no decimal error */
1742: END IF;
1743:
1744: l_is_number := to_number(l_absence_1);
1745: IF l_is_number = trunc(l_is_number) THEN

Line 1751: hr_utility.raise_error; /* raise no decimal error */

1747: dbms_lob.writeAppend(g_xml_data, length(l_tag), l_tag);
1748: ELSE
1749: fnd_message.set_name('PER', 'PER_IN_DECIMAL_VALUE');
1750: fnd_message.set_token('NUM_VAL',l_absence_1, translate => true );
1751: hr_utility.raise_error; /* raise no decimal error */
1752: END IF;
1753:
1754: l_tag :=pay_in_xml_utils.getTag('c_1_ref_adv_emp','0');
1755: dbms_lob.writeAppend(g_xml_data, length(l_tag), l_tag);

Line 1780: hr_utility.raise_error; /* raise invalid name error */

1776: 'abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789. ',' ')),' ','')) >0
1777: THEN
1778: fnd_message.set_name('PER', 'PER_IN_INVALID_NAME');
1779: fnd_message.set_token('EMP_NAME',l_father_husband_name_1, translate => true );
1780: hr_utility.raise_error; /* raise invalid name error */
1781: ELSE
1782: l_tag :=pay_in_xml_utils.getTag('c_1_fat_hus_name',l_father_husband_name_1);
1783: dbms_lob.writeAppend(g_xml_data, length(l_tag), l_tag);
1784: END IF;

Line 1933: g_debug := hr_utility.debug_enabled;

1929: l_procedure VARCHAR2(100);
1930:
1931: BEGIN
1932: --
1933: g_debug := hr_utility.debug_enabled;
1934: l_procedure := g_package ||'init_code';
1935: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1936:
1937: IF p_form_type <> 'ESI6' and p_form_type <> 'PT3' AND p_form_type <> 'FORM27A' THEN

Line 2297: g_debug := hr_utility.debug_enabled;

2293: asg_sum NUMBER := 0;
2294:
2295:
2296: BEGIN
2297: g_debug := hr_utility.debug_enabled;
2298: l_procedure := g_package ||'create_form8_xml';
2299: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2300:
2301:

Line 2847: g_debug := hr_utility.debug_enabled;

2843: l_procedure VARCHAR2(100);
2844:
2845: BEGIN
2846:
2847: g_debug := hr_utility.debug_enabled;
2848: l_procedure := g_package ||'employee_type';
2849: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2850:
2851: IF g_debug THEN

Line 3353: g_debug := hr_utility.debug_enabled;

3349:
3350: BEGIN
3351: pay_in_xml_utils.gXMLTable.DELETE;
3352:
3353: g_debug := hr_utility.debug_enabled;
3354: l_procedure := g_package ||'create_form6a_xml';
3355: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
3356:
3357: --

Line 3967: g_debug := hr_utility.debug_enabled;

3963: l_procedure VARCHAR2(100);
3964: c_org_rec c_distinct_org_id%ROWTYPE;
3965:
3966: BEGIN
3967: g_debug := hr_utility.debug_enabled;
3968: l_procedure := g_package ||'create_form3a_xml';
3969: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
3970:
3971: pay_in_xml_utils.gXMLTable.DELETE;

Line 4533: g_debug := hr_utility.debug_enabled;

4529: l_cont_type_date_earned VARCHAR(20);
4530: l_pf_ceiling_type VARCHAR2(50);
4531:
4532: BEGIN
4533: g_debug := hr_utility.debug_enabled;
4534: l_procedure := g_package ||'create_form7_xml';
4535: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
4536:
4537: pay_in_xml_utils.gXMLTable.DELETE;

Line 5006: g_debug := hr_utility.debug_enabled;

5002: l_procedure VARCHAR2(100);
5003:
5004: BEGIN
5005:
5006: g_debug := hr_utility.debug_enabled;
5007: l_procedure := g_package ||'esi_employee_type';
5008: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
5009:
5010: OPEN c_person_id;

Line 5149: -- hr_utility.set_location('Checking asg '||p_assignment_id||' for termination',7);

5145: --The following cursor checks for the presence of p_org_id in the archived data
5146: OPEN c_transfer_status(p_org_id);
5147: FETCH c_transfer_status INTO l_reason;
5148: CLOSE c_transfer_status;
5149: -- hr_utility.set_location('Checking asg '||p_assignment_id||' for termination',7);
5150: IF l_reason IS NULL THEN -- This means that employee is no longer attached to that p_org_id
5151: pay_in_utils.set_location(g_debug,l_procedure, 90);
5152: IF l_exem_status=p_esi_coverage THEN
5153: RETURN TRUE; -- Hence we can safely return true and process that assignment.

Line 5161: -- hr_utility.set_location('Asg '||p_assignment_id||' not terminated. Checking for org counts',7);

5157: ELSE
5158: pay_in_utils.set_location(g_debug,l_procedure, 100);
5159: l_reason := NULL;
5160: l_org_count := 0;
5161: -- hr_utility.set_location('Asg '||p_assignment_id||' not terminated. Checking for org counts',7);
5162: --Here we know that in last archived record employee was attached to p_org_id.
5163: --But there may be multiple records for last archival process.
5164: --So checking for no of records of last payroll.
5165: OPEN c_last_pay_count;

Line 5168: -- hr_utility.set_location('Asg '||p_assignment_id||' has an org count of '||l_org_count,7);

5164: --So checking for no of records of last payroll.
5165: OPEN c_last_pay_count;
5166: FETCH c_last_pay_count INTO l_org_count;
5167: CLOSE c_last_pay_count ;
5168: -- hr_utility.set_location('Asg '||p_assignment_id||' has an org count of '||l_org_count,7);
5169: IF l_org_count < 2 THEN
5170: --This means there is only one record and employee is attached to it only.
5171: --Hence he is not a separted employee. So returning false
5172: -- hr_utility.set_location('Asg '||p_assignment_id||' has an org count of '||l_org_count||' and is thus active emp',7);

Line 5172: -- hr_utility.set_location('Asg '||p_assignment_id||' has an org count of '||l_org_count||' and is thus active emp',7);

5168: -- hr_utility.set_location('Asg '||p_assignment_id||' has an org count of '||l_org_count,7);
5169: IF l_org_count < 2 THEN
5170: --This means there is only one record and employee is attached to it only.
5171: --Hence he is not a separted employee. So returning false
5172: -- hr_utility.set_location('Asg '||p_assignment_id||' has an org count of '||l_org_count||' and is thus active emp',7);
5173: pay_in_utils.set_location(g_debug,l_procedure, 110);
5174: RETURN FALSE;
5175: ELSE
5176: -- hr_utility.set_location('Asg '||p_assignment_id||' has an org count of '||l_org_count||' and might be transferred',7);

Line 5176: -- hr_utility.set_location('Asg '||p_assignment_id||' has an org count of '||l_org_count||' and might be transferred',7);

5172: -- hr_utility.set_location('Asg '||p_assignment_id||' has an org count of '||l_org_count||' and is thus active emp',7);
5173: pay_in_utils.set_location(g_debug,l_procedure, 110);
5174: RETURN FALSE;
5175: ELSE
5176: -- hr_utility.set_location('Asg '||p_assignment_id||' has an org count of '||l_org_count||' and might be transferred',7);
5177: --Employee has multiple records for the last run.
5178: --Now we have to make sure that for which one he is transferred.
5179: --For this we are using the last payroll date and then we shall find the SCL Information.
5180: --Find the last payroll date

Line 5186: hr_utility.set_location('Last Payroll Date'||l_pay_date,12);

5182: OPEN c_last_pay_date;
5183: FETCH c_last_pay_date INTO l_pay_date;
5184: CLOSE c_last_pay_date;
5185:
5186: hr_utility.set_location('Last Payroll Date'||l_pay_date,12);
5187:
5188: OPEN c_final_check(p_org_id,l_pay_date);
5189: FETCH c_final_check INTO l_reason;
5190: CLOSE c_final_check ;

Line 5551: g_debug := hr_utility.debug_enabled;

5547:
5548:
5549: BEGIN
5550: --
5551: g_debug := hr_utility.debug_enabled;
5552: l_procedure := g_package ||'create_esi_xml';
5553: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
5554:
5555: pay_in_utils.trace('p_esi_org_id',p_esi_org_id);