如何用SAP Cloud for Customer的手机App创建销售订单

第一次启动App，设置一个初始化的pin code：

输入C4C tenant的url，用户名和密码：

登录进系统后，找到Sales Order工作中心：

可以看到系统里很多已有的销售订单了。点击屏幕左下角的创建按钮：

Account是必填字段：

可以从Account字段的F4帮助里选择一个合适的Account：

如果C4C系统里选中的Account事先维护好了Partner determination配置的话，对应的Sales Unit和Sales Organization，Distribution Channel等字段会自动带出来：

可以在External Notes字段维护一些文本类型的备注：

接下来是给Sales Order的行项目添加产品。点击按钮All Products：

可以选择从Product Categories里显示的产品列表里选择想要添加的Product：

比如我选择了一个ID为i042416的机械臂：

如下图所示，这个产品已经出现在销售订单的行项目了。可以修改它的数量：

创建好的销售订单抬头数据：

创建好的销售订单行项目数据：

要在S/4HANA里创建Outbound Delivery，首先要具有一个销售订单，ID为376，通过事务码VA03查看。

只用61行代码就能实现基于这个Sales Order去创建对应的outbound delivery：

REPORT zcreate_dn.

DATA:lv_ship_point        TYPE          bapidlvcreateheader-ship_point VALUE '0001',
     lv_due_date          TYPE datum VALUE '20181205',
     lv_delivery          TYPE          bapishpdelivnumb-deliv_numb,
     lt_so_items          LIKE TABLE OF bapidlvreftosalesorder,
     ls_so_items          LIKE LINE OF lt_so_items,
     lt_return            TYPE TABLE OF bapiret2,
     ls_read              TYPE order_view,
     lt_item              TYPE TABLE OF bapisdit,
     lt_order_headers_out TYPE TABLE OF bapisdhd,
     lt_header            TYPE TABLE OF sales_key,
     lt_bapisdtehd        TYPE TABLE OF bapisdtehd,
     lt_bapitextli        TYPE TABLE OF bapitextli,
     lt_bapiret2          LIKE bapiret2   OCCURS 0 WITH HEADER LINE.

APPEND INITIAL LINE TO lt_header ASSIGNING FIELD-SYMBOL(<header>).

ls_read-item = 'X'.

<header>-vbeln = '0000000376'.

CALL FUNCTION 'BAPISDORDER_GETDETAILEDLIST'
  EXPORTING
    i_bapi_view     = ls_read
  TABLES
    sales_documents = lt_header
    order_items_out = lt_item.

LOOP AT lt_item ASSIGNING FIELD-SYMBOL(<item>).
  APPEND INITIAL LINE TO lt_so_items ASSIGNING FIELD-SYMBOL(<fill>).

  <fill>-ref_doc = <item>-doc_number.
  <fill>-ref_item = <item>-itm_number.
  <fill>-dlv_qty = <item>-req_qty.
  <fill>-sales_unit = 'EA'.
ENDLOOP.

CALL FUNCTION 'BAPI_OUTB_DELIVERY_CREATE_SLS'
  EXPORTING
    ship_point        = lv_ship_point
    due_date          = lv_due_date
  IMPORTING
    delivery          = lv_delivery
  TABLES
    sales_order_items = lt_so_items
    return            = lt_return.

LOOP AT lt_return ASSIGNING FIELD-SYMBOL(<return>).
  WRITE:/ | Type: { <return>-type }: { <return>-message } | COLOR COL_NEGATIVE.
ENDLOOP.

CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
  EXPORTING
    wait   = 'X'
  IMPORTING
    return = lt_bapiret2.

LOOP AT lt_bapiret2 ASSIGNING <return>.
  WRITE:/ 'Message:', <return>-message COLOR COL_POSITIVE.
ENDLOOP.

思路就是首先用函数BAPISDORDER_GETDETAILEDLIST把销售订单的行项目明细读取出来，然后用BAPI_OUTB_DELIVERY_CREATE_SLS进行outbound delivery的创建。

执行report，显示Outbound Delivery 80000205成功创建：

使用事务码VL03N查看：

要获取更多Jerry的原创文章，请关注公众号"汪子熙"。