SAP script is essentially a tool for the presentation of business data, Also it is used to format and generate business document types like purchase requisitions, requests for quotations, sales orders, delivery notes, invoices, etc. Means it is used of preformatted forms to print preformatted text.
SE71
CALL FUNCTION 'OPEN_FORM'EXPORTING
* APPLICATION = 'TX'
* ARCHIVE_INDEX =
* ARCHIVE_PARAMS =
* DEVICE = 'PRINTER'
* DIALOG = 'X'FORM = 'ZMM01'
* LANGUAGE = SY-LANGUOPTIONS = I_ITCPO
* MAIL_SENDER =
* MAIL_RECIPIENT =
* MAIL_APPL_OBJECT =
* RAW_DATA_INTERFACE = '*'
* SPONUMIV =
* IMPORTING
* LANGUAGE =
* NEW_ARCHIVE_PARAMS =
* RESULT =EXCEPTIONSCANCELED = 1DEVICE = 2FORM = 3OPTIONS = 4UNCLOSED = 5MAIL_OPTIONS = 6ARCHIVE_ERROR = 7INVALID_FAX_NUMBER = 8MORE_PARAMS_NEEDED_IN_BATCH = 9SPOOL_ERROR = 10CODEPAGE = 11OTHERS = 12.
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 'WRITE_FORM'EXPORTINGELEMENT = 'HEAD'
* FUNCTION = 'SET'
* TYPE = 'BODY'WINDOW = 'WINDOW3'
* IMPORTING
* PENDING_LINES =EXCEPTIONSELEMENT = 1FUNCTION = 2TYPE = 3UNOPENED = 4UNSTARTED = 5WINDOW = 6BAD_PAGEFORMAT_FOR_PRINT = 7SPOOL_ERROR = 8CODEPAGE = 9OTHERS = 10.
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 itab.CALL FUNCTION 'WRITE_FORM'EXPORTINGELEMENT = 'ITEM'FUNCTION = 'SET'TYPE = 'BODY'WINDOW = 'MAIN'
* IMPORTING
* PENDING_LINES =EXCEPTIONSELEMENT = 1FUNCTION = 2TYPE = 3UNOPENED = 4UNSTARTED = 5WINDOW = 6BAD_PAGEFORMAT_FOR_PRINT = 7SPOOL_ERROR = 8CODEPAGE = 9OTHERS = 10.
IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
SUM_MENGE = SUM_MENGE + ITAB-ERFMG.
endloop.
CALL FUNCTION 'CLOSE_FORM'
* IMPORTING
* RESULT =
* RDI_RESULT =
* TABLES
* OTFDATA =
* EXCEPTIONS
* UNOPENED = 1
* BAD_PAGEFORMAT_FOR_PRINT = 2
* SEND_ERROR = 3
* SPOOL_ERROR = 4
* CODEPAGE = 5
* OTHERS = 6.
IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
There is a problem about text element . In the develop machine I don’t show it .