Quantcast
Channel: SCN: Message List
Viewing all articles
Browse latest Browse all 8652

Re: tabstrip on selection screen

$
0
0

Hello,

 

Assign a user command to each tab strip as follows.

 

************************************************************************

SELECTION-SCREEN BEGIN OF BLOCK sel .

************************************************************************

SELECTION-SCREEN SKIP.

*---------------------------* TABSTRIP *-------------------------------*

SELECTION-SCREEN BEGIN OF TABBED BLOCK tabb1 FOR 15 LINES.

SELECTION-SCREEN TAB (40) title1 USER-COMMAND ucomm1 DEFAULT SCREEN 1001.

SELECTION-SCREEN TAB (40) title2 USER-COMMAND ucomm2 DEFAULT SCREEN 1002.

SELECTION-SCREEN TAB (40) title3 USER-COMMAND ucomm3 DEFAULT SCREEN 1003.

SELECTION-SCREEN END OF BLOCK tabb1.

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

SELECTION-SCREEN END OF BLOCK sel.



In this case the first tabstrip has the user command UCOMM1, the second tabstrip has the user command UCOMM2 and likewise for the third and last tabstrip.


Now in the START-OF-SELECTION event.


Start by doing a case for active tabs before doing a check which radio button is selected as follows.


CASE tabb1-activetab.

 

     WHEN 'UCOMM1'.  "First tabstrip

 

          CASE 'X'. "To check which radio button is checked

 

           "Here you do the processing upon the radio button selected.

 

          WHEN radio_button1

               CALL TRANSACTION 'SE38'.

 

 

          ENDCASE.



     WHEN 'UCOMM2'.  "Second tabstrip


          CASE 'X'. "To check which radio button is checked

     

          "Here you do the processing upon the radio button selected.

 

          WHEN radio_button2

               CALL TRANSACTION 'SE11'.

 

 

          ENDCASE.

 

     WHEN 'UCOMM3'.  "Third tabstrip


          CASE 'X'. "To check which radio button is checked

     

          "Here you do the processing upon the radio button selected.

 

          WHEN radio_button3.

               CALL TRANSACTION 'SE09'.

 

 

          ENDCASE.



ENDCASE.



Hope it helps.


Thanks and Kind Regards,

Yovish.




Viewing all articles
Browse latest Browse all 8652

Trending Articles