Hi, Please see the below logic. using this approach, we are able to print all the pages in single click. try this. DATA: g_sfname TYPE rs38l_fnam, g_matnr TYPE makt-matnr, g_maktx TYPE makt-maktx. DATA: lt_makt TYPE TABLE OF makt, lt_makt1 TYPE TABLE OF makt, ls_makt TYPE makt. DATA: control_parameters TYPE ssfctrlop. START-OF-SELECTION. SELECT matnr maktx FROM makt INTO TABLE lt_makt UP TO 100 ROWS. call function 'SSF_OPEN' exporting * ARCHIVE_PARAMETERS = * USER_SETTINGS = 'X' * MAIL_SENDER = * MAIL_RECIPIENT = * MAIL_APPL_OBJ = * OUTPUT_OPTIONS = control_parameters = control_parameters * IMPORTING * JOB_OUTPUT_OPTIONS = exceptions formatting_error = 1 internal_error = 2 send_error = 3 user_canceled = 4 others = 5. if sy-subrc <> 0. * error handling message id sy-msgid type sy-msgty number sy-msgno with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4. exit. endif. CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME' EXPORTING formname = 'ZVJ_TEST' * VARIANT = ' ' * DIRECT_CALL = ' ' IMPORTING fm_name = g_sfname EXCEPTIONS no_form = 1 no_function_module = 2 OTHERS = 3. IF sy-subrc <> 0. * Implement suitable error handling here ENDIF. LOOP AT lt_makt INTO ls_makt. APPEND ls_makt TO lt_makt1. control_parameters-no_dialog = 'X'. control_parameters-preview = 'X'. control_parameters-no_open = 'X'. control_parameters-no_close = 'X'. *CALL FUNCTION '/1BCDWB/SF00000057' CALL FUNCTION g_sfname EXPORTING * ARCHIVE_INDEX = * ARCHIVE_INDEX_TAB = * ARCHIVE_PARAMETERS = control_parameters = control_parameters * MAIL_APPL_OBJ = * MAIL_RECIPIENT = * MAIL_SENDER = * OUTPUT_OPTIONS = * USER_SETTINGS = 'X' matnr = g_matnr maktx = g_maktx max_seats = '585' occ_seats = '285' flight = 'X' TABLES lt_makt = lt_makt1 * IMPORTING * DOCUMENT_OUTPUT_INFO = * JOB_OUTPUT_INFO = * JOB_OUTPUT_OPTIONS = EXCEPTIONS formatting_error = 1 internal_error = 2 send_error = 3 user_canceled = 4 OTHERS = 5 . IF sy-subrc <> 0. * Implement suitable error handling here MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4. ENDIF. ENDLOOP. call function 'SSF_CLOSE' * IMPORTING * JOB_OUTPUT_INFO = exceptions formatting_error = 1 internal_error = 2 send_error = 3 others = 4. if sy-subrc <> 0. * error handling message id sy-msgid type sy-msgty number sy-msgno with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4. endif.
↧