1: PACKAGE BODY jai_ap_tcs_processing_pkg AS
2: /* $Header: jai_ap_tcs_prc.plb 120.5 2010/10/27 07:45:50 amandali ship $ */
3: /* ----------------------------------------------------------------------------
4: FILENAME : jai_ap_tcs_prc.plb
5:
157: begin
158: /* */
159:
160: /* Get the statis fnd values for populating into the table */
161: Fnd_File.put_line(Fnd_File.LOG, '** Start of procedure jai_ap_tcs_processing_pkg.generate_tcs_certificates **');
162:
163: ln_user_id := fnd_global.user_id ;
164: ln_last_update_login := fnd_global.login_id ;
165: ln_program_id := fnd_global.conc_program_id ;
339:
340:
341: <
342: Fnd_File.put_line(Fnd_File.LOG, 'No of Certificates Generated : ' || to_char(ln_certificate_count));
343: Fnd_File.put_line(Fnd_File.LOG, '** Successful End of procedure jai_ap_tcs_processing_pkg.generate_tcs_certificates **');
344:
345: return;
346:
347: exception
346:
347: exception
348: when others then
349: retcode := 2;
350: errbuf := 'Error from jai_ap_tcs_processing_pkg.generate_tcs_certificates : ' || sqlerrm;
351: Fnd_File.put_line(Fnd_File.LOG, 'Error End of procedure jai_ap_tcs_processing_pkg.process_tds_payments : ' || sqlerrm);
352:
353: end generate_tcs_certificates;
354:
347: exception
348: when others then
349: retcode := 2;
350: errbuf := 'Error from jai_ap_tcs_processing_pkg.generate_tcs_certificates : ' || sqlerrm;
351: Fnd_File.put_line(Fnd_File.LOG, 'Error End of procedure jai_ap_tcs_processing_pkg.process_tds_payments : ' || sqlerrm);
352:
353: end generate_tcs_certificates;
354:
355: /* ****************************** generate_tcs_certificates ***************************************** */
353: end generate_tcs_certificates;
354:
355: /* ****************************** generate_tcs_certificates ***************************************** */
356:
357: END jai_ap_tcs_processing_pkg;