Sample code:
DECLARE l_request_id NUMBER; l_option_return BOOLEAN; BEGIN fnd_global.apps_initialize (user_id => fnd_global.user_id, resp_id => fnd_global.resp_id, resp_appl_id => fnd_global.resp_appl_id ); l_option_return := fnd_request.add_layout (template_appl_name => 'SQLAP', --Application Short Name template_code => 'DATA_WORKTAB_REPORT', --Template Code template_language => 'En', template_territory => '00', output_format => 'PDF' ); /* Setting Printer Options , if we want print output of the Concurrent Program on Particular Printer*/ l_option_return := fnd_request.set_print_options (printer => 'noprint', style => 'LANDSCAPE', copies => 1, save_output => TRUE, print_together => 'N' ); l_request_id := fnd_request.submit_request ( 'SQLAP' , 'DATA_WORKTAB_REPORT' , 'EDI830 Worktab table Data', null, FALSE, CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0), CHR(0)); IF l_request_id = 0 THEN FND_MESSAGE.SET_STRING('Cannot Submit Request') ; FND_MESSAGE.SHOW; ELSE FND_MESSAGE.SET_STRING('Submitting Job to Run: EDI830 Worktab table Data. Look at Request ID: '||to_char(l_request_id)) ; FND_MESSAGE.SHOW; commit; END IF; END;
No comments:
Post a Comment