1、读取内表行新语法

740新语法中，对标READ，提出了新的语法，如下：

1.1、根据字段值查找

"-----------------------------@斌将军-----------------------------

"老语法

READ TABLE lt_acd INTO ls_acd WITH KEY rbukrs = gs_acd-rbukrs.

IF sy-subrc EQ 0.

ENDIF.

"新语法

ls_acd = lt_acd[ rbukrs = gs_acd-rbukrs ].

"-----------------------------@斌将军-----------------------------

1.2、按索引查找

"-----------------------------@斌将军-----------------------------

"老语法

READ TABLE lt_acd INTO ls_acd INDEX 1.

IF sy-subrc EQ 0.

ENDIF.

"新语法

ls_acd = lt_acd[ 1 ].

"-----------------------------@斌将军-----------------------------

1.3、判断记录是否存在

"-----------------------------@斌将军-----------------------------

"老语法

READ TABLE lt_acd WITH KEY rbukrs = gs_acd-rbukrs TRANSPORTING NO FIELDS.

IF sy-subrc EQ 0.

ENDIF.

"新语法

IF LINE_EXISTS( lt_acd[ rbukrs = gs_acd-rbukrs ] ).

ENDIF.

"-----------------------------@斌将军-----------------------------

1.4、获取行索引

"-----------------------------@斌将军-----------------------------

"老语法

READ TABLE lt_acd WITH KEY rbukrs = gs_acd-rbukrs TRANSPORTING NO FIELDS.

IF sy-subrc EQ 0.

WRITE:SY-TABIX.

ENDIF.

"新语法

LV_INDEX = LINE_INDEX( lt_acd[ rbukrs = gs_acd-rbukrs ] ).

"-----------------------------@斌将军-----------------------------

需要特别注意的是，新语法必须用TRY CATCH，或在查询前，用LINE_EXISTS()判断是否存在，否则将会导致DUMP

TRY .

    ls_acd = lt_acd[ rbukrs = '333' ].

CATCH cx_sy_itab_line_not_found .

    MESSAGE '未找到数据' TYPE 'E' .

ENDTRY.

"或

IF line_exists( lt_acd[ rbukrs = '333' ] ).

  ls_acd = lt_acd[ rbukrs = '333' ].

ELSE.

  MESSAGE '未找到数据' TYPE 'E' .

ENDIF.

2.效率对比

由于老语法可以使用二分法查找，因此在效率上将会有差异。

现编写一个实例，循环2万条数据GT_ACD，并循环查询有14万条数据的LT_ACD中对应的值。下边测试各种情况下的查询速度

2.1、新语法

"-----------------------------@斌将军-----------------------------

"1.测试新语法------------------------------------

GET TIME STAMP FIELD lv_current1.

CLEAR:lv_index.

LOOP AT gt_acd INTO gs_acd.

  lv_index = lv_index + 1.

  TRY .

      ls_acd = lt_acd[ rbukrs = gs_acd-rbukrs gjahr = gs_acd-gjahr  belnr = gs_acd-belnr docln = gs_acd-docln ].

    CATCH cx_sy_itab_line_not_found .

      MESSAGE '未找到数据' TYPE 'E' .

  ENDTRY.

ENDLOOP.

GET TIME STAMP FIELD lv_current2.

"-----------------------------@斌将军-----------------------------

结果：

2.2、老语法READ

"-----------------------------@斌将军-----------------------------

"2.测试老语法------------------------------------

GET TIME STAMP FIELD lv_current1.

CLEAR:lv_index.

LOOP AT gt_acd INTO gs_acd.

  lv_index = lv_index + 1.

  READ TABLE lt_acd INTO ls_acd WITH KEY rbukrs = gs_acd-rbukrs

                                          gjahr = gs_acd-gjahr

                                          belnr = gs_acd-belnr

                                          docln = gs_acd-docln.

  IF sy-subrc EQ 0.

  ENDIF.

ENDLOOP.

GET TIME STAMP FIELD lv_current2.

"-----------------------------@斌将军-----------------------------

结果：

2.3、老语法READ二分查找

"-----------------------------@斌将军-----------------------------

GET TIME STAMP FIELD lv_current1.

CLEAR:lv_index.

