【入门】plsql中各种集合方法的使用（2）

系统管理员 2022-01-15 07:07 262阅读 0赞

[为什么80%的码农都做不了架构师？>>> ][80_] ![hot3.png][]

接（1）

declare
    	type t_array is varray(10) of number; --可变长数组类型，最大长度为10
        type t_nesttab is table of number;--嵌套表，最大长度没有限制
        type t_indextab is table of number index by binary_integer;--索引表，最大长度没有限制
        
        v_array t_array := t_array();--声明可变长数组变量，并用构造函数初始化
        v_nesttab t_nesttab := t_nesttab();--声明嵌套表类型的变量，并用构造函数初始化
        v_indextab t_indextab;--声明索引表类型的变量，使用前，没有必要进行初始化
    
    begin
        
        dbms_output.put_line('----------prior方法使用----------');
        --prior使用方法 返回指定元素的前一个元素
        dbms_output.put_line('索引3的前一个元素索引是:' || v_array.prior(3));
    	dbms_output.put_line('索引3的前一个元素索引是:' || v_nesttab.prior(3));
    	dbms_output.put_line('索引3的前一个元素索引是:' || v_indextab.prior(3));
        
        dbms_output.put_line('----------next方法使用----------');
        --next方法是用 放回指定元素的下一个元素
        dbms_output.put_line('索引3的后一个元素索引是:' || v_array.next(3));
        dbms_output.put_line('索引3的后一个元素索引是:' || v_nesttab.next(3));
        dbms_output.put_line('索引3的后一个元素索引是:' || v_indextab.next(3));
       
        dbms_output.put_line('----------trim方法使用----------');
        --trim方法是用 删除集合中的元素，被删除的元素不在占用空间
        v_array.trim;--删除集合最后一个元素
    	dbms_output.put_line('v_array:' || v_array.count);
        v_array.trim(2);--删除集合最后2个元素
        dbms_output.put_line('v_array:' || v_array.count);
        
        v_nesttab.trim;--删除集合最后一个元素
        dbms_output.put_line('v_nesttab:' || v_nesttab.count);
        v_nesttab.trim(2);--删除集合最后2个元素
        dbms_output.put_line('v_nesttab:' || v_nesttab.count);
    	
       --v_indextab.trim();--索引表没有trim方法
       
       dbms_output.put_line('----------delete方法使用----------');
    	--delete方法使用 删除指定索引的元素，但保留它的空间
        v_array.delete; --可变长数组只能用不带参数的delete,应为它是数据密集
        if not v_array.exists(3) then
    		dbms_output.put_line('index 3 is not exists');
        end if;
     
        v_nesttab.delete(1); --删除第一个元素，保留内存空间
        if not v_nesttab.exists(1) then
    		dbms_output.put_line('index 1 is not exists');
        end if; 
        v_nesttab.delete(1,2); --删除1到2之间的数据 保留内存空间
        if not v_nesttab.exists(2) then
    		dbms_output.put_line('index 2 is not exists');
        end if;
        v_nesttab.delete; --删除全部数据，释放所有内存空间
    	if not v_nesttab.exists(3) then
    		dbms_output.put_line('index 3 is not exists');
        end if;
        
    	v_indextab.delete(1); --删除第一个元素，保留内存空间
        if not v_indextab.exists(1) then
    		dbms_output.put_line('index 1 is not exists');
        end if;
    	v_indextab.delete(1,2); --删除1到2之间的数据，保留内存空间
        if not v_indextab.exists(2) then
    		dbms_output.put_line('index 2 is not exists');
        end if;
        v_indextab.delete; --删除全部数据，释放内存所有内存空间
    	if not v_indextab.exists(3) then
    		dbms_output.put_line('index 3 is not exists');
        end if; 
    end;
    /

转载于:https://my.oschina.net/shiwb/blog/127765

[80_]: https://my.oschina.net/u/2663968/blog/3051541
[hot3.png]: /images/20220115/978cf95bb16844a98882b4d6271990e5.png