GLT0 等表中数据的横向累加 ——塞依SAP培训

 

在 ABAP 的 GLT0、FAGLFLEXT 等余额表中，用诸如 TSL01、TSL02 …… TSL16 等字段记录了 16 个期间的发生额，在对某个期间取当年累计的时候，如果用其它语言，一般需要创建一个 CASE ... WHEN ... ENDCASE 结构，按输入的期间值来累加，代码量比较大。不过在 ABAP 中就不必那么麻烦了，SAP 提供了一个方便的语法来完成这类计算。代码如下：

 PARAMETERS: prpmax LIKE GLT0-RPMAX.

DATA: GLT0VARY LIKE GLT0-TSL01.

SUMME = SUMME + GLT0-TSLVT.
DO prpmax TIMES VARYING GLT0VARY FROM GLT0-TSL01 NEXT GLT0-TSL02.
SUMME = SUMME + GLT0VARY.
ENDDO.

其中的关键在于 DO ... VARYING ... FROM ... NEXT 这个语法结构。其中的 prpmax 代表循环次数，也就是输入的区间，GLT0VARY 代表存储获得值的临时变量，FROM 后的 GLT0-TSL01 是循环的开始位置，GLT0-TSL02 是循环的第二个位置，从这两个字段的位置，就能获得每次取值的内存偏移。这样，DO 循环的过程就是，首先取 GLT0-TSL01 的值，放到 GLT0VARY 中，然后执行 SUMME 的累加；再根据 prpmax 的值循环指定次数，每次都按 GLT0-TSL01 的长度取相应的内存片段，放到 GLT0VARY 中，执行累加。因此，在这样的循环里，需要累加的字段必须连续且长度相同。下图表示了它的内存使用情况：

　　　　　　　　　　－－循环开始时从这个位置读取
　　　　　　　　　　｜　　　　　－－第二次循环时从这个位置读取
　　　　　　　　　　｜　　　　　｜　　　　　－－．．．．
　　　　　　　　　　｜　　　　　｜　　　　　｜　　　－－最多循环 16 次，否则会读到其它内存位置，导致错误
　　　　　　　　　　Ｖ　　　　　Ｖ　　　　　Ｖ　　　Ｖ
｜－－－｜－－－－－｜－－－－－｜－－－－－｜－－－｜－－－－－｜－－－｜
｜．．．｜ＴＳＬＶＴ｜ＴＳＬ０１｜ＴＳＬ０２｜．．．｜ＴＳＬ１６｜．．．｜
｜－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－｜

ABAP-表中数据的横向累加的更多相关文章

  1. Oracle 取两个表中数据的交集并集差异集合

    Oracle 取两个表中数据的交集 关键字: Oracle 取两个表中数据的交集 INTERSECT Oracle 作为一个大型的关系数据库,日常应用中往往需要提取两个表的交集数据 例如现有如下表,要 ...

  2. MySQL查询数据表中数据记录（包括多表查询）

    MySQL查询数据表中数据记录(包括多表查询) 在MySQL中创建数据库的目的是为了使用其中的数据. 使用select查询语句可以从数据库中把数据查询出来. select语句的语法格式如下: sele ...

  3. 对lua表中数据按一定格式处理，循环

    function putStartCard(handCard) function dataDeal(array,a,b,c) cclog("进入datadeal=============== ...

  4. Mysql清空表(truncate)与删除表中数据(delete)的区别

    来源:http://blog.is36.com/mysql_difference_of_truncate_and_delete/ 为某基于wordpress搭建的博客长久未除草,某天升级的时候发现已经 ...

  5. db2删除表中数据

    DB2数据库系统建表后,难免会有将表中数据清空的需求,本文将为您介绍DB2数据库中四种数据删除的方法,供您参考,您可以根据实际情况来进行选择,希望能对有所帮助. 1. 使用 DELETE 语句,即: ...

  6. mysql利用navicat导出表结构和表中数据

    LZ在网上搜索了要如何导出mysql的表结构和表中数据,发现有的方法不好用 记录一下好用的方式: 用navicat打开DB链接后,点击数据库,右击选择转储SQL文件,然后选择结构和数据: 之后弹出新的 ...

  7. pl/sql中误删表中数据并提交恢复办法

    最近在操作表中数据时,删除了表中数据,但是又想恢复,后来查到了官方的一篇文档,发现还蛮有用的,如下: 在pl/sql中运行,select * from A as of TIMESTAMP to_tim ...

  8. Navicat如何直接修改表中数据？

    Navicat如何直接修改表中数据?

  9. mysql--对行(表中数据)的增删改查

    一.插入数据(增加)insert 1.插入数据(顺序插入) 语法一: INSERT INTO 表名(字段1,字段2,字段3…字段n) VALUES(值1,值2,值3…值n); #指定字段来插入数据,插 ...

随机推荐

  1. Apache Flume 学习笔记

    # 从http://flume.apache.org/download.html 下载flume ############################################# # 概述: ...

  2. JAVA学习笔记系列3-JVM、JRE和JDK的区别

    JVM(Java Virtual Machine)就是一个虚拟的用于执行bytecode字节码的“虚拟计算机”.它和os打交道 JRE(Java Runtime Environment)包含:Java ...

  3. 何在mysql查找效率慢的SQL语句？

    如何在mysql查找效率慢的SQL语句呢?这可能是困然很多人的一个问题,MySQL通过慢查询日志定位那些执行效率较低的SQL 语句,用--log-slow-queries[=file_name]选项启 ...

  4. # 20175120 2018.3.3 《Java程序设计》第1周学习总结

    ## 教材学习内容总结 1.安装ubuntu,在实验楼学习liunx系统各种功能的实现.2.在ubuntu平台上进行java程序的编写3.学会使用JDB调试java程序,并将代码上传到码云上4.学习j ...

  5. 微信小程序传值以及获取值方法

    http://www.51xuediannao.com/xiaochengxu/xiaochengxu-chuanzhi.html

  6. 解决jquery库和base库的冲突

    jquery库引用在base库之前,$的所有权就是base库的:而jquery库引用在base库之前后的话,$的所有权就是jquery库的.解决这种库之间的冲突可用以下方法解决: 情况一,jquery ...

  7. 关于C++指针

    C++继承于C,对C的语法做了一些扩展.C语言中的指针占一个机器长度(32位处理器上一个指针占32位,64位处理器上安装64位操作系统一个指针占64位),指针的作用就是使用这块内存(4字节或者8字节) ...

  8. 让Mustache支持简单的IF语句

    转载:https://blog.csdn.net/iteye_16732/article/details/82070065 Mustache是一种Logic-less templates.不支持if这 ...

  9. win10 hyper-v 外网设置

    1. hyper-v管理器中添加 [虚拟交换机] 2. 为虚拟机添加网络适配器 在[虚拟交换机]中选择新创建的交换机 3.  在本本的[网络连接]中,按下 CTRL 键,然后选择[WLAN]和[vEt ...

  10. 【java】模板方法设计模式

    模板方法:在定义功能时,功能一部分是确认的,另一部分是不确认的或者后续会变化的.这时可以把不确定的部分暴露出去,定义成抽象类或者接口,由子类来完成. abstract class GetDuring ...