注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

XINBO'S SAP BLOG

你所浪费的今天,是昨天死去的人奢望的明天。你所厌恶的现在,是未来的你回不去的曾经

 
 
 

日志

 
 

物料期初库存-代码摘录  

2012-03-26 14:41:40|  分类: FUCTIONS |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |
相关函数:MARC_X_READ_DESCRIPTION
相关模块: KUMULIEREN_MARD_BESTAND 
相关代码:

  DATA: BEGIN OF IMARD OCCURS 0.
          INCLUDE STRUCTURE MARD.
  DATA: END OF IMARD.
  DATA: HLFMON LIKE RMMG3-LFMON,
        HLFGJA LIKE RMMG3-LFGJA,
        HVMMON LIKE RMMG3-VMMON,
        HVMGJA LIKE RMMG3-VMGJA.
  DATA: RMARDH LIKE MTPER-RMARDH.

  CALL FUNCTION 'MARD_GENERIC_READ_MATNR_PLANT'
       EXPORTING
            KZRFB    = KZRFB
            MATNR    = MATNR
            WERKS    = WERKS
            MAXTZ    = 0
       TABLES
            MARD_TAB = IMARD
       EXCEPTIONS
            OTHERS   01.

  IF SY-SUBRC EQ 0.
    CALL FUNCTION 'MARD_EXTEND'
         EXPORTING
              KZRFB    = KZRFB
              XVPER    = 'X'
         IMPORTING
              RMARDH   = RMARDH
         TABLES
              MARD_TAB = IMARD.
    LOOP AT IMARD.
*     Periodenermittlung erfolgt ab 4.0C durch Lesen der MARV
*     IF WRMMG3-LFMON IS INITIAL OR WRMMG3-LFGJA IS INITIAL.
*       MOVE IMARD-LFMON TO WRMMG3-LFMON.
*       MOVE IMARD-LFGJA TO WRMMG3-LFGJA.
*     ELSEIF ( IMARD-LFMON NE WRMMG3-LFMON OR
*          IMARD-LFGJA NE WRMMG3-LFGJA ).
*       WRMMG3-LFMON = '99'.
*       WRMMG3-LFGJA = '9999'.
*       FLGPERIODE = X.
*     ENDIF.
      AT LAST.
        SUM.
*       HLFMON = WRMMG3-LFMON.
*       HLFGJA = WRMMG3-LFGJA.
*       HVMMON = WRMMG3-VMMON.
*       HVMGJA = WRMMG3-VMGJA.
        MOVE-CORRESPONDING IMARD TO WRMMG3.
        WRMMG3-LFMON =  MARV-LFMON.
        WRMMG3-LFGJA =  MARV-LFGJA.
        WRMMG3-VMMON =  MARV-VMMON.
        WRMMG3-VMGJA =  MARV-VMGJA.
*       WRMMG3-LFMON =  HLFMON.
*       WRMMG3-LFGJA =  HLFGJA.
*       WRMMG3-VMMON =  HVMMON.
*       WRMMG3-VMGJA =  HVMGJA.
      ENDAT.
    ENDLOOP. 

  评论这张
 
阅读(673)| 评论(0)
推荐 转载

历史上的今天

在LOFTER的更多文章

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017