Urg : lsmw method idoc -bom posting for cs01

Hi Floks ,
My requirement to Bom Data in Lsmw method idoc process .what are the steps can i followed and which message types .give brief about it .
thanks
suresh
Message was edited by:
suresh duvvuri

Hello,
at first, that would be very useful if you could say which fields/segments exactly are not transfered...
there can be lot's of reasonsd why the fields are not inserted with 53 result status, but in general you can try several points:
1. check if all the fields you want to transport are properly mapped
2. you can try to debug, if indeed your mapping rules are working during convertion
3. do you want to fill this fields in insert (to create new BP) or update mode (udate already created BP)?
etc.
regards,

Similar Messages

IDoc parallel posting for message type of DESADV

The DESADV (Delivery Advice) logic is complex and it takes long time than expected. We want to improve its performance by posting DESADV IDocs in parallel.
Currently, the "Input type" of DESADV's function module is 1, which means parallel run is not enabled. (In tcode BD51). In addition, DESADV is configed as "Immediately" instead of "collected run". We will trigger DESADV every 30 mins, about 500-1000 IDocs will be created automatically and then be posted.
I want to know:
Is it possible to enable DESADV IDocs posting in parallel, how?
Dialog or background is recommended, especially from workload/performance point of view?
Any other concern? such as will data duplicated posting or data lose?
In BD20 (or program RBDAPP01), I noticed there was "Parallel Proc." option which can be selected. Can I just simply change the message type to "collected run" and schedule another background to post those IDocs in parallel?
Any comments is appreciated.
TIA
James

no answer

Lsmw via idoc method

Hi
Experts can u let me know the settings to be made while updating the data in lsmw via idoc method.....
thanks in advance

hi,
check this one
http://esnips.com/doc/1cd73c19-4263-42a4-9d6f-ac5487b0ebcb/LSMW-with-Idocs.ppt
steps for LSMW: detail documnets: http://www.scmexpertonline.com/downloads/SCM_LSMW_StepsOnWeb.doc

Purchase order-LSMW using IDoc

Hi,
While idoc is posted for PO the header segments are repeated depending upon the qualifier but in LSMW we have only single segment. How to prepare the flat file and map these segments.

You have to do it in 'Maintain Fieldmapping and conversion rules'. Let us say you are trying to fill the EIEDK14 segment for organizational values that are there in your flat structure as field1 and field2. Double click on '__BEGIN_OF_RECORD__'. Go into change mode and copy the code below into it.
g_edidd_segnam = 'E2EDK14'.
g_edidd_segnum = '0002'.
g_edidd_psgnum = '000000'.
g_edidd_hlevel = '02'.
clear e1edk14.
E1EDK14-QUALF = '005'.
E1EDK14-ORGID = flatfile-fieldfordeliveryplant.
transfer_record.
g_edidd_segnam = 'E2EDK14'.
g_edidd_segnum = '0002'.
g_edidd_psgnum = '000000'.
g_edidd_hlevel = '02'.
clear e1edk14.
E1EDK14-QUALF = '014'.
E1EDK14-ORGID = flatfile-fieldforpurchorg.

LSMW via IDOC

I need to know how to use LSMW using IDOCS.Preferably in steps.
WAiting for the reply.
Ajit

hi,
check this one
http://esnips.com/doc/1cd73c19-4263-42a4-9d6f-ac5487b0ebcb/LSMW-with-Idocs.ppt
steps for LSMW: detail documnets: http://www.scmexpertonline.com/downloads/SCM_LSMW_StepsOnWeb.doc

LSMW using IDOC method for scheduling agreement - MM

I am using LSMW IDOC method to create Scheduling agreement. i am using message type : PURSAG_CREATE. I have completed the field mapping and when i tried to process the idoc i am getting the following error.
No instance of object type PurchSchedAgreement has been created. External reference: # 1
There are no clue why this error is popping up.
please let me know if anyone faced similar issues.

try entering the values in WE19 and do the posting for teting purpose, make sure you are passing all the values.

