Application Development and Automation 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: 
Read only

regarding ALV

Former Member
0 Likes
542

Hi ,

Can anyone send me the ALV Documentation and rough code...

Also how to send the alv output to external mail.

How to convert the ALV output as graphs.

Rewards points for best answers

Hi ,

Can anyone send me the ALV Documentation and rough code...

Also how to send the alv output to external mail.

How to convert the ALV output as graphs.

Rewards points for best answers

3 REPLIES 3
Read only

Former Member
0 Likes
524

Simple ALV report

http://www.sapgenie.com/abap/controls/alvgrid.htm

http://wiki.ittoolbox.com/index.php/Code:Ultimate_ALV_table_toolbox

ALV

1. Please give me general info on ALV.

http://www.sapfans.com/forums/viewtopic.php?t=58286

http://www.sapfans.com/forums/viewtopic.php?t=76490

http://www.sapfans.com/forums/viewtopic.php?t=20591

http://www.sapfans.com/forums/viewtopic.php?t=66305 - this one discusses which way should you use - ABAP Objects calls or simple function modules.

2. How do I program double click in ALV?

http://www.sapfans.com/forums/viewtopic.php?t=11601

http://www.sapfans.com/forums/viewtopic.php?t=23010

3. How do I add subtotals (I have problem to add them)...

http://www.sapfans.com/forums/viewtopic.php?t=20386

http://www.sapfans.com/forums/viewtopic.php?t=85191

http://www.sapfans.com/forums/viewtopic.php?t=88401

http://www.sapfans.com/forums/viewtopic.php?t=17335

4. How to add list heading like top-of-page in ABAP lists?

http://www.sapfans.com/forums/viewtopic.php?t=58775

http://www.sapfans.com/forums/viewtopic.php?t=60550

http://www.sapfans.com/forums/viewtopic.php?t=16629

5. How to print page number / total number of pages X/XX in ALV?

http://www.sapfans.com/forums/viewtopic.php?t=29597 (no direct solution)

6. ALV printing problems. The favourite is: The first page shows the number of records selected but I don't need this.

http://www.sapfans.com/forums/viewtopic.php?t=64320

http://www.sapfans.com/forums/viewtopic.php?t=44477

7. How can I set the cell color in ALV?

http://www.sapfans.com/forums/viewtopic.php?t=52107

8. How do I print a logo/graphics in ALV?

http://www.sapfans.com/forums/viewtopic.php?t=81149

http://www.sapfans.com/forums/viewtopic.php?t=35498

http://www.sapfans.com/forums/viewtopic.php?t=5013

9. How do I create and use input-enabled fields in ALV?

http://www.sapfans.com/forums/viewtopic.php?t=84933

http://www.sapfans.com/forums/viewtopic.php?t=69878

10. How can I use ALV for reports that are going to be run in background?

http://www.sapfans.com/forums/viewtopic.php?t=83243

http://www.sapfans.com/forums/viewtopic.php?t=19224

11. How can I display an icon in ALV? (Common requirement is traffic light icon).

http://www.sapfans.com/forums/viewtopic.php?t=79424

http://www.sapfans.com/forums/viewtopic.php?t=24512

12. How can I display a checkbox in ALV?

http://www.sapfans.com/forums/viewtopic.php?t=88376

http://www.sapfans.com/forums/viewtopic.php?t=40968

http://www.sapfans.com/forums/viewtopic.php?t=6919

&----


*& Report Y_RK_REPORT_TASK2_ALV

*&

&----


*&

*&

&----


REPORT Y_RK_REPORT_TASK2_ALV NO STANDARD PAGE HEADING

LINE-SIZE 221

LINE-COUNT 40(5).

&----


*& I N I T I A L I Z A T I O N *

&----


TABLES: MARA,MARC,MARD,MBEW,MVKE,MAKT.

TYPE-POOLS : SLIS.

DATA: VT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV. " THIS INTERNAL TABLE

" CONTAINS THE FIELD

" ATTRIBUTES

DATA: BEGIN OF I_MARC OCCURS 0,

MATNR LIKE MARC-MATNR,

EKGRP LIKE MARC-EKGRP,

PSTAT LIKE MARC-PSTAT,

END OF I_MARC.

DATA: BEGIN OF I_MARD OCCURS 0,

MATNR LIKE MARD-MATNR,

LGORT LIKE MARD-LGORT,

ERSDA LIKE MARD-ERSDA,

LABST LIKE MARD-LABST,

WERKS LIKE MARD-WERKS,

END OF I_MARD.

DATA: BEGIN OF I_MBEW OCCURS 0,

MATNR LIKE MBEW-MATNR,

BWKEY LIKE MBEW-BWKEY,

STPRS LIKE MBEW-STPRS,

PEINH LIKE MBEW-PEINH,

END OF I_MBEW.

DATA: BEGIN OF I_MARA OCCURS 0,

MATNR LIKE MARA-MATNR,

MTART LIKE MARA-MTART,

MATKL LIKE MARA-MATKL,

MEINS LIKE MARA-MEINS,