SORT lt_acd BY rbukrs gjahr belnr docln.

LOOP AT gt_acd INTO gs_acd.

  READ TABLE lt_acd INTO ls_acd WITH KEY rbukrs = gs_acd-rbukrs

                                          gjahr = gs_acd-gjahr

                                          belnr = gs_acd-belnr

                                          docln = gs_acd-docln BINARY SEARCH.

  IF sy-subrc EQ 0.

    lv_index = lv_index + 1.

  ENDIF.

ENDLOOP.

GET TIME STAMP FIELD lv_current2.

"-----------------------------@斌将军-----------------------------

结果：< 1S

2.4、新语法+排序表

"-----------------------------@斌将军-----------------------------

"4.测试新语法+排序表------------------------------------

lt_acd_sort = lt_acd.

GET TIME STAMP FIELD lv_current1.

CLEAR:lv_index.

LOOP AT gt_acd INTO gs_acd.

  lv_index = lv_index + 1.

  TRY .

      ls_acd = lt_acd_sort[ rbukrs = gs_acd-rbukrs gjahr = gs_acd-gjahr  belnr = gs_acd-belnr docln = gs_acd-docln ].

    CATCH cx_sy_itab_line_not_found .

      MESSAGE '未找到数据' TYPE 'E' .

  ENDTRY.

ENDLOOP.

GET TIME STAMP FIELD lv_current2.

"-----------------------------@斌将军-----------------------------

结果：< 1S

综上所述：不使用二分查找，则新老语法都很慢。使用二分查找或新语法搭配排序表，则速度都有非常明显的提升

 
 
此页面的语言为英语
 
翻译为中文（简体）
 
 
 
 
  • 中文（简体）
  • 中文（繁体）
  • 丹麦语
  • 乌克兰语
  • 乌尔都语
  • 亚美尼亚语
  • 俄语
  • 保加利亚语
  • 克罗地亚语
  • 冰岛语
  • 加泰罗尼亚语
  • 匈牙利语
  • 卡纳达语
  • 印地语
  • 印尼语
  • 古吉拉特语
  • 哈萨克语
  • 土耳其语
  • 威尔士语
  • 孟加拉语
  • 尼泊尔语
  • 布尔语(南非荷兰语)
  • 希伯来语
  • 希腊语
  • 库尔德语
  • 德语
  • 意大利语
  • 拉脱维亚语
  • 挪威语
  • 捷克语
  • 斯洛伐克语
  • 斯洛文尼亚语
  • 旁遮普语
  • 日语
  • 普什图语
  • 毛利语
  • 法语
  • 波兰语
  • 波斯语
  • 泰卢固语
  • 泰米尔语
  • 泰语
  • 海地克里奥尔语
  • 爱沙尼亚语
  • 瑞典语
  • 立陶宛语
  • 缅甸语
  • 罗马尼亚语
  • 老挝语
  • 芬兰语
  • 英语
  • 荷兰语
  • 萨摩亚语
  • 葡萄牙语
  • 西班牙语
  • 越南语
  • 阿塞拜疆语
  • 阿姆哈拉语
  • 阿尔巴尼亚语
  • 阿拉伯语
  • 韩语
  • 马尔加什语
  • 马拉地语
  • 马拉雅拉姆语
  • 马来语
  • 马耳他语
  • 高棉语
 
随时将英语翻译为中文（简体）PRO
一律不翻译英语
一律不翻译i.cnblogs.com

