PO增强,明细动抬头动

来源:互联网 发布:保温隔热材料知乎 编辑:程序博客网 时间:2024/05/17 02:45
METHOD IF_EX_ME_PROCESS_PO_CUST~PROCESS_HEADER .
  DATALS_MEPOHEADER TYPE MEPOHEADER,
        LT_MEPOITEM   TYPE PURCHASE_ORDER_ITEMS,
        LO_MEPOITEM   TYPE PURCHASE_ORDER_ITEM,
        LS_MEPOITEM   TYPE MEPOITEM.
  DATA:
    LV_ZZCGKH TYPE ZE_CGKH"采购客服
    LV_ZZCGXZ TYPE ZE_CGXZ"采购协助
    LV_ZZZCRY TYPE  ZE_ZCRY"驻厂人员
  LS_MEPOHEADER IM_HEADER->GET_DATA).
  LT_MEPOITEM IM_HEADER->GET_ITEMS).
  "采购客服 从合同取默认
  LOOP AT LT_MEPOITEM INTO LO_MEPOITEM.
    LS_MEPOITEM LO_MEPOITEM-ITEM->GET_DATA).
    IF LS_MEPOITEM-KONNR <> ''.

      EXIT.
    ENDIF.
  ENDLOOP.
  IF LS_MEPOHEADER-ZZPRTIME IS INITIAL.
    LS_MEPOHEADER-ZZPRTIME SY-UZEIT.
  ENDIF.
  IM_HEADER->SET_DATALS_MEPOHEADER ).
ENDMETHOD.
1 0
原创粉丝点击