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

subscreen

Former Member
0 Likes
643

i want that if i check a checkbox a subscreen should come how can i code this in report program.

4 REPLIES 4
Read only

Former Member
0 Likes
623

Hi

Design the required Normal screen/Subscreen in SE51 first with the required fields

and then from the Report

you use the command in start of selection

if v_chk = 'X'.

CALL SCREEN 200.

endif.

Reward points for useful Answers

Regards

Anji

Read only

Former Member
0 Likes
623

hi,

try like this

parameters: c1 type checkbox default 'X'.

if c1 = 'X'.

call screen 200 startina at 25 56.

endif.

if helpful reward some points.

with regards,

suresh.

Read only

Former Member
0 Likes
623

Hi,

In module pool programming.

In PBO write a module where write this code.

if v_check = 'X'.
  call screen '0110'. " The subscreen number
endif.

Regards,

Richa

Read only

Former Member
0 Likes
623

Hi,

see this example.this is an example of tab strip.in this example screen 1001 is normal screen and screens 2001 and 2002 are sub screens.

for better understanding see the system defined example programs

demo_dynpro_tabstrip_local,demo_dynpro_tabstrip_server.

PROGRAM ZBHTSTRIP.

DATA:OKCODE LIKE SY-UCOMM.

DATA: N1 TYPE I, N2 TYPE I, R1 TYPE I, R2 TYPE I.

DATA SCRNO(4) TYPE N VALUE 2001.

CONTROLS TABS TYPE TABSTRIP.

MODULE USER_COMMAND_1001 INPUT.

CASE OKCODE.

WHEN 'ADD'.

R1 = N1 + N2.

SCRNO = 2001.

TABS-ACTIVETAB = OKCODE.

WHEN 'MUL'.

R2 = N1 * N2.

SCRNO = 2002.

TABS-ACTIVETAB = OKCODE.

WHEN 'BACK'.

SET SCREEN 0.

WHEN 'CLEA'.

CLEAR: N1,N2.

ENDCASE.

ENDMODULE. " USER_COMMAND_1001 INPUT

FORM ON_CTMENU_FORM1 USING MENU1 TYPE REF TO CL_CTMENU.

CALL METHOD MENU1->LOAD_GUI_STATUS

EXPORTING

PROGRAM = 'ZBHTSTRIP'

STATUS = 'MENU1'

MENU = MENU1.

CALL METHOD MENU1->ADD_FUNCTION

EXPORTING

FCODE = 'EXIT'

TEXT = 'EXIT'.

ENDFORM.

MODULE STATUS_1001 OUTPUT.

  • SET PF-STATUS 'xxxxxxxx'.

SET TITLEBAR 'TIT1001'.

ENDMODULE. " STATUS_1001 OUTPUT

FLOW LOGIC:

PROCESS BEFORE OUTPUT.

MODULE STATUS_1001.

CALL SUBSCREEN SUBA INCLUDING 'ZBHTSTRIP' SCRNO.

*

PROCESS AFTER INPUT.

MODULE USER_COMMAND_1001.

  • CALL SUBSCREEN SUBA.

PROCESS BEFORE OUTPUT.

  • MODULE STATUS_2001.

*

PROCESS AFTER INPUT.

  • MODULE USER_COMMAND_2001.

PROCESS BEFORE OUTPUT.

  • MODULE STATUS_2002.

*

PROCESS AFTER INPUT.

  • MODULE USER_COMMAND_2002.

rgds,

bharat.