Application Development 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: 

Output more than once ALV on screen

abbasi_sadikot
Explorer
0 Kudos

Hi,

We want to display data from 3 different internal tables on 3 different ALVs on output subscreen. i dont want to call a new screen but display all 3 ALVs one after other on single subscreen.

Kindly send any code blocks. I would prefer to do this using "Docking container" or with use of similar containers. Also suggest how i can insert some text lines between ALVs on output screen.

Kindly assist asap.

Best Regards,

Abbasi

3 REPLIES 3

Former Member
0 Kudos

HI

here 2 alv output in one screen

&----


*& Report ZAMIT_ALVOOPS

*&

&----


*&

*&

&----


REPORT ZNNR_ALVOOPS_SCREEN.

tables: mara,spfli.

types: begin of ty_tab,

matnr type mara-matnr,

ernam type mara-ernam,

ersda type mara-ersda,

end of ty_tab.

DATA ITAB1 TYPE TABLE OF SPFLI.

DATA WA1 LIKE LINE OF ITAB1.

DATA IO1 TYPE SPFLI-CARRID VALUE 'AA'.

data itab type table of ty_tab.

data wa like line of itab.

DATA OK_CODE TYPE SY-UCOMM.

DATA: GRID TYPE REF TO CL_GUI_ALV_GRID,

CONT TYPE REF TO CL_GUI_CUSTOM_CONTAINER.

DATA: GRID1 TYPE REF TO CL_GUI_ALV_GRID,

CONTA TYPE REF TO CL_GUI_CUSTOM_CONTAINER.

CREATE OBJECT CONT EXPORTING CONTAINER_NAME = 'CONT1' .

CREATE OBJECT GRID EXPORTING I_PARENT = CONT .

CREATE OBJECT CONTA EXPORTING CONTAINER_NAME = 'CONT2' .

CREATE OBJECT GRID1 EXPORTING I_PARENT = CONTA .

selection-screen begin of block b1 with frame title text-100.

select-options: s_matnr for mara-matnr.

selection-screen end of block b1.

select matnr ernam ersda from mara into corresponding fields of table itab up to 15 rows

where matnr in s_matnr .

call selection-screen 100.

&----


*& Module USER_COMMAND_0100 INPUT

&----


  • text

----


MODULE USER_COMMAND_0100 INPUT.

if ok_code = 'PB1'.

leave to screen 0.

else.

leave to screen 100.

endif.

ENDMODULE. " USER_COMMAND_0100 INPUT

&----


*& Module STATUS_0100 OUTPUT

&----


  • text

----


MODULE STATUS_0100 OUTPUT.

  • SET PF-STATUS 'xxxxxxxx'.

  • SET TITLEBAR 'xxx'.

SELECT * FROM SPFLI INTO

CORRESPONDING FIELDS OF TABLE ITAB1 WHERE CARRID = IO1.

CALL METHOD grid->SET_TABLE_FOR_FIRST_DISPLAY

EXPORTING

  • I_BUFFER_ACTIVE =

  • I_BYPASSING_BUFFER =

  • I_CONSISTENCY_CHECK =

I_STRUCTURE_NAME = 'MARA'

  • IS_VARIANT =

  • I_SAVE =

  • I_DEFAULT = 'X'

  • IS_LAYOUT =

  • IS_PRINT =

  • IT_SPECIAL_GROUPS =

  • IT_TOOLBAR_EXCLUDING =

  • IT_HYPERLINK =

  • IT_ALV_GRAPHICS =

  • IT_EXCEPT_QINFO =

  • IR_SALV_ADAPTER =

CHANGING

IT_OUTTAB = itab.

  • IT_FIELDCATALOG =

  • IT_SORT =

  • IT_FILTER =

  • EXCEPTIONS

  • INVALID_PARAMETER_COMBINATION = 1

  • PROGRAM_ERROR = 2

  • TOO_MANY_LINES = 3

  • others = 4

.

IF SY-SUBRC <> 0.

  • MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

  • WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

CALL METHOD GRID1->SET_TABLE_FOR_FIRST_DISPLAY

EXPORTING

I_STRUCTURE_NAME = 'SPFLI'

CHANGING

IT_OUTTAB = ITAB1.

ENDMODULE. " STATUS_0100 OUTPUT

0 Kudos

Hi,

Should my screen 0100 be Main ? I am trying to display these ALVs on subscreen.

Please revert.

Abbasi

abbasi_sadikot
Explorer
0 Kudos

Hi Naresh,

This is not working for me. The output screen does not show anything. M i doing something wrong?