abap 给Tab分配一个子屏幕，分配的方式有动态分配与静态分配

*-----------------------------------------------------------------------------------

*动态方式分配

*-----------------------------------------------------------------------------------

TABLES SSCRFIELDS.

SELECTION-SCREEN BEGIN OF SCREEN 100 AS SUBSCREEN.

  PARAMETERS: P1 TYPE C LENGTH 10,
              P2 TYPE C LENGTH 10,
              P3 TYPE C LENGTH 10.

SELECTION-SCREEN END OF SCREEN 100.

SELECTION-SCREEN BEGIN OF SCREEN 200 AS SUBSCREEN.

  PARAMETERS: Q1 TYPE C LENGTH 10,
              Q2 TYPE C LENGTH 10,
              Q3 TYPE C LENGTH 10.

SELECTION-SCREEN END OF SCREEN 200.

SELECTION-SCREEN: BEGIN OF TABBED BLOCK MYTAB FOR 10 LINES,

                  TAB (20) BUTTON1 USER-COMMAND PUSH1,
                  TAB (20) BUTTON2 USER-COMMAND PUSH2,
                  END OF BLOCK MYTAB.

INITIALIZATION.
  BUTTON1 = 'SELECTION SCREEN 1'.
  BUTTON2 = 'SELECTION SCREEN 2'.

  MYTAB-PROG      = SY-REPID.
  MYTAB-DYNNR     = 100.
  MYTAB-ACTIVETAB = 'PUSH1'.

AT SELECTION-SCREEN.
  CASE SY-DYNNR.
    WHEN 1000.
      CASE SY-UCOMM.
        WHEN 'PUSH1'.
          MYTAB-DYNNR = 100.
        WHEN 'PUSH2'.
          MYTAB-DYNNR = 200.
      ENDCASE.
  ENDCASE.

*-----------------------------------------------------------------------------------

*静态方式分配

*-----------------------------------------------------------------------------------

SELECTION-SCREEN BEGIN OF SCREEN 100 AS SUBSCREEN.

  PARAMETERS: P1 TYPE C LENGTH 10,
              P2 TYPE C LENGTH 10,
              P3 TYPE C LENGTH 10.

SELECTION-SCREEN END OF SCREEN 100.

SELECTION-SCREEN BEGIN OF SCREEN 200 AS SUBSCREEN.

  PARAMETERS: Q1 TYPE C LENGTH 10,
              Q2 TYPE C LENGTH 10,
              Q3 TYPE C LENGTH 10.

SELECTION-SCREEN END OF SCREEN 200.

SELECTION-SCREEN: BEGIN OF TABBED BLOCK MYTAB FOR 10 LINES,

  TAB (20) BUTTON1 USER-COMMAND PUSH1
                   DEFAULT SCREEN 100,

  TAB (20) BUTTON2 USER-COMMAND PUSH2
                   DEFAULT SCREEN 200,

END OF BLOCK MYTAB.

INITIALIZATION.
  BUTTON1 = 'SELECTION SCREEN 1'.
  BUTTON2 = 'SELECTION SCREEN 2'.