oracle变量数组--可以存放一张表的记录

create or replace procedure po_test_varray

(

    oi_return out integer

)

/** head

  * @name app#

  * @caption 

  * @type 小时汇总

  * @parameter iv_hour in varchar2 统计月份，格式：yyyymmddhh

  * @parameter oi_return out integer 执行状态码，0 正常，其它 出错

  * @version 1.0

  * @create-date 2012-8-6

  * @copyright slf

  */

is

    /**

      * @description 变量定义

      * @variable-define vi_task_id integer 任务日志id

      * @variable-define vv_task_name varcshar2 任务名称

      * @variable-define vv_table_name varchar2 表名称

      * @variable-define vv_task_pos varchar2 任务位置

      * @variable-define vi_result integer 临时结果

      * @variable-define vi_chk_flag integer 判断标识

      * @variable-define vi_err_code integer 错误信息代码

      * @variable-define vv_err_msg varchar2 错误信息详情

      * @variable-define exc_return exception 程序中间返回自定义异常

      * @variable-define exc_error exception 程序出错返回自定义异常

      */

 

    type varray_t3 is table of dim.td_mile%rowtype index by binary_integer;

    varray3 varray_t3;

    i integer;

   

    begin

     

    i:= 0;

    for x in (select * from dim.td_mile where rownum<10) loop

    varray3(i):=x;

    i:=i+1;

    end loop;

    for i in 0 ..8 loop

    dbms_output.put_line('varray3('||i||').mile_id='||varray3(i).mile_id);

    dbms_output.put_line('varray3('||i||').mile_name='||varray3(i).mile_name);

    dbms_output.put_line('varray3('||i||').mile='||varray3(i).mile);

    dbms_output.put_line('varray3('||i||').mile_unit='||varray3(i).mile_unit);

    dbms_output.put_line('varray3('||i||').day_max='||varray3(i).day_max);

    dbms_output.put_line('varray3('||i||').mon_max='||varray3(i).mon_max);

    dbms_output.put_line('varray3('||i||').mon_total_max='||varray3(i).mon_total_max);

    end loop;

    oi_return := 0;

end;

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/25903968/viewspace-1674948/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/25903968/viewspace-1674948/