13: l_start_pos NUMBER;
14: l_delimiter varchar2(1):=' ';
15: l_proc VARCHAR2(160):= g_package||'.get parameter ';
16: BEGIN
17: hr_utility.set_location('Entering ' || l_proc, 20);
18: l_start_pos := instr(' '||p_parameter_string,l_delimiter||p_token||'=');
19: IF l_start_pos = 0 THEN
20: l_delimiter := '|';
21: l_start_pos := instr(' '||p_parameter_string,l_delimiter||p_token||'=');
34: instr(l_parameter,':',1,p_segment_number+1) -1
35: - instr(l_parameter,':',1,p_segment_number));
36: END IF;
37: END IF;
38: hr_utility.set_location('Leaving ' || l_proc, 100);
39: RETURN l_parameter;
40:
41: END get_parameter;
42:
54: l_proc VARCHAR2(160):= g_package||'.get_all_parameters ';
55:
56: BEGIN
57:
58: hr_utility.set_location('Entering ' || l_proc, 20);
59:
60: OPEN csr_parameter_info (p_payroll_action_id);
61: FETCH csr_parameter_info INTO p_token_value,
62: p_business_group_id;
61: FETCH csr_parameter_info INTO p_token_value,
62: p_business_group_id;
63: CLOSE csr_parameter_info;
64:
65: hr_utility.set_location('Leaving ' || l_proc, 100);
66:
67: END get_all_parameters;
68:
69:
84: l_end_date VARCHAR2(20);
85:
86: BEGIN
87:
88: hr_utility.set_location('Entering ' || l_proc,10);
89:
90: pay_ie_p30lock.get_all_parameters
91: (p_payroll_action_id => pactid,
92: p_token => 'END_DATE',
93: p_business_group_id => l_business_group_id,
94: p_token_value => l_end_date);
95:
96:
97: hr_utility.set_location('Step ' || l_proc,20);
98: hr_utility.set_location('l_end_date = ' || l_end_date,20);
99:
100: l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
101: hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
94: p_token_value => l_end_date);
95:
96:
97: hr_utility.set_location('Step ' || l_proc,20);
98: hr_utility.set_location('l_end_date = ' || l_end_date,20);
99:
100: l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
101: hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
102:
97: hr_utility.set_location('Step ' || l_proc,20);
98: hr_utility.set_location('l_end_date = ' || l_end_date,20);
99:
100: l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
101: hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
102:
103: -- Used per_people_f 4555600
104: -- Changed the cursor to reduce the cost (5042843)
105: sqlstr := 'SELECT distinct asg.person_id
112: AND pos.business_group_id = ppa.business_group_id
113: AND asg.business_group_id = ppa.business_group_id
114: ORDER BY asg.person_id';
115:
116: hr_utility.set_location('Leaving ' || l_proc,40);
117:
118: EXCEPTION
119: WHEN OTHERS THEN
120: hr_utility.set_location(' Leaving with EXCEPTION: '||l_proc,100);
116: hr_utility.set_location('Leaving ' || l_proc,40);
117:
118: EXCEPTION
119: WHEN OTHERS THEN
120: hr_utility.set_location(' Leaving with EXCEPTION: '||l_proc,100);
121: -- Return cursor that selects no rows
122: sqlstr := sqlerrm;
123: END range_code;
124:
198: paa.assignment_action_id;
199:
200:
201: BEGIN
202: hr_utility.set_location('Entering ' || l_proc,10);
203: pay_ie_p30lock.get_all_parameters
204: (p_payroll_action_id => pactid,
205: p_token => 'END_DATE',
206: p_business_group_id => l_business_group_id,
212: , p_token => 'CONSOLIDATION'
213: , p_business_group_id => l_business_group_id
214: , p_token_value => l_consolidation_set);
215:
216: hr_utility.set_location('Step ' || l_proc,20);
217: hr_utility.set_location('l_end_date = ' || l_end_date,20);
218: l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
219: FOR csr_rec IN csr_assact
220: LOOP
213: , p_business_group_id => l_business_group_id
214: , p_token_value => l_consolidation_set);
215:
216: hr_utility.set_location('Step ' || l_proc,20);
217: hr_utility.set_location('l_end_date = ' || l_end_date,20);
218: l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
219: FOR csr_rec IN csr_assact
220: LOOP
221: IF l_arch_action_id <> csr_rec.assignment_action_id THEN
218: l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
219: FOR csr_rec IN csr_assact
220: LOOP
221: IF l_arch_action_id <> csr_rec.assignment_action_id THEN
222: hr_utility.set_location('inside loop ' || l_proc,12);
223: hr_utility.set_location('-----------------------------------------',13);
224: hr_utility.set_location('Assignment_action_id ' || csr_rec.assignment_action_id,14);
225: hr_utility.set_location('pactid_id ' || pactid,15);
226: hr_utility.set_location('Payroll_action_id ' || csr_rec.payroll_action_id,15);
219: FOR csr_rec IN csr_assact
220: LOOP
221: IF l_arch_action_id <> csr_rec.assignment_action_id THEN
222: hr_utility.set_location('inside loop ' || l_proc,12);
223: hr_utility.set_location('-----------------------------------------',13);
224: hr_utility.set_location('Assignment_action_id ' || csr_rec.assignment_action_id,14);
225: hr_utility.set_location('pactid_id ' || pactid,15);
226: hr_utility.set_location('Payroll_action_id ' || csr_rec.payroll_action_id,15);
227: hr_utility.set_location('-----------------------------------------',17);
220: LOOP
221: IF l_arch_action_id <> csr_rec.assignment_action_id THEN
222: hr_utility.set_location('inside loop ' || l_proc,12);
223: hr_utility.set_location('-----------------------------------------',13);
224: hr_utility.set_location('Assignment_action_id ' || csr_rec.assignment_action_id,14);
225: hr_utility.set_location('pactid_id ' || pactid,15);
226: hr_utility.set_location('Payroll_action_id ' || csr_rec.payroll_action_id,15);
227: hr_utility.set_location('-----------------------------------------',17);
228: SELECT pay_assignment_actions_s.NEXTVAL
221: IF l_arch_action_id <> csr_rec.assignment_action_id THEN
222: hr_utility.set_location('inside loop ' || l_proc,12);
223: hr_utility.set_location('-----------------------------------------',13);
224: hr_utility.set_location('Assignment_action_id ' || csr_rec.assignment_action_id,14);
225: hr_utility.set_location('pactid_id ' || pactid,15);
226: hr_utility.set_location('Payroll_action_id ' || csr_rec.payroll_action_id,15);
227: hr_utility.set_location('-----------------------------------------',17);
228: SELECT pay_assignment_actions_s.NEXTVAL
229: INTO l_actid
222: hr_utility.set_location('inside loop ' || l_proc,12);
223: hr_utility.set_location('-----------------------------------------',13);
224: hr_utility.set_location('Assignment_action_id ' || csr_rec.assignment_action_id,14);
225: hr_utility.set_location('pactid_id ' || pactid,15);
226: hr_utility.set_location('Payroll_action_id ' || csr_rec.payroll_action_id,15);
227: hr_utility.set_location('-----------------------------------------',17);
228: SELECT pay_assignment_actions_s.NEXTVAL
229: INTO l_actid
230: FROM dual;
223: hr_utility.set_location('-----------------------------------------',13);
224: hr_utility.set_location('Assignment_action_id ' || csr_rec.assignment_action_id,14);
225: hr_utility.set_location('pactid_id ' || pactid,15);
226: hr_utility.set_location('Payroll_action_id ' || csr_rec.payroll_action_id,15);
227: hr_utility.set_location('-----------------------------------------',17);
228: SELECT pay_assignment_actions_s.NEXTVAL
229: INTO l_actid
230: FROM dual;
231: hr_nonrun_asact.insact(l_actid,csr_rec.assignment_id,pactid,chunk,csr_rec.tax_unit_id);
228: SELECT pay_assignment_actions_s.NEXTVAL
229: INTO l_actid
230: FROM dual;
231: hr_nonrun_asact.insact(l_actid,csr_rec.assignment_id,pactid,chunk,csr_rec.tax_unit_id);
232: hr_utility.set_location('created pay_ass_act ' || l_actid || ' to ' || pactid,20);
233: hr_nonrun_asact.insint(l_actid, csr_rec.assignment_action_id);
234: hr_utility.set_location('created interlocks ' || l_actid || ' to ' || csr_rec.assignment_action_id,20);
235: l_arch_action_id := csr_rec.assignment_action_id;
236: END IF;
230: FROM dual;
231: hr_nonrun_asact.insact(l_actid,csr_rec.assignment_id,pactid,chunk,csr_rec.tax_unit_id);
232: hr_utility.set_location('created pay_ass_act ' || l_actid || ' to ' || pactid,20);
233: hr_nonrun_asact.insint(l_actid, csr_rec.assignment_action_id);
234: hr_utility.set_location('created interlocks ' || l_actid || ' to ' || csr_rec.assignment_action_id,20);
235: l_arch_action_id := csr_rec.assignment_action_id;
236: END IF;
237: END LOOP;
238:
235: l_arch_action_id := csr_rec.assignment_action_id;
236: END IF;
237: END LOOP;
238:
239: hr_utility.set_location('Leaving ' || l_proc,20);
240:
241: END prg_assignment_action_code;
242:
243:
294:
295:
296: BEGIN
297:
298: hr_utility.set_location('Entering ' || l_proc,10);
299:
300: pay_ie_p30lock.get_all_parameters
301: (p_payroll_action_id => pactid,
302: p_token => 'PAYROLL_ACTION_ID',
303: p_business_group_id => l_business_group_id,
304: p_token_value => l_pay_action_id);
305:
306:
307: hr_utility.set_location('Step ' || l_proc,20);
308: hr_utility.set_location('l_pay_action_id = ' || l_pay_action_id,20);
309:
310: FOR csr_rec IN csr_assact
311: LOOP
304: p_token_value => l_pay_action_id);
305:
306:
307: hr_utility.set_location('Step ' || l_proc,20);
308: hr_utility.set_location('l_pay_action_id = ' || l_pay_action_id,20);
309:
310: FOR csr_rec IN csr_assact
311: LOOP
312: hr_utility.set_location('inside loop ' || l_proc,12);
308: hr_utility.set_location('l_pay_action_id = ' || l_pay_action_id,20);
309:
310: FOR csr_rec IN csr_assact
311: LOOP
312: hr_utility.set_location('inside loop ' || l_proc,12);
313: hr_utility.set_location('-----------------------------------------',13);
314: hr_utility.set_location('Assignment_action_id ' || csr_rec.assignment_action_id,14);
315: hr_utility.set_location('Pact_id ' || pactid,15);
316: hr_utility.set_location('Payroll_action_id ' || csr_rec.payroll_action_id,15);
309:
310: FOR csr_rec IN csr_assact
311: LOOP
312: hr_utility.set_location('inside loop ' || l_proc,12);
313: hr_utility.set_location('-----------------------------------------',13);
314: hr_utility.set_location('Assignment_action_id ' || csr_rec.assignment_action_id,14);
315: hr_utility.set_location('Pact_id ' || pactid,15);
316: hr_utility.set_location('Payroll_action_id ' || csr_rec.payroll_action_id,15);
317: hr_utility.set_location('-----------------------------------------',17);
310: FOR csr_rec IN csr_assact
311: LOOP
312: hr_utility.set_location('inside loop ' || l_proc,12);
313: hr_utility.set_location('-----------------------------------------',13);
314: hr_utility.set_location('Assignment_action_id ' || csr_rec.assignment_action_id,14);
315: hr_utility.set_location('Pact_id ' || pactid,15);
316: hr_utility.set_location('Payroll_action_id ' || csr_rec.payroll_action_id,15);
317: hr_utility.set_location('-----------------------------------------',17);
318: SELECT pay_assignment_actions_s.NEXTVAL
311: LOOP
312: hr_utility.set_location('inside loop ' || l_proc,12);
313: hr_utility.set_location('-----------------------------------------',13);
314: hr_utility.set_location('Assignment_action_id ' || csr_rec.assignment_action_id,14);
315: hr_utility.set_location('Pact_id ' || pactid,15);
316: hr_utility.set_location('Payroll_action_id ' || csr_rec.payroll_action_id,15);
317: hr_utility.set_location('-----------------------------------------',17);
318: SELECT pay_assignment_actions_s.NEXTVAL
319: INTO l_actid
312: hr_utility.set_location('inside loop ' || l_proc,12);
313: hr_utility.set_location('-----------------------------------------',13);
314: hr_utility.set_location('Assignment_action_id ' || csr_rec.assignment_action_id,14);
315: hr_utility.set_location('Pact_id ' || pactid,15);
316: hr_utility.set_location('Payroll_action_id ' || csr_rec.payroll_action_id,15);
317: hr_utility.set_location('-----------------------------------------',17);
318: SELECT pay_assignment_actions_s.NEXTVAL
319: INTO l_actid
320: FROM dual;
313: hr_utility.set_location('-----------------------------------------',13);
314: hr_utility.set_location('Assignment_action_id ' || csr_rec.assignment_action_id,14);
315: hr_utility.set_location('Pact_id ' || pactid,15);
316: hr_utility.set_location('Payroll_action_id ' || csr_rec.payroll_action_id,15);
317: hr_utility.set_location('-----------------------------------------',17);
318: SELECT pay_assignment_actions_s.NEXTVAL
319: INTO l_actid
320: FROM dual;
321: hr_nonrun_asact.insact(l_actid,csr_rec.assignment_id,pactid,chunk,csr_rec.tax_unit_id);
318: SELECT pay_assignment_actions_s.NEXTVAL
319: INTO l_actid
320: FROM dual;
321: hr_nonrun_asact.insact(l_actid,csr_rec.assignment_id,pactid,chunk,csr_rec.tax_unit_id);
322: hr_utility.set_location('created pay_ass_act ' || l_actid || ' to ' || pactid,20);
323: hr_nonrun_asact.insint(l_actid, csr_rec.assignment_action_id);
324: hr_utility.set_location('created interlocks ' || l_actid || ' to ' || csr_rec.assignment_action_id,20);
325:
326: END LOOP;
320: FROM dual;
321: hr_nonrun_asact.insact(l_actid,csr_rec.assignment_id,pactid,chunk,csr_rec.tax_unit_id);
322: hr_utility.set_location('created pay_ass_act ' || l_actid || ' to ' || pactid,20);
323: hr_nonrun_asact.insint(l_actid, csr_rec.assignment_action_id);
324: hr_utility.set_location('created interlocks ' || l_actid || ' to ' || csr_rec.assignment_action_id,20);
325:
326: END LOOP;
327:
328: hr_utility.set_location('Leaving ' || l_proc,20);
324: hr_utility.set_location('created interlocks ' || l_actid || ' to ' || csr_rec.assignment_action_id,20);
325:
326: END LOOP;
327:
328: hr_utility.set_location('Leaving ' || l_proc,20);
329:
330: END rep_assignment_action_code;
331:
332: ---------------------------------------------------------------------