oracle使用游标快速删除数据

DECLARE 
  CURSOR CUR_OBJECT_FORALL IS select a.no
        from students a
        Where a.Status<'40' 
         and a.id = '3333'
         and rownum<=160000;
  --定义forall对象数据 定义的是列对象 即UUID列
  TYPE T_OBJECT_FORALL IS TABLE OF CUR_OBJECT_FORALL%ROWTYPE INDEX BY BINARY_INTEGER;
  --定义forall实例
  T_OBJECT_FORALL1 T_OBJECT_FORALL;
 
BEGIN
  --打开游标
  OPEN CUR_OBJECT_FORALL;
  --把游标数据放入forall实例中
  FETCH CUR_OBJECT_FORALL BULK COLLECT INTO T_OBJECT_FORALL1;
  --关闭游标
  CLOSE CUR_OBJECT_FORALL;
  --循环遍历forall实例并批量插入数据库 
  FORALL I IN T_OBJECT_FORALL1.FIRST .. T_OBJECT_FORALL1.LAST 
    delete from  students H where h.no=T_OBJECT_FORALL1(I).no;
    COMMIT;
END;