SAPABAP开发基础自写留用.docxVIP

学习顺序 数据类型 域什么什么的 字符串 结构 内表 OpenSQL 函数 子程序 报表 一、 T-CODE SE80 对象浏览器 SE38 写程序 SE11 建表 SE37 函数 SM04 查看用户 SE91message 系统 sy-uzeit 系统时间 sy-datum 系统日期 sy-datum 是 2010.10.10 sy-datum+0(2) 是 20 sy-datum+2(3) 是 101 PSa-comun+29(11). 这也是偏移的操作 sy-subrc 正常是 0 ，不正常是 0 或其他 二、数据类型 完整型 d 日期 8 字节 YYYYMMDD t 时间 6 字节 i 整型 f 浮点型 string 可变长的字符型非完整型 非完整型 c 字符型(若不指定长度默认是 1 个字节) n 数字字符型 p 小数(常用) (压缩数装载它的空间是( x+1 ) /2x 是原来装载它的长度 ) datav1(5)typepdecimals2value123.45. 三、各种定义 基本格式 DATA:XXTYPEYYVALUE ＇ ZZ ＇ 各种来了 参照数据字典定义 参照数据元素定义 datav9typezdata_jg01. 参照数据库表的字段定义 datav10typescarr-carrid. 定义常量 CONSTANTSc1TYPEiVALUE1. 定义单值选侧屏幕 PARAMETERSp1(8)TYPEndefaultAA. 参照自定义类型定义变量 TYPESt1(10)TYPEc. DATAv9TYPEt1. 参照自定义变量定义变量 DATAv10LIKEv9. 参照数据字典中的 TYPEGROUP 定义数据类型 TYPE-POOLSzjg01. datav20typezjg01_z1. 定义结构 DATA:BEGINOFwa, carridTYPEspfli-carrid, connidTYPEspfli-connid, cityfromTYPEspfli-cityfrom, citytoTYPEspfli-cityto, distanceTYPEspfli-distance, distidTYPEstring, wa-a=002. wa-a=002. ENDOFwa. 根据结构定义内表 DATAitabLIKETABLEOFwa. 流程才$制-IF…ELSE IFa12. WRITE: 他比 12 大 . ELSE. WRITE: 他比 12 小 . ENDIF. 循环 DO10TIMES. WRITE:/ 这是第 ,ie, 次. ie=ie+1. ENDDO. 把内表循环到结构中 LOOPATitabINTOwa. WRITE:/wa-id. ENDLOOP . 内表各种操作 -collect 在内表中一定有一个数值型的字段，而且其他字段均为字符型 把数值型字段上的数加起来 DATA:BEGINOFwa, a(4)TYPEc, b(4)TYPEc, cTYPEi, ENDOFwa. DATAitabLIKETABLEOFwa. wa-a=001. wa-b=0101. wa-c=100. *APPENDwaTOitab. COLLECTwaINTOitab. wa-b=0201. wa-c=200. *APPENDwaTOitab. COLLECTwaINTOitab. wa-a=002. wa-b=0201. wa-c=100. *APPENDwaTOitab. COLLECTwaINTOitab. LOOPATitabINTOwa. WRITE:/wa-a, wa-b, wa-c. ENDLOOP . 内表各种操作 -read LOOPATitab1INTOwa. READTABLE itab2 INTO wa1 WITHKEY carrid=wa-carrid. IFsy-subrc0. clearwa1. move-correspondingwatowa1. appendwa1toitab2. ENDIF. ENDLOOP . 根据结构修改内表 modifyitabfromwa. SQL 操作 1 、把 SQL 结果放入内表中 SELECTcarridconnidcityfromcitytodistancedistid FROMspfli INTO CORRESPONDINGFIELDSOFTABLE itab. 放到了内表中 INTO CORRESPONDINGFIELDSOF wa. 放到了结构中 、多表查询 SELECTscarr~carridscarr~carrnamespfli~connidspfli~cityfrom spfli~cityto FROM sc