Report规范格式

声明

REPORT Yxxx LINE-SIZE col LINE-COUNT lines MESSAGE-ID xx NO STANDARD PAGE HEAD.

TABLES:   …
CONSTANTS:…
TYPES:         …
DATA:…

DATA:Begin of xxx occurs, 
             ……
           End of xxx.                                   数据定义

SELECTION-SCREEN BEGIN OF xxx.     选择屏幕
PARAMETERS:…
SELECT-OPTIONS:…
SELECTION-SCREEN  END OF xxx. 

INITIALIZATION.                                   程序初始化        
PERFORM INIT_PARAMS.

AT SELECTION-SCREEN [on <selection-screen block/field>].
  XXX 

START-OF-SELECTION.                     程序开始执行

    SELECT * FROM …

          ........
    ENDSELECT.

    PERFORM SUBROUTINE1 TABLE I_TAB.

    PERFORM SUBROUTINE2 USING I_MATNR CHANGING I_PRICE.

END-OF-SELECTION.                         程序结束部分

    SORT ITAB BY FIELD1 FIELD2.

    LOOP AT ITAB.
        

           WRITE:/ …..

    ENDLOOP.                            

FORM FORM1 USING          A            子程序处理FORM1
                         CHANGING  B.
    ………
ENDFORM.

FORM FORM2 TABLES C.                 子程序处理FORM2
    ………
ENDFORM.