SAP-BAPI操作手册资料

BAPI操作手册

1)给BAPI创建数据结构(1)

事务代码：SE11-输入结构的名称:ZBAPI_ORDER_STATUS」MPORT

输入如下的3个字段

字典：维护结构

15EI嗜的工41品且S3层次结构显示AppendStructure...

结构ZBAPI_ORDER_STATUS_IMPORT激活

短文本testbapibyChouer

AttributesComponents{Entryhelp/check（货市/数量字段

M宿IbfiUlWO限囤剧仑Built-intype1/3

1----

ComponentRTy...ComponenttypeDataType长度小数位短文本

3RDER1D_________□AUFNRCHAR____12。忖单编码

IJISPRAS□LANG10

1IEXCLUDEINACTIV□CHAR10

□

□

1□

激活保存

2)给BAPI创建数据结构(2)

事务代码：SEII-输入结构的名称：ZBAPISTAT

••数据类型

OTypeGroup

a

©搜索帮助

b锁对象

的显示

输入如下字段

Structure铜辑怎）转到但）实用程序&）细节也）En"orment系统（丫）帮助组）

固）Eieoe口tats◎的电力区]团②画

字外维护结构

H|力®品且[□层次结构显示Appendstructure...

结构ZBAPISTAT激活

短文本testbyChouer

AttributesrComponents(Entryhelp/check।货向数量字段

叼国同纣Built-intypeI1/5

1----

ComponentRTy...ComponenttypeDataType长度小数位短文本

》BTNR□JOBTNRCHAR220对象号

STAT□工STATUSCHAR50对象状态

INACTUTINACTCHAR10徐志：状态未激活

IXT04□JTXT04CHAR40对象的单个状态（短form）

IXT30□工TXT30CHAR300对象状态

□.............................................

□

1—>

激活保存

2）创建函数

事务代码：SE37

创建函数组：转到一〉函数组一〉创建组

功能梗块名正）编辑怎）转到⑥实用程序（5Environment系掀丫H

全局数据@领档+Ctrl+OR篇|51『Q坦］因囱②国

函数机构：初始屏、

函数组也）创建组@）

R•回4［H0_对象目录条目Q）更改组也）

文档©）>显示组灯）

翻浮色）制除蛆电）

联机手册（2）Ctrl+F8查找祖（£）

Functionmodule

返回但）F3J__

的Display〃Change□(:reate

输入函数组和函数组短文本

保存

输入Functionmodule：Z_BAPI_GET_ORDER_STATUSWW点仓寸建

软一可＜］口|60。1口朗慨口©皆心为1国C

函数机构:初始屏幕

输入函数模块和函数组（）短文本SAVE

属性选择状态如下

FunctionmoduleEditGDtoUtilities(M)Envronment系统(Y)帮助(H)

亘JQ@II。囿喘。£U幻灯园囱II②嚼

FunctionBuilder:ChangeZ_BAPI_GET_ORDER_STATUSVVW

殄为目I■四号品显||Pattern|PrettyPrinterFinction

FunctionmoduleZBAPIGETORDERSTATUSWVInactive(revised)

AttributesImport(Export1Changing,Tables(ExceptionsSourcecode

Classifkation/

FunctiongroupZBAPISTATUSWWtestforchouer

Shorttextfunctionmoddulebychouerforbapi

ProcessingtypeGeneralData

|CNormalfunctionmodule负费人员CFJ864

但Remote-enabledmoduleLastchangedbyCFJ864

CUpdatemoduleChangedon2007.10.31

手立即开始开发类ZD01

OImmediatestart,norestartProgramrameSAPLZBAPISTATUS#1

。启动延迟INCLUDEnameLZBAPISTATUSWfUDl

^'Coll.rinOriginallanguageZH

Notreleased

□Editlock

□Global

Import输入如下的参数

EirxtionmodJegdt8toUUhesgpEnycrment乐茨(工)胡勖但)

al圈国圆②国

FunctionBuilder:ChangeZ_BAPI_GET_ORDER_STATUSVVW

Expori输入如下参数

15r

EunctionmodulegditUt，itie5（M）Entrcnment系统（工）智助坦）

a回co©口闻^©D心心囱囱②国

FunctionBuilder:ChangeZ_BAPI_GET_ORDER_STATUSWW

Tables选择参数

EunctionmodulegditgotoUtilties电)Enyronment系妩(丫)帮助出)

旦£1<3Q©0念1口(H/@的心©1国囱I②星

FunctionBuilder:ChangeZ_BAPI__GET_ORDER_STATUSWW

沿的,国4品骂n|iQPattern|PrettyPrinterFunctionmoduledocumentaton

FunctionmoduleZ_BAPI_GET_ORDER_STATUSVWInactive(revised)

Attrtxites।Import[BtportgChanghg'Tables[Exceptions(Sourcecode

选择goto-〉Globaldata定义全局变量

[unutionmodulegdtgot。Utilitias(M)EnYironment系统(丫)帮助坦)

globaldataffi）圈□电mI图回I0

Mainprogram

FunctionBuilder:1RDERSTATUSWW

Textelements

Messages

Furtheroptions

Objectdirectoryentry

Documentation

Translation

闻

rTTn^nApplicationhelp

FUNCTIONZ_BAFI_G1Back

*--------------------工

*“Localinterface:

*"IMPORTING

**VALUE(BAPI_ORDER_STATUS-IMPORT)TYPEZBAPI_ORDER_STATUS_IMPORT

*"EXPORTING

*"VALUE(RETURN)TYPEBAPIRETURN

*"TABLES

激活保存

输入代码如下

Types:

beginofType_tjO2t,

istatliketj02t-istat,

txt04liketjO2t-txtO4,

txt30liketj02t-txt30,

endoftype_tj02t.

DATA:

*DeclarationsforTABLEparameter

T_BAPISTATlikeZBAPISTAToccurs0,

G_BAPISTATlikeZBAPISTAT,

*Tableforobjecttexts

t_tj02ttypetype_tj02toccurs0,

g_tj02ttypetype_tjO2t.

*Structureforreturnmessages

DATA:

BEGINOFMESSAGE,

MSGTYLIKESY-MSGTY,

MSGIDLIKESY-MSGID,

MSGNOLIKESY-MSGNO,

MSGV1LIKESY-MSGV1,

MSGV2LIKESY-MSGV2,

MSGV3LIKESY-MSGV3,

MSGV4LIKESY-MSGV4,

ENDOFMESSAGE.

Sourcecode中增加对应代码

FuxtlonmoduleEditGotoUtiltles(M)Environment系妹(Y)帮助电

0⑪©Q0.El目⑶国

FunctionBuilder:ChangeZ_BAPI_GET_ORDER_STATUSWW

6加上回4品目El©PatternPrettyPrinterFunctionmoduledocumentation

FunctionmoduleZ_BAPI_GET_ORDER_STATUS¥VInactive(revised)

Attributes(Import(Export(Changing(Tables(Exception;/Sourcecode

-n回囱n丽r~ii喇囿

FUNCTIOHZ_BAPI_GET_ORDER_STATUSVV.

*"*"Localinterface:

*"IMPORTING

*"VALUE(BAPI_ORIiER_STATUS_IMPORT)TYPEZBAPI_ORDER_STATUS_IMPORT

EXPORTING

*"VALUE(RETURN)TYPEBAPIRETURN

*"TABLES

T.BAPISTATSTRUCTUREZBAPISTAT

DATA:

l_aufnrLIKEafko-aufnr,

l_objnrLIKEjest-objnr.

耕************#*^******：^^******：^^******

*Checkiforderexists

**********************************：(£*********

SELECTSINGLEaufnr

FROMafko

INTOl_aufnr

激活保存

增加的代码如下：

FUNCTIONZ_BAP1_GET_ORDER_STATUSWW.

*"*"Localinterface:

*"IMPORTING

*"VALUE(BAPI_ORDER_STATUS_IMPORT)TYPE

ZBAPI_ORDER_STATUSJMPORT

*"EXPORTING

*"VALUE(RETURN)TYPEBAPIRETURN

*"TABLES

*“T_BAPISTATSTRUCTUREZBAPISTAT

DATA:

l_aufnrLIKEafko-aufnr,

l_objnrLIKEjest-objnr.

*****************次**************************

*Checkiforderexists

y,q,.J4y.A*”，

*5*个个个个，卜个不个，卜个*1*不,J•个不，卜,卜个个个不个个个个小个个个，.个个个个个，卜不

SELECTSINGLEaufnr

FROMafko

INTOl_aufnr

WHEREaufnr=BAPI_ORDER_STATUS_IMPORT-orderid.

IFsy-subrcNE0.

CLEARmessage.

message-msgty='E'.

message-rnsgid='Z3'.

message-msgno='0()0'.

message-msgvl=BAPI_ORDER_STATUS」MPORT-orderid.

PERFORMset_retum」nessageUSINGmessage

CHANGINGreturn.

IF1=2.

*Theonlyreasontoincludethisstatement,thatwillobviously

*neverexecute,isthatitwillcreateareferecencesothatyou

*canfindoutwhereaparticularmessageisbeingused.This

*functionalityisusedbytheBAPIsprogrammedbySAP

MESSAGEe000(z3).

ENDIF.

ENDIF.

CHECKreturnISINITIAL.

*Readorderstatus

CONCATENATE'OR'BAPI_ORDER_STATUS_IMPORT-orderidINTOl_objiir.

IFBAPI_ORDER_STATUS_IMPORT-i_excludeinactive='X'.

SELECTobjnrstatinact

FROMjest

INTOTABLEt_bapistat

WHEREobjnr=l_objnrAND

inact<>'X'.

ELSE.

SELECTobjnrstatinact

FROMjest

INTOTABLEt_bapistat

WHEREobjnr=l_objnr.

ENDIF.

IFsy-subrc<>0.

*Noobjectstatusfound

CLEARmessage.

message-msgty='E'.

message-msgid='Z3\

message-msgno='001'.

message-msgvl=BAPIORDERSTATUSIMPORT-orderid.

PERFORMset_return_messageUSINGmessage

CHANGINGreturn.

IF1=2.

MESSAGEe001(z3).

ENDIF.

ENDIF.

CHECKreturnISINITIAL.

*14•!»*£«、{«、］«A»

个个*Jw不rj»个个小不个个，.个个个个个个*2»，卜•卜个rj»个rj*小不个个个小个个个个，卜不rj*,J»个个不

*Readorderstatustexts

、>、>«{«

.(•rj«»1•%»"L<»«r1j»«吓、rj«rj«.；•»iw«£*«»t1«•.卜rj«.•1!%«*.1(^•rj»K»I1»•»,•«r"<.；•»t«rj£»»Tw«»twrj««f*«r1j«•*.1*•r"».卜.(•«rj"w%rlt»«->J1«•.卜«1«

SELECTistattxtO4txt3O

FROMtj02t

INTOTABLEt_tj02t

FORALLENTRIESINt_bapistat

WHEREistat=t_bapistat-statAND

spras=BAPI_ORDER_STATUS」MPORT-i_spras.

SORTt_tjO2tBYistat.

LOOPATt_bapistatINTOg_bapistat.

READTABLEt_tj02t

WITHKEYistat=g_bapistat-statBINARYSEARCH

INTOg_tj02t.

IFsy-subrc=0.

MOVE:

g_tj02t-txtC4TOg_bapisiat-txt04,

g_tjO2t-txt3OTOg_bapistat-txt30.

MODIFYt_bapistatFROMg_bapistatTRANSPORTINGtxt04txt30.

ENDIF.

ENDLOOP.

ENDFUNCTION.

***INCLUDELZBAPISTATUSF01.

*______________________________________________*

*&_____________________________________________*

*&FormSET_RETURN_MESSAGE

*&_____________________________________________*

*ThisroutineisusedforsettingtheBAPIreturnmessage.

*TheroutineisastandardroutineforBAPIsthathandlesthemessage

*structurefortheBAPIRETURNstructure.Ithasbeencopiedfromthe

*BAPICompanyCodeGetlist

**

*->P_MESSAGEtext

*<-P_RETURNtext

formSET_RETURN_MESSAGEUSINGVALUE(P_MESSAGE)LIKE

MESSAGE

CHANGINGP.RETURNLIKEBAPIRETURN.

CHECKNOTMESSAGEISINITIAL.

CALLFUNCTIONBALW_BAPIRETURN_GET

EXPORTING

TYPE=P_MESSAGE-MSGTY

CL=P_MESSAGE-MSGID

NUMBER=P_MESSAGE-MSGNO

PAR1=P_MESSAGE-MSGV1

PAR2=P.MESSAGE-MSGV2

PAR3=P_MESSAGE-MSGV3

PAR4=P_MESSAGE-MSGV4

*LOG_NO=,'

*LOG_MSG_NO=…

IMPORTING

BAPIRETURN=P_RETURN

EXCEPTIONS

OTHERS=1.

endform."SET_RETURN_MESSAG

3)创建APIMethod

事务代码：SWOI

输入对象/接口类型：ZORDERSTAW点创建

对象类型Q）编辑但）转到心）实用程序Q）环境电）设置⑤）系统（丫）帮助（电

修_引q口口66❷1日（ata1©的电QII

业务对象制作程序:初始屏幕

394⑪©弗既□子信息类型业务龙象资源库

输入如下的参数

17创建对象类型冈,

超级类型

对象类型ZORDERSTAW

对象名称zprodorderstatuw

名称zprodorderstatuw

说明testbapiapi

程序ZORDERSTAW

应用程序z|@

“於

确定保存

选择实用程序一＞API方法fAdd方法

对象类型9)轴(E)转到(G)实用程序收)环境(V)设置(S)系统(Y)带助

Colorlegend|Q囱，0度

©<

API方法〉Add方法(M)换铮F4

更改对象类型ZORDERS1

变更需求(祖织者)Q)Ctrl+F4

%&循9N□*蹈ElUWH*多数WU力，

对象类型ZORDERSTAW□testbapiapi

一田接口

——关键字段

一向属性

一日方法

zprodorderstatuw.ExistenceCheck检查对象存在状态

zprodorderstatuw.Display显不相豪

事件

输入Functionmodule：Z_BAPI_GET_ORDER_STATUSWW

确定

选择M

CreateAPIMethod:CreateParameters

选择，

©扩展程序因

方法ZGETORDERSTATUSWW尚未实现

您想生成模板吗

省略段自动？

确定

对象类型9）编辑走）转到（⑥实用程序收）环境（丫）设置⑤）系统（丫）帮助出）

_叨qiggcoe］口闻隈©的心幻!因团।②国

更改对象类型ZORDERSTAW

殄83④管□：%盼仃H程序参数例外

对象类型ZORDERSTAV口testbapiapi

一田接口

——关键字段

一田属性

一日方法

zprodorderstatuw.ExistenceCheck检查对象存在状态

显示对豪

zprodorderstatuw.ZGetOrderStatusvwOfunctionaoddulebychouerforbapi

•事件

选择编辑一＞更改版本状态一＞对象类型一＞ToImplemented

对象类型9）猫怎）转到（⑴实用程序Q）环境&）设置⑤）系统包）帮助（由

选择⑸F2伶④――tatai&0mj।图囱［®

更改对象类

创建（9F5

》809重定义Q）F6序参数例外

对象类型重命名怎）F7)apiapi

换档+F2

更改版本状态（R）对象类型（2）Tomodeled

取消色）F12对象类型蛆件（日）►Toimplemented

1

已释放(工)

报废9)

zprodorderstatuw.ExistenceCheck

zprodorderstatuw.Display显示对象

zprodorderstatuw.ZGetOrderStatusww。functionmodduleby

事件

确定

NotethattheBARIwizardhasaddedawrapperclassforthefunctionmodulesoitcan

besuedasmethodinthebusinessobject.

选择ChoosemenuGoto->Programtodisplaytheprogram

ObjecttypeEditGOTOUtilities(M)Block/bufferSettincs系统(丫)帮助(H)

稼"1q国口60eJQ的心幻|国团口②璃

ObjectType:Editor编辑ProgramZORDERSTAW

%的4招E3s黑0灯眩笈>[01©MarkersPatternConcatenateDoubleMcveMarkI

1k****ImplementationofobjecttypeZORDERSTAV*****

2INCLUDE々OBJECT，.

3BEGIN_DATAOBJECT."Donotchang已.DATAisgenerated

4*onlyprivatemembersmaybeinsertedintostructureprivate

5DATA:

6“beginofprivate,

7*todeclareprivateattributesremovecommentsand

8“insertprivateattributeshere…

9“endofprivate,

10KEYLIKESWOTOBJID-OBJKEY.

11ENDDATAOBJECT.*Donotchange..DATAisgenerated

12

13BEGIN.METHODZGETORDERSTATUSWWCHANGINGCONTAINER.

14DATA:

15BAPIORDERSTATUSIMPORTLIKEZBAPI_ORDER_STATUS_IMPORT,

16RETURNLIKEBAPIRETURN,

4）最后一步释放

事务代码：SE37

释放模组

功能模块名（E）编辑（g）转到（母EnHronment系统（丫）帮助但）

!创建（9©0e良|］幻四支1幻।回回

更改（0F6

F71

显示Q）

|检查过）

Ctrl+F2

ExtendedProgramCneck

CodeInspector(B)

激活g)Ctrl+F3

(GETORDERSTATUS"

测试①►

释放电）>释放（g）Ctrl+FlO

►

■打卬(I)...换档+F1内部爱市卬■J

其他函数Q）>取消释放＜没找到!》

功能模块查询更多词典

退出（X）换裆+F3

搜索因特网

事务代码：SW01

释放业务对象类型选择对象类型一＞修改版本状态到一实现

对象类型9）编辑（g）转到G）实用程序乜）环境”）设置⑤）系统（Y）帮助

创建《）F5qa[]©©©।Qtaau幻i图历

更改（，）F6

始屏幕

释放对象类型（把光标放在对象类型上）

选择编辑一更改版本状态一对象类型一已释放

对象类型（9）编辑英）转到叵）实用程序&）环境&）设置⑤）系统（工）帮助坦）

选捋⑤）F2©eD（MK&的Q幻因回石

测试/执行⑧）F8

更或对家类

创建©F5

重定义Q）F6程序参数例外

重命名任）F7)apiapi

删除⑨换档+F2

一出接口

更改版本状态R）»对象类型9）Tomodeled

——关键:

一出属性取消色）F12对象类型组件但）Toimplemented

一臼方法---------已释放（工）

报废（2）a塞锹©）「

zprodorderstatuw.ExistenceCheck

odorderstatuw.Display一显示对:啜找到!）

zprodorderstatuw.ZGetOrderStatusww/Ofunctio查询更多词典

搜索因特网

•事件

ReleasetheBAPIasamethodintheBOR

把光标放在zproder-.ZgetOrderSJ

选择编辑-更改版本状态-对象类型组件-已释放

对象类我9）编辑电）转到叵）实用程序（5环境设置⑤）系统（工）帮助包）________________________

叫_____选择⑤）F2◎⑥鸟iQtats©gm©团团।②喟

测试/执行⑤）F8

更改对象类

创建©F5

程序参数例外

殄809重定义©）F6

重命名（g）F7

对象类型)iapi

删除Q）换档+F2