1. 定义所使用的表
TABLES:MSEG,MKPF.
2. 声明类型池
TYPE-POOLS:SLIS.
3. 声明结构
DATA:BEGINOFWA,
MBLNRLIKEMSEG-MBLNR,
BLARTLIKEMKPF-BLART,
BUDATLIKEMKPF-BUDAT,
MATNRLIKEMSEG-MATNR,
ENDOFWA.
4. 声明内表
DATA:ITABLIKEWAOCCURS0WITHHEADERLINE.
5. ALV 显示变量
DATA:GS_LAYOUTTYPESLIS_LAYOUT_ALV,
GT_FIELDCATTYPESLIS_T_FIELDCAT_ALVWITHHEADERLINE,
FIELDCATALOGLIKEGT_FIELDCAT,
G_REPIDLIKESY-REPID.
6. 定义选择屏幕
SELECTION-SCREENBEGINOFBLOCKB1WITHFRAMETITLETEXT-
001.
PARAMETERSP_WERKSLIKEMSEG-WERKSOBLIGATORYDEFAULT'10
00'.
SELECT-OPTIONS:S_MBLNRFORMSEG-MBLNR,
S_MATNRFORMSEG-MATNR.
SELECTION-SCREENENDOFBLOCKB1.
7. 执行主程度
START-OF-SELECTION.
PERFORMFRM_GET_DATA.
PERFORMFRM_DIS_DATA.
END-OF-SELECTION.
8.定义相关取数,显示数据的子程序
FORMFRM_GET_DATA.
……
ENDFORM.
FORMFRM_DIS_DATA.
……
ENDFORM.