topic Re: subscreen in Application Development and Automation Discussions

subscreen

Former Member — Fri, 22 Jun 2007 05:35:40 GMT

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

Re: subscreen

Former Member — Fri, 22 Jun 2007 05:38:46 GMT

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

Re: subscreen

Former Member — Fri, 22 Jun 2007 05:40:39 GMT

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.

Re: subscreen

Former Member — Fri, 22 Jun 2007 05:46:37 GMT

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

Re: subscreen

Former Member — Fri, 22 Jun 2007 05:51:26 GMT

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.