zoukankan      html  css  js  c++  java
  • 收货确定 BAPI BAPI_GOODSMVT_CREATE

    CLEAR gmhead.
        gmhead-pstng_date ls_table-gzdate."sy-datum .
        gmhead-doc_date sy-datum .
        gmhead-pr_uname sy-uname.
        gmhead-GR_GI_SLIP_NO l_no.

    *  ***oode
         CLEAR gmcode.
        gmcode-gm_code '01'.

        select single MATNR VGBEL VGPOS
        INTO (itab-material,itab-po_number,itab-po_item)
        from LIPS
        WHERE VBELN l_no AND
          POSNR l_item.
    *  *****
        select single werks LGORT into (itab-plant,itab-stge_loc)
        from EKPO
        where EBELN itab-po_number and
          EBELP itab-po_item.

          itab-mvt_ind    'B'.
          itab-DELIV_NUMB  l_no  .
          itab-DELIV_ITEM  =  l_item.
          itab-entry_qnt ls_table-recqty.
          itab-QUANTITY ls_table-recqty.
          if ls_table-BATCH 'CXNOTBATCH'.
            itab-BATCH ''.
          ELSE.
            itab-BATCH ls_table-BATCH.
          endif.
          itab-move_type  =  '101'.                              "101 ,102 .

          APPEND itab .
          CLEAR itab .

    CALL FUNCTION 'BAPI_GOODSMVT_CREATE'
        EXPORTING
          goodsmvt_header  gmhead
          goodsmvt_code    gmcode
        IMPORTING
          goodsmvt_headret mthead
          materialdocument mat_doc
        TABLES
          goodsmvt_item    itab
          return           return.

      CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'

      EXPORTING

        WAIT = 'X'.

  • 相关阅读:
    简单工厂和抽象工厂有什么区别?
    常用的设计模式有哪些?
    常见的HTTP协议状态码?
    数据库分库分表(sharding)系列(二) 全局主键生成策略
    关于垂直切分Vertical Sharding的粒度
    数据库分库分表(sharding)系列(四) 多数据源的事务处理
    分库分表带来的完整性和一致性问题
    [置顶] 深入探析Java线程锁机制
    为啥RESTFULL如此重要?
    hadoop核心逻辑shuffle代码分析-map端
  • 原文地址:https://www.cnblogs.com/rockyzjut/p/3171041.html
Copyright © 2011-2022 走看看