循序渐进学abap系列讲义

§.ABAP/4DATADataTypeC:字符(串),长度为1,最大有65535BYTES,初始值为:space,例:‘M’;D:日期,格式为YYYYMMDD,最大是’9999/12/31’,例:’1999/12/03’.F:浮点数, 长度为8,例如:4.285714285714286E-01I:整数 范围:-2^31~2^31-1N:数值组成的字符串:011,P:packedT:HHMMSS,’14:03:00’,X:16变量包含name,length,type,structure等,语法如下:DATA<F>[<length>]<type>[<value>][<decimals>]其中:<f>:变量名称,最长30个字符,不可含有+,.,:( 等字符Example1:DATA:COUNTERTYPEPDECIMALSNAME(10)TYPECVALUE‘Delta’. TYPEDVALUE‘ ExampleDATA:BEGINOFNAME(10)TYPEC, TYPEWEIGHTTYPEPDECIMALS2,ENDOF.另外,有关DATA的指令还有:CONSTANTS(常数)、STATICS(临时变量三.系统变量说SYSTSTRUCTURE,里面的字段存放系统变量,常用的系统变量有:SY-SUBRC:系统执行某指令后,表示执行成功与否的变量,’0’表示成功SY-UNAME:SAPSY-DATUM:当前系统日期; 当前执行程序的TransactioncodeSY-INDEX: 当前LOOP循环过的次数SY-TABIX:当前处理的是internaltableSY-TMAXL:InternaltableSY-SROWS:屏幕总行数;SY-SCOLS:屏幕总列数;SY-MANDT:NUMBERSY-VLINE:画竖线SY-ULINE:SAPSystemApplicationProductsinDataABAP/4:AdvancedBusinessApplicationABAP/4:Tools→ABAP/4WorkBench→ABPA/4EditorABAP/4,*,整行注释用’*’§OUTPUTTINGDATATO一.WRITEABAP/4WRITEWRITE:‘USERNAMEIS:’,SY-UNAME.WRITE[AT]pos>]len>)]<pos>:指定输出的行号;<par>:LEFT-JUSTIFIED资料靠左对齐 RIGHT-JUSTIFIED资料靠右对齐UNDER USINGEDITMASK<m>:使用内嵌显示,如12:03:20USINGNOEDITMASK:不使用内嵌 0 DECIMALS<d>: 显示<d>位小数EXPOENT ROUND CURRENCY<c>:币别显示DD/MM/YY: 1:WRITE:/10(6)输出结果为 2:DATAXTYPEIVALUEA(5)TYPECVALUE‘ABWRITE:/XUSINGEDITMASK‘::WRITE:/XUSINGEDITMASK‘$,WRITE:/YNO-WRITE<symbol-name>ASSYMBOL.WRITE:<icon-name>ASICON.INCLUDEINCLUDEWRITE:/‘Phonesymbol:’,SYM_PHONEASSYMBOL.WRITE:/‘AlarmIcon:’,ICON_VOICE_OUTPUTASICON.要查看系统所提供有那些符号及图标,可选择’EDIT’下的’InsertStatement’,选择’Write’,接下来选择要查看的群组,如SYMBOL或ICON,接下来按’Disy’即可.§INTERNALInternalTable的ABAP/4中的InternalTable是一种DtaStrcturSTRUTUE,字段(field)DATA:BEGINOFSTUDENTOCCURSSTD_IDTYPEN,NAME(10)TYPEC,AGETYPEBIRTHTYPESCORETYPEPDECIMALS2,ENDOFSTUDENT.20Buffer)Internaltable的定义有以下几种格式:格式一.DATA:BEGINOFinternaltable>OCCURS<field1>TYPE<type1>,[<field2>TYPE<type<field3>TYPE<type ENDOF<internal格式二.TYPES:BEGINOFwork<field1>TYPE<type1>,[<field2>TYPE<type<field3>TYPE<type ENDOF<workTYPES<internaltable>TYPE<workarea>OCCURS格式三 DATA:BEGINOF<workINCLUDESTRUCTURE<tableENDOF<workDATA:<internaltable>LIKE<workarea>OCCURSAPPENDAPPEND[<workarea>TO<internalworkarea)DATA:BEGINOFLINE,COL1TYPEI,COL2TYPEENDOFDATAITABLIKELINEOCCURS10.DO2TIMES.LINE-COL1=SY-INDEX.LINE-COL2=SY-INDEX**2.APPENDLINETOITAB.LOOPATITABINTOWRITE:/LINE-COL1,LINE- workDATA:BEGINOFITABOCCURSCOL1TYPEI,COL2TYPEENDOFDO2ITAB-COL1=SY-INDEX.ITAB-COL2=SY-INDEX**2.APPENDITAB.LOOPATWRITE:/ITAB-COL1,ITAB-InternaltableAPPENDLINESOF<itab1[FROM<n1[TO<n2TOAPPENDLINESOFITABTOJTAB.三 COLLECTCOLLECT指令也是将元素加入InternaltableAPPENDCOLLECT格式:COLLECT[<workarea>INTO<itab>DATA:BEGINOFITABOCCURS3,COL1(3)TYPEC, TYPEENDOFITAB-COL1=‘ABC’. ITAB-COL2=10.COLLECTITAB.ITAB-COL1=‘XYZ’. ITAB-COL2=20.COLLECTITAB.ITAB-COL1=‘ABC’. ITAB-COL2=80.COLLECTITAB.internaltable2 四 INSERTinternaltableINSERT[<wa>INTO]INITIALLINEINTO<itab>[INDEXINSERTLINESOF<itab1>[FROM<n1>TOn2>]TO<itab2>INDEX其中:<waworkarea,工作区中的元素.[INITIALLINEINTO]<itab>:internal[INDEX<idx>]:internaltable的记录号.(新加入的元素放在此记录前面) internaltableLOOPAT<itab>[INTO<wa>][FROM<n1>TO<n2>][WHEREREADTABLE<itab>[INTO<wa>][INDEX<idx>/WITHKEYDATA:BEGINOFITABOCCURSCOL1TYPEI,COL2TYPEENDOFDO10ITAB-COL1=SY-INDEX.ITAB-COL2=SY-INDEX*2.APPENDITAB.READTABLEITABINDEXREADTABLEITABWITHKEYCOL1WRITE:/‘ITAB-COL1=‘,ITAB-COL1,‘ITAB-COL2=‘,ITAB-ITAB-COL1 ITAB-COL2 六 修改internaltable中的MODIFY<itab>[FROMwa>][INDEX<idx>][TRANSPORTING<f1><f2>…][WHERE<conditions>]举例一.READTABLEITABINDEX3.LINE-COL1=MODIFYITABFROMLINETRANSPORTINGT_SALARYsalaryMODIFYT_SALARYTRANSPORTINGsalaryWHEREbirthday= DELETEinternaltable中的字段格式:DELETE<itab>INDEX<idx>.或 DELETE<itab>[FROM<n1>TO<n2>][WHERE八 Internaltable排SORT<itab>[<orderway>][BY其中:<orderway>DESCENDINGASCENDINGDefault<f1>:九 加workareaLOOP例:LOOPATITABINTOLINE.WRITE:/LINE-COL1,LINE-十 初始化internalREFRESH<itab>.清空<itab <itab>.清空<itab>的HeaderLine.<itab>.释放 在ABAP/4中要从屏幕输入变量,使用令是PARAMETERS及SELECTION-PARAMETER:SELECTION-OPTIONS:一.PARAMETERS指令BASICINPUTFPARAMETERS<p>[DEFAULT<f>][LOWERCASE][OBLIGATORY][ASCHECKBOX][RADIOBUTTONGROUP<rad>]PARAMETERS:AGETYPEI,BIRTHTYPED.MM/DD/YYMM/DD/YYYY,MMDDYYMMDDYYYY 1965年02月01日,与02/01/65的输入是一样的PARAMETERS:(20)DEFAULTBIRTHTYPEDDEFAULT LOWERASCHECKBOXPARAMETERS:TAXASCHECKBOXDEFAULTNTDASRADIOBUTTONGROUPRADIOBUTTONGROUPPARAMETERS:BOYRADIOBUTTONGROUPDEFAULTGIRLRADIOBUTTONGROUP二.SELECTION-SELECTION-OPTIONS所输入的值实际上是放在internaltable中的,该Internaltable有段,分是:SIGN,OPTION,LOW,HIGH..条件筛选检查条件输入画面指令,输入条件后可配合SELECT指令自TABLE符合条的数据,直接执行或放入InternalTableI:E:OPTION:LOW:HIGH:SELECTION-OPTIONS<check-option>FOR<table-field>TABLESSELECTION-OPTIONSAIRLINEFORSPFLI-AIRLINE,SPFLICONNID三.条件输入选择画面TableSelection按下”SelectionoptionsOptionSign3.Multi-OptionsMulti-Options四.改变条件输入格式DEFAULT<begin>TO<end>SELECTION-OPTIONAIRLINEFORSPFLI-DEFAULT‘2042’TONO-NOLOWERSELECTSELECTWHERESELECT-OPTIONSAIRLINEFORSPFLI-SELECT*FROMSPFLIWHERECONNIDINAIRLINE.WRITE:/CONNID,FROMCITY,TOCITY.SELECT-OPTIONSAIRLINEFORSPFLI-CONNID.SELECT*FROMSPFLI.CHECKWRITE:/CONNID,FROMCITY,TOCITY.IFINSELECT-OPTIONSAIRLINEFORSPFLI-CONNID.SELECT*FROMSPFLI.IFSPFLI-CONNIDINAIRLINE.WRITE:/CONNID,FROMCITY,TOCITY.SELECTION-SELECTION-SCREENSKIP

SELECTION-SCREENSKIPSELECTION-SCREENULINE/

SELECTION-SCREENULINESELECTION-SCREENCOMMENT/<pos>(length)<name>REMARK=‘PlsenteryourSELECTION-SCREENCOMMENT/10(30)SELECTION-SCREENBEGINOFSELECTION-SCREENENDOFSELECTION-SCREENBEGINOFLINE.SELECTION-SCREENPOSITION20.PARAMETERSNAME(10).SELECTION-SCREENPOSITION40.PARAMETERSBIRTHTYPED.SELECTION-SCREENENDOF20NAME40BIRTHBLOCKSELECTION-SCREENBEGINOFBLOCK[WITHFRAME[TITLESELECTION-SCREENENDOFBLOCKSELECTION-SCREENBEGINOFBLOCK WITHFRAMESELECTION-SCREENENDOFBLOCK§SQLABAP/4中可以利用SQL语法创建或TABLE,SQL语法分为DDL(DATADEFINELANGUAGE)语言和MULTIPULATIONLANGUAGE)语言,DDLCREATEDMLSELECT,INSERTSQLOPENSQLNATIVESQL语句.OPENSQLSQLABAP/4OPENSQLDatabases和CommandBUFFER,所以它有一个语言转换的过程.NATIVESQLSQLDatabases一.OPENSQLOPENSQL语句包含有:SELECT,INSERT,UPDATE,MODIFY,DELETE,OPENCURSOR,FETCH,CLOSE WORK,ROLLBACKWORK等.SELECT<result>[INTO<target>][FROM<source>][WHERE<condition>][GROUPBY<fields>][ORDERBY<sortorder>]<result> 的记录存放在workarea<sortorder>排序的字段及方式SY-SUBRC=0表示数据成0SY-DBLNT:相关令:EXIT.CHECK<logisticstatement>.利用循环方式所有记SELECT….ENDSELECT.是循环方式记录的.TABLESSELECT[DISTINCT]*FROMMARDWHEREMATNR= 的数据TABLESSELECTSINGLE*FROMMARDWHEREMATNR= 的资料将的记录放在workarea中,并且加入Internaltable中INTO<work...INTOCORRESPONDINGFIELDSOF<workINTO(f1,fn)...INTOTABLE<internal...INTOCORRESPONDINGFIELDSOFTABLE<internal...APPENDINGTABLE<internal...APPENDINGCORRESPONDINGFIELDSOFTABLE<internalTABLESDATA:BEGINOFITABOCCURSMATNRLIKEMARD-MATNR,WERKSLIKEMARD-WERKS,LGORTLIKEMARD-LGORT,LABSTLIKEMARD-ENDOFSELECTMATNRWERKSLGORTINTOCORRESPONDINGFIELDSOFITABFROMMARDWHEREMATNR= APPENDCLEAR(将的结果放在InternaltableITAB中)TABLESSELECTMATNRMTARTMAKTXINTO(t_matnr,t_mtart,maktx)FROMMARDWHEREMATNR= 的料号、类型和描述,放在变量t_matnr,t_mtart,maktx中)TABLESSELECT*FROM WHERECARRID=‘LH’CONNID=‘0400’ANDFLDATE= ORDERBYBOOKIDWRITE:/SBOOK-BOOKID, SBOOK-CUSTTYPE,SBOOK-SMOKER,SBOOK-LUGGWEIGHT,SBOOK-WUNIT,SBOOK-.ORDERBYBETWEEN<g1>AND例如:WHEREYEARBETWEEN1995ANDLIKE例如:WHERENAMELIKEIN例如:WHERENTIN(‘CHUNGLI’,INSERTworkareaInternalTableINSERTINTOdatabaseVALUES<workDATA:BEGINOFCODE(6)TYPEC,NAME(30)TYPEENDOFDATA:VENLIKEWAOCCURS…WA-CODE=WA-NAME=‘XINGDAELECTRONICSCO.,INSERTINTOVENVALUESWAworkareainternaltableINSERT<internaltable>DATA:BEGINOFWAOCCURSCODE(6)TYPEC,NAME(30)TYPEENDOF…WA-CODE=WA-NAME=‘XINGDAELECTRONICSCO.,INSERTInternaltableINSERTINSERT<itab1>FROMTABLE<itab2>[ACCEPTINGDUPLICATE将<itab2>NULL<itab1>中,加上[ACCEPTINGDUPLICATEKEYPRIMARYKEYMODIFYMODIFY<internaltable>[FROM<workDELETEDELETE<internaltable>[FROM<workDELETE<internaltable>[WHEREDATABASEDatabaseCursor是一个数据库暂存区,将经SELECT指令的记录存放至此暂存区,再由此暂存区放至WorkArea中,可减少数据库的次数.DatabaseOPENCURSOR<c>FORSELECT…WHERETABLESDATA:WALIKEC1TYPEOPENCURSORC1FORSELECT*FROMWHEREAREA=’DatabaseCursorWorkAreaFETCHNEXTCURSOR<c>INTOFETCHNEXTCURSORC1INTOCursorWA,SY-SUBRCDatabaseCLOSECURSORCLOSECURSORCOMMITWORK&ROLLBACKCOMMITWORKCOMMITWORK.ROLLBACKWORK,COMMITWORKROLLBACKWORK.§NATIVESQLEXECSQL[PERFORMINGEXECSQL.CREATETABLEAVERI_CLNTCHAR(3)NOTNULL,ARG1CHAR(3)NOTNULL,ARG2CHAR(3)NOTNULL,FUNCTIONCHAR(10)NOTPRIMARYKEY(,ARG1,)DATA:F1(3),F2(3),F3='1EXECSELECT,ARG1INTO:F1,:F2FROMAVERI_CLNTWHEREARG2=:F3PERFORMING<formnameEXITFORMSQLDATA:F1(3),F2(3),F3=EXECSQLPERFORMINGSELECT,ARG1INTO:F1,:F2FROMAVERI_CLNTWHEREARG2=:F3FORMWRITE:/F1,NATIVESQL把TABLE中的MANDT()字段当作一般字段使用,所以在抓取数据时必须指定特定的NATIVESQLSELECTCHECKSAPR/3DatabaseNATIVESQLCONNECTNATIVESQL§ABAP/4PROGRAMModuleABAP/4Macroblock(宏)DEFINE<macro<macro>[<p1>[<p1><p2>…].表示所使用的参数,参数之间要有一个空格.DATA:resultTYPEDEFINEresult=&1*WRITE:/‘&1*&2’,=END-OF-…MULTI3DATA:RESULTTYPEI,N1TYPEIVALUE5,N2TYPEIVALUE6.DEFINEOPERATION.RESULT=&1&2OUTPUT&1&2&3END-OF-DEFINEWRITE:/’Theresultof&1&2&3is’,END-OF-OPERATION4+3OPERATION2**OPERATIONN2-Theresultof4+3 Theresultof2**7 TheresultofN2-N1 IncludeINCLUDEINCLUDE(combine)的时候,系统会自动全部展开并且编INCLUDESUBROUTINESFUNCTIONMODULES.INCLUDE的调用格式.INCLUDEREPORTINCLUDE.Global变量应用DATA:BEGINOFCOMMONPART<dataENDOFCOMMONPART此常使用在Include的中, DATA:BEGINOFCOMMONPARTNUMBERS,MNUMTYPEENDOFCOMMONPARTSubroutineInternalSubroutines:SubroutinesExternalSubroutines:SubroutinesABAP/4SubroutineInternalCallExternalCall,SubroutineSubroutine的FORM<subr><subroutinestatementblock>(1).InternalPERFORM<subr>[<pass>]NUM1=100.NUM2=200.PROFORMADD.FORMSUM=NUM1+WRITE:/‘NUM1+NUM2=执行结果:NUM1NUM2(2).ExternalCallPERFORM<subr>(<prog>)[<pass>][IFIFFOUND:找到才执行PROGRAMFORMWRITE:/‘USERNAME:‘,SY-UNAME.PROGRAMPERFORMHEADER(FORMPOOL)IF(3).ExternalCallCALLSubroutinenameSubroutinePERFORM(<fsubr>)[INPROGRAM(<fprog>)[<pass>][IF

PROGRAMFORMPOOL.FORMSUB1.WRITE:/‘USERNAME:’,SY-UNAME.FORMWRITE:/‘HOSTSERVER:’,SY-HOST.FORMPOOLSUB2SUBNAME=‘SUB2’.PROGNAME=PERFORM(SUBNAME)INPROGRAM(PROGNAME)IFCallBy传参数时将数据的存放地址(address)传至参数中,也就是子程序中的参数变量与外部实际CallByAddressFORM<subr>[USING<f1><f2>…][CHANGINGPERFORM<subr>[USING<f1><f2>…][CHANGINGUsingCHANGINGUSINGSUM=NUM1=100.PERFORMADDUSINGNUM1NUM2CHANGINGSUM.WRITE:/NUM1,NUM2,SUM“SUM由0变成300FORMADDUSINGNUM1NUM2CHANGINGSUM.SUM=NUM1+ CallBy传参数时将数据的值一份至另一地址中,所以在子程序中参数变量值改变,并不会影响外部实际变数的值.FORM<subr>USINGVALUE(<f1><f1CallByValuePERFORM<subr>USINGSUM=NUM1=PERFORMMULTIUSINGNUM1CHANGINGWRITE:NUM1,SUM“NUM15,SUM0120FORMMULTIUSINGVALUE(NUM1)CHANGINGSUM.SUM=WHILENUM1>SUM=SUM*NUM1.NUM1=NUM1–1. CallByValueandReturnCallByValue,一份传回给外部实际变数.执行过程中外部实际参数不变.FORM…..CHANGINGVALUE(<f1>)PERFORM….CHANGING….<f1>SUM=NUM1=100.PERFORMADDUSINGNUM1NUM2CHANGINGSUM.WRITE:/NUM1,NUM2,SUM“SUM由0变成300

FORMADDUSINGNUM1NUM2CHANGINGS=NUM1+WRITE:NUM1,NUM2,SUM“得到结果为1002000 SUM “返回程序时,将变量S的值给SUMINTERNALTABLE1,PASSINGWITHUSINGAND2,PASSINGWITH🕮SubroutineCHECKCHECKFORMCHECKNUM1<10.WRITE/NUM1.NUM1=NUM1+🕮Function在ABAP/4中的FunctionModule是在一个函式库中(library),系统提供很多内设FunctionModuleFunction1.FunctionABAP/4DevelopmentWorkbench“Functionlibrary”,选择”Utility”中的”Find”FunctionModuleSTRING*,STRINGFunctionExecute,FunctionSTRING_LENGTH,“Disy”,可见FunctionModule之各项参数设定:<1>.ImportParameter:Export<2>.ExportParameter:Import<3>.ChangingParameterCallByValueandReturnResult<4>.TableParameter:InitialTable<5>.Exceptions:如STRING_LENGTH为一传回字符串长度的函数,其设定的参数如下:Import:String ExportLength传回的字符串长度值SourceCodefunctionstring_length.length=strlen(string).CALLFUNCTION<module> EXCEPTIONSF1=a1…§DOWNLOAD&

DATA:LENTYPETEXT=CALLFUNCTIONEXPORTINGSTRING=TEXT//从外部输入一字符串;IMPORTINGLENGTHLEN.LENWRITE/EXPORTINGIMPORTING在我们的SAP系统中,经常会有数据Upload(“上载”)或Download(“”),尤其是在作migration的时候,有许多的数据需要UploadSAP系统中.通常我们会CALLFUNCTION理.(注意:CALLFUNCTIONFUNCTION名称必须大写,且中间没有任何标点符号,如果执行成功,SY-SUBRC=0).一.SAP‘UPLOAD(.TXTFILECALLFUNCTIONinternaltable格式:CALLFUNCTION‘WS_UPLOAD’CODEPAGE=‘FILENAME=FILETYPE=FILELENGTH=<length>DATA_TAB=<workitab> = = =INVALID_TABLE_WIDTH= = = = =<filename>TEXT<workitab>internaltable,upload二.DOWNLOAD是将SAP中的数据“”,SAP支持’ASC格式’,’TXT格式’,’BINARY格式’等,它可以直接将TXTFILEEXCELDOWNLOADTXTFILEInternaltable,DOWNLOADInternaltableCALLFUNCTIONDOWNLOAD.格式:CALLFUNCTION <pcdictionary& <internaltable>=1=2==4=5=6 7=8BIN_FILESIZETXTFILEFILENAMETXTFILEfname1likerlgrap-filenamedefaultDATA_TABinternaltable注意:如果internaltable中某字段是数值型(‘I’或’P’或’F’等),则要定义成字符串 TXT例如:程序一般来说,我们会用到以下一些INCLUDE程序:YIAUTH00:检查USER权限所用到的TABLE YIAUTH01:检查USER权限所用到的子程序,通常在主程序中可以这样调用:PERFORMCHECK_BU_RANGETABLESbu_code. PERFORMCHECK_SINGLE_BUUSINGbu_code. PANY_RANGETABLEScmp_code.“(select-options) PANYUSINGcmp_code. PERFORMCHECK_NT_RANGETABLESnt_code.“(select-options)PERFORMCHECK_SINGLE_NTUSINGnt_code.“(parameter)YRSTDE01:ScreenListPrintDownloadYIBCL001:TitlePERFORMTITLEUSINGsy-linszsy- 这是台达的报表的标准表头,其中:sy-linsz是每行字节数,sy-cprog是主程 p是公司别.YIBCL002:PERFORMFOOTER.“这是台达标准表尾.YIBCL021:COLUMNHEADERPERFORMCOLUMN_HEADER.ReportAttributeColumn§WRITEBDCBDCProgram(BatchDataCommunicationProgramABAP/4SAPBDCTableCALLTRANSACTIONR/3BDCTable放入，最后送出按键句柄，如/11表按下<F11R/3(DataMigrarionDrill-DownScreenofTransactionuser使用SAPR/3来输入数据时，SAPR/3Transaction来执行工作的执行，每个Transaction会包含ScreenScreenScreenNmberSAPR/3“System”如图TransactionCodeVA03ScreenNumber二.BDC🕮BDCTableFieldProgramnameofScreennumberofIndicatorfornewNameofDatabaseFieldfromValuetoSubmitto可在程序开始之初一个InternalTable使用BDCDATA的DATABEGINOFINT_BDCOCCURSINCLUDESTRUCTUREBDCDATA.DATAENDOFINT_BDC.XVBAK-VBAK-如在以上的画面中要输入VBAK-KUNNR及VBAK-NAME1XVBAK-VBAK-🕮BDC FunctionKey F8，Continueor F3，BackPreviousScreen Double 🕮BDCTable首先我们需建立两个子程序，BDC_SCREENProgram，DynproDynbeginScreenNumber，BDC_FIELD:用来存入FnamFval*AddBDCScreenFieldFORMBDC_SCREENTABLESP_BDCSTRUCTUREBDCDATAUSINGP_PROGRAMP_SCREEN.CLEARP_BDC-PROGRAM=P_PROGRAM. =P_SCREEN.P_BDC-DYNBEGIN='X'.APPEND*AddBDCFieldFORMBDC_FIELDTABLESP_BDCSTRUCTUREBDCDATAUSINGP_NAMEP_VALUE.CLEARCASEWHEN''.WHENOTHERS.P_BDC-FNAM=P_NAME.P_BDC-FVAL=P_VALUE.APPENDP_BDC.PERFORMBDC_SCREENTABLESINT_BDCUSING'SAPMV45A'PERFORMBDC_FIELDTABLESINT_BDC:USING'VBAK-KUNNR'‘ USING'VBAK-NAME1'USING'BDC_OKCODE' "Saveand6.3CallTransactionBDCTableR/3DatabaseCALLCALLTRANSACTIONWITHUSING<BDCMODE y<DisyMode>可分成 Showall ShowonlyScreenwithError ShownoScreenCALLTRANSACTIONUSINGINT_BDCMODE'E'.6.4ExampleforBDCBDCProgramSalesEmpolyeeASCIITextFileSalesEmpolyee的PersolnalData，会有以下两个画面要输入:ProgramNameSAPMP50A，ScreenNumber1000，TransactionCodeProgramNameSAPMP50A，ScreenNumber2042，TransactionCodeScreen1000FieldalInfoRP50G-alScreen2042 FieldName FromDate To Last First P002- 欲转入的ASCIITextFile檔名是empoly.txt，其格式为 alNumber Info alFrom To Last First PROGRAMSOURCEProgramName:Description:ChangeSales