ALV Report Total & Column Coloring – Practical 4


GRAND TOTAL & COLUMN COLORING in ALV REPORT

Best SAP ABAP Latest Course

SAP ABAP Fundamentals

SAP ABAP Interview Questions – Real Time

Step 1: Go to SE38 Tcode. Type the program name and choose Source Code from Sub objects and Click on Create button.

Step 2: Type Title & select ‘Executable Program’ type in Attributes and then click on save.

Step 3: Now enter the Package name in the ‘Package’ Attribute and click on the button.

Step 4: A new pop-up will open, select the TR and click on button.

 

Now ABAP Editor will open, here write the code given below for the report.


REPORT zalvexample4.
*Table Declaration

TABLES : vbap.

*Type Declaration

TYPE-POOLS : slis.

*Type Declaration

TYPES : BEGIN OF ty_vbap,

vbeln TYPE vbap-vbeln,
posnr TYPE vbap-posnr,
matnr TYPE vbap-matnr,
matkl TYPE vbap-matkl,
arktx TYPE vbap-arktx,
netwr TYPE vbap-netwr,
waerk TYPE vbap-waerk,
klmeng TYPE vbap-klmeng,
vrkme TYPE vbap-vrkme,

END OF ty_vbap.

*Data Declaration

DATA : gt_vbap TYPE STANDARD TABLE OF ty_vbap,
              wa_vbap TYPE ty_vbap.
DATA: gt_fcat TYPE slis_t_fieldcat_alv,
              wa_fcat LIKE LINE OF gt_fcat.

*Selection Screen
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
SELECT-OPTIONS : so_vbeln FOR vbap-vbeln.
SELECTION-SCREEN END OF BLOCK b1.

START-OF-SELECTION.

*Data Fetching

SELECT vbeln
posnr
matnr
matkl
arktx
netwr
waerk
klmeng
vrkme
FROM vbap INTO TABLE gt_vbap
WHERE vbeln IN so_vbeln.

*Field Catalog
wa_fcat-col_pos = ‘1’.
wa_fcat-fieldname = ‘VBELN’.
wa_fcat-tabname = ‘GT_VBAP’.
wa_fcat-seltext_m = ‘DOC NO.’.
wa_fcat-key = ‘X’.
APPEND wa_fcat TO gt_fcat.
CLEAR wa_fcat.

wa_fcat-col_pos = ‘2’.
wa_fcat-fieldname = ‘POSNR’.
wa_fcat-tabname = ‘GT_VBAP’.
wa_fcat-seltext_m = ‘ITEM NO.’.
APPEND wa_fcat TO gt_fcat.
CLEAR wa_fcat.

wa_fcat-col_pos = ‘3’.
wa_fcat-fieldname = ‘MATNR’.
wa_fcat-tabname = ‘GT_VBAP’.
wa_fcat-seltext_m = ‘MATERIAL NO.’.
APPEND wa_fcat TO gt_fcat.
CLEAR wa_fcat.

wa_fcat-col_pos = ‘4’.
wa_fcat-fieldname = ‘MATKL’.
wa_fcat-tabname = ‘GT_VBAP’.
wa_fcat-seltext_m = ‘MATERIAL GROUP’.
APPEND wa_fcat TO gt_fcat.
CLEAR wa_fcat.

wa_fcat-col_pos = ‘5’.
wa_fcat-fieldname = ‘ARKTX’.
wa_fcat-tabname = ‘GT_VBAP’.
wa_fcat-seltext_m = ‘DESCRIPTION’.
APPEND wa_fcat TO gt_fcat.
CLEAR wa_fcat.

wa_fcat-col_pos = ‘6’.
wa_fcat-fieldname = ‘NETWR’.
wa_fcat-tabname = ‘GT_VBAP’.
wa_fcat-seltext_m = ‘AMOUNT’.
wa_fcat-do_sum = ‘X’.
wa_fcat-emphasize = ‘C710’.
APPEND wa_fcat TO gt_fcat.
CLEAR wa_fcat.

wa_fcat-col_pos = ‘7’.
wa_fcat-fieldname = ‘WAERK’.
wa_fcat-tabname = ‘GT_VBAP’.
wa_fcat-seltext_m = ‘CURRENCY’.
APPEND wa_fcat TO gt_fcat.
CLEAR wa_fcat.

wa_fcat-col_pos = ‘8’.
wa_fcat-fieldname = ‘KLMENG’.
wa_fcat-tabname = ‘GT_VBAP’.
wa_fcat-seltext_m = ‘QUANTITY’.
wa_fcat-do_sum = ‘X’.
wa_fcat-emphasize = ‘C610’.
APPEND wa_fcat TO gt_fcat.
CLEAR wa_fcat.

wa_fcat-col_pos = ‘9’.
wa_fcat-fieldname = ‘VRKME’.
wa_fcat-tabname = ‘GT_VBAP’.
wa_fcat-seltext_m = ‘UNIT’.
APPEND wa_fcat TO gt_fcat.
CLEAR wa_fcat.

*Displaying ALV Grid Report
CALL FUNCTION ‘REUSE_ALV_GRID_DISPLAY’
EXPORTING
       i_callback_program = sy-repid
       it_fieldcat = gt_fcat
TABLES
       t_outtab = gt_vbap
* EXCEPTIONS
* PROGRAM_ERROR = 1
* OTHERS = 2
.
IF sy-subrc <> 0.
* Implement suitable error handling here
ENDIF.


OUTPUT

Best Laptops for ABAP Programmers

Step 1: Press F8.

Step 2: Again press F8 to execute the report.