help with report

[Former Member]

please help me in developing this report

my requirement

developing a material master report inputting material no and plant as select options

material type as a parameter output list should have total quantity by material group and plant

[Former Member]

please help me in developing this report

my requirement

developing a material master report inputting material no and plant as select options

material type as a parameter output list should have total quantity by material group and plant

[Former Member]

Hi

Report Zreport.

tables: mara,marc,mard.

data: begin of itab occurs 0,

matnr like mara-matnr,

mtart like mara-mtart,

matkl like mara-matkl,

werks like marc-werks,

labst like mard-labst,

end of itab.

paramters: p_mtart like mara-mtart obligatory.

select-options: s_matnr for mara-matnr,

s_werks for marc-werks.

select a_{matnr a}mtart a_{matkl b}werks c~labst from mara as a join marc as b

on a_{matnr = b}matnr join mard as c on

a_{matnr = b}matnr and b_{werks = c}werks

where a~matnr in s_matnr and

a~mtart = p_mtart and

b~werks in s_werks.

sort itab by matnr werks.

loop at itab.

write: / itab-matnr, itab-werks, itab-mtart, itab-matkl, itab-labst.

endloop.

<b>Reward points for useful Answers</b>

Regards

Anji

[Former Member]

hi,

Check this report.

REPORT ZZABCTEST21.

TABLES: EKPO,

MAKT.

TYPE-POOLS: SLIS.

TYPES: BEGIN OF TY_EKPO,

EBELN TYPE EBELN,

EBELP TYPE EBELP,

MATNR TYPE MATNR,

MATKL TYPE MATKL,

MTART TYPE MTART,

WERKS TYPE WERKS,

KTMNG TYPE KTMNG,

GTOTAL TYPE KTMNG,

END OF TY_EKPO.

DATA: TOTAL TYPE KTMNG.

*TYPES: BEGIN OF TY_MARA,

• MATNR TYPE MATNR,

• MTART TYPE MTART,

• MATKL TYPE MATKL,

• BRGEW TYPE BRGEW,

• WERKS TYPE WERKS,

• END OF TY_MARA,

*

• BEGIN OF TY_MAKT,

• MATNR TYPE MATNR,

• SPRAS TYPE SPRAS,

• MAKTX TYPE MAKTX,

• END OF TY_MAKT,

• BEGIN OF TY_FINAL,

• MATNR TYPE MATNR,

• MAKTX TYPE MAKTX,

• MTART TYPE MTART,

• MATKL TYPE MATKL,

• BRGEW TYPE BRGEW,

• TOTBW TYPE BRGEW,

• WERKS TYPE WERKS,

• END OF TY_FINAL.

*CONSTANTS: C_X VALUE 'X',

• C_H VALUE 'H',

• C_S VALUE 'S'.

*

DATA: IT_EKPO TYPE STANDARD TABLE OF TY_EKPO INITIAL SIZE 0,

• IT_MAKT TYPE STANDARD TABLE OF TY_MAKT INITIAL SIZE 0,

IT_FINAL TYPE STANDARD TABLE OF TY_EKPO INITIAL SIZE 0,

WA_EKPO TYPE TY_EKPO,

• WA_MAKT TYPE TY_MAKT,

wa_final type ty_EKPO.

• G_TOTAL TYPE BRGEW,

• G_SNO TYPE I.

*

• DECLARATION FOR ALV.

*DATA: FLDCAT TYPE SLIS_T_FIELDCAT_ALV,

• LAYOUT TYPE SLIS_LAYOUT_ALV,

• TOPPAGE TYPE SLIS_T_LISTHEADER,

• ALVSORT TYPE SLIS_T_SORTINFO_ALV.

• INITIALIZATION BLOCK ****************************

*INITIALIZATION.

*

*

• SELECTION SCREEN *****************************

*

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

SELECT-OPTIONS : S_MAT FOR EKPO-MATNR,

S_PLT FOR EKPO-WERKS.

PARAMETERS : P_MTR LIKE EKPO-MTART.

SELECTION-SCREEN END OF BLOCK B1.

*

• START OF SELECTION ******************************

*

START-OF-SELECTION.

*

PERFORM DATA_RETRIVAL.

*

*IF IT_FINAL[] IS NOT INITIAL.

• PERFORM BUILD_FIELDCAT.

• PERFORM BUILD_LAYOUT.

• PERFORM BUILD_HEADER.

• PERFORM ALV_SORT.

• PERFORM DISPLAY_OUTPUT.

*ENDIF.

*

*

*

************END OF SEL;ECTION ********************************

*

*END-OF-SELECTION.

*

*CLEAR: IT_MARA,

• IT_MAKT,

• IT_FINAL.

*

*&----

---

**& Form DATA_RETRIVAL

*&----

---

*

FORM DATA_RETRIVAL .

SELECT EBELN EBELP MATNR MTART MATKL WERKS KTMNG

FROM EKPO

INTO TABLE IT_EKPO

WHERE MATNR IN S_MAT

AND WERKS IN S_PLT.

*

*

• IF IT_MARA[] IS NOT INITIAL.

• SELECT MATNR SPRAS MAKTX

• FROM MAKT

• INTO TABLE IT_MAKT

• FOR ALL ENTRIES IN IT_MARA

• WHERE MATNR EQ IT_MARA-MATNR

• AND SPRAS BETWEEN L_SPRAS AND H_SPRAS.

• AND SPRAS EQ SY-LANGU.

• ENDIF.

*

*

*CLEAR G_SNO.

*CLEAR G_TOTAL.

CLEAR TOTAL.

CLEAR WA_EKPO.

SORT IT_EKPO BY MTART.

LOOP AT IT_EKPO INTO WA_EKPO WHERE MATNR IS NOT INITIAL.

• BREAK AAB_ABAP3.

TOTAL = TOTAL + WA_EKPO-KTMNG.

WA_FINAL-MATNR = WA_ekpo-MATNR.

WA_FINAL-MTART = WA_ekpo-MTART.

WA_FINAL-WERKS = WA_ekpo-WERKS.

WA_FINAL-KTMNG = WA_ekpo-KTMNG.

WA_FINAL-GTOTAL = TOTAL.

APPEND WA_FINAL TO IT_FINAL.

ENDLOOP.

ENDFORM.