Working on LSMW using IDoc method for processing Open Sales Orders

We are currently in middle of creation of a new instance of production for a different Business SBU. We are looking to utilise the LSMW tool using IDocs for uploading / transferring the open orders to the new box. If some one has worked on LSMW using IDocs, please get in touch and if you could share any documents on the process of utilising the LSMW tool using Idocs for any kind of conversions, it would be great. The following is a sample case.
1. Each order will have multiple segments with different qualifiers under various segments.
2. Multiple line items would be available under each order.
Issues we are currently looking to solve :
1. How do you manage to loop through the qualifiers during processing for the same segment.
2. How do you prepare the tool to recognise the multiple line items of the same order.
3. What kind of strategy needs to be used to create the input data file(s). Like, splitting the header and detail level information ?
Note : The volume of data we are looking at is somewhere around 40-60 thousand orders worldwide.
Thanks in Advance.

hI vikram check this link
and reward points if helpful
http://www.****************/Tutorials/LSMW/IDocMethod/IDocMethod1.htm
http://www.jt77.com/system-dynamics/model-01395.html

Requesting all to help me how to create lsmw using idoc method

hi
thanx for ur answer
requesting every body in the forum to help me how to create lsmw using idoc method.
regards,
balaji

Hi Balaji,
LSMW using IDOC is similar to using flat file method. Here you are getting data from IDOC container and mapping data with Idoc segments insted of flatfile column.
Hope this is what you are looking for. If helpful then dont forget to reward me for that
Darshan

Need to know LSMW by IDoc Method

Does any one know the step-by-step procedure for LSMW by IDoc method?
Please forward it to me.
Regards,
Bala Raja

Go through below links
http://www.****************/Tutorials/LSMW/IDocMethod/
http://esnips.com/doc/1cd73c19-4263-42a4-9d6f-ac5487b0ebcb/LSMW-with-Idocs.ppt
http://www.sapbrain.com/TOOLS/LSMW/SAP_LSMW_steps_introduction.html
http://esnips.com/doc/8e732760-5548-44cc-a0bb-5982c9424f17/lsmw_sp.ppt
http://esnips.com/doc/f55fef40-fb82-4e89-9000-88316699c323/Data-Transfer-Using-LSMW.zip
http://esnips.com/doc/ef04c89f-f3a2-473c-beee-6db5bb3dbb0e/LSMW-with-BAPI.ppt
http://esnips.com/doc/7582d072-6663-4388-803b-4b2b94d7f85e/LSMW.pdf
lsmw with idoc
http://www.****************/Tutorials/LSMW/IDocMethod/IDocMethod1.htm
http://www.jt77.com/system-dynamics/model-01395.html
http://www.scmexpertonline.com/downloads/SCM_LSMW_StepsOnWeb.doc
If you have OSS login then , go to the following link
https://websmp202.sap-ag.de/~form/sapnet?_SHORTKEY=01100035870000615616
Reward Points if useful.

Master data upload via LSMW using IDoc method

Dear all,
I know this has been a topic of many discussions but I would like to ask you is to share your thoughts and possibly experience with the following scenario:
Interface between non-SAP system and SAP system has to be built whereby master data gets created in the non-SAP system and has to be uploaded into SAP. This is a process that needs to be performed on a constant basis and hence my question: is there a way that the MD upload takes place in the background via LSMW with IDoc? Or any other way, for instance, with a flat file, etc.?
Thank you very much for your input!
Regards,
Miro

Miro - It depends upon many factors
1. Number of source systems
2. Volumn of recorsds ( Data to be loaded)
3. Transformation needed or not needed from S to D ( source to destination), We may consider it as
business rules/mapping
Based on above you may segrigate the objects related to data, eventually you can shoose approach of loading in SAP,
As if straigt forward load for some 20k-30K records ( Just a file load on regular basis), one to one mapping then go for LSMW, if some complex transformation logic needed then go SAP data services implementation. best part here is if you multiple sources that can be handeled here.
Accordingly you can proceed ...
Hope it helps.
Best !
Deep

