lightdb plorasql集合类型新增可变数组

文章目录

背景

在信创适配中,从Oracle迁移过来的存储过程使用到可变数组。因此在LightDB-X 23.4版本中对现有的集合类型进行了增强,添加了可变数组类型。

集合类型

在LightDB-X 23.4版本开始plorasql支持的集合类型同Oracle一致,覆盖了关联数组,可变数组和嵌套表三种类型,支持的方法如下

  • DELETE 从集合中删除元素。
  • EXTEND 将元素添加到集合的末尾。
  • EXISTS 如果集合的指定元素存在,则返回TRUE。
  • FIRST 返回集合中的第一个索引。
  • LAST 返回集合中的最后一个索引。
  • COUNT 返回集合中的元素数量。

可变数组

可变大小数组是一个数组,其元素数量可以从零(空)到声明的最大大小不等,在这里超过也支持。

要访问可变数组的元素,使用语法variable_name(index)。在数据库中存储和检索可变数组时,其索引和元素顺序将保持稳定。

随着您添加或删除元素,可变数组变量占用的内存量可以动态增加或减少。

目前只支持本地类型的可变数组,不支持全局可变数组。

可变数组示例

准备数据

复制代码
select dbms_output.serveroutput(true);
create table user_info(id int, name varchar(30));
insert into user_info values( 11, 'zhangsan');
insert into user_info values( 21, 'lisi');
insert into user_info values( 31, 'wangwu');

匿名块

复制代码
declare
    type id_array is varray(10) of INTEGER;
    ids id_array := id_array(11, 21);
    v_name varchar2(30);
begin
    if ids.exists(3) then
        dbms_output.put_line('ids(3) exists.');
    else
        dbms_output.put_line('ids(3) not exists.');
    end if;
    
    ids.extend;
    ids(ids.count) := 31;
    
    if ids.exists(3) then
        dbms_output.put_line('ids(3) exists.');
    else
        dbms_output.put_line('ids(3) not exists.');
    end if;
    
    dbms_output.put_line('count=' || ids.count);
    
    for i in ids.first .. ids.last loop
        select name into v_name from user_info where id = ids(i);
        dbms_output.put_line('ids(' || i || ') name is ' || v_name);
    end loop;

    ids.delete;
    dbms_output.put_line('after is.delete, count=' || ids.count);
end;
/

ids(3) not exists.
ids(3) exists.
count=3
ids(1) name is zhangsan
ids(2) name is lisi
ids(3) name is wangwu
after is.delete, count=0
DO

函数

复制代码
create or replace function f_varray() return int is
    type id_array is varray(10) of INTEGER;
    ids id_array := id_array(11, 21);
    v_name varchar2(30);
begin
    if ids.exists(3) then
        dbms_output.put_line('ids(3) exists.');
    else
        dbms_output.put_line('ids(3) not exists.');
    end if;
    
    ids.extend;
    ids(ids.count) := 31;
    
    if ids.exists(3) then
        dbms_output.put_line('ids(3) exists.');
    else
        dbms_output.put_line('ids(3) not exists.');
    end if;
    
    dbms_output.put_line('count=' || ids.count);
    
    for i in ids.first .. ids.last loop
        select name into v_name from user_info where id = ids(i);
        dbms_output.put_line('ids(' || i || ') name is ' || v_name);
    end loop;

    ids.delete;
    dbms_output.put_line('after is.delete, count=' || ids.count);
    return ids.count;
end;
/

select f_varray();

ids(3) not exists.
ids(3) exists.
count=3
ids(1) name is zhangsan
ids(2) name is lisi
ids(3) name is wangwu
after is.delete, count=0
 f_varray 
----------
        0
(1 row)

存储过程

复制代码
create or replace procedure p_varray() is
    type id_array is varray(10) of INTEGER;
    ids id_array := id_array(11, 21);
    v_name varchar2(30);
begin
    if ids.exists(3) then
        dbms_output.put_line('ids(3) exists.');
    else
        dbms_output.put_line('ids(3) not exists.');
    end if;
    
    ids.extend;
    ids(ids.count) := 31;
    
    if ids.exists(3) then
        dbms_output.put_line('ids(3) exists.');
    else
        dbms_output.put_line('ids(3) not exists.');
    end if;
    
    dbms_output.put_line('count=' || ids.count);
    
    for i in ids.first .. ids.last loop
        select name into v_name from user_info where id = ids(i);
        dbms_output.put_line('ids(' || i || ') name is ' || v_name);
    end loop;

    ids.delete;
    dbms_output.put_line('after is.delete, count=' || ids.count);
end;
/

call p_varray();

ids(3) not exists.
ids(3) exists.
count=3
ids(1) name is zhangsan
ids(2) name is lisi
ids(3) name is wangwu
after is.delete, count=0
CALL
相关推荐
GreatSQL社区13 分钟前
用systemd管理GreatSQL服务详解
数据库·mysql·greatsql
掘根13 分钟前
【MySQL进阶】错误日志,二进制日志,mysql系统库
数据库·mysql
weixin_4383354015 分钟前
基础知识:mysql-connector-j依赖
数据库·mysql
小明铭同学31 分钟前
MySQL 八股文【持续更新ing】
数据库·mysql
Mr_Xuhhh41 分钟前
信号与槽的总结
java·开发语言·数据库·c++·qt·系统架构
Fireworkitte44 分钟前
Redis 源码 tar 包安装 Redis 哨兵模式(Sentinel)
数据库·redis·sentinel
qq_339282231 小时前
postgressql 如何修改模式的所有表的所有者
数据库
西岭千秋雪_2 小时前
Redis性能优化
数据库·redis·笔记·学习·缓存·性能优化
极限实验室2 小时前
INFINI Labs 产品更新 | INFINI Console 1.29.6 发布 – 优化监控图表异常毛刺等
数据库·产品