【SAP Hana】SAP Hana存储过程开发

news2025/1/4 19:00:01

SAP Hana存储过程开发

  • Hana 存储过程
    • 1、创建&更新语法
    • 2、删除语法
    • 3、调用语法
    • 4、实例演示
        • （1）存储过程入门
        • （2）指定 DEFAULT SCHEMA
        • （3）定义内部变量，执行多个查询
        • （4）定义值类型入参
        • （5）定义值类型出参
        • （6）定义表类型出参
        • （7）指定 RESULT VIEW
        • （8）定义表类型入参
        • （9）综合实例

Hana 存储过程

与纯粹的sql语句相比 存储过程的性能优于前者。并且存储过程简化了查询常见子表达式的步骤，并且提高了SQLScript的可读性。

1、创建&更新语法

{ CREATE [ OR REPLACE ] | ALTER } PROCEDURE [schema_name.]<proc_name>
   [ ( [ IN|OUT|INOUT VAR_NAME VAR_TYPE ] ) ]
   [ LANGUAGE <lang> ]
   [ SQL SECURITY <mode> ]
   [ DEFAULT SCHEMA <default_schema_name> ]
   [ READS SQL DATA [ WITH RESULT VIEW <view_name> ] ]
   [ <variable_cache_clause> ]
   [ DETERMINISTIC ]
   [ WITH ENCRYPTION ]
   [ AUTOCOMMIT DDL { ON | OFF } ]
   AS
     { BEGIN [ SEQUENTIAL EXECUTION ]
        <statement_body>
       END
       | HEADER ONLY };

语法解析：
符号说明：[] 可选项；<> 必须项；{ | } 选其一； | 或，可多选。

{ CREATE [ OR REPLACE ] | ALTER } PROCEDURE [schema_name.]<proc_name>

定义存储过程的名称proc_name，及所在的schema_name。

[ ( [ IN|OUT|INOUT VAR_NAME VAR_TYPE ] ) ]

定义存储过程的出入参数，多个参数之间用,相隔。
注意：定义了with result view 必须有out参数，且必须为table类型。

[ LANGUAGE <lang> ]

指定存储过程实现的程序语言，一般为SQLScript，也可以是其他语言，比如R语言。
默认为: SQLSCRIPT。

[ SQL SECURITY <mode> ]

指定存储过程执行的安全模式，可以是以存储过程DEFINER定义者的权限去执行，也可以设定为以调用者INVOKER权限去执行，默认: DEFINER。

[ DEFAULT SCHEMA <default_schema_name> ]

指定存储过程中引用的数据库对象的默认SCHEMA。

[READS SQL DATA]

指定该存储过程为只读存储过程，没有更新数据的相关的DML语句（INSERT、UPDATE、DELETE）或者DDL语句（CREATE、ALTER、DROP、TRUNCATE），如果调用其他存储过程，则被调用过程也是只读的。READS SQL DATA可以用于优化。

[ WITH RESULT VIEW <view_name> ]

将只读取存储过程的输出写入指定的视图 view_name 中，可以被其他查询SQL用来查询，此时存储过程就像一个表或视图。

[ WITH ENCRYPTION ]

加密存储过程体脚本，查看存储过程定义时，存储过程体脚本隐藏。

AS
BEGIN [ SEQUENTIAL EXECUTION ]
	<statement_body>
END

定义存储过程体脚本，增加 SEQUENTIAL EXECUTION 会限制该存储过程并行执行。

2、删除语法

DROP PROCEDURE [schema_name.]<proc_name>;

3、调用语法

CALL [schema_name.]<proc_name> [(<param_list>)] [WITH OVERVIEW] [IN DEBUG MODE]

语法解析：

[WITH OVERVIEW]

指定该参数，将存储过程调用的结果，存入指定的物理表。

[IN DEBUG MODE]

以调试模式执行存储过程。

4、实例演示

准备工作：新增账号 NEWUSER，授权只读访问 SAPHANADB，需要访问《SAP Flight航班数据模型》。