LSMW Recording method is not working for transaction code FBL5N

Hi Experts,
I am trying to prepare LSMW to create dispute cases for customer line items through LSMW Recording method. When i was trying to do through SHDB Recording its working properly through Program. But its not working through LSMW Recording method means its not executing to next screen, immediately its displaying session completed screen.
Please do let me know any soution for this.
thanks,
Sriram.

Hi Sriram,
If my memory serves me correctly, a BDC will not work correctly with a list. This is mentioned somewhere in the SAP help pages.
Now I am not familiar on how to create dispute cases but using FBL5N does not sound to me the way to go. I assume that you use FBL5N in order to determine to which documents to link the dispute to, however you should be able to get the requested info from the BSID/BSAD tables.
Also in case you want to change the customer line item in the accounting document, check the data transfer workbench (SXDA) as SAP delivers a standard program for this.
Kind regards,
Robert
Edited by: RJ. Schamhart on Jan 14, 2011 12:35 AM
Edited by: RJ. Schamhart on Jan 14, 2011 12:43 AM

Are there any standard Idocs or Bapis for posting the data into transaction

Hi,
Are there any standard Idocs or Bapis for posting the data into transactions ME42N and IK11?
Thank You.

Thank you.
Any idea of the other one?

LSMW using IDoc Method *Error :No partner exists with the name '', type ''*

Hi All,
I am a newbie. I am trying LSMW using IDoc Method.
I got an error when i executed Start IDoc Generation step: No partner exists with the name '', type ''
Could anyone tell what wrong I might have done,
Thank you,
Shiv Ram

Hi,
You have to setup your IDoc configuration in LSMW:
1) Enter the menu \Settings\IDoc Inbound Processing
2) Create a FILE port by clicking "Maintain Ports"
3) Create a logical system (LS) partner number by clicking "Maintain Partner Numbers"
4) Be sure your partner profile that you create is "Active" by clicking "Classification"
5) In the end click "Activate IDoc Inbound Processing" bottom.
Run your LSMW again. This time it shoud run wothout any problem.
Hope it helps.
Chang

User Exit for Idoc being posted through ACC_DOCUMENT

Hi Experts!!
We have an inbound interface to post FI document using message type ACC_DOCUMENT. Now, we need to influence the idoc before posting. In detail, we need to change a particular field in the header and then only post it. I tried with EXIT_SAPLF050_008. But that was not being updated. Is this user exit only for a few message types like FIDCMT, FIDCC1, FIDCC2?
If yes, which user exits can be used to influence the idoc before posting?
Kindly help me out.
Thanks a lot in advance.

Hi ,
chk with these exits:
SIDOC001 -> fm EXIT_SAPLEDI1_001
SIDOC002 -> fms
EXIT_SAPLEDI6_001
EXIT_SAPLEDI6_002
EXIT_SAPLEDI6_003
hope it helps..
Regards,
Deeba

Sample code creating BOM for CS01 using BDC recording.

Hi,
Can anyone give me sample coding creating BOM for CS01 using BDC recording.
I want to display the flat file records,under one (Alternative BOM).
I m already working on it,but i m getting one A.BOM for each records.
[       Header data          ]    [      Item Data               ]
SOFTDRINKS   WIND   1       13            1     ml     l
SOFTDRINKS   WIND   1       11            1     ml     l
SOFTDRINKS   WIND   1       15        1     ml     l
SOFTDRINKS   WIND   1       14       1     ml     l
Code:
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,
      I tried with the sample code but i m not getting the required result.
    Can anyone give some other soln.
Code:
REPORT ZBOM2
no standard page heading line-size 255.
*include bdcrecx1.
TYPES: BEGIN OF TY_FLAT,      " structure for flat file
        STRING(200),
       END OF TY_FLAT.
TYPES: BEGIN OF TY_HEAD,     " structure for header file
        IND(2) TYPE N,
        MATNR(18),
        WERKS(4),
        STLAN(1),
       END OF TY_HEAD.
