Closing stock report with GRPO

Hai all
Please help me to write this query,
For example
I have query to take closing stock report ,but my requirement is ,i want split up for Closing stock and closingvalue
like, if i have 40 closing stock means i want details how 40 is arrived
for example i run closing stock report as on 2009-03-31
means i want this format
Itemcode ClosingStock Closing value
ITM001         40                460
ITM002         20                210.......
ItemCode GRPOno. VendorCode quantity Rate GRPO Date
ITM001        10001          V0001      10       10      2009-02-01
ITM001        10002          V0002      20       11     2009-03-15
ITM001        10003          V0003      10       14    2009-03-31
ITM002        10021          V0011      10       10      2009-02-11
ITM002        10022          V0015      10       11     2009-03-14

Hai Jeyakanthan A
I want small change in your query
SELECT T0.ItemCode,T0.TransType, SUM(T0.InQty)-SUM(T0.OutQty) AS 'Closing Stock',SUM(T0.OpenValue) as 'Balance' FROM OINM T0
*where docdate <= '[%0]'*
GROUP BY T0.ItemCode,T0.TransType
Having
T0.TransType = 20 ORDER BY T0.ItemCode,T0.TransType
I tried this query for taking closing stock for given date, its giving me correct result
SELECT T0.ItemCode, T0.Ref1, T0.CardCode, T0.InQty, T0.Price, T0.DocDate FROM OINM T0 WHERE T0.TransType = 20 AND
(T0.DocDate >= '[%0]' AND
T0.DocDate <= '[%1]') ORDER BY T0.ItemCode, T0.Ref1, T0.CardCode, T0.InQty, T0.Price, T0.DocDate
In this query i want only the GRPO no,date,price.... for closing stock quantity
Edited by: Prasanna s on May 14, 2009 12:39 PM

Similar Messages

Please help to get onhand stock report with last purchase and billed date warehouse and item wise

please help to get onhand stock report with last purchase and billed date warehouse and item wise

Hi Rajeesh Ambadi...
Try This
SELECT distinct T0.ITEMCODE , t1.ItemName, T0.ONHAND as 'Total Qty',
T1.LASTPURDAT ,t1.LastPurPrc
FROM OITW T0 INNER JOIN OITM T1 ON T0.ITEMCODE = T1.ITEMCODE
INNER JOIN OITB T2 ON T1.ITMSGRPCOD=T2.ITMSGRPCOD left join ibt1 t3 on t3.itemcode = t0.itemcode and t3.whscode = t0.whscode
WHERE
T0.ONHAND>0
AND T0.WhsCode ='[%0]'
Hope Helpful
Regards
Kennedy

Sub:Stock report with sales unit of measurement - reg.,

Hi guru's
we have a requirement to have the stock report with sales unit of measure instead of base unit of measure can anybody guide me how to do this.
thanks in advance
tulja singh.

From std. , I think your requirement can not satisfied.
Make customized report.
Take the help of ABAPER.

Stock Report with Batch Number

Hi ,
My Client requires stock report with Batch numbers .required report format is
Item Code,BatchNumber,OpenQty,OpenVal,PurchaseQty,PurchaseVal,SalesQty,SalesVal,ClosQty,CloseVal
I tried using query on wiki for stock report but that query is written in 2007 and Batch tables and OINM table is changes in 8.81.
http://wiki.sdn.sap.com/wiki/display/B1/SAPB1SQLH-INItemInventoryOpeningandClosingStockper+warehouse
can any one help with stock report- batches.
Thanks,
Preeti

HI,
use below query as basis and mofiy the fields required. it shows linking in batch and transaction tables:
SELECT distinct T0.ItemCode,T0.ItemName ,T0.DocDate ,T0.DocType ,T0.DocNum,T0.LocCode ,t4.DistNumber as [BatchNumber], T1.Quantity ,T5.CalcPrice as [Price]
FROM [OITL] T0
          INNER JOIN [ITL1] T1 ON T1.[LogEntry] = T0.[LogEntry]
          INNER JOIN OBTN T4 on T1.MdAbsEntry=T4.AbsEntry
          INNER JOIN [OITM] T2 ON T2.[ItemCode] = T0.[ItemCode]
          Inner JOin OINM T5 on T0.ItemCode =T5.ItemCode and T0.LocCode = T5.Warehouse and T0.AppDocNum = T5.BASE_REF
Thanks,
Neetu

Opening and closing stock report

