工作积累（游标、权限、数组）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;