【SAP Abap】一条SQL语句实现支持报表项配置的财务报表

最新推荐文章于 2024-07-20 18:21:04 发布
最新推荐文章于 2024-07-20 18:21:04 发布
阅读量307 收藏 6
点赞数 4
文章标签： sql 数据库 开发语言
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/XLevon/article/details/139838132
版权

【SAP Abap】一条SQL语句实现支持报表项配置的财务报表

1、业务背景

在财务三大报表之外，业务需要使用类似的科目可配置方式，开发一个包括销售、管理、研发、财务的四大费用报表。

报表项配置表如下：
在这里插入图片描述
在这里插入图片描述
报表数据显示格式如下：
在这里插入图片描述
FS取值逻辑如下：
在这里插入图片描述
在这里插入图片描述
每月取值逻辑：根据选择屏幕输入的
公司代码、会计年度、分类账,前面的功能范围、报表项维护的总账科目，取出ACDOCA-POPER等于’01’期间ACDOCA-HSL汇总金额。

2、配置项特殊处理

（1）该报表没有AB左右列区分，使用列编号来区分四大费用类型：A-销售、B-管理、C-研发、D-财务；
（2）明细项太多，每种类型费用汇总项的公式列，写具体公式太麻烦，对未来增加明细项也不太友好，改用“ALL”标识。

3、实现方式（Hana Studio SQL语句）

with lt_acdoca as (
	select 
		h.zcolumn, h.zrow, h.ztext,
		a.rbukrs, a.gjahr, a.poper, a.rldnr, 
		a.RFAREA, a.racct, a.DRCRK, 
		( case when h.REVERSAL = 'X' then - a.hsl else a.hsl end ) as hsl
	from ztfi002 as h
	left join acdoca as a on a.gjahr = 2023 and a.poper <= 3	--测试数据
		and (
			( h.fsaknr = '' and h.tsaknr = '') 
			or ( 
				a.racct between 
					case when h.fsaknr = '' then h.tsaknr else h.fsaknr end
				and 
					case when h.tsaknr = '' then h.fsaknr else h.tsaknr end
			)
			-- 说明：以上or语句在opensql中不兼容，可以改用以下三句等效语句
			--or ( h.fsaknr = '' and h.tsaknr <> '' and a.racct = h.tsaknr )
			--or ( h.fsaknr <> '' and h.tsaknr = '' and a.racct = h.fsaknr )
			--or ( h.fsaknr <> '' and h.tsaknr <> '' and a.racct between h.fsaknr and h.tsaknr )
		) 
		and (
			( h.frfarea = '' and h.trfarea = '') 
			or ( a.RFAREA between 
					case when h.frfarea = '' then h.trfarea else h.frfarea end
				and 
					case when h.trfarea = '' then h.frfarea else h.trfarea end
				)
			-- 说明：以上or语句在opensql中不兼容，可以改用以下三句等效语句
			--or ( h.frfarea = '' and h.trfarea <> '' and a.RFAREA = h.trfarea )
			--or ( h.frfarea <> '' and h.trfarea = '' and a.RFAREA = h.frfarea )
			--or ( h.frfarea <> '' and h.trfarea <> '' and a.RFAREA between h.frfarea and h.trfarea )
		) 
		and ( 
			a.DRCRK = ( case when h.ZJFBS = 'X' then 'S' else '' end )
			or a.DRCRK = ( case when h.ZDFBS = 'X' then 'H' else '' end )
			-- 说明：以上两行语句在opensql中不兼容，可以改用以下三行等效语句
			--( h.ZJFBS = 'X' and h.ZDFBS = 'X' )
			--or ( h.ZJFBS = 'X' and a.DRCRK = 'S' )
			--or ( h.ZDFBS = 'X' and a.DRCRK = 'H' )
		)
	where h.ztype = 'FE' and h.FORMULA <> 'ALL'
	  and a.poper is not null
	  and a.rbukrs = 2300  -- 测试数据
)
, lt_lt_acdoca_sum as (
	select zcolumn, zrow, ztext, poper, sum( coalesce( hsl,0 ) ) as hsl 
	from lt_acdoca
	group by zcolumn, zrow, ztext, poper
)
, lt_header as ( select distinct zcolumn, zrow, ztext, ztype, FORMULA from ztfi002 )
select h.zcolumn, h.zrow, h.ztext,
	sum( coalesce( s.hsl,0 ) ) as hsl,
	sum( case when s.poper = '001' then coalesce( s.hsl,0 ) else 0 end ) as hsl01,
	sum( case when s.poper = '002' then coalesce( s.hsl,0 ) else 0 end ) as hsl02,
	sum( case when s.poper = '003' then coalesce( s.hsl,0 ) else 0 end ) as hsl03,
	sum( case when s.poper = '004' then coalesce( s.hsl,0 ) else 0 end ) as hsl04,
	sum( case when s.poper = '005' then coalesce( s.hsl,0 ) else 0 end ) as hsl05,
	sum( case when s.poper = '006' then coalesce( s.hsl,0 ) else 0 end ) as hsl06,
	sum( case when s.poper = '007' then coalesce( s.hsl,0 ) else 0 end ) as hsl07,
	sum( case when s.poper = '008' then coalesce( s.hsl,0 ) else 0 end ) as hsl08,
	sum( case when s.poper = '009' then coalesce( s.hsl,0 ) else 0 end ) as hsl09,
	sum( case when s.poper = '010' then coalesce( s.hsl,0 ) else 0 end ) as hsl10,
	sum( case when s.poper = '011' then coalesce( s.hsl,0 ) else 0 end ) as hsl11,
	sum( case when s.poper = '012' then coalesce( s.hsl,0 ) else 0 end ) as hsl12,
	sum( case when s.poper = '013' then coalesce( s.hsl,0 ) else 0 end ) as hsl13,
	sum( case when s.poper = '014' then coalesce( s.hsl,0 ) else 0 end ) as hsl14,
	sum( case when s.poper = '015' then coalesce( s.hsl,0 ) else 0 end ) as hsl15,
	sum( case when s.poper = '016' then coalesce( s.hsl,0 ) else 0 end ) as hsl16
