交货单 增强 VL01N:LE_SHP_DELIVERY_PROC自动增加批次号

这个增强针对 交货单使用,可以增加屏幕,也可以修改屏幕字段


具体常用到的方法是 : CHANGE_DELIVERY_HEADER,CHANGE_DELIVERY_ITEM ,FILL_DELIVERY_HEADER,FILL_DELIVERY_ITEM,SAVE_DOCUMENT_PREPARE


业务需求:根据物料号、库存地点、工厂,确认批次号

在方法FILL_DELIVERY_ITEM中:

    DATA LS_LIPS TYPE LIPSVB.
    DATA L_TABIX  TYPE SY-TABIX.
    DATA LV_CHARG TYPE LIPS-CHARG.

    IF CS_LIPS-PSTYV 'REN'
                 OR CS_LIPS-PSTYV 'NLRN'
                 OR CS_LIPS-PSTYV 'NCRN'.

      CALL FUNCTION 'ZRFC_MM_GETCHARG_RE'
       EXPORTING
         I_MATNR          CS_LIPS-MATNR
         I_WERKS          CS_LIPS-WERKS
         I_LGORT          CS_LIPS-LGORT
       IMPORTING
         OUT_CHARG       LV_CHARG
                .
      IF   LV_CHARG IS NOT INITIAL .
        CS_LIPS-CHARG LV_CHARG.

      ENDIF.

    ENDIF.

你可能感兴趣的:(ABAP开发,SAP,abap,SAP实用技巧)