Select-options

[Former Member]

Hi All,

I need to fetch the data based on selection criterial PLANT,MATERIAL,DATE,at present my coding working for MATERIAL only can any one give hit how to fetcah data from above two options,here it is my code:

TABLES:s031,s032,makt,marc.

DATA : BEGIN OF itab1 OCCURS 0,

matnr TYPE s031-matnr,

lgort TYPE s031-lgort,

werks TYPE s031-werks,

spmon TYPE s031-spmon,

magbb TYPE s031-magbb,

wagbb TYPE s031-wagbb,

azubb TYPE s031-azubb,

aagbb TYPE s031-aagbb,

END OF itab1.

DATA : BEGIN OF itab2 OCCURS 0,

matnr LIKE makt-matnr,

maktx LIKE makt-maktx,

END OF itab2.

DATA : BEGIN OF itab3 OCCURS 0,

matnr TYPE marc-matnr,

werks TYPE marc-werks,

ekgrp TYPE marc-ekgrp,

END OF itab3.

DATA : BEGIN OF itab4 OCCURS 0 ,

matnr TYPE s032-matnr,

lgort TYPE s032-lgort,

werks TYPE s032-werks,

mbwbest TYPE s032-mbwbest,

wbwbest TYPE s032-wbwbest,

END OF itab4.

DATA: BEGIN OF itab5 OCCURS 0,

matnr LIKE s031-matnr,

atinn LIKE cawn-atinn,

atwrt LIKE cawn-atwrt,

objek LIKE ausp-objek,

END OF itab5.

DATA : BEGIN OF itab_final1 OCCURS 0,

matnr TYPE s031-matnr,

lgort TYPE s031-lgort,

werks TYPE s031-werks,

• spmon TYPE s031-spmon,

magbb TYPE s031-magbb,

wagbb TYPE s031-wagbb,

azubb TYPE s031-azubb,

aagbb TYPE s031-aagbb,

maktx TYPE makt-maktx,

ekgrp TYPE marc-ekgrp,

mbwbest TYPE s032-mbwbest,

wbwbest TYPE s032-wbwbest,

atwrt TYPE cawn-atwrt,

END OF itab_final1.

DATA : BEGIN OF itab_final OCCURS 0,

matnr TYPE s031-matnr,

lgort TYPE s031-lgort,

werks TYPE s031-werks,

• spmon TYPE s031-spmon,

magbb TYPE s031-magbb,

wagbb TYPE s031-wagbb,

azubb TYPE s031-azubb,

aagbb TYPE s031-aagbb,

maktx TYPE makt-maktx,

ekgrp TYPE marc-ekgrp,

mbwbest TYPE s032-mbwbest,

wbwbest TYPE s032-wbwbest,

atwrt TYPE cawn-atwrt,

END OF itab_final.

DATA: wa_itab5 LIKE LINE OF itab5.

DATA : wa_itab_final LIKE LINE OF itab_final.

SELECT-OPTIONS:s_matnr FOR s031-matnr.

SELECT-OPTIONS:s_werks FOR s031-werks.

SELECT-OPTIONS : s_DATE FOR S031-SPMON.

*---- Validate Material/Plant.

SELECT *

FROM s031

WHERE matnr in s_matnr

AND werks in s_werks.

ENDSELECT.

IF sy-subrc <> 0.

MESSAGE E999(GW) WITH 'Check Material/Plant no.'.

ENDIF.

SELECT a_{matnr a}lgort a_{werks a}spmon a_{magbb a}wagbb a_{azubb a}aagbb

b_{maktx c}ekgrp d_{mbwbest d}wbwbest

INTO CORRESPONDING FIELDS OF TABLE itab_final1

FROM ( ( ( s031 AS a

INNER JOIN makt AS b ON b_{matnr = a}matnr )

INNER JOIN marc AS c ON c_{matnr = b}matnr )

INNER JOIN s032 AS d ON d_{werks = c}werks ) WHERE a~matnr IN s_matnr

ORDER BY a~matnr

a~werks.

LOOP AT itab_final1 INTO wa_itab_final.

itab_final-matnr = wa_itab_final-matnr.

itab_final-lgort = wa_itab_final-lgort.

itab_final-werks = wa_itab_final-werks.

itab_final-magbb = wa_itab_final-magbb.

itab_final-wagbb = wa_itab_final-wagbb.

itab_final-azubb = wa_itab_final-azubb.

itab_final-aagbb = wa_itab_final-aagbb.

itab_final-maktx = wa_itab_final-maktx.

itab_final-mbwbest = wa_itab_final-mbwbest.

itab_final-wbwbest = wa_itab_final-wbwbest.

APPEND itab_final.

ENDLOOP.

SELECT e_{atinn e}atwrt f_{atinn f}objek

INTO CORRESPONDING FIELDS OF TABLE itab5

FROM ( cawn AS e

INNER JOIN ausp AS f ON f_{atinn = e}atinn ) WHERE f~objek IN s_matnr.

SORT itab_final BY matnr werks ekgrp .

DELETE ADJACENT DUPLICATES FROM itab_final COMPARING matnr werks ekgrp.

LOOP AT itab5 INTO wa_itab5 .

loop at itab_final where matnr = wa_itab5-objek.

itab_final-atwrt = wa_itab5-atwrt.

modify itab_final index sy-tabix transporting atwrt.

endloop.

ENDLOOP.

LOOP AT itab_final.

WRITE: / itab_final-matnr , itab_final-lgort , itab_final-werks, itab_final-magbb, itab_final-wagbb, itab_final-azubb, itab_final-aagbb,

itab_final-maktx, itab_final-ekgrp, itab_final-wbwbest, itab_final-mbwbest,itab_final-atwrt color 3.

ENDLOOP

Thanks&regds,

Sree.

[Former Member]

Hi,

Change your first Select statement to include all the selection conditions.

SELECT *

FROM s031

INTO itab -> to be declared of type s031

WHERE matnr in s_matnr

AND werks in s_werks

and SPTAG in s_date. s_date should be for SPTAG not SPMON (It is only for month)

This will give all records which meet your selection criteria in table itab.

Thanks and Regards,

Lakshmi.

[Former Member]

Hi Lakshmi,

If give only date in select-options it is fetching all the data,it means it is not working please suggest me how to change my code accordingly.

Thanks&regds,

Sree.

[Former Member]

try this.

data : itab type standard table of s031 with header line.

SELECT *

FROM s031 into itab

WHERE matnr in s_matnr

AND werks in s_werks and

spmon in s_date.

you are not using into clause in your select query.check once.

[Former Member]

Hi,

Are you using the select query which i gave in my last message?

If you give only date in the selection screen is it fetching records out of that date range also??

Please paste that select query alone.

Thanks and Regards,

Lakshmi.

[Former Member]

Hi Lakshmi,

ThankQ very much,Due to your input from my starting of report I able to finish my report in ALV formate also.

Thanks&regds,

Sree.

[Former Member]

Hi,

If your problem is solved, Close this thread.

Thanks and Regards,

Lakshmi.