。。。。,。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。
DEFINE increment. "定义宏
add 1 to &1.
WRITE:/ &1.
WRITE:/ &2.
end-OF-DEFINITION.
DATA:number TYPE i VALUE 2,
str(10) TYPE c VALUE 'hello sap'.
increment number str . "调用宏
。。。。,。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。
DEFINE increment. "定义宏
add 1 to &1.
WRITE:/ &1.
WRITE:/ &2.
end-OF-DEFINITION.
DATA:number TYPE i VALUE 2,
str(10) TYPE c VALUE 'hello sap'.
increment number str . "调用宏