Alternative BOM creation problem in CS01

Hi.
I have created a BOM with CS01 with list of components. Now i want to create an alternative BOM for the same FG.
When I am trying to create alternative BOM using CS01, I added the components, system is showing me in the header as Alternative BOM 2. But when i try to save this BOM system is giving me the error as "Alternative BOM cannot be created for this material".
Can you please help me how to create alternative BOM for this FG.
Regards,
Padmavathi

Dear Padma,
If my understanding is correct,if the check box for multiple BOM inactive is set in OS27 means,you will not be allowed to even
enter into the BOM item maintenance screen.
It seems the system is allowing you to enter the second alternative BOM,but at the time of save the system is blocking from
doing so.check what's the message and check whether by means of exit this check has been incorporated in the system.
Check and revert back.
Regards
Mangalraj.S

Similar Messages

Alt BOM Creation problem

Hi
Expert,
When i am creating alternative BOM in system it will also change the material present in alternative of 1 .
Why this is happening?
A & B alt 1 and 2
When i am creating or change in alt 2 this effect also occur in BOM alt 1
Please Guide
Thanks & Regards
Pert

Dear Kumar
For Alt BOM 1
ITEM ICT Component Component Des QTY        UN ............ ITEM ID
0010 L        A                                         2.9          KG             00000001
0020 L         B                                         0.125-    KG ............00000002
For alt BOM 2 of same material (Practically)it should be like this
ITEM ICT Component Component Des QTY        UN ............ ITEM ID
0010 L        C                                         2.9          KG             00000003
0020 L         D                                         0.125-    KG ............00000004
But it showing for alt 1 and alt 2 are same
ITEM ICT Component Component Des QTY        UN ............ ITEM ID
0010 L        C                                         2.9          KG             00000001
0020 L        D                                         0.125-    KG ............ 00000002
Are you getting my point?
Thanks & regards
Pert

BOM creation TCODE

Dear Gurus
Are there any other Tcodes for BOM creation other than CS01? Any Tcodes I could use for BOM creation for LSMW upload?
Need help ASAP. Points assured
Thanks in advance

Hi Obie,
As all experts has suggested there are only two transaction codes for material BOM,
1. CS01 for creation of BOM
2. CS02 for editing of BOM
There are diffrenet t codes if you want to create equipment BOM like IB01 & IB11.
Hope this will resolve your querry.
Regards,
Avinash.

Bdc for tocde CS01(BOM CREATION)

Hi,
I want to make a bdc for the tcode CS01(BOM Creation),but the thing when i perform the Recording then there is a point that the BOM having the sub - items which might be 3 or 2 or maybe 10 . how can i manage that during the recording.
plzz provide me guidelines for solving this problem.

Hi,
This code for BOM creation/Change,
using BAPI as well as BDC check this.
                LOOP AT it_bom_create INTO wa_bom_create.
