Scribd
Upload
138 views

Interactive Report in ABAP

Interactive reports in SAP allow drilling down through related data in multiple tables. They can be executed via line selection, function keys, or user commands. The document provides examples of code using each execution method. It also explains system variables like SY-LSIND that indicate the current level of the interactive report and SY-UCOMM which captures the user's command. The last lines announce that the next topic will be menu painters.

Uploaded by

Kapil Sharma
Copyright
© © All Rights Reserved
Available Formats
Download as TXT, PDF, TXT or read online on Scribd
138 views

Interactive Report in ABAP

Interactive reports in SAP allow drilling down through related data in multiple tables. They can be executed via line selection, function keys, or user commands. The document provides examples of code using each execution method. It also explains system variables like SY-LSIND that indicate the current level of the interactive report and SY-UCOMM which captures the user's command. The last lines announce that the next topic will be menu painters.

Uploaded by

Kapil Sharma
Copyright
© © All Rights Reserved
Available Formats
Download as TXT, PDF, TXT or read online on Scribd
You are on page 1/ 3

2.

INTERACTIVE REPORT (DRILL-DOWN REPORT


==================================================
events :
1.at line-selection : user clicks on the line of the report

2.at pf<key> : at the press of function keys (f1 to f12)


user executes the report

3.at user-command: the user gives the command to execute the


report

SY-LSIND : SYSTEM LIST INDEX : IT IS USED TO NAVIGATE


IN A INTERACTIVE REPORT
IF SY-LSIND = 0 IT IS FIRST REPORT KNOWN AS BASIC LIST.
IF SY-LSIND = 1 IT IS SECOND REPORT GENERATED FROM FRIST
IT IS KNOWN AS SECONDARY LIST NO 1
...
IF SY-LSIND = 20 (MAX LIST NO)
note: if user clicks on 20th secondary list it will go to
runtime error

HOTSPOT-ON : KEYWORD TO DISPLAY HAND ICON AS MOUSE POINTER.

HIDE<FIELD NAME> : IT IS USED TO PASS THE INPUT TO THE


NEXT REPORT IN THE INTERACTIVE REPORT.
==============================================
1.AT-LINE-SELECTION

*PROGRAM USING AT LINE-SELECTION


TABLES: LFA1, EKKO, EKPO. "LFA1: VENDOR TABLE, EKKO: PURCHASE ORDER TABLE, EKPO:
ITEMS TABLE

WRITE:/ 'VENDOR INFORMATION REPORT' COLOR 4.


ULINE.
SELECT * FROM LFA1.
WRITE:/ LFA1-LIFNR HOTSPOT ON, 20 LFA1-NAME1, 60 LFA1-LAND1.
HIDE LFA1-LIFNR.
ENDSELECT.

START-OF-SELECTION.
AT LINE-SELECTION.
CASE SY-LSIND.
WHEN 1.
WRITE:/ 'PURCHASE ORDER INFORMATION' COLOR 4.
ULINE.
SELECT * FROM EKKO WHERE LIFNR = LFA1-LIFNR.
WRITE:/ EKKO-EBELN HOTSPOT ON, 40 EKKO-AEDAT HOTSPOT ON.
HIDE EKKO-EBELN.
ENDSELECT.

WHEN 2.
WRITE:/ 'ITEMS DETAILS INFORMATION' COLOR 5.
ULINE.
SELECT * FROM EKPO WHERE EBELN = EKKO-EBELN.
WRITE:/ EKPO-EBELP, EKPO-MATNR.
ENDSELECT.
ENDCASE.

END-OF-SELECTION.
================================================================

*PROGRAM FOR AT PF-KEY


TABLES: KNA1, LFA1, MARA.

WRITE:/ 'F4: CUSTOMER INFO, F5: VENDOR INFO, F6: MATERIAL INFO, F13: EXIT'.
*F13: SHIFT+ F1

START-OF-SELECTION.

AT PF4.
WRITE:/ 'CUSTOMER INFORMATION REPORT' COLOR 6.
ULINE.
SELECT * FROM KNA1.
WRITE:/ KNA1-KUNNR, 20 KNA1-NAME1, 40 KNA1-LAND1.
ENDSELECT.

AT PF5.
WRITE:/ 'VENDOR INFORMATION REPORT' COLOR 4.
ULINE.
SELECT * FROM LFA1.
WRITE:/ LFA1-LIFNR, 20 LFA1-NAME1, 40 LFA1-LAND1.
ENDSELECT.

AT PF6.
WRITE:/ 'MATERIAL INFORMATION REPORT' COLOR 7.
ULINE.
SELECT * FROM MARA.
WRITE:/ MARA-MATNR.
ENDSELECT.

AT PF13.
LEAVE PROGRAM.

END-OF-SELECTION.

====================================================================

*PROGRAM FOR AT USER-COMMAND


TABLES: KNA1, LFA1, MARA.

WRITE:/ 'C01: CUSTOMER INFO, V01: VENDOR INFO, M01: MATERIAL INFO, EXI: EXIT'.

START-OF-SELECTION.

AT USER-COMMAND.
CASE SY-UCOMM.
WHEN 'C01'.
WRITE:/ 'CUSTOMER INFORMATION REPORT' COLOR 6.
ULINE.
SELECT * FROM KNA1.
WRITE:/ KNA1-KUNNR, 20 KNA1-NAME1, 40 KNA1-LAND1.
ENDSELECT.

WHEN 'V01'.
WRITE:/ 'VENDOR INFORMATION REPORT' COLOR 4.
ULINE.
SELECT * FROM LFA1.
WRITE:/ LFA1-LIFNR, 20 LFA1-NAME1, 40 LFA1-LAND1.
ENDSELECT.

WHEN 'M01'.
WRITE:/ 'MATERIAL INFORMATION REPORT' COLOR 7.
ULINE.
SELECT * FROM MARA.
WRITE:/ MARA-MATNR.
ENDSELECT.

WHEN 'EXI'.
LEAVE PROGRAM.

WHEN OTHERS.
WRITE:/ 'INVALID COMMAND EXECUTED'.
ENDCASE.

END-OF-SELECTION.
===========================================================
SY-UCOMM: SYSTEM IS CAPTURING THE COMMAND GIVEN BY THE USER
============================================================
(NOTE: 17TH,18TH 19TH CLASSES RECORDING IN DROPBOX)
==============================================================
NEXT CLASS : MENU PAINTER
============================================================

You might also like