SMARTFORM 实例教程-图文详解.docVIP

SMARTFORM 实例教程 程序名：ZLICHAODITEST 系统 HR 105 LICD 1）源代码 REPORT ZLICHAODITEST. DATA: BEGIN OF ITAB OCCURS 0, “ITAB为要显示数据的内表 MATNR LIKE MARA-MATNR, SPRAS LIKE MAKT-SPRAS, MAKTX LIKE MAKT-MAKTX, MAKTG LIKE MAKT-MAKTX, END OF ITAB. DATA: FM_NAME TYPE RS38L_FNAM. “SMARTFORM SELECT-OPTIONS MATNR FOR ITAB-matnr . SELECT-OPTIONS maktx FOR ITAB-maktx. SELECT * INTO CORRESPONDING FIELDS OF TABLE ITAB FROM makt UP TO 123 ROWS WHERE MAKTX IN MAKTX AND MATNR IN MATNR. CALL FUNCTION SSF_FUNCTION_MODULE_NAME EXPORTING FORMNAME = ZTEST_22_SF0001 “SMARTFORM表格 名称 * VARIANT = * DIRECT_CALL = IMPORTING FM_NAME = FM_NAME * EXCEPTIONS * NO_FORM = 1 * NO_FUNCTION_MODULE = 2 * OTHERS = 3 . CALL FUNCTION fm_name /1BCDWB/Sm_name * EXPORTING * ARCHIVE_INDEX = * ARCHIVE_PARAMETERS = * CONTROL_PARAMETERS = * MAIL_APPL_OBJ = * MAIL_RECIPIENT = * MAIL_SENDER = * OUTPUT_OPTIONS = * USER_SETTINGS = X * IMPORTING * DOCUMENT_OUTPUT_INFO = * JOB_OUTPUT_INFO = * JOB_OUTPUT_OPTIONS = TABLES ITAB = ITAB “显示数据的内表 EXCEPTIONS FORMATTING_ERROR = 1 INTERNAL_ERROR = 2 SEND_ERROR = 3 USER_CANCELED = 4 OTHERS = 5 . 2）步骤 1．建内表要参考结构类型ITABJ TYPES: BEGIN OF ITABJ, MATNR like MARA-MATNR, SPRAS LIKE MAKT-SPRAS, MAKTX LIKE MAKT-MAKTX, MAKTG LIKE MAKT-MAKTG, END OF ITABJ. 2.建立工作区WA和输出表ITAB 3.初始化：输出参数ITAB和代码 DATA: FIELD(50). FIELD-SYMBOLS: f TYPE ANY. FIELD = (ZLICHAODITEST)ITAB[]. ZXXXXX为程序名,ITAB[]是内表 ASSIGN (FIELD) TO f. ITAB[] = f. 4.选择表样式 点击细节，设置表列参数，图示为4列数据，每一列宽度4cm，行类型为LINE1 5把内表ITAB中的数据写到工作区WA中 6.表头：以此类推，填写报表表头字段文字描述 7.主要区域：工作区—字段名 eg：WA-MATNR，以此类推 执行程序 ENDDING