REPORT ZALV_JOINS.
TABLES : T024I.TYPES : BEGIN OF TY_MAT,
IWERK TYPE IWERK, "Maintenance Planning Plant
INGRP TYPE INGRP, "Planner Group for Customer Service and Plant Maintenance
ERDAT TYPE ICRDT, "Date on which the object was created
TPLNR TYPE TPLNR, "Functional Location
PLTXT TYPE PLTXT, "Description of functional location
END OF TY_MAT.
DATA : IT_MAT TYPE TABLE OF TY_MAT,
WA_MAT TYPE TY_MAT.
SELECT-OPTIONS : S_IWERK FOR T024I-IWERK.
START-OF-SELECTION.
SELECT
T024I~IWERK,
T024I~INGRP,
IFLOT~ERDAT,
IFLOT~TPLNR,
IFLOTX~PLTXT INTO TABLE @IT_MAT
FROM T024I INNER JOIN IFLOT
ON T024I~IWERK = IFLOT~IWERK
JOIN IFLOTX
ON IFLOT~TPLNR = IFLOTX~TPLNR
WHERE T024I~IWERK IN @S_IWERK
and spras = @sy-langu.
"THE OUT PUT SCREEN LIKE NORMAL ALV OUTPUT/CALLED FACTORY METHOD.
DATA: O_ALV TYPE REF TO CL_SALV_TABLE.
DATA: LX_MSG TYPE REF TO CX_SALV_MSG.
TRY.
CL_SALV_TABLE=>FACTORY(
IMPORTING
R_SALV_TABLE = O_ALV
CHANGING
T_TABLE = IT_MAT ).
CATCH CX_SALV_MSG INTO LX_MSG.
ENDTRY.
O_ALV->DISPLAY( ).
OUTPUT:
Input screen :
No comments:
Post a Comment