TYPES : BEGIN OF TY_ITEM,    "structure for item file
          IND(2) TYPE N,
          POSTP(1),
          IDNRK(18),
          MENGE(13),
          meins(3),
        END OF TY_ITEM.
TYPES :BEGIN OF TY_FLAT1,   " structure for final file
         MATNR(18),
         WERKS(4),
         STLAN(1),
         posnr(4),
         POSTP(1),
         IDNRK(18),
         MENGE(13),
         meins(3),
       END OF TY_FLAT1.
INTERNAL TABLE DECLERATIONS:
DATA : T_FLAT TYPE STANDARD TABLE OF TY_FLAT,
       T_FLAT1 TYPE STANDARD TABLE OF TY_FLAT1,
       T_HEAD TYPE STANDARD TABLE OF TY_HEAD,
       T_ITEM TYPE STANDARD TABLE OF TY_ITEM,
       T_BDCDATA TYPE STANDARD TABLE OF BDCDATA with header line ,
       T_BDCMSG TYPE STANDARD TABLE OF BDCMSGCOLL.
WORK AREA DECLERATIONS:
DATA : ST_FLAT TYPE TY_FLAT,
       ST_FLAT1 TYPE TY_FLAT1,
       ST_HEAD TYPE TY_HEAD,
       ST_ITEM TYPE TY_ITEM,
       ST_BDCDATA TYPE BDCDATA,
       ST_BDCMSG TYPE BDCMSGCOLL.
VARIABLES:
DATA : FNAM TYPE LOCALFILE,           "rlgrap-filename,
       FTYP TYPE RLGRAP-FILETYPE,
       LF_FNAM TYPE STRING.
DATA : V_IND(2) TYPE N,                " value 1,
       V_FLD(20),
       V_NO(2) TYPE N.
*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                      = T_FLAT
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.
LOOP AT T_FLAT INTO ST_FLAT.
SPLIT ST_FLAT AT CL_ABAP_CHAR_UTILITIES=>HORIZONTAL_TAB
INTO ST_FLAT1-MATNR ST_FLAT1-WERKS
ST_FLAT1-STLAN ST_FLAT1-POSTP
ST_FLAT1-IDNRK ST_FLAT1-MENGE ST_FLAT1-MEINS.
APPEND ST_FLAT1 TO T_FLAT1.
CLEAR ST_FLAT1.
ENDLOOP.
SORT T_FLAT1 BY MATNR WERKS STLAN POSTP IDNRK MENGE MEINS.
LOOP AT T_FLAT1 INTO ST_FLAT1.
MOVE :
ST_FLAT1-MATNR TO ST_HEAD-MATNR,
ST_FLAT1-WERKS TO ST_HEAD-WERKS,
ST_FLAT1-STLAN TO ST_HEAD-STLAN,
ST_FLAT1-POSTP TO ST_ITEM-POSTP,
ST_FLAT1-IDNRK TO ST_ITEM-IDNRK,
ST_FLAT1-MENGE TO ST_ITEM-MENGE,
ST_FLAT1-MENGE TO ST_ITEM-MEINS.
AT new STLAN.
ADD 1 TO V_IND.
ENDAT.
MOVE V_IND TO ST_HEAD-IND.
MOVE V_IND TO ST_ITEM-IND.
APPEND ST_HEAD TO T_HEAD.
APPEND ST_ITEM TO T_ITEM.
CLEAR ST_HEAD.
CLEAR ST_ITEM.
ENDLOOP.
CLEAR V_IND.
*perform open_group.
SORT T_ITEM BY IND.
SORT T_HEAD BY IND.
DELETE ADJACENT DUPLICATES FROM T_HEAD.
LOOP AT T_HEAD INTO ST_HEAD.
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'
                              ST_HEAD-MATNR.
perform bdc_field       using 'RC29N-WERKS'
                              ST_HEAD-WERKS.