-- 创建用户 NEWUSER（在SAPHANADB所在租户的SYSTEM账号下操作）
CREATE USER NEWUSER PASSWORD Yourpas0 NO FORCE_FIRST_PASSWORD_CHANGE;				
ALTER USER NEWUSER DISABLE PASSWORD LIFETIME;		-- 设置密码永不过期
-- 给 NEWUSER 授权（（在SAPHANADBM账号下操作）
GRANT SELECT, SELECT METADATA ON SCHEMA SAPHANADB to NEWUSER WITH GRANT OPTION;

在这里插入图片描述

（1）存储过程入门

-- 定义
create or replace procedure newuser.zp_scarr
as
begin
	select top 3 * from saphanadb.scarr where mandt = 300;
end;
-- 调用
call newuser.zp_scarr;

在这里插入图片描述

（2）指定 DEFAULT SCHEMA

-- 定义
create or replace procedure newuser.zp_scarr_d
default schema saphanadb
as
begin
	select top 3 * from scarr where mandt = 300;	--单独执行报错
end;
-- 调用
call newuser.zp_scarr_d;

在这里插入图片描述

（3）定义内部变量，执行多个查询

create or replace procedure newuser.zp_scarr2
as
	--本地变量
	count int default 3;
begin
	--注意事项：内部变量，必须在最前面先定义，后使用
	declare client int;
	--注意事项：内部变量引用，需要使用：“ :变量名 ”
	select top :count * 
	from saphanadb.scarr 
	where mandt = 300;			--第1个查询
	
	--注意事项：此处定义变量，脚本报错
	--declare client int default 300;
	
	--注意事项：内部变量赋值，必须要用：“ 变量名 := 值 ” 
	client := 300;
	--存储过程内部可以定义临时表，不需要声明即可使用
	tmp_t000 = 	 
	select top 3 *
	from saphanadb.t000
	where mandt = :client;
	
	--注意事项：临时表引用，需要使用：“ :临时表名 ”
	select * from :tmp_t000;	--第2个查询
end;
-- 调用
call newuser.zp_scarr2;

在这里插入图片描述
在这里插入图片描述

（4）定义值类型入参

create or replace procedure newuser.zp_scarr3
(
	IN I_CLIENT int default 300,
	IN I_COUNT int default 3
)
as
begin
	--注意事项：入参引用，需要使用：“ :入参名 ”
	select top :I_COUNT * from saphanadb.scarr where mandt = :I_CLIENT;
end;
-- 匿名参数调用：顺序赋值
call newuser.zp_scarr3(200);

在这里插入图片描述

-- 命名参数调用：按名赋值
call newuser.zp_scarr3( I_COUNT => 5);

在这里插入图片描述

（5）定义值类型出参

create or replace procedure newuser.zp_scarr4
(
	IN I_CLIENT int default 300,
	OUT O_CARRID varchar(10),
	OUT O_CARRNAME varchar(50)
)
as
begin
	select top 1 CARRID, CARRNAME 
	--注意事项：使用select into给参数或内部变量赋值，不需要 “:”
	into O_CARRID, O_CARRNAME
	from saphanadb.scarr 
	where mandt = :I_CLIENT;
end;
-- 调用
call newuser.zp_scarr4(200,?,?);

在这里插入图片描述

-- 调用，获取存储过程的输出值（必须在do begin ··· end中执行）
do begin
	declare O_CARRID varchar(10);
	declare O_CARRNAME varchar(50);
	call newuser.zp_scarr4(200, O_CARRID, O_CARRNAME);
	select O_CARRID as O_CARRID , O_CARRNAME as O_CARRNAME from dummy;
end;

在这里插入图片描述

（6）定义表类型出参

--定义表类型，用于存储过程出参
create TYPE newuser.tt_scarr AS TABLE 
(
	carrid 		NVARCHAR(3) primary key,
	carrname 	NVARCHAR(20),
	URL 		NVARCHAR(255)
);

--定义物料表（带Key），用于接收存储过程执行结果
CREATE column table newuser.zt_scarr LIKE tt_scarr;
--定义物料表（不带Key），用于接收存储过程执行结果
CREATE column table newuser.zt_scarr_nokey LIKE tt_scarr;
alter table newuser.zt_scarr_nokey drop primary key;

