Application Development and Automation 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: 
Read only

selection screen

Former Member
0 Likes
850

hi all,

how can we create two selection screens for a report,plz let me know.imm points are awarded for all helpful answers

1 ACCEPTED SOLUTION
Read only

dani_mn
Active Contributor
0 Likes
594

HI,

1000 is a default selection screen. use this code to define your own selection screen. and

use

CALL selection-screen '123'.

<b>SELECTION-SCREEN BEGIN OF SCREEN 123 AS WINDOW TITLE TEXT-456. 
  SELECTION-SCREEN BEGIN OF BLOCK BL1 WITH FRAME TITLE TEXT-BL1 
                                      NO INTERVALS. 
    SELECT-OPTIONS SEL1 FOR SY-SUBRC. 
    PARAMETERS     PAR1 LIKE SPFLI-CARRID. 
    SELECTION-SCREEN COMMENT /10(20) TEXT-COM. 
  SELECTION-SCREEN END OF BLOCK BL1. 
SELECTION-SCREEN END OF SCREEN 123.</b>

Regards,

Wasim Ahmed

5 REPLIES 5
Read only

dani_mn
Active Contributor
0 Likes
595

HI,

1000 is a default selection screen. use this code to define your own selection screen. and

use

CALL selection-screen '123'.

<b>SELECTION-SCREEN BEGIN OF SCREEN 123 AS WINDOW TITLE TEXT-456. 
  SELECTION-SCREEN BEGIN OF BLOCK BL1 WITH FRAME TITLE TEXT-BL1 
                                      NO INTERVALS. 
    SELECT-OPTIONS SEL1 FOR SY-SUBRC. 
    PARAMETERS     PAR1 LIKE SPFLI-CARRID. 
    SELECTION-SCREEN COMMENT /10(20) TEXT-COM. 
  SELECTION-SCREEN END OF BLOCK BL1. 
SELECTION-SCREEN END OF SCREEN 123.</b>

Regards,

Wasim Ahmed

Read only

Former Member
0 Likes
594

Hi Nitha.........

REPORT ZABSS2 .

SELECTION-SCREEN BEGIN OF BLOCK MIX WITH FRAME TITLE TIT2.

SELECTION-SCREEN SKIP 1.

PARAMETERS : city(20) TYPE c DEFAULT 'NOIDA',

pin TYPE i DEFAULT 201301 NO-DISPLAY,

number TYPE p DECIMALS 5 OBLIGATORY,

test(16) MEMORY ID rid,

empname(10),

empname1(10) LOWER CASE VISIBLE LENGTH 5 OBLIGATORY,

p_carr LIKE spfli-carrid OBLIGATORY VALUE CHECK.

SELECTION-SCREEN END OF BLOCK MIX.

SELECTION-SCREEN BEGIN OF SCREEN 500 AS WINDOW.

SELECTION-SCREEN BEGIN OF BLOCK CHECKBLOCK WITH FRAME TITLE TEXT-003.

SELECTION-SCREEN SKIP 1.

PARAMETERS : a AS CHECKBOX,

b AS CHECKBOX DEFAULT 'X',

c AS CHECKBOX DEFAULT 'X',

d AS CHECKBOX.

SELECTION-SCREEN END OF BLOCK CHECKBLOCK.

SELECTION-SCREEN END OF SCREEN 500.

SELECTION-SCREEN BEGIN OF SCREEN 800 AS WINDOW.

SELECTION-SCREEN INCLUDE BLOCKS CHECKBLOCK.

SELECTION-SCREEN BEGIN OF BLOCK RAD1BLOCK WITH FRAME TITLE TIT1.

PARAMETERS : r1 RADIOBUTTON GROUP rad1,

r2 RADIOBUTTON GROUP rad1,

r3 RADIOBUTTON GROUP rad1 DEFAULT 'X'.

SELECTION-SCREEN END OF BLOCK RAD1BLOCK.

SELECTION-SCREEN END OF SCREEN 800.

*INITIALIZATION.

*TIT1 = 'CALLING RADIO BUTTON'.

*TIT2 = 'FIRST MIX SCREEN'.

AT SELECTION-SCREEN.

CASE SY-DYNNR.

WHEN '0800'.

