SAP 销售业务BAPI

最新推荐文章于 2025-06-11 09:06:44 发布

SAP剑魂

最新推荐文章于 2025-06-11 09:06:44 发布

阅读量936

点赞数 1

CC 4.0 BY-SA版权

分类专栏： SD ABAP SAP

本文链接：https://blog.youkuaiyun.com/mychery_lx/article/details/116980086

本文深入探讨了如何利用SAP Business Application Programming Interfaces (BAPIs) 进行销售业务的管理。通过实例，展示了如何创建销售订单、更新客户信息以及跟踪发货状态。BAPIs为开发者提供了无缝集成SAP系统的能力，使得企业能够自动化关键销售流程，提高效率。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

1.收获/公司调拨/转储等等
 LOOP AT gt_item ASSIGNING <fs>.
 "Head
    goodsmvt_header-pstng_date = sy-datum.
    goodsmvt_header-doc_date   = sy-datum.
    IF <fs>-flag = '1'.
      "goodsmvt_header-header_txt = '返回生产'.
      goodsmvt_code-gm_code      = '04'.
    ELSEIF <fs>-flag = '2'.
      "goodsmvt_header-header_txt = '成本中心消耗'.
      goodsmvt_code-gm_code      = '03'.
    ENDIF.

    "Item
    goodsmvt_item-plant = <fs>-werks . "源工厂
    goodsmvt_item-stge_loc = <fs>-lgort. "源库存地点
    goodsmvt_item-move_plant = <fs>-umwrk. "目标工厂
    goodsmvt_item-move_stloc = <fs>-umlgo. "目标存地点

    m_alpha <fs>-sernr tsernr.
    SELECT SINGLE matnr INTO goodsmvt_item-material FROM equi WHERE sernr = tsernr.
    CONDENSE <fs>-bwart NO-GAPS.
    IF <fs>-flag = '1'.
      goodsmvt_item-move_type  = '301'.
    ELSEIF <fs>-flag = '2'.
      goodsmvt_item-move_type  = <fs>-bwart.
    ENDIF.
    goodsmvt_item-entry_qnt  = 1.
    SELECT SINGLE meins INTO goodsmvt_item-entry_uom FROM mara WHERE matnr = goodsmvt_item-material.
    goodsmvt_item-costcenter = <fs>-kostl.
    APPEND goodsmvt_item.
    CLEAR goodsmvt_item.

    "serial
    gm_serialnumber-matdoc_itm = l_lines.
    gm_serialnumber-serialno   = tsernr.
    APPEND gm_serialnumber.
    CLEAR  gm_serialnumber.
    l_lines = l_lines + 1.
 ENDLOOP.
CALL FUNCTION 'BAPI_GOODSMVT_CREATE'
    EXPORTING
      goodsmvt_header       = goodsmvt_header
      goodsmvt_code         = goodsmvt_code
    IMPORTING
      materialdocument      = materialdocument
    TABLES
      goodsmvt_item         = goodsmvt_item
      goodsmvt_serialnumber = gm_serialnumber
      return                = return.


2. 公司间调拨做采购订单
*&---------------------------------------------------------------------*
*&      Form  bapi_po_create1
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
form bapi_po_create1.
  data: l_ebelp like ekpo-ebelp,
        l_ebeln like ekpo-ebeln.
  data: lt_poitem      like  bapimepoitem     occurs 0 with header line,
         lt_poitemx     like  bapimepoitemx    occurs 0 with header line,
         lt_poschedule  like  bapimeposchedule occurs 0 with header line,
         lt_poschedulex like  bapimeposchedulx occurs 0 with header line,
         lt_return      like  bapiret2         occurs 0 with header line.

  data: lw_poheader    like bapimepoheader,
        lw_poheaderx   like bapimepoheaderx.

  data: meng like bapicm61v-wkbst.
  lw_poheader-doc_type  = 'ZCB'.   "采购凭证类型
  lw_poheader-comp_code = '6000'.  "公司代码
  lw_poheader-purch_org = '6100'.  "采购组织
  lw_poheader-pur_group = '5

最低0.47元/天解锁文章