1: PACKAGE BODY pay_se_trna_archive AS
2: /* $Header: pysetrna.pkb 120.2 2007/07/30 12:22:21 psingla noship $ */
3: TYPE lock_rec IS RECORD (
4: archive_assact_id NUMBER
5: );
7: TYPE lock_table IS TABLE OF lock_rec
8: INDEX BY BINARY_INTEGER;
9:
10: g_debug BOOLEAN := hr_utility.debug_enabled;
11: g_package VARCHAR2 (33) := 'pay_se_trna_archive.';
12: g_payroll_action_id NUMBER;
13: -- Globals to pick up all the parameter
14: g_business_group_id NUMBER;
15: g_effective_date DATE;
122: p_payroll_action_id NUMBER
123: ) IS
124: SELECT to_number (
125: substr (
126: pay_se_trna_archive.get_parameter (legislative_parameters, 'LEGAL_EMPLOYER'),
127: 1,
128: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'LEGAL_EMPLOYER')) - 1
129: )
130: ) legal,
124: SELECT to_number (
125: substr (
126: pay_se_trna_archive.get_parameter (legislative_parameters, 'LEGAL_EMPLOYER'),
127: 1,
128: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'LEGAL_EMPLOYER')) - 1
129: )
130: ) legal,
131: substr (
132: pay_se_trna_archive.get_parameter (legislative_parameters, 'REQUEST_FOR'),
128: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'LEGAL_EMPLOYER')) - 1
129: )
130: ) legal,
131: substr (
132: pay_se_trna_archive.get_parameter (legislative_parameters, 'REQUEST_FOR'),
133: 1,
134: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'REQUEST_FOR')) - 1
135: ) request_for,
136: substr (
130: ) legal,
131: substr (
132: pay_se_trna_archive.get_parameter (legislative_parameters, 'REQUEST_FOR'),
133: 1,
134: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'REQUEST_FOR')) - 1
135: ) request_for,
136: substr (
137: pay_se_trna_archive.get_parameter (legislative_parameters, 'DIVISION'),
138: 1,
133: 1,
134: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'REQUEST_FOR')) - 1
135: ) request_for,
136: substr (
137: pay_se_trna_archive.get_parameter (legislative_parameters, 'DIVISION'),
138: 1,
139: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'DIVISION')) - 1
140: ) division,
141: substr (
135: ) request_for,
136: substr (
137: pay_se_trna_archive.get_parameter (legislative_parameters, 'DIVISION'),
138: 1,
139: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'DIVISION')) - 1
140: ) division,
141: substr (
142: pay_se_trna_archive.get_parameter (legislative_parameters, 'REQUEST_FOR_DIV'),
143: 1,
138: 1,
139: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'DIVISION')) - 1
140: ) division,
141: substr (
142: pay_se_trna_archive.get_parameter (legislative_parameters, 'REQUEST_FOR_DIV'),
143: 1,
144: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'REQUEST_FOR_DIV')) - 1
145: ) request_for_div,
146: substr (
140: ) division,
141: substr (
142: pay_se_trna_archive.get_parameter (legislative_parameters, 'REQUEST_FOR_DIV'),
143: 1,
144: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'REQUEST_FOR_DIV')) - 1
145: ) request_for_div,
146: substr (
147: pay_se_trna_archive.get_parameter (legislative_parameters, 'AGREEMENT_AREA'),
148: 1,
143: 1,
144: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'REQUEST_FOR_DIV')) - 1
145: ) request_for_div,
146: substr (
147: pay_se_trna_archive.get_parameter (legislative_parameters, 'AGREEMENT_AREA'),
148: 1,
149: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'AGREEMENT_AREA')) - 1
150: ) agreement_area,
151: substr (
145: ) request_for_div,
146: substr (
147: pay_se_trna_archive.get_parameter (legislative_parameters, 'AGREEMENT_AREA'),
148: 1,
149: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'AGREEMENT_AREA')) - 1
150: ) agreement_area,
151: substr (
152: pay_se_trna_archive.get_parameter (legislative_parameters, 'REQUEST_FOR_AGREEMENT'),
153: 1,
148: 1,
149: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'AGREEMENT_AREA')) - 1
150: ) agreement_area,
151: substr (
152: pay_se_trna_archive.get_parameter (legislative_parameters, 'REQUEST_FOR_AGREEMENT'),
153: 1,
154: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'REQUEST_FOR_AGREEMENT')) - 1
155: )
156: request_for_agreement,
150: ) agreement_area,
151: substr (
152: pay_se_trna_archive.get_parameter (legislative_parameters, 'REQUEST_FOR_AGREEMENT'),
153: 1,
154: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'REQUEST_FOR_AGREEMENT')) - 1
155: )
156: request_for_agreement,
157: (pay_se_trna_archive.get_parameter (legislative_parameters, 'REPORT_DATE')) report_date,
158: substr (
153: 1,
154: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'REQUEST_FOR_AGREEMENT')) - 1
155: )
156: request_for_agreement,
157: (pay_se_trna_archive.get_parameter (legislative_parameters, 'REPORT_DATE')) report_date,
158: substr (
159: pay_se_trna_archive.get_parameter (legislative_parameters, 'PRECEDENCE_END_DATE'),
160: 1,
161: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'PRECEDENCE_END_DATE')) - 1
155: )
156: request_for_agreement,
157: (pay_se_trna_archive.get_parameter (legislative_parameters, 'REPORT_DATE')) report_date,
158: substr (
159: pay_se_trna_archive.get_parameter (legislative_parameters, 'PRECEDENCE_END_DATE'),
160: 1,
161: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'PRECEDENCE_END_DATE')) - 1
162: )
163: precedence_end_date1,
157: (pay_se_trna_archive.get_parameter (legislative_parameters, 'REPORT_DATE')) report_date,
158: substr (
159: pay_se_trna_archive.get_parameter (legislative_parameters, 'PRECEDENCE_END_DATE'),
160: 1,
161: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'PRECEDENCE_END_DATE')) - 1
162: )
163: precedence_end_date1,
164: substr (
165: pay_se_trna_archive.get_parameter (legislative_parameters, 'EMP_CATG'),
161: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'PRECEDENCE_END_DATE')) - 1
162: )
163: precedence_end_date1,
164: substr (
165: pay_se_trna_archive.get_parameter (legislative_parameters, 'EMP_CATG'),
166: 1,
167: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'EMP_CATG')) - 1
168: ) emp_catg,
169: substr (
163: precedence_end_date1,
164: substr (
165: pay_se_trna_archive.get_parameter (legislative_parameters, 'EMP_CATG'),
166: 1,
167: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'EMP_CATG')) - 1
168: ) emp_catg,
169: substr (
170: pay_se_trna_archive.get_parameter (legislative_parameters, 'ASG_CATG'),
171: 1,
166: 1,
167: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'EMP_CATG')) - 1
168: ) emp_catg,
169: substr (
170: pay_se_trna_archive.get_parameter (legislative_parameters, 'ASG_CATG'),
171: 1,
172: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'ASG_CATG')) - 1
173: ) asg_catg,
174: substr (
168: ) emp_catg,
169: substr (
170: pay_se_trna_archive.get_parameter (legislative_parameters, 'ASG_CATG'),
171: 1,
172: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'ASG_CATG')) - 1
173: ) asg_catg,
174: substr (
175: pay_se_trna_archive.get_parameter (legislative_parameters, 'EMP_SEC'),
176: 1,
171: 1,
172: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'ASG_CATG')) - 1
173: ) asg_catg,
174: substr (
175: pay_se_trna_archive.get_parameter (legislative_parameters, 'EMP_SEC'),
176: 1,
177: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'EMP_SEC')) - 1
178: ) requesting_emp_sec,
179: substr (
173: ) asg_catg,
174: substr (
175: pay_se_trna_archive.get_parameter (legislative_parameters, 'EMP_SEC'),
176: 1,
177: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'EMP_SEC')) - 1
178: ) requesting_emp_sec,
179: substr (
180: pay_se_trna_archive.get_parameter (legislative_parameters, 'SORT_ORDER'),
181: 1,
176: 1,
177: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'EMP_SEC')) - 1
178: ) requesting_emp_sec,
179: substr (
180: pay_se_trna_archive.get_parameter (legislative_parameters, 'SORT_ORDER'),
181: 1,
182: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'SORT_ORDER')) - 1
183: ) sort_order,
184: (pay_se_trna_archive.get_parameter (legislative_parameters, 'EFFECTIVE_START_DATE')) eff_start_date,
178: ) requesting_emp_sec,
179: substr (
180: pay_se_trna_archive.get_parameter (legislative_parameters, 'SORT_ORDER'),
181: 1,
182: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'SORT_ORDER')) - 1
183: ) sort_order,
184: (pay_se_trna_archive.get_parameter (legislative_parameters, 'EFFECTIVE_START_DATE')) eff_start_date,
185: (pay_se_trna_archive.get_parameter (legislative_parameters, 'EFFECTIVE_END_DATE'))
186: eff_end_date,
180: pay_se_trna_archive.get_parameter (legislative_parameters, 'SORT_ORDER'),
181: 1,
182: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'SORT_ORDER')) - 1
183: ) sort_order,
184: (pay_se_trna_archive.get_parameter (legislative_parameters, 'EFFECTIVE_START_DATE')) eff_start_date,
185: (pay_se_trna_archive.get_parameter (legislative_parameters, 'EFFECTIVE_END_DATE'))
186: eff_end_date,
187: (pay_se_trna_archive.get_parameter (legislative_parameters, 'PRECEDENCE_END_DATE')) precedence_end_date,
188: (pay_se_trna_archive.get_parameter (legislative_parameters, 'START_DATE_OF_BIRTH'))
181: 1,
182: LENGTH (pay_se_trna_archive.get_parameter (legislative_parameters, 'SORT_ORDER')) - 1
183: ) sort_order,
184: (pay_se_trna_archive.get_parameter (legislative_parameters, 'EFFECTIVE_START_DATE')) eff_start_date,
185: (pay_se_trna_archive.get_parameter (legislative_parameters, 'EFFECTIVE_END_DATE'))
186: eff_end_date,
187: (pay_se_trna_archive.get_parameter (legislative_parameters, 'PRECEDENCE_END_DATE')) precedence_end_date,
188: (pay_se_trna_archive.get_parameter (legislative_parameters, 'START_DATE_OF_BIRTH'))
189: start_date_of_birth,
183: ) sort_order,
184: (pay_se_trna_archive.get_parameter (legislative_parameters, 'EFFECTIVE_START_DATE')) eff_start_date,
185: (pay_se_trna_archive.get_parameter (legislative_parameters, 'EFFECTIVE_END_DATE'))
186: eff_end_date,
187: (pay_se_trna_archive.get_parameter (legislative_parameters, 'PRECEDENCE_END_DATE')) precedence_end_date,
188: (pay_se_trna_archive.get_parameter (legislative_parameters, 'START_DATE_OF_BIRTH'))
189: start_date_of_birth,
190: (pay_se_trna_archive.get_parameter (legislative_parameters, 'END_DATE_OF_BIRTH')) end_date_of_birth,
191: effective_date
184: (pay_se_trna_archive.get_parameter (legislative_parameters, 'EFFECTIVE_START_DATE')) eff_start_date,
185: (pay_se_trna_archive.get_parameter (legislative_parameters, 'EFFECTIVE_END_DATE'))
186: eff_end_date,
187: (pay_se_trna_archive.get_parameter (legislative_parameters, 'PRECEDENCE_END_DATE')) precedence_end_date,
188: (pay_se_trna_archive.get_parameter (legislative_parameters, 'START_DATE_OF_BIRTH'))
189: start_date_of_birth,
190: (pay_se_trna_archive.get_parameter (legislative_parameters, 'END_DATE_OF_BIRTH')) end_date_of_birth,
191: effective_date
192: effective_date, business_group_id bg_id
186: eff_end_date,
187: (pay_se_trna_archive.get_parameter (legislative_parameters, 'PRECEDENCE_END_DATE')) precedence_end_date,
188: (pay_se_trna_archive.get_parameter (legislative_parameters, 'START_DATE_OF_BIRTH'))
189: start_date_of_birth,
190: (pay_se_trna_archive.get_parameter (legislative_parameters, 'END_DATE_OF_BIRTH')) end_date_of_birth,
191: effective_date
192: effective_date, business_group_id bg_id
193: FROM pay_payroll_actions
194: WHERE payroll_action_id = p_payroll_action_id;
279: g_business_group_id := NULL;
280: g_effective_date := NULL;
281: g_legal_employer_id := NULL;
282: g_local_unit_id := NULL;
283: pay_se_trna_archive.get_all_parameters (
284: g_payroll_action_id,
285: g_business_group_id,
286: g_effective_date,
287: g_legal_employer_id,
486: IF g_debug THEN
487: hr_utility.set_location ('Entering Procedure ASSIGNMENT_ACTION_CODE', 60);
488: END IF;
489:
490: pay_se_trna_archive.get_all_parameters (
491: p_payroll_action_id,
492: g_business_group_id,
493: g_effective_date,
494: g_legal_employer_id,
745: IF g_debug THEN
746: hr_utility.set_location (' Entering Procedure ARCHIVE_CODE', 380);
747: END IF;
748: END archive_code;
749: END pay_se_trna_archive;