* Begin of CCT51465 - B09794 - 11/28/2007
*                  PERFORM f_bdc_dynpro      USING 'SAPLCSDI' '0100'.
*                  PERFORM f_bdc_field       USING 'BDC_OKCODE'
*                                                  '/00'.
*                  PERFORM f_bdc_field       USING 'RC29N-MATNR'
*                                                  wa_bom_create-matnr.
*                  PERFORM f_bdc_field       USING 'RC29N-WERKS'
*                                                  wa_mbew-bwkey.
*                  PERFORM f_bdc_field       USING 'RC29N-STLAN'
*                                                  '2'.
*                  PERFORM f_bdc_field       USING 'RC29N-STLAL'
*                                                  '01'.
*                  PERFORM f_bdc_dynpro      USING 'SAPLCSDI' '0110'.
*                  PERFORM f_bdc_field       USING 'BDC_OKCODE'
*                                                  '/00'.
*                  CONDENSE wa_bom_create-bmeng.
*                  PERFORM f_bdc_field       USING 'RC29K-BMENG'
*                                                  wa_bom_create-bmeng.
*                  PERFORM f_bdc_dynpro      USING 'SAPLCSDI' '0111'.
*                  PERFORM f_bdc_field       USING 'BDC_OKCODE'
*                                                  '/00'.
*                  CONDENSE wa_bom_create-menge.
*                  PERFORM f_bdc_dynpro      USING 'SAPLCSDI' '0140'.
*                  PERFORM f_bdc_field       USING 'BDC_CURSOR'
*                                                  'RC29P-IDNRK(01)'.
*                  PERFORM f_bdc_field       USING 'BDC_OKCODE'
*                                                  '/00'.
*                  PERFORM f_bdc_field       USING 'RC29P-IDNRK(01)'
*                                                  wa_bom_create-idnrk.
*                  CONDENSE wa_bom_create-menge.
*                  PERFORM f_bdc_field       USING 'RC29P-MENGE(01)'
*                                                  wa_bom_create-menge.
*                  PERFORM f_bdc_field       USING 'RC29P-POSTP(01)'
*                                                  'L'.
*                  PERFORM f_bdc_dynpro      USING 'SAPLCSDI' '0130'.
*                  PERFORM f_bdc_field       USING 'BDC_OKCODE'
*                                                  '/00'.
*                  PERFORM f_bdc_dynpro      USING 'SAPLCSDI' '0131'.
*                  PERFORM f_bdc_field       USING 'BDC_OKCODE'
*                                                  '/00'.
*                  PERFORM f_bdc_dynpro      USING 'SAPLCSDI' '0140'.
*                  PERFORM f_bdc_field       USING 'BDC_OKCODE'
*                                                  '=FCBU'.
*                  PERFORM f_bdc_transaction USING 'CS01'.
                  it_stko1-base_quan = wa_bom_create-bmeng.
                  CALL FUNCTION 'CSAP_MAT_BOM_CREATE'
                    EXPORTING
                      material                 = wa_bom_create-matnr
                      plant                    = wa_marc-werks
                      bom_usage                = '2'
                      valid_from               = v_valid              " CCT52206 - B09794 - 12/10/2007
*                     CHANGE_NO                =
*                     REVISION_LEVEL           =
                      i_stko                   = it_stko1
*                     FL_NO_CHANGE_DOC         = ' '
                      fl_commit_and_wait       = 'X'
*                     FL_CAD                   = ' '
                      fl_default_values        = ' '
                    IMPORTING
                      fl_warning               = flg_warning
*                     BOM_NO                   =
                    TABLES
                      t_stpo                   = it_stpo1
*                     T_DEP_DATA               =
*                     T_DEP_DESCR              =
*                     T_DEP_ORDER              =
*                     T_DEP_SOURCE             =
*                     T_DEP_DOC                =
*                     T_LTX_LINE               =
*                     T_STPU                   =
                    EXCEPTIONS
                      error                    = 1
                      OTHERS                   = 2.
                  IF sy-subrc <> 0.
* Begin of CCT59311 - B09794 - 07/01/2008
                    IF p_show = 'X'.
                      PERFORM f_check_lock.
                    ENDIF.
* End of CCT59311 - B09794 - 07/01/2008
                    CALL FUNCTION 'FORMAT_MESSAGE'
                      EXPORTING
                        id        = sy-msgid
                        lang      = sy-langu
                        no        = sy-msgno
                        v1        = sy-msgv1
                        v2        = sy-msgv2
                        v3        = sy-msgv3
                        v4        = sy-msgv4
                      IMPORTING
                        msg       = v_mstring
                      EXCEPTIONS
                        not_found = 1
                        OTHERS    = 2.
                    IF sy-subrc = 0.
                      CONDENSE v_mstring.
                      wa_errormsg-matnr = wa_bom_create-matnr.
                      wa_errormsg-werks = wa_marc-werks.
                      wa_errormsg-mtart = v_mat_typ.
                      wa_errormsg-msgtyp = sy-msgty.
                      IF sy-msgid = '29' AND sy-msgno = '037'.
                        v_mstring = text-027.                                   " Costing BOM already exist (For Material -
                        CONCATENATE v_mstring wa_marc-matnr ')' INTO v_mstring.
                        wa_errormsg-msgtxt = v_mstring.
                      ELSE.
                        wa_errormsg-msgtxt = v_mstring.
                      ENDIF.
                      APPEND wa_errormsg TO it_errormsg1.
                      CLEAR wa_errormsg.
                    ENDIF.
                  ELSE.
                    wa_successmsg-matnr = wa_marc-matnr.
                    wa_successmsg-werks = wa_marc-werks.
                    wa_successmsg-mtart = v_mat_typ.
                    wa_successmsg-msgtyp = 'S'.
                    v_mstring = text-017.       "   Costing BOM created successfully (For Material -
                    CONCATENATE v_mstring wa_marc-matnr ')' INTO v_mstring.
                    wa_successmsg-msgtxt = v_mstring.
                    APPEND wa_successmsg TO it_successmsg.
                    CLEAR wa_successmsg.
                  ENDIF.