from lt_header as h
left join lt_lt_acdoca_sum as s on s.zcolumn = h.zcolumn and s.zrow = h.zrow
where h.ztype = 'FE' and h.FORMULA <> 'ALL'
group by h.zcolumn, h.zrow, h.ztext
union all
select h.zcolumn, h.zrow, h.ztext,
	sum( coalesce( s.hsl,0 ) ) as hsl,
	sum( case when s.poper = '001' then coalesce( s.hsl,0 ) else 0 end ) as hsl01,
	sum( case when s.poper = '002' then coalesce( s.hsl,0 ) else 0 end ) as hsl02,
	sum( case when s.poper = '003' then coalesce( s.hsl,0 ) else 0 end ) as hsl03,
	sum( case when s.poper = '004' then coalesce( s.hsl,0 ) else 0 end ) as hsl04,
	sum( case when s.poper = '005' then coalesce( s.hsl,0 ) else 0 end ) as hsl05,
	sum( case when s.poper = '006' then coalesce( s.hsl,0 ) else 0 end ) as hsl06,
	sum( case when s.poper = '007' then coalesce( s.hsl,0 ) else 0 end ) as hsl07,
	sum( case when s.poper = '008' then coalesce( s.hsl,0 ) else 0 end ) as hsl08,
	sum( case when s.poper = '009' then coalesce( s.hsl,0 ) else 0 end ) as hsl09,
	sum( case when s.poper = '010' then coalesce( s.hsl,0 ) else 0 end ) as hsl10,
	sum( case when s.poper = '011' then coalesce( s.hsl,0 ) else 0 end ) as hsl11,
	sum( case when s.poper = '012' then coalesce( s.hsl,0 ) else 0 end ) as hsl12,
	sum( case when s.poper = '013' then coalesce( s.hsl,0 ) else 0 end ) as hsl13,
	sum( case when s.poper = '014' then coalesce( s.hsl,0 ) else 0 end ) as hsl14,
	sum( case when s.poper = '015' then coalesce( s.hsl,0 ) else 0 end ) as hsl15,
	sum( case when s.poper = '016' then coalesce( s.hsl,0 ) else 0 end ) as hsl16
