Database 版 (精华区)

发信人: code.bbs@bbs.whnet.edu.cn (YANG), 信区: cndatabase
标  题:  PB紧急求教!!!
发信站: 武汉白云黄鹤站 (Mon Jul 14 06:13:04 1997)
转信站: Lilac!ustcnews!ustcnews!rjgcnews!whbbs

   在CURSOR下使用UPDATE/DELETE WHERE CURRENT OF
语句出现ERROR:
 the  UPDATE/DELETE WHERE CURRENT OF  failed for 
cursor 'syccur1' because the cursor is read only.
   如何解决这一问题? 请高手赐教!

[附:]源script

int    PRE_DATELIMIT=7 
string old_locall,curr_locall,state
datetime pre_datetime
date     pre_date,curr_date
int      pre_over_label

DECLARE c1 CURSOR FOR
  SELECT locall,state,date2
    FROM cir_hold_tbl
    ORDER BY locall,state DESC 
  USING SQLCA;   
open c1;

FETCH c1 INTO :curr_locall,:state,:pre_datetime ;

delete from cir_hold_tbl
WHERE CURRENT OF c1;
messagebox("dele",string(SQLCA.SQLCode),stopsign!,ok!)
messagebox("ERROR",SQLCA.SQLErrtext,STOPSIGN!,OK!)

close c1;
commit;

--
※ 来源:·武汉白云黄鹤站 s1000e.whnet.edu.cn·[FROM: 202.114.9.2]