DBA Data[Home] [Help]

APPS.PAY_CA_RL2_MAG dependencies on PAY_CA_RL2_MAG

Line 1: PACKAGE BODY PAY_CA_RL2_MAG AS

1: PACKAGE BODY PAY_CA_RL2_MAG AS
2: /* $Header: pycarl2mg.pkb 120.55.12010000.3 2008/08/06 06:59:05 ubhat ship $ */
3:
4: -- Name : get_report_parameters
5:

Line 34: hr_utility.set_location('pay_ca_rl2_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_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_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_mag.get_report_parameters', 20);
50:
51: END get_report_parameters;
52:
53: ---------------------------------------------------------------------------

Line 81: pay_ca_rl2_mag.get_parameter('PRE_ORGANIZATION_ID',

77: ppa.report_qualifier = 'CAEOYRL2' AND
78: ppa.report_category = 'ARCHIVE' AND
79: ppa.effective_date = p_effective_date AND
80: p_transmitter_org_id =
81: pay_ca_rl2_mag.get_parameter('PRE_ORGANIZATION_ID',
82: ppa.legislative_parameters);
83:
84: l_transmitter_number VARCHAR2(30);
85: l_transmitter_name VARCHAR2(100);

Line 110: l_transmitter_org_id := pay_ca_rl2_mag.get_parameter('TRANSMITTER_PRE',

106: FETCH cur_ppa
107: INTO l_legislative_parameters;
108: CLOSE cur_ppa;
109:
110: l_transmitter_org_id := pay_ca_rl2_mag.get_parameter('TRANSMITTER_PRE',
111: l_legislative_parameters);
112:
113: hr_utility.trace('l_transmitter_org_id = ' || to_char(l_transmitter_org_id));
114: hr_utility.trace('p_bg_id = ' || to_char(p_bg_id));

Line 123: l_transmitter_number := pay_ca_rl2_mag.get_transmitter_item( p_bg_id,

119: FETCH cur_arch_pactid
120: INTO l_arch_pactid;
121: CLOSE cur_arch_pactid;
122:
123: l_transmitter_number := pay_ca_rl2_mag.get_transmitter_item( p_bg_id,
124: l_arch_pactid,
125: 'CAEOY_RL2_TRANSMITTER_NUMBER');
126: l_transmitter_name := pay_ca_rl2_mag.get_transmitter_item( p_bg_id,
127: l_arch_pactid,

Line 126: l_transmitter_name := pay_ca_rl2_mag.get_transmitter_item( p_bg_id,

122:
123: l_transmitter_number := pay_ca_rl2_mag.get_transmitter_item( p_bg_id,
124: l_arch_pactid,
125: 'CAEOY_RL2_TRANSMITTER_NUMBER');
126: l_transmitter_name := pay_ca_rl2_mag.get_transmitter_item( p_bg_id,
127: l_arch_pactid,
128: 'CAEOY_RL2_TRANSMITTER_NAME');
129: BEGIN
130:

Line 154: l_type_of_package := pay_ca_rl2_mag.get_transmitter_item(p_bg_id,

150: pay_core_utils.push_token('PRE_NAME',l_transmitter_name);
151: hr_utility.raise_error;
152: END;
153:
154: l_type_of_package := pay_ca_rl2_mag.get_transmitter_item(p_bg_id,
155: l_arch_pactid,
156: 'CAEOY_RL2_TRANSMITTER_PACKAGE_TYPE');
157:
158: hr_utility.trace('l_type_of_package = ' || l_type_of_package);

Line 165: l_source_of_slips := pay_ca_rl2_mag.get_transmitter_item(p_bg_id,

161: pay_core_utils.push_message(800,'PAY_CA_RL1_MISSING_TYPE_OF_PKG','P');
162: hr_utility.raise_error;
163: END IF;
164:
165: l_source_of_slips := pay_ca_rl2_mag.get_transmitter_item(p_bg_id,
166: l_arch_pactid,
167: 'CAEOY_RL2_SOURCE_OF_SLIPS');
168: hr_utility.trace('l_source_of_slips = ' || l_source_of_slips);
169:

Line 175: l_address_line1 := pay_ca_rl2_mag.get_transmitter_item(p_bg_id,

171: pay_core_utils.push_message(800,'PAY_CA_RL1_MISSING_RLSLIP_SRC','P');
172: hr_utility.raise_error;
173: END IF;
174:
175: l_address_line1 := pay_ca_rl2_mag.get_transmitter_item(p_bg_id,
176: l_arch_pactid,
177: 'CAEOY_RL2_TRANSMITTER_ADDRESS_LINE1');
178: hr_utility.trace('l_address_line1 = ' || l_address_line1);
179:

Line 214: hr_utility.set_location( 'pay_ca_rl2_mag.range_cursor', 10);

210: p_legislative_param pay_payroll_actions.legislative_parameters%type;
211:
212: BEGIN
213:
214: hr_utility.set_location( 'pay_ca_rl2_mag.range_cursor', 10);
215:
216: get_report_parameters(
217: p_pactid,
218: p_year_start,

Line 225: hr_utility.set_location( 'pay_ca_rl2_mag.range_cursor', 20);

221: p_business_group_id,
222: p_legislative_param
223: );
224:
225: hr_utility.set_location( 'pay_ca_rl2_mag.range_cursor', 20);
226:
227: p_sqlstr := 'select distinct to_number(emp.person_id)
228: from pay_ca_eoy_rl2_employee_info_v emp,
229: pay_ca_eoy_rl2_trans_info_v tran,

Line 241: and tran.reporting_year = pay_ca_rl2_mag.get_parameter(''REPORTING_YEAR'',ppa_mag.legislative_parameters)

237: and ppa_arch.report_type = ''RL2''
238: and ppa_arch.payroll_action_id = paa_arch.payroll_action_id
239: and tran.reporting_year = to_char(ppa_arch.effective_date,''YYYY'')
240: and tran.business_group_id = ppa_arch.business_group_id
241: and tran.reporting_year = pay_ca_rl2_mag.get_parameter(''REPORTING_YEAR'',ppa_mag.legislative_parameters)
242: and paa_arch.payroll_action_id = tran.payroll_action_id
243: and paa_arch.action_status = ''C''
244: and paa_arch.assignment_action_id = emp.assignment_action_id
245: and paa_arch.payroll_action_id = emp.payroll_action_id

Line 254: hr_utility.set_location( 'pay_ca_rl2_mag.range_cursor',30);

250: and to_char(hoi.organization_id) =
251: pycadar_pkg.get_parameter(''PRE_ORGANIZATION_ID'',ppa_arch.legislative_parameters)
252: order by to_number(emp.person_id)' ;
253:
254: hr_utility.set_location( 'pay_ca_rl2_mag.range_cursor',30);
255:
256: END range_cursor;
257:
258: -------------------------------------------------------------------------------

Line 343: hr_utility.set_location( 'pay_ca_rl2_mag.create_assignment_act',10);

339:
340: -- hr_utility.trace_on(NULL,'RL2MAG');
341: -- Get the report parameters. These define the report being run.
342: l_prev_payact := -1;
343: hr_utility.set_location( 'pay_ca_rl2_mag.create_assignment_act',10);
344:
345: get_report_parameters(
346: p_pactid,
347: l_year_start,

Line 360: hr_utility.set_location( 'pay_ca_rl2_mag.create_assignment_act',20);

356: l_year_end);
357:
358: --Open the appropriate cursor
359:
360: hr_utility.set_location( 'pay_ca_rl2_mag.create_assignment_act',20);
361: hr_utility.trace('Report type '||l_report_type);
362: IF l_report_type = 'RL2_XML_MAG' THEN
363: OPEN c_all_asg(l_legislative_param,
364: l_business_group_id,

Line 374: hr_utility.set_location('pay_ca_rl2_mag.create_assignment_act', 30);

370: l_effective_end_date,
371: l_assignment_action_id,
372: l_payroll_act;
373:
374: hr_utility.set_location('pay_ca_rl2_mag.create_assignment_act', 30);
375:
376: EXIT WHEN c_all_asg%NOTFOUND;
377:
378: --Create the assignment action for the record

Line 386: l_emplyer_name := pay_ca_rl2_mag.get_employer_item(l_business_group_id,

382:
383: hr_utility.trace('The payroll action id '||l_payroll_act);
384:
385: l_prev_payact := l_payroll_act;
386: l_emplyer_name := pay_ca_rl2_mag.get_employer_item(l_business_group_id,
387: l_payroll_act,
388: 'CAEOY_RL2_EMPLOYER_NAME');
389:
390: l_quebec_no := pay_ca_rl2_mag.get_employer_item(l_business_group_id,

Line 390: l_quebec_no := pay_ca_rl2_mag.get_employer_item(l_business_group_id,

386: l_emplyer_name := pay_ca_rl2_mag.get_employer_item(l_business_group_id,
387: l_payroll_act,
388: 'CAEOY_RL2_EMPLOYER_NAME');
389:
390: l_quebec_no := pay_ca_rl2_mag.get_employer_item(l_business_group_id,
391: l_payroll_act,
392: 'CAEOY_RL2_QUEBEC_BN');
393: hr_utility.trace('The Quebec Number is '||l_quebec_no);
394: l_file_no := substr(l_quebec_no,13,4);

Line 410: l_addr_line := pay_ca_rl2_mag.get_employer_item(l_business_group_id,

406:
407: /* Erroring out the RL2 Electronic Interface if any of the
408: mandatory information is missing i.e Address Line 1 */
409:
410: l_addr_line := pay_ca_rl2_mag.get_employer_item(l_business_group_id,
411: l_payroll_act,
412: 'CAEOY_RL2_EMPLOYER_ADDRESS_LINE1');
413: if l_addr_line = ' '
414: then

Line 428: hr_utility.set_location('pay_ca_rl2_mag.create_assignment_act', 40);

424: hr_utility.trace('Person Id : '|| to_char(l_person_id));
425: hr_utility.trace('tax unit id : '|| to_char(l_tax_unit_id));
426: hr_utility.trace('Effective End Date : '|| to_char(l_effective_end_date));
427:
428: hr_utility.set_location('pay_ca_rl2_mag.create_assignment_act', 40);
429:
430: SELECT pay_assignment_actions_s.nextval
431: INTO lockingactid
432: FROM dual;

Line 434: hr_utility.set_location('pay_ca_rl2_mag.create_assignment_act', 50);

430: SELECT pay_assignment_actions_s.nextval
431: INTO lockingactid
432: FROM dual;
433:
434: hr_utility.set_location('pay_ca_rl2_mag.create_assignment_act', 50);
435: hr_nonrun_asact.insact(lockingactid,
436: l_assignment_id,
437: p_pactid,
438: p_chunk,

Line 441: hr_utility.set_location('pay_ca_rl2_mag.create_assignment_act', 60);

437: p_pactid,
438: p_chunk,
439: l_tax_unit_id);
440:
441: hr_utility.set_location('pay_ca_rl2_mag.create_assignment_act', 60);
442:
443: hr_nonrun_asact.insint(lockingactid, l_assignment_action_id);
444:
445: hr_utility.set_location('pay_ca_rl2_mag.create_assignment_act', 70);

Line 445: hr_utility.set_location('pay_ca_rl2_mag.create_assignment_act', 70);

441: hr_utility.set_location('pay_ca_rl2_mag.create_assignment_act', 60);
442:
443: hr_nonrun_asact.insint(lockingactid, l_assignment_action_id);
444:
445: hr_utility.set_location('pay_ca_rl2_mag.create_assignment_act', 70);
446: hr_utility.trace('Interlock Created - ');
447: hr_utility.trace('Locking Action : '|| to_char(lockingactid));
448: hr_utility.trace('Locked Action : '|| to_char(l_assignment_action_id));
449:

Line 1687: := pay_ca_rl2_mag.get_parameter('TAX_YEAR',

1683: hr_utility.trace('XML Employee: l_province = ' || l_province);
1684:
1685: if l_rep_type = 'RL2PAPERPDF' then
1686: l_taxation_year
1687: := pay_ca_rl2_mag.get_parameter('TAX_YEAR',
1688: l_legislative_parameters);
1689: else
1690: l_taxation_year := pay_magtape_generic.get_parameter_value('REPORTING_YEAR');
1691: end if;

Line 3167: l_quebec_bn := pay_ca_rl2_mag.get_employer_item(l_business_grpid,

3163: tab_employer(lNbReleves) := '' || 'Running Total' || '' || EOL;
3164:
3165: hr_utility.trace('The Payroll Action Id : '||l_payroll_actid);
3166: hr_utility.trace('The business group id : '||l_business_grpid);
3167: l_quebec_bn := pay_ca_rl2_mag.get_employer_item(l_business_grpid,
3168: l_payroll_actid,
3169: 'CAEOY_RL2_QUEBEC_BN');
3170: hr_utility.trace('The Quebec Number is '||l_quebec_bn);
3171: tab_employer(lNold) := '' || convert_special_char(substr(l_quebec_bn,1,10)) ||

Line 3179: l_employer_name := pay_ca_rl2_mag.get_employer_item(l_business_grpid,

3175:
3176: tab_employer(lNoDossier) := '' || convert_special_char(substr(l_quebec_bn,13,4)) ||
3177: '
' || EOL;
3178: hr_utility.trace('The Employer File Number : '|| substr(l_quebec_bn,13,4));
3179: l_employer_name := pay_ca_rl2_mag.get_employer_item(l_business_grpid,
3180: l_payroll_actid,
3181: 'CAEOY_RL2_EMPLOYER_NAME');
3182:
3183: tab_employer(lNom1) := '' ||

Line 3189: l_address_line := pay_ca_rl2_mag.get_employer_item(l_business_grpid,

3185: hr_utility.trace('tab_employer(lNom) = ' || tab_employer(lNom1));
3186:
3187: -- Address Line 1
3188:
3189: l_address_line := pay_ca_rl2_mag.get_employer_item(l_business_grpid,
3190: l_payroll_actid,
3191: 'CAEOY_RL2_EMPLOYER_ADDRESS_LINE1');
3192:
3193: IF (l_address_line IS NULL AND

Line 3215: l_address_line := pay_ca_rl2_mag.get_employer_item(l_business_grpid,

3211:
3212:
3213: -- Address Line 2
3214:
3215: l_address_line := pay_ca_rl2_mag.get_employer_item(l_business_grpid,
3216: l_payroll_actid,
3217: 'CAEOY_RL2_EMPLOYER_ADDRESS_LINE2');
3218:
3219: IF (l_address_line IS NOT NULL AND

Line 3230: l_address_line := pay_ca_rl2_mag.get_employer_item(l_business_grpid,

3226: hr_utility.trace('tab_employer(lLigne2) = ' || tab_employer(lLigne2));
3227:
3228: -- Ville (City)
3229:
3230: l_address_line := pay_ca_rl2_mag.get_employer_item(l_business_grpid,
3231: l_payroll_actid,
3232: 'CAEOY_RL2_EMPLOYER_CITY');
3233: IF ( l_address_line IS NOT NULL AND
3234: l_address_line <> ' ') THEN

Line 3244: l_address_line := pay_ca_rl2_mag.get_employer_item(l_business_grpid,

3240: hr_utility.trace('tab_employer(lVille) = ' || tab_employer(lVille));
3241:
3242: -- Province
3243:
3244: l_address_line := pay_ca_rl2_mag.get_employer_item(l_business_grpid,
3245: l_payroll_actid,
3246: 'CAEOY_RL2_EMPLOYER_PROVINCE');
3247:
3248: IF ( l_address_line IS NOT NULL AND

Line 3260: l_address_line := pay_ca_rl2_mag.get_employer_item(l_business_grpid,

3256: hr_utility.trace('tab_employer(lProvince) = ' || tab_employer(lProvince));
3257:
3258: -- Postal Code
3259:
3260: l_address_line := pay_ca_rl2_mag.get_employer_item(l_business_grpid,
3261: l_payroll_actid,
3262: 'CAEOY_RL2_EMPLOYER_POSTAL_CODE');
3263:
3264: IF ( l_address_line IS NOT NULL AND

Line 3696: END pay_ca_rl2_mag;

3692: l_seq_number := (p_curr_seq * 10) + l_check_number;
3693: hr_utility.trace('l_seq_number ='|| l_seq_number);
3694: return l_seq_number;
3695: END;
3696: END pay_ca_rl2_mag;