--定义存储过程，带表类型输出参数
create procedure newuser.zp_scarr_out
(
	in 	i_carrid 	NVARCHAR(3),
	out o_scarr 	tt_scarr
)
as
begin
	o_scarr =
	select carrid, carrname, url
	from saphanadb.scarr 
	where mandt = 300
	  and carrid = :i_carrid;
end;
--执行调用
call newuser.zp_scarr_out('AA',?);

在这里插入图片描述

--执行调用，输出结果（带关键字表，执行多次报错）
call newuser.zp_scarr_out('AA',zt_scarr) with OVERVIEW;
select * from newuser.zt_scarr;

--执行调用，输出结果（不带关键字表，执行多次则插入多条记录）
call newuser.zp_scarr_out('AA',zt_scarr_nokey) with OVERVIEW;
select * from newuser.zt_scarr_nokey;

在这里插入图片描述

（7）指定 RESULT VIEW

create or replace procedure newuser.zp_scarr_out2
(
	in 	i_carrid 	NVARCHAR(3),
	out o_scarr 	tt_scarr
)
READS SQL DATA WITH RESULT VIEW zp_scarr_out_view
as
begin
	o_scarr =
	select carrid, carrname, url
	from saphanadb.scarr 
	where mandt = 300
	  and carrid = :i_carrid;
end;
--执行调用
call newuser.zp_scarr_out2('AA',?);		--同上
--执行调用，输出结果
call newuser.zp_scarr_out2('AA',zt_scarr_nokey) with OVERVIEW;	--同上
select * from newuser.zt_scarr_nokey;
--执行，查询RESULT VIEW
truncate table newuser.zt_scarr_nokey;		--清空记录
SELECT * FROM newuser.zp_scarr_out_view 
WITH PARAMETERS ( 	
	'placeholder' = ('$$i_carrid$$', 'AA'), 
	'placeholder' = ('$$o_scarr$$', 'zt_scarr_nokey') 
);											--有记录
select * from newuser.zt_scarr_nokey;		--没有记录

在这里插入图片描述
在这里插入图片描述

（8）定义表类型入参

create or replace procedure newuser.zp_scarr_in
(
	in 	it_table 	zt_scarr_nokey
)
READS SQL DATA
as
begin
	select * from :it_table;
end;
--执行调用
truncate table newuser.zt_scarr_nokey;							--清空数据
call newuser.zp_scarr_out2('AA',zt_scarr_nokey) with OVERVIEW;	
call newuser.zp_scarr_out2('AA',zt_scarr_nokey) with OVERVIEW;	--执行2遍
call newuser.zp_scarr_in(zt_scarr_nokey);

在这里插入图片描述

（9）综合实例

-- 创建表：消息日志
create column table newuser.message_box(message	nvarchar(255));
--日志初始化
CREATE or replace PROCEDURE newuser.init_proc()
as
begin
	truncate table newuser.message_box;
end;
--日志创建
CREATE or replace PROCEDURE newuser.ins_msg_proc(msg nvarchar(255))
as
begin
	insert into newuser.message_box values(:msg);
end;

CREATE or replace PROCEDURE newuser.zp_com_demo
(
	i_client	varchar(3),
	i_carrid	nvarchar(3) default 'AA'
)
 AS	
 	-- local variables
	v_CUR_DATE 	VARCHAR(10) := CURRENT_DATE;  
	v_count 	int;
	cursor cur1( v_client varchar(3) ) FOR
		select carrid, carrname, url 
		from saphanadb.scarr 
		where mandt = :v_client 
		order by carrid;	
