SD--批量删除订单

最新推荐文章于 2025-06-30 14:48:11 发布

原创

最新推荐文章于 2025-06-30 14:48:11 发布 · 6.3k 阅读

2 ·

CC 4.0 BY-SA版权

文章标签：

#SD #VA02

这个博客分享了如何在SAP系统中开发一个安全的批量删除SD订单的小程序。程序设计包括用户只能删除自己创建的订单，并提供“测试运行”选项以避免误操作。程序代码和逻辑详细展示，供SAP开发者参考。

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

在sap应用中常常会需要批量删除一些错误录入的单据，为此开发了一个小程序。该程序为了安全，程序做了一下控制

1、限制用户只能删除自己的订单，不能删除别人输入的订单，如果需要修改一下查询条件；

2、系统默认为“测试运行”，方便用户在删除订单前要核实一下订单，确认不要误操作；

程序代码如下，供大家参考！

REPORT zsde0099.
TYPE-POOLS: slis.
*----------------------------------------------------------------------*
* data Declarations
*----------------------------------------------------------------------*
TABLES: vbak.        " Sales Document: Header Data
*----------------------------------------------------------------------*
* table control Output Declarations
*----------------------------------------------------------------------*
TYPES: BEGIN OF tc_0100,
        sel(1),                      " Check box
        vbeln LIKE vbak-vbeln,      " Sales Order Number
        erdat LIKE vbak-erdat,      " Sales order creation date
        ernam LIKE vbak-ernam,
        kunnr LIKE likp-kunag,      " Sold-to Party
        name1 LIKE kna1-name1,      " Sold-to Company Name
        text(200),
      END OF tc_0100.
DATA: wa_tc_0100 TYPE tc_0100,
      it_tc_0100 TYPE tc_0100 OCCURS 0 WITH HEADER LINE.

DATA g_fieldcat TYPE slis_t_fieldcat_alv.

*----------------------------------------------------------------------*
* Selection Screen
*----------------------------------------------------------------------*
SELECTION-SCREEN BEGIN OF BLOCK params1 WITH FRAME TITLE text-001.
PARAMETER: s_vkorg LIKE vbak-vkorg DEFAULT '6001' OBLIGATORY MODIF ID s1. " " Sales Org.
SELECT-OPTIONS:
            s_vtweg FOR vbak-vtweg OBLIGATORY,     " Distribution Channel
            s_spart FOR vbak-spart OBLIGATORY DEFAULT '10',    " Division
            s_auart FOR vbak-auart OBLIGATORY,        " Order type
            s_erdat FOR vbak-erdat OBLIGATORY, " Sales order creation date
*            s_ERNAM FOR vbak-ERNAM OBLIGATORY , " Sales order creation date
            s_kunnr FOR vbak-kunnr ,        " Sold-to party
            s_vbeln FOR vbak-vbeln .        " Sales Order
PARAMETER&nbs