Code Formatted by: Alvaro Tejada Galindo on Dec 23, 2008 10:21 AM

Reg: Creation of BOM along with Alternative BOM

Hi Experts,
I have written the below code for creating BOM along with Alternative BOM, I'm getting the following error.
W BAPI1080             028
Error/warning when checking the structure of the BOM group with ID=
A BAPI1080             002
Basic data for (BOM) group available twice
A BAPI                 001
No instance of object type BOMGroup has been created. External reference:
W BAPI1080             028
Error/warning when checking the structure of the BOM group with ID=
A BAPI1080             002
Basic data for (BOM) group available twice
A BAPI                 001
No instance of object type BOMGroup has been created. External reference:
Please find the piece of code below.
SORT it_bom01 BY matnr idnrk posnr ASCENDING.
LOOP AT it_bom01 INTO wa_bom01.
    AT NEW matnr.
      CLEAR:
        it_bomgroup[],
        wa_bomgroup,
        it_variants[],
        wa_variants,
        it_items[],
        wa_items,
        it_matrel[],
        wa_matrel,
        it_itemas[],
        wa_itemas,
        it_return.
    ENDAT.
* Material BoM Group Header Data
    wa_bomgroup-bom_group_identification = 'IDENTIFICATION'.
    wa_bomgroup-object_type = 'BGR'.
    wa_bomgroup-object_id = 'ID'.
    wa_bomgroup-bom_usage = wa_bom01-stlan.
    wa_bomgroup-ltxt_lang = sy-langu.
    wa_bomgroup-technical_type = ' '.
*   wa_bomgroup-bom_text = .
    wa_bomgroup-created_in_plant = wa_bom01-werks.
    APPEND wa_bomgroup TO it_bomgroup.
* Header Details of the different variants
    wa_variants-bom_group_identification = 'IDENTIFICATION'.
    wa_variants-object_type = 'BOM'.
    wa_variants-object_id = 'ID'.
    wa_variants-alternative_bom = wa_bom01-stlal.
    wa_variants-bom_status = wa_bom01-stlst.
    wa_variants-base_qty = wa_bom01-bmeng.
    wa_variants-valid_from_date = wa_bom01-datuv.
    wa_variants-alt_text = wa_bom01-alt_text.
    wa_variants-function = 'NEW'.
    APPEND wa_variants TO it_variants.
* Details of the items of the variants
    wa_items-bom_group_identification = 'IDENTIFICATION'.
    wa_items-object_type = 'ITM'.
    wa_items-object_id = 'ID'.
    wa_items-item_no = wa_bom01-posnr.
    wa_items-item_cat = wa_bom01-postp.
    wa_items-component = wa_bom01-idnrk.
    wa_items-comp_qty = wa_bom01-menge.
    wa_items-valid_from_date = wa_bom01-datuv.
    APPEND wa_items TO it_items.
* Details of the materials of the different variants
    CLEAR it_matrel.
    wa_matrel-bom_group_identification = 'IDENTIFICATION'.
    wa_matrel-material = wa_bom01-matnr.
    wa_matrel-plant    = wa_bom01-werks.
    wa_matrel-bom_usage = wa_bom01-stlan.
    wa_matrel-alternative_bom = wa_bom01-stlal.
    APPEND wa_matrel TO it_matrel.
* Linking items to the corresponding variants
    CLEAR it_itemas.
    wa_itemas-bom_group_identification = 'IDENTIFICATION'.
    wa_itemas-sub_object_type = 'ITM'.
    wa_itemas-sub_object_id = 'ID'.
    wa_itemas-super_object_type = 'BOM'.
    wa_itemas-super_object_id = wa_bom01-matnr.
    wa_itemas-valid_from_date = wa_bom01-datuv.
    wa_itemas-function = 'NEW'.
    APPEND wa_itemas TO it_itemas.
    AT END OF matnr.
      CALL FUNCTION 'BAPI_MATERIAL_BOM_GROUP_CREATE'
        EXPORTING
          all_error         = 'X'
        TABLES
          bomgroup          = it_bomgroup
          variants          = it_variants
          items             = it_items
          materialrelations = it_matrel
          itemassignments   = it_itemas
          return            = it_return.
      CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'.
      LOOP AT it_return.
        WRITE:/ it_return-type, it_return-id, it_return-number,
        it_return-message.
      ENDLOOP.
    ENDAT.
