MB51 查询物料凭证清单上增加以一个字段

5 篇文章 3 订阅
该博客介绍了如何在SAP中通过修改MB51报表的源代码,增加一个名为ZHEIGHT的新字段。具体步骤包括在内部表中添加字段,然后在DATA_SELECTION、DATA_SELECTION_VIA_MATNR和DATA_SELECTION_VIA_BUDAT子程序中进行数据选择和更新,并在BUILD_RUNTIMETABLE中注册新字段。
摘要由CSDN通过智能技术生成
在MB51查询物料凭证清单的基础上增强一个字段 
实现步骤如下: 
1. MB51的主程序RM07DOCS    
      包含程序 RM07DOCS_GENERATED
1.1. 内表itab新增字段,字段名高度
* Internal table for data selection
  data: begin of itab occurs 0.
   data: ABLAD type MSEG-ABLAD .
                     *
                     *略n条目*
  DATA : MAA_URZEI TYPE  mseg-maa_urzei.
  DATA : XMACC     TYPE  mseg-xmacc.
  DATA: ZHEIGHT TYPE ZTMM0001-ZHEIGHT."---增强字段
data: end of itab.

 然后分别在以下位置添加代码:

1、在主程序 RM07DOCS_GENERATED 的子程序  DATA_SELECTION   添加逻辑
	LOOP AT ITAB.
  SELECT SINGLE ZHEIGHT
    INTO ITAB-ZHEIGHT
    FROM ZTMM0001
    WHERE...
  MODIFY ITAB TRANSPORTING ZHEIGHT.
ENDLOOP.

2、 在包含程序RM07DOCS_GENERATED  的子程序  DATA_SELECTION_VIA_MATNR     
3、 在包含程序RM07DOCS_GENERATED的子程序    DATA_SELECTION_VIA_BUDAT
	LOOP AT ITAB.
  SELECT SINGLE ZHEIGHT
    INTO ITAB-ZHEIGHT
    FROM ZTMM0001
    WHERE...
  MODIFY ITAB TRANSPORTING ZHEIGHT.
ENDLOOP.
4、在包含程序RM07DOCS_GENERATED的子程序BUILD_RUNTIMETABLE添加逻辑,代码如下
FORM BUILD_RUNTIMETABLE.
  ...
  rx'ZTMM0001 ZHEIGHT        00 00'.
ENDFORM.

 

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值