讲义2015培训技术al

1、SAP HAND 技术文档2016 年 10 月简体中文AL11HAND图标图标含义警告示例注释建议语法外部处理可选业务处理或决定排版惯例字体风格描述Exle text出现在屏幕上的单字或字符。包括字段名、屏幕标题、按钮以及菜单名、路径和选项。到其它文档的交叉。ExEXle textLE TEXT正文文本中强调的字或词组，图形和表格的标题。系统中元素的名称。包括报表名、程序名、事务代码、表名和正文文本中嵌入的编程语言关键字，如 SELECT 和 INCLUDE。屏幕输出。包括文件和目录的名称及其路径、消息、源代码、变量和参数的名称以及安装工具、更新工具和数据库工具的名称。Exle textEX

2、LE TEXT键盘上的按键。例如，功能键（如 F2）或 ENTER 键。用户输入原文。完全如文档所示输入这些单字或字符至系统中。Ex可变用户输入。尖括号表示应使用适当的输入替换括号中的单字和字符。目录1 技术需求41 技术需求最近准备学习 open dataset, 之前项目也遇到了一个共享目录的权限问题, 所以我决定先学下 AL11 和共享目录这里先说 AL11 吧.,AL11 里面有很多目录, 有些是安装了 SAP 后就已经存在了, 有些是人为地加上去的.AL11 的目录对于已经存在的目录, AL11 通过下面代码逐个获取它们的路径, 例如: DIR_HOME, DIR_GENplain

3、view plaincopyCALL C_SAPGPARAM ID NAMEFIELD DIR_ID VALUEFIELD searchpos-dirname.对于人手的目录, 它们保存在表user_dir 里面,这个表还是 maenance allowedAL11 的 user_dir 创建Step 1: 点configureStep 2: 点Save 保存, Create 这个键没什么用, 有的代码Step3: 查看结果AL11 的目录是否存在在 AL11 有, 但实际上不存在的目录Step 1: DIR_ZEROLI2 在服务器上其实是不存在的, 当双击它, 会有error messag

4、e 抛出Step 2: 当用open dataset 语句去这个目录建一个文件时, 是不会成功的,plain view plaincopy代码如下:DATA: lv_file TYPE string VALUEE:zerotest2ZZERO.TXT.TYPES: BEGIN OF ty_luke, key1 TYPE zluke-key1, year1 TYPE zluke-year1, month1 TYPE zluke-month1, test TYPE zluke-test,END OF ty_luke.DATA: lw_luke_temp TYPE ty_luke.OPEN DATA

5、SET lv_file FOR OUTPUT EXT MODEENCODING DEFAULT.IF sy-subrc = 0. CLEAR: lw_luke_temp. lw_luke_temp-key1 = 1.lw_luke_temp-year1 = 1999.lw_luke_temp-month1 = 01.lw_luke_temp-test = Zerot.TRANSFER lw_luke_temp TO lv_file.IF sy-subrc =0.z_zero_test.BREAK-POENDIF.IDCLOSE DATASETENDIF.lv_file.在 AL11 没有, 但

6、实际上存在的目录Step 1: 测试系统的服务器是 windows 系统, 所以 c:windows 是存在的,plain view plaincopy用代码建一个文件DATA: lv_file TYPE string VALUEC:windowszrobXT.TYPES: BEGIN OF ty_luke, key1 TYPE zluke-key1, year1 TYPE zluke-year1, month1 TYPE zluke-month1, test TYPE zluke-test,END OF ty_luke.DATA: lw_luke_temp TYPE ty_luke.OPEN

7、 DATASET lv_file FOR OUTPUT EXT MODEENCODING DEFAULT.IF sy-subrc = 0.CLEAR: lw_luke_temp.lw_luke_temp-key1 = 1.lw_luke_temp-year1 = 1999.lw_luke_temp-month1 = 01. lw_luke_temp-test = Zerot.TRANSFER lw_luke_temp TO lv_file.IF sy-subrc =0.z_zero_test.BREAK-POENDIF.IDCLOSE DATASETlv_file.ENDIF.Step 2:把

8、 c:windows 挂上 AL11, 查看的结果在服务器上建文件夹方法 1: SM69 or SM49Step 1: 在SM69 建一条命令, 支持 dos 或 unix 命令, 先保存再执行, 这里当然是建文件夹令, /c 代表dStep 2: 查看 AL11 结果方法 2: CALL SYSTEM用C 的函数 system 来调用 systemdplainDATA:view plaincopyd1(64) TYPE c.DATA:BEGIN OF tabl OCCURS0,line(200),END OF tabl.DATA: lt_string TYPE STANDARDTABLEOF

9、 string,lv_strYPEstring.D1(9)D1+9(55)= mkdir -pe:zerotest.=CALL SYSTEMID TABIDD FIELDD1FIELD TABL-*SYS*.BREAK-POIDz_zero_test.Open dataset共享文件的权限（Windows）工作组的共享文件Step 1: 测试环境： A 机 Laoxiang： XP 系统(共享文件夹所在机); B 机 Lupkid: Win7 系统(SAP gui 所在机); C 机 Vmecc: Win2003(装在 B 机的 VMware, 同时C 机也是 SAP 服务器).保证 AB 相

10、互通， AC 相互通Step 2: 测试代码：html view plaincopy TYPE-POOLS: z07tp.DATA: gw_rec TYPE z07tp_rec,gt_rec TYPE STANDARDTABLEOFz07tp_rec.CONSTANTS: cn_fname(8)TYPEcVALUECUST07AD.CONSTANTS: cn_path(20)TYPEcVALUELaoxiangzerotest.SELECTION-SCREEN BEGINPARAMETERS: pr_file(40)OF BLOCK blk1TYPE c.WITH FRAME TITLEtex

11、t-001.SELECTION-SCREEN END OF BLOCKblk1.INITIALIZATION.pr_file = cn_fname.START-OF-SELECTION.CONCATENATE cn_path pr_file OPEN DATASET pr_fileIF sy-subrc 0. WRITE:/ text-002.EXIT.ENDIF.DO.O pr_file.MODE FOR INPUT ENCODINGEXTDEFAULT.READ DATASET pr_file IF sy-subrc 0. EXIT.ENDIF.APPEND gw_rec TO gt_re

12、c. ENDDO.O gw_rec.END-OF-SELECTION.CLOSE DATASET pr_file.LOOP AT gt_recO gw_rec.WRITE:/gw_rec-kunnr, gw_rec-name1, gw_rec-sortl,gw_rec-ort01,gw_rec-pstlz, gw_rec-land1, gw_rec-spras.ENDLOOP.Step 3: 源文件Step4:效果Step5:C 机的截图Step6:去掉A 机共享文件夹的 Everyone 权限Step 7: C 机无法zerotestStep 8: 同时程序也没法共享文件其实我更想测试的是: 是否可以通过限制启动 SAP 的这个用户的文件夹权限就能限制 open因为工作组模式只能限制本地dataset共享文件的权限， 但