Hi,
I am expecting aorund 2000 pages of spool file with a smartform driver program.
My spooljob is limiting me to only 33 pages and job is still active when i check using SM37.
Anything related to spooling is wrong in my code?
SORT T_ITEM BY FKDAT.
CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
EXPORTING
FORMNAME = P_FORM
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.
LS_COMPOSER_PARAM-TDNEWID = 'X'.
LS_CONTROL_PARAM-PREVIEW = ''.
SORT T_HEADER BY NAME1 KUNNR.
DATA: V_PREV_CUR LIKE BSID-WAERS.
LOOP AT T_HEADER INTO WA_HEADER.
REFRESH: ITEM_ITAB, ITEM_ITAB_TMP.
CLEAR: V_PREV_CUR.
LOOP AT T_ITEM WHERE KUNRG = WA_HEADER-KUNNR.
MOVE-CORRESPONDING T_ITEM TO ITEM_ITAB.
APPEND ITEM_ITAB.
ENDLOOP.
SORT ITEM_ITAB BY WAERS.
LOOP AT ITEM_ITAB.
IF SY-TABIX <> 1.
IF V_PREV_CUR <> ITEM_ITAB-WAERS.
SORT ITEM_ITAB_TMP BY FKDAT.
CALL FUNCTION FM_NAME
EXPORTING
ARCHIVE_INDEX = TOA_DARA
ARCHIVE_INDEX_TAB = ARC_IND_TAB
ARCHIVE_PARAMETERS = ARC_PARAMS
CONTROL_PARAMETERS = LS_CONTROL_PARAM
MAIL_APPL_OBJ = LS_RECIPIENT
MAIL_RECIPIENT = LS_RECIPIENT
MAIL_SENDER = LS_SENDER
OUTPUT_OPTIONS = LS_COMPOSER_PARAM
USER_SETTINGS = SPACE
WA_ITAB = WA_HEADER
IMPORTING
DOCUMENT_OUTPUT_INFO = DOCUMENT_OUTPUT_INFO
JOB_OUTPUT_INFO = JOB_OUTPUT_INFO
JOB_OUTPUT_OPTIONS = JOB_OUTPUT_OPTIONS
TABLES
WA_DEP = ITEM_ITAB_TMP
EXCEPTIONS
FORMATTING_ERROR = 1
INTERNAL_ERROR = 2
SEND_ERROR = 3
USER_CANCELED = 4.
IF SY-SUBRC <> 0.
WRITE: / 'ERROR in passing variables to the smartforms '.
ENDIF.
LS_COMPOSER_PARAM-TDNEWID = SPACE.
LS_CONTROL_PARAM-NO_DIALOG = 'X'.
LS_CONTROL_PARAM-PREVIEW = ''.
REFRESH ITEM_ITAB_TMP.
MOVE-CORRESPONDING ITEM_ITAB TO ITEM_ITAB_TMP.
APPEND ITEM_ITAB_TMP.
ELSE.
MOVE-CORRESPONDING ITEM_ITAB TO ITEM_ITAB_TMP.
APPEND ITEM_ITAB_TMP.
ENDIF.
ELSE.
REFRESH ITEM_ITAB_TMP.
MOVE-CORRESPONDING ITEM_ITAB TO ITEM_ITAB_TMP.
APPEND ITEM_ITAB_TMP.
ENDIF.
AT LAST.
CALL FUNCTION FM_NAME
EXPORTING
ARCHIVE_INDEX = TOA_DARA
ARCHIVE_INDEX_TAB = ARC_IND_TAB
ARCHIVE_PARAMETERS = ARC_PARAMS
CONTROL_PARAMETERS = LS_CONTROL_PARAM
MAIL_APPL_OBJ = LS_RECIPIENT
MAIL_RECIPIENT = LS_RECIPIENT
MAIL_SENDER = LS_SENDER
OUTPUT_OPTIONS = LS_COMPOSER_PARAM
USER_SETTINGS = SPACE
WA_ITAB = WA_HEADER
IMPORTING
DOCUMENT_OUTPUT_INFO = DOCUMENT_OUTPUT_INFO
JOB_OUTPUT_INFO = JOB_OUTPUT_INFO
JOB_OUTPUT_OPTIONS = JOB_OUTPUT_OPTIONS
TABLES
WA_DEP = ITEM_ITAB_TMP
EXCEPTIONS
FORMATTING_ERROR = 1
INTERNAL_ERROR = 2
SEND_ERROR = 3
USER_CANCELED = 4.
IF SY-SUBRC <> 0.
WRITE: / 'ERROR in passing vars to the smartforms '.
ENDIF.
LS_COMPOSER_PARAM-TDNEWID = SPACE.
LS_CONTROL_PARAM-NO_DIALOG = 'X'.
LS_CONTROL_PARAM-PREVIEW = ''.
ENDAT.
V_PREV_CUR = ITEM_ITAB-WAERS.
ENDLOOP.
ENDLOOP.