【南京】根据销售订单创建交货单并自动拣配、过账发货程序

最新推荐文章于 2024-12-23 14:21:52 发布

原创

最新推荐文章于 2024-12-23 14:21:52 发布 · 4k 阅读

2 ·

CC 4.0 BY-SA版权

文章标签：

#WS_DELIVERY_UPDATE #ALSM_EXCEL_TO_INTERN #BAPI_OUTB_DELIVERY_C #发货过账 #交货单

该程序详细介绍了如何在南京地区根据销售订单自动生成交货单，并实现拣配和发货的自动化流程。通过使用特定的技术如WS_DELIVERY_UPDATE, ALSM_EXCEL_TO_INTERN和BAPI_OUTB_DELIVERY_C，实现了从订单到发货的高效过账处理。" 129273964,10583018,深入理解Spring Bean的创建过程,"['spring', 'java', 'IoC']

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

Code listing for: ZSD020
Description: 根据销售订单创建交货单并过账发货

*&---------------------------------------------------------------------*
* 程序名称: 根据销售订单创建交货单并过账发货
* 程序名  ：ZSD020
* 开发日期：2013-08-26
* 创建者  ：ZCY
* 申请者  ：
*----------------------------------------------------------------------*
* 概　要  ：2013-08-26 初次开发
*&---------------------------------------------------------------------*

REPORT  ZSD020.

*****************************************************************
*TYPE DECLARATION
*****************************************************************

TYPES:BEGIN OF TY_TAB_UPLOAD,                        "上传文件接收表
  SHIP_POINT TYPE BAPIDLVCREATEHEADER-SHIP_POINT,    "装运点
  VBELN(10) TYPE C,                                  "订单号
  REF_ITEM TYPE RFPOS_VL,                            "项目
  DLV_QTY TYPE LFIMG,                                "交货数量
  MESSAGE TYPE STRING,
  END OF TY_TAB_UPLOAD.

TYPES:BEGIN OF TY_VBAP,
  VRKME TYPE VBAP-VRKME,
  END OF TY_VBAP.
*****************************************************************
*TYPE DECLARATION
*****************************************************************
TABLES: VBAP.
************************************************************************
* INTERNAL TABLE DECLARATION
************************************************************************

DATA:
      IT_TAB_UPLOAD TYPE STANDARD TABLE OF TY_TAB_UPLOAD,                    "上传文件接收表
      IT_INTERN LIKE STANDARD TABLE OF ALSMEX_TABLINE,                       "EXCEL文件接收表
      SALES_ITEMS LIKE STANDARD TABLE OF BAPIDLVREFTOSALESORDER,             "BAPI输入表：
      IT_RETURN LIKE STANDARD TABLE OF BAPIRET2,                             "BAPI返回参数 
      IT_SERIAL_NUMBERS LIKE STANDARD TABLE OF BAPIDLVSERIALNUMBER,          "BAPI返回参数 
      IT_EXTENSION_IN LIKE STANDARD TABLE OF BAPIPAREX,                      "BAPI返回参数
      IT_DELIVERIES LIKE STANDARD TABLE OF BAPISHPDELIVNUMB,                 "BAPI返回参数
      IT_CREATED_ITEMS LIKE STANDARD TABLE OF BAPIDLVITEMCREATED,            "BAPI返回参数
      IT_EXTENSION_OUT LIKE STANDARD TABLE OF BAPIPAREX.                     "BAPI返回参数



************************************************************************
* WORKAREA DECLARATION
************************************************************************

DATA:
      WA_VBAP TYPE TY_VBAP,
      WA_TAB_UPLOAD TYPE TY_TAB_UPLOAD,                         "上传文件接收表
      WA_SALES_ITEMS TYPE BAPIDLVREFTOSALESORDER,               "BAPI输入表：
      G_SHIP_POINT TYPE BAPIDLVCREATEHEADER-SHIP_POINT,         "装运点
      WA_INTERN LIKE ALSMEX_TABLINE,                            "EXCEL参数表
      G_DELIVERY TYPE BAPISHPDELIVNUMB-DELIV_NUMB,              "BAPI返回参数
      G_NUM_DELIVERIES TYPE BAPIDLVCREATEHEADER-NUM_DELIVERIES, "BAPI返回参数
      WA_CREATED_ITEMS LIKE BAPIDLVITEMCREATED,
      WA_RETURN LIKE  BAPIRET2.


************************************************************************
* SELECTION SCREEN DECLARATION
*******************************************