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

attach subscreen to main screen..

Former Member
0 Likes
1,069

hi,

i need to design a screen as follows;

initial screen must display 4 radio buttons. and below that a subscreen area must display the selection options to be chosen. when the next radio button is selected, its relatd subscreen must appear below. whats the related code ?

i have created a main screen number say 1000 and subscreens by numbers 1001 and 1002. how to connect these ?

thks

1 ACCEPTED SOLUTION
Read only

Former Member
0 Likes
918

Hi Friend,

In The PBO of main screen(1000).

In flow logic editor you write this code.

Call subscreen <subscreen_name>

including <program_name> <subcreen_number>.

Check these links also.

http://help.sap.com/saphelp_nw04/Helpdata/EN/9f/dbabfe35c111d1829f0000e829fbfe/content.htm

http://help.sap.com/saphelp_46c/helpdata/en/9f/dbabfe35c111d1829f0000e829fbfe/content.htm

Hope this helps you.

Regards,

Chandra Sekhar

2 REPLIES 2
Read only

Former Member
0 Likes
919

Hi Friend,

In The PBO of main screen(1000).

In flow logic editor you write this code.

Call subscreen <subscreen_name>

including <program_name> <subcreen_number>.

Check these links also.

http://help.sap.com/saphelp_nw04/Helpdata/EN/9f/dbabfe35c111d1829f0000e829fbfe/content.htm

http://help.sap.com/saphelp_46c/helpdata/en/9f/dbabfe35c111d1829f0000e829fbfe/content.htm

Hope this helps you.

Regards,

Chandra Sekhar

Read only

Former Member
0 Likes
918

Check this sample program..may be it will help u..

REPORT ZSUBSCREEN.

TABLES: USR02, u201CLogon data

SSCRFIELDS. u201CFIELDS ON SELECTION SCREENS

*u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014

  • SUBSCREEN 1

*u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014

SELECTION-SCREEN BEGIN OF SCREEN 100 AS SUBSCREEN.

SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-010.

SELECT-OPTIONS: USERNAME FOR USR02-BNAME.

SELECTION-SCREEN END OF BLOCK B1.

SELECTION-SCREEN END OF SCREEN 100.

*u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014

  • SUBSCREEN 2

*u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014

SELECTION-SCREEN BEGIN OF SCREEN 200 AS SUBSCREEN.

SELECTION-SCREEN BEGIN OF BLOCK B2 WITH FRAME TITLE TEXT-020.

SELECT-OPTIONS: LASTLOGI FOR USR02-TRDAT.

SELECTION-SCREEN END OF BLOCK B2.

SELECTION-SCREEN END OF SCREEN 200.

*u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014

  • SUBSCREEN 3

*u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014

SELECTION-SCREEN BEGIN OF SCREEN 300 AS SUBSCREEN.

SELECTION-SCREEN BEGIN OF BLOCK B3 WITH FRAME TITLE TEXT-030.

SELECT-OPTIONS: CLASSTYP FOR USR02-CLASS.

SELECTION-SCREEN END OF BLOCK B3.

SELECTION-SCREEN END OF SCREEN 300.

  • STANDARD SELECTION SCREEN FOR SCROLLING LEFT AND RIGHT

SELECTION-SCREEN: FUNCTION KEY 1,

FUNCTION KEY 2.

SELECTION-SCREEN: BEGIN OF TABBED BLOCK SUB FOR 15 LINES,

END OF BLOCK SUB.

START-OF-SELECTION.

SELECT * FROM USR02 WHERE BNAME IN USERNAME

AND ERDAT IN LASTLOGI

AND CLASS IN CLASSTYP.

WRITE: / u2018User u2018, USR02-BNAME,

u2018Last Login Date u2018, USR02-TRDAT,

u2018Last Login Time u2018, USR02-LTIME,

u2018CLASS u2018, USR02-CLASS.

ENDSELECT.

END-OF-SELECTION.

INITIALIZATION.

  • SCREEN ICON LEFT AND RIGHT

SSCRFIELDS-FUNCTXT_01 = u2018@0D@u2019.

SSCRFIELDS-FUNCTXT_02 = u2018@0E@u2019.

SUB-PROG = SY-REPID.

SUB-DYNNR = 100.

AT SELECTION-SCREEN.

CASE SY-DYNNR.

WHEN 100.

IF SSCRFIELDS-UCOMM = u2018FC01u2032.

SUB-DYNNR = 300.

ELSEIF SSCRFIELDS-UCOMM = u2018FC02u2032.

SUB-DYNNR = 200.

ENDIF.

WHEN 200.

IF SSCRFIELDS-UCOMM = u2018FC01u2032.

SUB-DYNNR = 100.

ELSEIF SSCRFIELDS-UCOMM = u2018FC02u2032.

SUB-DYNNR = 300.

ENDIF.

WHEN 300.

IF SSCRFIELDS-UCOMM = u2018FC01u2032.

SUB-DYNNR = 200.

ELSEIF SSCRFIELDS-UCOMM = u2018FC02u2032.

SUB-DYNNR = 100.

ENDIF.

ENDCASE.

Regards,

Joy.