oracle数组定义与使用

• 定义固定长度的一维数组

      type type_array is varray(10) of varchar2(20);

            1、varray(10)表示定义长度为10的数组

            2、varchar2(20)表示数组为字符型，且元素字符串长度不超过20

• 定义可变长度的一维数组

      type type_array is table of varchar2(20) index by binary_integer;   

            1、table表示可变长度

             2、index by binary_integer 表示以符号整数为索引

            一维数组的初始化

            /*初始化为空数组*/

      var_array type_array := type_array();

             /*初始化为六个元素数组*/

      var_array type_array := type_array('ggs','jjh','wsb','csl','dd','bb'); 

            /*直接对各个元素进行赋值*/

      var_array.extend(3);
      var_array(1) = '1';
      var_array(2) = '2';
      var_array(3) = '3';

      /*通过遍历数组元素方式进行初始化操作*/
      for i in 1..var_array.count loop
          var_array(i) = to_char(i);
      end loop;

1、oracle数组的索引从1开始，而不是从0开始2、count为数组的长度

• 定义多维数组

      type type_array is table of Tbl_User % rowtype index by binary_integer;  

            说明：Tbl_User 为基础表

            多维数组的初始化

      select * 
      bulk collect into var_array 
      from t_user;

            说明：bulk collect 表示将批量查询数据直接插入collection中，而不是通过cursur一条条插入

            多维数组的读取方法

      for i in 1..var_array.count loop
          dbms_output.put_line(var_array(i).user_id);          
          dbms_output.put_line(var_array(i).username);
      end loop;

• Oracle调用函数返回的数组

             方法一

      declare 
          aa Tbl_StrSplit := Tbl_StrSplit();
      begin
          aa := PKG_TCH_COURSE_INIT.Fn_GetTermDate('root', 2);
          dbms_output.put_line(aa(1));
          dbms_output.put_line(aa(2));
      end;

            方法二

      Select Fn_GetTermDate(P_SchoolKey, P_TermKey)
      Into Tbl_TermDate
      From dual;

• 强制修改已经被引用的自定义type
  

             修改自定义type类型的OBJTYPE_VAR时失败

             OBJTYPE_VAR原有结构

      CREATE OR REPLACE TYPE "OBJTYPE_VAR"  AS OBJECT
      (
	  field0      VARCHAR2(1000),
	  field1      VARCHAR2(1000)
      )

           修改后的新结构

      CREATE OR REPLACE TYPE "OBJTYPE_VAR"  AS OBJECT
      (
           serialNo    Number,
	   field0      VARCHAR2(1000),
	   field1      VARCHAR2(1000)
      )

            执行修改时提示错误

           “cannot drop or replace a type with type or table  dependents”

            原因是已经在其他地方使用了OBJTYPE_VAR，oracle不允许直接修改修改或删除被引用的OBJTYPE_VAR，但可以通过加上force关键字强制执行。

            强制重新创建

      CREATE OR REPLACE TYPE "OBJTYPE_VAR"  FORCE  AS OBJECT 
      (
            serialNo    NUMBER,
            field0      VARCHAR2(1000),
            field1      VARCHAR2(1000)
      ) 

            强制删除掉OBJTYPE_VAR

      drop type OBJTYPE_VAR force

            定义一维可变数组

      CREATE OR REPLACE TYPE "TBLTYP_VAR"    Is Table Of  VARCHAR2 (32767);

      CREATE OR REPLACE TYPE "TBLTYP_Int"    Is Table Of  Pls_Integer;

            定义三维可变数组

      CREATE OR REPLACE TYPE "OBJTYPE_VAR"  FORCE  AS OBJECT
      (
            serialNo    NUMBER,
            field0      VARCHAR2(1000),
            field1      VARCHAR2(1000)
      ) 

• oracle数组属性和函数

COUNT             返回集合中元素的个数   
DELETE            删除集合中所有元素    
DELETE(x)         删除元素下标为x的元素      对VARRAY非法     
DELETE(x,y)       删除元素下标从X到Y的元素   对VARRAY非法    

EXIST(x)          如果集合元素x已经初始化，则返回TRUE, 否则返回FALSE    
EXTEND            在集合末尾添加一个元素      对Index_by非法    
EXTEND(x)         在集合末尾添加x个元素       对Index_by非法    
EXTEND(x,n)       在集合末尾添加元素n的x个副本 对Index_by非法    
FIRST             返回集合中的第一个元素的下标号，对于VARRAY集合始终返回1。   

LAST              返回集合中最后一个元素的下标号, 对于VARRAY返回值始终等于COUNT.    
LIMIT             返回VARRY集合的最大的元素个数   Index_by集合和嵌套表无用    
NEXT(x)           返回在第x个元素之后及紧挨着它的元素值，如果x是最后一个元素，返回null.    
PRIOR(x)          返回在第x个元素之前紧挨着它的元素的值，如果x是第一个元素，则返回null。    
TRIM              从集合末端开始删除一个元素  对于index_by不合法   

TRIM(x)           从集合末端开始删除x个元素