DBA Data[Home] [Help]

APPS.PAY_CA_RL2_CAN_MAG dependencies on PAY_CA_RL2_CAN_MAG

Line 1: PACKAGE BODY PAY_CA_RL2_CAN_MAG AS

1: PACKAGE BODY PAY_CA_RL2_CAN_MAG AS
2: /* $Header: pycarl2cmg.pkb 120.11.12020000.7 2012/12/18 09:21:06 sgotlasw ship $ */
3:
4: -- Name : get_report_parameters
5:

Line 34: hr_utility.set_location('pay_ca_rl2_can_mag.get_report_parameters', 10);

30: p_legislative_param IN OUT NOCOPY VARCHAR2
31: ) IS
32: BEGIN
33: --hr_utility.trace_on('Y','RL2MAG');
34: hr_utility.set_location('pay_ca_rl2_can_mag.get_report_parameters', 10);
35:
36: SELECT ppa.start_date,
37: ppa.effective_date,
38: ppa.business_group_id,

Line 49: hr_utility.set_location('pay_ca_rl2_can_mag.get_report_parameters', 20);

45: p_legislative_param
46: FROM pay_payroll_actions ppa
47: WHERE payroll_action_id = p_pactid;
48:
49: hr_utility.set_location('pay_ca_rl2_can_mag.get_report_parameters', 20);
50:
51: END get_report_parameters;
52:
53: ---------------------------------------------------------------------------

Line 81: pay_ca_rl2_can_mag.get_parameter('PRE_ORGANIZATION_ID',

77: 'RL2_XML_MAG', 'RL2',
78: 'RL2_AMEND_MAG', 'CAEOY_RL2_AMEND_PP') AND
79: ppa.effective_date = p_effective_date AND
80: p_transmitter_org_id =
81: pay_ca_rl2_can_mag.get_parameter('PRE_ORGANIZATION_ID',
82: ppa.legislative_parameters);
83:
84: l_transmitter_number VARCHAR2(30);
85: l_transmitter_name VARCHAR2(100);

