45: lv_legislative_param VARCHAR2(240);
46: begin
47:
48: l_proc := gv_package_name||'range_cursor';
49: hr_utility.set_location(l_proc, 10);
50: hr_utility.trace('PACTID = '||to_char(pactid));
51: hr_utility.trace('PACTID = '||to_char(pactid));
52: select ppa.legislative_parameters
53: into lv_legislative_param
46: begin
47:
48: l_proc := gv_package_name||'range_cursor';
49: hr_utility.set_location(l_proc, 10);
50: hr_utility.trace('PACTID = '||to_char(pactid));
51: hr_utility.trace('PACTID = '||to_char(pactid));
52: select ppa.legislative_parameters
53: into lv_legislative_param
54: from pay_payroll_actions ppa
47:
48: l_proc := gv_package_name||'range_cursor';
49: hr_utility.set_location(l_proc, 10);
50: hr_utility.trace('PACTID = '||to_char(pactid));
51: hr_utility.trace('PACTID = '||to_char(pactid));
52: select ppa.legislative_parameters
53: into lv_legislative_param
54: from pay_payroll_actions ppa
55: where payroll_action_id = pactid;
55: where payroll_action_id = pactid;
56: l_gre_id := pay_core_utils.get_parameter('TRANSFER_GRE',lv_legislative_param);
57: sqlstr := 'AND PAA.tax_unit_id = '||to_number(l_gre_id);
58:
59: hr_utility.set_location(l_proc, 20);
60: hr_utility.trace(sqlstr);
61:
62: exception when others then
63: hr_utility.set_location(l_proc, 30);
56: l_gre_id := pay_core_utils.get_parameter('TRANSFER_GRE',lv_legislative_param);
57: sqlstr := 'AND PAA.tax_unit_id = '||to_number(l_gre_id);
58:
59: hr_utility.set_location(l_proc, 20);
60: hr_utility.trace(sqlstr);
61:
62: exception when others then
63: hr_utility.set_location(l_proc, 30);
64: end range_cursor;
59: hr_utility.set_location(l_proc, 20);
60: hr_utility.trace(sqlstr);
61:
62: exception when others then
63: hr_utility.set_location(l_proc, 30);
64: end range_cursor;
65:
66: ---------------------------------- action_creation ----------------------------------
67: --
76: ld_year_end DATE;
77: ln_tax_unit_id NUMBER;
78: BEGIN
79: l_proc := gv_package_name||'range_cursor';
80: hr_utility.set_location(l_proc, 10);
81:
82: hr_utility.trace('PACTID = '||to_char(pactid));
83:
84: SELECT effective_date,
78: BEGIN
79: l_proc := gv_package_name||'range_cursor';
80: hr_utility.set_location(l_proc, 10);
81:
82: hr_utility.trace('PACTID = '||to_char(pactid));
83:
84: SELECT effective_date,
85: pay_core_utils.get_parameter('TRANSFER_GRE',legislative_parameters)
86: INTO ld_effective_date,
88: FROM pay_payroll_actions
89: WHERE payroll_action_id = pactid;
90:
91: ld_year_end := add_months(trunc(ld_effective_date, 'Y'),12) -1;
92: hr_utility.trace('year end '|| to_char(ld_year_end,'dd-mm-yyyy'));
93: sqlstr := ' AND PAA.tax_unit_id = '||to_number(ln_tax_unit_id);
94: sqlstr := sqlstr ||' AND not exists (SELECT 1
95: FROM pay_payroll_actions ppa,
96: pay_assignment_actions paa
104: AND paa.action_status = ''C''
105: AND ppa.business_group_id = paf.business_group_id
106: AND paa.serial_number = TO_CHAR(paf.person_id))';
107:
108: hr_utility.set_location(l_proc, 20);
109: hr_utility.trace(sqlstr);
110:
111: EXCEPTION WHEN OTHERS THEN
112: hr_utility.set_location(l_proc, 30);
105: AND ppa.business_group_id = paf.business_group_id
106: AND paa.serial_number = TO_CHAR(paf.person_id))';
107:
108: hr_utility.set_location(l_proc, 20);
109: hr_utility.trace(sqlstr);
110:
111: EXCEPTION WHEN OTHERS THEN
112: hr_utility.set_location(l_proc, 30);
113: END action_creation;
108: hr_utility.set_location(l_proc, 20);
109: hr_utility.trace(sqlstr);
110:
111: EXCEPTION WHEN OTHERS THEN
112: hr_utility.set_location(l_proc, 30);
113: END action_creation;
114:
115: PROCEDURE archive_code (pactid IN NUMBER,
116: sqlstr OUT NOCOPY VARCHAR2) IS
120: l_proc VARCHAR2(240);
121:
122: BEGIN
123: l_proc := gv_package_name||'archive_code';
124: hr_utility.set_location(l_proc, 10);
125:
126: hr_utility.trace('PACTID = '||to_char(pactid));
127:
128: select ppa.legislative_parameters
122: BEGIN
123: l_proc := gv_package_name||'archive_code';
124: hr_utility.set_location(l_proc, 10);
125:
126: hr_utility.trace('PACTID = '||to_char(pactid));
127:
128: select ppa.legislative_parameters
129: into lv_legislative_param
130: from pay_payroll_actions ppa
131: where payroll_action_id = pactid;
132:
133: l_gre_id := pay_core_utils.get_parameter('TRANSFER_GRE',lv_legislative_param);
134: sqlstr := 'AND PAA.tax_unit_id = '||to_number(l_gre_id);
135: hr_utility.set_location(l_proc, 20);
136: hr_utility.trace(sqlstr);
137:
138: EXCEPTION WHEN OTHERS THEN
139: hr_utility.set_location(l_proc, 30);
132:
133: l_gre_id := pay_core_utils.get_parameter('TRANSFER_GRE',lv_legislative_param);
134: sqlstr := 'AND PAA.tax_unit_id = '||to_number(l_gre_id);
135: hr_utility.set_location(l_proc, 20);
136: hr_utility.trace(sqlstr);
137:
138: EXCEPTION WHEN OTHERS THEN
139: hr_utility.set_location(l_proc, 30);
140: END archive_code;
135: hr_utility.set_location(l_proc, 20);
136: hr_utility.trace(sqlstr);
137:
138: EXCEPTION WHEN OTHERS THEN
139: hr_utility.set_location(l_proc, 30);
140: END archive_code;
141:
142: --begin
143: --hr_utility.trace_on(null,'YREND_YEMA');
139: hr_utility.set_location(l_proc, 30);
140: END archive_code;
141:
142: --begin
143: --hr_utility.trace_on(null,'YREND_YEMA');
144:
145: END PAY_US_ARCHIVE_RULES;