<?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: BAPI_PO_CREATE1 error in Application Development and Automation Discussions</title>
    <link>https://community.sap.com/t5/application-development-and-automation-discussions/bapi-po-create1-error/m-p/1545256#M248019</link>
    <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;HI,&lt;/P&gt;&lt;P&gt;See the below program, this may help you&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;PRE&gt;&lt;CODE&gt;*&amp;amp;---------------------------------------------------------------------* 

REPORT ZBAPI_CREATE_PO . 

*&amp;amp;---------------------------------------------------------------------* 

*DATA DECLARATION 

CONSTANTS : C_X VALUE 'X'. 

*Structures to hold PO header data 

DATA : HEADER LIKE BAPIMEPOHEADER , 

HEADERX LIKE BAPIMEPOHEADERX . 

*Structures to hold PO account data 

DATA : ACCOUNT LIKE BAPIMEPOACCOUNT OCCURS 0 WITH HEADER LINE , 

ACCOUNTX LIKE BAPIMEPOACCOUNTX OCCURS 0 WITH HEADER LINE . 

*Structures to hold PO schedule data 

DATA : ITEMSCHEDULE LIKE BAPIMEPOSCHEDULE OCCURS 0 WITH HEADER LINE , 

ITEMSCHEDULEX LIKE BAPIMEPOSCHEDULX OCCURS 0 WITH HEADER LINE . 

*Structures to hold PO services data 

DATA : SERVICES LIKE BAPIESLLC OCCURS 0 WITH HEADER LINE . 



*Internal Tables to hold PO ITEM DATA 

DATA : ITEM LIKE BAPIMEPOITEM OCCURS 0 WITH HEADER LINE, 

ITEMX LIKE BAPIMEPOITEMX OCCURS 0 WITH HEADER LINE, 

*Internal table to hold messages from BAPI call 

RETURN LIKE BAPIRET2 OCCURS 0 WITH HEADER LINE. 

data : w_header(40) value 'PO Header', 

PURCHASEORDER LIKE BAPIMEPOHEADER-PO_NUMBER, 

DELIVERY_DATE LIKE BAPIMEPOSCHEDULE-DELIVERY_DATE. 

data : ws_langu like sy-langu. 

*text-001 = 'PO Header' - define as text element 

selection-screen begin of block b1 with frame title text-001. 

parameters : company like header-comp_code default '1000' , 

doctyp like HEADER-DOC_TYPE default 'PM' , 

cdate like HEADER-CREAT_DATE default sy-datum , 

vendor like HEADER-VENDOR default '100006' , 

pur_org like HEADER-PURCH_ORG default '1000' , 

pur_grp like HEADER-PUR_GROUP default '850' , 

sociedad like HEADER-COMP_CODE default '1000' , 

vendedor like HEADER-SALES_PERS default 'Wilda Messina'. 



selection-screen end of block b1. 

selection-screen begin of block b2 with frame title text-002. 

parameters : item_num like ITEM-PO_ITEM default '00010', 

material like ITEM-MATERIAL default 'CRANE' , 

tipo_imp like ITEM-ACCTASSCAT default 'K' , 

pos_doc like ITEM-ITEM_CAT default 'F' , 

shorttxt like ITEM-SHORT_TEXT default 'PRUEBA BAPI' , 

grup_art like ITEM-MATL_GROUP default '350001' , 

plant like ITEM-PLANT default '1000' , 

mpe like ITEM-TRACKINGNO default '9999' , 

contrato like ITEM-AGREEMENT default '4904000003' , 

quantity like ITEM-QUANTITY default 1 . 

* po_unit like ITEM-PO_UNIT default 'UP'. 

selection-screen end of block b2. 

* Parámnetros para los servicios 

selection-screen begin of block b3 with frame title text-003. 

parameters : paquete like SERVICES-PCKG_NO default '956', 

numlinin like SERVICES-LINE_NO default '0000000009' , 

numlinea like SERVICES-EXT_LINE default '10', 

service like SERVICES-SERVICE default '8010', 

srv_cant like SERVICES-quantity default '5' , 

precio like SERVICES-GR_PRICE default '300' , 

