Regd - Spool request

Question

Dear all,
I have a requirement, to download the list output in PDF format. I am using the following code. This program converts the list output into spool request. But the problem is it is having number of pages is 0(We can see in SP01).
Could you please let me know the reason why it is having the number of pages is 0. It shoud show number of pages is atleast 1(since its having some data).
Please help me at the earliest.
This is the code I am using.....
TABLES :mara, makt.
TYPES: BEGIN OF t_mara,
           matnr LIKE mara-matnr,
           meins LIKE mara-meins,
           matkl like mara-matkl,
           ersda LIKE mara-ersda,
           ername LIKE mara-ernam,
      END OF t_mara.
DATA: i_mara TYPE TABLE OF t_mara,
      wa_mara LIKE LINE OF i_mara.
DATA: v_dest LIKE tsp01-rqdest,
v_handle LIKE sy-tabix,
v_spool_id LIKE tsp01-rqident,
v_rc TYPE c,
v_errmessage(100) TYPE c,
v_text(70) TYPE c,
gd_spool_nr LIKE tsp01-rqident.
START-OF-SELECTION.
  SELECT matnr FROM mara INTO TABLE i_mara
         UP TO 10 ROWS.
  CALL FUNCTION 'RSPO_OPEN_SPOOLREQUEST'
  EXPORTING
   dest = 'LOCL'
   layout = 'X_58_170'
   name =   ' LOCL'
   suffix1 =  'LOCL'
   suffix2 = 'Z_DOWNLOASUT'
   copies = '1'
   prio = '5'
  immediate_print = 'X'
AUTO_DELETE =
TITLELINE =
RECEIVER =
DIVISION =
AUTHORITY =
POSNAME =
ACTTIME =
LIFETIME = '8'
APPEND =
COVERPAGE =
codepage = '1152'
doctype = 'LIST'
  IMPORTING
  handle = v_handle
  spoolid = gd_spool_nr
  rc = v_rc
  errmessage = v_errmessage.
  LOOP AT i_mara INTO wa_mara.
    CONCATENATE wa_mara-matnr wa_mara-meins "i_mara-maktl
                wa_mara-ersda wa_mara-ername INTO v_text SEPARATED BY space.
    CALL FUNCTION 'RSPO_WRITE_SPOOLREQUEST'
    EXPORTING
    handle = v_handle
    text = v_text
LENGTH =
CODEPAGE =
TRUNCATE =
    IMPORTING
    rc = v_rc
    errmessage = v_errmessage
    EXCEPTIONS
    handle_not_valid = 1
    OTHERS = 2.
    IF sy-subrc <> 0.
      MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
      WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
    ENDIF.
  ENDLOOP.
  CALL FUNCTION 'RSPO_CLOSE_SPOOLREQUEST'
    EXPORTING
      handle           = v_handle
    IMPORTING
      rc               = v_rc
      errmessage       = v_errmessage
    EXCEPTIONS
      handle_not_valid = 1
      OTHERS           = 2.
  IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
    WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  ENDIF.
  COMMIT WORK.
  SUBMIT rstxpdft4 WITH spoolno = gd_spool_nr
                   WITH download = 'X'
                   VIA SELECTION-SCREEN
                   AND RETURN.
Thanks And regards,
Janardhan

Answer 1

oK