Line 121: l_transmitter_org_id := pay_ca_rl2_can_mag.get_parameter('TRANSMITTER_PRE',

117: FETCH cur_ppa
118: INTO l_legislative_parameters;
119: CLOSE cur_ppa;
120:
121: l_transmitter_org_id := pay_ca_rl2_can_mag.get_parameter('TRANSMITTER_PRE',
122: l_legislative_parameters);
123:
124: hr_utility.trace('l_transmitter_org_id = ' || to_char(l_transmitter_org_id));
125: hr_utility.trace('p_bg_id = ' || to_char(p_bg_id));

Line 144: l_transmitter_number := pay_ca_rl2_can_mag.get_transmitter_item( p_bg_id,

140: FETCH cur_arch_pactid
141: INTO l_arch_pactid;
142: CLOSE cur_arch_pactid;
143:
144: l_transmitter_number := pay_ca_rl2_can_mag.get_transmitter_item( p_bg_id,
145: l_arch_pactid,
146: 'CAEOY_RL2_TRANSMITTER_NUMBER');
147: l_transmitter_name := pay_ca_rl2_can_mag.get_transmitter_item( p_bg_id,
148: l_arch_pactid,

Line 147: l_transmitter_name := pay_ca_rl2_can_mag.get_transmitter_item( p_bg_id,

143:
144: l_transmitter_number := pay_ca_rl2_can_mag.get_transmitter_item( p_bg_id,
145: l_arch_pactid,
146: 'CAEOY_RL2_TRANSMITTER_NUMBER');
147: l_transmitter_name := pay_ca_rl2_can_mag.get_transmitter_item( p_bg_id,
148: l_arch_pactid,
149: 'CAEOY_RL2_TRANSMITTER_NAME');
150: BEGIN
151:

Line 175: l_type_of_package := pay_ca_rl2_can_mag.get_transmitter_item(p_bg_id,

171: pay_core_utils.push_token('PRE_NAME',l_transmitter_name);
172: hr_utility.raise_error;
173: END;
174:
175: l_type_of_package := pay_ca_rl2_can_mag.get_transmitter_item(p_bg_id,
176: l_arch_pactid,
177: 'CAEOY_RL2_TRANSMITTER_PACKAGE_TYPE');
178:
179: hr_utility.trace('l_type_of_package = ' || l_type_of_package);

Line 186: l_source_of_slips := pay_ca_rl2_can_mag.get_transmitter_item(p_bg_id,

182: pay_core_utils.push_message(800,'PAY_CA_RL1_MISSING_TYPE_OF_PKG','P');
183: hr_utility.raise_error;
184: END IF;
185:
186: l_source_of_slips := pay_ca_rl2_can_mag.get_transmitter_item(p_bg_id,
187: l_arch_pactid,
188: 'CAEOY_RL2_SOURCE_OF_SLIPS');
189: hr_utility.trace('l_source_of_slips = ' || l_source_of_slips);
190:

Line 196: l_address_line1 := pay_ca_rl2_can_mag.get_transmitter_item(p_bg_id,

192: pay_core_utils.push_message(800,'PAY_CA_RL1_MISSING_RLSLIP_SRC','P');
193: hr_utility.raise_error;
194: END IF;
195:
196: l_address_line1 := pay_ca_rl2_can_mag.get_transmitter_item(p_bg_id,
197: l_arch_pactid,
198: 'CAEOY_RL2_TRANSMITTER_ADDRESS_LINE1');
199: hr_utility.trace('l_address_line1 = ' || l_address_line1);
200:

Line 235: hr_utility.set_location( 'pay_ca_rl2_can_mag.range_cursor', 10);

231: p_legislative_param pay_payroll_actions.legislative_parameters%type;
232:
233: BEGIN
234:
235: hr_utility.set_location( 'pay_ca_rl2_can_mag.range_cursor', 10);
236:
237: get_report_parameters(
238: p_pactid,
239: p_year_start,

Line 246: hr_utility.set_location( 'pay_ca_rl2_can_mag.range_cursor', 20);

242: p_business_group_id,
243: p_legislative_param
244: );
245:
246: hr_utility.set_location( 'pay_ca_rl2_can_mag.range_cursor', 20);
247:
248: p_sqlstr := 'select distinct paaf.person_id
249: from per_all_assignments_f paaf,
250: pay_payroll_actions ppa,

Line 257: to_number(pay_ca_rl2_can_mag.get_parameter(''PAY_ACT'', ppa1.legislative_parameters))

253: where ppa.payroll_action_id = paa.payroll_action_id
254: and paa.assignment_id = paaf.assignment_id
255: and ppa1.payroll_action_id = :payroll_action_id
256: and ppa.payroll_action_id =
257: to_number(pay_ca_rl2_can_mag.get_parameter(''PAY_ACT'', ppa1.legislative_parameters))
258: and paaf.person_id =
259: nvl(pay_ca_rl2_can_mag.get_parameter(''PER_ID'',ppa1.legislative_parameters),paaf.person_id)
260: order by paaf.person_id';
261: -- order by paaf.person_id clause added for bug 9211063

Line 259: nvl(pay_ca_rl2_can_mag.get_parameter(''PER_ID'',ppa1.legislative_parameters),paaf.person_id)

255: and ppa1.payroll_action_id = :payroll_action_id
256: and ppa.payroll_action_id =
257: to_number(pay_ca_rl2_can_mag.get_parameter(''PAY_ACT'', ppa1.legislative_parameters))
258: and paaf.person_id =
259: nvl(pay_ca_rl2_can_mag.get_parameter(''PER_ID'',ppa1.legislative_parameters),paaf.person_id)
260: order by paaf.person_id';
261: -- order by paaf.person_id clause added for bug 9211063
262:
263: hr_utility.set_location( 'pay_ca_rl2_can_mag.range_cursor',30);

Line 263: hr_utility.set_location( 'pay_ca_rl2_can_mag.range_cursor',30);

259: nvl(pay_ca_rl2_can_mag.get_parameter(''PER_ID'',ppa1.legislative_parameters),paaf.person_id)
260: order by paaf.person_id';
261: -- order by paaf.person_id clause added for bug 9211063
262:
263: hr_utility.set_location( 'pay_ca_rl2_can_mag.range_cursor',30);
264:
265: END range_cursor;
266:
267: -------------------------------------------------------------------------------

Line 315: to_number(pay_ca_rl2_can_mag.get_parameter('PAY_ACT', ppa1.legislative_parameters))

311: and paa.assignment_id = paaf.assignment_id
312: and ppa1.payroll_action_id = p_pactid
313: and paaf.person_id between p_stperson and p_endperson
314: and ppa.payroll_action_id =
315: to_number(pay_ca_rl2_can_mag.get_parameter('PAY_ACT', ppa1.legislative_parameters))
316: and ppa2.report_type in ('RL2','CAEOY_RL2_AMEND_PP')
317: and int.locking_action_id = paa.assignment_action_id
318: and paa1.assignment_action_id = int.locked_action_id
319: and ppa2.payroll_action_id = paa1.payroll_action_id

Line 326: to_number(pay_ca_rl2_can_mag.get_parameter('PAY_ACT', ppa1.legislative_parameters))

322: not in (select paa2.assignment_action_id
323: from pay_action_interlocks pai, pay_assignment_actions paa2
324: where paa2.assignment_action_id = pai.locked_action_id
325: and paa2.payroll_action_id =
326: to_number(pay_ca_rl2_can_mag.get_parameter('PAY_ACT', ppa1.legislative_parameters))
327: )
328: -- and paaf.effective_start_date condition added for bug 9142143
329: and paaf.effective_start_date = (select max(paaf2.effective_start_date)
330: from per_all_assignments_f paaf2

Line 355: to_number(pay_ca_rl2_can_mag.get_parameter('PAY_ACT', ppa1.legislative_parameters))

351: and paa.assignment_id = paaf.assignment_id
352: and ppa1.payroll_action_id = p_pactid
353: and paaf.person_id between p_stperson and p_endperson
354: and ppa.payroll_action_id =
355: to_number(pay_ca_rl2_can_mag.get_parameter('PAY_ACT', ppa1.legislative_parameters))
356: and ppa2.report_type in ('RL2','CAEOY_RL2_AMEND_PP')
357: and int.locking_action_id = paa.assignment_action_id
358: and paa1.assignment_action_id = int.locked_action_id
359: and ppa2.payroll_action_id = paa1.payroll_action_id

Line 373: to_number(pay_ca_rl2_can_mag.get_parameter('PAY_ACT', ppa1.legislative_parameters))

369: not in (select paa2.assignment_action_id
370: from pay_action_interlocks pai, pay_assignment_actions paa2
371: where paa2.assignment_action_id = pai.locked_action_id
372: and paa2.payroll_action_id =
373: to_number(pay_ca_rl2_can_mag.get_parameter('PAY_ACT', ppa1.legislative_parameters))
374: )
375: -- and paaf.effective_start_date condition added for bug 9142143
376: and paaf.effective_start_date = (select max(paaf2.effective_start_date)
377: from per_all_assignments_f paaf2

Line 408: hr_utility.set_location( 'pay_ca_rl2_can_mag.create_assignment_act',10);

404:
405: -- hr_utility.trace_on(NULL,'RL2MAG');
406: -- Get the report parameters. These define the report being run.
407: l_prev_payact := -1;
408: hr_utility.set_location( 'pay_ca_rl2_can_mag.create_assignment_act',10);
409:
410: get_report_parameters(
411: p_pactid,
412: l_year_start,

Line 423: hr_utility.set_location( 'pay_ca_rl2_can_mag.create_assignment_act',20);

419: validate_transmitter_info(p_pactid,
420: l_business_group_id,
421: l_year_end);
422:
423: hr_utility.set_location( 'pay_ca_rl2_can_mag.create_assignment_act',20);
424: hr_utility.trace('Report type '||l_report_type);
425:
426: l_asg_set_id := to_number(pay_ca_rl2_can_mag.get_parameter('ASG_SET_ID',l_legislative_param));
427: hr_utility.trace('Assignment Set Id : '|| to_char(l_asg_set_id));

Line 426: l_asg_set_id := to_number(pay_ca_rl2_can_mag.get_parameter('ASG_SET_ID',l_legislative_param));

422:
423: hr_utility.set_location( 'pay_ca_rl2_can_mag.create_assignment_act',20);
424: hr_utility.trace('Report type '||l_report_type);
425:
426: l_asg_set_id := to_number(pay_ca_rl2_can_mag.get_parameter('ASG_SET_ID',l_legislative_param));
427: hr_utility.trace('Assignment Set Id : '|| to_char(l_asg_set_id));
428:
429: IF l_asg_set_id IS NOT NULL THEN
430: OPEN c_all_asg_in_asgset;

Line 444: hr_utility.set_location('pay_ca_rl2_can_mag.create_assignement_act', 25);

440: l_effective_end_date,
441: l_assignment_action_id,
442: l_payroll_act;
443:
444: hr_utility.set_location('pay_ca_rl2_can_mag.create_assignement_act', 25);
445:
446: EXIT WHEN c_all_asg_in_asgset%NOTFOUND;
447: ELSE
448: FETCH c_all_asg INTO l_person_id,

Line 455: hr_utility.set_location('pay_ca_rl2_can_mag.create_assignement_act', 30);

451: l_effective_end_date,
452: l_assignment_action_id,
453: l_payroll_act;
454:
455: hr_utility.set_location('pay_ca_rl2_can_mag.create_assignement_act', 30);
456:
457: EXIT WHEN c_all_asg%NOTFOUND;
458: END IF;
459:

Line 468: l_emplyer_name := pay_ca_rl2_can_mag.get_employer_item(l_business_group_id,

464:
465: hr_utility.trace('The payroll action id '||l_payroll_act);
466:
467: l_prev_payact := l_payroll_act;
468: l_emplyer_name := pay_ca_rl2_can_mag.get_employer_item(l_business_group_id,
469: l_payroll_act,
470: 'CAEOY_RL2_EMPLOYER_NAME');
471:
472: l_quebec_no := pay_ca_rl2_can_mag.get_employer_item(l_business_group_id,

Line 472: l_quebec_no := pay_ca_rl2_can_mag.get_employer_item(l_business_group_id,

468: l_emplyer_name := pay_ca_rl2_can_mag.get_employer_item(l_business_group_id,
469: l_payroll_act,
470: 'CAEOY_RL2_EMPLOYER_NAME');
471:
472: l_quebec_no := pay_ca_rl2_can_mag.get_employer_item(l_business_group_id,
473: l_payroll_act,
474: 'CAEOY_RL2_QUEBEC_BN');
475: hr_utility.trace('The Quebec Number is '||l_quebec_no);
476: l_file_no := substr(l_quebec_no,13,4);

Line 492: l_addr_line := pay_ca_rl2_can_mag.get_employer_item(l_business_group_id,

488:
489: /* Erroring out the RL2 Electronic Interface if any of the
490: mandatory information is missing i.e Address Line 1 */
491:
492: l_addr_line := pay_ca_rl2_can_mag.get_employer_item(l_business_group_id,
493: l_payroll_act,
494: 'CAEOY_RL2_EMPLOYER_ADDRESS_LINE1');
495: if l_addr_line = ' '
496: then

Line 511: hr_utility.set_location('pay_ca_rl2_can_mag.create_assignment_act', 40);

507: hr_utility.trace('Person Id : '|| to_char(l_person_id));
508: hr_utility.trace('tax unit id : '|| to_char(l_tax_unit_id));
509: hr_utility.trace('Effective End Date : '|| to_char(l_effective_end_date));
510:
511: hr_utility.set_location('pay_ca_rl2_can_mag.create_assignment_act', 40);
512:
513: SELECT pay_assignment_actions_s.nextval
514: INTO lockingactid
515: FROM dual;

Line 517: hr_utility.set_location('pay_ca_rl2_can_mag.create_assignment_act', 50);

513: SELECT pay_assignment_actions_s.nextval
514: INTO lockingactid
515: FROM dual;
516:
517: hr_utility.set_location('pay_ca_rl2_can_mag.create_assignment_act', 50);
518: hr_nonrun_asact.insact(lockingactid,
519: l_assignment_id,
520: p_pactid,
521: p_chunk,

Line 524: hr_utility.set_location('pay_ca_rl2_can_mag.create_assignment_act', 60);

520: p_pactid,
521: p_chunk,
522: l_tax_unit_id);
523:
524: hr_utility.set_location('pay_ca_rl2_can_mag.create_assignment_act', 60);
525:
526: hr_nonrun_asact.insint(lockingactid, l_assignment_action_id);
527:
528: hr_utility.set_location('pay_ca_rl2_can_mag.create_assignment_act', 70);

Line 528: hr_utility.set_location('pay_ca_rl2_can_mag.create_assignment_act', 70);

524: hr_utility.set_location('pay_ca_rl2_can_mag.create_assignment_act', 60);
525:
526: hr_nonrun_asact.insint(lockingactid, l_assignment_action_id);
527:
528: hr_utility.set_location('pay_ca_rl2_can_mag.create_assignment_act', 70);
529: hr_utility.trace('Interlock Created - ');
530: hr_utility.trace('Locking Action : '|| to_char(lockingactid));
531: hr_utility.trace('Locked Action : '|| to_char(l_assignment_action_id));
532: END LOOP;

Line 1378: pay_ca_rl2_can_mag.get_parameter('PRE_ORGANIZATION_ID',ppa_arch.legislative_parameters)

1374: SELECT
1375: pai_arch.locked_action_id,
1376: paa_mag.assignment_id,
1377: pay_magtape_generic.date_earned(ppa.effective_date,paf.assignment_id),
1378: pay_ca_rl2_can_mag.get_parameter('PRE_ORGANIZATION_ID',ppa_arch.legislative_parameters)
1379: FROM
1380: per_all_people_f ppf,
1381: per_all_assignments_f paf,
1382: pay_action_interlocks pai_mag,

Line 2767: l_quebec_bn := pay_ca_rl2_can_mag.get_employer_item(l_business_grpid,

2763: tab_employer(lNbReleves) := '' || 'Running Total' || '' || EOL;
2764:
2765: hr_utility.trace('The Payroll Action Id : '||l_payroll_actid);
2766: hr_utility.trace('The business group id : '||l_business_grpid);
2767: l_quebec_bn := pay_ca_rl2_can_mag.get_employer_item(l_business_grpid,
2768: l_payroll_actid,
2769: 'CAEOY_RL2_QUEBEC_BN');
2770: hr_utility.trace('The Quebec Number is '||l_quebec_bn);
2771: tab_employer(lNold) := '' || convert_special_char(substr(l_quebec_bn,1,10)) ||

Line 2779: l_employer_name := pay_ca_rl2_can_mag.get_employer_item(l_business_grpid,

2775:
2776: tab_employer(lNoDossier) := '' || convert_special_char(substr(l_quebec_bn,13,4)) ||
2777: '
' || EOL;
2778: hr_utility.trace('The Employer File Number : '|| substr(l_quebec_bn,13,4));
2779: l_employer_name := pay_ca_rl2_can_mag.get_employer_item(l_business_grpid,
2780: l_payroll_actid,
2781: 'CAEOY_RL2_EMPLOYER_NAME');
2782:
2783: tab_employer(lNom1) := '' ||

Line 2789: l_address_line := pay_ca_rl2_can_mag.get_employer_item(l_business_grpid,

2785: hr_utility.trace('tab_employer(lNom) = ' || tab_employer(lNom1));
2786:
2787: -- Address Line 1
2788:
2789: l_address_line := pay_ca_rl2_can_mag.get_employer_item(l_business_grpid,
2790: l_payroll_actid,
2791: 'CAEOY_RL2_EMPLOYER_ADDRESS_LINE1');
2792:
2793: IF (l_address_line IS NULL AND

Line 2814: l_address_line := pay_ca_rl2_can_mag.get_employer_item(l_business_grpid,

2810: hr_utility.trace('tab_employer(lLigne1) = ' || tab_employer(lLigne1));
2811:
2812:
2813: -- Address Line 2
2814: l_address_line := pay_ca_rl2_can_mag.get_employer_item(l_business_grpid,
2815: l_payroll_actid,
2816: 'CAEOY_RL2_EMPLOYER_ADDRESS_LINE2');
2817:
2818: IF (l_address_line IS NOT NULL AND

Line 2828: l_address_line := pay_ca_rl2_can_mag.get_employer_item(l_business_grpid,

2824: END IF;
2825: hr_utility.trace('tab_employer(lLigne2) = ' || tab_employer(lLigne2));
2826:
2827: -- Ville (City)
2828: l_address_line := pay_ca_rl2_can_mag.get_employer_item(l_business_grpid,
2829: l_payroll_actid,
2830: 'CAEOY_RL2_EMPLOYER_CITY');
2831: IF ( l_address_line IS NOT NULL AND
2832: l_address_line <> ' ') THEN

Line 2841: l_address_line := pay_ca_rl2_can_mag.get_employer_item(l_business_grpid,

2837: END IF;
2838: hr_utility.trace('tab_employer(lVille) = ' || tab_employer(lVille));
2839:
2840: -- Province
2841: l_address_line := pay_ca_rl2_can_mag.get_employer_item(l_business_grpid,
2842: l_payroll_actid,
2843: 'CAEOY_RL2_EMPLOYER_PROVINCE');
2844:
2845: IF ( l_address_line IS NOT NULL AND

Line 2856: l_address_line := pay_ca_rl2_can_mag.get_employer_item(l_business_grpid,

2852: END IF;
2853: hr_utility.trace('tab_employer(lProvince) = ' || tab_employer(lProvince));
2854:
2855: -- Postal Code
2856: l_address_line := pay_ca_rl2_can_mag.get_employer_item(l_business_grpid,
2857: l_payroll_actid,
2858: 'CAEOY_RL2_EMPLOYER_POSTAL_CODE');
2859:
2860: IF ( l_address_line IS NOT NULL AND

Line 3068: END pay_ca_rl2_can_mag;

3064:
3065: RETURN l_output;
3066: END;
3067:
3068: END pay_ca_rl2_can_mag;