<?xml version="1.0" encoding="UTF-8"?>
<rss xmlns:content="http://purl.org/rss/1.0/modules/content/" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#" xmlns:taxo="http://purl.org/rss/1.0/modules/taxonomy/" version="2.0">
  <channel>
    <title>topic Re: calltr. in Application Development and Automation Discussions</title>
    <link>https://community.sap.com/t5/application-development-and-automation-discussions/calltr/m-p/3508167#M843817</link>
    <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;&lt;STRONG&gt;Uploading multiple transactions is not possible with the Call Transaction method of BDC. It is possible withSession Method.&lt;/STRONG&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;CLASSICAL BATCH INPUT (Session Method)&lt;/P&gt;&lt;P&gt;CALL TRANSACTION &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;BATCH INPUT METHOD:&lt;/P&gt;&lt;P&gt;This method is also called as &amp;#145;CLASSICAL METHOD&amp;#146;.&lt;/P&gt;&lt;P&gt;Features:&lt;/P&gt;&lt;P&gt;Asynchronous processing. &lt;/P&gt;&lt;P&gt;Synchronous Processing in database update.&lt;/P&gt;&lt;P&gt;Transfer data for more than one transaction.&lt;/P&gt;&lt;P&gt;Batch input processing log will be generated.&lt;/P&gt;&lt;P&gt;During processing, no transaction is started until the previous transaction has been written to the database.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;CALL TRANSACTION METHOD :&lt;/P&gt;&lt;P&gt;This is another method to transfer data from the legacy system.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Features:&lt;/P&gt;&lt;P&gt;Synchronous processing. The system performs a database commit immediately before and after the CALL TRANSACTION USING statement.&lt;/P&gt;&lt;P&gt;Updating the database can be either synchronous or asynchronous. The program specifies the update type.&lt;/P&gt;&lt;P&gt;Transfer data for a single transaction.&lt;/P&gt;&lt;P&gt;Transfers data for a sequence of dialog screens.&lt;/P&gt;&lt;P&gt;No batch input processing log is generated.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.sap-img.com/abap/difference-between-batch-input-and-call-transaction-in-bdc.htm" target="test_blank"&gt;http://www.sap-img.com/abap/difference-between-batch-input-and-call-transaction-in-bdc.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Among the two methods call transaction is better compared to session bcoz data transfer is faster in it.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Differences between call transaction and session.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Session Method:&lt;/P&gt;&lt;P&gt;1) Data is not updated in the database table until the session is processed.&lt;/P&gt;&lt;P&gt;2) No sy-subrc is returned.&lt;/P&gt;&lt;P&gt;3) Error log is created for error records.&lt;/P&gt;&lt;P&gt;4) Updation is always synchronous.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Call Transaction Method:&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;1) Immediate updation in the database table.&lt;/P&gt;&lt;P&gt;2) sy-subrc is returned.&lt;/P&gt;&lt;P&gt;3)Error need to be handled explicitly.&lt;/P&gt;&lt;P&gt;4) updation can be synchronous as well as asynchronous.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;2) ya u can use using the N mode no screen.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;3)u can't handle multiple transaction in call transaction.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;4) u can handle multiple transaction in session using the BDC_INSERT fm.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;5)When u go to SM35 u can able to see the error records.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Which is best?&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;That depends on your requirement. Both of them have there advantages.&lt;/P&gt;&lt;P&gt;According to the situation u can choose any one of these.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;difference between batch input and call transaction in BDC Session method.&lt;/P&gt;&lt;P&gt;1) synchronous processing.&lt;/P&gt;&lt;P&gt;2) can tranfer large amount of data.&lt;/P&gt;&lt;P&gt;3) processing is slower.&lt;/P&gt;&lt;P&gt;4) error log is created&lt;/P&gt;&lt;P&gt;5) data is not updated until session is processed.&lt;/P&gt;&lt;P&gt;Call transaction.&lt;/P&gt;&lt;P&gt;1) asynchronous processing&lt;/P&gt;&lt;P&gt;2) can transfer small amount of data&lt;/P&gt;&lt;P&gt;3) processing is faster.&lt;/P&gt;&lt;P&gt;4) errors need to be handled explicitly&lt;/P&gt;&lt;P&gt;5) data is updated automatically &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;For session method,these are the function modules to b used.&lt;/P&gt;&lt;P&gt;BDC_OPEN_GROUP&lt;/P&gt;&lt;P&gt;BDC_INSERT&lt;/P&gt;&lt;P&gt;BDC_CLOSE_GROUP&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;For call transaction,this is the syntax.&lt;/P&gt;&lt;P&gt;CALL TRANSACTION TCODE USING BDCDATA&lt;/P&gt;&lt;P&gt;MODE A or E or N&lt;/P&gt;&lt;P&gt;UPDATE A or S&lt;/P&gt;&lt;P&gt;MESSAGES INTO MESSTAB. &lt;/P&gt;&lt;P&gt;Take a scenario where we need to post documents in FB01 and the input file has say 2000 records (2000 documents, not line items in FB01 but 2000 records)&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;In the BDC call transaction method&lt;/P&gt;&lt;P&gt;We call the transaction FB01 2000 times (once for each record posting) and if the processing fails in record no 3 it can be captured and start with reocord 4.&lt;/P&gt;&lt;P&gt;Eg: Loop at itab.&lt;/P&gt;&lt;P&gt;call transaction FB01&lt;/P&gt;&lt;P&gt;capture errors&lt;/P&gt;&lt;P&gt;endloop.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;In the session method.&lt;/P&gt;&lt;P&gt;We do not explicity call the transaction 2000 times, but all the records are appeneded into a session and this session is stored. The processinf of the session is done wwhenever the user wants it to be done. Hence the errors cannot be captured in the program itself&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Check these link:&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.sap-img.com/abap/difference-between-batch-input-and-call-transaction-in-bdc.htm" target="test_blank"&gt;http://www.sap-img.com/abap/difference-between-batch-input-and-call-transaction-in-bdc.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.sap-img.com/abap/question-about-bdc-program.htm" target="test_blank"&gt;http://www.sap-img.com/abap/question-about-bdc-program.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.itcserver.com/blog/2006/06/30/batch-input-vs-call-transaction/" target="test_blank"&gt;http://www.itcserver.com/blog/2006/06/30/batch-input-vs-call-transaction/&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.planetsap.com/bdc_main_page.htm" target="test_blank"&gt;http://www.planetsap.com/bdc_main_page.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Batch Input Session method is asynchronous as told by others here. But the advantage of this is that you have all the error messages and the data for each transaction held persistantly. You don't have to code anything for processing them or writing the logs.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;But at the same time, the same feature can be disadvantageous if you need to react to an error or if there are too many errors to manually correct in a session. Since the session are created in the program and its execution is done seperately, you loose the trackability of such transactions.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;With a call transaction, what was a disadvantage above will become an advantage. Call transaction immediately gives you messages back and you can react to it in your program. But the disadvantage is that, if you have several hundreds of transactions to run, running them from within the program can be resource crunching affair. It will hamper the system performance and you cannot really distribute the load. Of course, you have some mechanisms with which you can overcome this, but you will have to code for it. Also, storing the messages and storing the errored transaction data etc will have to be handled by you in the program. Whereas, in batch input session, your program's job is to just create the session, after that everything is standard SAP system's responsibility.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Ideally, you should do a call transaction if the resources are not a problem and if it fails, put the errored transaction into a session.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;You can decide based on the data volume that your BDC is processing. If data volume is high go for session else call transaction will do.The call transaction updates will be instantaneous where as session needs to be processed explictly after creation. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Session Method&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;1) Session method supports both small amount of data aswell as large amount of data&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;2) data processing is asynchronus and data updation is synchronus.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;3) it process multiple apllication while perfomaning validations.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;4) in session method data will be updated in data base only after processing session only.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;5) system provide by default logfile for handling error records.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;6) it supports both foreground aswell as background process&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;in bdc we use FM ...&lt;/P&gt;&lt;P&gt;bdc_open_group " for creating Session&lt;/P&gt;&lt;P&gt;bdc_insert " adding transaction and bdcdata table for updating database&lt;/P&gt;&lt;P&gt;bdc_close_group " for closing Session&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Call Transaction&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;1) Call transaction exclusively for small amout of data&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;2) it supports only one apllication while perfoming validations&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;3) there is no default logfile, We can explicitly provide logic for creating logfile for handling error records.&lt;/P&gt;&lt;P&gt;we can create logfile by using structure....BDCMSGCOLL&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;4) it doesn't support background processing.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;5) data processing is synchronous and Data updation is Synchronous( default), in &lt;/P&gt;&lt;P&gt;this method also supports daya updation in asynchronus process also.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;syntax:&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Call transaction &amp;lt;transaction-name&amp;gt; using BDCDATA &lt;/P&gt;&lt;P&gt;mode &amp;lt;A/N/E&amp;gt;&lt;/P&gt;&lt;P&gt;update &amp;lt;L/A/S&amp;gt;&lt;/P&gt;&lt;P&gt;messages into BDCMSGCOLL.&lt;/P&gt;&lt;P&gt;BDC:&lt;/P&gt;&lt;P&gt;Batch Data Communication (BDC) is the process of transferring data from one SAP System to another SAP system or from a non-SAP system to SAP System.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Features :&lt;/P&gt;&lt;P&gt;BDC is an automatic procedure.&lt;/P&gt;&lt;P&gt;This method is used to transfer large amount of data that is available in electronic medium.&lt;/P&gt;&lt;P&gt;BDC can be used primarily when installing the SAP system and when transferring data from a legacy system (external system).&lt;/P&gt;&lt;P&gt;BDC uses normal transaction codes to transfer data.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Types of BDC :&lt;/P&gt;&lt;P&gt;CLASSICAL BATCH INPUT (Session Method)&lt;/P&gt;&lt;P&gt;CALL TRANSACTION &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;BATCH INPUT METHOD:&lt;/P&gt;&lt;P&gt;This method is also called as &amp;#145;CLASSICAL METHOD&amp;#146;.&lt;/P&gt;&lt;P&gt;Features:&lt;/P&gt;&lt;P&gt;Asynchronous processing. &lt;/P&gt;&lt;P&gt;Synchronous Processing in database update.&lt;/P&gt;&lt;P&gt;Transfer data for more than one transaction.&lt;/P&gt;&lt;P&gt;Batch input processing log will be generated.&lt;/P&gt;&lt;P&gt;During processing, no transaction is started until the previous transaction has been written to the database.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;CALL TRANSACTION METHOD :&lt;/P&gt;&lt;P&gt;This is another method to transfer data from the legacy system.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Features:&lt;/P&gt;&lt;P&gt;Synchronous processing. The system performs a database commit immediately before and after the CALL TRANSACTION USING statement.&lt;/P&gt;&lt;P&gt;Updating the database can be either synchronous or asynchronous. The program specifies the update type.&lt;/P&gt;&lt;P&gt;Transfer data for a single transaction.&lt;/P&gt;&lt;P&gt;Transfers data for a sequence of dialog screens.&lt;/P&gt;&lt;P&gt;No batch input processing log is generated.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;For BDC:&lt;/P&gt;&lt;P&gt;&lt;A href="http://myweb.dal.ca/hchinni/sap/bdc_home.htm" target="test_blank"&gt;http://myweb.dal.ca/hchinni/sap/bdc_home.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="https://www.sdn.sap.com/irj/sdn/wiki?path=/display/home/bdc&amp;amp;" target="test_blank"&gt;https://www.sdn.sap.com/irj/sdn/wiki?path=/display/home/bdc&amp;amp;&lt;/A&gt;;&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.sap-img.com/abap/learning-bdc-programming.htm" target="test_blank"&gt;http://www.sap-img.com/abap/learning-bdc-programming.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.sapdevelopment.co.uk/bdc/bdchome.htm" target="test_blank"&gt;http://www.sapdevelopment.co.uk/bdc/bdchome.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.sap-img.com/abap/difference-between-batch-input-and-call-transaction-in-bdc.htm" target="test_blank"&gt;http://www.sap-img.com/abap/difference-between-batch-input-and-call-transaction-in-bdc.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://help.sap.com/saphelp_47x200/helpdata/en/69/c250684ba111d189750000e8322d00/frameset.htm" target="test_blank"&gt;http://help.sap.com/saphelp_47x200/helpdata/en/69/c250684ba111d189750000e8322d00/frameset.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.sapbrain.com/TUTORIALS/TECHNICAL/BDC_tutorial.html" target="test_blank"&gt;http://www.sapbrain.com/TUTORIALS/TECHNICAL/BDC_tutorial.html&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Check these link:&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.sap-img.com/abap/difference-between-batch-input-and-call-transaction-in-bdc.htm" target="test_blank"&gt;http://www.sap-img.com/abap/difference-between-batch-input-and-call-transaction-in-bdc.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.sap-img.com/abap/question-about-bdc-program.htm" target="test_blank"&gt;http://www.sap-img.com/abap/question-about-bdc-program.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.itcserver.com/blog/2006/06/30/batch-input-vs-call-transaction/" target="test_blank"&gt;http://www.itcserver.com/blog/2006/06/30/batch-input-vs-call-transaction/&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.planetsap.com/bdc_main_page.htm" target="test_blank"&gt;http://www.planetsap.com/bdc_main_page.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;A class="jive_macro jive_macro_message" href="https://community.sap.com/" __jive_macro_name="message" modifiedtitle="true" __default_attr="2491514"&gt;&lt;/A&gt; &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Check the following links:&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.sap-img.com/bdc.htm" target="test_blank"&gt;http://www.sap-img.com/bdc.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;See below example code :&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Call three FM : BDC_OPEN_GROUP,BDC_INSERT and BDC_CLOSE_GROUP.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Once you execute the program and it creates the session at SM35 Transaction.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;************************************************************************&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Report : ZMPPC011 &lt;/P&gt;&lt;P&gt;Type : Data upload &lt;/P&gt;&lt;P&gt;Author : Chetan Shah &lt;/P&gt;&lt;P&gt;Date : 05/05/2005 &lt;/P&gt;&lt;P&gt;Transport : DV3K919557 &lt;/P&gt;&lt;P&gt;Transaction: ?? &lt;/P&gt;&lt;P&gt;Description: This ABAP/4 Program creates new Production Versions &lt;/P&gt;&lt;P&gt;(C223). It accepts tab-delimited spreadsheet input and &lt;/P&gt;&lt;P&gt;creates BDC sessions. &lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;************************************************************************&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Modification Log &lt;/P&gt;&lt;P&gt;Date Programmer Request # Description &lt;/P&gt;&lt;P&gt;************************************************************************&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;06/10/2005 Chetan Shah DV3K919557 Initial coding &lt;/P&gt;&lt;P&gt;************************************************************************&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;report zmppc011 no standard page heading line-size 120 line-count 55&lt;/P&gt;&lt;P&gt;message-id zz.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;pool of form routines &lt;/P&gt;&lt;P&gt;include zmppn001.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Define BDC Table Structure &lt;/P&gt;&lt;P&gt;data: begin of itab_bdc_tab occurs 0.&lt;/P&gt;&lt;P&gt;include structure bdcdata.&lt;/P&gt;&lt;P&gt;data: end of itab_bdc_tab.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Input record layout of Leagcy File &lt;/P&gt;&lt;P&gt;data: begin of itab_xcel occurs 0,&lt;/P&gt;&lt;P&gt;matnr(18) type c,&lt;/P&gt;&lt;P&gt;werks(4) type c,&lt;/P&gt;&lt;P&gt;alnag(2) type c,&lt;/P&gt;&lt;P&gt;verid(4) type c,&lt;/P&gt;&lt;P&gt;text1(40) type c,&lt;/P&gt;&lt;P&gt;bstmi like mkal-bstmi,&lt;/P&gt;&lt;P&gt;bstma like mkal-bstma,&lt;/P&gt;&lt;P&gt;adatu(10) type c,&lt;/P&gt;&lt;P&gt;bdatu(10) type c,&lt;/P&gt;&lt;P&gt;stlal(2) type c,&lt;/P&gt;&lt;P&gt;stlan(1) type c,&lt;/P&gt;&lt;P&gt;serkz(1) type c,&lt;/P&gt;&lt;P&gt;mdv01(8) type c,&lt;/P&gt;&lt;P&gt;elpro(4) type c,&lt;/P&gt;&lt;P&gt;alort(4) type c,&lt;/P&gt;&lt;P&gt;end of itab_xcel.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;data: begin of lt_pp04_cache occurs 0,&lt;/P&gt;&lt;P&gt;matnr like itab_xcel-matnr,&lt;/P&gt;&lt;P&gt;werks like itab_xcel-werks,&lt;/P&gt;&lt;P&gt;alnag like itab_xcel-alnag,&lt;/P&gt;&lt;P&gt;plnnr like mapl-plnnr,&lt;/P&gt;&lt;P&gt;arbpl like crhd-arbpl,&lt;/P&gt;&lt;P&gt;ktext like crtx-ktext,&lt;/P&gt;&lt;P&gt;end of lt_pp04_cache.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;data: v_ssnnr(4) type n,&lt;/P&gt;&lt;P&gt;v_lines_in_xcel like sy-tabix,&lt;/P&gt;&lt;P&gt;v_ssnname like apqi-groupid,&lt;/P&gt;&lt;P&gt;v_trans_in_ssn type i,&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;wa_xcel LIKE itab_xcel, &lt;/P&gt;&lt;P&gt;l_tabix like sy-tabix,&lt;/P&gt;&lt;P&gt;v_matnr like rc27m-matnr,&lt;/P&gt;&lt;P&gt;v_plnnr like mapl-plnnr,&lt;/P&gt;&lt;P&gt;v_plnal like mapl-plnal,&lt;/P&gt;&lt;P&gt;v_tcode like sy-tcode value 'C223',&lt;/P&gt;&lt;P&gt;v_plnty like plas-plnty value 'R',&lt;/P&gt;&lt;P&gt;v_objty like crhd-objty value 'A',&lt;/P&gt;&lt;P&gt;v_plpo_steus like plpo-steus value 'PP04',&lt;/P&gt;&lt;P&gt;v_verwe like crhd-verwe value '0007'.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Parameters &lt;/P&gt;&lt;P&gt;selection-screen: skip 3.&lt;/P&gt;&lt;P&gt;selection-screen: begin of block 1 with frame.&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;parameters: p_name like rlgrap-filename&lt;/P&gt;&lt;P&gt;default 'C:\My Documents\InputFile.txt'&lt;/P&gt;&lt;P&gt;obligatory,&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;bdc session name prefix &lt;/P&gt;&lt;P&gt;p_bdcpfx(6) default 'ZPVCRT'&lt;/P&gt;&lt;P&gt;obligatory,&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;number for transction per BDC session &lt;/P&gt;&lt;P&gt;p_trnssn type i&lt;/P&gt;&lt;P&gt;default 2000 obligatory,&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;retain the BDC session after successfull execution &lt;/P&gt;&lt;P&gt;p_keep like apqi-qerase&lt;/P&gt;&lt;P&gt;default 'X',&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;user who will be executing BDC session &lt;/P&gt;&lt;P&gt;p_uname like apqi-userid&lt;/P&gt;&lt;P&gt;default sy-uname&lt;/P&gt;&lt;P&gt;obligatory.&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;selection-screen: end of block 1.&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;********************************************************&lt;/P&gt;&lt;P&gt;********************************************************&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;possible entry list (F4 dropdown) for input file name &lt;/P&gt;&lt;P&gt;at selection-screen on value-request for p_name.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;*-SELECT FILE FROM USERS LOCAL PC&lt;/P&gt;&lt;P&gt;call function 'WS_FILENAME_GET'&lt;/P&gt;&lt;P&gt;exporting&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;DEF_FILENAME = ' ' &lt;/P&gt;&lt;P&gt;def_path = 'C:\Temp\'&lt;/P&gt;&lt;P&gt;mask = ',.,..'&lt;/P&gt;&lt;P&gt;mode = 'O'&lt;/P&gt;&lt;P&gt;title = 'Select File '(007)&lt;/P&gt;&lt;P&gt;importing&lt;/P&gt;&lt;P&gt;filename = p_name&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;RC = &lt;/P&gt;&lt;P&gt;exceptions&lt;/P&gt;&lt;P&gt;inv_winsys = 1&lt;/P&gt;&lt;P&gt;no_batch = 2&lt;/P&gt;&lt;P&gt;selection_cancel = 3&lt;/P&gt;&lt;P&gt;selection_error = 4&lt;/P&gt;&lt;P&gt;others = 5.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;if sy-subrc 0.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno &lt;/P&gt;&lt;P&gt;WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4. &lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;********************************************************&lt;/P&gt;&lt;P&gt;********************************************************&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;begin the show &lt;SPAN __jive_emoticon_name="happy"&gt;&lt;/SPAN&gt; &lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;start-of-selection.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;read data from input file &lt;/P&gt;&lt;P&gt;perform transfer_xcel_to_itab.&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;loop at itab_xcel.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;hang on to xcel line num &lt;/P&gt;&lt;P&gt;l_tabix = sy-tabix.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;each line in the xcel file marks begining of new prod.version defn &lt;/P&gt;&lt;P&gt;if num-of-trnas-in-session = 0, create new BDC session &lt;/P&gt;&lt;P&gt;if v_trans_in_ssn is initial.&lt;/P&gt;&lt;P&gt;perform bdc_session_open.&lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;begin new bdc script for rtg create trans &lt;/P&gt;&lt;P&gt;fill in bdc-data for prod.version maintenance screens &lt;/P&gt;&lt;P&gt;perform bdc_build_script.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;insert the bdc script as a BDC transaction &lt;/P&gt;&lt;P&gt;perform bdc_submit_transaction.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;keep track of how many BDC transactions were inserted in the BDC &lt;/P&gt;&lt;P&gt;session &lt;/P&gt;&lt;P&gt;add 1 to v_trans_in_ssn.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;if the user-specified num of trans in BDC session is reached OR &lt;/P&gt;&lt;P&gt;if end of input file is reached, close the BDC session &lt;/P&gt;&lt;P&gt;if v_trans_in_ssn = p_trnssn or&lt;/P&gt;&lt;P&gt;l_tabix = v_lines_in_xcel.&lt;/P&gt;&lt;P&gt;perform bdc_session_close.&lt;/P&gt;&lt;P&gt;clear v_trans_in_ssn.&lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;endloop.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;top-of-page.&lt;/P&gt;&lt;P&gt;call function 'Z_HEADER'&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;EXPORTING &lt;/P&gt;&lt;P&gt;FLEX_TEXT1 = &lt;/P&gt;&lt;P&gt;FLEX_TEXT2 = &lt;/P&gt;&lt;P&gt;FLEX_TEXT3 = &lt;/P&gt;&lt;P&gt;.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;FORM TRANSFER_XCEL_TO_ITAB *&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt; &lt;/P&gt;&lt;P&gt;Transfer Xcel Spreadsheet to SAP Internal Table *&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt; form transfer_xcel_to_itab.&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Read the tab-delimited file into itab &lt;/P&gt;&lt;P&gt;call function 'WS_UPLOAD'&lt;/P&gt;&lt;P&gt;exporting&lt;/P&gt;&lt;P&gt;filename = p_name&lt;/P&gt;&lt;P&gt;filetype = 'DAT'&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;IMPORTING &lt;/P&gt;&lt;P&gt;filelength = flength &lt;/P&gt;&lt;P&gt;tables&lt;/P&gt;&lt;P&gt;data_tab = itab_xcel&lt;/P&gt;&lt;P&gt;exceptions&lt;/P&gt;&lt;P&gt;conversion_error = 1&lt;/P&gt;&lt;P&gt;file_open_error = 2&lt;/P&gt;&lt;P&gt;file_read_error = 3&lt;/P&gt;&lt;P&gt;invalid_table_width = 4&lt;/P&gt;&lt;P&gt;invalid_type = 5&lt;/P&gt;&lt;P&gt;no_batch = 6&lt;/P&gt;&lt;P&gt;unknown_error = 7&lt;/P&gt;&lt;P&gt;others = 8.&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;if sy-subrc = 0.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;sort the data &lt;/P&gt;&lt;P&gt;sort itab_xcel by matnr werks.&lt;/P&gt;&lt;P&gt;clear v_lines_in_xcel.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;if no data in the file - error out &lt;/P&gt;&lt;P&gt;describe table itab_xcel lines v_lines_in_xcel.&lt;/P&gt;&lt;P&gt;if v_lines_in_xcel is initial.&lt;/P&gt;&lt;P&gt;write: / 'No data in input file'.&lt;/P&gt;&lt;P&gt;stop.&lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;else.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;if file upload failed - error out &lt;/P&gt;&lt;P&gt;write: / 'Error reading input file'.&lt;/P&gt;&lt;P&gt;stop.&lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;endform.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;FORM BDC_SESSION_OPEN *&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt; &lt;/P&gt;&lt;P&gt;Open BDC Session *&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt; form bdc_session_open.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;create bdc session name = prefix-from-selectn-screen + nnnn &lt;/P&gt;&lt;P&gt;add 1 to v_ssnnr.&lt;/P&gt;&lt;P&gt;concatenate p_bdcpfx v_ssnnr into v_ssnname.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;open new bdc session &lt;/P&gt;&lt;P&gt;call function 'BDC_OPEN_GROUP'&lt;/P&gt;&lt;P&gt;exporting&lt;/P&gt;&lt;P&gt;client = sy-mandt&lt;/P&gt;&lt;P&gt;group = v_ssnname&lt;/P&gt;&lt;P&gt;keep = p_keep&lt;/P&gt;&lt;P&gt;user = p_uname&lt;/P&gt;&lt;P&gt;exceptions&lt;/P&gt;&lt;P&gt;client_invalid = 1&lt;/P&gt;&lt;P&gt;destination_invalid = 2&lt;/P&gt;&lt;P&gt;group_invalid = 3&lt;/P&gt;&lt;P&gt;group_is_locked = 4&lt;/P&gt;&lt;P&gt;holddate_invalid = 5&lt;/P&gt;&lt;P&gt;internal_error = 6&lt;/P&gt;&lt;P&gt;queue_error = 7&lt;/P&gt;&lt;P&gt;running = 8&lt;/P&gt;&lt;P&gt;system_lock_error = 9&lt;/P&gt;&lt;P&gt;user_invalid = 10&lt;/P&gt;&lt;P&gt;others = 11.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;endform.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;FORM BDC_BUILD_SCRIPT *&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt; &lt;/P&gt;&lt;P&gt;Build BDC *&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt; form bdc_build_script.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;data: l_arbpl like crhd-arbpl,&lt;/P&gt;&lt;P&gt;l_text1 like mkal-text1,&lt;/P&gt;&lt;P&gt;l_mdv01 like mkal-mdv01,&lt;/P&gt;&lt;P&gt;l_mapl like mapl.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;clear bdc-data itab - begin of new bdc transaction &lt;/P&gt;&lt;P&gt;clear itab_bdc_tab.&lt;/P&gt;&lt;P&gt;refresh itab_bdc_tab.&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;read material cross reference tables to determine sap part# &lt;/P&gt;&lt;P&gt;clear : v_matnr, v_plnnr, v_plnal.&lt;/P&gt;&lt;P&gt;perform read_matnr_cross_ref using itab_xcel-matnr&lt;/P&gt;&lt;P&gt;itab_xcel-werks&lt;/P&gt;&lt;P&gt;changing v_matnr.&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;determine the version description to use &lt;/P&gt;&lt;P&gt;if itab_xcel-text1 is initial.&lt;/P&gt;&lt;P&gt;l_text1 = itab_xcel-verid.&lt;/P&gt;&lt;P&gt;else.&lt;/P&gt;&lt;P&gt;l_text1 = itab_xcel-text1.&lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;determine the routing group# and group ctr# to use &lt;/P&gt;&lt;P&gt;perform read_routing .&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;determine the production line to use &lt;/P&gt;&lt;P&gt;if itab_xcel-mdv01 is initial.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;if not provided in the file then: &lt;/P&gt;&lt;P&gt;prod line = work ctr on the last PP04 op of the rtg determined above &lt;/P&gt;&lt;P&gt;perform read_wc_on_last_pp04 using v_plnnr v_plnal&lt;/P&gt;&lt;P&gt;changing l_mdv01.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;NOTE: when executing the above form\routine, if v_plnnr is initial &lt;/P&gt;&lt;P&gt;or v_plnal is initial, THEN l_mdv01 will automatically be &lt;/P&gt;&lt;P&gt;returned blank (ie initial) &lt;/P&gt;&lt;P&gt;else.&lt;/P&gt;&lt;P&gt;l_mdv01 = itab_xcel-mdv01.&lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;build bdc script &lt;/P&gt;&lt;P&gt;perform bdc_build_script_record&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;fill in initial screen &lt;/P&gt;&lt;P&gt;using: 'X' 'SAPLCMFV' '1000',&lt;/P&gt;&lt;P&gt;' ' 'BDC_OKCODE' '=ENTE',&lt;/P&gt;&lt;P&gt;' ' 'MKAL-WERKS' itab_xcel-werks,&lt;/P&gt;&lt;P&gt;' ' 'MKAL-MATNR' v_matnr,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_ADMIN-DISPO' space,&lt;/P&gt;&lt;P&gt;' ' 'MKAL-PLNNR' space,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_ADMIN-STTAG' space,&lt;/P&gt;&lt;P&gt;' ' 'MKAL-PLNNG' space,&lt;/P&gt;&lt;P&gt;' ' 'MKAL-MDV01' space,&lt;/P&gt;&lt;P&gt;' ' 'MKAL-PLNNM' space,&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;click create button on initial screen and go to detail screen &lt;/P&gt;&lt;P&gt;'X' 'SAPLCMFV' '1000',&lt;/P&gt;&lt;P&gt;' ' 'BDC_OKCODE' '=CREA',&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;fill in the detail screen and go back to initial screen &lt;/P&gt;&lt;P&gt;'X' 'SAPLCMFV' '2000',&lt;/P&gt;&lt;P&gt;' ' 'BDC_OKCODE' '=CLOS',&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-MATNR' v_matnr,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-VERID' itab_xcel-verid,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-TEXT1' l_text1,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-BSTMI' itab_xcel-bstmi,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-BSTMA' itab_xcel-bstma,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-ADATU' itab_xcel-adatu,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-BDATU' itab_xcel-bdatu,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-PLTYG' v_plnty,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-PLNNG' v_plnnr,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-ALNAG' v_plnal,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-STLAL' itab_xcel-stlal,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-STLAN' itab_xcel-stlan,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-SERKZ' itab_xcel-serkz,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-MDV01' l_mdv01,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-ELPRO' itab_xcel-elpro,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-ALORT' itab_xcel-alort,&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;save the production version from initial screen &lt;/P&gt;&lt;P&gt;'X' 'SAPLCMFV' '1000',&lt;/P&gt;&lt;P&gt;' ' 'BDC_OKCODE' '=SAVE'.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;endform.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;FORM BDC_SUBMIT_TRANSACTION *&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt; &lt;/P&gt;&lt;P&gt;Submit BDC Session *&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt; form bdc_submit_transaction.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Load BDC script as a trqansction in BDC session &lt;/P&gt;&lt;P&gt;call function 'BDC_INSERT'&lt;/P&gt;&lt;P&gt;exporting&lt;/P&gt;&lt;P&gt;tcode = v_tcode&lt;/P&gt;&lt;P&gt;tables&lt;/P&gt;&lt;P&gt;dynprotab = itab_bdc_tab&lt;/P&gt;&lt;P&gt;exceptions&lt;/P&gt;&lt;P&gt;internal_error = 01&lt;/P&gt;&lt;P&gt;not_open = 02&lt;/P&gt;&lt;P&gt;queue_error = 03&lt;/P&gt;&lt;P&gt;tcode_invalid = 04.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;endform.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;FORM BDC_BUILD_SCRIPT_RECORD *&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt; form bdc_build_script_record using dynbegin name value.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;clear itab_bdc_tab.&lt;/P&gt;&lt;P&gt;if dynbegin = 'X'.&lt;/P&gt;&lt;P&gt;move: name to itab_bdc_tab-program,&lt;/P&gt;&lt;P&gt;value to itab_bdc_tab-dynpro,&lt;/P&gt;&lt;P&gt;'X' to itab_bdc_tab-dynbegin.&lt;/P&gt;&lt;P&gt;else.&lt;/P&gt;&lt;P&gt;move: name to itab_bdc_tab-fnam,&lt;/P&gt;&lt;P&gt;value to itab_bdc_tab-fval.&lt;/P&gt;&lt;P&gt;shift itab_bdc_tab-fval left deleting leading space.&lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;append itab_bdc_tab.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;endform.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;FORM BDC_SESSION_CLOSE *&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt; &lt;/P&gt;&lt;P&gt;Close BDC Session *&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt; form bdc_session_close.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;close the session &lt;/P&gt;&lt;P&gt;call function 'BDC_CLOSE_GROUP'&lt;/P&gt;&lt;P&gt;exceptions&lt;/P&gt;&lt;P&gt;not_open = 1&lt;/P&gt;&lt;P&gt;queue_error = 2&lt;/P&gt;&lt;P&gt;others = 3.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;skip 2.&lt;/P&gt;&lt;P&gt;if sy-subrc ne 0.&lt;/P&gt;&lt;P&gt;write: / 'Error Closing BDC Session ' , 'RETURN CODE: ', sy-subrc.&lt;/P&gt;&lt;P&gt;else.&lt;/P&gt;&lt;P&gt;write : / 'Session created:', v_ssnname,&lt;/P&gt;&lt;P&gt;50 '# of transactions:', v_trans_in_ssn.&lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;endform.&lt;/P&gt;&lt;P&gt;&amp;amp;----&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;*&amp;amp; Form read_routing_cache&lt;/P&gt;&lt;P&gt;&amp;amp;----&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;*FORM read_routing_cache USING pi_matnr&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;pi_werks &lt;/P&gt;&lt;P&gt;pi_alnag &lt;/P&gt;&lt;P&gt;pi_verid &lt;/P&gt;&lt;P&gt;pi_mdv01. &lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;DATA: BEGIN OF lt_plpo OCCURS 0, &lt;/P&gt;&lt;P&gt;vornr LIKE plpo-vornr, &lt;/P&gt;&lt;P&gt;objty LIKE crhd-objty, &lt;/P&gt;&lt;P&gt;objid LIKE crhd-objid, &lt;/P&gt;&lt;P&gt;arbpl LIKE crhd-arbpl, &lt;/P&gt;&lt;P&gt;END OF lt_plpo, &lt;/P&gt;&lt;P&gt;l_mapl_plnnr LIKE mapl-plnnr. &lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;determine the routing group# &lt;/P&gt;&lt;P&gt;CLEAR lt_pp04_cache. &lt;/P&gt;&lt;P&gt;chk if its in the cache first, if not then get it from MAPL table &lt;/P&gt;&lt;P&gt;and put it in the cache &lt;/P&gt;&lt;P&gt;READ TABLE lt_pp04_cache WITH KEY matnr = pi_matnr &lt;/P&gt;&lt;P&gt;werks = pi_werks &lt;/P&gt;&lt;P&gt;alnag = pi_alnag. &lt;/P&gt;&lt;P&gt;IF sy-subrc = 0. &lt;/P&gt;&lt;P&gt;do nothing - lt_pp04_cache header line has rtg# &lt;/P&gt;&lt;P&gt;ELSE. &lt;/P&gt;&lt;P&gt;get the routing group # from MAPL &lt;/P&gt;&lt;P&gt;SELECT plnnr INTO l_mapl_plnnr &lt;/P&gt;&lt;P&gt;FROM mapl UP TO 1 ROWS &lt;/P&gt;&lt;P&gt;WHERE matnr = pi_matnr AND &lt;/P&gt;&lt;P&gt;werks = pi_werks AND &lt;/P&gt;&lt;P&gt;plnty = 'R' AND &lt;/P&gt;&lt;P&gt;plnal = pi_alnag AND &lt;/P&gt;&lt;P&gt;loekz = space. &lt;/P&gt;&lt;P&gt;ENDSELECT. &lt;/P&gt;&lt;P&gt;put it in the cache internal table &lt;/P&gt;&lt;P&gt;IF NOT l_mapl_plnnr IS INITIAL. &lt;/P&gt;&lt;P&gt;lt_pp04_cache-matnr = pi_matnr. &lt;/P&gt;&lt;P&gt;lt_pp04_cache-werks = pi_werks. &lt;/P&gt;&lt;P&gt;lt_pp04_cache-alnag = pi_alnag. &lt;/P&gt;&lt;P&gt;lt_pp04_cache-plnnr = l_mapl_plnnr. &lt;/P&gt;&lt;P&gt;APPEND lt_pp04_cache. &lt;/P&gt;&lt;P&gt;ENDIF. &lt;/P&gt;&lt;P&gt;ENDIF. &lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;if the rtg# was determined AND &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;the work center was not determined yet AND &lt;/P&gt;&lt;P&gt;work center was really needed for this line in the input file &lt;/P&gt;&lt;P&gt;then &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;read the work center from last PP04 operation on the routing &lt;/P&gt;&lt;P&gt;update the cache accordingly &lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;IF NOT lt_pp04_cache-plnnr IS INITIAL AND &lt;/P&gt;&lt;P&gt;lt_pp04_cache-arbpl IS INITIAL AND &lt;/P&gt;&lt;P&gt;( pi_verid IS INITIAL OR &lt;/P&gt;&lt;P&gt;pi_mdv01 IS INITIAL ). &lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;read the last PP04 operation &lt;/P&gt;&lt;P&gt;CLEAR lt_plpo. &lt;/P&gt;&lt;P&gt;REFRESH lt_plpo. &lt;/P&gt;&lt;P&gt;SELECT vornr e&lt;SUB&gt;objty e&lt;/SUB&gt;objid e~arbpl &lt;/P&gt;&lt;P&gt;INTO CORRESPONDING FIELDS OF TABLE lt_plpo &lt;/P&gt;&lt;P&gt;FROM plas AS b &lt;/P&gt;&lt;P&gt;INNER JOIN plpo AS c &lt;/P&gt;&lt;P&gt;ON b&lt;SUB&gt;plnty = c&lt;/SUB&gt;plnty AND &lt;/P&gt;&lt;P&gt;b&lt;SUB&gt;plnnr = c&lt;/SUB&gt;plnnr AND &lt;/P&gt;&lt;P&gt;b&lt;SUB&gt;zaehl = c&lt;/SUB&gt;zaehl &lt;/P&gt;&lt;P&gt;INNER JOIN crhd AS e &lt;/P&gt;&lt;P&gt;ON c&lt;SUB&gt;arbid = e&lt;/SUB&gt;objid &lt;/P&gt;&lt;P&gt;WHERE b~plnty = v_plnty AND &lt;/P&gt;&lt;P&gt;b~plnnr = lt_pp04_cache-plnnr AND &lt;/P&gt;&lt;P&gt;b~plnal = lt_pp04_cache-alnag AND &lt;/P&gt;&lt;P&gt;c~loekz = space AND &lt;/P&gt;&lt;P&gt;c~steus = v_plpo_steus AND &lt;/P&gt;&lt;P&gt;e~objty = v_objty AND &lt;/P&gt;&lt;P&gt;e~werks = lt_pp04_cache-werks AND &lt;/P&gt;&lt;P&gt;e~verwe = v_verwe. &lt;/P&gt;&lt;P&gt;SORT lt_plpo BY vornr DESCENDING. &lt;/P&gt;&lt;P&gt;READ TABLE lt_plpo INDEX 1. &lt;/P&gt;&lt;P&gt;**&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;IF NOT lt_plpo-arbpl IS INITIAL. &lt;/P&gt;&lt;P&gt;lt_pp04_cache-arbpl = lt_plpo-arbpl. &lt;/P&gt;&lt;P&gt;read work center description &lt;/P&gt;&lt;P&gt;SELECT SINGLE ktext INTO lt_pp04_cache-ktext &lt;/P&gt;&lt;P&gt;FROM crtx WHERE objty = lt_plpo-objty AND &lt;/P&gt;&lt;P&gt;objid = lt_plpo-objid AND &lt;/P&gt;&lt;P&gt;spras = sy-langu. &lt;/P&gt;&lt;P&gt;the following read will get the index of the correct record to be &lt;/P&gt;&lt;P&gt;updated in the cache &lt;/P&gt;&lt;P&gt;READ TABLE lt_pp04_cache &lt;/P&gt;&lt;P&gt;WITH KEY matnr = pi_matnr &lt;/P&gt;&lt;P&gt;werks = pi_werks &lt;/P&gt;&lt;P&gt;alnag = pi_alnag. &lt;/P&gt;&lt;P&gt;MODIFY lt_pp04_cache &lt;/P&gt;&lt;P&gt;INDEX sy-tabix &lt;/P&gt;&lt;P&gt;TRANSPORTING arbpl ktext. &lt;/P&gt;&lt;P&gt;ENDIF. &lt;/P&gt;&lt;P&gt;ENDIF. &lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;*ENDFORM. " read_last_pp04_operation_cache&lt;/P&gt;&lt;P&gt;&amp;amp;----&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;*&amp;amp; Form read_routing&lt;/P&gt;&lt;P&gt;&amp;amp;----&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;form read_routing.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;data: begin of lt_mapl occurs 0,&lt;/P&gt;&lt;P&gt;plnnr like mapl-plnnr,&lt;/P&gt;&lt;P&gt;plnal like mapl-plnal,&lt;/P&gt;&lt;P&gt;end of lt_mapl,&lt;/P&gt;&lt;P&gt;l_arbpl like crhd-arbpl.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;get all the rtg# and grp ctr# from MAPL &lt;/P&gt;&lt;P&gt;select plnnr plnal&lt;/P&gt;&lt;P&gt;into corresponding fields of table lt_mapl&lt;/P&gt;&lt;P&gt;from mapl&lt;/P&gt;&lt;P&gt;where matnr = v_matnr and&lt;/P&gt;&lt;P&gt;werks = itab_xcel-werks and&lt;/P&gt;&lt;P&gt;plnty = v_plnty and "Rate Routing&lt;/P&gt;&lt;P&gt;loekz = space. "with del flag = OFF&lt;/P&gt;&lt;P&gt;sort lt_mapl by plnal.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;if not itab_xcel-verid is initial.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;if the verid=0001 then use the 1st good rtg-grp# and grp-ctr# &lt;/P&gt;&lt;P&gt;if itab_xcel-verid = '0001'.&lt;/P&gt;&lt;P&gt;read table lt_mapl index 1.&lt;/P&gt;&lt;P&gt;v_plnnr = lt_mapl-plnnr.&lt;/P&gt;&lt;P&gt;v_plnal = lt_mapl-plnal.&lt;/P&gt;&lt;P&gt;else.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;if the verid0001 then use the rtg-grp# and grp-ctr# of the routing &lt;/P&gt;&lt;P&gt;whose work center on the last PP04 operation matches the given verid &lt;/P&gt;&lt;P&gt;loop at lt_mapl.&lt;/P&gt;&lt;P&gt;clear l_arbpl.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;get the work center from the last PP04 operation &lt;/P&gt;&lt;P&gt;perform read_wc_on_last_pp04 using lt_mapl-plnnr&lt;/P&gt;&lt;P&gt;lt_mapl-plnal&lt;/P&gt;&lt;P&gt;changing l_arbpl.&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;if itab_xcel-verid = l_arbpl.&lt;/P&gt;&lt;P&gt;v_plnnr = lt_mapl-plnnr.&lt;/P&gt;&lt;P&gt;v_plnal = lt_mapl-plnal.&lt;/P&gt;&lt;P&gt;exit.&lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;endloop.&lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;else.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;do nothing &lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;For version IDs that are other then '0000' or 'ZWIP' :-- &lt;/P&gt;&lt;P&gt;if itab_xcel-verid NE '0000' and&lt;/P&gt;&lt;P&gt;itab_xcel-verid NE 'ZWIP'.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;if routing group# or group counter was not determined, make the &lt;/P&gt;&lt;P&gt;valid-to date 99/99/9999 so that the BDC, on execution, errors out. &lt;/P&gt;&lt;P&gt;if v_plnnr is initial or&lt;/P&gt;&lt;P&gt;v_plnal is initial.&lt;/P&gt;&lt;P&gt;itab_xcel-bdatu = '99/99/9999'.&lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;determine the routing group# &lt;/P&gt;&lt;P&gt;CLEAR lt_pp04_cache. &lt;/P&gt;&lt;P&gt;chk if its in the cache first, if not then get it from MAPL table &lt;/P&gt;&lt;P&gt;and put it in the cache &lt;/P&gt;&lt;P&gt;READ TABLE lt_pp04_cache WITH KEY matnr = pi_matnr &lt;/P&gt;&lt;P&gt;werks = pi_werks &lt;/P&gt;&lt;P&gt;alnag = pi_alnag. &lt;/P&gt;&lt;P&gt;IF sy-subrc = 0. &lt;/P&gt;&lt;P&gt;do nothing - lt_pp04_cache header line has rtg# &lt;/P&gt;&lt;P&gt;ELSE. &lt;/P&gt;&lt;P&gt;get the routing group # from MAPL &lt;/P&gt;&lt;P&gt;put it in the cache internal table &lt;/P&gt;&lt;P&gt;IF NOT l_mapl_plnnr IS INITIAL. &lt;/P&gt;&lt;P&gt;lt_pp04_cache-matnr = pi_matnr. &lt;/P&gt;&lt;P&gt;lt_pp04_cache-werks = pi_werks. &lt;/P&gt;&lt;P&gt;lt_pp04_cache-alnag = pi_alnag. &lt;/P&gt;&lt;P&gt;lt_pp04_cache-plnnr = l_mapl_plnnr. &lt;/P&gt;&lt;P&gt;APPEND lt_pp04_cache. &lt;/P&gt;&lt;P&gt;ENDIF. &lt;/P&gt;&lt;P&gt;ENDIF. &lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;if the rtg# was determined AND &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;the work center was not determined yet AND &lt;/P&gt;&lt;P&gt;work center was really needed for this line in the input file &lt;/P&gt;&lt;P&gt;then &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;read the work center from last PP04 operation on the routing &lt;/P&gt;&lt;P&gt;update the cache accordingly &lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;IF NOT lt_pp04_cache-plnnr IS INITIAL AND &lt;/P&gt;&lt;P&gt;lt_pp04_cache-arbpl IS INITIAL AND &lt;/P&gt;&lt;P&gt;( pi_verid IS INITIAL OR &lt;/P&gt;&lt;P&gt;pi_mdv01 IS INITIAL ). &lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;read the last PP04 operation &lt;/P&gt;&lt;P&gt;CLEAR lt_plpo. &lt;/P&gt;&lt;P&gt;REFRESH lt_plpo. &lt;/P&gt;&lt;P&gt;SELECT vornr e&lt;SUB&gt;objty e&lt;/SUB&gt;objid e~arbpl &lt;/P&gt;&lt;P&gt;INTO CORRESPONDING FIELDS OF TABLE lt_plpo &lt;/P&gt;&lt;P&gt;FROM plas AS b &lt;/P&gt;&lt;P&gt;INNER JOIN plpo AS c &lt;/P&gt;&lt;P&gt;ON b&lt;SUB&gt;plnty = c&lt;/SUB&gt;plnty AND &lt;/P&gt;&lt;P&gt;b&lt;SUB&gt;plnnr = c&lt;/SUB&gt;plnnr AND &lt;/P&gt;&lt;P&gt;b&lt;SUB&gt;zaehl = c&lt;/SUB&gt;zaehl &lt;/P&gt;&lt;P&gt;INNER JOIN crhd AS e &lt;/P&gt;&lt;P&gt;ON c&lt;SUB&gt;arbid = e&lt;/SUB&gt;objid &lt;/P&gt;&lt;P&gt;WHERE b~plnty = v_plnty AND &lt;/P&gt;&lt;P&gt;b~plnnr = lt_pp04_cache-plnnr AND &lt;/P&gt;&lt;P&gt;b~plnal = lt_pp04_cache-alnag AND &lt;/P&gt;&lt;P&gt;c~loekz = space AND &lt;/P&gt;&lt;P&gt;c~steus = v_plpo_steus AND &lt;/P&gt;&lt;P&gt;e~objty = v_objty AND &lt;/P&gt;&lt;P&gt;e~werks = lt_pp04_cache-werks AND &lt;/P&gt;&lt;P&gt;e~verwe = v_verwe. &lt;/P&gt;&lt;P&gt;SORT lt_plpo BY vornr DESCENDING. &lt;/P&gt;&lt;P&gt;READ TABLE lt_plpo INDEX 1. &lt;/P&gt;&lt;P&gt;**&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;IF NOT lt_plpo-arbpl IS INITIAL. &lt;/P&gt;&lt;P&gt;lt_pp04_cache-arbpl = lt_plpo-arbpl. &lt;/P&gt;&lt;P&gt;read work center description &lt;/P&gt;&lt;P&gt;SELECT SINGLE ktext INTO lt_pp04_cache-ktext &lt;/P&gt;&lt;P&gt;FROM crtx WHERE objty = lt_plpo-objty AND &lt;/P&gt;&lt;P&gt;objid = lt_plpo-objid AND &lt;/P&gt;&lt;P&gt;spras = sy-langu. &lt;/P&gt;&lt;P&gt;the following read will get the index of the correct record to be &lt;/P&gt;&lt;P&gt;updated in the cache &lt;/P&gt;&lt;P&gt;READ TABLE lt_pp04_cache &lt;/P&gt;&lt;P&gt;WITH KEY matnr = pi_matnr &lt;/P&gt;&lt;P&gt;werks = pi_werks &lt;/P&gt;&lt;P&gt;alnag = pi_alnag. &lt;/P&gt;&lt;P&gt;MODIFY lt_pp04_cache &lt;/P&gt;&lt;P&gt;INDEX sy-tabix &lt;/P&gt;&lt;P&gt;TRANSPORTING arbpl ktext. &lt;/P&gt;&lt;P&gt;ENDIF. &lt;/P&gt;&lt;P&gt;ENDIF. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;endform. " read_last_pp04_operation_cache&lt;/P&gt;&lt;P&gt;&amp;amp;----&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;*&amp;amp; Form read_wc_on_last_pp04&lt;/P&gt;&lt;P&gt;&amp;amp;----&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;form read_wc_on_last_pp04 using pi_plnnr&lt;/P&gt;&lt;P&gt;pi_plnal&lt;/P&gt;&lt;P&gt;changing pe_arbpl.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;data: begin of lt_plpo occurs 0,&lt;/P&gt;&lt;P&gt;vornr like plpo-vornr,&lt;/P&gt;&lt;P&gt;objty like crhd-objty,&lt;/P&gt;&lt;P&gt;objid like crhd-objid,&lt;/P&gt;&lt;P&gt;arbpl like crhd-arbpl,&lt;/P&gt;&lt;P&gt;end of lt_plpo.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;get all the PP04 operations for the given rtg# &amp;amp; grp-ctr# &lt;/P&gt;&lt;P&gt;select vornr e&lt;SUB&gt;objty e&lt;/SUB&gt;objid e~arbpl&lt;/P&gt;&lt;P&gt;into corresponding fields of table lt_plpo&lt;/P&gt;&lt;P&gt;from plas as b&lt;/P&gt;&lt;P&gt;inner join plpo as c&lt;/P&gt;&lt;P&gt;on b&lt;SUB&gt;plnty = c&lt;/SUB&gt;plnty and&lt;/P&gt;&lt;P&gt;b&lt;SUB&gt;plnnr = c&lt;/SUB&gt;plnnr and&lt;/P&gt;&lt;P&gt;b&lt;SUB&gt;zaehl = c&lt;/SUB&gt;zaehl&lt;/P&gt;&lt;P&gt;inner join crhd as e&lt;/P&gt;&lt;P&gt;on c&lt;SUB&gt;arbid = e&lt;/SUB&gt;objid&lt;/P&gt;&lt;P&gt;where b~plnty = v_plnty and "Rate Routing&lt;/P&gt;&lt;P&gt;b~plnnr = pi_plnnr and&lt;/P&gt;&lt;P&gt;b~plnal = pi_plnal and&lt;/P&gt;&lt;P&gt;c~loekz = space and "Oper Del Flag = OFF&lt;/P&gt;&lt;P&gt;c~steus = v_plpo_steus and "PP04&lt;/P&gt;&lt;P&gt;e~objty = v_objty. "WC Obj Type = 'A'&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;read the last operation &lt;/P&gt;&lt;P&gt;sort lt_plpo by vornr descending.&lt;/P&gt;&lt;P&gt;read table lt_plpo index 1.&lt;/P&gt;&lt;P&gt;pe_arbpl = lt_plpo-arbpl.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;endform. " read_wc_on_last_pp04&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Goto LSMW-&amp;gt; Select Direct Input method in 1st step. These are the standard programs for data transfer.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Otherwise goto SPRO-&amp;gt;SAP Reference IMG-&amp;gt; Under this you'll find standard data transfer programs module wise.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Reward points,&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
    <pubDate>Wed, 27 Feb 2008 09:41:51 GMT</pubDate>
    <dc:creator>Former Member</dc:creator>
    <dc:date>2008-02-27T09:41:51Z</dc:date>
    <item>
      <title>calltr.</title>
      <link>https://community.sap.com/t5/application-development-and-automation-discussions/calltr/m-p/3508166#M843816</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;hi frds plz give me response&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Can you use call transaction for uploading to multiple transactions?&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;plz give me to my id  &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;sudhakarbabu786@rediffmail.com&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Wed, 27 Feb 2008 09:34:14 GMT</pubDate>
      <guid>https://community.sap.com/t5/application-development-and-automation-discussions/calltr/m-p/3508166#M843816</guid>
      <dc:creator>Former Member</dc:creator>
      <dc:date>2008-02-27T09:34:14Z</dc:date>
    </item>
    <item>
      <title>Re: calltr.</title>
      <link>https://community.sap.com/t5/application-development-and-automation-discussions/calltr/m-p/3508167#M843817</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;&lt;STRONG&gt;Uploading multiple transactions is not possible with the Call Transaction method of BDC. It is possible withSession Method.&lt;/STRONG&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;CLASSICAL BATCH INPUT (Session Method)&lt;/P&gt;&lt;P&gt;CALL TRANSACTION &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;BATCH INPUT METHOD:&lt;/P&gt;&lt;P&gt;This method is also called as &amp;#145;CLASSICAL METHOD&amp;#146;.&lt;/P&gt;&lt;P&gt;Features:&lt;/P&gt;&lt;P&gt;Asynchronous processing. &lt;/P&gt;&lt;P&gt;Synchronous Processing in database update.&lt;/P&gt;&lt;P&gt;Transfer data for more than one transaction.&lt;/P&gt;&lt;P&gt;Batch input processing log will be generated.&lt;/P&gt;&lt;P&gt;During processing, no transaction is started until the previous transaction has been written to the database.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;CALL TRANSACTION METHOD :&lt;/P&gt;&lt;P&gt;This is another method to transfer data from the legacy system.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Features:&lt;/P&gt;&lt;P&gt;Synchronous processing. The system performs a database commit immediately before and after the CALL TRANSACTION USING statement.&lt;/P&gt;&lt;P&gt;Updating the database can be either synchronous or asynchronous. The program specifies the update type.&lt;/P&gt;&lt;P&gt;Transfer data for a single transaction.&lt;/P&gt;&lt;P&gt;Transfers data for a sequence of dialog screens.&lt;/P&gt;&lt;P&gt;No batch input processing log is generated.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.sap-img.com/abap/difference-between-batch-input-and-call-transaction-in-bdc.htm" target="test_blank"&gt;http://www.sap-img.com/abap/difference-between-batch-input-and-call-transaction-in-bdc.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Among the two methods call transaction is better compared to session bcoz data transfer is faster in it.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Differences between call transaction and session.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Session Method:&lt;/P&gt;&lt;P&gt;1) Data is not updated in the database table until the session is processed.&lt;/P&gt;&lt;P&gt;2) No sy-subrc is returned.&lt;/P&gt;&lt;P&gt;3) Error log is created for error records.&lt;/P&gt;&lt;P&gt;4) Updation is always synchronous.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Call Transaction Method:&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;1) Immediate updation in the database table.&lt;/P&gt;&lt;P&gt;2) sy-subrc is returned.&lt;/P&gt;&lt;P&gt;3)Error need to be handled explicitly.&lt;/P&gt;&lt;P&gt;4) updation can be synchronous as well as asynchronous.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;2) ya u can use using the N mode no screen.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;3)u can't handle multiple transaction in call transaction.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;4) u can handle multiple transaction in session using the BDC_INSERT fm.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;5)When u go to SM35 u can able to see the error records.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Which is best?&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;That depends on your requirement. Both of them have there advantages.&lt;/P&gt;&lt;P&gt;According to the situation u can choose any one of these.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;difference between batch input and call transaction in BDC Session method.&lt;/P&gt;&lt;P&gt;1) synchronous processing.&lt;/P&gt;&lt;P&gt;2) can tranfer large amount of data.&lt;/P&gt;&lt;P&gt;3) processing is slower.&lt;/P&gt;&lt;P&gt;4) error log is created&lt;/P&gt;&lt;P&gt;5) data is not updated until session is processed.&lt;/P&gt;&lt;P&gt;Call transaction.&lt;/P&gt;&lt;P&gt;1) asynchronous processing&lt;/P&gt;&lt;P&gt;2) can transfer small amount of data&lt;/P&gt;&lt;P&gt;3) processing is faster.&lt;/P&gt;&lt;P&gt;4) errors need to be handled explicitly&lt;/P&gt;&lt;P&gt;5) data is updated automatically &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;For session method,these are the function modules to b used.&lt;/P&gt;&lt;P&gt;BDC_OPEN_GROUP&lt;/P&gt;&lt;P&gt;BDC_INSERT&lt;/P&gt;&lt;P&gt;BDC_CLOSE_GROUP&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;For call transaction,this is the syntax.&lt;/P&gt;&lt;P&gt;CALL TRANSACTION TCODE USING BDCDATA&lt;/P&gt;&lt;P&gt;MODE A or E or N&lt;/P&gt;&lt;P&gt;UPDATE A or S&lt;/P&gt;&lt;P&gt;MESSAGES INTO MESSTAB. &lt;/P&gt;&lt;P&gt;Take a scenario where we need to post documents in FB01 and the input file has say 2000 records (2000 documents, not line items in FB01 but 2000 records)&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;In the BDC call transaction method&lt;/P&gt;&lt;P&gt;We call the transaction FB01 2000 times (once for each record posting) and if the processing fails in record no 3 it can be captured and start with reocord 4.&lt;/P&gt;&lt;P&gt;Eg: Loop at itab.&lt;/P&gt;&lt;P&gt;call transaction FB01&lt;/P&gt;&lt;P&gt;capture errors&lt;/P&gt;&lt;P&gt;endloop.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;In the session method.&lt;/P&gt;&lt;P&gt;We do not explicity call the transaction 2000 times, but all the records are appeneded into a session and this session is stored. The processinf of the session is done wwhenever the user wants it to be done. Hence the errors cannot be captured in the program itself&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Check these link:&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.sap-img.com/abap/difference-between-batch-input-and-call-transaction-in-bdc.htm" target="test_blank"&gt;http://www.sap-img.com/abap/difference-between-batch-input-and-call-transaction-in-bdc.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.sap-img.com/abap/question-about-bdc-program.htm" target="test_blank"&gt;http://www.sap-img.com/abap/question-about-bdc-program.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.itcserver.com/blog/2006/06/30/batch-input-vs-call-transaction/" target="test_blank"&gt;http://www.itcserver.com/blog/2006/06/30/batch-input-vs-call-transaction/&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.planetsap.com/bdc_main_page.htm" target="test_blank"&gt;http://www.planetsap.com/bdc_main_page.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Batch Input Session method is asynchronous as told by others here. But the advantage of this is that you have all the error messages and the data for each transaction held persistantly. You don't have to code anything for processing them or writing the logs.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;But at the same time, the same feature can be disadvantageous if you need to react to an error or if there are too many errors to manually correct in a session. Since the session are created in the program and its execution is done seperately, you loose the trackability of such transactions.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;With a call transaction, what was a disadvantage above will become an advantage. Call transaction immediately gives you messages back and you can react to it in your program. But the disadvantage is that, if you have several hundreds of transactions to run, running them from within the program can be resource crunching affair. It will hamper the system performance and you cannot really distribute the load. Of course, you have some mechanisms with which you can overcome this, but you will have to code for it. Also, storing the messages and storing the errored transaction data etc will have to be handled by you in the program. Whereas, in batch input session, your program's job is to just create the session, after that everything is standard SAP system's responsibility.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Ideally, you should do a call transaction if the resources are not a problem and if it fails, put the errored transaction into a session.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;You can decide based on the data volume that your BDC is processing. If data volume is high go for session else call transaction will do.The call transaction updates will be instantaneous where as session needs to be processed explictly after creation. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Session Method&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;1) Session method supports both small amount of data aswell as large amount of data&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;2) data processing is asynchronus and data updation is synchronus.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;3) it process multiple apllication while perfomaning validations.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;4) in session method data will be updated in data base only after processing session only.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;5) system provide by default logfile for handling error records.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;6) it supports both foreground aswell as background process&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;in bdc we use FM ...&lt;/P&gt;&lt;P&gt;bdc_open_group " for creating Session&lt;/P&gt;&lt;P&gt;bdc_insert " adding transaction and bdcdata table for updating database&lt;/P&gt;&lt;P&gt;bdc_close_group " for closing Session&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Call Transaction&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;1) Call transaction exclusively for small amout of data&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;2) it supports only one apllication while perfoming validations&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;3) there is no default logfile, We can explicitly provide logic for creating logfile for handling error records.&lt;/P&gt;&lt;P&gt;we can create logfile by using structure....BDCMSGCOLL&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;4) it doesn't support background processing.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;5) data processing is synchronous and Data updation is Synchronous( default), in &lt;/P&gt;&lt;P&gt;this method also supports daya updation in asynchronus process also.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;syntax:&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Call transaction &amp;lt;transaction-name&amp;gt; using BDCDATA &lt;/P&gt;&lt;P&gt;mode &amp;lt;A/N/E&amp;gt;&lt;/P&gt;&lt;P&gt;update &amp;lt;L/A/S&amp;gt;&lt;/P&gt;&lt;P&gt;messages into BDCMSGCOLL.&lt;/P&gt;&lt;P&gt;BDC:&lt;/P&gt;&lt;P&gt;Batch Data Communication (BDC) is the process of transferring data from one SAP System to another SAP system or from a non-SAP system to SAP System.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Features :&lt;/P&gt;&lt;P&gt;BDC is an automatic procedure.&lt;/P&gt;&lt;P&gt;This method is used to transfer large amount of data that is available in electronic medium.&lt;/P&gt;&lt;P&gt;BDC can be used primarily when installing the SAP system and when transferring data from a legacy system (external system).&lt;/P&gt;&lt;P&gt;BDC uses normal transaction codes to transfer data.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Types of BDC :&lt;/P&gt;&lt;P&gt;CLASSICAL BATCH INPUT (Session Method)&lt;/P&gt;&lt;P&gt;CALL TRANSACTION &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;BATCH INPUT METHOD:&lt;/P&gt;&lt;P&gt;This method is also called as &amp;#145;CLASSICAL METHOD&amp;#146;.&lt;/P&gt;&lt;P&gt;Features:&lt;/P&gt;&lt;P&gt;Asynchronous processing. &lt;/P&gt;&lt;P&gt;Synchronous Processing in database update.&lt;/P&gt;&lt;P&gt;Transfer data for more than one transaction.&lt;/P&gt;&lt;P&gt;Batch input processing log will be generated.&lt;/P&gt;&lt;P&gt;During processing, no transaction is started until the previous transaction has been written to the database.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;CALL TRANSACTION METHOD :&lt;/P&gt;&lt;P&gt;This is another method to transfer data from the legacy system.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Features:&lt;/P&gt;&lt;P&gt;Synchronous processing. The system performs a database commit immediately before and after the CALL TRANSACTION USING statement.&lt;/P&gt;&lt;P&gt;Updating the database can be either synchronous or asynchronous. The program specifies the update type.&lt;/P&gt;&lt;P&gt;Transfer data for a single transaction.&lt;/P&gt;&lt;P&gt;Transfers data for a sequence of dialog screens.&lt;/P&gt;&lt;P&gt;No batch input processing log is generated.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;For BDC:&lt;/P&gt;&lt;P&gt;&lt;A href="http://myweb.dal.ca/hchinni/sap/bdc_home.htm" target="test_blank"&gt;http://myweb.dal.ca/hchinni/sap/bdc_home.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="https://www.sdn.sap.com/irj/sdn/wiki?path=/display/home/bdc&amp;amp;" target="test_blank"&gt;https://www.sdn.sap.com/irj/sdn/wiki?path=/display/home/bdc&amp;amp;&lt;/A&gt;;&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.sap-img.com/abap/learning-bdc-programming.htm" target="test_blank"&gt;http://www.sap-img.com/abap/learning-bdc-programming.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.sapdevelopment.co.uk/bdc/bdchome.htm" target="test_blank"&gt;http://www.sapdevelopment.co.uk/bdc/bdchome.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.sap-img.com/abap/difference-between-batch-input-and-call-transaction-in-bdc.htm" target="test_blank"&gt;http://www.sap-img.com/abap/difference-between-batch-input-and-call-transaction-in-bdc.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://help.sap.com/saphelp_47x200/helpdata/en/69/c250684ba111d189750000e8322d00/frameset.htm" target="test_blank"&gt;http://help.sap.com/saphelp_47x200/helpdata/en/69/c250684ba111d189750000e8322d00/frameset.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.sapbrain.com/TUTORIALS/TECHNICAL/BDC_tutorial.html" target="test_blank"&gt;http://www.sapbrain.com/TUTORIALS/TECHNICAL/BDC_tutorial.html&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Check these link:&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.sap-img.com/abap/difference-between-batch-input-and-call-transaction-in-bdc.htm" target="test_blank"&gt;http://www.sap-img.com/abap/difference-between-batch-input-and-call-transaction-in-bdc.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.sap-img.com/abap/question-about-bdc-program.htm" target="test_blank"&gt;http://www.sap-img.com/abap/question-about-bdc-program.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.itcserver.com/blog/2006/06/30/batch-input-vs-call-transaction/" target="test_blank"&gt;http://www.itcserver.com/blog/2006/06/30/batch-input-vs-call-transaction/&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.planetsap.com/bdc_main_page.htm" target="test_blank"&gt;http://www.planetsap.com/bdc_main_page.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;A class="jive_macro jive_macro_message" href="https://community.sap.com/" __jive_macro_name="message" modifiedtitle="true" __default_attr="2491514"&gt;&lt;/A&gt; &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Check the following links:&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.sap-img.com/bdc.htm" target="test_blank"&gt;http://www.sap-img.com/bdc.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;See below example code :&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Call three FM : BDC_OPEN_GROUP,BDC_INSERT and BDC_CLOSE_GROUP.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Once you execute the program and it creates the session at SM35 Transaction.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;************************************************************************&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Report : ZMPPC011 &lt;/P&gt;&lt;P&gt;Type : Data upload &lt;/P&gt;&lt;P&gt;Author : Chetan Shah &lt;/P&gt;&lt;P&gt;Date : 05/05/2005 &lt;/P&gt;&lt;P&gt;Transport : DV3K919557 &lt;/P&gt;&lt;P&gt;Transaction: ?? &lt;/P&gt;&lt;P&gt;Description: This ABAP/4 Program creates new Production Versions &lt;/P&gt;&lt;P&gt;(C223). It accepts tab-delimited spreadsheet input and &lt;/P&gt;&lt;P&gt;creates BDC sessions. &lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;************************************************************************&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Modification Log &lt;/P&gt;&lt;P&gt;Date Programmer Request # Description &lt;/P&gt;&lt;P&gt;************************************************************************&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;06/10/2005 Chetan Shah DV3K919557 Initial coding &lt;/P&gt;&lt;P&gt;************************************************************************&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;report zmppc011 no standard page heading line-size 120 line-count 55&lt;/P&gt;&lt;P&gt;message-id zz.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;pool of form routines &lt;/P&gt;&lt;P&gt;include zmppn001.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Define BDC Table Structure &lt;/P&gt;&lt;P&gt;data: begin of itab_bdc_tab occurs 0.&lt;/P&gt;&lt;P&gt;include structure bdcdata.&lt;/P&gt;&lt;P&gt;data: end of itab_bdc_tab.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Input record layout of Leagcy File &lt;/P&gt;&lt;P&gt;data: begin of itab_xcel occurs 0,&lt;/P&gt;&lt;P&gt;matnr(18) type c,&lt;/P&gt;&lt;P&gt;werks(4) type c,&lt;/P&gt;&lt;P&gt;alnag(2) type c,&lt;/P&gt;&lt;P&gt;verid(4) type c,&lt;/P&gt;&lt;P&gt;text1(40) type c,&lt;/P&gt;&lt;P&gt;bstmi like mkal-bstmi,&lt;/P&gt;&lt;P&gt;bstma like mkal-bstma,&lt;/P&gt;&lt;P&gt;adatu(10) type c,&lt;/P&gt;&lt;P&gt;bdatu(10) type c,&lt;/P&gt;&lt;P&gt;stlal(2) type c,&lt;/P&gt;&lt;P&gt;stlan(1) type c,&lt;/P&gt;&lt;P&gt;serkz(1) type c,&lt;/P&gt;&lt;P&gt;mdv01(8) type c,&lt;/P&gt;&lt;P&gt;elpro(4) type c,&lt;/P&gt;&lt;P&gt;alort(4) type c,&lt;/P&gt;&lt;P&gt;end of itab_xcel.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;data: begin of lt_pp04_cache occurs 0,&lt;/P&gt;&lt;P&gt;matnr like itab_xcel-matnr,&lt;/P&gt;&lt;P&gt;werks like itab_xcel-werks,&lt;/P&gt;&lt;P&gt;alnag like itab_xcel-alnag,&lt;/P&gt;&lt;P&gt;plnnr like mapl-plnnr,&lt;/P&gt;&lt;P&gt;arbpl like crhd-arbpl,&lt;/P&gt;&lt;P&gt;ktext like crtx-ktext,&lt;/P&gt;&lt;P&gt;end of lt_pp04_cache.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;data: v_ssnnr(4) type n,&lt;/P&gt;&lt;P&gt;v_lines_in_xcel like sy-tabix,&lt;/P&gt;&lt;P&gt;v_ssnname like apqi-groupid,&lt;/P&gt;&lt;P&gt;v_trans_in_ssn type i,&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;wa_xcel LIKE itab_xcel, &lt;/P&gt;&lt;P&gt;l_tabix like sy-tabix,&lt;/P&gt;&lt;P&gt;v_matnr like rc27m-matnr,&lt;/P&gt;&lt;P&gt;v_plnnr like mapl-plnnr,&lt;/P&gt;&lt;P&gt;v_plnal like mapl-plnal,&lt;/P&gt;&lt;P&gt;v_tcode like sy-tcode value 'C223',&lt;/P&gt;&lt;P&gt;v_plnty like plas-plnty value 'R',&lt;/P&gt;&lt;P&gt;v_objty like crhd-objty value 'A',&lt;/P&gt;&lt;P&gt;v_plpo_steus like plpo-steus value 'PP04',&lt;/P&gt;&lt;P&gt;v_verwe like crhd-verwe value '0007'.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Parameters &lt;/P&gt;&lt;P&gt;selection-screen: skip 3.&lt;/P&gt;&lt;P&gt;selection-screen: begin of block 1 with frame.&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;parameters: p_name like rlgrap-filename&lt;/P&gt;&lt;P&gt;default 'C:\My Documents\InputFile.txt'&lt;/P&gt;&lt;P&gt;obligatory,&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;bdc session name prefix &lt;/P&gt;&lt;P&gt;p_bdcpfx(6) default 'ZPVCRT'&lt;/P&gt;&lt;P&gt;obligatory,&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;number for transction per BDC session &lt;/P&gt;&lt;P&gt;p_trnssn type i&lt;/P&gt;&lt;P&gt;default 2000 obligatory,&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;retain the BDC session after successfull execution &lt;/P&gt;&lt;P&gt;p_keep like apqi-qerase&lt;/P&gt;&lt;P&gt;default 'X',&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;user who will be executing BDC session &lt;/P&gt;&lt;P&gt;p_uname like apqi-userid&lt;/P&gt;&lt;P&gt;default sy-uname&lt;/P&gt;&lt;P&gt;obligatory.&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;selection-screen: end of block 1.&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;********************************************************&lt;/P&gt;&lt;P&gt;********************************************************&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;possible entry list (F4 dropdown) for input file name &lt;/P&gt;&lt;P&gt;at selection-screen on value-request for p_name.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;*-SELECT FILE FROM USERS LOCAL PC&lt;/P&gt;&lt;P&gt;call function 'WS_FILENAME_GET'&lt;/P&gt;&lt;P&gt;exporting&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;DEF_FILENAME = ' ' &lt;/P&gt;&lt;P&gt;def_path = 'C:\Temp\'&lt;/P&gt;&lt;P&gt;mask = ',.,..'&lt;/P&gt;&lt;P&gt;mode = 'O'&lt;/P&gt;&lt;P&gt;title = 'Select File '(007)&lt;/P&gt;&lt;P&gt;importing&lt;/P&gt;&lt;P&gt;filename = p_name&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;RC = &lt;/P&gt;&lt;P&gt;exceptions&lt;/P&gt;&lt;P&gt;inv_winsys = 1&lt;/P&gt;&lt;P&gt;no_batch = 2&lt;/P&gt;&lt;P&gt;selection_cancel = 3&lt;/P&gt;&lt;P&gt;selection_error = 4&lt;/P&gt;&lt;P&gt;others = 5.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;if sy-subrc 0.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno &lt;/P&gt;&lt;P&gt;WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4. &lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;********************************************************&lt;/P&gt;&lt;P&gt;********************************************************&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;begin the show &lt;SPAN __jive_emoticon_name="happy"&gt;&lt;/SPAN&gt; &lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;start-of-selection.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;read data from input file &lt;/P&gt;&lt;P&gt;perform transfer_xcel_to_itab.&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;loop at itab_xcel.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;hang on to xcel line num &lt;/P&gt;&lt;P&gt;l_tabix = sy-tabix.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;each line in the xcel file marks begining of new prod.version defn &lt;/P&gt;&lt;P&gt;if num-of-trnas-in-session = 0, create new BDC session &lt;/P&gt;&lt;P&gt;if v_trans_in_ssn is initial.&lt;/P&gt;&lt;P&gt;perform bdc_session_open.&lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;begin new bdc script for rtg create trans &lt;/P&gt;&lt;P&gt;fill in bdc-data for prod.version maintenance screens &lt;/P&gt;&lt;P&gt;perform bdc_build_script.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;insert the bdc script as a BDC transaction &lt;/P&gt;&lt;P&gt;perform bdc_submit_transaction.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;keep track of how many BDC transactions were inserted in the BDC &lt;/P&gt;&lt;P&gt;session &lt;/P&gt;&lt;P&gt;add 1 to v_trans_in_ssn.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;if the user-specified num of trans in BDC session is reached OR &lt;/P&gt;&lt;P&gt;if end of input file is reached, close the BDC session &lt;/P&gt;&lt;P&gt;if v_trans_in_ssn = p_trnssn or&lt;/P&gt;&lt;P&gt;l_tabix = v_lines_in_xcel.&lt;/P&gt;&lt;P&gt;perform bdc_session_close.&lt;/P&gt;&lt;P&gt;clear v_trans_in_ssn.&lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;endloop.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;top-of-page.&lt;/P&gt;&lt;P&gt;call function 'Z_HEADER'&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;EXPORTING &lt;/P&gt;&lt;P&gt;FLEX_TEXT1 = &lt;/P&gt;&lt;P&gt;FLEX_TEXT2 = &lt;/P&gt;&lt;P&gt;FLEX_TEXT3 = &lt;/P&gt;&lt;P&gt;.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;FORM TRANSFER_XCEL_TO_ITAB *&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt; &lt;/P&gt;&lt;P&gt;Transfer Xcel Spreadsheet to SAP Internal Table *&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt; form transfer_xcel_to_itab.&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Read the tab-delimited file into itab &lt;/P&gt;&lt;P&gt;call function 'WS_UPLOAD'&lt;/P&gt;&lt;P&gt;exporting&lt;/P&gt;&lt;P&gt;filename = p_name&lt;/P&gt;&lt;P&gt;filetype = 'DAT'&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;IMPORTING &lt;/P&gt;&lt;P&gt;filelength = flength &lt;/P&gt;&lt;P&gt;tables&lt;/P&gt;&lt;P&gt;data_tab = itab_xcel&lt;/P&gt;&lt;P&gt;exceptions&lt;/P&gt;&lt;P&gt;conversion_error = 1&lt;/P&gt;&lt;P&gt;file_open_error = 2&lt;/P&gt;&lt;P&gt;file_read_error = 3&lt;/P&gt;&lt;P&gt;invalid_table_width = 4&lt;/P&gt;&lt;P&gt;invalid_type = 5&lt;/P&gt;&lt;P&gt;no_batch = 6&lt;/P&gt;&lt;P&gt;unknown_error = 7&lt;/P&gt;&lt;P&gt;others = 8.&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;if sy-subrc = 0.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;sort the data &lt;/P&gt;&lt;P&gt;sort itab_xcel by matnr werks.&lt;/P&gt;&lt;P&gt;clear v_lines_in_xcel.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;if no data in the file - error out &lt;/P&gt;&lt;P&gt;describe table itab_xcel lines v_lines_in_xcel.&lt;/P&gt;&lt;P&gt;if v_lines_in_xcel is initial.&lt;/P&gt;&lt;P&gt;write: / 'No data in input file'.&lt;/P&gt;&lt;P&gt;stop.&lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;else.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;if file upload failed - error out &lt;/P&gt;&lt;P&gt;write: / 'Error reading input file'.&lt;/P&gt;&lt;P&gt;stop.&lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;endform.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;FORM BDC_SESSION_OPEN *&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt; &lt;/P&gt;&lt;P&gt;Open BDC Session *&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt; form bdc_session_open.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;create bdc session name = prefix-from-selectn-screen + nnnn &lt;/P&gt;&lt;P&gt;add 1 to v_ssnnr.&lt;/P&gt;&lt;P&gt;concatenate p_bdcpfx v_ssnnr into v_ssnname.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;open new bdc session &lt;/P&gt;&lt;P&gt;call function 'BDC_OPEN_GROUP'&lt;/P&gt;&lt;P&gt;exporting&lt;/P&gt;&lt;P&gt;client = sy-mandt&lt;/P&gt;&lt;P&gt;group = v_ssnname&lt;/P&gt;&lt;P&gt;keep = p_keep&lt;/P&gt;&lt;P&gt;user = p_uname&lt;/P&gt;&lt;P&gt;exceptions&lt;/P&gt;&lt;P&gt;client_invalid = 1&lt;/P&gt;&lt;P&gt;destination_invalid = 2&lt;/P&gt;&lt;P&gt;group_invalid = 3&lt;/P&gt;&lt;P&gt;group_is_locked = 4&lt;/P&gt;&lt;P&gt;holddate_invalid = 5&lt;/P&gt;&lt;P&gt;internal_error = 6&lt;/P&gt;&lt;P&gt;queue_error = 7&lt;/P&gt;&lt;P&gt;running = 8&lt;/P&gt;&lt;P&gt;system_lock_error = 9&lt;/P&gt;&lt;P&gt;user_invalid = 10&lt;/P&gt;&lt;P&gt;others = 11.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;endform.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;FORM BDC_BUILD_SCRIPT *&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt; &lt;/P&gt;&lt;P&gt;Build BDC *&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt; form bdc_build_script.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;data: l_arbpl like crhd-arbpl,&lt;/P&gt;&lt;P&gt;l_text1 like mkal-text1,&lt;/P&gt;&lt;P&gt;l_mdv01 like mkal-mdv01,&lt;/P&gt;&lt;P&gt;l_mapl like mapl.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;clear bdc-data itab - begin of new bdc transaction &lt;/P&gt;&lt;P&gt;clear itab_bdc_tab.&lt;/P&gt;&lt;P&gt;refresh itab_bdc_tab.&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;read material cross reference tables to determine sap part# &lt;/P&gt;&lt;P&gt;clear : v_matnr, v_plnnr, v_plnal.&lt;/P&gt;&lt;P&gt;perform read_matnr_cross_ref using itab_xcel-matnr&lt;/P&gt;&lt;P&gt;itab_xcel-werks&lt;/P&gt;&lt;P&gt;changing v_matnr.&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;determine the version description to use &lt;/P&gt;&lt;P&gt;if itab_xcel-text1 is initial.&lt;/P&gt;&lt;P&gt;l_text1 = itab_xcel-verid.&lt;/P&gt;&lt;P&gt;else.&lt;/P&gt;&lt;P&gt;l_text1 = itab_xcel-text1.&lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;determine the routing group# and group ctr# to use &lt;/P&gt;&lt;P&gt;perform read_routing .&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;determine the production line to use &lt;/P&gt;&lt;P&gt;if itab_xcel-mdv01 is initial.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;if not provided in the file then: &lt;/P&gt;&lt;P&gt;prod line = work ctr on the last PP04 op of the rtg determined above &lt;/P&gt;&lt;P&gt;perform read_wc_on_last_pp04 using v_plnnr v_plnal&lt;/P&gt;&lt;P&gt;changing l_mdv01.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;NOTE: when executing the above form\routine, if v_plnnr is initial &lt;/P&gt;&lt;P&gt;or v_plnal is initial, THEN l_mdv01 will automatically be &lt;/P&gt;&lt;P&gt;returned blank (ie initial) &lt;/P&gt;&lt;P&gt;else.&lt;/P&gt;&lt;P&gt;l_mdv01 = itab_xcel-mdv01.&lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;build bdc script &lt;/P&gt;&lt;P&gt;perform bdc_build_script_record&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;fill in initial screen &lt;/P&gt;&lt;P&gt;using: 'X' 'SAPLCMFV' '1000',&lt;/P&gt;&lt;P&gt;' ' 'BDC_OKCODE' '=ENTE',&lt;/P&gt;&lt;P&gt;' ' 'MKAL-WERKS' itab_xcel-werks,&lt;/P&gt;&lt;P&gt;' ' 'MKAL-MATNR' v_matnr,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_ADMIN-DISPO' space,&lt;/P&gt;&lt;P&gt;' ' 'MKAL-PLNNR' space,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_ADMIN-STTAG' space,&lt;/P&gt;&lt;P&gt;' ' 'MKAL-PLNNG' space,&lt;/P&gt;&lt;P&gt;' ' 'MKAL-MDV01' space,&lt;/P&gt;&lt;P&gt;' ' 'MKAL-PLNNM' space,&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;click create button on initial screen and go to detail screen &lt;/P&gt;&lt;P&gt;'X' 'SAPLCMFV' '1000',&lt;/P&gt;&lt;P&gt;' ' 'BDC_OKCODE' '=CREA',&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;fill in the detail screen and go back to initial screen &lt;/P&gt;&lt;P&gt;'X' 'SAPLCMFV' '2000',&lt;/P&gt;&lt;P&gt;' ' 'BDC_OKCODE' '=CLOS',&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-MATNR' v_matnr,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-VERID' itab_xcel-verid,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-TEXT1' l_text1,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-BSTMI' itab_xcel-bstmi,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-BSTMA' itab_xcel-bstma,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-ADATU' itab_xcel-adatu,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-BDATU' itab_xcel-bdatu,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-PLTYG' v_plnty,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-PLNNG' v_plnnr,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-ALNAG' v_plnal,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-STLAL' itab_xcel-stlal,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-STLAN' itab_xcel-stlan,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-SERKZ' itab_xcel-serkz,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-MDV01' l_mdv01,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-ELPRO' itab_xcel-elpro,&lt;/P&gt;&lt;P&gt;' ' 'MKAL_EXPAND-ALORT' itab_xcel-alort,&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;save the production version from initial screen &lt;/P&gt;&lt;P&gt;'X' 'SAPLCMFV' '1000',&lt;/P&gt;&lt;P&gt;' ' 'BDC_OKCODE' '=SAVE'.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;endform.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;FORM BDC_SUBMIT_TRANSACTION *&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt; &lt;/P&gt;&lt;P&gt;Submit BDC Session *&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt; form bdc_submit_transaction.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Load BDC script as a trqansction in BDC session &lt;/P&gt;&lt;P&gt;call function 'BDC_INSERT'&lt;/P&gt;&lt;P&gt;exporting&lt;/P&gt;&lt;P&gt;tcode = v_tcode&lt;/P&gt;&lt;P&gt;tables&lt;/P&gt;&lt;P&gt;dynprotab = itab_bdc_tab&lt;/P&gt;&lt;P&gt;exceptions&lt;/P&gt;&lt;P&gt;internal_error = 01&lt;/P&gt;&lt;P&gt;not_open = 02&lt;/P&gt;&lt;P&gt;queue_error = 03&lt;/P&gt;&lt;P&gt;tcode_invalid = 04.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;endform.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;FORM BDC_BUILD_SCRIPT_RECORD *&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt; form bdc_build_script_record using dynbegin name value.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;clear itab_bdc_tab.&lt;/P&gt;&lt;P&gt;if dynbegin = 'X'.&lt;/P&gt;&lt;P&gt;move: name to itab_bdc_tab-program,&lt;/P&gt;&lt;P&gt;value to itab_bdc_tab-dynpro,&lt;/P&gt;&lt;P&gt;'X' to itab_bdc_tab-dynbegin.&lt;/P&gt;&lt;P&gt;else.&lt;/P&gt;&lt;P&gt;move: name to itab_bdc_tab-fnam,&lt;/P&gt;&lt;P&gt;value to itab_bdc_tab-fval.&lt;/P&gt;&lt;P&gt;shift itab_bdc_tab-fval left deleting leading space.&lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;append itab_bdc_tab.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;endform.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;FORM BDC_SESSION_CLOSE *&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt; &lt;/P&gt;&lt;P&gt;Close BDC Session *&lt;/P&gt;&lt;P&gt;-&lt;/P&gt;&lt;HR originaltext="-------------------------------------------------------------------------------" /&gt;&lt;P&gt; form bdc_session_close.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;close the session &lt;/P&gt;&lt;P&gt;call function 'BDC_CLOSE_GROUP'&lt;/P&gt;&lt;P&gt;exceptions&lt;/P&gt;&lt;P&gt;not_open = 1&lt;/P&gt;&lt;P&gt;queue_error = 2&lt;/P&gt;&lt;P&gt;others = 3.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;skip 2.&lt;/P&gt;&lt;P&gt;if sy-subrc ne 0.&lt;/P&gt;&lt;P&gt;write: / 'Error Closing BDC Session ' , 'RETURN CODE: ', sy-subrc.&lt;/P&gt;&lt;P&gt;else.&lt;/P&gt;&lt;P&gt;write : / 'Session created:', v_ssnname,&lt;/P&gt;&lt;P&gt;50 '# of transactions:', v_trans_in_ssn.&lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;endform.&lt;/P&gt;&lt;P&gt;&amp;amp;----&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;*&amp;amp; Form read_routing_cache&lt;/P&gt;&lt;P&gt;&amp;amp;----&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;*FORM read_routing_cache USING pi_matnr&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;pi_werks &lt;/P&gt;&lt;P&gt;pi_alnag &lt;/P&gt;&lt;P&gt;pi_verid &lt;/P&gt;&lt;P&gt;pi_mdv01. &lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;DATA: BEGIN OF lt_plpo OCCURS 0, &lt;/P&gt;&lt;P&gt;vornr LIKE plpo-vornr, &lt;/P&gt;&lt;P&gt;objty LIKE crhd-objty, &lt;/P&gt;&lt;P&gt;objid LIKE crhd-objid, &lt;/P&gt;&lt;P&gt;arbpl LIKE crhd-arbpl, &lt;/P&gt;&lt;P&gt;END OF lt_plpo, &lt;/P&gt;&lt;P&gt;l_mapl_plnnr LIKE mapl-plnnr. &lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;determine the routing group# &lt;/P&gt;&lt;P&gt;CLEAR lt_pp04_cache. &lt;/P&gt;&lt;P&gt;chk if its in the cache first, if not then get it from MAPL table &lt;/P&gt;&lt;P&gt;and put it in the cache &lt;/P&gt;&lt;P&gt;READ TABLE lt_pp04_cache WITH KEY matnr = pi_matnr &lt;/P&gt;&lt;P&gt;werks = pi_werks &lt;/P&gt;&lt;P&gt;alnag = pi_alnag. &lt;/P&gt;&lt;P&gt;IF sy-subrc = 0. &lt;/P&gt;&lt;P&gt;do nothing - lt_pp04_cache header line has rtg# &lt;/P&gt;&lt;P&gt;ELSE. &lt;/P&gt;&lt;P&gt;get the routing group # from MAPL &lt;/P&gt;&lt;P&gt;SELECT plnnr INTO l_mapl_plnnr &lt;/P&gt;&lt;P&gt;FROM mapl UP TO 1 ROWS &lt;/P&gt;&lt;P&gt;WHERE matnr = pi_matnr AND &lt;/P&gt;&lt;P&gt;werks = pi_werks AND &lt;/P&gt;&lt;P&gt;plnty = 'R' AND &lt;/P&gt;&lt;P&gt;plnal = pi_alnag AND &lt;/P&gt;&lt;P&gt;loekz = space. &lt;/P&gt;&lt;P&gt;ENDSELECT. &lt;/P&gt;&lt;P&gt;put it in the cache internal table &lt;/P&gt;&lt;P&gt;IF NOT l_mapl_plnnr IS INITIAL. &lt;/P&gt;&lt;P&gt;lt_pp04_cache-matnr = pi_matnr. &lt;/P&gt;&lt;P&gt;lt_pp04_cache-werks = pi_werks. &lt;/P&gt;&lt;P&gt;lt_pp04_cache-alnag = pi_alnag. &lt;/P&gt;&lt;P&gt;lt_pp04_cache-plnnr = l_mapl_plnnr. &lt;/P&gt;&lt;P&gt;APPEND lt_pp04_cache. &lt;/P&gt;&lt;P&gt;ENDIF. &lt;/P&gt;&lt;P&gt;ENDIF. &lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;if the rtg# was determined AND &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;the work center was not determined yet AND &lt;/P&gt;&lt;P&gt;work center was really needed for this line in the input file &lt;/P&gt;&lt;P&gt;then &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;read the work center from last PP04 operation on the routing &lt;/P&gt;&lt;P&gt;update the cache accordingly &lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;IF NOT lt_pp04_cache-plnnr IS INITIAL AND &lt;/P&gt;&lt;P&gt;lt_pp04_cache-arbpl IS INITIAL AND &lt;/P&gt;&lt;P&gt;( pi_verid IS INITIAL OR &lt;/P&gt;&lt;P&gt;pi_mdv01 IS INITIAL ). &lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;read the last PP04 operation &lt;/P&gt;&lt;P&gt;CLEAR lt_plpo. &lt;/P&gt;&lt;P&gt;REFRESH lt_plpo. &lt;/P&gt;&lt;P&gt;SELECT vornr e&lt;SUB&gt;objty e&lt;/SUB&gt;objid e~arbpl &lt;/P&gt;&lt;P&gt;INTO CORRESPONDING FIELDS OF TABLE lt_plpo &lt;/P&gt;&lt;P&gt;FROM plas AS b &lt;/P&gt;&lt;P&gt;INNER JOIN plpo AS c &lt;/P&gt;&lt;P&gt;ON b&lt;SUB&gt;plnty = c&lt;/SUB&gt;plnty AND &lt;/P&gt;&lt;P&gt;b&lt;SUB&gt;plnnr = c&lt;/SUB&gt;plnnr AND &lt;/P&gt;&lt;P&gt;b&lt;SUB&gt;zaehl = c&lt;/SUB&gt;zaehl &lt;/P&gt;&lt;P&gt;INNER JOIN crhd AS e &lt;/P&gt;&lt;P&gt;ON c&lt;SUB&gt;arbid = e&lt;/SUB&gt;objid &lt;/P&gt;&lt;P&gt;WHERE b~plnty = v_plnty AND &lt;/P&gt;&lt;P&gt;b~plnnr = lt_pp04_cache-plnnr AND &lt;/P&gt;&lt;P&gt;b~plnal = lt_pp04_cache-alnag AND &lt;/P&gt;&lt;P&gt;c~loekz = space AND &lt;/P&gt;&lt;P&gt;c~steus = v_plpo_steus AND &lt;/P&gt;&lt;P&gt;e~objty = v_objty AND &lt;/P&gt;&lt;P&gt;e~werks = lt_pp04_cache-werks AND &lt;/P&gt;&lt;P&gt;e~verwe = v_verwe. &lt;/P&gt;&lt;P&gt;SORT lt_plpo BY vornr DESCENDING. &lt;/P&gt;&lt;P&gt;READ TABLE lt_plpo INDEX 1. &lt;/P&gt;&lt;P&gt;**&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;IF NOT lt_plpo-arbpl IS INITIAL. &lt;/P&gt;&lt;P&gt;lt_pp04_cache-arbpl = lt_plpo-arbpl. &lt;/P&gt;&lt;P&gt;read work center description &lt;/P&gt;&lt;P&gt;SELECT SINGLE ktext INTO lt_pp04_cache-ktext &lt;/P&gt;&lt;P&gt;FROM crtx WHERE objty = lt_plpo-objty AND &lt;/P&gt;&lt;P&gt;objid = lt_plpo-objid AND &lt;/P&gt;&lt;P&gt;spras = sy-langu. &lt;/P&gt;&lt;P&gt;the following read will get the index of the correct record to be &lt;/P&gt;&lt;P&gt;updated in the cache &lt;/P&gt;&lt;P&gt;READ TABLE lt_pp04_cache &lt;/P&gt;&lt;P&gt;WITH KEY matnr = pi_matnr &lt;/P&gt;&lt;P&gt;werks = pi_werks &lt;/P&gt;&lt;P&gt;alnag = pi_alnag. &lt;/P&gt;&lt;P&gt;MODIFY lt_pp04_cache &lt;/P&gt;&lt;P&gt;INDEX sy-tabix &lt;/P&gt;&lt;P&gt;TRANSPORTING arbpl ktext. &lt;/P&gt;&lt;P&gt;ENDIF. &lt;/P&gt;&lt;P&gt;ENDIF. &lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;*ENDFORM. " read_last_pp04_operation_cache&lt;/P&gt;&lt;P&gt;&amp;amp;----&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;*&amp;amp; Form read_routing&lt;/P&gt;&lt;P&gt;&amp;amp;----&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;form read_routing.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;data: begin of lt_mapl occurs 0,&lt;/P&gt;&lt;P&gt;plnnr like mapl-plnnr,&lt;/P&gt;&lt;P&gt;plnal like mapl-plnal,&lt;/P&gt;&lt;P&gt;end of lt_mapl,&lt;/P&gt;&lt;P&gt;l_arbpl like crhd-arbpl.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;get all the rtg# and grp ctr# from MAPL &lt;/P&gt;&lt;P&gt;select plnnr plnal&lt;/P&gt;&lt;P&gt;into corresponding fields of table lt_mapl&lt;/P&gt;&lt;P&gt;from mapl&lt;/P&gt;&lt;P&gt;where matnr = v_matnr and&lt;/P&gt;&lt;P&gt;werks = itab_xcel-werks and&lt;/P&gt;&lt;P&gt;plnty = v_plnty and "Rate Routing&lt;/P&gt;&lt;P&gt;loekz = space. "with del flag = OFF&lt;/P&gt;&lt;P&gt;sort lt_mapl by plnal.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;if not itab_xcel-verid is initial.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;if the verid=0001 then use the 1st good rtg-grp# and grp-ctr# &lt;/P&gt;&lt;P&gt;if itab_xcel-verid = '0001'.&lt;/P&gt;&lt;P&gt;read table lt_mapl index 1.&lt;/P&gt;&lt;P&gt;v_plnnr = lt_mapl-plnnr.&lt;/P&gt;&lt;P&gt;v_plnal = lt_mapl-plnal.&lt;/P&gt;&lt;P&gt;else.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;if the verid0001 then use the rtg-grp# and grp-ctr# of the routing &lt;/P&gt;&lt;P&gt;whose work center on the last PP04 operation matches the given verid &lt;/P&gt;&lt;P&gt;loop at lt_mapl.&lt;/P&gt;&lt;P&gt;clear l_arbpl.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;get the work center from the last PP04 operation &lt;/P&gt;&lt;P&gt;perform read_wc_on_last_pp04 using lt_mapl-plnnr&lt;/P&gt;&lt;P&gt;lt_mapl-plnal&lt;/P&gt;&lt;P&gt;changing l_arbpl.&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;if itab_xcel-verid = l_arbpl.&lt;/P&gt;&lt;P&gt;v_plnnr = lt_mapl-plnnr.&lt;/P&gt;&lt;P&gt;v_plnal = lt_mapl-plnal.&lt;/P&gt;&lt;P&gt;exit.&lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;endloop.&lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;else.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;do nothing &lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;For version IDs that are other then '0000' or 'ZWIP' :-- &lt;/P&gt;&lt;P&gt;if itab_xcel-verid NE '0000' and&lt;/P&gt;&lt;P&gt;itab_xcel-verid NE 'ZWIP'.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;if routing group# or group counter was not determined, make the &lt;/P&gt;&lt;P&gt;valid-to date 99/99/9999 so that the BDC, on execution, errors out. &lt;/P&gt;&lt;P&gt;if v_plnnr is initial or&lt;/P&gt;&lt;P&gt;v_plnal is initial.&lt;/P&gt;&lt;P&gt;itab_xcel-bdatu = '99/99/9999'.&lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;endif.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;determine the routing group# &lt;/P&gt;&lt;P&gt;CLEAR lt_pp04_cache. &lt;/P&gt;&lt;P&gt;chk if its in the cache first, if not then get it from MAPL table &lt;/P&gt;&lt;P&gt;and put it in the cache &lt;/P&gt;&lt;P&gt;READ TABLE lt_pp04_cache WITH KEY matnr = pi_matnr &lt;/P&gt;&lt;P&gt;werks = pi_werks &lt;/P&gt;&lt;P&gt;alnag = pi_alnag. &lt;/P&gt;&lt;P&gt;IF sy-subrc = 0. &lt;/P&gt;&lt;P&gt;do nothing - lt_pp04_cache header line has rtg# &lt;/P&gt;&lt;P&gt;ELSE. &lt;/P&gt;&lt;P&gt;get the routing group # from MAPL &lt;/P&gt;&lt;P&gt;put it in the cache internal table &lt;/P&gt;&lt;P&gt;IF NOT l_mapl_plnnr IS INITIAL. &lt;/P&gt;&lt;P&gt;lt_pp04_cache-matnr = pi_matnr. &lt;/P&gt;&lt;P&gt;lt_pp04_cache-werks = pi_werks. &lt;/P&gt;&lt;P&gt;lt_pp04_cache-alnag = pi_alnag. &lt;/P&gt;&lt;P&gt;lt_pp04_cache-plnnr = l_mapl_plnnr. &lt;/P&gt;&lt;P&gt;APPEND lt_pp04_cache. &lt;/P&gt;&lt;P&gt;ENDIF. &lt;/P&gt;&lt;P&gt;ENDIF. &lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;if the rtg# was determined AND &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;the work center was not determined yet AND &lt;/P&gt;&lt;P&gt;work center was really needed for this line in the input file &lt;/P&gt;&lt;P&gt;then &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;read the work center from last PP04 operation on the routing &lt;/P&gt;&lt;P&gt;update the cache accordingly &lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;IF NOT lt_pp04_cache-plnnr IS INITIAL AND &lt;/P&gt;&lt;P&gt;lt_pp04_cache-arbpl IS INITIAL AND &lt;/P&gt;&lt;P&gt;( pi_verid IS INITIAL OR &lt;/P&gt;&lt;P&gt;pi_mdv01 IS INITIAL ). &lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;read the last PP04 operation &lt;/P&gt;&lt;P&gt;CLEAR lt_plpo. &lt;/P&gt;&lt;P&gt;REFRESH lt_plpo. &lt;/P&gt;&lt;P&gt;SELECT vornr e&lt;SUB&gt;objty e&lt;/SUB&gt;objid e~arbpl &lt;/P&gt;&lt;P&gt;INTO CORRESPONDING FIELDS OF TABLE lt_plpo &lt;/P&gt;&lt;P&gt;FROM plas AS b &lt;/P&gt;&lt;P&gt;INNER JOIN plpo AS c &lt;/P&gt;&lt;P&gt;ON b&lt;SUB&gt;plnty = c&lt;/SUB&gt;plnty AND &lt;/P&gt;&lt;P&gt;b&lt;SUB&gt;plnnr = c&lt;/SUB&gt;plnnr AND &lt;/P&gt;&lt;P&gt;b&lt;SUB&gt;zaehl = c&lt;/SUB&gt;zaehl &lt;/P&gt;&lt;P&gt;INNER JOIN crhd AS e &lt;/P&gt;&lt;P&gt;ON c&lt;SUB&gt;arbid = e&lt;/SUB&gt;objid &lt;/P&gt;&lt;P&gt;WHERE b~plnty = v_plnty AND &lt;/P&gt;&lt;P&gt;b~plnnr = lt_pp04_cache-plnnr AND &lt;/P&gt;&lt;P&gt;b~plnal = lt_pp04_cache-alnag AND &lt;/P&gt;&lt;P&gt;c~loekz = space AND &lt;/P&gt;&lt;P&gt;c~steus = v_plpo_steus AND &lt;/P&gt;&lt;P&gt;e~objty = v_objty AND &lt;/P&gt;&lt;P&gt;e~werks = lt_pp04_cache-werks AND &lt;/P&gt;&lt;P&gt;e~verwe = v_verwe. &lt;/P&gt;&lt;P&gt;SORT lt_plpo BY vornr DESCENDING. &lt;/P&gt;&lt;P&gt;READ TABLE lt_plpo INDEX 1. &lt;/P&gt;&lt;P&gt;**&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;IF NOT lt_plpo-arbpl IS INITIAL. &lt;/P&gt;&lt;P&gt;lt_pp04_cache-arbpl = lt_plpo-arbpl. &lt;/P&gt;&lt;P&gt;read work center description &lt;/P&gt;&lt;P&gt;SELECT SINGLE ktext INTO lt_pp04_cache-ktext &lt;/P&gt;&lt;P&gt;FROM crtx WHERE objty = lt_plpo-objty AND &lt;/P&gt;&lt;P&gt;objid = lt_plpo-objid AND &lt;/P&gt;&lt;P&gt;spras = sy-langu. &lt;/P&gt;&lt;P&gt;the following read will get the index of the correct record to be &lt;/P&gt;&lt;P&gt;updated in the cache &lt;/P&gt;&lt;P&gt;READ TABLE lt_pp04_cache &lt;/P&gt;&lt;P&gt;WITH KEY matnr = pi_matnr &lt;/P&gt;&lt;P&gt;werks = pi_werks &lt;/P&gt;&lt;P&gt;alnag = pi_alnag. &lt;/P&gt;&lt;P&gt;MODIFY lt_pp04_cache &lt;/P&gt;&lt;P&gt;INDEX sy-tabix &lt;/P&gt;&lt;P&gt;TRANSPORTING arbpl ktext. &lt;/P&gt;&lt;P&gt;ENDIF. &lt;/P&gt;&lt;P&gt;ENDIF. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;endform. " read_last_pp04_operation_cache&lt;/P&gt;&lt;P&gt;&amp;amp;----&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;*&amp;amp; Form read_wc_on_last_pp04&lt;/P&gt;&lt;P&gt;&amp;amp;----&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;form read_wc_on_last_pp04 using pi_plnnr&lt;/P&gt;&lt;P&gt;pi_plnal&lt;/P&gt;&lt;P&gt;changing pe_arbpl.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;data: begin of lt_plpo occurs 0,&lt;/P&gt;&lt;P&gt;vornr like plpo-vornr,&lt;/P&gt;&lt;P&gt;objty like crhd-objty,&lt;/P&gt;&lt;P&gt;objid like crhd-objid,&lt;/P&gt;&lt;P&gt;arbpl like crhd-arbpl,&lt;/P&gt;&lt;P&gt;end of lt_plpo.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;get all the PP04 operations for the given rtg# &amp;amp; grp-ctr# &lt;/P&gt;&lt;P&gt;select vornr e&lt;SUB&gt;objty e&lt;/SUB&gt;objid e~arbpl&lt;/P&gt;&lt;P&gt;into corresponding fields of table lt_plpo&lt;/P&gt;&lt;P&gt;from plas as b&lt;/P&gt;&lt;P&gt;inner join plpo as c&lt;/P&gt;&lt;P&gt;on b&lt;SUB&gt;plnty = c&lt;/SUB&gt;plnty and&lt;/P&gt;&lt;P&gt;b&lt;SUB&gt;plnnr = c&lt;/SUB&gt;plnnr and&lt;/P&gt;&lt;P&gt;b&lt;SUB&gt;zaehl = c&lt;/SUB&gt;zaehl&lt;/P&gt;&lt;P&gt;inner join crhd as e&lt;/P&gt;&lt;P&gt;on c&lt;SUB&gt;arbid = e&lt;/SUB&gt;objid&lt;/P&gt;&lt;P&gt;where b~plnty = v_plnty and "Rate Routing&lt;/P&gt;&lt;P&gt;b~plnnr = pi_plnnr and&lt;/P&gt;&lt;P&gt;b~plnal = pi_plnal and&lt;/P&gt;&lt;P&gt;c~loekz = space and "Oper Del Flag = OFF&lt;/P&gt;&lt;P&gt;c~steus = v_plpo_steus and "PP04&lt;/P&gt;&lt;P&gt;e~objty = v_objty. "WC Obj Type = 'A'&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;read the last operation &lt;/P&gt;&lt;P&gt;sort lt_plpo by vornr descending.&lt;/P&gt;&lt;P&gt;read table lt_plpo index 1.&lt;/P&gt;&lt;P&gt;pe_arbpl = lt_plpo-arbpl.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;endform. " read_wc_on_last_pp04&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Goto LSMW-&amp;gt; Select Direct Input method in 1st step. These are the standard programs for data transfer.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Otherwise goto SPRO-&amp;gt;SAP Reference IMG-&amp;gt; Under this you'll find standard data transfer programs module wise.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Reward points,&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Wed, 27 Feb 2008 09:41:51 GMT</pubDate>
      <guid>https://community.sap.com/t5/application-development-and-automation-discussions/calltr/m-p/3508167#M843817</guid>
      <dc:creator>Former Member</dc:creator>
      <dc:date>2008-02-27T09:41:51Z</dc:date>
    </item>
    <item>
      <title>Re: calltr.</title>
      <link>https://community.sap.com/t5/application-development-and-automation-discussions/calltr/m-p/3508168#M843818</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;Call trn...&lt;/P&gt;&lt;P&gt;can not be used for multiple tras..at one time.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;for multiple trn.., we have to go for session.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Reward if useful&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Wed, 27 Feb 2008 09:53:42 GMT</pubDate>
      <guid>https://community.sap.com/t5/application-development-and-automation-discussions/calltr/m-p/3508168#M843818</guid>
      <dc:creator>Former Member</dc:creator>
      <dc:date>2008-02-27T09:53:42Z</dc:date>
    </item>
  </channel>
</rss>

