Skip to Content

Archived discussions are read-only. Learn more about SAP Q&A

Multiple Spools

Hi All,

I had earlier posted to the Group on the same issue but as there was no reply i am reposting:

      IF SY-BATCH = 'X'.
        PERFORM BUILD_ITAB."has entries SKAT, SKA1, SKB1
        LOOP AT ITAB_BUILD.
          IF ITAB_BUILD-TABNAME = ITAB_BUILD-TABNAME.
       CONCATENATE ITAB_BUILD-TABNAME 'AC64' INTO TITLE1
                        SEPARATED BY SPACE.
       CONCATENATE SY-SYSID ITAB_BUILD-TABNAME INTO TITLE2
                        SEPARATED BY SPACE.
            MOVE TITLE2 TO TITLE1+15.
            MOVE TITLE1 TO TITLE.
            CALL FUNCTION 'GET_PRINT_PARAMETERS'
                 EXPORTING
                      ARCHIVE_INFO           = 'FGL'
                      ARCHIVE_MODE           = '2'
                      ARCHIVE_TEXT           = TITLE1
                      AR_OBJECT              = DOC_TYPE
                      COPIES                 = 1
                      COVER_PAGE             = 'X'
                      DESTINATION            = 'LP01'
                      EXPIRATION             = '8'
                      IMMEDIATELY            = 'X'
                      LAYOUT                 = 'X_65_255'
                      LINE_COUNT             = 65
                      LINE_SIZE              = 255
                      LIST_NAME              = 'DOCUMENT'
                      LIST_TEXT              = TITLE
                      NEW_LIST_ID            = 'X'
                      NO_DIALOG              = 'X'
                      RELEASE                = ' '
                      REPORT                 = 'YARCHIV2'
                      SAP_COVER_PAGE         = 'D'
                      SAP_OBJECT             = 'DRAW'
                 IMPORTING
                      OUT_ARCHIVE_PARAMETERS = ARPARAMS
                      OUT_PARAMETERS         = PARAMS
                      VALID                  = VALID
                 EXCEPTIONS
                      ARCHIVE_INFO_NOT_FOUND = 1
                      INVALID_PRINT_PARAMS   = 2
                      INVALID_ARCHIVE_PARAMS = 3
                      VALID_MISSING          = 4
                      OUT_PARAMETERS_MISSING = 5
                      OTHERS                 = 6.
            IF VALID <> SPACE.
              IF ITAB_BUILD-TABNAME = 'SKAT'.
NEW-PAGE PRINT ON PARAMETERS PARAMS ARCHIVE PARAMETERS ARPARAMS
     NEW-SECTION NO DIALOG.
                PERFORM WRITE_SKAT.
              ENDIF.
              IF ITAB_BUILD-TABNAME = 'SKA1'.
NEW-PAGE PRINT ON PARAMETERS PARAMS ARCHIVE PARAMETERS ARPARAMS
     NEW-SECTION NO DIALOG.
                PERFORM WRITE_SKA1.
              ENDIF.

              IF ITAB_BUILD-TABNAME = 'SKB1'.
        NEW-PAGE PRINT ON PARAMETERS PARAMS ARCHIVE PARAMETERS ARPARAMS
                         NEW-SECTION NO DIALOG.
                PERFORM WRITE_SKB1.
              ENDIF.

            ENDIF.
          ENDIF.
        ENDLOOP.
      ENDIF.                           "SY-BATCH

In the above code i am receiving VALID as SPACE so it is not performing the Write statements as well as not creating the SpoolLists.

Any pointers on how to overcome this.

Regards,

- PSK

Tags:
Former Member
Not what you were looking for? View more on this topic or Ask a question