[Home] [Help]
1: PACKAGE BODY pay_mx_payreg_pkg AS
2: /* $Header: paymxreg.pkb 120.0.12020000.7 2013/03/05 08:06:50 jeisaac noship $ */
3:
4: /*************************************************************************
5: +======================================================================+
47: g_pay_reg_defbal_details entity_details_tab;
48: g_pr_balance_value_tab pay_balance_pkg.t_balance_value_tab;
49: payroll_reg_xml_tbl xml_tbl;
50: EOL VARCHAR2(5);
51: g_package_name VARCHAR2(100) := 'PAY_MX_PAYREG_PKG';
52:
53: --------------------------- range_cursor ---------------------------------
54: PROCEDURE range_cursor (pactid IN NUMBER
55: ,sqlstr OUT NOCOPY VARCHAR2) IS
67: l_consolidation_set_text VARCHAR2(50);
68: l_proc_name VARCHAR2(100) := g_package_name||'.RANGE_CURSOR';
69: BEGIN
70: --hr_utility.trace_on (NULL, 'Vineet');
71: fnd_file.put_line(FND_FILE.LOG,'pay_mx_payreg_pkg.range_cursor ');
72: hr_utility.set_location(l_proc_name,5);
73:
74: SELECT legislative_parameters
75: INTO leg_param
486: -- but we have to take into account assignments and
487: -- personal payment methods.
488: BEGIN
489:
490: FND_FILE.PUT_LINE(FND_FILE.LOG,'pay_mx_payreg_pkg.action_creation ');
491: hr_utility.trace('pay_mx_payreg_pkg.action_creation ');
492: hr_utility.set_location('Entering '||l_proc_name,5);
493:
494: SELECT legislative_parameters
487: -- personal payment methods.
488: BEGIN
489:
490: FND_FILE.PUT_LINE(FND_FILE.LOG,'pay_mx_payreg_pkg.action_creation ');
491: hr_utility.trace('pay_mx_payreg_pkg.action_creation ');
492: hr_utility.set_location('Entering '||l_proc_name,5);
493:
494: SELECT legislative_parameters
495: INTO l_leg_param
803: -------------------------------- write_to_magtape ------------------------------
804:
805: PROCEDURE write_to_magtape_lob(p_data VARCHAR2) IS
806: BEGIN
807: fnd_file.put_line(fnd_file.log,'pay_mx_payreg_pkg.write_to_magtape_lob ');
808: pay_core_files.write_to_magtape_lob (p_data);
809: END write_to_magtape_lob;
810:
811: -------------------------------- load_xml_internal -----------------------------
817: l_data VARCHAR2(240);
818: l_xml VARCHAR2(240);
819:
820: BEGIN
821: fnd_file.put_line(fnd_file.log,'pay_mx_payreg_pkg.load_xml_internal ');
822: hr_utility.set_location('Entering:'||l_proc_name,10);
823:
824: IF p_node_type = 'CS' THEN
825:
854: ,type IN VARCHAR2 ) IS
855: ln_index NUMBER;
856:
857: BEGIN
858: FND_FILE.PUT_LINE(FND_FILE.LOG,'pay_mx_payreg_pkg.populate_xml_table ');
859: ln_index := payroll_reg_xml_tbl.COUNT;
860:
861: payroll_reg_xml_tbl(ln_index).name := name;
862: payroll_reg_xml_tbl(ln_index).value := value;
1040: lt_pr_bal_result_tab pay_balance_pkg.t_detailed_bal_out_tab;
1041: l_proc_name VARCHAR2(100) := g_package_name||'.GENERATE_XML';
1042: BEGIN
1043:
1044: FND_FILE.PUT_LINE(FND_FILE.LOG,'pay_mx_payreg_pkg.generate_xml ');
1045: hr_utility.set_location ('Entering'|| l_proc_name ,10);
1046:
1047: ln_payroll_act_id := pay_magtape_generic.get_parameter_value('TRANSFER_PAYROLL_ACTION_ID');
1048: ln_curr_assign_act_id := pay_magtape_generic.get_parameter_value('TRANSFER_ACT_ID');
1286: lv_sort_option VARCHAR2(240);
1287:
1288: BEGIN
1289: hr_utility.set_location ('Entering'|| l_proc_name ,10);
1290: FND_FILE.PUT_LINE(FND_FILE.LOG,'pay_mx_payreg_pkg.generate_xml_header ');
1291: payroll_reg_xml_tbl.delete;
1292:
1293: hr_utility.set_location ( l_proc_name ,15);
1294: ln_payroll_action_id := pay_magtape_generic.get_parameter_value('TRANSFER_PAYROLL_ACTION_ID');
1400: l_proc_name VARCHAR2(100) := g_package_name||'.GENERATE_XML_FOOTER';
1401: l_remove_act VARCHAR2(10);
1402: BEGIN
1403: hr_utility.set_location ( 'Entering'||l_proc_name ,10);
1404: FND_FILE.PUT_LINE(FND_FILE.LOG,'pay_mx_payreg_pkg.generate_xml_footer ');
1405:
1406: lv_buf := '
1407: SUBSTR(pay_magtape_generic.get_parameter_value('ROOT_XML_TAG'),
1408: 2);
1455: l_proc_name VARCHAR2(100) := g_package_name||'.GENERATE_GRE_XML_HEADER';
1456:
1457: BEGIN
1458: hr_utility.set_location ( 'Entering'||l_proc_name ,10);
1459: FND_FILE.PUT_LINE(FND_FILE.LOG,'pay_mx_payreg_pkg.generate_gre_xml_header ');
1460: payroll_reg_xml_tbl.delete;
1461:
1462: hr_utility.set_location (l_proc_name ,15);
1463: ln_payroll_action_id := pay_magtape_generic.get_parameter_value('TRANSFER_PAYROLL_ACTION_ID');
1497: lv_buf VARCHAR2(8000);
1498: l_proc_name VARCHAR2(100) := g_package_name||'.GENERATE_GRE_XML_FOOTER';
1499: BEGIN
1500: hr_utility.trace ('Entering generate_gre_xml_footer');
1501: FND_FILE.PUT_LINE(FND_FILE.LOG,'pay_mx_payreg_pkg.generate_gre_xml_footer ');
1502: lv_buf := '
1503: SUBSTR(pay_magtape_generic.get_parameter_value('ROOT_GRE_TAG'),
1504: 2);
1505:
1521: l_sort_3 varchar2(30);
1522: l_proc_name VARCHAR2(100) := g_package_name||'.SORT_ACTION';
1523:
1524: BEGIN
1525: FND_FILE.PUT_LINE(FND_FILE.LOG,'pay_mx_payreg_pkg.sort_action ');
1526: hr_utility.set_location ('Entering'||l_proc_name ,10);
1527: SELECT pay_payrg_pkg.get_parameter('P_S1', ppa.legislative_parameters)
1528: INTO l_sort_1
1529: FROM pay_payroll_actions ppa
1535: FROM pay_assignment_actions paa,
1536: pay_payroll_actions ppa
1537: WHERE ppa.payroll_action_id = :payactid
1538: and paa.payroll_action_id = ppa.payroll_action_id
1539: order by(pay_mx_payreg_pkg.sort_option (
1540: ''GRE'',
1541: paa.assignment_id,
1542: ppa.effective_date,
1543: paa.tax_unit_id)),
1542: ppa.effective_date,
1543: paa.tax_unit_id)),
1544: (decode('''||l_sort_1||''',
1545: null, null,
1546: pay_mx_payreg_pkg.sort_option (
1547: '''||l_sort_1||''',
1548: paa.assignment_id,
1549: ppa.effective_date,
1550: paa.tax_unit_id))),
1601: IS
1602: return_val varchar2(240);
1603: l_proc_name VARCHAR2(100) := g_package_name||'.SORT_OPTION';
1604: BEGIN
1605: FND_FILE.PUT_LINE(FND_FILE.LOG,'pay_mx_payreg_pkg.sort_option ');
1606: hr_utility.set_location ('Entering '||l_proc_name ,10);
1607: --Modified the sort query for sorting by employee name(EMP_NAME) and
1608: --payroll name(PAY_NAME)
1609: /* IF c_option_name = 'GRE' THEN
1676: RETURN '1';
1677:
1678: END sort_option;
1679:
1680: END pay_mx_payreg_pkg;