MESSAGE W159(ZVIKALP) WITH text-004 .

WHEN '0500'.

MESSAGE W011(ZVIKALP).

WHEN '1000'.

MESSAGE I022(ZVIKALP).

ENDCASE.

START-OF-SELECTION.

TIT1 = 'CALLING RADIO BUTTON'.

TIT2 = 'FIRST MIX SCREEN'.

CALL SELECTION-SCREEN 500 ."STARTING AT 10 10.

CALL SELECTION-SCREEN 800 STARTING AT 10 10.

TIT2 = 'MIX SCREEN AGAIN'.

CALL SELECTION-SCREEN 1000 STARTING AT 10 10.

end-of-selection.

Read only

Former Member
0 Likes
594

hi,

yes

chetan vishnoi

Read only

Former Member
0 Likes
594

Hi,

You can create two selection screens.

One by default is 1000. This is executed by default in nay program when executed.

Others can be created using the statement

SELECTION-SCREEN BEGIN OF SCREEN 2000.
SELECT-OPTIONS : matnr FOR mara-matnr.
SELECTION-SCREEN END OF SCREEN 2000.

This has to be explicitly called in the program based on soem condition to execute it using the statement.

CALL SELECTION-SCREEN <b>2000</b>.

Consider this sample report.

Copy and execute to get feel of this.


REPORT zztest.
TABLES : mara, kna1.
 
PARAMETERS : cust  RADIOBUTTON GROUP abc USER-COMMAND abc,
             mat   RADIOBUTTON GROUP abc.
 
SELECTION-SCREEN BEGIN OF SCREEN 2000.
SELECT-OPTIONS : matnr FOR mara-matnr.
SELECTION-SCREEN END OF SCREEN 2000.
 
SELECTION-SCREEN BEGIN OF SCREEN 3000.
SELECT-OPTIONS : customer FOR kna1-kunnr.
SELECTION-SCREEN END OF SCREEN 3000.
 
 
AT SELECTION-SCREEN.
 
  IF sy-ucomm EQ 'ABC'.
    IF cust IS NOT INITIAL.
 
      CALL SELECTION-SCREEN 3000.
 
    ELSEIF  mat IS NOT INITIAL.
 
      CALL SELECTION-SCREEN 2000.
 
    ENDIF.
 
  ENDIF.

Refer this link for same discussion.

Regards,

AS.

Message was edited by: Arun Sambargi

Read only

Former Member
0 Likes
594

REPORT demo_call_standard_sel_screen.

Hi,

1.REPORT demo_call_standard_sel_screen.

SELECTION-SCREEN BEGIN OF BLOCK mysel WITH FRAME TITLE tit.

PARAMETERS: deptime TYPE spfli-deptime,

arrtime TYPE spfli-arrtime.

SELECTION-SCREEN END OF BLOCK mysel.

INITIALIZATION.

tit = 'Times'.

...

2.REPORT demo_call_selection_screen.

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

PARAMETERS: cityfr TYPE spfli-cityfrom,

cityto TYPE spfli-cityto.

SELECTION-SCREEN END OF BLOCK sel1.

SELECTION-SCREEN BEGIN OF SCREEN 500 AS WINDOW.

SELECTION-SCREEN INCLUDE BLOCKS sel1.

SELECTION-SCREEN BEGIN OF BLOCK sel2

WITH FRAME TITLE tit2.

PARAMETERS: airpfr TYPE spfli-airpfrom,

airpto TYPE spfli-airpto.

SELECTION-SCREEN END OF BLOCK sel2.

SELECTION-SCREEN END OF SCREEN 500.

INITIALIZATION.

tit1 = 'Cities'.

AT SELECTION-SCREEN.

CASE sy-dynnr.

WHEN '0500'.

MESSAGE w888(SABAPDOCU) WITH 'Screen 500'.

WHEN '1000'.

MESSAGE w888(SABAPDOCU) WITH 'Screen 1000'.

ENDCASE.

START-OF-SELECTION.

tit1 = 'Cities for Airports'.

tit2 = 'Airports'.

CALL SELECTION-SCREEN 500 STARTING AT 10 10.

tit1 = 'Cities again'.

CALL SELECTION-SCREEN 1000 STARTING AT 10 10.