Downloading spool files FM

Question

Hello,
Need your help with downloading 108 spool files.
I have scheduled 108 jobs and now I have to download data of all these 108 spools into excel files (from various PRD systems).
One way is I go to System -> List -> Save -> Local File.
However I don't want to use this.
Neither I have option to create program in SE38, as I don't have access to same.
Please advice if theree is any standard program or function module which can help me in this.
Will be very thankful.

Answer 1

form download_selected tables lsporq type sp01r_tview
                       changing rs_selfield type slis_selfield.
  data: rqnum like sy-tabix,
        filename like rlgrap-filename,
        dw_rc type sy-subrc.     
  perform get_selected3 tables lsporq
                        using ' ' rs_selfield changing rqnum.
  if rqnum > 0.
    loop at lsporq where selected = 'X'.
      filename(3) = lsporq-sys.
      filename+3(10) = lsporq-rqid_char.
      filename+13(4) = '.TXT'.
      move-corresponding lsporq  to tsp01sys.
      call function 'RSPO_CHECK_OUTRQ_PERMISSION'
        exporting
          spoolreq = tsp01sys
          access   = 'DOWN'
        exceptions
          others   = 1.
      if sy-subrc  0.
        out_message ti.
      MESSAGE i059 WITH tsp01sys-rqident tsp01sys-sys.
      else.
        gprog = 'RSPO_DOWNLOAD_SPOOLJOB'.
        if lsporq-sys = sy-sysid.
          call function 'RSPO_DOWNLOAD_SPOOLJOB'
            exporting
              id     = lsporq-rqident
              fname  = filename
            exceptions
              others = 1.
        else.
          call function 'RSPO_DOWNLOAD_SPOOLJOB'
            destination lsporq-sys
            exporting
              id                    = lsporq-rqident
              fname                 = filename
            exceptions
              communication_failure = 102  message msg_text
              system_failure        = 103  message msg_text
              others                = 1.
        endif.
        dw_rc = sy-subrc.        
        out_rfc_message lsporq-sys ti.
      endif.
    endloop.
    if dw_rc = 0.             
      message s028.
    endif.                     
  endif.
endform.                    "DOWNLOAD_SELECTED