Material cost Report

Hi,
If anyone could advice on how to create report for material cost product wise at granular level in case similar part of the material is used for different products.
Regards,
Varsha

Dear Varsha,
With the given detail,I'm unable to understand your complete requirement,but check this report S_P99_41000111 to check the
cost estimate details for a list of materials and also by changing the layout you can get the processing/labor/material cost.
Regards
Mangalraj.S

Similar Messages

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

Internal activity material cost not displayed in report s_alr_87013558

Hi all,
I have an material attached to the internal activity.
this internal activity is inturn attached to a network
which inturn attached to a WBS.
After the PR and PO creation of the material attached
the cost report s_alr_87013558 shows values in the
WBS element not in the network activity to the material
was attached
How to catch the cost value to network activity instead of WBS elment
Can anybody have a clue why it is happening
Thanks and Regards
pv

hi sreenivas,
thank you for the suggestion
in budget report the actual and commitment value is pulled
to respective network activity or wbs element depending upon the account assignment category during the automatic PR
creation from CJ20n
In my scenario during automatic PR creation it is Q(project make to order) instead of N(network).
Can you throw some light to this where in
i can generate auto PR with account assgnment category N
for a material attached to network through internal activity
Note:
to catch the cost we also need to activate the cost rel indicator in purchasing doc tab for material in cj20n
regards
pv

How to get report for cost estimates material cost only

Hi Gurus,
We have requirement in sales order costing that we need to develope report which shows only Material cost for all BOM levels.
Normally at lower levels cost of Material and activity cost will be treated as Material cost for next level. Here I want to consider only material cost not activity cost at lower levels
Pls suggest the logic and tables for exploding BOM and fetching material cost only.
Thanks
Sneha

Sneha
If you tick the "Roll up" indicatorfor each cost component in Cost Comp Str OKTZ, then overheads do not get added to the material cost... This is my understanding about it.. Is it behaving some thing different in your case??
br, Ajay M

Report for Material Cost Estimate

Hi Everyone,
Is there any way that I could download a report from the SAP showing all the material cost estimates? Hope someone could help me. When I try using CK11n, there is no tab there for report downloads and it only shows one material.
Thank you in advance
Jahziel

Dear Jahziel,
In standard SAP the following reports are available:
T Code : CK84_99 : COST_ELEMENT - Cost Elements
CK80_99 - Cost Components
CK84_99 - Itemization
These reports will provide you the information at individual material level.
Regards,
Pavan Kumar Arvapally

How to include Material Cost in the SD report

Hi,
I am working on Cube 0SD_C03 for the Sales and Distribution Report "Sales Contribution - Product Wise u2013 KPI" where I have to show the following information which are given below.
1. Total Sales Qty.
2. Total Sales Value
3. Total Material Cost
For third one I do not know how to include this in this SD report.
so please tell me about this if anybody has idea about this?

Hi Francisco,
Note:
your xml should only have
<URL>http://dbxserver.dbxprts.com:7778/pls/apex/f?p=134:1:::NO::P1_ID_CONSTANCIA:1183</URL>
Show me your sample XML , i can help you.
What is your expected output ? PDF or HTML ?
here it is.
option1:
If the XML data includes an element that contains a hyperlink , then you can use that element to create dynamic hyperlinks at runtime.
a. insert hyperlink from word menu
b. In the Type the file or Web page name field of the Insert Hyperlink dialog box, enter the following syntax:
c. {ELEMENT_NAME_WHICH_HAS_URL_LINK}
where ELEMENT_NAME_WHICH_HAS_URL_LINK is the xml data element name
option2:
create a form field, you can add it
<fo:basic-link external-destination="http://www.google..com">
<fo:inline text-decoration="underline">google Link</fo:inline>
</fo:basic-link>
or
<fo:basic-link external-destination="{ELEMENT_NAME}">
<fo:inline text-decoration="underline">google Link</fo:inline>
</fo:basic-link>
or
<fo:basic-link>
<xsl:attribute name="external-destination"><xsl:value-of select="ELEMENT_URL"/>
</xsl:attribute>
<xsl:value-of select="LINK_NAME"/>
</fo:basic-link>

Material cost estimate report development

Hi All,
Customer need a report with belwo inputs
1.Plant
2. Material
3. MRP Controller
4. Costing Variant
5. Valid On
with M09 MRP controller with the output as -
where M09 is there it should not display the sub-materilas in it,for the remaining it is required.
all the data is coming from BOM( Bill of Material) and conversion cost is from routing.
please let me know how to caliculate the Conversion cost for materials ?
Base is ck13n &they r generating the report in ZCOSHT t.code
Can anyone tell me whether it is PP report or Costing report ?
please advice me asap.
Edited by: jahnaviprasad on Aug 16, 2011 12:15 PM
Edited by: jahnaviprasad on Aug 18, 2011 9:31 AM

Hi
Use the tables
COST
COSP
COEP
AFVV (activity)
Reward points if useful
Regards
Anji

Standard report on material cost

Hi all,
Is there any standard report for Ability to see fully landed cost as well as just base material cost..
Thanks in advance

>
vatchan wrote:
> Hi all,
>
> Is there any standard report for Ability to see fully landed cost as well as just base material cost..
>
> Thanks in advance
See Delivery cost in Purchase order history or MB51 See LC Amount in report / MIR5 for customs vendor.

Raw material cost not coming KE30 profitability report

Dear Gurus,
We have two material type for our finished product for one material type without having cost release for current period we can't release the billing document for accounts but in other material type we can release the billing document for account without releasing the cost for current period.
This occurs with problem that in KE30 we are not receiving the raw material cost & administration cost. Please suggest what should I do to correct this?
Thanks in advance.

