直接上代码
DATA objname TYPE string.
DATA: BEGIN OF kernel_version OCCURS 0,
key(21) TYPE c,
data(400) TYPE 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( ).