IBM i 7.3存储过程执行删除索引时无报错终止求助

我来帮你分析下这个问题——在IBM i的SQL存储过程里执行DROP INDEX时无报错直接终止，大概率是异常处理逻辑没覆盖到隐性错误，或者索引操作本身存在未被捕获的问题。结合你的代码，我整理了几个具体的排查和修复方案：

1. 修复异常处理，捕获真实错误原因 #

你的存储过程里用了DECLARE EXIT HANDLER FOR SQLEXCEPTION SET END_TABLE = 1;，这个EXIT HANDLER会在遇到任何SQL异常时直接退出过程，但不会输出错误信息，导致你误以为“无报错”。实际上可能是DROP INDEX触发了异常（比如索引不存在、被锁定），只是被静默处理了。

修改异常处理逻辑，让它捕获并抛出错误详情：

DECLARE EXIT HANDLER FOR SQLEXCEPTION
BEGIN
  DECLARE sql_state CHAR(5);
  DECLARE err_msg VARCHAR(1000);
  GET DIAGNOSTICS EXCEPTION 1 sql_state = RETURNED_SQLSTATE, err_msg = MESSAGE_TEXT;
  SIGNAL SQLSTATE '70001' SET MESSAGE_TEXT = '存储过程执行失败: ' || err_msg || ', SQL状态码: ' || sql_state;
END;

这样当DROP INDEX出错时，你就能看到具体的错误信息，比如索引不存在、对象锁定等。

2. 先检查索引是否存在，再执行删除 #

如果索引已经被删除过，再次执行DROP INDEX会触发SQL异常，进而被EXIT HANDLER终止过程。可以先查询系统表确认索引存在后再删除：

-- 检查并删除SQD_SEARCH_WORD_EVI索引
SELECT COUNT(*) INTO is_there_index
FROM QSYS2.SYSINDEXES
WHERE TABLE_SCHEMA = 'YXDB' 
  AND TABLE_NAME = 'SEARCH_QUERY_DATA' 
  AND INDEX_NAME = 'SQD_SEARCH_WORD_EVI';
IF is_there_index > 0 THEN
  DROP INDEX yxdb.SQD_SEARCH_WORD_EVI;
END IF;

-- 对其他三个索引重复上述逻辑
SELECT COUNT(*) INTO is_there_index
FROM QSYS2.SYSINDEXES
WHERE TABLE_SCHEMA = 'YXDB' 
  AND TABLE_NAME = 'SEARCH_QUERY_DATA' 
  AND INDEX_NAME = 'SQD_FAADRNR_I';
IF is_there_index > 0 THEN
  DROP INDEX yxdb.SQD_FAADRNR_I;
END IF;

SELECT COUNT(*) INTO is_there_index
FROM QSYS2.SYSINDEXES
WHERE TABLE_SCHEMA = 'YXDB' 
  AND TABLE_NAME = 'SEARCH_ACTIVE_DATA' 
  AND INDEX_NAME = 'SAD_SEARCH_WORD_EVI';
IF is_there_index > 0 THEN
  DROP INDEX yxdb.SAD_SEARCH_WORD_EVI;
END IF;

SELECT COUNT(*) INTO is_there_index
FROM QSYS2.SYSINDEXES
WHERE TABLE_SCHEMA = 'YXDB' 
  AND TABLE_NAME = 'SEARCH_ACTIVE_DATA' 
  AND INDEX_NAME = 'SAD_FAADRNR_I';
IF is_there_index > 0 THEN
  DROP INDEX yxdb.SAD_FAADRNR_I;
END IF;

3. 检查对象锁定情况 #

在IBM i环境中，如果有其他会话正在使用目标表或索引（比如未提交的查询、锁），DROP INDEX会等待甚至失败。你可以通过以下命令排查锁定：

• 执行WRKOBJLCK OBJ(YXDB/SEARCH_QUERY_DATA) OBJTYPE(*FILE)
• 执行WRKOBJLCK OBJ(YXDB/SEARCH_ACTIVE_DATA) OBJTYPE(*FILE)
  确保没有其他进程占用这些对象后，再执行存储过程。

4. 优化存储过程逻辑（可选） #

你的存储过程把数据生成、临时表操作、索引维护都放在一个过程里，逻辑过于集中，出问题后难以定位。建议拆分成两个独立的存储过程：

• 一个专门负责清空临时表、生成业务数据
• 另一个负责删除索引、迁移临时表数据、重建索引
  这样不仅调试更方便，还能降低单一过程的出错风险。

内容的提问来源于stack exchange，提问作者Anders Metnik