执行外部操作系统命令
DATA:
lv_command(50) TYPE c,
lv_line(150) TYPE c,
lt_tab LIKE TABLE OF lv_line.
lv_command = 'ls -l'.
CALL 'SYSTEM' ID 'COMMAND' FIELD lv_command
ID 'TAB' FIELD lt_tab.
LOOP AT lt_tab INTO lv_line.
WRITE: / lv_line.
ENDLOOP.
获取刚刚调用的Tcode
DATA: lv_calling_tcode TYPE char64.
CALL 'GET_PARAM_TCOD' ID 'PTCOD' FIELD lv_calling_tcode.
WRITE: / lv_calling_tcode.
获取窗口的长和宽
DATA(lv_x_metric) = cl_gui_cfw=>compute_metric_from_dynp(