直接上代码

DATA objname     TYPE string.
DATABEGIN OF kernel_version OCCURS 0,
        key(21)   TYPE c,
        data(400TYPE c,
      END OF kernel_version.
CALL 'SAPCORE' ID 'ID' FIELD 'VERSION'
               ID 'TABLE' FIELD kernel_version-*sys*.

READ TABLE kernel_version WITH   KEY  key =  'IP address' .
objname = kernel_version-data.

cl_demo_output=>write(  objname ).
*cl_demo_output=>write( kernel_version[] ).
cl_demo_output=>display).

 

posted on 2020-12-02 14:21  夜橙  阅读(80)  评论(0编辑  收藏  举报