‎2007 Feb 09 12:48 PM
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
‎2007 Feb 09 12:53 PM
‎2007 Feb 09 12:55 PM
Hi sreekanth
Thanks for ur reply.not able to give u points for some reason.
Regards
popin
‎2007 Feb 09 12:58 PM
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 .