37: l_uid_tax_unit_id ff_user_entities.user_entity_id%TYPE;
38: l_uid_person_id ff_user_entities.user_entity_id%TYPE;
39: --
40: begin
41: --hr_utility.trace_on('Y','ORACLE');
42: hr_utility.trace('begining of range_cursor 1 ');
43:
44: select
45: legislative_parameters
38: l_uid_person_id ff_user_entities.user_entity_id%TYPE;
39: --
40: begin
41: --hr_utility.trace_on('Y','ORACLE');
42: hr_utility.trace('begining of range_cursor 1 ');
43:
44: select
45: legislative_parameters
46: into
73: ' and fai3.value =
74: nvl(pay_ca_t4a_reg.get_parameter(''PER_ID'',ppa.legislative_parameters),fai3.value)
75: order by to_number(fai3.value)';
76:
77: hr_utility.trace('End of range_cursor 2 ');
78:
79: end range_cursor;
80: ------------------------- action_creation ----------------------------------
81:
225:
226:
227: begin
228:
229: hr_utility.trace('begining of action creation 1 '||to_char(pactid));
230:
231: /* get report type and effective date */
232:
233: select
244: pay_payroll_actions
245: where
246: payroll_action_id = pactid;
247:
248: hr_utility.trace('begining of action creation 2 '||
249: to_char(l_bus_group_id));
250:
251: hr_utility.trace('legislative parameters is '||l_legislative_parameters);
252: hr_utility.trace('Start Person ID = '||to_char(stperson));
247:
248: hr_utility.trace('begining of action creation 2 '||
249: to_char(l_bus_group_id));
250:
251: hr_utility.trace('legislative parameters is '||l_legislative_parameters);
252: hr_utility.trace('Start Person ID = '||to_char(stperson));
253: hr_utility.trace('End Person ID = '||to_char(endperson));
254: hr_utility.trace('Chunk # = '||to_char(chunk));
255:
248: hr_utility.trace('begining of action creation 2 '||
249: to_char(l_bus_group_id));
250:
251: hr_utility.trace('legislative parameters is '||l_legislative_parameters);
252: hr_utility.trace('Start Person ID = '||to_char(stperson));
253: hr_utility.trace('End Person ID = '||to_char(endperson));
254: hr_utility.trace('Chunk # = '||to_char(chunk));
255:
256: l_year := pay_ca_t4a_reg.get_parameter('TAX_YEAR',l_legislative_parameters);
249: to_char(l_bus_group_id));
250:
251: hr_utility.trace('legislative parameters is '||l_legislative_parameters);
252: hr_utility.trace('Start Person ID = '||to_char(stperson));
253: hr_utility.trace('End Person ID = '||to_char(endperson));
254: hr_utility.trace('Chunk # = '||to_char(chunk));
255:
256: l_year := pay_ca_t4a_reg.get_parameter('TAX_YEAR',l_legislative_parameters);
257: l_year_start := trunc(to_date(l_year,'YYYY'), 'Y');
250:
251: hr_utility.trace('legislative parameters is '||l_legislative_parameters);
252: hr_utility.trace('Start Person ID = '||to_char(stperson));
253: hr_utility.trace('End Person ID = '||to_char(endperson));
254: hr_utility.trace('Chunk # = '||to_char(chunk));
255:
256: l_year := pay_ca_t4a_reg.get_parameter('TAX_YEAR',l_legislative_parameters);
257: l_year_start := trunc(to_date(l_year,'YYYY'), 'Y');
258: l_year_end := add_months(trunc(to_date(l_year,'YYYY'), 'Y'),12) - 1;
259: l_asg_set_id := pay_ca_t4a_reg.get_parameter('ASG_SET_ID',
260: l_legislative_parameters);
261: lv_per_id := pay_ca_t4a_reg.get_parameter('PER_ID',l_legislative_parameters);
262:
263: hr_utility.trace('begining of action creation 3 '||
264: l_year||to_char(l_year_start)||to_char(l_year_end));
265:
266: l_t4areg_tax_unit_id := to_number(pay_ca_t4a_reg.get_parameter('GRE_ID',
267: l_legislative_parameters));
267: l_legislative_parameters));
268: l_uid_caeoy_tax_year := get_user_entity_id('CAEOY_TAXATION_YEAR');
269: l_uid_caeoy_tax_unit_id := get_user_entity_id('CAEOY_TAX_UNIT_ID');
270:
271: hr_utility.trace('begining of action creation 4 '
272: ||to_char(l_t4areg_tax_unit_id));
273:
274: if l_t4areg_tax_unit_id is not null then
275:
272: ||to_char(l_t4areg_tax_unit_id));
273:
274: if l_t4areg_tax_unit_id is not null then
275:
276: hr_utility.trace(' Tax Unit ID is passed = '|| to_char(l_t4areg_tax_unit_id));
277:
278: open cur_gre;
279:
280: fetch cur_gre
294: end if;
295:
296: loop
297:
298: hr_utility.trace('l_t4areg_tax_unit_id is = ' ||
299: to_char(l_t4areg_tax_unit_id));
300:
301: l_tax_unit_id := l_t4areg_tax_unit_id;
302:
300:
301: l_tax_unit_id := l_t4areg_tax_unit_id;
302:
303:
304: hr_utility.trace('begining of if condition 5 '||to_char(l_tax_unit_id));
305:
306: /* Added this validation to fix bug#2135545 */
307: if l_asg_set_id is not null then
308: fetch c_all_asg_in_asgset into l_asg_id,
320: ln_arch_pact_id;
321: exit when c_all_asg%notfound;
322: end if;
323:
324: hr_utility.trace('Begining of if part loop for c_all_asg 10 '||
325: to_char(l_asg_id));
326:
327: select pay_assignment_actions_s.nextval
328: into lockingactid
333: pactid,
334: chunk,
335: l_tax_unit_id);
336:
337: hr_utility.trace('in if loop after calling hr_nonrun_asact.insact pkg 11 '||to_char(l_asg_id));
338:
339: /* Added this to implement T4A Register and T4A Amendment Register
340: using the same report file */
341:
341:
342: lv_serial_number := lpad(to_char(ln_arch_asgact_id),14,0)||
343: lpad(to_char(ln_arch_pact_id),14,0);
344:
345: hr_utility.trace('lv_serial_number :' ||lv_serial_number);
346:
347: update pay_assignment_actions paa
348: set paa.serial_number = lv_serial_number
349: where paa.assignment_action_id = lockingactid;
358: else
359: close c_all_asg;
360: end if;
361:
362: hr_utility.trace('End of cursor c_all_asg 12');
363:
364: else
365:
366: hr_utility.trace('All the GREs will be processed !!!');
362: hr_utility.trace('End of cursor c_all_asg 12');
363:
364: else
365:
366: hr_utility.trace('All the GREs will be processed !!!');
367:
368: open c_all_gres;
369: loop
370:
375: l_session_date;
376:
377: exit when c_all_gres%notfound;
378:
379: hr_utility.trace('l_tax_unit_id = ' || to_char(l_tax_unit_id));
380: hr_utility.trace('l_arch_pactid = ' || to_char(l_arch_pactid));
381:
382: if l_asg_set_id is not null then
383: open c_all_asg_in_asgset(l_arch_pactid);
376:
377: exit when c_all_gres%notfound;
378:
379: hr_utility.trace('l_tax_unit_id = ' || to_char(l_tax_unit_id));
380: hr_utility.trace('l_arch_pactid = ' || to_char(l_arch_pactid));
381:
382: if l_asg_set_id is not null then
383: open c_all_asg_in_asgset(l_arch_pactid);
384: elsif lv_per_id is not null then
400: ln_arch_asgact_id,
401: ln_arch_pact_id;
402: exit when c_single_asg%notfound;
403: else
404: hr_utility.trace(' Fetching c_all_asg !!!');
405: fetch c_all_asg into l_asg_id,
406: ln_arch_asgact_id,
407: ln_arch_pact_id;
408: exit when c_all_asg%notfound;
417: pactid,
418: chunk,
419: l_tax_unit_id);
420:
421: hr_utility.trace('in if loop after calling hr_nonrun_asact.insact pkg 9 '||
422: to_char(l_asg_id));
423:
424: /* Added this to implement T4A Register and T4A Amendment Register
425: using the same report file */
426:
427: lv_serial_number := lpad(to_char(ln_arch_asgact_id),14,0)||
428: lpad(to_char(ln_arch_pact_id),14,0);
429:
430: hr_utility.trace('lv_serial_number :' ||lv_serial_number);
431:
432: update pay_assignment_actions paa
433: set paa.serial_number = lv_serial_number
434: where paa.assignment_action_id = lockingactid;
449: close c_all_gres;
450:
451: end if;
452:
453: hr_utility.trace('End of If Condition for Loop 13');
454: end action_creation;
455:
456: ---------------------------------- sort_action ---------------------------------
457:
461: sqlstr in out nocopy varchar2, /* string holding the sql statement */
462: len out nocopy number /* length of the sql string */
463: ) is
464: begin
465: hr_utility.trace('Start of Sort_Action 1');
466:
467:
468: sqlstr := 'select paa1.rowid
469: from hr_all_organization_units hou,
514: ppf.last_name,first_name
515: for update of paa1.assignment_action_id';
516:
517: len := length(sqlstr); -- return the length of the string.
518: hr_utility.trace('End of Sort_Action 2');
519: end sort_action;
520: --
521: ------------------------------ get_parameter -------------------------------
522: function get_parameter(name in varchar2,