BEGIN
	-- inner variables
	declare v_Last_DATE varchar(10) := YEAR(CURRENT_DATE)||'-12-31';
	declare v_carrid 	nvarchar(3);		-- for cur1
	declare v_carrname	nvarchar(20);
	declare v_url		nvarchar(255);
	declare cursor cur2( v_date varchar(10) ) FOR
		select carrid, count(1) as flight_count
		from saphanadb.sflight
		where mandt = ifnull(:i_client,'300')
		  --(case when :i_client is null then '300' else :i_client end)
		  and substring(fldate,1,4) = year(:v_date)
		  and substring(fldate,5,2) = month(:v_date)
		group by carrid
		order by carrid;
	
	init_proc();
	if :i_client is null then
		i_client := '300';
	end if;
	select i_client, v_CUR_DATE, v_Last_DATE, month(:v_CUR_DATE) as month_of_current from dummy;	-- show Parameter and variables
	
	ins_msg_proc('Parameter and variable List: i_carrid = ' 
		|| :i_carrid || ', i_client = ' || :i_client || ', v_CUR_DATE = ' 
		|| :v_CUR_DATE || ', v_Last_DATE = ' || :v_Last_DATE);
	
	select count(1) into v_count from saphanadb.scarr where mandt = :i_client;
	ins_msg_proc('There are ' || :v_count 
		|| case when :v_count > 0 then ' records' else ' record' end 
		|| ' in table SCARR of client-' || :i_client || '.');
		
	--使用参数打开游标 cur1
	open cur1(:i_client);
	if cur1::ISCLOSED then
		ins_msg_proc('WRONG: cur1 not open');
	else
		ins_msg_proc('OK: cur1 open');
	end if;
	
	Fetch cur1 into v_carrid, v_carrname, v_url;
	if cur1::NOTFOUND then
		ins_msg_proc('WRONG: cur1 contains no valid data');
	else
		ins_msg_proc('OK: cur1 contains valid data: carrid = ' || :v_carrid );
	end if;

	WHILE :v_CUR_DATE <= :v_Last_DATE DO --判断条件
		ins_msg_proc('WHILE PROCESSING: month = ' || month(:v_CUR_DATE) );
		--打开游标 cur1，使用 FOR R AS CUR1 DO 对游标的数据集合做LOOP循环
		FOR R AS CUR2(:v_CUR_DATE) DO
		ins_msg_proc('FOR CUR: ' || month(:v_CUR_DATE)  
			|| '月份，航空公司' || R.CARRID || '有' 
			|| R.flight_count || '条航班计划' );  
		END FOR;
		v_CUR_DATE := LAST_DAY(ADD_MONTHS(:v_CUR_DATE,1));  --变量CURR_DATE递增
	END WHILE;
END; 

call newuser.zp_com_demo('300');	
call newuser.zp_com_demo(null);		--同上

在这里插入图片描述

select * from newuser.message_box;

在这里插入图片描述
在这里插入图片描述

本文来自互联网用户投稿，该文观点仅代表作者本人，不代表本站立场。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如若转载，请注明出处：http://www.coloradmin.cn/o/160724.html

如若内容造成侵权/违法违规/事实不符，请联系多彩编程网进行投诉反馈，一经查实，立即删除！

相关文章

【Javascript】高阶函数，JSON，forEach，map，filter，reduce等高阶函数，函数绑定

【Javascript】高阶函数，JSON，forEach，map，filter，reduce等高阶函数，函数绑定

❤️ Author&#xff1a; 老九 ☕️ 个人博客&#xff1a;老九的CSDN博客 &#x1f64f; 个人名言&#xff1a;不可控之事 乐观面对 &#x1f60d; 系列专栏&#xff1a; 文章目录高阶函数箭头函数apply函数JSONfilter函数map函数总结reduce函数find/findIndex函数every/some函…
阅读更多...
【Android安全】frida-gum教程

【Android安全】frida-gum教程

frida-gum教程 frida-gum概述 frida-gum是基于inline-hook实现的 提供的功能&#xff1a;代码跟踪&#xff08;Stalker&#xff09;、内存访问监控&#xff08;MemoryAccessMonitor&#xff09;、符号查找、栈回溯实现、内存扫描、动态代码生成和重定位 inline Hook 原理 .…
阅读更多...
MySQL中常见的数值函数

MySQL中常见的数值函数

第一个 ceil(x)&#xff1a;向上取整 取整&#xff0c;顾名思义就是取整数&#xff1b; 向上取整是只要小数位不是 0&#xff0c;都会向上进 1 位整数。 案例 1&#xff1a; select ceil(9.2); 解析&#xff1a; 9.2 向上取一位整数&#xff0c;就是 10。 查询结果&#xff…
阅读更多...
全屋智能品牌很多坑！选华为还是卡特加特数字家庭？技术角度分析亮了

