Oracle Table Demo语句应用介绍
程序员文章站
2023-12-03 17:42:10
在开发过程中可能会用到oracle table demo 操作语句,本文将以此进行介绍,需要的朋友可以参考下sql代码 复制代码 代码如下: -- created on 2...
在开发过程中可能会用到oracle table demo 操作语句,本文将以此进行介绍,需要的朋友可以参考下
sql代码
-- created on 2010/07/29 by wangnan
declare
-- local variables here
i1 varchar2( 20) := '1' ;
i2 varchar2( 20) := '1' ;
i3 varchar2( 20) := '2' ;
i4 varchar2( 20) := '3' ;
i5 varchar2( 20) := '3' ;
i6 varchar2( 20) := '3' ;
i7 varchar2( 20) := '5' ;
i_before varchar2( 20);
type t_type is table of varchar2(20 );
t_table t_type;
begin
-- test statements here
t_table := t_type();
t_table.extend;
t_table(1) := i1;
t_table.extend;
t_table(2) := i2;
t_table.extend;
t_table(3) := i3;
t_table.extend;
t_table(4) := i4;
t_table.extend;
t_table(5) := i5;
t_table.extend;
t_table(6) := i6;
t_table.extend;
t_table(7) := i7;
for i in 1 .. t_table.count loop
if i_before is null or i_before <> t_table(i) then
i_before := t_table(i);
dbms_output.put_line(t_table(i));
end if ;
end loop;
exception when others then
dbms_output.put_line( sqlerrm);
end;
sql代码
复制代码 代码如下:
-- created on 2010/07/29 by wangnan
declare
-- local variables here
i1 varchar2( 20) := '1' ;
i2 varchar2( 20) := '1' ;
i3 varchar2( 20) := '2' ;
i4 varchar2( 20) := '3' ;
i5 varchar2( 20) := '3' ;
i6 varchar2( 20) := '3' ;
i7 varchar2( 20) := '5' ;
i_before varchar2( 20);
type t_type is table of varchar2(20 );
t_table t_type;
begin
-- test statements here
t_table := t_type();
t_table.extend;
t_table(1) := i1;
t_table.extend;
t_table(2) := i2;
t_table.extend;
t_table(3) := i3;
t_table.extend;
t_table(4) := i4;
t_table.extend;
t_table(5) := i5;
t_table.extend;
t_table(6) := i6;
t_table.extend;
t_table(7) := i7;
for i in 1 .. t_table.count loop
if i_before is null or i_before <> t_table(i) then
i_before := t_table(i);
dbms_output.put_line(t_table(i));
end if ;
end loop;
exception when others then
dbms_output.put_line( sqlerrm);
end;