游标附值问题

Question

是不是这行有错误  pi_bukkennum) :=rec_1.CHM_BUKKEN; 
pi_bukken(num) :=rec_1.CHM_BUKKEN; 

Answer 1

不是,写错了
pi_bukken(num) :=rec_1.CHM_BUKKEN

Answer 2

declare
TYPEv_seq_no IS VARRAY(20) OF NUMBER(4);    
TYPE v_bukken IS VARRAY(20) OF VARCHAR2(30);  
pi_seq_no v_seq_no := v_seq_no();  
pi_bukken v_bukken := v_bukken();  
...
CURSOR C_SECOND IS
   SELECT CHM_SEQ_NO,      
 CHM_BUKKEN    
   FROM SNOADBA.PJCHHTRN  
  rec_1    C_SECOND%rowtype; 
num number:=1;
begin
OPEN C_SECOND;  
 
LOOP
FETCH C_SECOND INTO rec_1;
  EXIT WHEN C_SECOND%NOTFOUND;
pi_seq_no.extend;
pi_bukken.extend;
pi_seq_no(num) := rec_1.CHM_SEQ_NO;    
pi_bukken(num) :=rec_1.CHM_BUKKEN;                    
num:=num+1;
END LOOP;