Hi,
I already assigned costing key to material type (FERT,HALB) but bifurcation of COGM not flow to CO-PA.
In T.code KEPR
1.All F/V i maintained as 3 is it ok or i need to maintain it 1 or 2.
2.In T.code KE4J
Record type = F i maintained for FERT,HALB category materials & assigned in Costing key
Earlier before release i assigned in T.code ke4i
Condition type Value fields
VPRS Stock value
Then some value flow to copa
After i release i removed stock value from ke30 report and added material cost ,sub contracting cost,material overhead but no value flown CO-PA.
Pl check
Regards,
Debashis

Report to fetch the labour cost and material cost

Hi Gurus,
The requirement is to create a report to fecth the actual cost from the maintenance order. ie.. material cost , labor cost and some other costs which are directly posted to the order. Can anybody let me know from which tables I can pull the material cost , labor cost ..etc posted against maintenance order?
Regards,
John

Hi
can you check in PMCO table
regards
thyagarajan

COPA - Planned Material Cost not appearing in KE30 report

Hi all
In COPA planning, I manually planned the Material cost (Material External Price) along with the Sales Quantity and Revenue for two company codes (one plant in each co code). But in KE30 report, I could see the material cost (MEP) values only for one company codeplant. What could be the issue?
I even tried valuation in KEPM. Valuation step is calculating and populating the material cost in KEPM, but the values are not flowing to KE30 reports. And this happens to only one of the two company codes.
Thanks
Vamsi

Hi Vamsi
Please check table CE2XXXX, where XXXX = Op Concern.... Here, can you see the plan line items??
If yes, then the issue is with your report definition in KE30... May be you are restricting values display in KE30 report by virtue of your selection parameters
br, Ajay M

Planned material costs not seen in reports

hi to all,
i planned costs for a project using networks and activity elements and material components. for the activity elements i placed the costs as a direct input and for material components, i input the required quantity and the material number. However, when i looked at the structure overview(CN41), the materials i placed have 0 cost. YET THE TOTATL AMOUNT in the network&activity INCLUDES the cost of the material (quantity multiplied by material price).
Thanks in advance

hi again..
i checked both your suggestions but they have already been carried out earlier so the problem lies elswhere..(but at least i was able to eliminate some of the possible causes..).
allow me to give an example of whats happening in my case..
MY INPUTS:
WBS 1
NETWORK 1
ACTIVITY 1
     Material Component 1     3 pcs ( 1 $/pc)
     Material Component 2    10 pcs   (1 $/pc)
     Element 1(cost)             500 $
     Element 2(cost)             300 $
OUTPUT REPORT:(CN41 - Project cost Sch 000)
WBS 1                                  $ 813.0000
NETWORK 1                        $ 813.0000
ACTIVITY 1                          $ 813.0000
     Material Component 1           0.0000
     Material Component 2           0.0000
     Element 1(cost)                    500.0000
     Element 2(cost)                    300.0000
So if you notice in the report the material is 0 but the total includes the material cost..
thanks!

What are the tables to be used in a material cost estimate report????

Hi..
i am creating a product costing report...(similar to ck11n n ck13n)
it has two selection screen parameters( matnr and plant)...
i need to display
1. cost center
2.total hours per cost center
3.total labor per cost center
4.total overhead per cos center
How do i proceed??
where do i fetch the data from??
how do i do all the calculations???
plz help me..

Hi
Use the tables
COST
COSP
COEP
AFVV (activity)
Reward points if useful
Regards
Anji

Open Balance on Sales Order Cost Report

Hi SAP Group -
I have a couple questions about the settlement of manufacturing variance to COPA.
When our settlement process is complete (production order and sales order both settled to COPA), there is a balance remaining on the sales order cost report which is equal to the manufacturing variance on the production order.
It seems that the manufacturing variance is posting from the production order to the sales order, but is not being assigned to the PSEG and flowing to COPA.
I am looking for advice in two areas:
First, how do we "clear" these balances on old orders that are already settled?
Second, how do we prevent this from happening on future orders?
Thanks !!!

Refer to OSS 183250 and note 186485.
If you dont specify in the settlement profile for the production order that the variances are not transferred from the production order into CO-PA, you will settle the variances to <b>CO-PA twice</b>: once from the production order (broken down into variance categories), and once from the sales order item. The settlement rule still references the material and not the sales order item.
Special Features of Product Cost by Sales Order with Valuated Sales Order Stock
<a href="http://help.sap.com/erp2005_ehp_02/helpdata/en/90/ba66cc446711d189420000e829fbbd/content.htm">Read the topic on 'Special Features of Product Cost by Sales Order with Valuated Sales Order Stock'</a>
You may want to check the period of the variance settlement from mfg order to sales order and ensure the settlement of sales order is also done the same period, if the type is PER.

Plan value(break up) not appearing in sales order cost report

hi
I have done sales order bom in cs61,operation in ca01,in va02 for sales order costing in itemization showing like
material 100
actity 10
total 110
saved and if I see in cost report it show only revenue , cogs(110),but it is not show raw materials and operations.
please advise me what to do?
Thanks and Regards,
Nagesh

Dear Nagesh,
Probably, you need to check the status of the BOM and the Routing in the Header. It should be active/released.
Kind Regards
Umapathi G
Edited by: Umapathi Naidu G on Aug 11, 2011 3:26 PM

Material cost Report

Similar Messages

Maybe you are looking for