最近比较忙,此方案出后测试了很多种情况都存在问题,只能留待以后处理了......
1.进入SE11键入LIPS表,点击APPEND STRUCTURE创建结构ZPIKMG,在结构中添加字段ZZPIKMG,如下图;
2.进入SE38键入MV50AFZ1,找到  USEREXIT_MOVE_FIELD_TO_LIPS 这个FORM,写入程序,代码如下:
IF SY-TCODE = 'VL01N' OR SY-TCODE = 'VL01'.
    BREAK GWANG.
    DATA:lt_xlips LIKE XLIPS OCCURS 0 WITH HEADER LINE.
    lo_lips-pikmg = LIPSD-PIKMG.
*--LIPS-ZZHIDE_QTY IS THE ACTUAL FIELD TO STORE THE HIDE QTY
    lips-ZZPIKMG = LIPSD-PIKMG.
*--modify record back in xlips
    lt_xlips[] = xlips[].
    READ TABLE lt_xlips WITH KEY vbeln = lips-vbeln
                                 posnr = lips-posnr.
    IF sy-subrc EQ 0.
      lt_xlips-pikmg = XLIPS-pikmg.
      lt_xlips-ZZpikmg = LIPSD-PIKMG.
      MODIFY lt_xlips INDEX SY-TABIX.
      MODIFY xlips FROM lt_xlips INDEX sy-tabix TRANSPORTING PIKMG  ZZpikmg."
    ENDIF.
  ELSE.
    DATA:E_PIKMG TYPE PIKMG.
    CLEAR E_PIKMG.
    CALL FUNCTION 'WB2_GET_PICK_QUANTITY'
      EXPORTING
        i_vbeln                   = LIKP-VBELN
        i_posnr                   = LIPS-POSNR
*       I_MODE                    = ' '
     IMPORTING
       E_PIKMG                   = E_PIKMG
     EXCEPTIONS
       DOCUMENT_READ_ERROR       = 1
       OTHERS                    = 2
              .
    IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.

*    DATA:lt_xlips LIKE XLIPS OCCURS 0 WITH HEADER LINE.
    lo_lips-pikmg = E_PIKMG.
*--LIPS-ZZHIDE_QTY IS THE ACTUAL FIELD TO STORE THE HIDE QTY
    lips-ZZPIKMG = E_PIKMG.
*--modify record back in xlips
    lt_xlips[] = xlips[].
    READ TABLE lt_xlips WITH KEY vbeln = lips-vbeln
                                 posnr = lips-posnr.
    IF sy-subrc EQ 0.
*      lt_xlips-pikmg = XLIPS-pikmg.
      lt_xlips-ZZpikmg = E_PIKMG.
      MODIFY lt_xlips INDEX SY-TABIX.
      MODIFY xlips FROM lt_xlips INDEX sy-tabix TRANSPORTING  ZZpikmg."
    ENDIF.
  ENDIF.

这个FORM貌似在修改交货单数量回车后触发,因此创建交货单时出现问题,需要对交货单交货数量 按行项目顺序做修改才能得到正确结果,其他情况将无法得到LIPSD-PIKMG这个屏幕字段的值,如哪位兄弟有更好的方法,望赐教,谢谢!