全屋智能品牌很多坑！选华为还是卡特加特数字家庭？技术角度分析亮了

市面上的智能家居品牌有很多&#xff0c;但拥有成熟全屋智能系统、完善产品体系&#xff0c;以及线下线上闭环销售渠道的则没几个。细数下来只有手机厂商华为、小米&#xff0c;以及科创型企业欧瑞博、摩根、UIOT和卡特加特&#xff0c;而其中以华为和卡特加特为代表的&#xf…
阅读更多...
自定义类型：结构体，枚举，联合（3）

自定义类型：结构体，枚举，联合（3）

TIPS 1. 2. 枚举 1. 枚举顾名思义就是一一列举可能的取值&#xff0c;比如一周的星期一到星球天是有限的七天&#xff0c;可以一一列举。有比如性别&#xff0c;月份。 2. 像这种容易并且可以被一一列举的数据我们就可以定义为枚举类型。 枚举类型 1. 枚举的关键字为e…
阅读更多...
【2】成功安装部署K8s集群

【2】成功安装部署K8s集群

目录 1、安装方式 2、环境初始化 【1】主机名解析 【2】时间同步 【3】禁用iptables和firewalld服务&#xff08;三台都要设置&#xff09; 【4】禁用selinux&#xff08;三台都要设置&#xff09; 【5】禁用swap分区 【6】修改linux的内核参数 3、安装docker 【1】安…
阅读更多...
自定义类型：结构体，枚举，联合（详解版）

自定义类型：结构体，枚举，联合（详解版）

&#x1f40b;自定义类型&#xff1a;结构体&#xff0c;枚举&#xff0c;联合&#x1f996;结构体&#x1f414;1.结构体的声明&#x1f424;1.1 结构的基础知识&#x1f424;1.2 结构的声明&#x1f424;1.3 特殊的声明&#x1f424;1.4 结构的自引用&#x1f424;1.5 结构体…
阅读更多...
APSIM实战练习：Kingsthorpe土壤水分蒸发研究

APSIM实战练习：Kingsthorpe土壤水分蒸发研究

在本练习中&#xff0c;您将对来自澳大利亚昆士兰州金斯索普的真实试验的数据进行建模。使用从试验中观察到的数据&#xff0c;您将创建一个气象文件&#xff0c;模拟三个蒸发曲线并将模拟输出与观察到的数据进行比较。 有关试用的更多背景信息&#xff0c;请参阅此 PowerPoin…
阅读更多...
操作系统-进程与线程

操作系统-进程与线程

进程的概念、组成、特征 概念 程序&#xff1a;是静态的&#xff0c;就是存放在磁盘里的可执行文件&#xff0c;如&#xff1a;QQ.exe。 线程&#xff1a;是动态的&#xff0c;是程序的一次执行过程&#xff0c;如&#xff1a;可同时启动多次QQ程序。 组成 进程由PCB、程序…
阅读更多...
Java数组（复习）

Java数组（复习）

Java数组 数组&#xff1a;数组是指一种容器&#xff0c;可以用来存储同种数据类型的多个值 数组容器在存储数据的时候&#xff0c;需要结合隐士转换考虑。例如&#xff1a;int类型的数组容器&#xff0c;可以存储byte&#xff0c;short&#xff0c;int类型的数组。double类型…
阅读更多...
矩阵乘GPU性能优化之split k

矩阵乘GPU性能优化之split k

矩阵乘计算GPU实现中通常为线程块计算一个较大的[m_tile, k] *[k, n_tile]的矩阵乘&#xff0c;最后分配到每个线程后同样为每个线程计算更小的一个[m_tile, k] *[k, n_tile]。 这样存在的一个问题主要是在于m和n较小而k很大时&#xff0c;如下图所示的矩阵乘案例&#xff0c;…
阅读更多...
总结各种常见的池子

总结各种常见的池子

池化技术指的是提前准备一些资源&#xff0c;在需要时可以重复使用这些预先准备的资源。 池化技术的优点主要有两个&#xff1a;提前准备和重复利用。 像池化技术一些典型的池子就比如线程池&#xff0c;内存池&#xff0c;对象池&#xff0c;数据库连接池等等&#xff0c;线程…
阅读更多...
cmake入门之一：编译、INSTALL及shell语句

