25: cursor get_emp_extra_info is
26: select PERSON_EXTRA_INFO_ID,object_version_number,pei_information1 from per_people_extra_info where PERSON_ID = f_person_id
27: and pei_information_category = 'RTI_NINO';
28: begin
29: fnd_file.put_line(fnd_file.LOG,'Entering ' ||l_package_name || '.update_extra_information');
30: open get_emp_extra_info;
31: fetch get_emp_extra_info into l_extra_info_id, l_object_version_number, l_nino_verified_flag;
32: close get_emp_extra_info;
33: fnd_file.put_line(fnd_file.LOG,'f_person_id: ' ||to_char(f_person_id) ||
29: fnd_file.put_line(fnd_file.LOG,'Entering ' ||l_package_name || '.update_extra_information');
30: open get_emp_extra_info;
31: fetch get_emp_extra_info into l_extra_info_id, l_object_version_number, l_nino_verified_flag;
32: close get_emp_extra_info;
33: fnd_file.put_line(fnd_file.LOG,'f_person_id: ' ||to_char(f_person_id) ||
34: fnd_global.local_chr(10) || 'f_nino_verifed varchar2' || f_nino_verifed
35: ||fnd_global.local_chr(10) || to_char(f_date_of_issue)
36: ||fnd_global.local_chr(10) || 'l_extra_info_id: ' || to_char(l_extra_info_id)
37: ||fnd_global.local_chr(10) || 'l_object_version_number: ' || to_char(l_object_version_number));
63: p_object_version_number => l_object_version_number,
64: p_person_extra_info_id => l_extra_info_id
65: );
66: end if;
67: fnd_file.put_line(fnd_file.LOG,'Leaving ' ||l_package_name || '.update_extra_information');
68: return 1;
69: exception
70: when OTHERS then
71: fnd_file.put_line(fnd_file.LOG,DBMS_UTILITY.format_error_backtrace);
67: fnd_file.put_line(fnd_file.LOG,'Leaving ' ||l_package_name || '.update_extra_information');
68: return 1;
69: exception
70: when OTHERS then
71: fnd_file.put_line(fnd_file.LOG,DBMS_UTILITY.format_error_backtrace);
72: fnd_file.put_line(fnd_file.LOG,sqlcode ||' - ' || sqlerrm);
73: rollback;
74: raise application_error;
75:
68: return 1;
69: exception
70: when OTHERS then
71: fnd_file.put_line(fnd_file.LOG,DBMS_UTILITY.format_error_backtrace);
72: fnd_file.put_line(fnd_file.LOG,sqlcode ||' - ' || sqlerrm);
73: rollback;
74: raise application_error;
75:
76: end update_extra_information;
136: AND p_effective_date BETWEEN papf.effective_start_date
137: AND papf.effective_end_date;
138: BEGIN
139: --hr_utility.trace_on(null,'suma');
140: fnd_file.put_line(fnd_file.LOG,'Entering ' || p_package_name || '.update_rti_nino');
141: fnd_file.put_line(fnd_file.LOG,'Business Group ID = ' ||to_char(p_bg_id));
142: fnd_file.put_line(fnd_file.LOG,'PAYE Reference = ' ||p_paye_ref);
143: fnd_file.put_line(fnd_file.LOG,'Payroll ID = ' || to_char(p_payroll_id));
144: fnd_file.put_line(fnd_file.LOG,'p_effective_date = ' || p_effective_date);
137: AND papf.effective_end_date;
138: BEGIN
139: --hr_utility.trace_on(null,'suma');
140: fnd_file.put_line(fnd_file.LOG,'Entering ' || p_package_name || '.update_rti_nino');
141: fnd_file.put_line(fnd_file.LOG,'Business Group ID = ' ||to_char(p_bg_id));
142: fnd_file.put_line(fnd_file.LOG,'PAYE Reference = ' ||p_paye_ref);
143: fnd_file.put_line(fnd_file.LOG,'Payroll ID = ' || to_char(p_payroll_id));
144: fnd_file.put_line(fnd_file.LOG,'p_effective_date = ' || p_effective_date);
145:
138: BEGIN
139: --hr_utility.trace_on(null,'suma');
140: fnd_file.put_line(fnd_file.LOG,'Entering ' || p_package_name || '.update_rti_nino');
141: fnd_file.put_line(fnd_file.LOG,'Business Group ID = ' ||to_char(p_bg_id));
142: fnd_file.put_line(fnd_file.LOG,'PAYE Reference = ' ||p_paye_ref);
143: fnd_file.put_line(fnd_file.LOG,'Payroll ID = ' || to_char(p_payroll_id));
144: fnd_file.put_line(fnd_file.LOG,'p_effective_date = ' || p_effective_date);
145:
146: FOR l_emp_rec in csr_get_employees
139: --hr_utility.trace_on(null,'suma');
140: fnd_file.put_line(fnd_file.LOG,'Entering ' || p_package_name || '.update_rti_nino');
141: fnd_file.put_line(fnd_file.LOG,'Business Group ID = ' ||to_char(p_bg_id));
142: fnd_file.put_line(fnd_file.LOG,'PAYE Reference = ' ||p_paye_ref);
143: fnd_file.put_line(fnd_file.LOG,'Payroll ID = ' || to_char(p_payroll_id));
144: fnd_file.put_line(fnd_file.LOG,'p_effective_date = ' || p_effective_date);
145:
146: FOR l_emp_rec in csr_get_employees
147: LOOP
140: fnd_file.put_line(fnd_file.LOG,'Entering ' || p_package_name || '.update_rti_nino');
141: fnd_file.put_line(fnd_file.LOG,'Business Group ID = ' ||to_char(p_bg_id));
142: fnd_file.put_line(fnd_file.LOG,'PAYE Reference = ' ||p_paye_ref);
143: fnd_file.put_line(fnd_file.LOG,'Payroll ID = ' || to_char(p_payroll_id));
144: fnd_file.put_line(fnd_file.LOG,'p_effective_date = ' || p_effective_date);
145:
146: FOR l_emp_rec in csr_get_employees
147: LOOP
148:
147: LOOP
148:
149: if l_emp_rec.national_identifier is not null then
150: if update_extra_information(l_emp_rec.person_id,'Yes - Pre RTI',p_effective_date ,l_emp_rec.employee_number,l_emp_rec.paye_reference,l_emp_rec.payroll_name,l_emp_rec.national_identifier) <> -1 then
151: fnd_file.put_line(fnd_file.LOG,'NI Number Updated for Employee id ' || l_emp_rec.employee_number || ' Paye reference <' || l_emp_rec.paye_reference ||'>');
152: success := success + 1;
153: report_output_success(success) := rpad(l_emp_rec.employee_number,20,' ') || ' ' || rpad(l_emp_rec.paye_reference,20,' ') || ' ' || rpad(l_emp_rec.payroll_name,20,' ') || ' ' || rpad(l_emp_rec.national_identifier,20,' ');
154: end if;
155: else
152: success := success + 1;
153: report_output_success(success) := rpad(l_emp_rec.employee_number,20,' ') || ' ' || rpad(l_emp_rec.paye_reference,20,' ') || ' ' || rpad(l_emp_rec.payroll_name,20,' ') || ' ' || rpad(l_emp_rec.national_identifier,20,' ');
154: end if;
155: else
156: fnd_file.put_line(fnd_file.LOG,'NI Number is not present for Employee id ' || l_emp_rec.employee_number || ' Paye reference <' || l_emp_rec.paye_reference ||'>');
157: warnings := warnings + 1;
158: report_output_warnings(warnings) := rpad(l_emp_rec.employee_number,20,' ') || ' ' || rpad(l_emp_rec.paye_reference,20,' ') || ' ' || rpad(l_emp_rec.payroll_name,20,' ') ;
159: end if;
160:
160:
161: END LOOP;
162: if success + warnings + already_verified > 0 then
163: --Display the report.
164: fnd_file.put_line(fnd_file.output, 'NINO verified flag is changed to ''Yes - Pre RTI'' for following employees: ');
165: fnd_file.put_line(fnd_file.output,' ');
166: fnd_file.put_line(fnd_file.output, rpad('Employee Number',20,' ') || ' ' || rpad('Paye Reference',20,' ') || ' ' || rpad('Payroll Name',20,' ') || ' ' || rpad('National Identifier',20,' '));
167: FOR i IN 1..report_output_success.count
168: LOOP
161: END LOOP;
162: if success + warnings + already_verified > 0 then
163: --Display the report.
164: fnd_file.put_line(fnd_file.output, 'NINO verified flag is changed to ''Yes - Pre RTI'' for following employees: ');
165: fnd_file.put_line(fnd_file.output,' ');
166: fnd_file.put_line(fnd_file.output, rpad('Employee Number',20,' ') || ' ' || rpad('Paye Reference',20,' ') || ' ' || rpad('Payroll Name',20,' ') || ' ' || rpad('National Identifier',20,' '));
167: FOR i IN 1..report_output_success.count
168: LOOP
169: fnd_file.put_line(FND_FILE.OUTPUT,report_output_success(i));
162: if success + warnings + already_verified > 0 then
163: --Display the report.
164: fnd_file.put_line(fnd_file.output, 'NINO verified flag is changed to ''Yes - Pre RTI'' for following employees: ');
165: fnd_file.put_line(fnd_file.output,' ');
166: fnd_file.put_line(fnd_file.output, rpad('Employee Number',20,' ') || ' ' || rpad('Paye Reference',20,' ') || ' ' || rpad('Payroll Name',20,' ') || ' ' || rpad('National Identifier',20,' '));
167: FOR i IN 1..report_output_success.count
168: LOOP
169: fnd_file.put_line(FND_FILE.OUTPUT,report_output_success(i));
170: END LOOP;
165: fnd_file.put_line(fnd_file.output,' ');
166: fnd_file.put_line(fnd_file.output, rpad('Employee Number',20,' ') || ' ' || rpad('Paye Reference',20,' ') || ' ' || rpad('Payroll Name',20,' ') || ' ' || rpad('National Identifier',20,' '));
167: FOR i IN 1..report_output_success.count
168: LOOP
169: fnd_file.put_line(FND_FILE.OUTPUT,report_output_success(i));
170: END LOOP;
171:
172: fnd_file.put_line(fnd_file.output,' ');
173: fnd_file.put_line(fnd_file.output,'No Of employees updated with NINO Flag: ' || to_char(success));
168: LOOP
169: fnd_file.put_line(FND_FILE.OUTPUT,report_output_success(i));
170: END LOOP;
171:
172: fnd_file.put_line(fnd_file.output,' ');
173: fnd_file.put_line(fnd_file.output,'No Of employees updated with NINO Flag: ' || to_char(success));
174: fnd_file.put_line(fnd_file.output,' ');
175: fnd_file.put_line(fnd_file.output, 'NINO verified flag is not updated for the following employees as no NI Number exists for them: ');
176: fnd_file.put_line(fnd_file.output,' ');
169: fnd_file.put_line(FND_FILE.OUTPUT,report_output_success(i));
170: END LOOP;
171:
172: fnd_file.put_line(fnd_file.output,' ');
173: fnd_file.put_line(fnd_file.output,'No Of employees updated with NINO Flag: ' || to_char(success));
174: fnd_file.put_line(fnd_file.output,' ');
175: fnd_file.put_line(fnd_file.output, 'NINO verified flag is not updated for the following employees as no NI Number exists for them: ');
176: fnd_file.put_line(fnd_file.output,' ');
177: fnd_file.put_line(fnd_file.output, rpad('Employee Number',20,' ') || ' ' || rpad('Paye Reference',20,' ') || ' ' || rpad('Payroll Name',20,' '));
170: END LOOP;
171:
172: fnd_file.put_line(fnd_file.output,' ');
173: fnd_file.put_line(fnd_file.output,'No Of employees updated with NINO Flag: ' || to_char(success));
174: fnd_file.put_line(fnd_file.output,' ');
175: fnd_file.put_line(fnd_file.output, 'NINO verified flag is not updated for the following employees as no NI Number exists for them: ');
176: fnd_file.put_line(fnd_file.output,' ');
177: fnd_file.put_line(fnd_file.output, rpad('Employee Number',20,' ') || ' ' || rpad('Paye Reference',20,' ') || ' ' || rpad('Payroll Name',20,' '));
178: FOR i IN 1..report_output_warnings.count
171:
172: fnd_file.put_line(fnd_file.output,' ');
173: fnd_file.put_line(fnd_file.output,'No Of employees updated with NINO Flag: ' || to_char(success));
174: fnd_file.put_line(fnd_file.output,' ');
175: fnd_file.put_line(fnd_file.output, 'NINO verified flag is not updated for the following employees as no NI Number exists for them: ');
176: fnd_file.put_line(fnd_file.output,' ');
177: fnd_file.put_line(fnd_file.output, rpad('Employee Number',20,' ') || ' ' || rpad('Paye Reference',20,' ') || ' ' || rpad('Payroll Name',20,' '));
178: FOR i IN 1..report_output_warnings.count
179: LOOP
172: fnd_file.put_line(fnd_file.output,' ');
173: fnd_file.put_line(fnd_file.output,'No Of employees updated with NINO Flag: ' || to_char(success));
174: fnd_file.put_line(fnd_file.output,' ');
175: fnd_file.put_line(fnd_file.output, 'NINO verified flag is not updated for the following employees as no NI Number exists for them: ');
176: fnd_file.put_line(fnd_file.output,' ');
177: fnd_file.put_line(fnd_file.output, rpad('Employee Number',20,' ') || ' ' || rpad('Paye Reference',20,' ') || ' ' || rpad('Payroll Name',20,' '));
178: FOR i IN 1..report_output_warnings.count
179: LOOP
180: fnd_file.put_line(FND_FILE.OUTPUT,report_output_warnings(i));
173: fnd_file.put_line(fnd_file.output,'No Of employees updated with NINO Flag: ' || to_char(success));
174: fnd_file.put_line(fnd_file.output,' ');
175: fnd_file.put_line(fnd_file.output, 'NINO verified flag is not updated for the following employees as no NI Number exists for them: ');
176: fnd_file.put_line(fnd_file.output,' ');
177: fnd_file.put_line(fnd_file.output, rpad('Employee Number',20,' ') || ' ' || rpad('Paye Reference',20,' ') || ' ' || rpad('Payroll Name',20,' '));
178: FOR i IN 1..report_output_warnings.count
179: LOOP
180: fnd_file.put_line(FND_FILE.OUTPUT,report_output_warnings(i));
181: END LOOP;
176: fnd_file.put_line(fnd_file.output,' ');
177: fnd_file.put_line(fnd_file.output, rpad('Employee Number',20,' ') || ' ' || rpad('Paye Reference',20,' ') || ' ' || rpad('Payroll Name',20,' '));
178: FOR i IN 1..report_output_warnings.count
179: LOOP
180: fnd_file.put_line(FND_FILE.OUTPUT,report_output_warnings(i));
181: END LOOP;
182:
183: fnd_file.put_line(fnd_file.output,' ');
184: fnd_file.put_line(fnd_file.output,'No Of employees not updated: ' || to_char(warnings));
179: LOOP
180: fnd_file.put_line(FND_FILE.OUTPUT,report_output_warnings(i));
181: END LOOP;
182:
183: fnd_file.put_line(fnd_file.output,' ');
184: fnd_file.put_line(fnd_file.output,'No Of employees not updated: ' || to_char(warnings));
185: --hr_utility.trace_off;
186:
187:
180: fnd_file.put_line(FND_FILE.OUTPUT,report_output_warnings(i));
181: END LOOP;
182:
183: fnd_file.put_line(fnd_file.output,' ');
184: fnd_file.put_line(fnd_file.output,'No Of employees not updated: ' || to_char(warnings));
185: --hr_utility.trace_off;
186:
187:
188: if already_verified > 0 then
185: --hr_utility.trace_off;
186:
187:
188: if already_verified > 0 then
189: fnd_file.put_line(fnd_file.output,' ');
190: fnd_file.put_line(fnd_file.output, 'The following employees have not been updated as NINO previously verified: ');
191: fnd_file.put_line(fnd_file.output, rpad('Employee Number',20,' ') || ' ' || rpad('Paye Reference',20,' ') || ' ' || rpad('Payroll Name',20,' ') || ' ' || rpad('National Identifier',20,' '));
192: FOR i IN 1..report_output_already.count
193: LOOP
186:
187:
188: if already_verified > 0 then
189: fnd_file.put_line(fnd_file.output,' ');
190: fnd_file.put_line(fnd_file.output, 'The following employees have not been updated as NINO previously verified: ');
191: fnd_file.put_line(fnd_file.output, rpad('Employee Number',20,' ') || ' ' || rpad('Paye Reference',20,' ') || ' ' || rpad('Payroll Name',20,' ') || ' ' || rpad('National Identifier',20,' '));
192: FOR i IN 1..report_output_already.count
193: LOOP
194: fnd_file.put_line(FND_FILE.OUTPUT,report_output_already(i));
187:
188: if already_verified > 0 then
189: fnd_file.put_line(fnd_file.output,' ');
190: fnd_file.put_line(fnd_file.output, 'The following employees have not been updated as NINO previously verified: ');
191: fnd_file.put_line(fnd_file.output, rpad('Employee Number',20,' ') || ' ' || rpad('Paye Reference',20,' ') || ' ' || rpad('Payroll Name',20,' ') || ' ' || rpad('National Identifier',20,' '));
192: FOR i IN 1..report_output_already.count
193: LOOP
194: fnd_file.put_line(FND_FILE.OUTPUT,report_output_already(i));
195: END LOOP;
190: fnd_file.put_line(fnd_file.output, 'The following employees have not been updated as NINO previously verified: ');
191: fnd_file.put_line(fnd_file.output, rpad('Employee Number',20,' ') || ' ' || rpad('Paye Reference',20,' ') || ' ' || rpad('Payroll Name',20,' ') || ' ' || rpad('National Identifier',20,' '));
192: FOR i IN 1..report_output_already.count
193: LOOP
194: fnd_file.put_line(FND_FILE.OUTPUT,report_output_already(i));
195: END LOOP;
196:
197: fnd_file.put_line(fnd_file.output,' ');
198: fnd_file.put_line(fnd_file.output,'No Of employees not updated: ' || to_char(already_verified));
193: LOOP
194: fnd_file.put_line(FND_FILE.OUTPUT,report_output_already(i));
195: END LOOP;
196:
197: fnd_file.put_line(fnd_file.output,' ');
198: fnd_file.put_line(fnd_file.output,'No Of employees not updated: ' || to_char(already_verified));
199: end if;
200: fnd_file.put_line(fnd_file.output,' ');
201: fnd_file.put_line(fnd_file.output,'Total Number Of Employees: ' || to_char(success + warnings + already_verified));
194: fnd_file.put_line(FND_FILE.OUTPUT,report_output_already(i));
195: END LOOP;
196:
197: fnd_file.put_line(fnd_file.output,' ');
198: fnd_file.put_line(fnd_file.output,'No Of employees not updated: ' || to_char(already_verified));
199: end if;
200: fnd_file.put_line(fnd_file.output,' ');
201: fnd_file.put_line(fnd_file.output,'Total Number Of Employees: ' || to_char(success + warnings + already_verified));
202: else
196:
197: fnd_file.put_line(fnd_file.output,' ');
198: fnd_file.put_line(fnd_file.output,'No Of employees not updated: ' || to_char(already_verified));
199: end if;
200: fnd_file.put_line(fnd_file.output,' ');
201: fnd_file.put_line(fnd_file.output,'Total Number Of Employees: ' || to_char(success + warnings + already_verified));
202: else
203: fnd_file.put_line(fnd_file.output,lpad(rpad('No Records Processed',50,'-'),100,'-'));
204: end if;
197: fnd_file.put_line(fnd_file.output,' ');
198: fnd_file.put_line(fnd_file.output,'No Of employees not updated: ' || to_char(already_verified));
199: end if;
200: fnd_file.put_line(fnd_file.output,' ');
201: fnd_file.put_line(fnd_file.output,'Total Number Of Employees: ' || to_char(success + warnings + already_verified));
202: else
203: fnd_file.put_line(fnd_file.output,lpad(rpad('No Records Processed',50,'-'),100,'-'));
204: end if;
205:
199: end if;
200: fnd_file.put_line(fnd_file.output,' ');
201: fnd_file.put_line(fnd_file.output,'Total Number Of Employees: ' || to_char(success + warnings + already_verified));
202: else
203: fnd_file.put_line(fnd_file.output,lpad(rpad('No Records Processed',50,'-'),100,'-'));
204: end if;
205:
206: fnd_file.put_line(fnd_file.LOG,'Leaving ' || p_package_name || '.update_rti_nino');
207: commit;
202: else
203: fnd_file.put_line(fnd_file.output,lpad(rpad('No Records Processed',50,'-'),100,'-'));
204: end if;
205:
206: fnd_file.put_line(fnd_file.LOG,'Leaving ' || p_package_name || '.update_rti_nino');
207: commit;
208: EXCEPTION
209: WHEN OTHERS THEN
210: ROLLBACK;
207: commit;
208: EXCEPTION
209: WHEN OTHERS THEN
210: ROLLBACK;
211: fnd_file.put_line(FND_FILE.LOG,rpad('-',155,'-'));
212: fnd_file.put_line(FND_FILE.LOG,'Error Record :');
213: -- fnd_file.put_line(FND_FILE.LOG,report_output(report_output.LAST));
214: fnd_file.put_line(FND_FILE.LOG,rpad('-',155,'-'));
215: fnd_file.put_line(FND_FILE.LOG,SQLCODE||' - '||SQLERRM);
208: EXCEPTION
209: WHEN OTHERS THEN
210: ROLLBACK;
211: fnd_file.put_line(FND_FILE.LOG,rpad('-',155,'-'));
212: fnd_file.put_line(FND_FILE.LOG,'Error Record :');
213: -- fnd_file.put_line(FND_FILE.LOG,report_output(report_output.LAST));
214: fnd_file.put_line(FND_FILE.LOG,rpad('-',155,'-'));
215: fnd_file.put_line(FND_FILE.LOG,SQLCODE||' - '||SQLERRM);
216: fnd_file.put_line(FND_FILE.LOG,' ');
209: WHEN OTHERS THEN
210: ROLLBACK;
211: fnd_file.put_line(FND_FILE.LOG,rpad('-',155,'-'));
212: fnd_file.put_line(FND_FILE.LOG,'Error Record :');
213: -- fnd_file.put_line(FND_FILE.LOG,report_output(report_output.LAST));
214: fnd_file.put_line(FND_FILE.LOG,rpad('-',155,'-'));
215: fnd_file.put_line(FND_FILE.LOG,SQLCODE||' - '||SQLERRM);
216: fnd_file.put_line(FND_FILE.LOG,' ');
217: fnd_file.put_line(FND_FILE.LOG,DBMS_UTILITY.format_error_backtrace);
210: ROLLBACK;
211: fnd_file.put_line(FND_FILE.LOG,rpad('-',155,'-'));
212: fnd_file.put_line(FND_FILE.LOG,'Error Record :');
213: -- fnd_file.put_line(FND_FILE.LOG,report_output(report_output.LAST));
214: fnd_file.put_line(FND_FILE.LOG,rpad('-',155,'-'));
215: fnd_file.put_line(FND_FILE.LOG,SQLCODE||' - '||SQLERRM);
216: fnd_file.put_line(FND_FILE.LOG,' ');
217: fnd_file.put_line(FND_FILE.LOG,DBMS_UTILITY.format_error_backtrace);
218: RAISE_APPLICATION_ERROR(-20001, SQLCODE||' - '||SQLERRM);
211: fnd_file.put_line(FND_FILE.LOG,rpad('-',155,'-'));
212: fnd_file.put_line(FND_FILE.LOG,'Error Record :');
213: -- fnd_file.put_line(FND_FILE.LOG,report_output(report_output.LAST));
214: fnd_file.put_line(FND_FILE.LOG,rpad('-',155,'-'));
215: fnd_file.put_line(FND_FILE.LOG,SQLCODE||' - '||SQLERRM);
216: fnd_file.put_line(FND_FILE.LOG,' ');
217: fnd_file.put_line(FND_FILE.LOG,DBMS_UTILITY.format_error_backtrace);
218: RAISE_APPLICATION_ERROR(-20001, SQLCODE||' - '||SQLERRM);
219: END update_rti_nino;
212: fnd_file.put_line(FND_FILE.LOG,'Error Record :');
213: -- fnd_file.put_line(FND_FILE.LOG,report_output(report_output.LAST));
214: fnd_file.put_line(FND_FILE.LOG,rpad('-',155,'-'));
215: fnd_file.put_line(FND_FILE.LOG,SQLCODE||' - '||SQLERRM);
216: fnd_file.put_line(FND_FILE.LOG,' ');
217: fnd_file.put_line(FND_FILE.LOG,DBMS_UTILITY.format_error_backtrace);
218: RAISE_APPLICATION_ERROR(-20001, SQLCODE||' - '||SQLERRM);
219: END update_rti_nino;
220: END pay_gb_pre_rti_nino;
213: -- fnd_file.put_line(FND_FILE.LOG,report_output(report_output.LAST));
214: fnd_file.put_line(FND_FILE.LOG,rpad('-',155,'-'));
215: fnd_file.put_line(FND_FILE.LOG,SQLCODE||' - '||SQLERRM);
216: fnd_file.put_line(FND_FILE.LOG,' ');
217: fnd_file.put_line(FND_FILE.LOG,DBMS_UTILITY.format_error_backtrace);
218: RAISE_APPLICATION_ERROR(-20001, SQLCODE||' - '||SQLERRM);
219: END update_rti_nino;
220: END pay_gb_pre_rti_nino;