复制 GUI 状态

FORM frm_set_pf_status USING pt_extab TYPE slis_t_extab.
*--·状态 'STANDARD'是从系统功能组 KKBL GUI状态下的”STANDARD“下右键复制过去的
  DATA: l_rc(5).
  PERFORM copy_status_diff_progs_new IN PROGRAM saplsmpe IF FOUND
 USING 'X' 'SAPLKKBL' sy-repid 'STANDARD_FULLSCREEN' 'STATUS_ALV'
 CHANGING l_rc.

*   SET PF-STATUS 'STANDARD' EXCLUDING pt_extab.
*--·如果要排除按钮的话，需要在此处加上EXCLUDING PT_EXTAB
*  SET TITLEBAR 'TITLE'.
ENDFORM.                    "frm_set_pf_status

  CASE r_ucomm.
    WHEN 'E'."返回

      LEAVE TO SCREEN 0.
    WHEN 'ENDE'."退出
      LEAVE PROGRAM.
    WHEN 'ECAN'."取消
      LEAVE PROGRAM.
endcase.

  SET PF-STATUS 'SHBTCEVT' OF PROGRAM 'SAPLBTCH'.

  LEAVE TO LIST-PROCESSING AND RETURN TO SCREEN 9400.

SPAN { font-family: "Arial monospaced for SAP"; font-size: 10pt; color: rgba(0, 0, 0, 1); background: rgba(255, 255, 255, 1) }
.L0S32 { color: rgba(51, 153, 255, 1) }
.L0S33 { color: rgba(77, 166, 25, 1) }
.L0S52 { color: rgba(0, 0, 255, 1) }
.L0S55 { color: rgba(128, 0, 128, 1) }