Smartform All pages in one print preview problem

Question

Hi
     I am displaying the employee data in ALV with checkbox selection.. i put two user defined buttons like print and print preview. when user clicks on print button, smartform will call for very employee in loop and print it employee wise. But my problem is when user clicks on print preview by selecting multiple checkboxes , I need all pages(employee wise like page1,2,3..) in one print preview. I done but for every employee,i have to press the BACK button. But I need all pages in one preview. I'm pasting my code here. Can anyone suggest??
WHEN 'PREVIEW'.
w_cparam-no_dialog = 'X'.
  w_cparam-preview = 'X'.
   w_cparam-getotf = ' '.
   w_outoptions-tddest = 'LOCL'.
   w_outoptions-tdnoprev  = ' '.
    w_outoptions-tdimmed  = 'X'.
* to reflect the data changed into internal table
      IF ref_grid IS INITIAL.
        CALL FUNCTION 'GET_GLOBALS_FROM_SLVC_FULLSCR'
          IMPORTING
            e_grid = ref_grid.
      ENDIF.
      IF NOT ref_grid IS INITIAL.
        CALL METHOD ref_grid->check_changed_data.
      ENDIF.
loop at i_data into wa_data where SEL = 'X'.
MOVE-CORRESPONDING WA_DATA TO WA_PRINT.
  APPEND WA_PRINT TO I_PRINT.
    CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
      EXPORTING
        FORMNAME                 = 'ZHRF1_PTAR1001'
*       VARIANT                  = ' '
*       DIRECT_CALL              = ' '
     IMPORTING
       FM_NAME                  = FM_NAME
*     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.
    ENDIF.
  CALL FUNCTION FM_NAME
    EXPORTING
*     ARCHIVE_INDEX              =
*     ARCHIVE_INDEX_TAB          =
*     ARCHIVE_PARAMETERS         =
     CONTROL_PARAMETERS         = W_CPARAM
*     MAIL_APPL_OBJ              =
*     MAIL_RECIPIENT             =
*     MAIL_SENDER                =
     OUTPUT_OPTIONS             = W_OUTOPTIONS
     USER_SETTINGS              = 'X'
      FR_DATE                    = PN-BEGDA
      TO_DATE                    = PN-ENDDA
   IMPORTING
*     DOCUMENT_OUTPUT_INFO       =
    JOB_OUTPUT_INFO            = T_OTF_FROM_FM
*     JOB_OUTPUT_OPTIONS         =
    TABLES
      ITAB                       = I_PRINT
*   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.
CLEAR: WA_DATA,WA_PRINT.
CLEAR: I_PRINT.
  ENDLOOP.

Answer 1

Hi friend sure.
You need to increment the index only at the loop no where else and the variable for holding the index value is global.
If you create before the read every time it gets trigerred.
After each loop you assign the sy-tabix value to that variable.
Just like this ,
v_index = sy-tabix.
Then at the window just read the table as shown
READ TABLE t_chq INTO x_chq INDEX v_index.
This will do friend.
I will update the flow of my code here, then you many understand it much clear.
Page1
  Main window (below page1)
    Loop (inside Main win)
      program lines. code : v_index = sy-tabix. v_lines =  lines( t_chq ). (inside loop)
      Condition (inside loop)
         True
            check the v_index < v_lines if true break page, for page break create a command and do it (Inside true condition)
         false
           blank.
  Secondary window (below page1)
    program line (inside sec wind)
    Inside program lines the code is READ TABLE t_chq INTO x_chq INDEX v_index. (inside sec wind)
  Secondary window2  (below page1)
     program line (inside sec wind2)
    Inside program lines some other code. (inside sec wind2)
This is my logic try like this friend.
I think for other records its coming fine because since it is an local variable its getting updated some where and also showing 1 bec its always initializing.
Try this you will get if any issues please revert back to me
Thanks,
Sri Hari
Edited by: srihari.kumar on Jan 6, 2012 11:04 AM
Edited by: srihari.kumar on Jan 6, 2012 11:05 AM