cmake入门之一：编译、INSTALL及shell语句

cmake入门之一&#xff1a;编译、INSTALL及shell语句1.创建相应文件1.1 工程目录下CMakeLists.txt1.2 src文件夹1.2.1 src文件夹下main.c1.2.2 src文件夹下CMakeLists.txt1.3 runhello.sh1.4 其他文件/文件夹2.编译3.查看结果参考文献在学习cmake-practice这本书中的demo时&…
阅读更多...
《基于机器学习的雷达辐射源分选与识别技术研究》论文解读

《基于机器学习的雷达辐射源分选与识别技术研究》论文解读

Data:2023-1-12 Ref: 李雪琼, “基于机器学习的雷达辐射源分选与识别技术研究,” PhD Thesis, 国防科技大学, 2020. 文章目录背景重频(PRI)基于已知信号的雷达分选技术基于未知信号的雷达分选技术这篇文章我主要关注他的第三、四章。第三章主要描述了基于已知信号的雷达分选技术…
阅读更多...
《MySQL系列-InnoDB引擎15》文件-日志文件-慢查询日志

《MySQL系列-InnoDB引擎15》文件-日志文件-慢查询日志

日志文件 日志文件记录了影响MySQL数据库的各种类型活动。MySQL数据库中常见的日志文件有&#xff1a; 错误日志(error log)二进制日志(bilog)慢查询日志(slow query log)查询日志(log) 这些日志文件可以帮助DBA对MySQL数据库的运行状态进行诊断&#xff0c;从而更好的进行数…
阅读更多...
RTE 领域的发展，为视频编解码标准带来哪些新变化？丨Dev for Dev 专栏

RTE 领域的发展，为视频编解码标准带来哪些新变化？丨Dev for Dev 专栏

本文为「Dev for Dev 专栏」系列内容&#xff0c;作者为声网资深视频算法负责人 戴伟。 01 视频编解码标准的历史和现在 1990 年左右 H.261 标准的制定&#xff0c;开启了视频编解码标准化的历程。经过 30 多年的努力&#xff0c;视频的编码效率得到了极大幅度的提升。在下图…
阅读更多...
编程练习：找“单身狗“(三种解题法(不含暴力法))

编程练习：找“单身狗“(三种解题法(不含暴力法))

目录 一.问题描述 二. 方法一&#xff1a;排序法 题解代码&#xff1a; 三.方法二&#xff1a;位运算法 第一步&#xff1a; 第二步&#xff1a; 第三步&#xff1a; 题解代码&#xff1a; 方法三&#xff1a;顺序表记录法 第一步&#xff1a; 第二步&#xff1a; …
阅读更多...
c语言tips-【C语言多线程编程】

c语言tips-【C语言多线程编程】

0.摘要 操作系统具有管理进程&#xff0c;进程调度的能力&#xff0c;线程&#xff0c;决定哪个进程、线程使用 CPU。很多时候我们需要在同一时间干不同的任务&#xff0c;这就需要我们通过多进程或者多线程来进行&#xff0c;在我们学习和工作中我们大部分用到的都是多线程,本…
阅读更多...
SAP FICO 成本估算解析

SAP FICO 成本估算解析

成本估算解析 物料成本构成组件分类&#xff0c;比如下图中的G&#xff08;Overhead&#xff09;、L&#xff08;Subcontracting&#xff09;、E&#xff08;Internal Activity&#xff09;等。 同时它也分不同的视图&#xff0c;每个视图中包含了不同的组件。 对同一个工厂的同…
阅读更多...
SpringEvent的使用

SpringEvent的使用

步骤&#xff1a;定义事件&#xff0c;继承ApplicationEvent定义监听&#xff0c;要么实现ApplicationListener接口&#xff0c;要么在方法上添加EventListener注解发布事件&#xff0c;调用ApplicationContext.publishEvent()或者ApplicationEventPublisher.publishEvent();1、…
阅读更多...
推荐文章
最新文章

Copyright @ 2022~2023