PACKAGE: APPS.PAY_IE_P45PART3_P46_PKG

Source

1 PACKAGE PAY_IE_P45PART3_P46_PKG as
2 /* $Header: pyiep45p3p46.pkh 120.0.12010000.1 2008/07/27 22:50:40 appldev ship $ */
3 
4 level_cnt number;
5 
6 g_payroll_id  VARCHAR2(100);
7 g_business_Group_id  VARCHAR2(100);
8 g_start_date  date;
9 g_end_date  date;
10 g_person_id  VARCHAR2(100);
11 g_employer_id VARCHAR2(100);
12 g_file_type varchar2(50);
13 g_rep_group varchar2(50);
14 g_pact_id NUMBER;
15 --g_file_type varchar2(10):='N';
16 g_where_clause VARCHAR2(1000);
17 g_where_clause1 VARCHAR2(1000);
18 g_where_clause2 VARCHAR2(1000);
19 g_where_clause3 VARCHAR2(1000);
20 g_submitted VARCHAR2(1000):='Already Submitted';
21 g_org_name varchar2(200);
22 g_archive_effective_date date;
23 
24 PROCEDURE range_code(	pactid IN NUMBER,
25 			sqlstr OUT nocopy VARCHAR2);
26 
27 PROCEDURE assignment_action_code(pactid in number,
28 			          stperson in number,
29 				  endperson in number,
30 				  chunk in number);
31 
32 PROCEDURE archive_init(p_payroll_action_id IN NUMBER);
33 
34 PROCEDURE archive_data(p_assactid in number,
35                         p_effective_date in date);
36 
37 PROCEDURE gen_body_xml;
38 
39 PROCEDURE gen_header_xml;
40 
41 PROCEDURE gen_footer_xml;
42 
43 CURSOR  c_body IS
44     SELECT 'TRANSFER_ACT_ID=P', paa.assignment_action_id
45     FROM    pay_assignment_actions paa
46     WHERE   paa.payroll_action_id = to_number(pay_magtape_generic.get_parameter_value
47 	     ('TRANSFER_PAYROLL_ACTION_ID'))
48     ORDER BY paa.assignment_action_id;
49 
50 CURSOR c_hdr IS
51     SELECT  'PAYROLL_ACTION_ID=P'
52       ,pay_magtape_generic.get_parameter_value('TRANSFER_PAYROLL_ACTION_ID')
53     FROM  dual;
54 
55 CURSOR c_asg_actions IS
56     SELECT  'TRANSFER_ACT_ID=P'
57       ,pay_magtape_generic.get_parameter_value('TRANSFER_ACT_ID')
58     FROM  dual;
59 END pay_ie_P45Part3_P46_pkg;