MBRSH LIKE MARA-MBRSH,

END OF I_MARA.

DATA: BEGIN OF I_MVKE OCCURS 0,

MATNR LIKE MVKE-MATNR,

VKORG LIKE MVKE-VKORG,

VTWEG LIKE MVKE-VTWEG,

VRKME LIKE MVKE-VRKME,

END OF I_MVKE.

DATA: BEGIN OF I_MAKT OCCURS 0,

MATNR LIKE MAKT-MATNR,

SPRAS LIKE MAKT-SPRAS,

MAKTX LIKE MAKT-MAKTX,

END OF I_MAKT.

DATA: BEGIN OF I_OUT OCCURS 0,

MATNR LIKE MARC-MATNR,

MEINS LIKE MARA-MEINS,

MBRSH LIKE MARA-MBRSH,

MATKL LIKE MARA-MATKL,

MTART LIKE MARA-MTART,

WERKS LIKE MARD-WERKS,

EKGRP LIKE MARC-EKGRP,

PSTAT LIKE MARC-PSTAT,

LGORT LIKE MARD-LGORT,

ERSDA LIKE MARD-ERSDA,

LABST LIKE MARD-LABST,

BWKEY LIKE MBEW-BWKEY,

STPRS LIKE MBEW-STPRS,

PEINH LIKE MBEW-PEINH,

VKORG LIKE MVKE-VKORG,

VTWEG LIKE MVKE-VTWEG,

VRKME LIKE MVKE-VRKME,

SPRAS LIKE MAKT-SPRAS,

MAKTX LIKE MAKT-MAKTX,

END OF I_OUT.

&----


*& A T - S E L E C T I O N - S C R E E N *

&----


SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-100.

SELECT-OPTIONS: S_MATNR FOR MARA-MATNR .

SELECTION-SCREEN END OF BLOCK B1.

SELECTION-SCREEN BEGIN OF BLOCK B2 WITH FRAME TITLE TEXT-101.

PARAMETERS: P_WERKS LIKE MARD-WERKS OBLIGATORY.

SELECTION-SCREEN END OF BLOCK B2.

&----


*& T O P - O F - P A G E *

&----


*TOP-OF-PAGE.

*

*WRITE: / SY-ULINE.

  • SKIP.

*WRITE : /84 'MATERIAL MASTER REPORT -- BASIC LIST',

  • SY-ULINE.

*WRITE: /2 'MATNR',

  • 22 'MEINS',

  • 26 'MBRSH',

  • 31 'MATKL',

  • 42 'MTART',

  • 49 'WERKS',

  • 57 'EKGRP',

  • 66 'PSTAT',

  • 76 'LGORT',

  • 82 'ERSDA',

  • 92 'LABST',

  • 107 'BWKEY',

  • 113 'STPRS',

  • 126 'PEINH',

  • 133 'VKORG',

  • 139 'VRKME',

  • 144 'VTWEG',

  • 148 'SPRAS',

  • 151 'MAKTX'.

*

**&----


**

**& E N D - O F - P A G E

**

**&----


**

*

*END-OF-PAGE.

  • WRITE: / SY-ULINE.

  • SKIP.

  • WRITE: /85 'PAGNO: ',SY-PAGNO,

  • SY-ULINE.

**&----


**

**& S T A R T - O F - S E L E C T I O N

**

**&----


**

START-OF-SELECTION.

SELECT MATNR EKGRP PSTAT FROM MARC INTO

CORRESPONDING FIELDS OF TABLE I_MARC

WHERE WERKS = P_WERKS AND MATNR IN S_MATNR.

SELECT MATNR MTART MBRSH MEINS MATKL FROM MARA INTO

CORRESPONDING FIELDS OF TABLE I_MARA FOR ALL ENTRIES IN I_MARC

WHERE MATNR EQ I_MARC-MATNR.

SELECT MATNR SPRAS MAKTX FROM MAKT INTO

CORRESPONDING FIELDS OF TABLE I_MAKT

FOR ALL ENTRIES IN I_MARC

WHERE MATNR = I_MARC-MATNR.

SELECT MATNR LGORT ERSDA LABST WERKS FROM MARD INTO

CORRESPONDING FIELDS OF TABLE

I_MARD FOR ALL ENTRIES IN I_MAKT

WHERE MATNR = I_MAKT-MATNR.

SELECT MATNR BWKEY STPRS PEINH FROM MBEW INTO TABLE I_MBEW

FOR ALL ENTRIES IN I_MARD

WHERE MATNR = I_MARD-MATNR.

SELECT MATNR VKORG VTWEG VRKME FROM MVKE INTO TABLE I_MVKE

FOR ALL ENTRIES IN I_MBEW

WHERE MATNR = I_MBEW-MATNR.

----


  • E N D -- O F -- S E L E C T I O N *

----


END-OF-SELECTION.

LOOP AT I_MARC.

MOVE I_MARC-MATNR TO I_OUT-MATNR.

MOVE I_MARC-EKGRP TO I_OUT-EKGRP.