ENDLOOP.
Thanks and Regards,
Abdur Rafique

Hi Sree,
I used your code, I removed the levels because, i have only one level 'the lineitems'. Please find the modified code below. I'm not able to create the BOM, it throws an error as "BOM is recursive". I checked the header and item contents before passing to FM, it is correct.
Please help me with the solution.
REPORT zbom_sdn.
TYPE-POOLS: truxs.
DATA: bom_header     LIKE cad_bicsk,
      bom_item       TYPE TABLE OF cad_bom_item WITH HEADER LINE,
      bom_sub_item   TYPE TABLE OF cssubitem WITH HEADER LINE,
      dms_class_data TYPE TABLE OF cls_charac WITH HEADER LINE,
      sap_field_data TYPE TABLE OF rfcdmsdata WITH HEADER LINE,
      e_return       LIKE cad_return-value,
      e_message      LIKE message-msgtx,
      e_message_len LIKE cad_return-message_len.
DATA v_item TYPE i.
TYPES : BEGIN OF ty_data,
         matnr TYPE cad_bicsk-matnr," Material
         werks TYPE csap_mbom-werks," Plant
         stlan TYPE csap_mbom-stlan," BOM Usage
         datuv TYPE csap_mbom-datuv," Valid From
*         posnr TYPE stpo_api03-item_no," Item Number
         idnrk TYPE stpo_api03-component," BOM Component
         postp TYPE stpo_api03-item_categ," Item category
         menge TYPE cad_bom_item-menge," Quantity
         bmeng TYPE stko_api01-base_quan," Base Qty
         stlst TYPE stko_api01-bom_status," BOM Status
         stlal TYPE csap_mbom-stlal," Alternative BOM
         alt_text TYPE stko_api01-alt_text," Alternative BOM text
        END OF ty_data.
DATA : it_data TYPE TABLE OF ty_data ,
       wa_data TYPE ty_data.
DATA:   wa_raw TYPE truxs_t_text_data.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-001.
PARAMETER : p_file TYPE rlgrap-filename OBLIGATORY.
SELECTION-SCREEN END OF BLOCK b2.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.
CALL FUNCTION 'KD_GET_FILENAME_ON_F4'
    EXPORTING
      program_name = syst-repid
      dynpro_number = syst-dynnr
    CHANGING
      file_name     = p_file.
START-OF-SELECTION.
CALL FUNCTION 'TEXT_CONVERT_XLS_TO_SAP'
       EXPORTING
*       I_FIELD_SEPERATOR          =
         i_line_header              = 'X'
         i_tab_raw_data             = wa_raw     " Work Table
         i_filename                 = p_file
       TABLES
         i_tab_converted_data       = it_data[] " Actual Table
       EXCEPTIONS
        conversion_failed          = 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.
CLEAR: bom_header, bom_item, bom_sub_item.
REFRESH: bom_item, bom_sub_item.
DATA : v_lineitem TYPE sposn VALUE '0000',
         v_slineitem TYPE sposn VALUE '0'.
LOOP AT it_data INTO wa_data.
    CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
      EXPORTING
        input = wa_data-matnr
      IMPORTING
        output = wa_data-matnr.
* fill BOM header
    CLEAR bom_header.
    bom_header-matnr = wa_data-matnr. "'000000000200000016'.
    bom_header-stlal = wa_data-stlal. " Alternative Bom
    bom_header-werks = wa_data-werks.                       "'1000'.
    bom_header-stlan = wa_data-stlan.                       "'3'.
    bom_header-bmeng = wa_data-bmeng.
    bom_header-cadkz = 'X'.
    bom_header-stktx = wa_data-alt_text.
*      bom_header-ztext = wa_data-text.
    bom_header-datuv = wa_data-datuv."'01.10.2010'.
* fill item
    v_lineitem = v_lineitem + 10.
    CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
      EXPORTING
        input = v_lineitem
      IMPORTING
        output = v_lineitem.
