*描述:定义一个报表,通过用户输入的物料凭证号码的范围
* 一条物料号对应多条记录,用物料号来进行分组输出。
* 每一组下面输出一条横线。把不同的组隔开。
REPORT ZTEST_LEANRED8233 .
TABLES: MSEG ,
SPFLI.
DATA: ITAB LIKE SPFLI OCCURS 0 WITH HEADER LINE,
JTAB LIKE MSEG OCCURS 0 WITH HEADER LINE.
*定义画面输入对象.
SELECTION-SCREEN BEGIN OF BLOCK QUERY_CAR WITH FRAME TITLE
TEXT-000.
SELECT-OPTIONS INPUT FOR MSEG-MBLNR OBLIGATORY.
SELECTION-SCREEN END OF BLOCK QUERY_CAR.
*
INITIALIZATION.
******************************
*AT SELECTION-SCREEN
******************************
AT SELECTION-SCREEN.
******************************
*START-OF-SELECTION.
******************************
START-OF-SELECTION.
* 调用读取数据的子函数.
PERFORM FILL TABLES JTAB.
* 调用显示数据的子函数.
PERFORM OUT TABLES JTAB.
******************************
* 从数据表中抽出符合条件的的数据
* 然后插如内表。
* 以C