51:
52: begin
53:
54: l_proc := gv_package_name||'range_cursor';
55: hr_utility.set_location(l_proc, 10);
56:
57: hr_utility.trace('PACTID = '||to_char(pactid));
58: select ppa.legislative_parameters
59: into lv_legislative_param
53:
54: l_proc := gv_package_name||'range_cursor';
55: hr_utility.set_location(l_proc, 10);
56:
57: hr_utility.trace('PACTID = '||to_char(pactid));
58: select ppa.legislative_parameters
59: into lv_legislative_param
60: from pay_payroll_actions ppa
61: where payroll_action_id = pactid;
74: and PAA.tax_unit_id=hoi.organization_id
75: )';
76:
77: end if;
78: hr_utility.set_location(l_proc, 20);
79: hr_utility.trace(sqlstr);
80:
81: exception when others then
82: hr_utility.set_location(l_proc, 30);
75: )';
76:
77: end if;
78: hr_utility.set_location(l_proc, 20);
79: hr_utility.trace(sqlstr);
80:
81: exception when others then
82: hr_utility.set_location(l_proc, 30);
83: end range_cursor;
78: hr_utility.set_location(l_proc, 20);
79: hr_utility.trace(sqlstr);
80:
81: exception when others then
82: hr_utility.set_location(l_proc, 30);
83: end range_cursor;
84: ---------------------------------- action_creation -----------------------------------
85: PROCEDURE action_creation(pactid IN NUMBER,
86: stperson IN NUMBER,
96: l_pre_organization_id VARCHAR2(50);
97:
98: BEGIN
99: l_proc := gv_package_name||'action_creation';
100: hr_utility.set_location(l_proc, 10);
101: hr_utility.trace('PACTID = '||to_char(pactid));
102: SELECT effective_date,
103: pay_core_utils.get_parameter('TRANSFER_GRE',legislative_parameters),
104: pay_core_utils.get_parameter('TRANSFER_PRE',legislative_parameters),
97:
98: BEGIN
99: l_proc := gv_package_name||'action_creation';
100: hr_utility.set_location(l_proc, 10);
101: hr_utility.trace('PACTID = '||to_char(pactid));
102: SELECT effective_date,
103: pay_core_utils.get_parameter('TRANSFER_GRE',legislative_parameters),
104: pay_core_utils.get_parameter('TRANSFER_PRE',legislative_parameters),
105: pay_core_utils.get_parameter('REPORT_TYPE',legislative_parameters)
110: FROM pay_payroll_actions
111: WHERE payroll_action_id = pactid;
112:
113: ld_year_end := add_months(trunc(ld_effective_date, 'Y'),12) -1;
114: hr_utility.trace('year end '|| to_char(ld_year_end,'dd-mm-yyyy'));
115:
116: if (ln_tax_unit_id is not null) then
117: sqlstr := 'AND PAA.tax_unit_id = '||to_number(ln_tax_unit_id);
118: elsif (l_pre_organization_id is not null) then
149: and paaf.location_id = hl.location_id
150: and hl.region_1= ''QC'') ';
151: end if;
152:
153: hr_utility.set_location(l_proc, 20);
154: hr_utility.trace(sqlstr);
155:
156: EXCEPTION WHEN OTHERS THEN
157: hr_utility.set_location(l_proc, 30);
150: and hl.region_1= ''QC'') ';
151: end if;
152:
153: hr_utility.set_location(l_proc, 20);
154: hr_utility.trace(sqlstr);
155:
156: EXCEPTION WHEN OTHERS THEN
157: hr_utility.set_location(l_proc, 30);
158: END action_creation;
153: hr_utility.set_location(l_proc, 20);
154: hr_utility.trace(sqlstr);
155:
156: EXCEPTION WHEN OTHERS THEN
157: hr_utility.set_location(l_proc, 30);
158: END action_creation;
159:
160: PROCEDURE archive_code (pactid IN NUMBER,
161: sqlstr OUT NOCOPY VARCHAR2) IS
166: l_proc VARCHAR2(240);
167:
168: BEGIN
169: l_proc := gv_package_name||'archive_code';
170: hr_utility.set_location(l_proc, 10);
171:
172: hr_utility.trace('PACTID = '||to_char(pactid));
173: select ppa.legislative_parameters
174: into lv_legislative_param
168: BEGIN
169: l_proc := gv_package_name||'archive_code';
170: hr_utility.set_location(l_proc, 10);
171:
172: hr_utility.trace('PACTID = '||to_char(pactid));
173: select ppa.legislative_parameters
174: into lv_legislative_param
175: from pay_payroll_actions ppa
176: where payroll_action_id = pactid;
187: and hoi.org_information5 in (''T4/RL1'',''T4A/RL1'',''T4A/RL2'')
188: and PAA.tax_unit_id=hoi.organization_id
189: )';
190: end if;
191: hr_utility.set_location(l_proc, 20);
192: hr_utility.trace(sqlstr);
193:
194: EXCEPTION WHEN OTHERS THEN
195: hr_utility.set_location(l_proc, 30);
188: and PAA.tax_unit_id=hoi.organization_id
189: )';
190: end if;
191: hr_utility.set_location(l_proc, 20);
192: hr_utility.trace(sqlstr);
193:
194: EXCEPTION WHEN OTHERS THEN
195: hr_utility.set_location(l_proc, 30);
196: END archive_code;
191: hr_utility.set_location(l_proc, 20);
192: hr_utility.trace(sqlstr);
193:
194: EXCEPTION WHEN OTHERS THEN
195: hr_utility.set_location(l_proc, 30);
196: END archive_code;
197:
198: --begin
199: --hr_utility.trace_on(null,'YREND_YEMA');
195: hr_utility.set_location(l_proc, 30);
196: END archive_code;
197:
198: --begin
199: --hr_utility.trace_on(null,'YREND_YEMA');
200:
201: END PAY_CA_ARCHIVE_RULES;