Hi All,
I have this simple code that tries to display a second list in a different screen (100) when the user double click a line.
The title of the screen 100 is showing, but no output. The screen comes blank. I am trying to figure out why.
btw. When creating screen 100. I just activate it without adding any element.
to make sure my data and code is correct , I tried the same code in a different report without using any call screen. it works by displaying
a record details of the selected matnr.
What am I missing ?
Thank you.
********************************************************************************
TYPES: BEGIN OF TY_MARA,
MATNR TYPE MARA-MATNR,
MTART TYPE MARA-MTART,
MBRSH TYPE MARA-MBRSH,
MATKL TYPE MARA-MATKL,
MEINS TYPE MARA-MEINS,
END OF TY_MARA.
DATA : IT_MARA TYPE TABLE OF TY_MARA.
DATA : WA_MARA TYPE TY_MARA.
TYPES : BEGIN OF TY_MARA1,
MATNR TYPE MARA-MATNR,
ERSDA TYPE MARA-ERSDA,
ERNAM TYPE MARA-ERNAM,
END OF TY_MARA1.
DATA : IT_MARA1 TYPE TABLE OF TY_MARA1,
WA_MARA1 TYPE TY_MARA1.
PARAMETERS : P_MTART TYPE MARA-MTART.
START-OF-SELECTION.
SELECT MATNR MTART MBRSH MATKL MEINS FROM MARA up to 5 rows
INTO TABLE IT_MARA
WHERE MTART = P_MTART.
LOOP AT IT_MARA INTO WA_MARA.
WRITE :/ WA_MARA-MATNR, WA_MARA-MTART, WA_MARA-MBRSH, WA_MARA-MATKL, WA_MARA-MEINS.
HIDE WA_MARA.
ENDLOOP.
AT LINE-SELECTION.
SELECT MATNR ERSDA ERNAM FROM MARA INTO TABLE IT_MARA1 WHERE MATNR = WA_MARA-MATNR.
CALL SCREEN 100.
*&---------------------------------------------------------------------*
*& Module STATUS_0100 OUTPUT
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
MODULE STATUS_0100 OUTPUT.
SET PF-STATUS 'STATUS1'.
SET TITLEBAR 'TITLE1'.
LOOP AT IT_MARA1 INTO WA_MARA1.
WRITE:/ WA_MARA1-MATNR,
WA_MARA1-ERSDA,
WA_MARA1-ERNAM.
ENDLOOP.
ENDMODULE. " STATUS_0100 OUTPUT
*&---------------------------------------------------------------------*
*& Module USER_COMMAND_0100 INPUT
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
MODULE USER_COMMAND_0100 INPUT.
ENDMODULE. " USER_COMMAND_0100 INPUT