SAP ABAP MD04屏幕增加:增加列

需求:增加显示销售订单送达方

主要使用二代增强出口:M61X0002

事务码T-code:CMOD

填写描述,保存到对应的包下
分配增强到项目下

激活组件,激活后效果如下

编写ZXM61U04

SAP留出的按钮,填写描述

button1_ez = '送达方'.

编写ZXM61U03

*&---------------------------------------------------------------------*
*& 包含               ZXM61U03
*&---------------------------------------------------------------------*

DATA:batch type string.

DATA:GV_VBELN TYPE LIPS-VBELN,
     GV_KUNNR TYPE LIKP-KUNNR,
     GV_NAME1 TYPE KNA1-NAME1.

IF NOT ibutt1 IS INITIAL.
  batch = ''.

  IF IMDEZEXIT-DELKZ = 'VC'..
     "取交货单号
      SELECT SINGLE VBELN INTO GV_VBELN FROM LIPS
        WHERE VGBEL = IE3MDPSLX-DELNR.
*          AND VGPOS = IE3MDPSLX-DELPS.

     "取送达方编号
      SELECT SINGLE KUNNR INTO GV_KUNNR FROM LIKP
        WHERE VBELN = GV_VBELN.

     "取送达方文本名称
      SELECT SINGLE NAME1 INTO GV_NAME1 FROM KNA1
        WHERE KUNNR = GV_KUNNR.

     "去 送达方 前导零
      CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
        EXPORTING
          INPUT  = GV_KUNNR
        IMPORTING
          OUTPUT = GV_KUNNR.

      EMDEZX_USEX1 = GV_KUNNR && ':' && GV_NAME1.
      CONDENSE EMDEZX_USEX1.

      CLEAR:GV_VBELN,GV_KUNNR,GV_NAME1.
  ENDIF.

ENDIF.

当点击送达方按钮后,会展示送达方。

再附上一份MRP元素对应的描述,因为新增的列不一定每个MRP元素都会由数据,因此需要再代码里做限制,比如说我的需求,就只针对VC。

  • 6
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

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

抵扣说明:

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

余额充值