perform bdc_field       using 'RC29N-STLAN'
                              ST_HEAD-STLAN.
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'.
LOOP AT T_ITEM INTO ST_ITEM WHERE IND = ST_HEAD-IND.
ADD 1 TO V_NO.
perform bdc_dynpro      using 'SAPLCSDI' '0140'.
perform bdc_field       using 'BDC_CURSOR'
                              'RC29K-MENGE(01)'.
perform bdc_field       using 'BDC_OKCODE'
                              '=FCBU'.
perform bdc_dynpro      using 'SAPLCSDI' '0140'.
perform bdc_field       using 'BDC_CURSOR'
                              'RC29P-POSNR(01)'.
perform bdc_field       using 'BDC_OKCODE'
                              '=FCBU'.
perform bdc_field       using 'RC29P-IDNRK(01)'
                              ST_ITEM-IDNRK.
perform bdc_field       using 'RC29P-MENGE(01)'
                              ST_ITEM-MENGE.
perform bdc_field       using 'RC29P-MEINS(01)'
                              ST_ITEM-MEINS.
perform bdc_field       using 'RC29P-POSTP(01)'
                              ST_ITEM-POSTP.
CONCATENATE 'RC29K-IDNRK(' V_NO ')' INTO V_FLD.
CONDENSE V_FLD.
PERFORM BDC_FIELD USING V_FLD
ST_ITEM-IDNRK.
CONCATENATE 'RC29K-MENGE(' V_NO ')' INTO V_FLD.
CONDENSE V_FLD.
PERFORM BDC_FIELD USING V_FLD
ST_ITEM-MENGE.
CONCATENATE 'RC29K-MEINS(' V_NO ')' INTO V_FLD.
CONDENSE V_FLD.
PERFORM BDC_FIELD USING V_FLD
ST_ITEM-MEINS.
CONCATENATE 'RC29K-POSTP(' V_NO ')' INTO V_FLD.
CONDENSE V_FLD.
PERFORM BDC_FIELD USING V_FLD
ST_ITEM-POSTP.
V_NO = 1.
ENDLOOP.
CLEAR V_NO.
*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'
                              POSNR.
*perform bdc_field       using 'RC29P-IDNRK'
                             bdcdata-IDNRK.
*perform bdc_field       using 'RC29P-MENGE'
                             bdcdata-MENGE.
*perform bdc_field       using 'RC29P-MEINS'
                             bdcdata-MEINS.
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_dynpro      using 'SAPLCSDI' '0133'.
perform bdc_field       using 'BDC_OKCODE'
                                '/00'.
perform bdc_field       using 'BDC_CURSOR'
                              'RC29P-matkl'.
perform bdc_field       using 'RC29P-SANKA'
                                 'zv01'.
perform bdc_dynpro      using 'SAPLCSDI' '0140'.
perform bdc_field       using 'BDC_CURSOR'
                              'RC29N-POSNR(01)'.
perform bdc_field       using 'BDC_OKCODE'
                              '=FCBU'.
*perform bdc_transaction using 'CS01'.
perform close_group.
CALL TRANSACTION 'CS01' USING t_bdcdata MODE 'A' UPDATE 'S'.
REFRESH t_bdcdata.
clear t_bdcdata.
endloop.
       Start new screen                                              *
FORM BDC_DYNPRO USING PROGRAM DYNPRO.
CLEAR st_bdcdata.
st_bdcdata-PROGRAM = PROGRAM.
st_bdcdata-DYNPRO   = DYNPRO.
st_bdcdata-DYNBEGIN = 'X'.
APPEND st_bdcdata to t_bdcdata .
ENDFORM.
       Insert field                                                  *
FORM BDC_FIELD USING FNAM FVAL.
IF FVAL <> NODATA.
    CLEAR st_bdcdata.
    st_bdcdata-FNAM = FNAM.
    st_bdcdata-FVAL = FVAL.
    APPEND st_bdcdata to t_bdcdata.
ENDIF.
ENDFORM.

Urg : lsmw method idoc -bom posting for cs01

Similar Messages

Maybe you are looking for