Pdf preview from smartform

Question

Hi all
I have developed a smart form which have copies window in it.
in copies window logic is implemented that if
if sfsy-copycount = 1
then it is original
if 2 then bank
if gt2 then extra.
now an application program is developed for this which will show the print preview of form
in  pdfformat.
printpreview is coming in pdf fornat but only first copy is shown ie original,
rest copies are not coming.
my reqment is such that if 1 give 1 copy then first copy should shown
when two copy then original copy and bank copy .
the code is as follows.
*& Report  ZSFDRIVER_to_pdf1
REPORT  zsfdriver_to_pdf1.
TABLES: vbrk ,vbrp .
DATA l_fname TYPE rs38l_fnam .
DATA: w_otfdata  TYPE ssfcrescl.
DATA: ls_control_param   TYPE ssfctrlop.
DATA: ls_composer_param  TYPE ssfcompop.
DATA: BEGIN OF it_itcoo OCCURS 0.
        INCLUDE STRUCTURE itcoo.
DATA: END OF it_itcoo.
DATA: w_otf  TYPE itcoo.
DATA: t_vbrp LIKE STANDARD TABLE OF vbrp. " initial size 0 with header line.
PARAMETERS: p_vbeln LIKE vbrk-vbeln.
START-OF-SELECTION.
SELECT * FROM vbrp  INTO TABLE t_vbrp
  WHERE vbeln = p_vbeln.
  SELECT *
      FROM vbrk
     INTO vbrk
      UP TO 1 ROWS
      FOR ALL ENTRIES IN t_vbrp
     WHERE vbeln = t_vbrp-vbeln.
  ENDSELECT.
end-of-selection.
  CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
    EXPORTING
    formname                 = 'YCOPY'
  VARIANT                  = ' '
  DIRECT_CALL              = ' '
    IMPORTING
    fm_name                  = l_fname
    EXCEPTIONS
    no_form                  = 1
    no_function_module       = 2
    OTHERS                   = 3
  IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ELSE.
  ENDIF.
  ls_control_param-getotf = 'X'.
  CALL FUNCTION l_fname
    EXPORTING
  ARCHIVE_INDEX              =
  ARCHIVE_INDEX_TAB          =
  ARCHIVE_PARAMETERS         =
    control_parameters         = ls_control_param
  MAIL_APPL_OBJ              =
  MAIL_RECIPIENT             =
  MAIL_SENDER                =
   output_options             = ls_composer_param
    user_settings              = ' '
    i_vbrk =                    vbrk
IMPORTING
  DOCUMENT_OUTPUT_INFO       =
job_output_info            = w_otfdata
job_output_options         =
TABLES
i_vbrp                     = t_vbrp[]
EXCEPTIONS
formatting_error           = 1
internal_error             = 2
send_error                 = 3
user_canceled              = 4
OTHERS                     = 5
  IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
  ENDIF.
  LOOP AT w_otfdata-otfdata INTO w_otf.
    APPEND w_otf TO it_itcoo.
  ENDLOOP.
  CALL FUNCTION 'HR_IT_DISPLAY_WITH_PDF'
    TABLES
      otf_table = it_itcoo.
when i give 1 copy

Answer 1

Hi,
In the print preview of your form before converting to .pdf check all the pages are coming or not? If it is coming then you can try like generate a spool and execute RSTXPDFT4 with that spool. See whether all the pages are coming or not? .
Just try in different way.
Regards,
Abhijit