参考光标 If Then 在循环中使用光标

Question

我试图使用这样的东西：

 DECLARE type cur1 REF CURSOR;
 c1 cur1;

  BEGIN 
   IF (variable1 = 'true') THEN 
     OPEN c1 FOR 'SELECT * FROM STUDENT'; 
   ELSE 
     OPEN c1 FOR 'SELECT * FORM EMP';
 END IF ; 
  END; 

我从PL/SQL cursor with IF condition得到的

但是，我需要遍历光标才能使用数据。所以我想弄清楚如何做以下事情。

DECLARE type cur1 REF CURSOR;
 c1 cur1;

  BEGIN 
   IF (variable1 = 'true') THEN 
     OPEN c1 FOR 'SELECT * FROM STUDENT'; 
   ELSE 
     OPEN c1 FOR 'SELECT * FORM EMP';
 END IF ;
    for award_rec in c1 loop ....
  END; 

但我收到以下错误

PLS-00221：“c1”不是过程或未定义

我应该如何构建它？

Answer 1

您不能将 for 循环与 REF CURSOR 一起使用。而是在带有EXIT WHEN 条件的循环中获取它。由于每个条件要选择的表（以及列）都不同，因此您必须在两个条件中都包含循环。

您可以使用BULK COLLECT INTO 子句将记录提取到相应表记录的集合中。

SET SERVEROUTPUT ON;
DECLARE
TYPE cur1
IS
  REF
  CURSOR;
    c1 cur1;
    variable1 VARCHAR2(10) := 'true';
  TYPE emprec_t
IS
  TABLE OF emp%ROWTYPE;
TYPE student_t
IS
  TABLE OF student%ROWTYPE;
  emp_rec emprec_t;
  stu_rec student_t;
BEGIN
  IF (variable1 = 'true') THEN
    OPEN c1 FOR 'SELECT * FROM STUDENT';
    FETCH c1 BULK COLLECT INTO stu_rec;
  FOR i IN stu_rec.FIRST..stu_rec.LAST
  LOOP
    DBMS_OUTPUT.PUT_LINE(stu_rec(i).STUDENT_ID);
  END LOOP;
ELSE
  OPEN c1 FOR 'SELECT * FROM  EMP';
  FETCH c1 BULK COLLECT INTO emp_rec;
  FOR i IN emp_rec.FIRST..emp_rec.LAST
  LOOP
    DBMS_OUTPUT.PUT_LINE(emp_rec(i).EMPLOYEE_ID);
  END LOOP;
END IF ;
END;
/

编辑：您可以遍历集合并从特定索引中获取列，如图所示。