*    bom_item-upskz     = 'X'.     " If We hav the Sub items Enable it.
    bom_item-idnrk     = wa_data-matnr. "'000000000200000017'.
    bom_item-posnr     = v_lineitem.
    bom_item-postp     = wa_data-postp."'L'.
    bom_item-menge     = wa_data-menge.                     "'1'.
*    bom_item-fmeng     = wa_data-fqty.
    APPEND bom_item.
    CLEAR: bom_item.
    AT END OF matnr.
      CALL FUNCTION 'CAD_CREATE_BOM_WITH_SUB_ITEMS'
           EXPORTING
                i_bom_header   = bom_header
                i_auto_posnr   = ''
           IMPORTING
                e_return       = e_return
                e_message      = e_message
                e_message_len = e_message_len
                e_bom_header   = bom_header
           TABLES
                bom_item       = bom_item
                bom_sub_item   = bom_sub_item
                dms_class_data = dms_class_data
                sap_field_data = sap_field_data
           EXCEPTIONS
                 OTHERS         = 1.
      REFRESH bom_item.
      WRITE : e_message.
    ENDAT.
    CLEAR wa_data.
ENDLOOP.
Thanks and Regards,
Abdur Rafique

Alternative bom

i have one finish product '' A '' ( say ), In one case to create '' A '' I require one raw materials as AA and one packing material as BB . Secondly to create "A" i sometimes require AA (Row material ) & CC ( Packing material ) . This dipends on my customer's requirement.
To takeover this problem I had created a production version as 001 & 002 in MRP 4 screen of material "A" & two alternative BOM as 1 & 2 ..But now while creating sales order by VA01 how I will come to know regarding BOM selection which will indicate my customers packing requirement.

Hi abhijeet
In production version and Alternate BOM. You have to *differentiate between PV 1 & PV 2 by header quantity ( say 0 - 500 for first 501 - 100000 )* or by Validity date. Then only the system will pick automatically the required BOM.
Otherwise you have to manually select the BOM. By doing setting in OPL8 order type dependent parameter ( PV selection Manual ).
Note
This will work only for manual creation of prod order in CO 01.
Hope this is clear
Regards
J . Saravan

LSMW BOM creation error

Hi Folks,
I am facing a problem when I tried to use LSMW to create BOM.
what I have done:
using std. batch input: 0030 (material BOM)
                                 0001 (create)
Stracure: BOM_HEADER material BOM Header
BOM_ITEM   material BOM Item detail (lower level)
field:BOM_HEADER                material BOM Header
    KEY                            C(005)    Common Key
    STLST                          C(010)    BOM status
    STLAN                          C(010)    BOM usage
    DATUV                          C(040)    Valid-From Date
    AENNR                          C(040)    Change Number
    STLAL                          C(010)    Alternative BOM
    WERKS                          C(010)    plant
    MATNR                          C(040)    material no.
    BOM_ITEM                  material BOM Item detail
        KEY                            C(005)    Common Key
        MEINS                          C(010)    BOM component unit
        MENGE                          C(040)    BOM component qty
        IDNRK                          C(040)    BOM component no.
        POSTP                          C(010)    BOM item Category
        POSNR                          C(010)    BOM item number
Structure relationship:
BGR00 to BOM_HEADER
BICSK to BOM_HEADER
BICSP to BOM_ITEM
mapping and conversion rule: Auto assign and constant for T-code:CS01.
specify and assign file: one txt for header,and one for item with the same structure as above.
read data: No error.
convert data:
Syntax error in program "/1CADMC/SAP_LSMW_CONV_00003161 ".
The following syntax error occurred in the program
/1CADMC/SAP_LSMW_CONV_00003161 :
"The data object "BOM_HEADER" does not have a component called "IDNRK"."
Error in ABAP application program.
I tried several times. IDNRK is for material component which should not be part of Header.
I guess, the assignment between with BOM_ITEM and BICSP didn't work, and tried to find IDNRK in BOM_HEADER.
Hope there is someone can help me.
Thanks in adv.
Fred

Hi,
Not quite clear from your initial posting, but based on what little i understand find a few pointers.
You would need to create 2 different input files, i.e. one for header & another for item & there should be a link between the 2 via a field.
Eg: You can have a column at the begining of the files say Counter & here you would need to have a unique numbering to identify the header & the relevant components for the same.
With the above, ensure your structuring of LSMW is correct & it will work.
Hope the above helps.
Regards,
Vivek

