Standard routine to generate PDF format from Spool

Question

Hi,
I have a requirement where I need to pick the Spool for the report and convert that in to PDF later that needs to be stored on Application server.  
Any early response will be rewarded

Answer 1

Hi Nikhil,
See if the following code helps you.
  DATA: num_bytes TYPE i,
   pdf_spoolid LIKE tsp01-rqident,
   job_name LIKE tbtcjob-jobname,
   job_count LIKE tbtcjob-jobcount,
   pdf LIKE tline OCCURS 100 WITH HEADER LINE,
*give the filename along with the path
   file_name LIKE rlgrap-filename default 'file_name'.
Get spool requests
  SELECT * FROM tsp01 INTO TABLE tsp01_itab
   WHERE rq0name = 'LIST1S' AND rq2name LIKE 'YOUR_REPORT_NAME%' AND
         rqowner = sy-uname.
  LOOP AT tsp01_itab.
  Convert spool request into PDF file
    CALL FUNCTION 'CONVERT_ABAPSPOOLJOB_2_PDF'
         EXPORTING
              src_spoolid              = tsp01_itab-rqident
              no_dialog                = 'X'
         IMPORTING
              pdf_bytecount            = num_bytes
              pdf_spoolid              = pdf_spoolid
              btc_jobname              = job_name
              btc_jobcount             = job_count
         TABLES
              pdf                      = pdf
         EXCEPTIONS
              err_no_otf_spooljob      = 1
              err_no_spooljob          = 2
              err_no_permission        = 3
              err_conv_not_possible    = 4
              err_bad_dstdevice        = 5
              user_cancelled           = 6
              err_spoolerror           = 7
              err_temseerror           = 8
              err_btcjob_open_failed   = 9
              err_btcjob_submit_failed = 10
              err_btcjob_close_failed  = 11.
    CHECK sy-subrc = 0.
    CONDENSE file_name NO-GAPS.
  Download file to application server
    OPEN DATASET file_name FOR OUTPUT IN BINARY MODE.
    LOOP AT pdf.
      TRANSFER pdf TO file_name.
    ENDLOOP.
    CLOSE DATASET file_name. 
  ENDLOOP.
Reeta.