REPORT ZTHOMAS_DEMO5.
DATA lv_num TYPE i.
DO 2 TIMES.
PERFORM sy-index of sub1 sub2.
ENDDO.
*&---------------------------------------------------------------------*
*& Form sub1
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
form sub1 .
WRITE: 'sub1'.
endform. " sub1
*&---------------------------------------------------------------------*
*& Form sub2
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
form sub2 .
WRITE:/ 'sub2'.
endform. " sub2
阅读(1432) | 评论(0) | 转发(0) |
