*&---------------------------------------------------------------------*
*& Report ZTLXJ_112801
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT ZTLXJ_112801.
data: d1 type i,
d2 type i.
d1 = 3.
d2 = 1.
PERFORM SUB1 using 3 1.
FORM SUB1 using NUM1 TYPE I
NUM2 type I.
CHECK NUM1 < 10.
WRITE / NUM1.
NUM1 = NUM1 + 1.
ENDFORM.
因为using 是传地址的，直接量3传的是受保护的内存地址，所以上面会报错