from lt_header as h
left join lt_lt_acdoca_sum as s on s.zcolumn = h.zcolumn
where h.ztype = 'FE' and h.FORMULA = 'ALL'
group by h.zcolumn, h.zrow, h.ztext
order by h.zcolumn, h.zrow

显示结果如下：
在这里插入图片描述

4、实现方式（Abap OpenSQL语句）

将以上SQL语句复制到Abap代码中，检查代码语句，根据错误提示进行调整，最终调整代码如下：

FORM FRM_GET_DATA.
  WITH +LT_ACDOCA AS (
    SELECT
      H~ZCOLUMN, H~ZROW, H~ZTEXT,
      A~RBUKRS, A~GJAHR, A~POPER, A~RLDNR,
      A~RFAREA, A~RACCT, A~DRCRK,
      ( CASE WHEN H~REVERSAL = 'X' THEN - A~HSL ELSE A~HSL END ) AS HSL
    FROM ZTFI002 AS H
    LEFT JOIN ACDOCA AS A ON  A~GJAHR = @P_RYEAR AND ( @P_POPER IS INITIAL OR A~POPER <= @P_POPER )
      AND (
        ( H~FSAKNR = '' AND H~TSAKNR = '')
        OR ( H~FSAKNR = '' AND H~TSAKNR <> '' AND A~RACCT = H~TSAKNR )
        OR ( H~FSAKNR <> '' AND H~TSAKNR = '' AND A~RACCT = H~FSAKNR )
        OR ( H~FSAKNR <> '' AND H~TSAKNR <> '' AND A~RACCT BETWEEN H~FSAKNR AND H~TSAKNR )
      )
      AND (
        ( H~FRFAREA = '' AND H~TRFAREA = '')
        OR ( H~FRFAREA = '' AND H~TRFAREA <> '' AND A~RFAREA = H~TRFAREA )
        OR ( H~FRFAREA <> '' AND H~TRFAREA = '' AND A~RFAREA = H~FRFAREA )
        OR ( H~FRFAREA <> '' AND H~TRFAREA <> '' AND A~RFAREA BETWEEN H~FRFAREA AND H~TRFAREA )
      )
      AND (
      ( H~ZJFBS = 'X' AND H~ZDFBS = 'X' )
      OR ( H~ZJFBS = 'X' AND A~DRCRK = 'S' )
      OR ( H~ZDFBS = 'X' AND A~DRCRK = 'H' )
      )
    WHERE H~ZTYPE = 'FE' AND H~FORMULA <> 'ALL'
      AND A~POPER IS NOT NULL
      AND A~RBUKRS IN @R_BUKRS
      AND A~RLDNR = @P_RLDNR
  )
  , +LT_LT_ACDOCA_SUM AS (
    SELECT ZCOLUMN, ZROW, ZTEXT, POPER, SUM( COALESCE( HSL,0 ) ) AS HSL
    FROM +LT_ACDOCA
    GROUP BY ZCOLUMN, ZROW, ZTEXT, POPER
  )
  , +LT_HEADER AS ( SELECT DISTINCT ZCOLUMN, ZROW, ZTEXT, ZTYPE, FORMULA FROM ZTFI002 )
  SELECT H~ZCOLUMN, H~ZROW, H~ZTEXT,
    SUM( COALESCE( S~HSL,0 ) ) AS HSL,
    SUM( CASE WHEN S~POPER = '001' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL01,
    SUM( CASE WHEN S~POPER = '002' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL02,
    SUM( CASE WHEN S~POPER = '003' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL03,
    SUM( CASE WHEN S~POPER = '004' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL04,
    SUM( CASE WHEN S~POPER = '005' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL05,
    SUM( CASE WHEN S~POPER = '006' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL06,
    SUM( CASE WHEN S~POPER = '007' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL07,
    SUM( CASE WHEN S~POPER = '008' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL08,
    SUM( CASE WHEN S~POPER = '009' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL09,
    SUM( CASE WHEN S~POPER = '010' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL10,
    SUM( CASE WHEN S~POPER = '011' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL11,
    SUM( CASE WHEN S~POPER = '012' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL12,
    SUM( CASE WHEN S~POPER = '013' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL13,
    SUM( CASE WHEN S~POPER = '014' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL14,
    SUM( CASE WHEN S~POPER = '015' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL15,
    SUM( CASE WHEN S~POPER = '016' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL16
  FROM +LT_HEADER AS H
  LEFT JOIN +LT_LT_ACDOCA_SUM AS S ON S~ZCOLUMN = H~ZCOLUMN AND S~ZROW = H~ZROW
  WHERE H~ZTYPE = 'FE' AND H~FORMULA <> 'ALL'
  GROUP BY H~ZCOLUMN, H~ZROW, H~ZTEXT
  UNION ALL
  SELECT H~ZCOLUMN, H~ZROW, H~ZTEXT,
    SUM( COALESCE( S~HSL,0 ) ) AS HSL,
    SUM( CASE WHEN S~POPER = '001' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL01,
    SUM( CASE WHEN S~POPER = '002' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL02,
    SUM( CASE WHEN S~POPER = '003' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL03,
    SUM( CASE WHEN S~POPER = '004' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL04,
    SUM( CASE WHEN S~POPER = '005' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL05,
    SUM( CASE WHEN S~POPER = '006' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL06,
    SUM( CASE WHEN S~POPER = '007' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL07,
    SUM( CASE WHEN S~POPER = '008' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL08,
    SUM( CASE WHEN S~POPER = '009' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL09,
    SUM( CASE WHEN S~POPER = '010' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL10,
    SUM( CASE WHEN S~POPER = '011' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL11,
    SUM( CASE WHEN S~POPER = '012' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL12,
    SUM( CASE WHEN S~POPER = '013' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL13,
    SUM( CASE WHEN S~POPER = '014' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL14,
    SUM( CASE WHEN S~POPER = '015' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL15,
    SUM( CASE WHEN S~POPER = '016' THEN COALESCE( S~HSL,0 ) ELSE 0 END ) AS HSL16
  FROM +LT_HEADER AS H
  LEFT JOIN +LT_LT_ACDOCA_SUM AS S ON S~ZCOLUMN = H~ZCOLUMN
  WHERE H~ZTYPE = 'FE' AND H~FORMULA = 'ALL'
  GROUP BY H~ZCOLUMN, H~ZROW, H~ZTEXT
  ORDER BY ZCOLUMN, ZROW
  INTO CORRESPONDING FIELDS OF TABLE @GT_DATA.

ENDFORM.

最终结果如下：
在这里插入图片描述
在这里插入图片描述

5、总结

通过以上方法实现的报表，可以大大减少abap代码量，充分利用hana数据库性能，很大程度的提高数据查询效率。

原创文章，转载请注明来源-X档案

X档案库
关注
  • 4
    点赞
  • 踩
  • 6
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
【ABAP】OPEN SQL（八）「WHERE语句大全」
Thunder Wang的博客
03-19 5720
在本节内容中，我们将继续学习ABAP OPEN SQL的知识，今天带来的内容是子查询在OPEN SQL中的应用。子查询可以帮助我们在不知道某些具体数据的情况下查询到我们想要的结果，是经常使用的重点语句之一。
SAP ABAP SQL查询分析器（ABAP动态SQL执行）ZSQLEXPLORER
03-25
这个是国外人使用ABAP写的一个类似一SQL Server的查询分析器，它能够直接运行ABAP的OPEN SQL，由于SE11或者是SE16都只能对一表进行查询，但很多的时候我们需要对多个表进行联合查询，这时就可以发挥很大作用了，希望...
SAP-ABAP-SQL中的select语句讲解
09-14
ABAP中SQL语法详细介绍，包括基础语法和各种聚合函数，如MAX,MIN,AVG,COUNT,SUM,DIV,MOD,CEIL,FLOOR,DIVSION,ROUND,FOR ALL ENTRIES IN.除了各种聚合函数还有字段拆分，连接，子语句查询，字段类型转换，分情况赋值等
ABAP SAP开发日记三报表的开发
m0_57879516的博客
07-12 367
基本需求：一个销售流程要经过报价、生成合同、生成销售订单、采购、生产产品、销售发货、到货确认、开票。这里的数据应该不能放出来，所以我只讲一下代码，以及应该有什么结果。因为我之前没有接触过ABAP编程，对此比较陌生，所以此博客用于自己的学习记录，也希望给观看此博客的人提供一些帮助。上篇博客我们已经学习了报表程序的大致结构，本篇我们就利用一个报表程序，从最基本的语法知识，到报表的基本结构进行一个介绍和学习。以上的代码，如果认真学习了，我相信你可以开始一个报表的开发了，共同进步，共同学习！
SAP S/4 ABAP OPEN SQL中WITH的应用案例
twins622的博客
02-21 408
原文链接：https://blog.csdn.net/XLevon/article/details/125989172。优点：代码精简，一次访问数据库，减少循环操作，充分利用hana内存计算性能，能保证数据量大的时候代码效率。缺点：代码冗长，多次访问数据库，多次循环操作，数据量大的时候代码效率低。缺点：代码不好调试，需借助hana studio查询验证脚本。优点：逻辑分层，比较容易理解；
财务类程序使用的表（我的第一篇）
ABAP这几年
06-09 1137
BKPF,"会计核算凭证标题 BSEG,"会计核算凭证段 T003T,"凭证类型文本 SKAT,"总帐科目主记录（科目表：说明） KNA1,"客户主文件的一般数据 CSKT,"成本中心说明文本 TFKBT,"功能范围的名称 CEPCT,  "利润中心主数据文本 T053S,  "付款原因代码文本 BSIS "会计核算，未清明细
SAP 财务中的常用表
DKman 的随笔
02-02 6669
财务主数据SKB1 总帐科目主记录 (公司代码) SAP中配置的 科目表凭证相关BSEG 会计核算凭证段 如有对应物料凭证则记录对应物料凭证中的物料号BKPF 会计核算凭证标题BSIS 会计核算：用于总帐科目的第二个索引 有对应清帐凭证字段总账相关FAGLFLEXT 总帐: 总计 总账中每个月的借方贷方总计以及年度初始科目余额
sap 面向对象程序设计ABAP的SQL语句
weixin_44741835的博客
01-15 734
2.3.2 查询数据 selectNative SQL能够直接访问数据库，有一定的安全风险，所以一般不推荐使用Native SQL。AP平台升级到HANA之后，SAP S/4HANA的数据库将固定为HANA内存数据库，随着数据库计算效率极大地提高，SAP推荐将复杂的逻辑从ABAP的应用服务器下沉到数据库服务器端，以充分利用内存数据库的性能优势。SAP的HANA数据库所采用的SQL实现称为SQL Script（SQL脚本），是SAP对标准SQL的一种扩展实现。
SAP abap sql 语句执行无结果
月阴荒的博客
07-31 245
原因是SAP 中se16n看见的值可能经过转换，例如下面的SQL，就会执行失败，因为SH 实际上是WE转换过来的，这时候我们需要点开详细信息，才能知道原来转换前的值是什么。有些情况下，我们的sql语句执行之后，却没有得到结果，可能是因为条件不对。知道了原来的值是WE之后，把条件换成WE即可。
1 SAP ABAP编程实战-SQL语句UPDATE直接更改后台表EKPO库存地点(正式系统慎用)
weixin_36231828的博客
06-09 1006
MM模块在创建采购订单时，因为物料主数据MRP2中维护的库存地点错误，导致多个采购订单创建后，系统自动取的物料主数据库存地点错误。
SAP ABAP开发学习——第14课：动态SQL（视频教程）
04-07
在本课程中，我们将深入探讨SAP ABAP中的一个重要概念——动态SQL，这对于任何希望成为专业ABAP开发人员的人来说都是必不可少的知识。SAP ABAP（Advanced Business Application Programming）是SAP系统中用于开发...
SAP ABAP开发学习——第8课：语法5（视频教程）
04-06
在本课程中，我们将深入探讨SAP ABAP的语法第五部分。SAP ABAP（Advanced Business Application Programming）是SAP系统中的主要编程语言，用于开发业务应用和接口。本课内容将围绕ABAP的核心概念，帮助初学者掌握这...
报表监控V1.zip_ABAP实战_SAP
09-21
在SAP系统中，ABAP（Advanced Business Application Programming）是一种编程语言，用于开发企业级的应用程序，特别是报表监控。本文将深入探讨ABAP在报表监控中的应用，以及如何通过SAP进行实战操作。 1. ABAP简介...
SAP ABAP SQL查询语句-内连接与左连接使用
SAP ABAP开发技能记录分享
08-19 452
SQL查询语句-内连接与左连接使用。
SQL Server开发新纪元：用SQL Server Data Tools (SSDT) 打造数据库
最新发布
2401_85341950的博客
07-20 1010
SSDT 是一个基于Visual Studio的开发工具，它集成了对SQL Server数据库项目的支持。SSDT 提供了可视化的设计界面，以及对数据库版本控制和自动化测试的支持。
SQL执行流程、SQL执行计划、SQL优化
风中的默默
07-19 449
返回两个表中的匹配行。返回左表中的所有记录以及右表中的匹配记录。返回右表中的所有记录以及左表中的匹配记录。返回左侧或右侧表中有匹配的所有记录。
【MySQL】根据binlog日志获取回滚sql的一个开发思路
weixin_45385457的博客
07-19 512
不同客户端之间会交替追加在 binlog 中，需要通过 👆的 binlog 匹配流程来控制匹配。行，需要再次寻找 thread_id 相同的行，匹配到后执行上一个流程。在 binlog 中的线程 ID 记录为 thread_id。一个线程执行多个 sql 回滚到同一个文件可能带来的问题。对应 binlog 日志中的 thread_id=指定 mysql 客户端 开始时间和结束时间。打开 mysql 客户端 开始时间。关闭 mysql 客户端 结束时间。先匹配 thread_id 相同的。
abap 如何测试sql语句
07-28
在ABAP中，可以使用ABAP Unit框架来测试SQL语句。ABAP Unit是SAP提供的一个单元测试框架，可以用于测试ABAP程序的各个部分，包括SQL语句。 要测试SQL语句，首先需要创建一个测试类。在测试类中，可以使用ABAP Unit提供的断言方法来验证SQL语句的执行结果是否符合预期。 下面是一个示例代码，演示了如何使用ABAP Unit测试SQL语句： ``` CLASS lcl_sql_test DEFINITION FOR TESTING. PRIVATE SECTION. METHODS test_sql_statement. ENDCLASS. CLASS lcl_sql_test IMPLEMENTATION. METHOD test_sql_statement. DATA: lt_result TYPE TABLE OF <table_name>. " 执行SQL语句 EXEC SQL. SELECT * FROM <table_name> INTO TABLE @lt_result. ENDEXEC. " 使用断言方法验证结果 cl_abap_unit_assert=>assert_equals( act = lt_result, exp = <expected_result> ). ENDMETHOD. ENDCLASS. ``` 在上面的示例中，`<table_name>`是要测试的表名，`<expected_result>`是预期的结果。可以根据具体的测试需求，编写相应的SQL语句和断言方法来进行测试。 需要注意的是，在ABAP Unit中执行SQL语句时，需要使用`EXEC SQL`和`ENDEXEC`语句将SQL语句包裹起来。 通过这种方式，可以方便地测试ABAP程序中的SQL语句，并确保其正确性。 #### 引用[.reference_title] - *1* *2* *3* [【ABAP】OPEN SQL（五）「INSERT语句 | UPDATE语句」](https://blog.csdn.net/weixin_59480481/article/details/129414288)[target="_blank" data-report-click={"spm":"1018.2226.3001.9630","extra":{"utm_source":"vip_chatgpt_common_search_pc_result","utm_medium":"distribute.pc_search_result.none-task-cask-2~all~insert_cask~default-1-null.142^v91^insert_down1,239^v3^insert_chatgpt"}} ] [.reference_item] [ .reference_list ]
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值