ABAP READ内表新老语法对比的更多相关文章

  1. ABAP 动态内表添加单元格颜色字段

    *动态内表alv显示时要求某些单元格显示颜色 *wa_fldcat-datatype不能添加LVC_T_SCOL类型,在创建好内表之后,再添加颜色列. DATA: wa_fldcat TYPE lvc ...

  2. 转载: ABAP动态内表操作

    顾名思义,动态表的列是可以根据数据的变化而变化的,会使报表显示更简洁漂亮. 以下是实现方法. ------------------------------------------- 1, 创建动态内表 ...

  3. 转ABAP将内表行列转换实例(动态内表) .

    把内表的行列转换,网上的例子很多,但是新人想看懂,几乎很难,所以总结下我是怎么完成的. 比如:你的内表如图: 你想让内表最后展示成这样:如图: 那么完成之后会是这样: 完成这个过程,得用到动态内表.看 ...

  4. ABAP 动态内表 动态ALV

    DATA: DY_TABLE TYPE REF TO DATA, DY_WA TYPE REF TO DATA. FIELD-SYMBOLS: <DYN_TABLE> TYPE TABLE ...

  5. SAP ABAP: 把内表数据以excel或csv格式，通过前台或者后台的方式上传至FTP服务器

    今天接到一个FTP的需求,就是每天晚上把当天某个报表的数据自动保存excel上传到FTP服务器. SAP已经有现成的FTP函数使用,可以通过函数的方式来实现,实现前先准备一些数据: User:登录FT ...

  6. express新旧语法对比

    备个份, 原文: http://stackoverflow.com/questions/25550819/error-most-middleware-like-bodyparser-is-no-lon ...

  7. abap将内表数据导出为excel文件

    一个不错的方案: WHEN 'EXPORT'. "导出数据 DATA : GT_TEMP TYPE TABLE OF TY_ITEM WITH HEADER LINE. LOOP AT GT ...

  8. ffmpeg新老接口对比

    http://blog.csdn.net/leixiaohua1020/article/details/41013567

  9. ABAP 7.4 新语法-内嵌生命和内表操作（转）

    转自:https://www.cnblogs.com/mingdashu/p/6744637.html ABAP 7.4 新语法-内嵌生命和内表操作   1.内嵌声明 2.内表操作 3.opensql ...

  10. 2019.11.07【每天学点SAP小知识】Day2 - ABAP 7.40新语法 - 内表

    今天学习一下内表的表达式在ABAP 7.4之后的语法: SELECT * FROM mara INTO TABLE @DATA(gt_mara)UP TO 10 ROWS. DATA gt_mara_ ...

随机推荐

  1. vscode python配置pip源

    更换到国内清华园 C盘-User-用户名-新建"pip"文件夹-新建"pip.ini"文件 pip.ini 文件中内容: [global]index-url = ...

  2. 解决：pytesseract.pytesseract.TesseractNotFoundError: tesseract is not installed or it‘s not in your PATH. See README file for more information.

    问题:使用pytesseract库识别图片中文字时出现报错 代码: import pytesseract from PIL import Image,ImageEnhance img=Image.op ...

  3. 【JSON】Python读取JSON文件报错json.decoder.JSONDecodeError的问题

    报错 json.decoder.JSONDecodeError: Expecting property name enclosed in double quotes: line * column * ...

  4. C语言——数组

    一.一维数组 声明形式: type arrayName [ arraySize ]; 实例: 1 #include <stdio.h> 2 int main() 3 { 4 int Arr ...

  5. 学习JavaScript第一周

    三种输出方式,console.log.element.write.alert(): 简单数据类型:数值型.字符串型.布尔类型.undefined.null 复杂数据类型:对象 数据类型的转换:字符串转 ...

  6. c++结对编程

    || |:--|:--| |Github项目|Github地址 |结对伙伴|伙伴地址1伙伴地址2 PSP表格 ||| |:--|:--|:--|:--| |PSP2.1|Personal Softwa ...

  7. Java中集合基础相关知识

    1.集合基础 1.1 集合概述 编程的时候如果需要存储多个数据使用长度固定的数据存储,适应不了元素个数变化的需求,这时候我们就需要用集合. 集合类的特点:提供了一种存储空间可变的存储模型,存储的数据容 ...

  8. vue echarts 多个图表自适应

    <template> <div :id="id" :style="{width: `${width}`, height: `${height}`}&qu ...

  9. Ndisuio win10 注册表下载

    看了一下应该没有什么隐私内容,丢失这个注册表信息会让网络服务无法启动,新建txt,复制后修改后缀为.reg,双击录入,在管理员权限下cmd中输入 netsh winsock reset 重启 Wind ...

  10. IT工具知识-09：OpenWrt设置旁路由

    0.使用背景 设备:N1 固件:filppy打包的60+ 1.使用方法 1.1知道主路由的IP地址(例如192.168.1.1) 1.2在OpenWrt管理界面下进行设置 进入OpenWrt管理界面 ...