impuesto like SERVICES-TAX_CODE default 'i2' . 

selection-screen end of block b3. 

* Parámnetros de imputación 

selection-screen begin of block b4 with frame title text-004. 

parameters : centro like ACCOUNT-COSTCENTER default '120100', 

cuenta like ACCOUNT-GL_ACCOUNT default '6301002000' , 

num_pos like ACCOUNT-PO_ITEM default '10' , 

serial like ACCOUNT-SERIAL_NO default '10' , 

ind_imp like ACCOUNT-TAX_CODE default 'I2' . 

selection-screen end of block b4. 



*&amp;amp;---------------------------------------------------------------------* 

START-OF-SELECTION. 

*&amp;amp;---------------------------------------------------------------------* 

*DATA POPULATION 

*&amp;amp;---------------------------------------------------------------------* 

ws_langu = sy-langu. "Language variable 

*POPULATE HEADER DATA FOR PO 

HEADER-COMP_CODE = sociedad . 

HEADER-DOC_TYPE = doctyp . 

HEADER-VENDOR = vendor . 

HEADER-CREAT_DATE = cdate . 

HEADER-CREATED_BY = 'TD17191' . 

HEADER-PURCH_ORG = pur_org . 

HEADER-PUR_GROUP = pur_grp . 

HEADER-COMP_CODE = company . 

HEADER-LANGU = ws_langu . 

HEADER-SALES_PERS = vendedor . 

HEADER-CURRENCY = 'DOP' . 

*HEADER-ITEM_INTVL = 10 . 

*HEADER-PMNTTRMS = 'N30' . 

*HEADER-EXCH_RATE = 1 . 



*&amp;amp;---------------------------------------------------------------------* 

*POPULATE HEADER FLAG. 

*&amp;amp;---------------------------------------------------------------------* 

HEADERX-comp_code = c_x. 

HEADERX-doc_type = c_x. 

HEADERX-vendor = c_x. 

HEADERX-creat_date = c_x. 

HEADERX-created_by = c_x. 

HEADERX-purch_org = c_x. 

HEADERX-pur_group = c_x. 

HEADERX-langu = c_x. 

HEADERX-sales_pers = c_x. 

HEADER-CURRENCY = c_x. 

*HEADER-ITEM_INTVL = c_x. 

*HEADER-PMNTTRMS = c_x. 

*HEADER-EXCH_RATE = c_x. 

*HEADER-EXCH_RATE = c_x. 

*&amp;amp;---------------------------------------------------------------------* 

*POPULATE ITEM DATA. 

*&amp;amp;---------------------------------------------------------------------* 

ITEM-PO_ITEM = item_num . 

*ITEM-MATERIAL = material . 

ITEM-SHORT_TEXT = shorttxt . 

ITEM-TAX_CODE = 'I2'. 

ITEM-ACCTASSCAT = tipo_imp . 

ITEM-ITEM_CAT = pos_doc . 

ITEM-MATL_GROUP = grup_art . 

ITEM-PLANT = plant . 

ITEM-TRACKINGNO = mpe . 

ITEM-AGREEMENT = contrato . 

ITEM-AGMT_ITEM = '10' . 

*ITEM-QUANTITY = quantity . 

*ITEM-PO_UNIT = po_unit . 

APPEND ITEM. CLEAR ITEM. 

*&amp;amp;---------------------------------------------------------------------* 

*POPULATE ITEM FLAG TABLE 

*&amp;amp;---------------------------------------------------------------------* 

ITEMX-PO_ITEM = item_num. 

ITEMX-PO_ITEMX = c_x. 

*ITEMX-MATERIAL = C_X. 

ITEMX-SHORT_TEXT = C_X. 

ITEMX-TAX_CODE = C_X. 

ITEMX-ACCTASSCAT = C_X. 

ITEMX-ITEM_CAT = c_x. 

ITEMX-MATL_GROUP = C_X. 

ITEMX-PLANT = C_X. 

ITEMX-TRACKINGNO = C_X. 

ITEMX-AGREEMENT = C_X. 

ITEMX-AGMT_ITEM = c_x. 

