abap 定义宏DEFINE ，include包含程序，案例举例

REPORT zpcydefine.
INCLUDE ZPCYDEFINE_TOP.

DEFINE mydefine.
  WRITE:/ &1.
  WRITE:/ &2.
  WRITE:/ &3.
  loop at &4 INTO data(itt).
    WRITE:/ itt-bukrs,itt-butxt,itt-ort01.
  ENDLOOP.

END-OF-DEFINITION.

TYPES: BEGIN OF ty_itab,
         bukrs TYPE t001-bukrs,
         butxt TYPE t001-butxt,
         ort01 TYPE t001-ort01,
       END OF ty_itab.

DATA: itab1 TYPE TABLE OF ty_itab,
      itab2 TYPE ty_itab.     " 改为结构体

SELECT  bukrs, butxt, ort01
  FROM t001 WHERE ORT01 in @city
  INTO TABLE @itab1 UP TO 10 ROWS.

mydefine '1' '2' '3' itab1.