日期:2014-05-16  浏览次数:20445 次

工作积累(游标、权限、数组)2

--游标

一、显式游标
通过使用显式游标,不仅可以一行一行地处理SELECT语句的结果,而且可以更新或删除当前游标行的数据。
需要注意的是,如果通过游标更新或删除数据,在定义游标时必须要带有FOR UPDATE子句。
DECLARE
? CURSOR emp_cursor IS SELECT * FROM emp FOR UPDATE;??
BEGIN
? FOR emp_record IN emp_cursor LOOP
??? IF emp_record.deptno=3 THEN
????? UPDATE emp SET sal=sal+200 WHERE CURRENT OF emp_cursor;
????? dbms_output.put_line('雇员名: '||emp_record.ename||',部门号:'||emp_record.deptno||
?????? ',原工资:'||emp_record.sal|| ',新工资:'||(emp_record.sal+200));
??? ELSE
????? dbms_output.put_line('姓名:'||emp_record.ename||',部门号:'||emp_record.deptno||',工资:'||
emp_record.sal);
??? END IF;
? END LOOP;
END;

二、隐式游标
隐式游标,是指不显式标注定义、打开和关闭部分的游标。如,在循环体中:
?BEGIN
?FOR cur IN (SELECT name FROM dept)?? LOOP
?DBMS_OUT.PUT_LINE(cur.name);
?END LOOP;
?END;
?/

三、 Ref Cursor(动态游标):
1) 与隐式Cursor,显式Cursor的区别:Ref Cursor是可以通过在运行期间传递参数来获取数据结果集。而另外两种Cursor,是静态的,在编译期间就决定数据结果集。
2) Ref cursor的使用:
?Type [Cursor type name] is ref cursor
? Define 动态的Sql语句
? Open cursor
? 操作数据---Fetch? [Cursor name]
?Close Cursor

?

?

--权限

1.如果给一个user用户授予一个表table的相应权限(INSERT UPDATE DELETE SELECT),然后又对该table表结构作相应的修改操作,
次时用户user对该表的权限将会丢失,必须重新为user授予权限。

--数组

在PL/SQL中是没有数组(Array)概念的。但是如果程序员想用Array的话,就得变通一下,用TYPE 和Table of Record来代替多维数组,一样挺好用的。
emp_type 就好象一个table 中的一条record 一样,里面有id, name,gender等。
emp_type_array 象个table, 里面含有一条条这样的record (emp_type),就象多维数组一样。

--单维数组
DECLARE
TYPE emp_ssn_array IS TABLE OF NUMBER
INDEX BY BINARY_INTEGER;
best_employees emp_ssn_array;
worst_employees emp_ssn_array;

BEGIN
best_employees(1) := '123456';
best_employees(2) := '888888';
worst_employees(1) := '222222';
worst_employees(2) := '666666';
FOR i IN 1..best_employees.count LOOP
DBMS_OUTPUT.PUT_LINE('i='|| i || ', best_employees= ' ||best_employees(i)
|| ', worst_employees= ' ||worst_employees(i));
END LOOP;
END;

--多维数组
DECLARE
TYPE emp_type IS RECORD
( emp_id employee_table.emp_id%TYPE,
emp_name employee_table.emp_name%TYPE,
emp_gender employee_table.emp_gender%TYPE );
TYPE emp_type_array IS TABLE OF emp_type INDEX BY BINARY_INTEGER;
emp_rec_array emp_type_array;
emp_rec emp_type;

BEGIN
emp_rec.emp_id := 300000000;
emp_rec.emp_name := 'Barbara';
emp_rec.emp_gender := 'Female';
emp_rec_array(1) := emp_rec;
emp_rec.emp_id := 300000008;
emp_rec.emp_name := 'Rick';
emp_rec.emp_gender := 'Male';
emp_rec_array(2) := emp_rec;
FOR i IN 1..emp_rec_array.count LOOP
DBMS_OUTPUT.PUT_LINE('i='||i
||', emp_id ='||emp_rec_array(i).emp_id
||', emp_name ='||emp_rec_array(i).emp_name
||', emp_gender = '||emp_rec_array(i).emp_gender);
END LOOP;
END;
用下面语句声明数组类型
type intarray is varry(30) of integer;

用下面语句声明一个数组变量
declare
A intarray;用下面语句声明数组类型
type intarray is varry(30) of integer;

用下面语句声明一个数组变量
declare
A intarray;用下面语句声明数组类型
type intarray is varry(30) of integer;