ITEMX-STGE_LOC = C_X. 

*ITEMX-QUANTITY = C_X. 

*ITEMX-PO_UNIT = C_X. 

APPEND ITEMX. CLEAR ITEMX. 

*&amp;amp;---------------------------------------------------------------------* 

*POPULATE ITEM SCHEDULE DATA. 

*&amp;amp;---------------------------------------------------------------------* 

ITEMSCHEDULE-PO_ITEM = '00010'. 

*ITEMSCHEDULE-DELIVERY_DATE = '08/04/2005'. "sy-datum . 

*ITEM_SCHEDULE-QUANTITY = '1'. "ITDETALLE-CANTIDAD. 

APPEND ITEMSCHEDULE. 

CLEAR ITEMSCHEDULE. 

*&amp;amp;---------------------------------------------------------------------* 

*POPULATE ITEM FLAG FOR SCHEDULE TABLE. 

*&amp;amp;---------------------------------------------------------------------* 

ITEMSCHEDULEX-PO_ITEM = '10'. 

ITEMSCHEDULEX-PO_ITEMX = c_x . 

ITEMSCHEDULEX-DELIVERY_DATE = c_x . 

*ITEMSCHEDULEX-QUANTITY = '1' . "ITDETALLE-CANTIDAD. 

APPEND ITEMSCHEDULEX. 

CLEAR ITEMSCHEDULEX. 



*&amp;amp;---------------------------------------------------------------------* 

*POPULATE ACCOUNT DATA. 

*&amp;amp;---------------------------------------------------------------------* 

ACCOUNT-PO_ITEM = '10' . 

ACCOUNT-SERIAL_NO = serial . 

ACCOUNT-CREAT_DATE = sy-datum . 

ACCOUNT-COSTCENTER = centro . 

ACCOUNT-GL_ACCOUNT = cuenta . 

ACCOUNT-CO_AREA = '1000' . 

ACCOUNT-TAX_CODE = 'I2' . 

APPEND ACCOUNT. CLEAR ACCOUNT. 

*&amp;amp;---------------------------------------------------------------------* 

*POPULATE ACCOUNT FLAG TABLE. 

*&amp;amp;---------------------------------------------------------------------* 

ACCOUNTX-PO_ITEM = '10' . 

ACCOUNTX-PO_ITEMX = c_x . 

ACCOUNTX-SERIAL_NO = serial . 

ACCOUNTX-SERIAL_NOX = c_x . 

ACCOUNTX-CREAT_DATE = c_x . 

ACCOUNTX-COSTCENTER = c_x . 

ACCOUNTX-GL_ACCOUNT = c_x . 

ACCOUNTX-CO_AREA = c_x . 

ACCOUNTX-TAX_CODE = c_x . 

APPEND ACCOUNTX. CLEAR ACCOUNTX. 



*&amp;amp;---------------------------------------------------------------------* 

*POPULATE SERVICES DATA. 

*&amp;amp;---------------------------------------------------------------------* 

SERVICES-PCKG_NO = paquete . 

*SERVICES-LINE_NO = numlinin . 

SERVICES-EXT_LINE = numlinea . 

SERVICES-SERVICE = service . 

SERVICES-QUANTITY = srv_cant . 

SERVICES-GR_PRICE = precio . 

SERVICES-TAX_CODE = impuesto . 

APPEND SERVICES. CLEAR SERVICES . 



*&amp;amp;---------------------------------------------------------------------* 

*BAPI CALL 

*&amp;amp;---------------------------------------------------------------------* 

CALL FUNCTION 'BAPI_PO_CREATE1' 

EXPORTING 

POHEADER = HEADER 

POHEADERX = HEADERX 

* POADDRVENDOR = 

* TESTRUN = 

IMPORTING 

EXPPURCHASEORDER = PURCHASEORDER 

* EXPHEADER = 

* EXPPOEXPIMPHEADER = 

TABLES 

RETURN = RETURN 

POITEM = ITEM 

POITEMX = ITEMX 

POSCHEDULE = ITEMSCHEDULE 

POSCHEDULEX = ITEMSCHEDULEX 

POACCOUNT = ACCOUNT 

