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

XINBO'S SAP BLOG

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

 
 
 

日志

 
 

OERP项目RFC总结-MM模块  

2011-05-10 11:44:34|  分类: RFC总结 |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |

 
1 采购申请
1.1 创建采购申请
新版本:
      CALL FUNCTION 'BAPI_PR_CREATE'
      EXPORTING
        PRHEADER  = IS_PRHEADER
        PRHEADERX = IS_PRHEADERX
        TESTRUN   = IS_TESTRUN
      IMPORTING
        NUMBER    = OP_PREQ_NO
      TABLES
        RETURN    = OT_LOG
        PRITEM    = IT_PRITEM
        PRITEMX   = IT_PRITEMX
        PRITEMEXP = OT_PRITEMEXP.

旧版本
      CALL FUNCTION 'BAPI_REQUISITION_CREATE'
      EXPORTING
        SKIP_ITEMS_WITH_ERROR = SPACE
        AUTOMATIC_SOURCE      = 'X'
      IMPORTING
        NUMBER                = OP_PREQ_NO
      TABLES
        REQUISITION_ITEMS     = IT_ITEMS
        REQUISITION_ITEM_TEXT = IT_ITEMS_TEXT
        RETURN                = OT_LOG.

1.2 修改采购申请
    CALL FUNCTION 'BAPI_PR_CHANGE'
    EXPORTING
      NUMBER       = IP_PR_NUMBER
      PRHEADER     = IS_PRHEADER
      PRHEADERX    = IS_PRHEADERX
      TESTRUN      = IS_TESTRUN
    TABLES
      RETURN       = OT_LOG
      PRITEM       = IT_PRITEM
      PRITEMX      = IT_PRITEMX
      PRITEMTEXT   = IT_PRITEMTEXT
      PRHEADERTEXT = IT_PRHEADERTEXT.

1.3 显示采购申请
        CALL FUNCTION 'BAPI_PR_GETDETAIL'
        EXPORTING
          NUMBER       = OT_PRITEM-PR_NUMBER
          ITEM_TEXT    = 'X'
          HEADER_TEXT  = 'X'
        TABLES
          PRITEMTEXT   = PRITEMTEXT
          PRHEADERTEXT = PRHEADERTEXT.

1.4 审批采购申请
     SELECT MANDT BANFN BNFPO LOEKZ FRGGR FRGST
           INTO CORRESPONDING FIELDS OF TABLE IT_EBAN
           FROM EBAN
           WHERE BANFN  =  IP_NUMBER AND
                 LOEKZ <> 'X'.

     SELECT  SINGLE  *  FROM  T16FS WHERE  FRGGR  = IT_EBAN-FRGGR  AND  FRGSX  = IT_EBAN-FRGST.

      CALL FUNCTION 'BAPI_REQUISITION_RELEASE'
      EXPORTING
        NUMBER                 = TAB01-BANFN
        REL_CODE               = TAB01-FRGC
        ITEM                   = TAB01-BNFPO
        USE_EXCEPTIONS         = 'X'
        NO_COMMIT_WORK         = 'X'
      IMPORTING
        REL_STATUS_NEW         = REL_STATUS_NEW
        REL_INDICATOR_NEW      = REL_INDICATOR_NEW
      TABLES
        RETURN                 = ET_LOG
      EXCEPTIONS
        AUTHORITY_CHECK_FAIL   = 1
        REQUISITION_NOT_FOUND  = 2
        ENQUEUE_FAIL           = 3
        PREREQUISITE_FAIL      = 4
        RELEASE_ALREADY_POSTED = 5
        RESPONSIBILITY_FAIL    = 6
        OTHERS                 = 7.

1.5 取消审批
"取消第一层即可
     CALL FUNCTION 'BAPI_REQUISITION_RESET_RELEASE'
      EXPORTING
        NUMBER                   = IP_NUMBER
        ITEM                     = TAB01-BNFPO
        REL_CODE                 = TAB01-FRGC
        USE_EXCEPTIONS           = 'X'
      IMPORTING
        REL_STATUS_NEW           = REL_STATUS_NEW
        REL_INDICATOR_NEW        = REL_INDICATOR_NEW
      TABLES
        RETURN                   = ET_LOG
      EXCEPTIONS
        AUTHORITY_CHECK_FAIL     = 1
        REQUISITION_NOT_FOUND    = 2
        ENQUEUE_FAIL             = 3
        PREREQUISITE_FAIL        = 4
        RELEASE_ALREADY_POSTED   = 5
        RESPONSIBILITY_FAIL      = 6
        NO_RELEASE_ALREADY       = 7
        NO_NEW_RELEASE_INDICATOR = 8
        OTHERS                   = 9.
待续。。。。。。

  评论这张
 
阅读(1001)| 评论(1)
推荐 转载

历史上的今天

在LOFTER的更多文章

评论

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

页脚

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