MOVE I_MARC-PSTAT TO I_OUT-PSTAT.

READ TABLE I_MARA WITH KEY MATNR = I_MARC-MATNR.

MOVE I_MARA-MTART TO I_OUT-MTART.

MOVE I_MARA-MBRSH TO I_OUT-MBRSH.

MOVE I_MARA-MEINS TO I_OUT-MEINS.

MOVE I_MARA-MATKL TO I_OUT-MATKL.

READ TABLE I_MAKT WITH KEY MATNR = I_MARC-MATNR.

MOVE I_MAKT-SPRAS TO I_OUT-SPRAS.

MOVE I_MAKT-MAKTX TO I_OUT-MAKTX.

READ TABLE I_MARD WITH KEY MATNR = I_MARC-MATNR.

MOVE I_MARD-LGORT TO I_OUT-LGORT.

MOVE I_MARD-ERSDA TO I_OUT-ERSDA.

MOVE I_MARD-LABST TO I_OUT-LABST.

MOVE I_MARD-WERKS TO I_OUT-WERKS.

READ TABLE I_MBEW WITH KEY MATNR = I_MARC-MATNR.

MOVE I_MBEW-BWKEY TO I_OUT-BWKEY.

MOVE I_MBEW-STPRS TO I_OUT-STPRS.

MOVE I_MBEW-PEINH TO I_OUT-PEINH.

READ TABLE I_MVKE WITH KEY MATNR = I_MARC-MATNR.

MOVE I_MVKE-VKORG TO I_OUT-VKORG.

MOVE I_MVKE-VTWEG TO I_OUT-VTWEG.

MOVE I_MVKE-VRKME TO I_OUT-VRKME.

APPEND I_OUT.

CLEAR I_OUT.

ENDLOOP.

*LOOP AT I_OUT.

*

*FORMAT HOTSPOT ON.

*

*WRITE: /2 I_OUT-MATNR,

  • 22 I_OUT-MEINS,

  • 26 I_OUT-MBRSH,

  • 31 I_OUT-MATKL,

  • 42 I_OUT-MTART,

  • 49 I_OUT-WERKS,

  • 57 I_OUT-EKGRP,

  • 66 I_OUT-PSTAT,

  • 76 I_OUT-LGORT,

  • 82 I_OUT-ERSDA,

  • 92 I_OUT-LABST,

  • 107 I_OUT-BWKEY,

  • 113 I_OUT-STPRS,

  • 126 I_OUT-PEINH,

  • 133 I_OUT-VKORG,

  • 139 I_OUT-VRKME,

  • 144 I_OUT-VTWEG,

  • 148 I_OUT-SPRAS,

  • 151 I_OUT-MAKTX.

*

*HIDE I_OUT-MATNR.

*

*FORMAT HOTSPOT OFF.

*

*ENDLOOP.

************************************************************************

*CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'

************************************************************************

CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'

EXPORTING

I_PROGRAM_NAME = 'Y_RK_REPORT_TASK2_ALV'

I_INTERNAL_TABNAME = 'I_OUT'

I_INCLNAME = 'Y_RK_REPORT_TASK2_ALV'

CHANGING

CT_FIELDCAT = VT_FIELDCAT.

IF SY-SUBRC <> 0.

ENDIF.

************************************************************************

*CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'

************************************************************************

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'

EXPORTING

I_CALLBACK_PROGRAM = 'Y_RK_REPORT_TASK2_ALV'

IT_FIELDCAT = VT_FIELDCAT "INTERNAL TABLE WITH

" THE LIST OF ALL

"FIELDS AND THERE

"ATTRIBUTES WHICH ARE

"TO BE PRINTED

I_SAVE = 'A'

TABLES

T_OUTTAB = I_OUT.

IF SY-SUBRC <> 0.

ENDIF.

*&----


*

*& A T - L I N E - S E L E C T I O N

*

*&----


*

AT LINE-SELECTION.

*SET PF-STATUS 'SELECTION'.

CASE SY-LSIND.

WHEN 1.

SELECT MATNR LGORT ERSDA LABST WERKS FROM MARD

INTO TABLE I_MARD WHERE MATNR = I_OUT-MATNR

AND WERKS = P_WERKS.

IF SY-SUBRC = 0.

LOOP AT I_MARD.

  • WINDOW STARTING AT 20 60.

WRITE:/ 'MATERIAL NUMBER:'.

WRITE: I_MARD-MATNR.

WRITE:/ 'PLANT:'.

WRITE: I_MARD-WERKS.

WRITE:/ 'STORAGE LOCATION:' .

WRITE: I_MARD-LGORT.

SKIP.

ENDLOOP.

ELSE.

MESSAGE E000(1)

WITH 'PLEASE SELECT PLANT WHICH YOU GIVEN IN SELECTON'.

ENDIF.

CASE SY-UCOMM.

WHEN 'EXIT'.

LEAVE TO SCREEN 0.

ENDCASE.

ENDCASE.

Read only

Former Member
0 Likes
524
Read only

Former Member
0 Likes
524