POACCOUNTX = ACCOUNTX 

POSERVICES = SERVICES. 

*&amp;amp;---------------------------------------------------------------------* 

*Confirm the document creation by calling database COMMIT 

*&amp;amp;---------------------------------------------------------------------* 

CALL FUNCTION 'BAPI_TRANSACTION_COMMIT' 

EXPORTING 

WAIT = 'X' 

* IMPORTING 

* RETURN = 

. 

end-of-selection. 

*&amp;amp;---------------------------------------------------------------------* 

*Output the messages returned from BAPI call 

*&amp;amp;---------------------------------------------------------------------* 

LOOP AT RETURN. 

WRITE / RETURN-MESSAGE. 

ENDLOOP. 
&lt;/CODE&gt;&lt;/PRE&gt;&lt;P&gt;see the below link for a blog which explains about this BAPI with an example&lt;/P&gt;&lt;P&gt;/people/sap.user72/blog/2005/03/22/sample-code-to-create-purchase-order-using-bapi-in-r3&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;mark all the helpful answers&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Regards&lt;/P&gt;&lt;P&gt;Sudheer&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
    <pubDate>Sun, 03 Sep 2006 06:16:34 GMT</pubDate>
    <dc:creator>Former Member</dc:creator>
    <dc:date>2006-09-03T06:16:34Z</dc:date>
    <item>
      <title>BAPI_PO_CREATE1 error</title>
      <link>https://community.sap.com/t5/application-development-and-automation-discussions/bapi-po-create1-error/m-p/1545255#M248018</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;Hi Guru's,&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;   I am encountering problems using BAPI_PO_CREATE1. For background history, my company is transfering from BAPI_PO_CREATE to BAPI_PO_CREATE1. Most of the existing functionalities are working fine with the transition except a few. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;   One of the errors that i encountered was an error message  stating "For items without invoice receipt, please enter price 0". Using the old bapi i didnt hit this problem even though the data that is passed to the old and new BAPI is same. &lt;/P&gt;&lt;P&gt;   Another error that I got was "Error on Currency rate" which I didnt encounter using the old BAPI as well. I have debugged both issues and the values that are passed into the BAPI for old and new are the same. &lt;/P&gt;&lt;P&gt;   Hope you guys can help me out with this. Thanks in advance.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Anand&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Sun, 03 Sep 2006 05:31:26 GMT</pubDate>
      <guid>https://community.sap.com/t5/application-development-and-automation-discussions/bapi-po-create1-error/m-p/1545255#M248018</guid>
      <dc:creator>Former Member</dc:creator>
      <dc:date>2006-09-03T05:31:26Z</dc:date>
    </item>
    <item>
      <title>Re: BAPI_PO_CREATE1 error</title>
      <link>https://community.sap.com/t5/application-development-and-automation-discussions/bapi-po-create1-error/m-p/1545256#M248019</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;HI,&lt;/P&gt;&lt;P&gt;See the below program, this may help you&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;PRE&gt;&lt;CODE&gt;*&amp;amp;---------------------------------------------------------------------* 

REPORT ZBAPI_CREATE_PO . 

*&amp;amp;---------------------------------------------------------------------* 

*DATA DECLARATION 

CONSTANTS : C_X VALUE 'X'. 

*Structures to hold PO header data 

DATA : HEADER LIKE BAPIMEPOHEADER , 

HEADERX LIKE BAPIMEPOHEADERX . 

*Structures to hold PO account data 

DATA : ACCOUNT LIKE BAPIMEPOACCOUNT OCCURS 0 WITH HEADER LINE , 

ACCOUNTX LIKE BAPIMEPOACCOUNTX OCCURS 0 WITH HEADER LINE . 

*Structures to hold PO schedule data 

DATA : ITEMSCHEDULE LIKE BAPIMEPOSCHEDULE OCCURS 0 WITH HEADER LINE , 

ITEMSCHEDULEX LIKE BAPIMEPOSCHEDULX OCCURS 0 WITH HEADER LINE . 

*Structures to hold PO services data 

DATA : SERVICES LIKE BAPIESLLC OCCURS 0 WITH HEADER LINE . 



