BAPI_QUOTATION_CREATEFROMDATA2 + 创建quotation + change quotation

  • yangjulei

    2015-04-17 15:36:43
  • 数据库开发技术
  • 原创
通过bapi创建报价单，细节就不说明了，根据自己需要的字段来绑定内表数据。

说明一：item数量设定必须要同时使用schedule line 内表。
说明二：condition value更新，必须要设定logic_switch-cond_handl = 'X'.

附上源代码：

点击(此处)折叠或打开

  1. REPORT zaiolos_bapi_quotation.

  3. DATA : quotation_header_in LIKE bapisdhd1,
  4.        logic_switch LIKE bapisdls,
  5.        quotation_header_inx LIKE bapisdhd1x.

  7. DATA : quotation_partners LIKE TABLE OF bapiparnr WITH HEADER LINE.
  8. DATA : quotation_items_in     LIKE TABLE OF    bapisditm WITH HEADER LINE,
  9.        quotation_items_inx LIKE TABLE OF bapisditmx WITH HEADER LINE,
  10.        quotation_conditions_in LIKE TABLE OF bapicond WITH HEADER LINE,
  11.        quotation_conditions_inx    LIKE TABLE OF    bapicondx WITH HEADER LINE.
  12. DATA : quotation_schedules_in     LIKE TABLE OF    bapischdl WITH HEADER LINE,
  13.        quotation_schedules_inx LIKE TABLE OF bapischdlx WITH HEADER LINE.

  15. logic_switch-cond_handl = \'X\'.
  16. quotation_header_in-purch_no_c = \'julei test po\'. \"Customer Ref No. 用户询价号
  17. quotation_header_in-purch_date = \'20150417\'.\"EnquiryDate-询价日期
  18. quotation_header_in-dun_date = \'20150415\'.\"PreDate-报价准备日期
  19. quotation_header_in-doc_date = \'20150416\'.\"Document date报价日期
  20. quotation_header_in-currency = \'CNY\'. \"Currency-报价币制
  21. quotation_header_in-incoterms1 = \'CN\'. \"Inco Term-国贸条款1
  22. quotation_header_in-incoterms2 = \'julei test\'. \"Inco Term-国贸条款2
  23. quotation_header_in-qt_valid_f = \'20150417\'. \"Quotation Valid from-报价有效期起
  24. quotation_header_in-qt_valid_t = \'20150430\'. \"Quotation Valid to-报价有效期止
  25. quotation_header_in-created_by = sy-uname. \"ABB contact
  26. quotation_header_in-ref_1 = \'REF \'. \"ABB Sales
  27. quotation_header_in-sales_org = \'1000\'. \"Sales Organization
  28. quotation_header_in-distr_chan = \'10\'. \"Distribution Channel
  29. quotation_header_in-division = \'A1\'. \"Division
  30. quotation_header_in-doc_type = \'ZQT\'. \"Sales Document Type
  31. quotation_header_in-pmnttrms = \'0001\'. \"Payment Terms付款条款

  33. CLEAR quotation_partners.
  34. quotation_partners-partn_role = \'AG\'.
  35. quotation_partners-partn_numb = \'0003000051\'.
  36. APPEND quotation_partners.

  38. quotation_partners-partn_role = \'YN\'.
  39. quotation_partners-partn_numb = \'0003000051\'.
  40. APPEND quotation_partners.


  43. quotation_items_in-itm_number = \'000010\'.
  44. quotation_items_in-material = \'3VCN-1861\'.
  45. quotation_items_in-plant = \'1015\'.
  46. quotation_items_in-short_text = \'金属软管(光纤)(1500，1英寸)\'.
  47. quotation_items_in-target_qty = 1.
  48. APPEND quotation_items_in.


  51. quotation_items_inx-itm_number = \'000010\'.
  52. quotation_items_inx-material = \'X\'.
  53. quotation_items_inx-updateflag = \'I\'.
  54. quotation_items_inx-plant = \'X\'.
  55. quotation_items_inx-short_text = \'X\'.
  56. quotation_items_inx-target_qty = \'X\'.
  57. APPEND quotation_items_inx.


  60. quotation_conditions_in-itm_number = \'000010\'.
  61. quotation_conditions_in-cond_type = \'PR00\'.
  62. quotation_conditions_in-cond_value = 10.
  63. quotation_conditions_in-currency = \'CNY\'.
  64. APPEND quotation_conditions_in.

  66. quotation_conditions_inx-itm_number = \'000010\'.
  67. quotation_conditions_inx-cond_type = \'PR00\'.
  68. quotation_conditions_inx-updateflag = \'I\'.
  69. quotation_conditions_inx-cond_value = \'X\'.
  70. APPEND quotation_conditions_inx.


  73. quotation_schedules_in-itm_number = \'000010\'.
  74. quotation_schedules_in-req_qty = 1.
  75. quotation_schedules_in-sched_line = 1.

  77. APPEND quotation_schedules_in.

  79. quotation_schedules_inx-itm_number = \'000010\'.
  80. quotation_schedules_inx-req_qty = \'X\'.
  81. quotation_schedules_inx-updateflag = \'I\'.
  82. quotation_schedules_inx-sched_line = 1.



  86. DATA : salesdocument LIKE bapivbeln-vbeln.
  87. DATA : return    LIKE TABLE OF    bapiret2 WITH HEADER LINE.


  90. CALL FUNCTION \'BAPI_QUOTATION_CREATEFROMDATA2\'
  91.   EXPORTING
  92. * SALESDOCUMENTIN =
  93.     quotation_header_in = quotation_header_in
  94. * QUOTATION_HEADER_INX =
  95. * SENDER =
  96. * BINARY_RELATIONSHIPTYPE = \' \'
  97. * INT_NUMBER_ASSIGNMENT = \' \'
  98. * BEHAVE_WHEN_ERROR = \' \'
  99.     logic_switch = logic_switch
  100. * TESTRUN =
  101. * CONVERT = \' \'
  102.   IMPORTING
  103.     salesdocument = salesdocument
  104.   TABLES
  105.     return = return[]
  106.     quotation_items_in = quotation_items_in[]
  107.     quotation_items_inx = quotation_items_inx[]
  108.     quotation_partners = quotation_partners[]
  109.     quotation_schedules_in = quotation_schedules_in[]
  110.     quotation_schedules_inx = quotation_schedules_inx[]
  111.     quotation_conditions_in = quotation_conditions_in[]
  112.     quotation_conditions_inx = quotation_conditions_inx[]
  113. * QUOTATION_CFGS_REF =
  114. * QUOTATION_CFGS_INST =
  115. * QUOTATION_CFGS_PART_OF =
  116. * QUOTATION_CFGS_VALUE =
  117. * QUOTATION_CFGS_BLOB =
  118. * QUOTATION_CFGS_VK =
  119. * QUOTATION_CFGS_REFINST =
  120. * QUOTATION_KEYS =
  121. * QUOTATION_TEXT =
  122. * EXTENSIONIN =
  123. * PARTNERADDRESSES =
  124.   .

  126. CALL FUNCTION \'BAPI_TRANSACTION_COMMIT\'
  127. * EXPORTING
  128. * WAIT =
  129. * IMPORTING
  130. * RETURN =
  131.           .

  133. WRITE salesdocument.
仅供参考使用
---------------------------------2015.05.28 更新 -----------------------------
在使用bapi更新quotation的condition时，发现没有更新成功，反而同一condition type又被添加了一次。
后发现，更新时不能像新建时如下操作。。
  1. quotation_items_inx-itm_number = \'000010\'.
  2. quotation_items_inx-material = \'X\'.
  3. quotation_items_inx-updateflag = \'I\'.
  4. quotation_items_inx-plant = \'X\'.
  5. quotation_items_inx-short_text = \'X\'.
  6. quotation_items_inx-target_qty = \'X\'.
  7. APPEND quotation_items_inx.


  10. quotation_conditions_in-itm_number = \'000010\'.
  11. quotation_conditions_in-cond_type = \'PR00\'.
  12. quotation_conditions_in-cond_value = 10.
  13. quotation_conditions_in-currency = \'CNY\'.
  14. APPEND quotation_conditions_in.

需要从konv表中找出该condition对应的counter和step，填入上述的2个内表中，才能正确更新condition.
请使用浏览器的分享功能分享到微信等