How can I select alternative BOM when creating subcontract purchase order?

In our business, a finish good material always has different production versions at the same time. Each of production versions has its own alternative BOM. When I create a planned order, I can select wanted BOM through specifying production version.
But, when I creating subcontract purchase order, there is no field for me to specify the production version or which alternative BOM I prefer. In this case, I need to create a planned order at first. And then, convert the planned order to purchase. Only through this way, I can create a subcontract purchase order with my wanted BOM.
So, I wonder if there is any way to select alternative BOM directly when creating subcontract purchase order.
Thanks a lot!
Regards
Robbie

Dear Mr. MM
can you give me additional information about your solution?
BUT I would not expect the sytem to offer you during the Purchasing cycle the different Production Versions as it is not meant to be. I remember having the same requirement some time ago and we solved it the way I described above, additionally we created a Pop up window with a user exit during the PO creation which offered the different production versions and if the one linked with the quota arrangement, the standard PV, is used in the PO.
We also have the same problem, we activated businessfunction SCM_GEN_02 so that it is possible to have several production versions for one supplier, but unfortunatly it is not possible to change the production version in the purchase order. (business function does not seem to be very integrated)
So i would be very interested in your solution because acually it seems that i have to modify the sap standard.
Thank you and best regards
Lisa

How to create an alternative bom for the same product

Hi expert,
I want to know how to create an alternative bom for the same product. Can i use the different bom usage to create or use the same bom usage? In addition, how can i use the production version to link the alternative bom for the same product?
Please help me solve the problem.
Thanks in advance for any assistance.
George shi

HI
you can go with t-code CS01
if you have the BOM already and you want to create the alternative BOM then just goto create BOM
and enter the material and plant and uasge system will auto matically prapose the next numner ie, if you have Alt BOM1
then next system will prappose 2.
then you can enter the components as per you requirement
if you go to different BOM usage then sytem will not go for alternative BOM it gives again alt bom 1.
prodcution version you need to craet from mateial master
each version you can go woith alternative BOMS
Version 1 will have alt BOM1
Version 2 can haev ALT BOM2
-ashok

T COde CS15 : Report is not showing the "Alternative BOM No" for some BOMs

Hello Guru,
I am facing a problem for the transaction CS15, when I use this transaction, in the output for some materials, system is not showing "Alternative number" of BOM.
I cheked Deletion indicator, status of the BOM, validity period etc.
But unable to get the reason why system is not showing alternative BOM number for the some materials / BOMs.
Thanks to give your expert comments or solution.
Thanks in advance
Hemant

Hi Hemant,
please check in CS02 if those top level BOm's which dont show alternative BOm number in CS15, do they really have alternatives?
the most probale reaosn why alternative is not shown is they dont have any alternate BOM or they are variant BOMs.
please check.

To display flatfile rec's under 1 Alternative BOM using BDc recording.

