Oracle表类型[课堂笔记]

luozhiyong131 发表于 2011-12-22 08:54

<DIV>
 
grant connect to scott;
grant dba to scott;
 
静态表类型：表类型锁存储的元素的个数固定
type typename is table of 数据类型（varchar2,number,date）;
varname typename:=typename(null);  //声明变量，初始化
varname.extend(n)         //表类型中存放的元素数
varname(i)             //访问表类型中的元素
 
示例：
declare
  type emp_tab is table of varchar2(10);
  vtab emp_tab:=emp_tab(null);
begin
  vtab.extend(10);  
  select ename into vtab(1)  from emp  where empno=7521;  
  select ename into vtab(2)  from emp  where empno=7499;  
  for i in 1..vtab.count loop
    dbms_output.put_line(vtab(i));
  end loop;  
end;
 
declare
  type emp_tab is table of emp%rowtype;
  vtab emp_tab:=emp_tab(null);
begin
  vtab.extend(10);  
  select * into vtab(1)  from emp  where empno=7521;  
  select * into vtab(2)  from emp  where empno=7499;  
  for i in 1..vtab.count loop
    dbms_output.put_line(vtab(i).ename);
  end loop;  
end;
 
 
动态表类型：表类型中的元素数不固定
type typename is table of 数据类型 index by binary_integer;
varname typename;
 
declare
  type emp_tab is table of varchar2(10) index by binary_integer;//内部增长序号
  vtab emp_tab;
begin
  select ename bulk collect  into vtab  from emp;  
  for i in 1..vtab.count loop
    dbms_output.put_line(vtab(i));
  end loop;
end;
 
顺序
选择
if  条件  then
  //语句一
else  
  //语句二
end if;
 
declare
num1 integer;
num2 integer;
begin
  num1:=&1;
  num2:=&2;
  if num1> num2 then
      dbms_output.put_line(num1);
  else
      dbms_output.put_line(num2);
  end if;
end;
 
if  条件  then
    ...
elsif  条件  then
    ...
else
    ...
end if;
 
declare
 vsal emp.sal%type;
begin
  select sal into vsal
  from emp
  where empno=7521;
  
  if vsal<2000 then
    dbms_output.put_line('A');
  elsif vsal <3000 then
     dbms_output.put_line('B');
  elsif  vsal <4000 then
      dbms_output.put_line('C');
  else
      dbms_output.put_line('D');
  end if;
end;
 
case 条件
when  值   then  语句;
when  值   then  语句;
when  值   then  语句;
when  值   then  语句;
else  语句
end case;
 
declare
vchar varchar2(10);
begin
vchar:='&1';
case vchar
when 'a' then dbms_output.put_line('a');
when 'b' then dbms_output.put_line('b');
when 'c' then dbms_output.put_line('c');
else dbms_output.put_line('D');
end case;
end;
 
 
循环
loop
  exit when 条件
end loop;
 
declare
 i  number(4):=1;
 vsum number(4):=0;
begin
  loop
     vsum:=vsum+i;
     i:=i+1;
     exit when i>100;
  end loop;
  dbms_output.put_line(vsum);
end;
 
for varname in 值区间 loop //递增
 
declare
vsum number(4):=0;
begin
 for i in 1..100 loop
   vsum:=vsum+i;
 end loop;
 dbms_output.put_line(vsum);
end;
 
 
for varname in reverse 值区间 loop //递减
 
declare
begin
  for i in reverse 1..10 loop
    dbms_output.put_line(i);
  end loop;
end;
 
while  条件  loop
end loop;
 
declare
i  number(4):=1;
vsum number(4):=0;
begin
  while i<=100 loop
    vsum:=vsum+i;
    i:=i+1;
  end loop;
  dbms_output.put_line(vsum);
end;
 
 
 
异常
oracle异常分为两种
系统异常
 
declare
vsal emp.sal%type;
begin
 select sal into vsal from emp where empno=9444;
 
exceptionwhen others then
  dbms_output.put_line('工号输入错误');
end;
 
自定义异常
 
declare
vage int;
ageexce exception;
begin
  vage:=&age;
  if vage>100 then
    raise ageexce;
  end if;
exception when ageexce then
 dbms_output.put_line('年龄过大');
end;
 
游标
一段连续内存空间，存放查询结果集，类似于指针或数组
 
游标分类
1.隐式游标
   系统针对不同的语句创建游标，通过游标名称访问数据，全称游标名sql
 
   游标四个属性
   %isopen  打开游标
   %found   语句操作是否对数据中的数据产生影响
   %notfound 
   %rowcount 具体影响的数据的数量
 
   begin
   delete from emp;
   dbms_output.put_line(sql%rowcount);
   end;
 
2.显式游标  
    游标是存放查询结果，游标后只能用查询语句：    select * from tablename;
    声明语法：    cursor cursorname is select *  from tablename//只能是查询语
    游标操作步骤
    1.open cursorname //将查询的结果存放到指定内存中
    2.loop
    3.fetch cursoname into 变量
    4.exit when  cursornamr%notfound;
    //判断游标数据是否取完，退出循环
    5.end loop;
    6.close  cursorname
 
declare
  cursor emp_cur is select *  from emp;
  vrow emp%rowtype;
begin
   open emp_cur; 
   loop
   fetch emp_cur into  vrow;
   exit when emp_cur%notfound ;
    dbms_output.put_line(vrow.ename);
   end loop;
   close emp_cur;   
end;
 
for操作游标特点：
1.自动打开关闭游标，不需要写下面的语句
 open emp_cur;
 close emp_cur;
2.不需要声明任何变量
 
declare
cursor emp_cur is select * from emp;
begin
 for vrow in emp_cur loop
   dbms_output.put_line(vrow.ename);
 end loop;
end;
 
declare
begin
 for vrow in ( select * from emp) loop
   dbms_output.put_line(vrow.ename);
 end loop;
end;
 
参数游标
参数游标中的参数的数据类型不能指定大小
 
declare
cursor emp_cur(vdeptno number)//参数不要指定大小
is select *  from emp 
where deptno=vdeptno;
vvdeptno  emp.deptno%type;
begin
  vvdeptno:=&no;
  for vrow in emp_cur(vvdeptno) loop
    dbms_output.put_line(vrow.ename);
  end loop;
end;
 
 
动态游标：游标所指的内存中可以存放多个查询的数据。动态游标不能用for操作
declare
type emp_ref is ref cursor;
emp_ref_cur emp_ref;
vrow dept%rowtype;
begin
  open emp_ref_cur for 
  select * from dept;
  loop
  fetch emp_ref_cur into vrow;
  exit when emp_ref_cur%notfound;
   dbms_output.put_line(vrow.dname);
  end loop;
  close emp_ref_cur;
end;
 </DIV>

页: [1]

Chinaunix's Archiver

Oracle表类型[课堂笔记]