Application Development Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 

call selection screen

Former Member
0 Kudos

Hi all

can u plz help me answering this...where would you typically see the code "call selection-screen"..

choices r

1 start of selection

2 top of page

3 at line-selection

4 at selection-screen

Thanks in advance

popin

3 REPLIES 3

Former Member
0 Kudos

at selection-screen

0 Kudos

Hi sreekanth

Thanks for ur reply.not able to give u points for some reason.

Regards

popin

0 Kudos

check the below code,

REPORT zex24 .

TABLES : sscrfields,

vbak.

SELECTION-SCREEN BEGIN OF BLOCK sel1 WITH FRAME TITLE tit1.

SELECTION-SCREEN BEGIN OF LINE.

SELECTION-SCREEN :PUSHBUTTON 2(15) text-101 USER-COMMAND clk1.

SELECTION-SCREEN END OF LINE.

SELECTION-SCREEN BEGIN OF LINE.

SELECTION-SCREEN :PUSHBUTTON 2(15) text-102 USER-COMMAND clk2.

SELECTION-SCREEN END OF LINE.

SELECTION-SCREEN END OF BLOCK sel1.

SELECTION-SCREEN BEGIN OF SCREEN 500 AS WINDOW.

SELECTION-SCREEN BEGIN OF BLOCK sel2

WITH FRAME TITLE tit2.

PARAMETER : ch1 AS CHECKBOX,

ch2 AS CHECKBOX,

ch3 AS CHECKBOX.

SELECTION-SCREEN END OF BLOCK sel2.

SELECTION-SCREEN END OF SCREEN 500.

SELECTION-SCREEN BEGIN OF SCREEN 600.

SELECTION-SCREEN BEGIN OF BLOCK sel4

WITH FRAME TITLE tit4.

SELECT-OPTIONS : vbeln FOR vbak-vbeln MODIF ID md1,

kunnr FOR vbak-kunnr MODIF ID md2,

bstnk FOR vbak-bstnk MODIF ID md3.

SELECTION-SCREEN END OF BLOCK sel4.

SELECTION-SCREEN END OF SCREEN 600.

SELECTION-SCREEN BEGIN OF SCREEN 501 AS WINDOW.

SELECTION-SCREEN BEGIN OF BLOCK sel3

WITH FRAME TITLE tit3.

PARAMETER : ch4 AS CHECKBOX,

ch5 AS CHECKBOX.

SELECTION-SCREEN END OF BLOCK sel3.

SELECTION-SCREEN END OF SCREEN 501.

AT SELECTION-SCREEN.

CASE sscrfields.

WHEN 'CLK1'.

<b> CALL SELECTION-SCREEN 500 STARTING AT 10 5.

CALL SELECTION-SCREEN 600.</b>

WHEN 'CLK2'.

<b> CALL SELECTION-SCREEN 501 STARTING AT 10 10.</b>

ENDCASE.

AT SELECTION-SCREEN OUTPUT.

IF ch1 = ' '.

LOOP AT SCREEN.

IF screen-group1 = 'MD1'.

screen-input = '0'.

screen-active = '0'.

MODIFY SCREEN.

CONTINUE.

ENDIF.

ENDLOOP.

ENDIF.

IF ch2 = ' '.

LOOP AT SCREEN.

IF screen-group1 = 'MD2'.

screen-input = '0'.

screen-active = '0'.

MODIFY SCREEN.

CONTINUE.

ENDIF.

ENDLOOP.

ENDIF.

IF ch3 = ' '.

LOOP AT SCREEN.

IF screen-group1 = 'MD3'.

screen-input = '0'.

screen-active = '0'.

MODIFY SCREEN.

CONTINUE.

ENDIF.

ENDLOOP.

ENDIF.

START-OF-SELECTION.

tit2 = 'Input Screen'.

tit3 = 'Output Screen'.

WRITE : / 'CH1 = ' , ch1 ,

/ 'CH2 = ' , ch2,

/ 'CH3 = ' , ch3,

/ 'CH4 = ' , ch4,

/ 'CH5 = ' , ch5 .