*Internal Tables to hold PO ITEM DATA 

DATA : ITEM LIKE BAPIMEPOITEM OCCURS 0 WITH HEADER LINE, 

ITEMX LIKE BAPIMEPOITEMX OCCURS 0 WITH HEADER LINE, 

*Internal table to hold messages from BAPI call 

RETURN LIKE BAPIRET2 OCCURS 0 WITH HEADER LINE. 

data : w_header(40) value 'PO Header', 

PURCHASEORDER LIKE BAPIMEPOHEADER-PO_NUMBER, 

DELIVERY_DATE LIKE BAPIMEPOSCHEDULE-DELIVERY_DATE. 

data : ws_langu like sy-langu. 

*text-001 = 'PO Header' - define as text element 

selection-screen begin of block b1 with frame title text-001. 

parameters : company like header-comp_code default '1000' , 

doctyp like HEADER-DOC_TYPE default 'PM' , 

cdate like HEADER-CREAT_DATE default sy-datum , 

vendor like HEADER-VENDOR default '100006' , 

pur_org like HEADER-PURCH_ORG default '1000' , 

pur_grp like HEADER-PUR_GROUP default '850' , 

sociedad like HEADER-COMP_CODE default '1000' , 

vendedor like HEADER-SALES_PERS default 'Wilda Messina'. 



selection-screen end of block b1. 

selection-screen begin of block b2 with frame title text-002. 

parameters : item_num like ITEM-PO_ITEM default '00010', 

material like ITEM-MATERIAL default 'CRANE' , 

tipo_imp like ITEM-ACCTASSCAT default 'K' , 

pos_doc like ITEM-ITEM_CAT default 'F' , 

shorttxt like ITEM-SHORT_TEXT default 'PRUEBA BAPI' , 

grup_art like ITEM-MATL_GROUP default '350001' , 

plant like ITEM-PLANT default '1000' , 

mpe like ITEM-TRACKINGNO default '9999' , 

contrato like ITEM-AGREEMENT default '4904000003' , 

quantity like ITEM-QUANTITY default 1 . 

* po_unit like ITEM-PO_UNIT default 'UP'. 

selection-screen end of block b2. 

* Parámnetros para los servicios 

selection-screen begin of block b3 with frame title text-003. 

parameters : paquete like SERVICES-PCKG_NO default '956', 

numlinin like SERVICES-LINE_NO default '0000000009' , 

numlinea like SERVICES-EXT_LINE default '10', 

service like SERVICES-SERVICE default '8010', 

srv_cant like SERVICES-quantity default '5' , 

precio like SERVICES-GR_PRICE default '300' , 

impuesto like SERVICES-TAX_CODE default 'i2' . 

selection-screen end of block b3. 

* Parámnetros de imputación 

selection-screen begin of block b4 with frame title text-004. 

parameters : centro like ACCOUNT-COSTCENTER default '120100', 

cuenta like ACCOUNT-GL_ACCOUNT default '6301002000' , 

num_pos like ACCOUNT-PO_ITEM default '10' , 

serial like ACCOUNT-SERIAL_NO default '10' , 

ind_imp like ACCOUNT-TAX_CODE default 'I2' . 

selection-screen end of block b4. 



*&amp;amp;---------------------------------------------------------------------* 

START-OF-SELECTION. 

*&amp;amp;---------------------------------------------------------------------* 

*DATA POPULATION 

*&amp;amp;---------------------------------------------------------------------* 

ws_langu = sy-langu. "Language variable 

*POPULATE HEADER DATA FOR PO 

HEADER-COMP_CODE = sociedad . 

HEADER-DOC_TYPE = doctyp . 

HEADER-VENDOR = vendor . 

HEADER-CREAT_DATE = cdate . 

HEADER-CREATED_BY = 'TD17191' . 

HEADER-PURCH_ORG = pur_org . 

HEADER-PUR_GROUP = pur_grp . 

HEADER-COMP_CODE = company . 

HEADER-LANGU = ws_langu . 

HEADER-SALES_PERS = vendedor . 

HEADER-CURRENCY = 'DOP' . 

