BAPI_SALESORDER_CREATEFROMDAT2 BAPI创建VA01 销售订单
生活随笔
收集整理的這篇文章主要介紹了
BAPI_SALESORDER_CREATEFROMDAT2 BAPI创建VA01 销售订单
小編覺得挺不錯的,現在分享給大家,幫大家做個參考.
用bapi創建銷售訂單 VA01 用的bapi如下
關于定價,可能要多做調試,只能傳入COND_VALUE定價比率,而定價值是不可以直接修改的,
DATA:?header_in???????????? TYPE? bapisdhd1,
????????header_inx??????????? TYPE? bapisdhd1x,
????????l_vbeln?????????????? LIKE? vbak-vbeln,
????????l_message???????????? TYPE? string,
????????lt_return???????????? TYPE? TABLE? OF? bapiret2??? WITH? HEADER? LINE,
????????items_in????????????? TYPE? TABLE? OF? bapisditm?? WITH? HEADER? LINE,
????????items_inx???????????? TYPE? TABLE? OF? bapisditmx? WITH? HEADER? LINE,
????????partners????????????? TYPE? TABLE? OF? bapiparnr?? WITH? HEADER? LINE,
????????schedules_in????????? TYPE? TABLE? OF? bapischdl?? WITH? HEADER? LINE,
????????order_conditions_in?? TYPE? bapicond??? OCCURS? 0? WITH? HEADER? LINE,
????????order_conditions_inx? TYPE? bapicondx?? OCCURS? 0? WITH? HEADER? LINE,
????????logic_switch????????? TYPE? bapisdls??? OCCURS? 0? WITH? HEADER? LINE,
????????extensionin??????????? TYPE?? bapiparex?? OCCURS? 0? WITH? HEADER? LINE.
??CLEAR:?header_in,
?????????header_inx,
?????????order_conditions_in,
?????????order_conditions_inx,
?????????l_vbeln,
?????????items_in[],items_in,
?????????items_inx[],items_inx,
?????????partners[],partners,
?????????schedules_in[],schedules_in,
?????????g_exit.
*?header
??header_in-doc_type????= lt_reslut-auart.
??header_in-sales_org???=?lt_reslut-vkorg?.
??header_in-distr_chan??=?lt_reslut-vtweg.
??header_in-division????=?lt_reslut-spart.
??header_in-sales_grp???=?lt_reslut-vkgrp.
??header_in-sales_off???=?lt_reslut-vkbur.
??header_in-sd_doc_cat??=? 'C' .
??header_in-doc_date????=?sy-datum.
??header_in-purch_date??=?lt_reslut-audat.
??header_in-price_date??=?sy-datum.
??header_in-dlvschduse??=?l_abrvw.????????? "審批狀態
??header_in-ship_type???=?lt_reslut-vsart.?? "裝運類型
??header_in-s_proc_ind??=?lt_reslut-sdabw.?? "特殊標識
??header_in-pymt_meth???=?lt_reslut-zlsch.?? "付款方式
*?item
?? LOOP? AT? it_tab100.
????items_in-itm_number?=?it_tab100-posnr.
????items_in-material???=?it_tab100-matnr.
????items_in-plant??????=?it_tab100-werks.
????items_in-store_loc??=?it_tab100-lgort.
???? APPEND? items_in.
???? CLEAR? items_in.
????items_inx-itm_number??=?it_tab100-posnr.
????items_inx-material????=? 'X' .
????items_inx-plant???????=? 'X' .
????items_inx-store_loc???=? 'X' .
???? APPEND? items_inx.
???? CLEAR? items_inx.
????schedules_in-itm_number???=?it_tab100-posnr.
????schedules_in-req_qty??????=?it_tab100-kwmeng.
???? APPEND? schedules_in.
???? CLEAR? schedules_in.
????order_conditions_in-itm_number?=?it_tab100-posnr.?? "itm_number
????order_conditions_in-cond_type??=? 'Z11' .???????????? "定價條件
????order_conditions_in-cond_value?=?it_tab100-kbetr.
????order_conditions_in-currency???=?it_tab100-waerk.???? "
????order_conditions_in-cond_unit??=?it_tab100-vrkme.?? "條件單位
???? APPEND? order_conditions_in.
???? CLEAR? order_conditions_inx.
????order_conditions_inx-itm_number?=?it_tab100-posnr.
????order_conditions_inx-cond_type??=? 'Z11' .
????order_conditions_inx-cond_value?=? 'X' .
????order_conditions_inx-currency???=? 'X' .
????order_conditions_inx-cond_unit??=? 'X' .
????order_conditions_inx-cond_p_unt?=? 'X' .
???? APPEND? order_conditions_inx.
??ENDLOOP.
*?partener
??partners-partn_role?=? 'WE' .
??partners-partn_numb?=?lt_reslut-kunnr.
?? APPEND? partners.
?? CLEAR? partners.
??partners-partn_role?=? 'RE' .
??partners-partn_numb?=?lt_reslut-kunnr.
?? APPEND? partners.
?? CLEAR? partners.
??logic_switch-pricing?=? '' .
?? APPEND? logic_switch.
?? CALL? FUNCTION? 'BAPI_SALESORDER_CREATEFROMDAT2'
???? EXPORTING
*??????SALESDOCUMENTIN???????????=
??????order_header_in???????????=?header_in
??????order_header_inx??????????=?header_inx
*??????SENDER????????????????????=
*??????BINARY_RELATIONSHIPTYPE???=
*??????INT_NUMBER_ASSIGNMENT?????=
*??????BEHAVE_WHEN_ERROR?????????=
??????logic_switch??????????????=?logic_switch
???? IMPORTING
??????salesdocument?????????????=?l_vbeln
???? TABLES
?????? return???????????????????? =?lt_return
??????order_items_in????????????=?items_in
??????order_items_inx???????????=?items_inx
??????order_partners????????????=?partners
??????order_schedules_in????????=?schedules_in
??????order_conditions_in???????=?order_conditions_in
??????order_conditions_inx??????=?order_conditions_inx
??????extensionin???????????????=?extensionin.
關于定價,可能要多做調試,只能傳入COND_VALUE定價比率,而定價值是不可以直接修改的,
DATA:?header_in???????????? TYPE? bapisdhd1,
????????header_inx??????????? TYPE? bapisdhd1x,
????????l_vbeln?????????????? LIKE? vbak-vbeln,
????????l_message???????????? TYPE? string,
????????lt_return???????????? TYPE? TABLE? OF? bapiret2??? WITH? HEADER? LINE,
????????items_in????????????? TYPE? TABLE? OF? bapisditm?? WITH? HEADER? LINE,
????????items_inx???????????? TYPE? TABLE? OF? bapisditmx? WITH? HEADER? LINE,
????????partners????????????? TYPE? TABLE? OF? bapiparnr?? WITH? HEADER? LINE,
????????schedules_in????????? TYPE? TABLE? OF? bapischdl?? WITH? HEADER? LINE,
????????order_conditions_in?? TYPE? bapicond??? OCCURS? 0? WITH? HEADER? LINE,
????????order_conditions_inx? TYPE? bapicondx?? OCCURS? 0? WITH? HEADER? LINE,
????????logic_switch????????? TYPE? bapisdls??? OCCURS? 0? WITH? HEADER? LINE,
????????extensionin??????????? TYPE?? bapiparex?? OCCURS? 0? WITH? HEADER? LINE.
??CLEAR:?header_in,
?????????header_inx,
?????????order_conditions_in,
?????????order_conditions_inx,
?????????l_vbeln,
?????????items_in[],items_in,
?????????items_inx[],items_inx,
?????????partners[],partners,
?????????schedules_in[],schedules_in,
?????????g_exit.
*?header
??header_in-doc_type????= lt_reslut-auart.
??header_in-sales_org???=?lt_reslut-vkorg?.
??header_in-distr_chan??=?lt_reslut-vtweg.
??header_in-division????=?lt_reslut-spart.
??header_in-sales_grp???=?lt_reslut-vkgrp.
??header_in-sales_off???=?lt_reslut-vkbur.
??header_in-sd_doc_cat??=? 'C' .
??header_in-doc_date????=?sy-datum.
??header_in-purch_date??=?lt_reslut-audat.
??header_in-price_date??=?sy-datum.
??header_in-dlvschduse??=?l_abrvw.????????? "審批狀態
??header_in-ship_type???=?lt_reslut-vsart.?? "裝運類型
??header_in-s_proc_ind??=?lt_reslut-sdabw.?? "特殊標識
??header_in-pymt_meth???=?lt_reslut-zlsch.?? "付款方式
*?item
?? LOOP? AT? it_tab100.
????items_in-itm_number?=?it_tab100-posnr.
????items_in-material???=?it_tab100-matnr.
????items_in-plant??????=?it_tab100-werks.
????items_in-store_loc??=?it_tab100-lgort.
???? APPEND? items_in.
???? CLEAR? items_in.
????items_inx-itm_number??=?it_tab100-posnr.
????items_inx-material????=? 'X' .
????items_inx-plant???????=? 'X' .
????items_inx-store_loc???=? 'X' .
???? APPEND? items_inx.
???? CLEAR? items_inx.
????schedules_in-itm_number???=?it_tab100-posnr.
????schedules_in-req_qty??????=?it_tab100-kwmeng.
???? APPEND? schedules_in.
???? CLEAR? schedules_in.
????order_conditions_in-itm_number?=?it_tab100-posnr.?? "itm_number
????order_conditions_in-cond_type??=? 'Z11' .???????????? "定價條件
????order_conditions_in-cond_value?=?it_tab100-kbetr.
????order_conditions_in-currency???=?it_tab100-waerk.???? "
????order_conditions_in-cond_unit??=?it_tab100-vrkme.?? "條件單位
???? APPEND? order_conditions_in.
???? CLEAR? order_conditions_inx.
????order_conditions_inx-itm_number?=?it_tab100-posnr.
????order_conditions_inx-cond_type??=? 'Z11' .
????order_conditions_inx-cond_value?=? 'X' .
????order_conditions_inx-currency???=? 'X' .
????order_conditions_inx-cond_unit??=? 'X' .
????order_conditions_inx-cond_p_unt?=? 'X' .
???? APPEND? order_conditions_inx.
??ENDLOOP.
*?partener
??partners-partn_role?=? 'WE' .
??partners-partn_numb?=?lt_reslut-kunnr.
?? APPEND? partners.
?? CLEAR? partners.
??partners-partn_role?=? 'RE' .
??partners-partn_numb?=?lt_reslut-kunnr.
?? APPEND? partners.
?? CLEAR? partners.
??logic_switch-pricing?=? '' .
?? APPEND? logic_switch.
?? CALL? FUNCTION? 'BAPI_SALESORDER_CREATEFROMDAT2'
???? EXPORTING
*??????SALESDOCUMENTIN???????????=
??????order_header_in???????????=?header_in
??????order_header_inx??????????=?header_inx
*??????SENDER????????????????????=
*??????BINARY_RELATIONSHIPTYPE???=
*??????INT_NUMBER_ASSIGNMENT?????=
*??????BEHAVE_WHEN_ERROR?????????=
??????logic_switch??????????????=?logic_switch
???? IMPORTING
??????salesdocument?????????????=?l_vbeln
???? TABLES
?????? return???????????????????? =?lt_return
??????order_items_in????????????=?items_in
??????order_items_inx???????????=?items_inx
??????order_partners????????????=?partners
??????order_schedules_in????????=?schedules_in
??????order_conditions_in???????=?order_conditions_in
??????order_conditions_inx??????=?order_conditions_inx
??????extensionin???????????????=?extensionin.
總結
以上是生活随笔為你收集整理的BAPI_SALESORDER_CREATEFROMDAT2 BAPI创建VA01 销售订单的全部內容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: SAP SF打印次数统计
- 下一篇: 批量生成销售订单、退货订单