topic Re: Regarding display objects in same screen in Application Development and Automation Discussions

Regarding display objects in same screen

Former Member — Thu, 30 Jul 2009 06:15:57 GMT

Hi Guru's,

I have a small problem here, i have developed a report having two screens, and now if the user click on any of the row of any of the two reports then another report should be displayed. I can easily use 2 screens and navigate through the second screen when the user clicks, but i want to use the same screen, by freeing the current grid and container, but i am unable to do it, can you please tell me the correct alternative?

Thanks & Regards,

Swordfish.

Re: Regarding display objects in same screen

Former Member — Thu, 30 Jul 2009 06:32:44 GMT

@swordfish

I am sorry I am not very clear with your requirement.

Are you writing a dialog program?

Regards,

Sumit Nene.

Re: Regarding display objects in same screen

Former Member — Thu, 30 Jul 2009 06:35:23 GMT

HI Sumeet,

Yeah it is a dialog program using OOPS. I wanna use one screen . instead of two.

The modules are given below.

&----

*& Module STATUS_9000 OUTPUT

&----

text

----

module STATUS_9000 output.

if o_docking is initial.

SET PF-STATUS 'ZSTATUS'. "GUI Status

SET TITLEBAR 'ZTITLE'. "Title

IF C_FI_CO EQ 'X'.

Creating Objects

perform create_objects.

Filling top of page

perform fill_top_of_page.

Filling the fieldcatalog table

perform build_fieldcat.

*Creating the final fieldcat

perform build_final_fieldcat.

Displaying the output

perform display_output.

ENDIF.

endif.

if o_docking2 is initial.

SET PF-STATUS 'ZSTATUS'. "GUI Status

SET TITLEBAR 'ZTITLE'. "Title

IF C_CO_FI EQ 'X'.

Creating Objects

perform create_objects2.

Filling top of page

perform fill_top_of_page2.

Filling the fieldcatalog table

perform build_fieldcat2.

*Creating the final fieldcat

perform build_copa_fieldcat.

Displaying the output

perform display_output2.

ENDIF.

endif.

endmodule. " STATUS_9000 OUTPUT

&----

*& Module USER_COMMAND_9000 INPUT

&----

----

module USER_COMMAND_9000 input.

data lv_ucomm type sy-ucomm.

lv_ucomm = sy-ucomm.

CASE lv_ucomm.

WHEN 'CANCEl' OR 'EXIT'.

perform free_objects.

LEAVE PROGRAM.

when 'BACK'.

IF C_FI_CO EQ 'X'.

perform free_objects.

ENDIF.

IF C_CO_FI EQ 'X'.

perform free_objects2.

ENDIF.

set screen '0'.

leave screen.

ENDCASE.

endmodule. " USER_COMMAND_9000 INPUT