*HEADER-ITEM_INTVL = 10 . 

*HEADER-PMNTTRMS = 'N30' . 

*HEADER-EXCH_RATE = 1 . 



*&amp;amp;---------------------------------------------------------------------* 

*POPULATE HEADER FLAG. 

*&amp;amp;---------------------------------------------------------------------* 

HEADERX-comp_code = c_x. 

HEADERX-doc_type = c_x. 

HEADERX-vendor = c_x. 

HEADERX-creat_date = c_x. 

HEADERX-created_by = c_x. 

HEADERX-purch_org = c_x. 

HEADERX-pur_group = c_x. 

HEADERX-langu = c_x. 

HEADERX-sales_pers = c_x. 

HEADER-CURRENCY = c_x. 

*HEADER-ITEM_INTVL = c_x. 

*HEADER-PMNTTRMS = c_x. 

*HEADER-EXCH_RATE = c_x. 

*HEADER-EXCH_RATE = c_x. 

*&amp;amp;---------------------------------------------------------------------* 

*POPULATE ITEM DATA. 

*&amp;amp;---------------------------------------------------------------------* 

ITEM-PO_ITEM = item_num . 

*ITEM-MATERIAL = material . 

ITEM-SHORT_TEXT = shorttxt . 

ITEM-TAX_CODE = 'I2'. 

ITEM-ACCTASSCAT = tipo_imp . 

ITEM-ITEM_CAT = pos_doc . 

ITEM-MATL_GROUP = grup_art . 

ITEM-PLANT = plant . 

ITEM-TRACKINGNO = mpe . 

ITEM-AGREEMENT = contrato . 

ITEM-AGMT_ITEM = '10' . 

*ITEM-QUANTITY = quantity . 

*ITEM-PO_UNIT = po_unit . 

APPEND ITEM. CLEAR ITEM. 

*&amp;amp;---------------------------------------------------------------------* 

*POPULATE ITEM FLAG TABLE 

*&amp;amp;---------------------------------------------------------------------* 

ITEMX-PO_ITEM = item_num. 

ITEMX-PO_ITEMX = c_x. 

*ITEMX-MATERIAL = C_X. 

ITEMX-SHORT_TEXT = C_X. 

ITEMX-TAX_CODE = C_X. 

ITEMX-ACCTASSCAT = C_X. 

ITEMX-ITEM_CAT = c_x. 

ITEMX-MATL_GROUP = C_X. 

ITEMX-PLANT = C_X. 

ITEMX-TRACKINGNO = C_X. 

ITEMX-AGREEMENT = C_X. 

ITEMX-AGMT_ITEM = c_x. 

ITEMX-STGE_LOC = C_X. 

*ITEMX-QUANTITY = C_X. 

*ITEMX-PO_UNIT = C_X. 

APPEND ITEMX. CLEAR ITEMX. 

*&amp;amp;---------------------------------------------------------------------* 

*POPULATE ITEM SCHEDULE DATA. 

*&amp;amp;---------------------------------------------------------------------* 

ITEMSCHEDULE-PO_ITEM = '00010'. 

*ITEMSCHEDULE-DELIVERY_DATE = '08/04/2005'. "sy-datum . 

*ITEM_SCHEDULE-QUANTITY = '1'. "ITDETALLE-CANTIDAD. 

APPEND ITEMSCHEDULE. 

CLEAR ITEMSCHEDULE. 

*&amp;amp;---------------------------------------------------------------------* 

*POPULATE ITEM FLAG FOR SCHEDULE TABLE. 

*&amp;amp;---------------------------------------------------------------------* 

ITEMSCHEDULEX-PO_ITEM = '10'. 

ITEMSCHEDULEX-PO_ITEMX = c_x . 

ITEMSCHEDULEX-DELIVERY_DATE = c_x . 

*ITEMSCHEDULEX-QUANTITY = '1' . "ITDETALLE-CANTIDAD. 

APPEND ITEMSCHEDULEX. 

CLEAR ITEMSCHEDULEX. 



*&amp;amp;---------------------------------------------------------------------* 

*POPULATE ACCOUNT DATA. 

*&amp;amp;---------------------------------------------------------------------* 

