plsql中写的for循环游标

最新推荐文章于 2025-05-25 18:26:05 发布

qinshihuanglove2

最新推荐文章于 2025-05-25 18:26:05 发布

阅读量1.8k

点赞数 1

CC 4.0 BY-SA版权

分类专栏： ORACLE

本文链接：https://blog.youkuaiyun.com/qinshihuanglove2/article/details/86494741

ORACLE 专栏收录该内容

13 篇文章

订阅专栏

本文介绍了一种使用Oracle PL/SQL过程来检查数据库表中ID字段是否连续的方法。通过遍历特定条件下的记录并比较预期ID与实际ID，可以找出所有跳号的ID，适用于维护数据完整性和进行数据清理工作。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

从ID列中找出不连续的ID号，并打印出来。

DECLARE
V_ID VARCHAR2(20);
V_NAME VARCHAR2(20);
V_DATE DATE;
V_STARTVALUE NUMBER;
BEGIN
V_STARTVALUE := 1;
FOR IN_DEPT_USERNUM IN (SELECT ID
FROM BO_CRM_CLIENT_SERDPT
WHERE CREATEUSER = 'admin'
AND CREATEDATE >
TO_DATE('2018/12/19', 'yyyy/mm/dd')
AND CREATEDATE <
TO_DATE('2018/12/29', 'yyyy/mm/dd')
ORDER BY ID) LOOP
BEGIN

IF V_STARTVALUE - IN_DEPT_USERNUM.ID < -1 THEN
DBMS_OUTPUT.PUT_LINE(V_STARTVALUE);
END IF;

EXCEPTION
WHEN NO_DATA_FOUND THEN
RAISE_APPLICATION_ERROR(-20000,
'E-001(**):校验BO_CRM_CLIENT_SERDPT表中的ID不连续，找出跳号的ID！');
WHEN OTHERS THEN
RAISE_APPLICATION_ERROR(-20000,
'E-001(**):校验BO_CRM_CLIENT_SERDPT表中的ID不连续，找出跳号的ID！异常,原因:' ||
SQLERRM);
END;

V_STARTVALUE := IN_DEPT_USERNUM.ID;
END LOOP;
END;