Complete reconcilation of Raw material

Dear Experts,
We are getting one material excess in stock and i think that we have issued excess material against some production order, So please confirm me how can i justify to management that is so and so production order excess material was issued.
Through which T-code i can get  complete reconcilation of Raw material or through which t-code i can find out excess material issued in production order.
Can cannot check each and every production order because the production order are huge in numbers.
Regards,

Dear Friend,
Go to Transaction COOIS. In this transaction select the list "Components". In selection parameters give the value such as plant code, Basic start date, basic finish date, etc. (depend on you).
After maintaining all the data as mentioned above, system will show all the components required in production order with there requirement quantities and actual material issued for that component against the production order (Qty withdrawn).
This way you will come to know how much material issued in excess against the process order.
Another way is through MB25 Report (display reservation). Here in dynamic list select the selection parameter movement type and mention the 261 movement type and maintain the rest of the parameters i.e Plant, order number. After maintaining all the data as explained execute it. In output system will show process order wise component list with its requirement qty, qty withdrawn for that component against the process order, and difference qty (material issued less or in excess).
Regards,
Jitendra

Similar Messages

  • How to enter / Post Goods receipt of Raw Material from subcontractor

    Dear Experts,
    As standard subcontracting procedure, Raw Material Transfer posting is made to Subcontracting Vendor
    and the Semi finished material [Assembly] is received from the subcontractor.
    If in case extra or by any reason, raw material stock is with subcontractor, he want to return the raw material stock.
    How to receive raw material stock from subcontracting vendor and how to handle subcontracting challan transactions in SAP ?
    Thanks in Advance !

    Hi,
    >>Receive the RM using MB1B / 542
    >> Reconcile using J1ifq
    >> Complete challan using J1if13
    Thanks,
    Rajoo

  • Batch Traceability for Sugar as raw material during the production process

    Dear Colleague ,
    I need your support for a traceability issue in a customer on beverage sector
    See the case below:
    Batch Traceability for Sugar as raw material during the production process
    In AMSB the batch traceability in some production processes is very difficult, especially in case of sugar where tanks wherein more than one batches of the same material can be mixed. For example, in a single day almost 17-20 batches of the same material can be mixed and as the result is a composition of water and sugar the normal FIFO rule strategy cannot be applied during the component consumption.
    The raw material (sugar) is received in tank S5 at different points of time, and its content is transferred to tank B1 for storage purposes as well as for mix the sugar with other material such as water.
    At a specific moment the S5 tank contains only a single batch, while the tank B1 contains more than one batch. Tank B1 is used in order to supply the production line and the corresponding material consumption is triggered in backflush as soon as the production activity is declared (production confirmation). Along with the material consumption the batch determination takes place and a complex algorithm is applied: at a very high level, the single batch is consumed depending on its percentage inside the mix of composition and in case the this
    percentage is under a threshold level the current batch should be full used in order to avoid that it will exist for ever.
    Moreover, the good movement reversal (reversal of material consumption) and its correction lead to a complete new calculation of all the batches consumed after the original movement date/time. This means that the algorithm for batch determination should be reapplied for all the consumptions subsequent to the original movement.
    On the other hand it’s not possible to identify the mix of batches at the exit point of silos B1 because the total consumption of the material in the tank will never happen. As long as the tank level decreases it will be filled up from the tank used for receiving of sugar (S5).
    As requirement AMSB needs to post the material consumption starting from EWM, this means that EWM should be the master system in this case and the correspondingmovements have to be  transferred to ECC afterwards. This mainly because EWM  should guarantee the business continuity in case the ERP system is not available.
    AMSB asked if the scenario depicted has been implemented in some customer, in EWM system or in any other SAP solution.

    Hi ,
    At the time of consumption you can put ' * ' aestrix sign in the batch field.
    You will get list of batches of that material.select ur batch and consume the quantity.
    Regards
    Piyush

  • Raw Material Consumption Report

    Dear Forum,
    The users want to generate the report from the system that would give the item wise details of the Raw Material Cosnumption for the Period selected. How could we generate the same and also the users want to reconcile the same with the GL Account.
    Your help would be much appreciated.
    Regards

    hi
    first take out which movements ur using for consumption like 201 261 etc
    now goto mb51 here select those movements and materials u need with prorper business area,dates and execute
    now u will get the report for the consumption
    just match this with the GL accts
    u can use transaction type WA also
    regards
    kunal

  • PP module: I reversed my settlement but now raw material does not appear

    Hi all,
    I did a small mistake in setting up MRP for finished goods therefore my amount came different. I got the message to see the log but as i could not locate the log and went ahead and completed the settlement.
    Then I found out the mistake and correted the same. But I had already made settlement, therefore I reversed my settlement.
    Now when I am doing>>> Logistics u21D2 Production u21D2 MRP u21D2 Planning u21D2 Single Item, Multi-Level....I can see only finished goods and raw material disappeared. Therefore I can not proceed and do my settlement.
    can somebody help me on this?
    regards,
    Supriya
    Edited by: Supriya Naik on Mar 3, 2011 10:19 AM

    To be precise...thats how my PP module is.......I need to do SD module but can not proceed because of this mess up...but it is making me learn a lot!!
    I would really appreciate your help.
    regards,
    Supriya
    Tools u21D2 Customizing u21D2 IMG u21D2 Edit Project u21D2
    Materials Management u21D2 Consumption-Based Planning u21D2 Plant Parameters u21D2 Carry Out Overall Maintenance of Plant Parameters
    Activate MRP:  Tools u21D2 Customizing u21D2 IMG u21D2 Edit Project u21D2
    Materials Management u21D2 Consumption-Based Planning u21D2 Planning u21D2 Activate Material Requirements Planning
    Create production sch profile: Tools u21D2 Customizing u21D2 IMG u21D2 Edit Project u21D2
    Production u21D2 Shop Floor Control u21D2 Master Data u21D2 Define production scheduling profile
    Create prodn scheduler: Tools u21D2 Customizing u21D2 IMG u21D2 Edit Project u21D2
    Production u21D2 Shop Floor Control u21D2 Master Data u21D2 Define production scheduler
    Control parameter for MRP: Tools u21D2 Customizing u21D2 IMG u21D2 Edit Project u21D2
    Production u21D2 Material Requirements Planning u21D2 Plant Parameters u21D2 Carry Out Overall Maintenance of Plant Parameters
    Assign availability check to order type: Tools u21D2 Customizing u21D2 IMG u21D2 Edit Project u21D2
    Production u21D2 Shop Floor Control u21D2 Operations u21D2 Availability Check u21D2 Define Checking Control
    Define control perameters: Tools u21D2 Customizing u21D2 IMG u21D2 Edit Project u21D2
    Production u21D2 Shop Floor Control u21D2 Operations u21D2 Scheduling u21D2 Define Scheduling Parameters for Production Orders
    define control parameters- Order Type: Tools u21D2 Customizing u21D2 IMG u21D2 Edit Project u21D2
    Production u21D2 Shop Floor Control u21D2 Master Data u21D2 Order u21D2 Define order type-dependent parameters
    create confirmaton parameters: Tools u21D2 Customizing u21D2 IMG u21D2 Edit Project u21D2
    Production u21D2 Shop Floor Control u21D2 Operations u21D2 Confirmation u21D2 Define Confirmation Parameters
    define valuation of goods received: Tools u21D2 Customizing u21D2 IMG u21D2 Edit Project u21D2
    Production u21D2 Shop Floor Control u21D2 Integration u21D2 Define Valuation of Goods Received
    MMR1- Created material
    MMH1- MRP view fo trading goods
    MMF1- MRP view for finished oods
    MD02- Run MRP
    CS01- Create BOM
    KL01- Create activity type labor
    KP26- set activity prices
    Work Center person responsible: Tools u21D2 Customizing u21D2 IMG u21D2 Edit Project u21D2
    Production u21D2 Basic Data u21D2 Work Center u21D2 General Data u21D2 Determine person responsible
    Create work center location: Tools u21D2 Customizing u21D2 IMG u21D2 Edit Project u21D2
    Enterprise Structure u21D2 Definition u21D2 Logistics u2013 General u21D2 Define Location
    create work center controll keys: Tools u21D2 Customizing u21D2 IMG u21D2 Edit Project u21D2
    Production u21D2 Basic Data u21D2 Work Center u21D2 Routing Data u21D2 Define control key
    CR11- Create activity
    CR01-work center for finished goods
    CA01- created routing for finished product
    case
    MD02- Run MRP (got error- error calculating costs- see log....but wrongly saved)
    MD04- conversion planned order to production order
    MB1A- Gods Issue- 261- consumption for order from warehouse
    CO15- completion confirmation of production
    MB31-Goods receipt
    KO88-Settle Cost of production order

  • MRP for FG not looking at Raw Material

    HI all,
    I'm running MRP for finished goods material against my production plan (created in MD61).   The material has a BOM component but when I run MRP for the FG its not looking at BOM component to consider raw material) availability and thus proposing dates solely based on the Production Plan and not any other requirements.  
    It simple creates the planned orders based on the production plan entered into MD61.  The dates for the planned orders don't take into consideration that on the suggested Production date there is not enough raw material to actual produce the product.   
    The Production plan does drive requirements to purchase the raw material but the dates are not neccessarily correct to get product to the warehouse on time for production run.   
    FG set up:
    RP Type:                                PD - MRP
    Lot Size:                                 EX u2013 Lot-for-lot Order Quantity
    Safety Stock:                         125  - EA
    Availability Check:                   02 u2013 Individual Requirements
    Procurement Type:                   E - In-House Production
    In-house Production:                 1 - days
    Planning Strategy:                   10 u2013 Make-to-stock production
    BOM / Raw Material set up:
    RP Type:                                PD - MRP
    Lot Size:                                 EX u2013 Lot-for-lot Order Quantity
    Availability Check:                   02 u2013 Individual Requirements
    Procurement Type:                    F - External Purchased
    Pland Del Time:                         3 - days
    GR Process time                       1 - days
    Planning Strategy:                   40 u2013 Planning with Final Assembly
    How do I get the MRP for the FG to not only create the planned orders from the production plan but also take into consideration raw material availability?   Thanks for your help!!

    VC,
    I need to the PlndOrd date for FG to take into consideration raw material availability...otherwise it's pretty useless to the site.
      I guess you are unfamiliar with the workings of standard MRP.  MRP in ECC as delivered by SAP will not support this requirement.
    There are a couple of assemble to order strategies that may be suitable for you, if all of your RM materials exist in the FGs BOM.  Strat 81 and 82, which are intimately linked to the Sales order ATP check.  These strategies are not compatible with FGs forecasts.
    http://help.sap.com/erp2005_ehp_06/helpdata/EN/41/19206a45fd11d188ff0000e8322f96/frameset.htm
    In SAP ERP, MRP just does not check the availability of components during the MRP run.  The Net Requirements calculation of a component part (which is the closest concept within MRP to an Availability check) takes place ONLY after all parent parts are completely planned, and all parent part planned orders have been already been generated and saved.  In effect, when MRP is running, information is neither gathered nor considered as to what the planning situation will be for the components.
    APO has several solutions that, depending upon the detailed requirements, might provide a solution.  A common one is to first run an MRP type heuristic, to create planned orders for all the shortages, and subsequently run a 'Bottom-up' scheduling heuristic to bring supply and demand dates into alignment, based upon pegging information.  ERP does not have this functionality.
    Of course, SAP ERP is infinitely modifiable.  If you have enough time and money, you can write custom code that will torture ERP into filling any Business Requirement.
    Best Regards & Good Luck,
    DB49

  • Exact weight of RAW material

    Hello,
    our scenerio is QM is activated for raw material inspection.
    Procedure is
    1) Raw material(in stone form) came in truck.
    2) in gate it is weight(Gross) is taken.
    3) it is quility checked. if it is clear, truck is unloaded.
    4) after unloading truck weight is again taken.
    5) Gross weight - truck weight is net weight of GR.
    now the problem is how result recording is done in SAP without having exact weight bcoz it comes after unloading. and unloading can be done only after quality ckeck.
    Kindly give the solution.
    Thanks
    RP
    Edited by: rajendra P on Aug 26, 2008 5:56 AM

    Hi Rajendra,
    I don't know how far it will hep you but I have an idea pls refer this.
    You must have a separate operation for the Weight in the inspection plan for the material. And keep the MIC for "Net Weight" as long term inspection.
    Now the second operation will be for the quality check, where all the MICs related to Quality checks will be incorporated. So perform the RR and then you can perform UD also. And stock posting also as well.
    Now come back to the Net Weight MIC, which is long term MIC so you can record results for it after UD and Stock posting is completed.
    If the idea is not clear, pls explain how does the physical process flows? I mean the gross weight done, noted in the result sheet.
    Then the quality checks done (inside the truck itself) and results noted.
    Then the unloading done, only if the quality checks passes, correct? And then net weight is calculated (Gross - Truck), and the results are noted in the sheet. And if rejected in Quality test it will be not unloaded and sent back, correct?
    Pls revert.
    Regards,
    Shyamal

  • Production Planning for industry getting raw material from farmers.

    I am working in a process industry where i get raw material from farmers.My production(quantity and quality) is compltely depend on the quality of raw material.How can I plan this in SAP, So that I can get  good quality of raw material.

    Hi
    SAP is ERP package which provides complete integration between all the other industry modules like Finance, Materials, sales, Production and Quality.
    The present system of your Production and Quality has to be mapped in the SAP. But the data has to be flown from the present systems to sap. We built some controls for Raw material inspection for quality, it will allow only raw materials which will meets your specifications. And at any point of time you will have better control on the production also. We can can easily which raw materils are used for production etc.
    Regards.
    Balu

  • Error while reconcilation of excise material

    Hi, friends
    We have receceived material from subcontractor after expiry of delivery date (i.e. 180 days). Now when we are tying to reconcile the material via j1ifq it gives error that material document material is different form challan. We have issued raw material to subcontractor and receiving semifinished from him.
    Are we missing any step?
    Thanks in advance.

    Hi
    1. Plz check material doc. year. This is one of the possibility of that error
    2. Display the material doc and check whether u are entering correct Material doc.
    Thnx
    Nilesh

  • Query for calculating raw material requirements for the remaining quantities in sale order.

    Dear SAP Experts,
    Clients requirement :
                                         Client wish to know the quantities of raw materials needs to run the production order inorder to complete the remaining quantities in sale order.
    Need Clarification:
                                  I"m using the below query for this requirement. I wish to know whether this query suits for my clients requirement or not. If its so, I need to know how to group by T4.[Code] (Raw material Name)   and need to get the sum of    T4.[Quantity]  (BOM quantity)      and  (T1.[OpenQty]*T4.[Quantity]) as TOTALQTY under each raw material group
    SELECT T0.[DocNum], T0.[DocDate], T0.[CardCode],T0.[CardName], T1.[ItemCode], T1.[Dscription], T1.[Quantity] as salesorderQty , T1.[OpenQty], T2.onhand, T4.[Code] as Raw material Name,T4.[Quantity] as BOMQTY,  (T1.[OpenQty]*T4.[Quantity]) as TOTALQTY FROM ORDR T0  INNER JOIN RDR1 T1 ON T0.[DocEntry] = T1.[DocEntry] INNER JOIN OITM T2 ON T1.[ItemCode] = T2.[ItemCode] INNER JOIN OITT T3 ON T2.[ItemCode] = T3.[Code] INNER JOIN ITT1 T4 ON T3.[Code] = T4.[Father] WHERE  T0.[DocStatus] ='o' 

    You're posting in the Portuguese B1 space.
    You might want to post in the English one: SAP Business One Application

  • For production - Raw material & WIP after system Live

    Hi All,
    I have taken the cutover data with WIP value for GOLIVE; we have put the value in WIP in GL for trial Balance;
    After System Live, we are facing the two scenarios to map in system.
    u2022     Open production which has no needed more raw materials (all included in WIP) to completion of production order.
    We have uploaded the finish product with movement type -521 and reduce the value from WIP with help of manual entry; but below scenario have confusion how to map.
    u2022     Open production which needs more raw material (apart of WIP) to complete the production,
    Please guide to me how to map in system.
    Thanks
    Rajesh Tiwari

    Hi,
    The best practice followed is you need to close the legacy system production order and you need to create a new production order in SAP. Against the new SAP production order number, you can issue the raw materials.
    Regards,
    V. Suresh

  • Report on raw material to wip for a production order

    Hi,
    Is there a report which has a list of " issue of raw materials to a production order"?
    Or how to know how much raw material is issued to WIP on a production order.
    i nee dto have a report which has material cost and material overhead an dtotal.
    how to build this report ?
    Thanks,
    Sai.

    Hi Sai,
          You can try using MB51, use filter movement type 261. Add a filter for the posting date coverage.
    Then proceed. Click on the icon DETAIL LIST.
    Then click on the SUBTOTAL, add MATERIAL as a Criteria. The click the column AMOUNT IN LC.
    You should see the total issuances to per material.
    I hope this helps.
    Heinrick Palad

  • Raw material cost report for production of finished produt.?(urgent..REWARD

    Hi,
    any one can help in this issue.
    i am not getting the raw materila cost & manfacture conversion cost for  for the bom of FG - SFG - SFG - SFG- RAW
    FG - finished goods,
    SFG - semi finished goods
    RAW - raw material.
    plz provide the solution.
    raw material  and manfacture conversion cost is calculated in PERFORM z_process_data. subroutine.
    REPORT z_co_production_cost_nsk.
    TABLES: afko, bkpf, t001w , caufv.
    TYPE-POOLS: kkblo,
                slis.
    DATA: d_datefrom LIKE sy-datum,
          d_dateto LIKE sy-datum,
          d_repid LIKE sy-repid,
          d_uname LIKE sy-uname,
          d_returncode TYPE i,
          d_tabix TYPE i,
          d_kokrs LIKE tka01-kokrs,
          d_waers LIKE tka01-waers,
          wa_fieldcatalog TYPE slis_fieldcat_main,
          wa_listevents TYPE slis_alv_event,
          wa_listlayout TYPE slis_layout_alv,
          wa_print_info TYPE slis_print_alv,
          wa_listheader TYPE slis_listheader,
          d_headerlines TYPE i.
    DATA: BEGIN OF t_caufv OCCURS 0,
            aufnr TYPE caufv-aufnr,
            werks TYPE caufv-werks,
            objnr TYPE covp-objnr,
            gamng TYPE caufv-gamng,
            plnbez TYPE caufv-plnbez,
            rsnum TYPE caufv-rsnum,
          END OF t_caufv.
    *Added by Anand Bothra on 24/11/2003
    DATA: t_ab_caufv LIKE t_caufv OCCURS 0 WITH HEADER LINE.
    DATA: t_temp_caufv LIKE t_caufv OCCURS 0 WITH HEADER LINE.
    DATA: BEGIN OF t_afpo OCCURS 0,
            aufnr TYPE afpo-aufnr,
            posnr TYPE afpo-posnr,
            wemng TYPE afpo-wemng,
            amein TYPE afpo-amein,
            charg TYPE afpo-charg,
          END OF t_afpo.
    DATA: BEGIN OF t_afpo1 OCCURS 0,
            aufnr TYPE afpo-aufnr,
            refaufnr TYPE afpo-aufnr,
            objnr TYPE caufv-objnr,
            rsnum TYPE afko-rsnum,
            wemng TYPE afpo-wemng,
            werks TYPE afpo-dwerk,
            charg TYPE afpo-charg,
          END OF t_afpo1.
    DATA: BEGIN OF t_makt OCCURS 0,
            matnr TYPE makt-matnr,
            maktx TYPE makt-maktx,
          END OF t_makt.
    DATA: t_fieldcatalog TYPE slis_t_fieldcat_alv,
          t_listevents TYPE slis_t_event,
          t_sortsequence TYPE slis_t_sortinfo_alv,
          t_listheader TYPE slis_t_listheader.
    DATA: BEGIN OF t_production_costs OCCURS 0,
            objnr TYPE covp-objnr,       " Object Number
            kstar TYPE covp-kstar,       " Cost Element
            wkgbtr TYPE covp-wkgbtr,     " Cost of Line Item in CO area curr
            mbgbtr TYPE covp-mbgbtr,     " Quantity of Line Item
            matnr TYPE covp-matnr,       " Material Number
            kokrs TYPE covp-kokrs,       " Controlling Area
            belnr TYPE covp-belnr,       " Cost Accounting Document
            buzei TYPE covp-buzei,       " Item Number in Document
          END OF t_production_costs.
    DATA: BEGIN OF t_production_costs1 OCCURS 0,
            objnr TYPE covp-objnr,       " Object Number
            kstar TYPE covp-kstar,       " Cost Element
            wkgbtr TYPE covp-wkgbtr,     " Cost of Line Item in CO area curr
            mbgbtr TYPE covp-mbgbtr,     " Quantity of Line Item
            kokrs TYPE covp-kokrs,       " Controlling Area
            belnr TYPE covp-belnr,       " Cost Accounting Document
            buzei TYPE covp-buzei,       " Item Number in Document
          END OF t_production_costs1.
    DATA t_production_costs2 LIKE t_production_costs1
         OCCURS 0 WITH HEADER LINE.
    DATA: BEGIN OF t_suborders OCCURS 0,
            aufnr TYPE caufv-aufnr,
            prevaufnr TYPE caufv-aufnr,
            objnr TYPE covp-objnr,
            rsnum TYPE caufv-rsnum,
          END OF t_suborders.
    DATA: BEGIN OF t_outputtab OCCURS 0,
            plnbez LIKE afko-plnbez,             " Material Number
            objnr LIKE caufv-objnr,              " Object Number
            maktx LIKE makt-maktx,               " Material Description
            charg LIKE afpo-charg,               " Batch Number
            aufnr LIKE afko-aufnr,               " Production Order Number
            gamng LIKE caufv-gamng,              " Total Order Quantity
            wemng LIKE afpo-wemng,               " Goods Receipt Quantity
            amein LIKE afpo-amein,               " Unit of Measure
            yield TYPE p DECIMALS 2,             " Percentage Yield
            totalrmcost TYPE p DECIMALS 2,       " Total Raw Material Cost
            totalpmcost TYPE p DECIMALS 2,       " Total Packing Mat. Cost
            mfgconvcost TYPE p DECIMALS 2,       " Manu. Conversion Cost
            pkgconvcost TYPE p DECIMALS 2,       " Packing Conv. Cost
            rmperunit TYPE p DECIMALS 2,         " Raw Cost per unit
            pmperunit TYPE p DECIMALS 2,         " Pack Mat cost per unit
            ccperunit TYPE p DECIMALS 2,         " Conv Cost per unit
            totperunit TYPE p DECIMALS 2,        " Total Cost per unit
            waers LIKE tka01-waers,              " Currency Key for CO Area
          END OF t_outputtab.
    *Added by Anand Bothra on 24/11/2003.
    DATA: t_ab_outputtab LIKE t_outputtab OCCURS 0 WITH HEADER LINE,
          t_temp_outputtab LIKE t_outputtab OCCURS 0 WITH HEADER LINE.
    BEGIN OF INSERTION VIP110703
    DATA:wa_prev_outputtab LIKE LINE OF t_outputtab,
         wa_production_costs LIKE LINE OF t_production_costs.
    DATA:prev_totmatqty TYPE p DECIMALS 2,
         prev_tot_mfgconv_cst TYPE p DECIMALS 2,
         grand_mat_qty TYPE p DECIMALS 2 ,
         tmp_aufnr TYPE caufv-aufnr.
    DATA: BEGIN OF t_suborders_propcost OCCURS 0,
            aufnr TYPE caufv-aufnr,
            prevaufnr TYPE caufv-aufnr,
            objnr TYPE covp-objnr,
            rsnum TYPE caufv-rsnum,
            proprmcost TYPE p DECIMALS 2,
            prop_mfg_convcost TYPE p DECIMALS 2,
          END OF t_suborders_propcost.
    DATA: wa_suborders LIKE LINE OF t_suborders.
    END   OF INSERTION VIP110703
    BEGIN OF INSERTION VIP111003
    DATA: prev_aufnr TYPE caufv-aufnr,
          prev_matnr TYPE mara-matnr,
          curr_matnr TYPE mara-matnr.
    DATA: bln_suborder ,
          ratio TYPE p DECIMALS 5.
    BEGIN OF INSERTION VIP111003
    *Added by Anand Bothra on 28/11/2003
    DATA: d_flag TYPE c.
    SELECTION-SCREEN BEGIN OF BLOCK zblock1 WITH FRAME TITLE text-001.
    SELECT-OPTIONS: s_plnbez FOR afko-plnbez,
                    s_aufnr FOR afko-aufnr,
    "Added By Vivek on 29.11.2005
                    s_auart FOR caufv-auart obligatory.
    PARAMETERS p_werks LIKE t001w-werks OBLIGATORY.
    SELECTION-SCREEN END OF BLOCK zblock1.
    SELECTION-SCREEN BEGIN OF BLOCK zblock2 WITH FRAME TITLE text-002.
    SELECT-OPTIONS: s_monat FOR bkpf-monat NO-EXTENSION OBLIGATORY.
    PARAMETERS p_gjahr LIKE bkpf-gjahr OBLIGATORY.
    SELECTION-SCREEN END OF BLOCK zblock2.
    SELECTION-SCREEN BEGIN OF BLOCK zblock3 WITH FRAME TITLE text-022.
    PARAMETERS: p_detsum RADIOBUTTON GROUP rad,
                p_sum RADIOBUTTON GROUP rad.
    SELECTION-SCREEN END OF BLOCK zblock3.
    INITIALIZATION.
      d_repid = sy-repid.
      d_uname = sy-uname.
    p_werks = 'G001'.
    AT SELECTION-SCREEN OUTPUT.
    LOOP AT SCREEN.
       IF screen-name EQ 'P_WERKS'.
         screen-input = 0.
         MODIFY SCREEN.
       ENDIF.
    ENDLOOP.
    AT SELECTION-SCREEN ON s_monat.
      IF s_monat-high IS INITIAL.
        IF NOT ( s_monat-low BETWEEN 1 AND 12 ).
          MESSAGE e398(00) WITH text-023 text-024 space space.
        ENDIF.
      ELSE.
        IF ( ( s_monat-low LT 1 ) OR ( s_monat-high GT 12 ) ).
          MESSAGE e398(00) WITH text-023 text-024 text-025 space.
        ENDIF.
      ENDIF.
    START-OF-SELECTION.
      PERFORM z_get_period_dates.
      PERFORM z_select_prod_orders.
      PERFORM z_select_prod_costs.
      PERFORM z_select_addl_prod_costs.
      PERFORM z_select_mat_desc.
    END-OF-SELECTION.
      IF d_returncode EQ 0.
        PERFORM z_process_data.
    *Added by Anand Bothra on 24/11/2004.
        PERFORM z_select_to_print.
        PERFORM z_prepare_fieldcat.
        PERFORM z_get_alv_events.
        PERFORM z_define_sortsequence.
        PERFORM z_define_layout.
        PERFORM z_display_list.
    *Added by Anand Botra on 25/11/2003.
        PERFORM z_export_to_excel.
        PERFORM z_send_mail_and_download.
      ELSE.
        MESSAGE i017(p5).
      ENDIF.
    *&      Form  Z_GET_PERIOD_DATES
          text
    -->  p1        text
    <--  p2        text
    FORM z_get_period_dates.
    Determine the date range from the fiscal period range and
    fiscal year entered on the selection screen
      DATA: d_firstdate LIKE sy-datum,
            d_lastdate LIKE sy-datum,
            t_dates LIKE scscp_period_str OCCURS 0 WITH HEADER LINE.
      CALL FUNCTION 'FIRST_AND_LAST_DAY_IN_YEAR_GET'
        EXPORTING
          i_gjahr        = p_gjahr
          i_periv        = 'V3'
        IMPORTING
          e_first_day    = d_firstdate
          e_last_day     = d_lastdate
        EXCEPTIONS
          input_false    = 1
          t009_notfound  = 2
          t009b_notfound = 3
          OTHERS         = 4.
      CALL FUNCTION 'CSCP_PARA1_GET_PERIODS'
        EXPORTING
          i_datuv    = d_firstdate
          i_datub    = d_lastdate
          i_timeunit = 'M'
        TABLES
          et_dates   = t_dates.
      SORT t_dates BY sindex.
      DELETE t_dates INDEX 1.
      LOOP AT t_dates.
        SUBTRACT: 1 FROM t_dates-sindex,
                  1 FROM t_dates-datub.
        MODIFY t_dates TRANSPORTING sindex datub.
      ENDLOOP.
      CLEAR: d_datefrom,
             t_dates.
      READ TABLE t_dates WITH KEY sindex = s_monat-low.
      d_datefrom = t_dates-datuv.
      CLEAR d_dateto.
      IF s_monat-high IS INITIAL.
        d_dateto = t_dates-datub.
      ELSE.
        CLEAR t_dates.
        READ TABLE t_dates WITH KEY sindex = s_monat-high.
        d_dateto = t_dates-datub.
      ENDIF.
    ENDFORM.                    " Z_GET_PERIOD_DATES
    *&      Form  Z_SELECT_PROD_ORDERS
          text
    -->  p1        text
    <--  p2        text
    FORM z_select_prod_orders.
    Select all production orders as per the selection criteria provided
      DATA: d_dlv_code LIKE jstat-stat,
            d_teco_code LIKE jstat-stat,
            t_status LIKE jstat OCCURS 0 WITH HEADER LINE.
      SELECT SINGLE name1 INTO t001w-name1 FROM t001w WHERE werks = p_werks.
    if s_plnbez-low eq space and s_plnbez-high eq space.
    endif.
      SELECT aufnr werks objnr gamng rsnum plnbez
      INTO CORRESPONDING FIELDS OF
      TABLE t_caufv FROM caufv
      WHERE aufnr IN s_aufnr
    AND   auart IN ('PP01', 'LL02') : BY VIVEK
      AND   auart in s_auart " Added By Vivek on 29.11.2005
      AND   werks = p_werks
      AND   plnbez IN s_plnbez
      AND   getri BETWEEN d_datefrom AND d_dateto
      ORDER BY aufnr.
      d_returncode = sy-subrc.
      IF d_returncode NE 0.
        STOP.
      ENDIF.
    Filter out only those production orders that have a status
    DLV (Delivered) or TECO (Technically Confirmed).
      CLEAR: d_dlv_code,
             d_teco_code.
      PERFORM z_get_status_code USING 'DLV' CHANGING d_dlv_code.
      PERFORM z_get_status_code USING 'TECO' CHANGING d_teco_code.
      LOOP AT t_caufv.
        REFRESH t_status.
        CALL FUNCTION 'STATUS_READ'
             EXPORTING
              CLIENT           = SY-MANDT
                  objnr            = t_caufv-objnr
                 only_active      = 'X'
         IMPORTING
              OBTYP            =
              STSMA            =
              STONR            =
            TABLES
                 status           = t_status
            EXCEPTIONS
                 object_not_found = 1
                 OTHERS           = 2
        IF sy-subrc EQ 0.
          CLEAR t_status.
          READ TABLE t_status WITH KEY stat = d_dlv_code.
          IF sy-subrc NE 0.
            CLEAR t_status.
            READ TABLE t_status WITH KEY stat = d_teco_code.
            IF sy-subrc NE 0.
              DELETE t_caufv.
            ENDIF.
          ENDIF.
        ELSE.
          DELETE t_caufv.
        ENDIF.
      ENDLOOP.
      IF t_caufv[] IS INITIAL.
        d_returncode = 4.
        STOP.
      ENDIF.
    Added by Anand Bothra on 24/11/2003**********
      t_ab_caufv[] = t_caufv[].
    Added by Anand Bothra on 28/11/2003.
      IF ( s_plnbez-low EQ space AND s_plnbez-high EQ space ).
        IF ( s_aufnr-low EQ space AND s_aufnr-high EQ space ).
          d_flag = 'N'.
        ELSE.
          d_flag = 'Y'.
        ENDIF.
      ELSE.
        d_flag = 'Y'.
      ENDIF.
      IF d_flag = 'Y'.
    Added by Anand Bothra on 21/11/2003.**********
    *Get the batch number of the entered order
        DATA: itab_afpo LIKE afpo OCCURS 100 WITH HEADER LINE.
        DATA: BEGIN OF t_ab_charg OCCURS 0,
    *Added by Anand on 27/11/2003
                aufnr LIKE afpo-aufnr,
                charg LIKE afpo-charg,
                END OF t_ab_charg.
        LOOP AT t_caufv.
          SELECT aufnr charg FROM afpo INTO t_ab_charg WHERE aufnr =
      t_caufv-aufnr.
            APPEND t_ab_charg.
            CLEAR t_ab_charg.
          ENDSELECT.
        ENDLOOP.
    IF sy-subrc = 0.
       SELECT * FROM afpo INTO TABLE itab_afpo WHERE charg = d_ab_charg.
    ENDIF.
        LOOP AT t_ab_charg.
          SELECT * FROM afpo INTO itab_afpo WHERE charg = t_ab_charg-charg.
            APPEND itab_afpo.
            CLEAR itab_afpo.
          ENDSELECT.
        ENDLOOP.
        CLEAR t_caufv.
        REFRESH t_caufv.
    *Get all the orders with the same batch number.
        LOOP AT itab_afpo.
          SELECT aufnr werks objnr gamng rsnum plnbez
          INTO CORRESPONDING FIELDS OF
          t_caufv FROM caufv WHERE aufnr = itab_afpo-aufnr.
            APPEND t_caufv.
          ENDSELECT.
        ENDLOOP.
        CLEAR t_caufv.
        SORT t_caufv BY aufnr.
    delete adjacent duplicates from t_caufv comparing all fields.
      ENDIF.
      SELECT aufnr posnr wemng amein charg INTO TABLE t_afpo
      FROM afpo FOR ALL ENTRIES IN t_caufv
      WHERE aufnr = t_caufv-aufnr.
      d_returncode = sy-subrc.
      IF d_returncode NE 0.
        STOP.
      ENDIF.
      SORT t_afpo BY aufnr.
    ENDFORM.                    " Z_SELECT_PROD_ORDERS
    *&      Form  Z_SELECT_MAT_DESC
          text
    -->  p1        text
    <--  p2        text
    FORM z_select_mat_desc.
    Get the Description of all materials
      SELECT matnr maktx INTO TABLE t_makt FROM makt
      FOR ALL ENTRIES IN t_caufv
      WHERE matnr = t_caufv-plnbez
      AND   spras = sy-langu.
    ENDFORM.                    " Z_SELECT_MAT_DESC
    *&      Form  Z_PROCESS_DATA
          text
    -->  p1        text
    <--  p2        text
    FORM z_process_data.
    Process the data from all production orders and prepare the output
    table for display appropriately
      DATA: d_mbgbtr TYPE p DECIMALS 3,
            loop_cnt TYPE i.
      REFRESH t_outputtab.
      LOOP AT t_caufv.
        CLEAR t_outputtab.
        MOVE-CORRESPONDING t_caufv TO t_outputtab.
        CLEAR t_makt.
        READ TABLE t_makt WITH KEY matnr = t_caufv-plnbez.
        IF sy-subrc EQ 0.
          MOVE t_makt-maktx TO t_outputtab-maktx.
        ENDIF.
        CLEAR t_afpo.
        READ TABLE t_afpo WITH KEY aufnr = t_caufv-aufnr.
        IF sy-subrc EQ 0.
          MOVE: t_afpo-wemng TO t_outputtab-wemng,
                t_afpo-amein TO t_outputtab-amein,
                t_afpo-charg TO t_outputtab-charg.
        ENDIF.
        IF t_outputtab-gamng NE 0.
          COMPUTE t_outputtab-yield =
          ( t_outputtab-wemng / t_outputtab-gamng ) * 100.
        ENDIF.
        APPEND t_outputtab.
      ENDLOOP.
      SORT t_production_costs BY objnr kstar.
      LOOP AT t_production_costs.
        AT NEW objnr.
          CLEAR: d_mbgbtr, d_tabix, t_outputtab.
          READ TABLE t_outputtab WITH KEY objnr = t_production_costs-objnr.
          MOVE sy-tabix TO d_tabix.
          " Add up the Raw Material and Manufacturing Conversion
          " Costs from the previous stage production order
          CLEAR loop_cnt .
          LOOP AT t_suborders WHERE aufnr = t_outputtab-aufnr.
         commented by anand bothra on 20/11/2003
            ADD 1 TO loop_cnt.
            IF loop_cnt > 1.
              EXIT.
            ENDIF.
            LOOP AT t_production_costs1 WHERE objnr = t_suborders-objnr.
              CASE t_production_costs1-kstar.
                WHEN '0005000000' OR '0005010000'.     " Raw Material Cost
    BEGIN OF deletion VIP110703
              ADD t_production_costs1-wkgbtr TO t_outputtab-totalrmcost.
    END   OF deletion VIP110703
                  ADD t_production_costs1-wkgbtr TO prev_totmatqty.
                WHEN '0000500100'.      " Manufacturing Conversion Cost
                  ADD t_production_costs1-wkgbtr TO prev_tot_mfgconv_cst.
    BEGIN OF deletion VIP110703
                ADD t_production_costs1-wkgbtr TO t_outputtab-mfgconvcost.
    END   OF deletion VIP110703
              ENDCASE.
            ENDLOOP.
    BEGIN OF INSERTION VIP110703
           READ TABLE t_production_costs INTO wa_production_costs
           WITH KEY objnr = t_production_costs-objnr
                      matnr = wa_prev_outputtab-plnbez.
           IF sy-subrc = 0.
             IF  ( wa_production_costs-mbgbtr NE
                                   wa_prev_outputtab-wemng )  .
               prev_totmatqty = ( prev_totmatqty /
                                  wa_prev_outputtab-wemng ) *
                                 wa_production_costs-mbgbtr.
               prev_tot_mfgconv_cst = ( prev_tot_mfgconv_cst /
                                  wa_prev_outputtab-wemng ) *
                                  wa_production_costs-mbgbtr.
             ENDIF.
           ENDIF.
           LOOP AT t_suborders_propcost
                   WHERE prevaufnr = wa_prev_outputtab-aufnr.
             t_suborders_propcost-proprmcost = prev_totmatqty.
             t_suborders_propcost-prop_mfg_convcost = prev_tot_mfgconv_cst
             MODIFY t_suborders_propcost.
           ENDLOOP.
           clear: prev_totmatqty,
                   prev_tot_mfgconv_cst.
    END   OF INSERTION VIP110703
    BEGIN OF INSERTION VIP111003
            CLEAR: wa_prev_outputtab,
                   wa_production_costs.
            READ TABLE t_outputtab INTO wa_prev_outputtab
            WITH KEY aufnr = t_suborders-prevaufnr.
            ratio = 1.
            IF sy-subrc = 0.
              READ TABLE t_production_costs INTO wa_production_costs
              WITH KEY objnr = t_outputtab-objnr
                         matnr = wa_prev_outputtab-plnbez.
              IF sy-subrc = 0.
                IF  ( wa_production_costs-mbgbtr NE
                                      wa_prev_outputtab-wemng ) .
                  ratio = wa_production_costs-mbgbtr /
                          wa_prev_outputtab-wemng.
                  prev_totmatqty = ( prev_totmatqty /
                                     wa_prev_outputtab-wemng ) *
                                    wa_production_costs-mbgbtr.
                  prev_tot_mfgconv_cst = ( prev_tot_mfgconv_cst /
                                     wa_prev_outputtab-wemng ) *
                                     wa_production_costs-mbgbtr.
                ENDIF.
              ENDIF.
            ENDIF.
            LOOP AT t_suborders_propcost
                    WHERE prevaufnr = wa_prev_outputtab-aufnr
                    AND aufnr = t_outputtab-aufnr.
              t_suborders_propcost-proprmcost = prev_totmatqty.
              t_suborders_propcost-prop_mfg_convcost = prev_tot_mfgconv_cst.
              MODIFY t_suborders_propcost.
            ENDLOOP.
    *Commented by Anand Bothra on 20/11/2003.
            CLEAR: prev_totmatqty,
                    prev_tot_mfgconv_cst.
    BEGIN OF INSERTION VIP111003
          ENDLOOP.
        ENDAT.
        AT END OF kstar.
          SUM.
          CASE t_production_costs-kstar.
            WHEN '0000500200'.    " Packing Conversion Costs
              t_outputtab-pkgconvcost = t_production_costs-wkgbtr.
            WHEN '0005000500'.   " Semi-Finished Cost/Quantity
              MOVE t_production_costs-mbgbtr TO d_mbgbtr.
            WHEN '0005050000' OR '0005050001' OR '0005050002'.
              " Packing Mat Costs
              ADD t_production_costs-wkgbtr TO t_outputtab-totalpmcost.
            WHEN '0005000000' OR '0005010000'.
              ADD t_production_costs-wkgbtr TO t_outputtab-totalrmcost.
            WHEN '0000500100'.      " Manufacturing Conversion Cost
              ADD t_production_costs-wkgbtr TO t_outputtab-mfgconvcost.
          ENDCASE.
        ENDAT.
        AT END OF objnr.
          MOVE d_waers TO t_outputtab-waers.
    Calculations for the Production Order
          " Determine the RM Cost/Unit and Mfg Conv Cost/Unit
          CLEAR t_afpo1.
          READ TABLE t_afpo1 WITH KEY aufnr = t_outputtab-aufnr.
          IF ( ( sy-subrc EQ 0 ) AND ( t_afpo1-wemng NE 0 ) ).
    BEGIN OF insertion VIP110703
           tmp_aufnr = t_production_costs-objnr+2(12).
           LOOP AT t_suborders_propcost
           WHERE aufnr = tmp_aufnr  .
            ADD t_suborders_propcost-proprmcost TO t_outputtab-totalrmcost
             ADD t_suborders_propcost-prop_mfg_convcost  TO
                  t_outputtab-mfgconvcost.
           ENDLOOP.
    END   OF insertion VIP110703
    BEGIN OF insertion VIP111003
            CLEAR: t_suborders_propcost , tmp_aufnr.
            READ TABLE t_suborders_propcost
            WITH KEY aufnr = t_outputtab-aufnr.
            IF sy-subrc = 0.
             t_suborders_propcost-proprmcost =
                 t_suborders_propcost-proprmcost * ratio.
              ADD t_suborders_propcost-proprmcost
                    TO t_outputtab-totalrmcost.
             t_suborders_propcost-prop_mfg_convcost =
                 t_suborders_propcost-prop_mfg_convcost * ratio.
              ADD t_suborders_propcost-prop_mfg_convcost
                   TO t_outputtab-mfgconvcost.
              tmp_aufnr = t_suborders_propcost-prevaufnr.
              bln_suborder = 'T'.
              WHILE bln_suborder = 'T'.
                CLEAR: t_suborders_propcost .
                READ TABLE t_suborders_propcost
                WITH KEY aufnr = tmp_aufnr.
                IF sy-subrc = 0.
                  t_suborders_propcost-proprmcost =
                    t_suborders_propcost-proprmcost * ratio.
                  ADD t_suborders_propcost-proprmcost
                        TO t_outputtab-totalrmcost.
                  t_suborders_propcost-prop_mfg_convcost =
                      t_suborders_propcost-prop_mfg_convcost * ratio.
                  ADD t_suborders_propcost-prop_mfg_convcost
                       TO t_outputtab-mfgconvcost.
                  tmp_aufnr = t_suborders_propcost-prevaufnr.
                ELSE.
                  bln_suborder = 'F'.
                  CLEAR tmp_aufnr.
                ENDIF.
              ENDWHILE.
            ENDIF.
    END   OF insertion VIP111003
    END   OF deletion VIP110703
           t_outputtab-mfgconvcost = ( t_outputtab-mfgconvcost /
                                       t_afpo1-wemng ) * d_mbgbtr.
           t_outputtab-totalrmcost = ( t_outputtab-totalrmcost /
                                       t_afpo1-wemng ) * d_mbgbtr.
    END   OF deletion VIP110703
          ENDIF.
          IF t_outputtab-wemng NE 0.
            t_outputtab-rmperunit = t_outputtab-totalrmcost /
                                    t_outputtab-wemng.
            " PM Cost Per Unit = Total PM Cost / Quantity Delivered
            t_outputtab-pmperunit = t_outputtab-totalpmcost
                                    / t_outputtab-wemng.
            " Conv Cost Cost Per Unit = (Manu Conv Cost + Pack Conv Cost)
            "                           / Qty Delv
            t_outputtab-ccperunit = ( t_outputtab-mfgconvcost
                                    + t_outputtab-pkgconvcost )
                                    / t_outputtab-wemng.
          ENDIF.
          " Total Cost Per Unit = (RM Cost per unit + PM Cost per Unit
          "                       + Conv Cost per unit)
          t_outputtab-totperunit = t_outputtab-rmperunit
                                   + t_outputtab-pmperunit
                                   + t_outputtab-ccperunit.
    Update the calculated values in the internal table
          CHECK d_tabix GT 0.
          MODIFY t_outputtab INDEX d_tabix
                             TRANSPORTING totalrmcost totalpmcost
                                          mfgconvcost pkgconvcost
                                          rmperunit pmperunit
                                          ccperunit totperunit waers.
    BEGIN OF DELETION VIP110703
         MOVE t_outputtab TO wa_prev_outputtab.
    END   OF DELETION VIP110703
        ENDAT.
      ENDLOOP.
    ENDFORM.                    " Z_PROCESS_DATA
    *&      Form  Z_DISPLAY_LIST
          text
    -->  p1        text
    <--  p2        text
    FORM z_display_list.
    Display the Report
      CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
          EXPORTING
            I_INTERFACE_CHECK        = ' '
             i_callback_program       = d_repid
            I_CALLBACK_PF_STATUS_SET = ' '
            I_CALLBACK_USER_COMMAND  = ' '
            I_STRUCTURE_NAME         =
             is_layout                = wa_listlayout
               it_fieldcat              = t_fieldcatalog
            IT_EXCLUDING             =
            IT_SPECIAL_GROUPS        =
               it_sort                  = t_sortsequence
            IT_FILTER                =
            IS_SEL_HIDE              =
            I_DEFAULT                = 'X'
            I_SAVE                   = ' '
            IS_VARIANT               = ' '
             it_events                = t_listevents
            IT_EVENT_EXIT            =
             is_print                 = wa_print_info
            IS_REPREP_ID             =
            I_SCREEN_START_COLUMN    = 0
            I_SCREEN_START_LINE      = 0
            I_SCREEN_END_COLUMN      = 0
            I_SCREEN_END_LINE        = 0
            I_BYPASSING_BUFFER       =
            I_BUFFER_ACTIVE          =
       IMPORTING
            E_EXIT_CAUSED_BY_CALLER  =
            ES_EXIT_CAUSED_BY_USER   =
           TABLES
                t_outtab                 = t_outputtab
          EXCEPTIONS
               program_error            = 1
               OTHERS                   = 2
      IF sy-subrc <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
            WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
      ENDIF.
      SET PF-STATUS 'Z_AB_STANDARD'.
    ENDFORM.                    " Z_DISPLAY_LIST
    *&      Form  Z_FILL_FIELDCATALOG
          text
    -->  p1        text
    <--  p2        text
    FORM z_fill_fieldcatalog USING      p_rownum LIKE sy-curow
                                        p_colnum LIKE sy-cucol
                                        p_fieldname TYPE slis_fieldname
                                        p_tabname TYPE slis_tabname
                                        p_reffield TYPE dd03p-fieldname
                                        p_reftable TYPE dd03p-tabname
                                        p_qfield TYPE slis_fieldname
                                        p_qtab TYPE slis_tabname
                                        p_sum
                                        p_stext
                                        p_mtext
                                        p_ltext
                                        p_datatype
                                        p_outputlen.
    Prepare the fields for ALV list output
      CLEAR wa_fieldcatalog.
      wa_fieldcatalog-row_pos = p_rownum.
      wa_fieldcatalog-col_pos = p_colnum.
      wa_fieldcatalog-fieldname = p_fieldname.
      wa_fieldcatalog-tabname = p_tabname.
      wa_fieldcatalog-ref_fieldname = p_reffield.
      wa_fieldcatalog-ref_tabname = p_reftable.
      wa_fieldcatalog-qfieldname = p_qfield.
      wa_fieldcatalog-qtabname = p_qtab.
      wa_fieldcatalog-do_sum = p_sum.
      wa_fieldcatalog-seltext_s = p_stext.
      wa_fieldcatalog-seltext_m = p_mtext.
      wa_fieldcatalog-seltext_l = p_ltext.
      wa_fieldcatalog-datatype = p_datatype.
      wa_fieldcatalog-outputlen = p_outputlen.
      APPEND wa_fieldcatalog TO t_fieldcatalog.
    ENDFORM.                    " Z_FILL_FIELDCATALOG
    *&      Form  Z_PREPARE_FIELDCAT
          text
    -->  p1        text
    <--  p2        text
    FORM z_prepare_fieldcat.
    Append all the display fields into the field catalog internal table
    First Row
      PERFORM z_fill_fieldcatalog USING 1 1 'PLNBEZ' 'T_OUTPUTTAB'
                                        space 'AFKO' space space
                                        space space space space space
                                        0.
      PERFORM z_fill_fieldcatalog USING 1 2 'MAKTX' 'T_OUTPUTTAB'
                                        space 'MAKT' space space
                                        space space space space space
                                        0.
      PERFORM z_fill_fieldcatalog USING 1 3 'CHARG' 'T_OUTPUTTAB'
                                        space 'AFPO' space space
                                        space space space space space
                                        0.
    Second Row
      PERFORM z_fill_fieldcatalog USING 2 1 'AUFNR' 'T_OUTPUTTAB'
                                        space 'AFKO' space space
                                        space space space space space
                                        0.
      PERFORM z_fill_fieldcatalog USING 2 2 'GAMNG' 'T_OUTPUTTAB'
                                        space 'CAUFV' 'AMEIN' space
                                        'X' space space space space
                                        0.
      PERFORM z_fill_fieldcatalog USING 2 3 'WEMNG' 'T_OUTPUTTAB'
                                        space 'AFPO' 'AMEIN' space
                                        'X' space space space space
                                        0.
      PERFORM z_fill_fieldcatalog USING 2 4 'AMEIN' 'T_OUTPUTTAB'
                                        space 'AFPO' space space
                                        space space space space space
                                        0.
      PERFORM z_fill_fieldcatalog USING 2 5 'YIELD' 'T_OUTPUTTAB'
                                        space space space space
                                        space text-010 text-010 text-010
                                        'QUAN' 17.
    Third Row
      PERFORM z_fill_fieldcatalog USING 3 1 'TOTALRMCOST' 'T_OUTPUTTAB'
                                        space space space space
                                        'X' text-011 text-011 text-011
                                        'CURR' 21.
      PERFORM z_fill_fieldcatalog USING 3 2 'TOTALPMCOST' 'T_OUTPUTTAB'
                                        space space space space
                                        'X' text-012 text-012 text-012
                                        'CURR' 21.
      PERFORM z_fill_fieldcatalog USING 3 3 'MFGCONVCOST' 'T_OUTPUTTAB'
                                        space space space space
                                        'X' text-013 text-013 text-013
                                        'CURR' 21.
      PERFORM z_fill_fieldcatalog USING 3 4 'PKGCONVCOST' 'T_OUTPUTTAB'
                                        space space space space
                                        'X' text-014 text-014 text-014
                                        'CURR' 21.
    Fourth Row
      PERFORM z_fill_fieldcatalog USING 4 1 'RMPERUNIT' 'T_OUTPUTTAB'
                                        space space space space
                                        space text-015 text-015 text-015
                                        'CURR' 21.
      PERFORM z_fill_fieldcatalog USING 4 2 'PMPERUNIT' 'T_OUTPUTTAB'
                                        space space space space
                                        space text-016 text-016 text-016
                                        'CURR' 21.
      PERFORM z_fill_fieldcatalog USING 4 3 'CCPERUNIT' 'T_OUTPUTTAB'
                                        space space space space
                                        space text-017 text-017 text-017
                                        'CURR' 21.
      PERFORM z_fill_fieldcatalog USING 4 4 'TOTPERUNIT' 'T_OUTPUTTAB'
                                        space space space space
                                        space text-018 text-018 text-018
                                       'CURR' 21.
    ENDFORM.                    " Z_PREPARE_FIELDCAT
    *&      Form  Z_GET_ALV_EVENTS
          text
    -->  p1        text
    <--  p2        text
    FORM z_get_alv_events.
    Returns table of possible events for a list type
      REFRESH t_listevents.
      CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
       EXPORTING
            I_LIST_TYPE     = 0
          IMPORTING
               et_events       = t_listevents
          EXCEPTIONS
               list_type_wrong = 1
               OTHERS          = 2
      IF sy-subrc <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
            WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
      ELSE.
        CLEAR: wa_listevents, d_tabix.
        READ TABLE t_listevents WITH KEY name = slis_ev_top_of_page
        INTO wa_listevents.
        d_tabix = sy-tabix.

    Hi Sai,
          You can try using MB51, use filter movement type 261. Add a filter for the posting date coverage.
    Then proceed. Click on the icon DETAIL LIST.
    Then click on the SUBTOTAL, add MATERIAL as a Criteria. The click the column AMOUNT IN LC.
    You should see the total issuances to per material.
    I hope this helps.
    Heinrick Palad

  • Report for issuance of raw material

    Hi!!!!
    Kindly suggest me the t-code where i can look for the issuance of raw material against production orders on a month basis or quarterly basis.
    Thanks

    Hi,
    COOIS:
    maybe you should apply the settings written by me in my previous message since you can see the consumption of components in this report. Paste the movement type field in the layout and you will see 261.
    MB51
    you can paste the field ('Order') in the layout that contains the PrdOrd no.
    MB53
    Run the report > pusch 'consumption' button. That's all.
    You should examine these reports and try to use them. You can get the information from COOIS ( components  and from MB51.
    BR
    Csaba
    Edited by: Csaba Szommer on Jul 23, 2008 9:45 AM

  • Price Difference A/c is debiting instead of Raw Material A/c when MIGO

    Hi Experts,
    Please can any body help me regarding FI-MM integration.
    When do the MIGO transaction as per standard - Debit is Raw Material A/c and Credit GR/IR Clearing A/c.
    But in my System Debit is Price Difference A/c and Credit is GR/IR Clearing A/c is taking, because Price Difference A/c is coming from PRD transaction Key where I given Price Difference A/c. Why system is not taking Raw Material A/c from BSX transaction key.
    Please help me as soon as possible.
    Regards,
    KBR.

    Hi..
      I want to add :
       If you want to maintain Price Control as "S" then maintain standard price (MR21).
       Then stand price will hit BSX nad diff between PO price and Stnd Price will go to PRD a/c.
      kkumar

Maybe you are looking for

  • Raw high_value in the all_tab_columns table

    There are some columns defined as float(126) in my database. I need to find out the highest values held in these columns. I am using the high_value column (defined as raw) in the all_tab_columns table. Is there a way to convert raw hig_value to numbe

  • Aperture Exporting JPEG's from RAW: file size and quality questions?

    Hey Everyone, So, I'm using Aperture 2 and I've got some questions about exporting from RAW to JPEG. I shoot with a Nikon D70 so original RAW files are 5-6mb in size. After doing some basic post processing when I export the pics at "full size" with p

  • My mini mac with osx 10.8.1 won't update to 10.8.2

    I hit update but nothing happens.. Restarted my mini mac and tried again..  Hit update and nothing happens..

  • Keep Buffer Cache Not Large Enough

    What happens if I pin a table/index in the keep buffer cache but the keep buffer cache is not large enough? How does oracle determine what to initially put into the keep buffer cache and what to leave out?

  • MacBook Air USB external drive power source

    I have a LaCie 250GB USB external drive on my MacBook Air and the computer is not being able to power the drive without me connecting the hard drive to an external power source. when the drive was had about 80GB of data it would do it, now that the d