Hi,
I m trying to display flat file entire(i.e.. 4 rec's i m using) records vertically under one (Alternative BOM) for CS01-BOM using BDC recording method.
Now i m tried with the following code,i m getting as one (Alternative BOM) for one ff record,by replacing one by one.
But i want as vertically under one (Alternative BOM).
Can anyone help me to overcome this.
report ZBOM
no standard page heading line-size 255.
*include bdcrecx1.
DATA: BEGIN OF bdc OCCURS 0,
matnr(18),
werks(4),
stlan(1),
END OF BDC.
DATA: BEGIN OF BDC1 OCCURS 0,
idnrk(18),
MENGE(18),
MEINS(3),
postp(1),
posnr(4),
END OF bdc1.
DATA: BEGIN OF BDCDATA OCCURS 0,
matnr(18),
werks(4),
stlan(1),
idnrk(18),
MENGE(18),
MEINS(3),
postp(1),
posnr(4),
END OF BDCDATA.
data ibdcdata type standard table of bdcdata WITH header line.
*start-of-selection.
CALL FUNCTION 'GUI_UPLOAD'
EXPORTING
FILENAME = 'C:\Documents and Settings\dilipkumar.b\Desktop\soft.txt'
FILETYPE = 'ASC'
HAS_FIELD_SEPARATOR = ','
HEADER_LENGTH = 0
READ_BY_LINE = 'X'
DAT_MODE = ' '
CODEPAGE = ' '
IGNORE_CERR = ABAP_TRUE
REPLACEMENT = '#'
CHECK_BOM = ' '
VIRUS_SCAN_PROFILE =
NO_AUTH_CHECK = ' '
IMPORTING
FILELENGTH =
HEADER =
TABLES
DATA_TAB = BDCDATA
EXCEPTIONS
FILE_OPEN_ERROR = 1
FILE_READ_ERROR = 2
NO_BATCH = 3
GUI_REFUSE_FILETRANSFER = 4
INVALID_TYPE = 5
NO_AUTHORITY = 6
UNKNOWN_ERROR = 7
BAD_DATA_FORMAT = 8
HEADER_NOT_ALLOWED = 9
SEPARATOR_NOT_ALLOWED = 10
HEADER_TOO_LONG = 11
UNKNOWN_DP_ERROR = 12
ACCESS_DENIED = 13
DP_OUT_OF_MEMORY = 14
DISK_FULL = 15
DP_TIMEOUT = 16
OTHERS = 17
IF SY-SUBRC 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
*perform open_group.
loop at bdcdata.
perform bdc_dynpro using 'SAPLCSDI' '0100'.
perform bdc_field using 'BDC_CURSOR'
'RC29N-STLAN'.
perform bdc_field using 'BDC_OKCODE'
'/00'.
perform bdc_field using 'RC29N-MATNR'
'SOFTDRINKS'.
perform bdc_field using 'RC29N-WERKS'
'WIND'.
perform bdc_field using 'RC29N-STLAN'
'1'.
perform bdc_field using 'RC29N-DATUV'
'16.09.2008'.
perform bdc_dynpro using 'SAPLCSDI' '0110'.
perform bdc_field using 'BDC_OKCODE'
'/00'.
perform bdc_field using 'RC29K-BMENG'
'1'.
perform bdc_field using 'RC29K-STLST'
'1'.
perform bdc_field using 'BDC_CURSOR'
'RC29K-EXSTL'.
perform bdc_dynpro using 'SAPLCSDI' '0111'.
perform bdc_field using 'BDC_CURSOR'
'RC29K-LABOR'.
perform bdc_field using 'BDC_OKCODE'
'/00'.
perform bdc_dynpro using 'SAPLCSDI' '0140'.
perform bdc_field using 'BDC_CURSOR'
'RC29P-POSTP(01)'.
perform bdc_field using 'BDC_OKCODE'
'=FCBU'.
perform bdc_field using 'RC29P-IDNRK(001)'
BDCDATA-IDNRK.
perform bdc_field using 'RC29P-MENGE(001)'
BDCDATA-MENGE.
perform bdc_field using 'RC29P-MEINS(001)'
BDCDATA-MEINS.
perform bdc_field using 'RC29P-POSTP(001)'
BDCDATA-POSTP.
perform bdc_dynpro using 'SAPLCSDI' '0130'.
perform bdc_field using 'BDC_OKCODE'
'/00'.
perform bdc_field using 'BDC_CURSOR'
'RC29P-POSNR'.
perform bdc_field using 'RC29P-POSNR'
BDCDATA-POSNR. "'0010'.
perform bdc_field using 'RC29P-IDNRK'
BDCDATA-IDNRK. "'15'.
perform bdc_field using 'RC29P-MENGE'
BDCDATA-MENGE. "'1'.
perform bdc_field using 'RC29P-MEINS'
BDCDATA-MEINS. "'ml'.
perform bdc_dynpro using 'SAPLCSDI' '0131'.
perform bdc_field using 'BDC_OKCODE'
'/00'.
perform bdc_field using 'BDC_CURSOR'
'RC29P-POTX1'.
perform bdc_field using 'RC29P-SANKA'
'X'.
*perform bdc_transaction using 'CS01'.
*perform close_group.
CALL TRANSACTION 'CS01' USING IBDCDATA MODE 'A' UPDATE 'S'.
REFRESH IBDCDATA.
clear ibdcdata.
endloop.
Start new screen *
FORM BDC_DYNPRO USING PROGRAM DYNPRO.
CLEAR iBDCDATA.
iBDCDATA-PROGRAM = PROGRAM.
iBDCDATA-DYNPRO = DYNPRO.
iBDCDATA-DYNBEGIN = 'X'.
APPEND ibDCDATA .
ENDFORM.
Insert field *
FORM BDC_FIELD USING FNAM FVAL.
IF FVAL NODATA.
CLEAR iBDCDATA.
iBDCDATA-FNAM = FNAM.
iBDCDATA-FVAL = FVAL.
APPEND iBDCDATA .
ENDIF.
ENDFORM.

Hi Dilip,
Please change your code.
I request you to please go through BDC tutorials before even starting to write the program.
There are many online tutorials which can help you with.
Also, search in SDN.. there you will get more than thousand results.. with the search term BDC.
Take this suggestion seriously before nayone reports the moderators that u have been posting this thread daily without taking into consideration the previous replies.
Regards,
Vishwa.

Alternative BOM selection in Subcontracting purchase requisition

Hi,
We have three alternative BOM for one semi-finished material.
We created production three production versions for respective BOM, and maintained the prod version in to subcontracting info record.
But without creating any production versions,
Can we select the BOM alternative at the time of creating subcontracting purchase requisition in ME51N,

Why do you want to select BOM at the time of PO creation ?
If BOM components differ based on quantity of finished product, then these FG quantity range can be specified in from-lot-size and to-lot-size fields of production version - and SAP will pick the appropriate PV based on PO quantity.
If BOM components to be provided to sub-contract vendor differ based on vendor, then specify that in the info record.

Plant specific BOM creation

Hello,
My requirement is User must be able to create plant specific BOM creation. For this, Do we need to do any SPRO config in Material master side? or any other settings needs to be done? Kindly let me know... Thanks!!
Regards,
Saravana

Make the field Plant for CS01 via transaction variant SHD0.
Then user can't continue without enter plant.
Regards
Dev

Choose alternative BOM in batch input

Hi!
I'm starting using BOM alternative and I'm facing a problem. I have a batch input where I need to choose an alternative BOM, but the popup for choosing the alternative doesn't show up when in batch input mode.
Does anybody have a clue?
Regards.
Fabio Scaravelli

TAJUDDIN,
I think this thread is SD, because the transaction is VA01 (I forgot to mention it, sorry). The BOM usage is 5 (Sales and distribution).
I need to choose an alternative BOM among two ones. But when VA01 is ran in batch input mode, the popup for choosing the alternative doesn't show up and the first alternative is selected by default.
Regards.
Fabio Scaravelli

BOM Explosion (CS_BOM_EXPL_MAT_V2) - inactive alternative BOM

Hi,
I need to display the alternative BOM entered in the selection screen even if the entered alternative is inactive. i.e. status is inactive. i have used FM - CS_BOM_EXPL_MAT_V2.
Kindly advise.
Regards.

Using Function module CS_BOM_EXPL_MAT_V2
As already has been said, the RNDKZ field is used for rounding. If you fill with '1', it will never round.
Example (the problem I had):
Material A consist of et al. 0.008 piece Material AA.
Material AA consist of 1.0 pice Material AAA,
                              of 7.0 piece Material AAB,
                              of 6.0 piece Material AAC,
                              of 12.0 piece Material AAD.
CASE 1: You fill RNDKZ field with '1':
You get the correct result which is:
You need for producing 1 piece of Material A
0.008 piece Material AA,
0.008 * 1 = 0.008 piece of Material AAA,
0.008 * 7.0 = 0,056 piece of Material AAB,
0.008 * 6.0 = 0,048 piece of Material AAC.
0.008 * 12.0 = 0,096 piece of Material AAD.
CASE 2: You let RNDKZ field blank.
In your user profile for BOM field "Round of" is set to blank (table field TCSPR-AMEKZ, TA S_ALR_87004496).
You get following result (which is wrong)
You need for producing 1 piece of Material A
1 piece Material AA,
1.0 *1.0 = 1.0 piece of Material AAA,
1.0 * 7.0 = 7.0 piece of Material AAB,
1.0 * 6.0 = 6.0 piece of Material AAC.
1.0 * 12.0 = 12.0 piece of Material AAD.
The number of decimals is seen depends as well from how many decimals is set for unit of measurement. In this case the number of decimals for "piece" was set to zero. (TA CUNI).
If you let the field RNDKZ field blank, the user profile field "Round of" (table field TCSPR-AMEKZ) is used.

Alternative BOM creation problem in CS01

Similar Messages

Maybe you are looking for