TABLES: RSEUMOD.
DATA: CURSOR_ONE TYPE CURSOR,
WA LIKE RSEUMOD.
OPEN CURSOR CURSOR_ONE FOR
SELECT * FROM RSEUMOD.
DO.
FETCH NEXT CURSOR CURSOR_ONE INTO WA.
IF SY-SUBRC NE 0.
CLOSE CURSOR CURSOR_ONE.
EXIT.
ENDIF.
WRITE: / WA-UNAME, WA-DEVCLASS.
ENDDO.
阅读(371) | 评论(0) | 转发(0) |
