SAPBAPI函数使用及示例

《SAPBAPI函数使用及示例》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、1bapi概述(1)bapis是"businessapplicationprogramminginterfaces"的简写，中文翻译为"业务应用编程接口"。不同的系统或模块进行通讯时，就需要用到编程接口。(2)bapi时外部应用程序访问sap业务对象的方法。在面向对象编程方面，业务对象（businessobject）和bapi是sap的两个很重要的内容，业务对象就是类，bapi就是业务对象的方法。他们的关系描述如下：kernel-->intergrity-->interface-->access:kernel为内核，对数

2、据库直接进行操作intergrity为业务对象，将实际业务定义成一个类interface为应用编程接口，通过该接口，对业务对象进行操作access为访问方式，直接面向对象编程或远程函数调用(3)每一个bapi都有与之对应的以”bapi_“开头的函数。例如：业务对象”user“表示”系统用户“，它有bapi（方法）“lock”和“unlock”，它们用来锁定系统用户和对系统用户解锁。这两个方法对应的函数为“bapi_user_lock”和“bapi_user_unlock”。2查看bapi(1)运行bapi，进入sapba

3、pi浏览器，在这里，我们能够通过业务层次迅速找到需要的业务对象和方法。如：业务对象-->bussinesobject关键字段-->shortdescriptionbapi-->method与bapi对应的函数-->functionmodule3bapi编程--abap中访问bapi由于ABAP不是面向对象的语言，所以在abap程序中使用bapi实际上是调用bapi函数。把皮的函数名称，可以在bapiexploer中的“functionmodule”见到。例：进行月末结帐时，为了防止用户进行物料移动，在订单结算之前，需要锁

4、定系统用户。下面这一段代码就用来完成这个功能，它利用了bapi函数"bapi_user_lock"和"bapi_user_unlock"。-------------------------------------------------------------------------------reportz_fi_f13nostandardpageheadingline-size100.*声明全局变量tables:usr21.data:beginofitaboccurs0,bnamelikeusr21-bname,en

5、dofitab.datartnlikebapiret2occurs0.*选择屏幕selection-screenbeginofblockblk0withframetitletext-010.parameters:p_lockradiobuttongrouprad1default'X',"锁定p_unlockradiobuttongrouprad1."解锁selection-screenendofblockblk0.selection-screenbeginofblockblk1withframetitletext-020

6、.select-optionsp_bnameforuser21-bname.selection-screenendofblockblk1.*初始化选择屏上的变量initialization.p_bname-sign='I'.p_bname-option='EQ'.p_bname-low='AD003'.appendp_bname.p_bname-sign='I'.p_bname-option='EQ'.p_bname-low='TMSADM'.appendp_bname.*主要数据处理逻辑start-of-selecti

7、on.selectbnameintocorrespondingfieldsoftableitabfromuse21wherebnamenotinp_bnameandpersnumbernotin(selectpersnumberfromadrpwherename_last='000').loopatitab.ifp_lock='X'.callfunction'bapi_user_lock'exportingusername=itab-bnametablesreturn=rtn.endif.ifp_unlock='X'.c

8、allfunction'bapi_user_unlock'exportingusername=itab-bnametablesreturn=rtn.endif.endloop.ifp_lock='X'.messagei846(so)with'所有用户解锁完成!'.else.messagei846(so)with'所有