在lips追加拣配数量相关推荐

  1. 交货单批次拆分(BAPI_OUTB_DELIVERY_CHANGE )并更改拣配数量,发货过账(WS_DELIVERY_UPDATE)

    *&---------------------------------------------------------------------* *& Report  ZVL02N_C ...

  2. SAP SD VL02N 交货单拣配数量 WS_DELIVERY_UPDATE 交货单过账 BAPI_OUTB_DELIVERY_CONFIRM_DEC

    本人诚心接ABAP远程开发任务,价格公道,有需要的联系我,欢迎个人,甲方爸爸,乙方私信联系. SD VL02N时如果要交货过账,之前需要先拣配数量.操作就是前台输入一个拣配数量,然后保存 代码如下 D ...

  3. 【ABAP】更新交货单交货数量和拣配数量

    需求: Demo: *&---------------------------------------------------------------------* *& Report ...

  4. SAP ABAP WS_DELIVERY_UPDATE 更新拣配数量并发货过账

    FUNCTION ZSD_MC_DELIVERY_POST. *"-------------------------------------------------------------- ...

  5. 【整理】SD交货拣配(Picking)处理

    SD交货拣配(Picking)处理 根据销售订单创建完外向交货单之后,如果还涉及库存物料的出库,则可能需要一系列的步骤,如拣配.包装.运输等.其中"拣配"是向客户交货而准备货物的过 ...

  6. 生成转储拣配单的ABAP程序

    report ZE_MM_SCPSDD     no standard page heading line-size 150. *---------------------------生成转储拣配单的 ...

  7. SAP WM 如何看一个交货单相关的TO是从哪些货架上拣配的?

    SAP WM 如何看一个交货单相关的TO是从哪些货架上拣配的? 如下交货单2112282143,需要从多个不同的货架上拣配4个HU下来, 如果要以列表形式显示这些HU是从哪些仓位上拣配的,如何做? 输 ...

  8. sap 销售订单过量交货和拣配有关设置

    拣配有关: [拣配或撤下相关] 标识该类型的交货项目是与拣配相关还是与入库相关. 使用 在向外交货的情况下,只有与拣配相关的交货项目将转移至仓库管理 (WM) 组件.某些项目如文本项目或服务项目(咨询 ...

  9. 20 WM配置-策略-定义出库排序序列(拣配)

    业务背景:前面已经详细讲述了入库上架仓位排序策略的内容<19 WM配置-策略-定义入库的排序序列(跨行库存入库)>,相对于出库下架仓库排序策略,逻辑上是一样的,每次拣配下架时,系统会如何进 ...

最新文章

  1. 进程有一个全局变量 i,还有有两个线程。i++ 在两个线程里边分别执行 100 次,能得到的最大值和最小值分别是多少?
  2. svn在linux下的使用(转)
  3. Angular之ngx-permissions安装入门
  4. ubuntu Vim的退出命令
  5. XP中一些不常用的宝贝
  6. GitCode 版本升级,让开发更加高效
  7. Win7系统不能拖动文件夹的问题怎么解决?
  8. 使用commons-fileupload包实现文件上传
  9. mysql有没有mssql执行计划_MSSQL优化执行计划
  10. linux HZ 值_Linux操作系统中进程的操作命令(ps,kill,keep)
  11. top 监控系统内存、进程的资源占用情况
  12. Unity 3D中的内存管理
  13. 10--Django-ORM操作-choices参数、多对多的三种创建方式
  14. 有舍有得,解散20个群后 ...
  15. 解决多元线性回归的多重共线性问题
  16. Java实现简单的日历小程序之Java图形界面开发小日历
  17. MATLAB最速下降法求解函数极小值
  18. MATLAB(完备)之图像.tif到真彩色图像、索引色图像、灰度图像、 真彩色图像RGB、YIQ图像、HSV图像、YCbCr图像转换代码
  19. March 22 2017 Week 12 Wednesday
  20. java 斑马线检测,行人过斑马线监测预警系统解决方案

热门文章

  1. 用户设置个人资料时,是否需要一个清空选项?
  2. C++构造函数和文件组织
  3. ORA-20000:ORU-10027:buffer overflow,limit of 2000 bytes.
  4. Android Activity启动模式总结
  5. ios-上拉电阻负载许多其他接口
  6. Android存储空间不足的解决办法
  7. 光盘引导和网络安装linux系统
  8. 教你如何让电脑的ADSL宽带连接开机自动拨号
  9. 我的.gitignore下配置。存在这里一下。日后有空研究研究!
  10. 合格前端系列第五弹- Virtual Dom Diff