ACCOUNT-PO_ITEM = '10' . 

ACCOUNT-SERIAL_NO = serial . 

ACCOUNT-CREAT_DATE = sy-datum . 

ACCOUNT-COSTCENTER = centro . 

ACCOUNT-GL_ACCOUNT = cuenta . 

ACCOUNT-CO_AREA = '1000' . 

ACCOUNT-TAX_CODE = 'I2' . 

APPEND ACCOUNT. CLEAR ACCOUNT. 

*&amp;amp;---------------------------------------------------------------------* 

*POPULATE ACCOUNT FLAG TABLE. 

*&amp;amp;---------------------------------------------------------------------* 

ACCOUNTX-PO_ITEM = '10' . 

ACCOUNTX-PO_ITEMX = c_x . 

ACCOUNTX-SERIAL_NO = serial . 

ACCOUNTX-SERIAL_NOX = c_x . 

ACCOUNTX-CREAT_DATE = c_x . 

ACCOUNTX-COSTCENTER = c_x . 

ACCOUNTX-GL_ACCOUNT = c_x . 

ACCOUNTX-CO_AREA = c_x . 

ACCOUNTX-TAX_CODE = c_x . 

APPEND ACCOUNTX. CLEAR ACCOUNTX. 



*&amp;amp;---------------------------------------------------------------------* 

*POPULATE SERVICES DATA. 

*&amp;amp;---------------------------------------------------------------------* 

SERVICES-PCKG_NO = paquete . 

*SERVICES-LINE_NO = numlinin . 

SERVICES-EXT_LINE = numlinea . 

SERVICES-SERVICE = service . 

SERVICES-QUANTITY = srv_cant . 

SERVICES-GR_PRICE = precio . 

SERVICES-TAX_CODE = impuesto . 

APPEND SERVICES. CLEAR SERVICES . 



*&amp;amp;---------------------------------------------------------------------* 

*BAPI CALL 

*&amp;amp;---------------------------------------------------------------------* 

CALL FUNCTION 'BAPI_PO_CREATE1' 

EXPORTING 

POHEADER = HEADER 

POHEADERX = HEADERX 

* POADDRVENDOR = 

* TESTRUN = 

IMPORTING 

EXPPURCHASEORDER = PURCHASEORDER 

* EXPHEADER = 

* EXPPOEXPIMPHEADER = 

TABLES 

RETURN = RETURN 

POITEM = ITEM 

POITEMX = ITEMX 

POSCHEDULE = ITEMSCHEDULE 

POSCHEDULEX = ITEMSCHEDULEX 

POACCOUNT = ACCOUNT 

POACCOUNTX = ACCOUNTX 

POSERVICES = SERVICES. 

*&amp;amp;---------------------------------------------------------------------* 

*Confirm the document creation by calling database COMMIT 

*&amp;amp;---------------------------------------------------------------------* 

CALL FUNCTION 'BAPI_TRANSACTION_COMMIT' 

EXPORTING 

WAIT = 'X' 

* IMPORTING 

* RETURN = 

. 

end-of-selection. 

*&amp;amp;---------------------------------------------------------------------* 

*Output the messages returned from BAPI call 

*&amp;amp;---------------------------------------------------------------------* 

LOOP AT RETURN. 

WRITE / RETURN-MESSAGE. 

ENDLOOP. 
&lt;/CODE&gt;&lt;/PRE&gt;&lt;P&gt;see the below link for a blog which explains about this BAPI with an example&lt;/P&gt;&lt;P&gt;/people/sap.user72/blog/2005/03/22/sample-code-to-create-purchase-order-using-bapi-in-r3&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;mark all the helpful answers&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Regards&lt;/P&gt;&lt;P&gt;Sudheer&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Sun, 03 Sep 2006 06:16:34 GMT</pubDate>
      <guid>https://community.sap.com/t5/application-development-and-automation-discussions/bapi-po-create1-error/m-p/1545256#M248019</guid>
      <dc:creator>Former Member</dc:creator>
      <dc:date>2006-09-03T06:16:34Z</dc:date>
    </item>
  </channel>
</rss>