Hi,
i have to develop a report in abap of stock (Opening and closing stock) with each material, plant, business area & monthly date wise. I got some fields from mseg like material number, plant, business area but i didnt get fileds like opening stock, purchase, consumption & closing stock
in report fileds should be like
material number
plant
business area
posting date
opening stock
purchase
consumption
closing stock
kinldy help <removed by moderator>
Moderator message: Welcome to SCN!
Moderator message: please search for available information, ask a functional consultant near you.
[Rules of engagement|http://wiki.sdn.sap.com/wiki/display/HOME/RulesofEngagement]
[Asking Good Questions in the Forums to get Good Answers|Asking Good Questions in the SCN Discussion Spaces will help you get Good Answers]
Edited by: Thomas Zloch on Nov 21, 2011 3:35 PM

Yes umesh from external 99% of your stock from mvt 101, 501 is very rare case & 561 is not from external source it is initial stock updation which will be done only once when you are going live & later 561 mvt will be normally blocked for use.
You can also sort in MB5B more than one movement type click on multiple selection (that is on yellow arrow icon) & in single value tab enter mvt 101 below that 501.
This will give you report for mvt types 101 & 501 in this way you can also sort reports for more than one mvt type.
Regards
Rang
Message was edited by:
Ranganath Mysore

Batch wise stock report with qty and value as on date

is there any report so that we can see the stock qty with value as on date,
i have tried mb5b but it is showing only qty and batch combination not qty value and batch combination
plz suggest me, it is very urgent.
nitin

MBEWH is the valuation history, this is only updated with the first movement after a period closure. And the period is a month.
There is no table in SAP that holds the stock information on daily basis.
You have to develope this yourself. Easiest method by copying a table like MBEW and MARD daily to a Z-Table.
A stock situation at a certain date can be calculated with MB5B.
Edited by: Jürgen L. on Aug 5, 2008 4:06 PM

Opening and closing Stock report at Storage location level- date wise

Dear all
Is there any standard report to view opening and closing stock at storage location level? ( we have MB5B which resets the entry screen if we enter SLOC details).
Thanks
Sam

Do I have the option of selecting Storage Location wise opening and closing stock on a particular date or period, that is what I have requested? Is it possible, evenafter selecting storageloc/batch stock and entering all the SLOCs in the selection creen, the report output does not contain any SLOC, and using ctrl+F8 or display variant does not have SLOC as a field also.
pls gudie
sam

Stock report with the field... last stock changed at certain date?

Is there any standard report with the date of the last change of the stock value and quantity?
Points granted
BR
Saso

Hi people,
I want to know why MBEWH have not any material stock information for period when doesn´t exist any inventory movement for some materials, for example I have a case in 12.2006 period the material A have stock quantity 100 and value 1000 and the next period 01.2007 no stock movements were done for this reason the MBEWH had to had the same values stock 100 and value 1000 in 01.2007 period, but in MBEWH is missing, there is not any information for material A in this period.
Anybody knows about this problem?
Thanks.
Lili.

Stock report with date range

Hi Experts.
Material stock report (unrestricted, blocked, quality) with in date range.
getting information in T-CODE: MB52 but not in date range.
In mard table i did't find the date for unrestricted, blocked and quality.
from where can i get that information and how should i link all
Need a psudo code for it.
If any one worked on this kind of object plz send me the code.
Points assured..
Regards..
Ravi Reddy.

Hi
Check this sample code hope it will helpfull for you
*DATA: ED TYPE F.
DATA : ED(15) TYPE N .
TABLES: EKKO, EKBE, EKPO, KONH , KONV ,LFA1 ,ESLL.
TYPE-POOLS: SLIS.
DATA: val1 like konh-vakey.
Data:GS_LAYOUT TYPE SLIS_LAYOUT_ALV,
     G_REPID LIKE SY-REPID,
     G_GRID_TITLE TYPE LVC_TITLE.
Data:G_USER_COMMAND TYPE SLIS_FORMNAME VALUE 'USER_COMMAND'.
DATA:G_TABNAME TYPE SLIS_TABNAME VALUE 'ITAB1',
G_SAVE .
DATA:GS_VARIANT LIKE DISVARIANT.
DATA:LS_FIELDCAT TYPE SLIS_FIELDCAT_ALV.
DATA:GT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE.
     G_SAVE = 'A'.
DATA: BEGIN OF ITAB OCCURS 10,
          EBELN LIKE EKKO-EBELN,
*          LIFNR like p_vendor,
          LIFNR LIKE EKKO-LIFNR,
          NAME1 LIKE LFA1-NAME1,
          NAME2 LIKE LFA1-NAME2,
*          EBELP LIKE EKBE-EBELP,
          BELNR LIKE EKBE-BELNR,
          VGABE LIKE EKBE-VGABE,
          GJAHR LIKE EKBE-GJAHR,
          KNUMV LIKE EKKO-KNUMV,
          EKORG LIKE EKKO-EKORG,
          BEDAT LIKE EKKO-BEDAT,
*          VAKEY LIKE KONH-VAKEY,
     END OF ITAB.
DATA: BEGIN OF ITAB1 OCCURS 10,
          NAME1 LIKE LFA1-NAME1,
          NAME2 LIKE LFA1-NAME2,
          EBELN LIKE EKPO-EBELN,
          LIFNR LIKE EKKO-LIFNR,
          EBELP LIKE EKPO-EBELP,
*          EBELP LIKE EKBE-EBELP,
          KNUMH LIKE KONH-KNUMH,
          BELNR LIKE EKBE-BELNR,
          MATNR LIKE EKPO-MATNR,
          TXZ01 LIKE EKPO-TXZ01,
          PS_PSP_PNR LIKE EKKN-PS_PSP_PNR,
          EXTROW LIKE ESLL-EXTROW,
          SRVPOS LIKE ESLL-SRVPOS,
          KTEXT1 LIKE ESLL-KTEXT1,
          KOSTL LIKE EKKN-KOSTL,
          NETPR LIKE EKPO-NETPR,
          NETWR LIKE EKPO-NETWR,
          ED1 TYPE p decimals 2,
          KBETR2 LIKE KONV-KBETR,
          KBETR1 LIKE KONV-KBETR,
          KBETR LIKE KONV-KBETR,
*          KBETR3 LIKE KONV-KBETR,
          KWERT LIKE KONV-KWERT, " THIS IS FOR FREIGHT
          KWERT1 LIKE KONV-KWERT, " THIS IS FOR PBXX OR PB00
          KWERT2 LIKE KONV-KWERT, " THIS FOR OTHER CONDITION
          MENGE LIKE EKPO-MENGE,
*          TOTAL(15) type .
          TOTAL TYPE p decimals 2,
          VAKEY LIKE KONH-VAKEY,
          WERKS LIKE EKPO-WERKS,
          MWSKZ LIKE EKPO-MWSKZ,
          PACKNO LIKE EKPO-PACKNO,
          KNUMV LIKE KONV-KNUMV,
          SUB_PACKNO LIKE ESLL-SUB_PACKNO,
          GJAHR LIKE RSEG-GJAHR,
      END OF ITAB1.
DATA: BEGIN OF ITAB2 OCCURS 10,
         EBELN LIKE EKKN-EBELN,
         EBELP LIKE EKKN-EBELP,
         PS_PSP_PNR LIKE EKKN-PS_PSP_PNR,
         KOSTL      LIKE EKKN-KOSTL,
      END OF ITAB2.
data: begin of itab3 occurs 10,
        KNUMH LIKE KONH-KNUMH,
        KSCHL LIKE KONH-KSCHL,
     end of itab3.
data: begin of itab4 occurs 10,
        KBETR LIKE KONP-KBETR,
      end of itab4.
data: begin of itab5 occurs 10,
        KPOSN LIKE KONV-KPOSN,
        KNUMV LIKE KONV-KNUMV,
        KSCHL LIKE KONV-KSCHL,
        KBETR LIKE KONV-KBETR,
        KWERT LIKE KONV-KWERT, " THIS IS FOR FREIGHT
*          KAWRT LIKE KONV-KAWRT,
     end of itab5.
DATA: BEGIN OF ITAB6 OCCURS 10,
*          PACKNO LIKE EKPO-PACKNO,
          SUB_PACKNO LIKE ESLL-SUB_PACKNO,
        END OF ITAB6.
DATA: BEGIN OF ITAB7 OCCURS 10,
       BELNR LIKE RSEG-BELNR,
       GJAHR LIKE RSEG-GJAHR,
END OF ITAB7.
DATA: BEGIN OF ITAB8 OCCURS 10,
       SUB_PACKNO LIKE ESLL-SUB_PACKNO,
       SRVPOS LIKE ESLL-SRVPOS,
       EXTROW LIKE ESLL-EXTROW,
       KTEXT1 LIKE ESLL-KTEXT1,
END OF ITAB8.
*selection-screen
*SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
*SELECTION-SCREEN SKIP 2.
*SELECTION-SCREEN BEGIN OF LINE.
*SELECTION-SCREEN COMMENT 25(23) text-002.
**SELECT-OPTIONS: s_lifnr FOR ekko-lifnr.
*PARAMETERS:p_lifnr LIKE ekko-lifnr obligatory.
*SELECTION-SCREEN END OF LINE.
*SELECTION-SCREEN END OF BLOCK b1.
START-OF-SELECTION.
PERFORM get_data.
* PERFORM field_catalog.
* PERFORM display_data.
END-OF-SELECTION.
**&      Form display_data
**       text
*FORM display_data.
*data: new(15) TYPE N.
* CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
*    EXPORTING
*      i_callback_program = sy-repid
*      it_fieldcat        = int_cat[]
*    TABLES
*      t_outtab           = int_out
*    EXCEPTIONS
*      program_error      = 1
*      OTHERS             = 2.
*ENDFORM.                    "display_data
PERFORM GET_DATA.
PERFORM CALL_ALV_GRID.
FORM CALL_ALV_GRID.
PERFORM FIELDCAT_INIT USING GT_FIELDCAT[].
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      I_CALLBACK_PROGRAM                = G_repid
      I_CALLBACK_USER_COMMAND           = G_USER_COMMAND
      I_GRID_TITLE                      = G_GRID_TITLE
      IT_FIELDCAT                       = GT_FIELDCAT[]
      I_DEFAULT                         = 'X'
      I_SAVE                            = G_SAVE
      IS_VARIANT                        = Gs_VARIANT
    TABLES
      T_OUTTAB                          = ITAB1.
ENDFORM.
FORM FIELDCAT_INIT
       USING RT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-TABNAME       = G_TABNAME.
LS_FIELDCAT-seltext_l     = 'Vendo No'.
LS_FIELDCAT-FIELDNAME     = 'LIFNR'.
LS_FIELDCAT-REF_FIELDNAME = 'LIFNR'.
LS_FIELDCAT-REF_TABNAME   = 'EKKO'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
   CLEAR LS_FIELDCAT.
LS_FIELDCAT-TABNAME       = G_TABNAME.
LS_FIELDCAT-SELTEXT_L = 'Vendor Name'.
LS_FIELDCAT-FIELDNAME     = 'NAME1'.
LS_FIELDCAT-REF_FIELDNAME = 'NAME1'.
LS_FIELDCAT-REF_TABNAME   = 'LFA1'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
* CLEAR LS_FIELDCAT.
* LS_FIELDCAT-TABNAME       = G_TABNAME.
* LS_FIELDCAT-FIELDNAME     = 'NAME2'.
* LS_FIELDCAT-REF_FIELDNAME = 'NAME2'.
* LS_FIELDCAT-REF_TABNAME   = 'LFA1'.
* APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-TABNAME       = G_TABNAME.
LS_FIELDCAT-seltext_l   = 'Purchase Document No'.
LS_FIELDCAT-FIELDNAME     = 'EBELN'.
LS_FIELDCAT-REF_FIELDNAME = 'EBELN'.
LS_FIELDCAT-REF_TABNAME   = 'EKKO'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
* CLEAR LS_FIELDCAT.
* LS_FIELDCAT-TABNAME       = G_TABNAME.
* LS_FIELDCAT-FIELDNAME     = 'VGABE'.
* LS_FIELDCAT-REF_FIELDNAME = 'VGABE'.
* LS_FIELDCAT-REF_TABNAME   = 'EKBE'.
* APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-TABNAME       = G_TABNAME.
LS_FIELDCAT-SELTEXT_L     = 'Item No'.
LS_FIELDCAT-FIELDNAME     = 'EBELP'.
LS_FIELDCAT-REF_FIELDNAME = 'EBELP'.
LS_FIELDCAT-REF_TABNAME   = 'EKPO'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
* CLEAR LS_FIELDCAT.
* LS_FIELDCAT-TABNAME       = G_TABNAME.
* LS_FIELDCAT-FIELDNAME     = 'BELNR'.
* LS_FIELDCAT-REF_FIELDNAME = 'BELNR'.
* LS_FIELDCAT-REF_TABNAME   = 'EKBE'.
* APPEND LS_FIELDCAT TO RT_FIELDCAT.
   CLEAR LS_FIELDCAT.
LS_FIELDCAT-TABNAME       = G_TABNAME.
LS_FIELDCAT-SELTEXT_L     = 'Document Con'.
LS_FIELDCAT-FIELDNAME     = 'KNUMH'.
LS_FIELDCAT-REF_FIELDNAME = 'KNUMH'.
LS_FIELDCAT-REF_TABNAME   = 'KONH'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
*   CLEAR LS_FIELDCAT.
* LS_FIELDCAT-TABNAME       = G_TABNAME.
* LS_FIELDCAT-SELTEXT_L = 'Service/Material No'.
* LS_FIELDCAT-FIELDNAME     = 'MATNR'.
* LS_FIELDCAT-REF_FIELDNAME = 'MATNR'.
* LS_FIELDCAT-REF_TABNAME   = 'EKPO'.
* APPEND LS_FIELDCAT TO RT_FIELDCAT.
*   CLEAR LS_FIELDCAT.
* LS_FIELDCAT-TABNAME       = G_TABNAME.
* LS_FIELDCAT-SELTEXT_L = 'Service / Material description' .
* LS_FIELDCAT-FIELDNAME     = 'TXZ01'.
* LS_FIELDCAT-REF_FIELDNAME = 'TXZ01'.
* LS_FIELDCAT-REF_TABNAME   = 'EKPO'.
* APPEND LS_FIELDCAT TO RT_FIELDCAT.
*   CLEAR LS_FIELDCAT.
* LS_FIELDCAT-TABNAME       = G_TABNAME.
* LS_FIELDCAT-SELTEXT_L = 'WBS Element' .
* LS_FIELDCAT-FIELDNAME     = 'PS_PSP_PNR'.
* LS_FIELDCAT-REF_FIELDNAME = 'PS_PSP_PNR'.
* LS_FIELDCAT-REF_TABNAME   = 'EKKN'.
* APPEND LS_FIELDCAT TO RT_FIELDCAT.
*   CLEAR LS_FIELDCAT.
* LS_FIELDCAT-TABNAME       = G_TABNAME.
* LS_FIELDCAT-SELTEXT_L = 'Serial Number' .
* LS_FIELDCAT-FIELDNAME     = 'EXTROW'.
* LS_FIELDCAT-REF_FIELDNAME = 'PACKNO'.
* LS_FIELDCAT-REF_TABNAME   = 'ESLL'.
* APPEND LS_FIELDCAT TO RT_FIELDCAT.
* CLEAR LS_FIELDCAT.
* LS_FIELDCAT-TABNAME       = G_TABNAME.
* LS_FIELDCAT-SELTEXT_L = 'Service Number' .
* LS_FIELDCAT-FIELDNAME     = 'SRVPOS'.
* LS_FIELDCAT-REF_FIELDNAME = 'SRVPOS'.
* LS_FIELDCAT-REF_TABNAME   = 'ESLL'.
* APPEND LS_FIELDCAT TO RT_FIELDCAT.
*   CLEAR LS_FIELDCAT.
* LS_FIELDCAT-TABNAME       = G_TABNAME.
* LS_FIELDCAT-SELTEXT_L = 'Dscription' .
* LS_FIELDCAT-FIELDNAME     = 'KTEXT1'.
* LS_FIELDCAT-REF_FIELDNAME = 'KTEXT1'.
* LS_FIELDCAT-REF_TABNAME   = 'ESLL'.
* APPEND LS_FIELDCAT TO RT_FIELDCAT.
*   CLEAR LS_FIELDCAT.
* LS_FIELDCAT-TABNAME       = G_TABNAME.
*    LS_FIELDCAT-SELTEXT_L = 'Cost Center'.
* LS_FIELDCAT-FIELDNAME     = 'KOSTL'.
* LS_FIELDCAT-REF_FIELDNAME = 'KOSTL'.
* LS_FIELDCAT-REF_TABNAME   = 'EKKN'.
* APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-TABNAME       = G_TABNAME.
* LS_FIELDCAT-FIELDNAME     = 'NETWR'.
LS_FIELDCAT-FIELDNAME     = 'NETPR'.
LS_FIELDCAT-reptext_ddic = 'Basic'.
* LS_FIELDCAT-SELTEXT_L    = 'Basic'.
   LS_FIELDCAT-REF_FIELDNAME = 'NETPR'.
LS_FIELDCAT-REF_TABNAME   = 'EKPO'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-TABNAME       = G_TABNAME.
LS_FIELDCAT-FIELDNAME     = 'NETWR'.
* LS_FIELDCAT-FIELDNAME     = 'NETPR'.
* LS_FIELDCAT-reptext_ddic = ''.
* LS_FIELDCAT-SELTEXT_L    = 'Basic'.
   LS_FIELDCAT-REF_FIELDNAME = 'NETWR'.
LS_FIELDCAT-REF_TABNAME   = 'EKPO'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-TABNAME       = G_TABNAME.
    LS_FIELDCAT-SELTEXT_L = 'Excise'.
LS_FIELDCAT-FIELDNAME     = 'ED1'.
LS_FIELDCAT-REF_FIELDNAME = 'ED1'.
* LS_FIELDCAT-REF_TABNAME   = 'EKKN'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
   CLEAR LS_FIELDCAT.
LS_FIELDCAT-TABNAME       = G_TABNAME.
LS_FIELDCAT-SELTEXT_L = 'Insurance'.
LS_FIELDCAT-FIELDNAME     = 'KBETR2'.
    LS_FIELDCAT-REF_FIELDNAME = 'KBETR'.
LS_FIELDCAT-REF_TABNAME   = 'KONV'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-TABNAME       = G_TABNAME.
LS_FIELDCAT-SELTEXT_L     = 'Frieght'.
LS_FIELDCAT-FIELDNAME     = 'KWERT'.
LS_FIELDCAT-REF_FIELDNAME = 'KWERT'.
LS_FIELDCAT-REF_TABNAME   = 'KONV'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
* CLEAR LS_FIELDCAT.
* LS_FIELDCAT-TABNAME       = G_TABNAME.
* LS_FIELDCAT-SELTEXT_L     = '' .
* LS_FIELDCAT-FIELDNAME     = 'KBETR1'.
* LS_FIELDCAT-REF_FIELDNAME = 'KBETR'.
* LS_FIELDCAT-REF_TABNAME   = 'KONV'.
* APPEND LS_FIELDCAT TO RT_FIELDCAT.
*CLEAR LS_FIELDCAT.
* LS_FIELDCAT-TABNAME       = G_TABNAME.
* LS_FIELDCAT-SELTEXT_L     = 'PBXX'.
* LS_FIELDCAT-FIELDNAME     = 'KWERT1'.
* LS_FIELDCAT-REF_FIELDNAME = 'KWERT'.
* LS_FIELDCAT-REF_TABNAME   = 'KONV'.
* APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-TABNAME       = G_TABNAME.
LS_FIELDCAT-SELTEXT_L     = 'VAT/ST '.
LS_FIELDCAT-FIELDNAME     = 'KBETR'.
LS_FIELDCAT-REF_FIELDNAME = "KBETR".
LS_FIELDCAT-REF_TABNAME   = 'KONV'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-TABNAME       = G_TABNAME.
LS_FIELDCAT-SELTEXT_L     = 'OTHER '.
LS_FIELDCAT-FIELDNAME     = 'KWERT2'.
LS_FIELDCAT-REF_FIELDNAME = "KWERT".
LS_FIELDCAT-REF_TABNAME   = 'KONV'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
CLEAR LS_FIELDCAT.
LS_FIELDCAT-TABNAME       = G_TABNAME.
LS_FIELDCAT-SELTEXT_L = 'TOTAL'.
LS_FIELDCAT-FIELDNAME     = 'TOTAL'.
LS_FIELDCAT-REF_FIELDNAME = 'TOTAL'.
* LS_FIELDCAT-REF_TABNAME   = 'EKKN'.
APPEND LS_FIELDCAT TO RT_FIELDCAT.
   ENDFORM.                    " FIELDCAT_INIT
   FORM GET_DATA.
   SELECT A~EBELN A~LIFNR A~EKORG A~KNUMV B~VGABE B~GJAHR B~BELNR
           L~NAME1 L~NAME2
        FROM EKKO AS A
                      INNER JOIN EKBE AS B ON B~EBELN = A~EBELN
                      INNER JOIN LFA1 AS L ON L~LIFNR = A~LIFNR
                      INTO CORRESPONDING
                      FIELDS OF TABLE ITAB.
*                      WHERE B~VGABE = '2'.
SELECT EKPO~EBELN EKPO~EBELP EKPO~MATNR EKPO~TXZ01 EKPO~WERKS
          EKPO~NETWR EKPO~MENGE EKPO~MWSKZ EKPO~NETPR EKPO~PACKNO
          FROM EKPO
                    INTO CORRESPONDING FIELDS OF TABLE ITAB1
                    FOR ALL ENTRIES IN ITAB
                    WHERE EKPO~EBELN = ITAB-EBELN and
                          EKPO~BUKRS = 'company code'.
   SELECT EKKN~EBELN EKKN~EBELP EKKN~KOSTL EKKN~PS_PSP_PNR
      FROM EKKN
               INTO CORRESPONDING FIELDS OF TABLE ITAB2
               FOR ALL ENTRIES IN ITAB1
               WHERE EKKN~EBELN = ITAB1-EBELN AND
                     EKKN~EBELP = ITAB1-EBELP.
   SELECT KONV~KNUMV KONV~KSCHL KONV~KBETR KONV~KWERT KONV~KWERT
              KONV~KPOSN
      FROM KONV
          INTO CORRESPONDING FIELDS OF TABLE ITAB5
          WHERE KONV~KNUMV =   ITAB1-KNUMV AND
                KONV~KPOSN = ITAB1-EBELP.
*    SELECT LFA1~NAME1 LFA1~NAME2 FROM LFA1
*    INTO CORRESPONDING FIELDS OF TABLE ITAB1
*    WHERE LFA1~LIFNR = ITAB-LIFNR.
* SELECT ESLL~SUB_PACKNO ESLL~SRVPOS
*           ESLL~EXTROW ESLL~KTEXT1 FROM ESLL
*       INTO CORRESPONDING FIELDS OF TABLE ITAB6
*       FOR ALL ENTRIES IN ITAB1
*       WHERE ESLL~PACKNO = ITAB1-PACKNO .
**         SELECT ESLL~SUB_PACKNO FROM ESLL
**       INTO CORRESPONDING FIELDS OF TABLE ITAB6
**       FOR ALL ENTRIES IN ITAB1
**       WHERE ESLL~PACKNO = ITAB1-PACKNO.
*        SELECT ESLL~SUB_PACKNO ESLL~SRVPOS
*           ESLL~EXTROW ESLL~KTEXT1 FROM ESLL
*       INTO CORRESPONDING FIELDS OF TABLE ITAB8
*       FOR ALL ENTRIES IN ITAB6
*       WHERE ESLL~PACKNO = ITAB6-SUB_PACKNO .
* SELECT RSEG~BELNR RSEG~GJAHR FROM RSEG
*        INTO CORRESPONDING FIELDS OF TABLE ITAB7
*        FOR ALL ENTRIES IN ITAB
*        WHERE RSEG~BELNR = ITAB-BELNR AND
*              RSEG~GJAHR = ITAB-GJAHR.
*LOOP AT ITAB1.
LOOP AT ITAB.
              READ TABLE ITAB1 WITH KEY EBELN = ITAB-EBELN.
*         IF ITAB1-EBELN = ITAB-EBELN.
                IF sy-subrc eq 0.
*                          ITAB1-EBELN = ITAB-EBELN.
                          ITAB1-LIFNR = ITAB-LIFNR.
*                          ITAB1-EBELP = ITAB-EBELP.
                          ITAB1-BELNR = ITAB-BELNR.
                          ITAB1-KNUMV = ITAB-KNUMV.
                          ITAB1-NAME1 = ITAB-NAME1.
                          ITAB-NAME2 = ITAB-NAME2.
                          ITAB1-GJAHR = ITAB-GJAHR.
                modify itab1 index   sy-tabix.
        ENDIF.
ENDLOOP.
*LOOP AT ITAB2.
*         READ TABLE ITAB1 WITH KEY EBELN = ITAB2-EBELN.
*          IF sy-subrc eq 0.
*              ITAB1-EBELN = ITAB2-EBELN.
*              ITAB1-PS_PSP_PNR = ITAB2-PS_PSP_PNR.
*              ITAB1-KOSTL = ITAB2-KOSTL.
*               modify itab1 transporting ps_psp_pnr kostl
*               where ebeln = Itab2-ebeln AND EBELP = ITAB2-EBELP.
*          ENDIF.
*ENDLOOP.
LOOP AT ITAB1.
**ON CHANGE OF   ITAB1-ebeln or itab1-ebelp.
*     concatenate itab1-werks itab1-lifnr itab1-matnr
*         into val1.
*   MOVE VAL1 TO ITAB1-VAKEY.
*   MODIFY ITAB1.
*    SELECT KONH~KNUMH KONH~KSCHL FROM KONH
*        INTO CORRESPONDING FIELDS OF TABLE ITAB3
*        FOR ALL ENTRIES IN ITAB1
*        WHERE KONH~VAKEY = ITAB1-VAKEY.
**endon.
**        sort Itab3 by kschl descending.
**        Select konp-kbetr from konp into itab4 where
**        KONP~KNUMH = ITAB3-KNUMH AND KONP~KSCHL = ITAB3-KSCHL.
**ON CHANGE OF ITAB1-ebelp.
**LOOP AT ITAB3
** ON CHANGE OF ITAB1-ebelp.
*              itab1-knumh = itab3-knumh.
**              SELECT KONP~KBETR FROM KONP INTO CORRESPONDING FIELDS
**              OF TABLE ITAB4
**              FOR ALL ENTRIES IN ITAB3   WHERE
**              KONP~KNUMH = ITAB3-KNUMH AND KONP~KSCHL = ITAB3-KSCHL .
**              IF ITAB3-KSCHL = 'JMOP' .
**               ED = ITAB4-KBETR / 1000 * ITAB1-NETWR .
**              ENDIF.
**             IF ITAB3-KSCHL = 'JEC1'.
**              Itab1-ed1 = ITAB4-KBETR / 1000 * ED.
**              ADD ED TO ITAB1-ED1.
**             modify ITAB1 transporting ed1.
**             ENDIF.
*              IF ITAB3-KSCHL = 'JMOP' .
*               ED = 16 / 100 * ITAB1-NETWR .
*              ENDIF.
*             IF ITAB3-KSCHL = 'JEC1'.
*              Itab1-ed1 = 2 / 100 * ED.
*              ADD ED TO ITAB1-ED1.
*             modify ITAB1 transporting ed1.
*             ENDIF.
**        ENDLOOP.
**endon.
modify ITAB1.
*endon.
LOOP AT ITAB5.
     IF ITAB5-KSCHL = 'NAVS' OR ITAB5-KSCHL = 'NAVM'.
            ITAB1-KBETR = ITAB5-KBETR.
             modify ITAB1 transporting KBETR
             where KNUMV = ITAB1-KNUMV AND EBELP = ITAB1-EBELP .
           ELSEIF ITAB5-KSCHL = 'FRA1' OR ITAB5-KSCHL = 'FRC1' OR
                ITAB5-KSCHL = 'FRB1'.
                   ITAB1-KWERT = ITAB5-KWERT .
                   modify ITAB1 transporting KWERT
                   where KNUMV = ITAB1-KNUMV AND EBELP = ITAB1-EBELP
*               IF ITAB5-KSCHL = 'FRA1'.
*                    ITAB1-KBETR1 = ITAB5-KBETR / 1000 * ITAB1-NETWR .
*                   modify ITAB1 transporting KBETR1
*                   where KNUMV = ITAB1-KNUMV AND EBELP = ITAB1-EBELP
*                 ELSEIF ITAB5-KSCHL = 'FRC1' .
*                   ITAB1-KBETR1 = ITAB5-KBETR * ITAB1-MENGE .
*                   modify ITAB1 transporting KBETR1
*                   where KNUMV = ITAB1-KNUMV AND EBELP = ITAB1-EBELP
*                 ELSEIF ITAB5-KSCHL = 'FRB1' .
*                    ITAB1-KBETR1 = ITAB5-KBETR .
*                   modify ITAB1 transporting KBETR1
*                   where KNUMV = ITAB1-KNUMV AND EBELP = ITAB1-EBELP
*              ENDIF.
*           **THIS CODE IS FOR iNSURANCE CONDITION
           ELSEIF ITAB5-KSCHL = 'ZGIN' OR ITAB5-KSCHL = 'ZIN2'.
                   ITAB1-KBETR2 = ITAB5-KBETR.
                   modify ITAB1 transporting KBETR2
                   where KNUMV = ITAB1-KNUMV AND EBELP = ITAB1-EBELP
*           **THIS CODE IS FOR PBXX OR PB00 CONDITION
*          ELSEIF ITAB5-KSCHL = 'PBXX' OR ITAB5-KSCHL = 'PB00'.
*                   ITAB1-KWERT1 = ITAB5-KWERT1.
*                   modify ITAB1 transporting KWERT1
*                   where KNUMV = ITAB1-KNUMV AND EBELP = ITAB1-EBELP
**          ELSEIF ITAB5-KSCHL = 'JOCM' OR ITAB5-KSCHL = 'RA00' OR
**                 ITAB5-KSCHL = 'RA01' OR ITAB5-KSCHL = 'RB00' OR
**                 ITAB5-KSCHL = 'RC00' OR
**THIS CODE IS FOR OTHER CONDITION
           ELSEIF ITAB5-KSCHL = 'RL01' OR ITAB5-KSCHL = 'ZA00' OR
                 ITAB5-KSCHL = 'ZA01' OR ITAB5-KSCHL = 'ZAE1' OR
                 ITAB5-KSCHL = 'ZAED' OR
                 ITAB5-KSCHL = 'ZAFR' OR ITAB5-KSCHL = 'ZB00' OR
                 ITAB5-KSCHL = 'ZBCH' OR ITAB5-KSCHL = 'ZBED' OR
                 ITAB5-KSCHL = 'ZC00' OR
                 ITAB5-KSCHL = 'ZCEX' OR ITAB5-KSCHL = 'ZCIF' OR
                 ITAB5-KSCHL = 'ZHC1' OR ITAB5-KSCHL = 'ZHC2' OR
                 ITAB5-KSCHL = 'ZHCT' OR
                 ITAB5-KSCHL = 'ZHCV' OR ITAB5-KSCHL = 'ZJOC' OR
                 ITAB5-KSCHL = 'ZOTH' OR ITAB5-KSCHL = 'ZOTP' OR
                 ITAB5-KSCHL = 'ZOTT' OR
                 ITAB5-KSCHL = 'ZPK1' OR ITAB5-KSCHL = 'ZPK2' OR
                 ITAB5-KSCHL = 'ZPK3' OR ITAB5-KSCHL = 'ZPK4' OR
                 ITAB5-KSCHL = 'ZRPO' OR
                 ITAB5-KSCHL = 'ZSE1' OR ITAB5-KSCHL = 'ZSED' OR
                 ITAB5-KSCHL = 'ZSFR' OR ITAB5-KSCHL = 'ZSTX' OR
                 ITAB5-KSCHL = 'ZTPI' OR
                 ITAB5-KSCHL = 'ZTPV' OR ITAB5-KSCHL = 'ZTRD' OR
                 ITAB5-KSCHL = 'ZWCT'.
                   ITAB1-KWERT2 = ITAB5-KWERT.
                   modify ITAB1 transporting KWERT2
                   where KNUMV = ITAB1-KNUMV AND EBELP = ITAB1-EBELP
          modify itab1.
       ENDIF.
ENDLOOP .
ITAB1-TOTAL = ITAB1-NETWR + ITAB1-KWERT2 + ITAB1-KWERT + ITAB1-KBETR.
*              ITAB1-TOTAL = ITAB1-NETWR + ITAB1-ED1 + ITAB1-KBETR2 +
*                     ITAB1-KBETR1 + ITAB1-KBETR + ITAB1-KWERT   .
                 modify ITAB1 transporting TOTAL.
LOOP AT ITAB6.
          ITAB1-SUB_PACKNO = ITAB6-SUB_PACKNO.
*           modify ITAB1.
ENDLOOP.
LOOP AT ITAB7.
        ITAB1-BELNR = ITAB7-BELNR.
        ITAB1-GJAHR = ITAB7-GJAHR.
ENDLOOP.
LOOP AT ITAB8.
          ITAB1-SUB_PACKNO = ITAB8-SUB_PACKNO.
          ITAB1-SRVPOS = ITAB8-SRVPOS.
          ITAB1-EXTROW = ITAB8-EXTROW.
          ITAB1-KTEXT1 = ITAB8-KTEXT1.
          modify ITAB1.
ENDLOOP.
* SELECT ESLL~PACKNO ESLL~SUB_PACKNO ESLL~SRVPOS ESLL~KTEXT1
*          FROM ESLL
*          INTO CORRESPONDING FIELDS OF TABLE ITAB6
*          WHERE ESLL~PACKNO = ITAB1-PACKNO.
** delete adjacent duplicates from itab1 comparing EBELN .
modify ITAB1.
endloop.
sort Itab1 by EBELN Ascending.
        SELECT KONV~KBETR FROM KONV
        INTO ITAB1-KBETR
        WHERE KONV~KSCHL = 'NAVS' OR KONV~KSCHL = 'NAVM'.
        ENDSELECT.
        ITAB1-KBETR = ITAB5-KBETR.
*ENDLOOP.
*ENDLOOP.
*ENDLOOP.
ENDFORM.
Reward all helpfull answers
Regards
Pavan

Pivot Day wise closing stock report

Expert,
we need same report from SAP
Pivot report day wise closing stock
Item Code - Item Description - UoM - Warehouse - Item Group - Days 1-2-3-4-31
Selection criteria
From Date
To Date
Item Group
Please help and send Pivot query.
Thanks in advance
Mukesh

Hi Nagarajan Sir,
The above link query is showing a particular date stock status
but my requirement is different below sample format
Date     -    Item Code - Item Description - UoM - Warehouse - Item Group - Closing Stock
15/03/14   F00012       TMT BAR 10 MM     KG        KRY01          FINISHED      230.35
16/03/14   F00012       TMT BAR 10 MM     KG        KRY01          FINISHED      265.65
17/03/14   F00012       TMT BAR 10 MM     KG        KRY01          FINISHED      356.35
Can i get this format
Selection criteria
From date
To Date
Warehouse
Please think about this format and suggest
Regards
Mukesh Singh

Raw material stock report with vendor wise

Dear all ,
Can any one tell me , How do I get stock report only on " VENDOR " wise .
The purpose is , I've multiple souces for one Material , I need analyse the available inventory with vendor wise.
Pl.s help
Thanks in Advance
Sekhar

Hi,
1. Once you receive the mateiral inside the plant the identity of vendor is lost.
2. All the stock will get as Plant / Sloc Stock only.
3. Incase if you need vendor wise stock then you need to activate batch management, with Classification view and one characteristics as vendor.
4. And during each GR you need to enter the vendor value
Else you will not be able to seggregate the available stock vendor wise.
reg
dsk

Consingment stock report with values and periods..

hello guys,
i have an issue here.. consignmet stock are "managed" within SD. Is there a standard report which cointains info about consigment stock, its amounts (values) and periods ?
Main point here - consingment stock is processed within SD, so for example t.code MB54 is not useful here .
Thanks guys !
Best regards,
Laimonas

Hi......MB54 wont help since that shows the Vendor consignment stocks.
Use MB52 creatively like this.
Goto MB52
Put your plant name.
In the section 'Selection : Special stock', Mark the check box and put 'W' in Special Stock indicator.
Choose the other settings as per your choice.
Execute.
Now you will see a whole lot of stocks along wioth the Consignment stocks. If you only want to see the consignment stocks, do like this
In the list, put you cursor on the column 'S' which is special stock (i think the 4th colm in the list). Now choose the filter icon and put the filter criteria a 'W' i.e. customer consignment stock.
You can save this is a variant with a name, say /ZCONS.
Now come back to the initial MB52 screen. In the bottom section for display options, put this variant name in the field Layout.
So now when you next run the report with this variant, you will only get the customer consignment stocks with their values.
Hope this helps.

Stock report with grn no & date

hello gurus,
I need standard stock reports available in SAP with GRN no. and date.
points assured*
Anand

Hi
Use MB5B stock on posting date.By using this T code
1.You see stock on a perticular date
2.If you give selection date rangeL ex 01.07.2007 to 16.07.2007 then
   It will display Stock as on 01.07.2007
   Stock as on 16.07.2007
   and all the goods movement between 01.07.2007 to 16.07.2007.
Use MMBE, after executing select Material movements from Environment tab in menu bar.It will also display all the material movements for that material.
Regards
Ramakrishna

Closing stock report 31.08.2008

Hi, Sap experts
I want to see the report which can show Closing stock as on 31.08.2008 - Quantity , Value , date & material name & master
can anyone known about this report
regards
gk

hi,
Check the MB5B report...
Hope it helps...
Regards
Priyanka.P
Please check the rules(Welcome and Rules of Engagement), and close the thread after assigning points properly...

Stock Report with batch number and its Charactristc values

Our material are batch managed and Char values are entered at the time of GR. We need to prepare stock report showing batches for the material, their stock and characteristics values.
Like to know what tables we should use to find the char values. I could not find value in table CAWN

Hi,
For characteristcis link and values use below tables:
Characteristics :
    CABN                   Characteristics ( o.a. batch/vendor)
    CABNT                 Characteristics description
    CAWN                  Characteristics ( o.a. material)
    CAWNT                Characteristics description
    AUSP                   Characteristic Values
   Class types and objects :
    TCLAO                 Several class types for object
    TCLA                    Class types ( vb. lfa1 => v10 en 010)
    TCLAT                  Class type text
    TCLT                    Classifiable objects
    TCLC                   Classification status
   Links :
    INOB                    Link between Internal Number and Object
    KLAH                  Class header data
    KSSK                  Allocation Table: Object (vb.matnr) to Class
    KSML                  Characteristics for a class (internal number)
for batch stock 0 use tables ilken MCHB, MCHA etc,
hope this helps
Reg
Dheeraj

Closing stock report with GRPO

Similar Messages

Maybe you are looking for