dynpro画面跳转和状态栏添加

  LEAVE TO LIST-PROCESSING.

 

  IF OK_CODE = 'END'.
    LEAVE PROGRAM.
  ELSE.
    SET SCREEN 0.
  ENDIF.

 

 

状态栏添加

  DATA:
    L_IT_FCODE      TYPE TABLE OF SY-UCOMM.

  IF ZTCF030_S01-SHORISTS = '9'.
    APPEND 'SAVE' TO L_IT_FCODE.
    SET PF-STATUS 'STS_9000' EXCLUDING L_IT_FCODE.
  ELSE.
    SET PF-STATUS 'STS_9000'.
  ENDIF.
  SET TITLEBAR 'TTL_9000'.