Push Button

[Former Member]

hi!

How to Include a Push Button using SELECT-SCREEN?

I tried by Using . . .

SELECTION-SCREEN BEGIN OF SCREEN 99.

SELECTION-SCREEN INCLUDE PUSHBUTTON 35(20) pubu

USER-COMMAND us02.

SELECTION-SCREEN END OF SCREEN 99.

Regards,

Nagulan

[former_member223537]

TABLES sscrfields. 
TYPE-POOLS icon. 

SELECTION-SCREEN: 
  BEGIN OF SCREEN 500 AS WINDOW TITLE title, 
    PUSHBUTTON 2(10)  but1 USER-COMMAND cli1, 
    PUSHBUTTON 12(30) but2 USER-COMMAND cli2 
                           VISIBLE LENGTH 10, 
  END OF SCREEN 500. 

AT SELECTION-SCREEN. 
  CASE sscrfields. 
    WHEN 'CLI1'. 
      ... 
    WHEN 'CLI2'. 
      ... 
  ENDCASE. 

START-OF-SELECTION. 
  title  = 'Push button'. 
  but1 = 'Button 1'. 

  CALL FUNCTION 'ICON_CREATE' 
    EXPORTING 
      name   = icon_information 
      text   = 'Button 2' 
      info   = 'My Quickinfo' 
    IMPORTING 
      RESULT = but2 
    EXCEPTIONS 
      OTHERS = 0. 

  CALL SELECTION-SCREEN '0500' STARTING AT 10 10.

[Former Member]

hi! Prashant Patil

Thanks for your Reply.

Yes its working , i have another Query too.

is there any possible to create Pushbuttons within a block after select-options.

Thanks and Regards,

Nagulan

[former_member223537]

Hi,

Yes its possible.

You can create another selection block & add push button in the same manner.

Best regards,

Prashant