1. Oracle Cursor 简单用法：从声明到 FETCH 的完整实操
Oracle 里的 Cursor（游标）本质上就是一块指向查询结果集的指针，你可以把它理解成"逐行读取数据的遥控器"。当你需要一行一行处理查询结果，而不是一次性把数据全部捞出来时，Cursor 就是最顺手的工具。它适合谁？适合写存储过程、函数、触发器的 PL/SQL 开发者，尤其是做批量折扣分摊、订单明细遍历、状态机流转这类"逐行判断再更新"的场景。我这次要做的，是把一段真实的changeSpecialDiscount存储过程拆开讲清楚：Cursor 怎么声明、怎么 OPEN、怎么 FETCH、怎么 CLOSE，以及循环里那些容易踩坑的地方。同时，因为我在 Cursor 编辑器里写这些 SQL，顺手把 Cursor 的 Base URL 指向了 TaoToken 的统一 Key/API 通道，这样写 PL/SQL 时用 AI 补全、解释报错都走同一个入口，不用来回切工具。下面把两件事都写清楚：Oracle Cursor 的用法，和 Cursor 编辑器的配置。
先说清楚 Cursor 在 Oracle 语境下的两种含义，避免混淆。第一种是数据库游标，PL/SQL 里的CURSOR c1 IS SELECT ...，这是本篇的技术主体。第二种是 Cursor 编辑器，一个 AI 代码编辑器，本篇要配置它的 Base URL。两者名字撞车，但一个是 SQL 语法，一个是 IDE 设置，读的时候注意区分。我实测下来，把编辑器接上统一通道后，写存储过程时让 AI 解释FETCH c1 INTO ...的字段顺序、检查%NOTFOUND用法，效率提升明显，尤其是字段多的时候不用一个个数。
这段存储过程的核心逻辑是：根据传入的compID_in、ccID_in、coNO_in三个参数，查出订单明细，按每行的sp_per_unit_contr * qty_order占比，把总折扣wspcl_disc分摊到每一行，最后更新tbco_item的special_disc字段。Cursor 在这里的作用就是遍历明细行，逐行计算分摊金额。下面从声明开始，一步步拆。
1.1 Cursor 的声明：把查询结果集绑定到游标名
声明游标就是告诉 Oracle："我要执行这条 SELECT，结果先别急着给我，挂在一个叫 c1 的名字下面。"语法结构是CURSOR 游标名 IS SELECT 语句。在changeSpecialDiscount里，声明部分长这样：
CURSOR c1 IS SELECT ITEM_NO, COST_CC_CONTR, QTY_ORDER, LP_CUST_CONTR, STATUS, SRCE_TYPE, SP_PER_UNIT_CONTR FROM tbco_item WHERE COMP_ID = compID_in AND CC_ID = ccID_in AND CO_NO = coNO_in;这里有几个细节值得说。第一，游标声明里的 WHERE 条件直接引用了存储过程的入参compID_in、ccID_in、coNO_in，这是合法的，因为游标在 OPEN 时才真正绑定变量值。第二，SELECT 的字段顺序必须和后面 FETCH 的变量顺序严格一致，这是最容易出错的地方。第三，游标声明只是"定义"，此时并不会执行查询，也不会占用数据库资源，真正干活是在 OPEN 的时候。
我踩过的坑：有一次字段顺序写反了，QTY_ORDER和LP_CUST_CONTR位置对调，结果数量被当成金额算，折扣分摊全乱，但 SQL 本身不报错，因为类型兼容。所以声明完游标，最好把 SELECT 字段和 FETCH 变量列个对照表，逐个核对。
| SELECT 字段 | FETCH 目标变量 | 类型 |
|---|---|---|
| ITEM_NO | witem_no | VARCHAR2(4) |
| COST_CC_CONTR | wcost_cc | NUMBER(14,4) |
| QTY_ORDER | wqty_order | NUMBER(14,4) |
| LP_CUST_CONTR | wlp_contr | NUMBER(14,4) |
| STATUS | wstatus | VARCHAR2(4) |
| SRCE_TYPE | wsrce_type | VARCHAR2(1) |
| SP_PER_UNIT_CONTR | wsp_per_unit_contr | NUMBER(14,4) |
这张表建议你在写游标时随手画一份，字段一多，肉眼核对很容易漏。声明阶段还有一点：游标可以带参数，比如CURSOR c1(p_comp VARCHAR2) IS SELECT ... WHERE COMP_ID = p_comp，这样更灵活，但本篇的写法是直接引用外部变量，两种都行，看团队规范。
1.2 OPEN、FETCH、CLOSE：游标的三段式生命周期
游标的使用遵循固定节奏：OPEN 打开，FETCH 取行，CLOSE 关闭。这三步缺一不可，尤其是 CLOSE，忘了关会导致游标泄漏，长时间运行会耗尽OPEN_CURSORS参数限制。
OPEN 的写法很简单：
OPEN c1;执行到这一句，Oracle 才真正执行游标里的 SELECT，把结果集准备好，指针停在第一行之前。此时如果查询很慢，卡顿就发生在 OPEN 这一步，而不是声明。
FETCH 是逐行读取：
FETCH c1 INTO witem_no, wcost_cc, wqty_order, wlp_contr, wstatus, wsrce_type, wsp_per_unit_contr;每执行一次 FETCH，指针下移一行，把当前行的字段值塞进对应的变量。如果取不到行（到底了），变量值保持不变，同时c1%NOTFOUND变成 TRUE。这里要注意：FETCH 本身不报错，取不到就是取不到，你得自己判断。
CLOSE 收尾：
CLOSE c1;关闭后游标占用的资源释放，结果集失效。如果还想再遍历一遍，必须重新 OPEN。
在changeSpecialDiscount里，作者用的是FOR idx IN 1..cnt_i LOOP ... END LOOP这种计数循环配合 FETCH，而不是更常见的LOOP ... EXIT WHEN c1%NOTFOUND。这两种写法有区别：计数循环依赖cnt_i（明细总行数）和游标返回行数完全一致，如果中途有行被过滤掉，FETCH 次数和实际行数对不上，就会出问题。更稳妥的写法是用%NOTFOUND控制退出：
OPEN c1; LOOP FETCH c1 INTO witem_no, wcost_cc, wqty_order, wlp_contr, wstatus, wsrce_type, wsp_per_unit_contr; EXIT WHEN c1%NOTFOUND; -- 逐行处理逻辑 END LOOP; CLOSE c1;我建议你优先用%NOTFOUND版本，它对数据变化更鲁棒。计数循环适合你非常确定行数稳定的场景，但生产环境里数据随时可能变，别赌。
1.3 循环体内的分摊逻辑与 UPDATE 落库
FETCH 拿到一行后，循环体做三件事：查状态码、算分摊金额、更新明细行。先看状态码查询：
SELECT ACTIVITY_CODE INTO act_cd FROM TBCM_STATUS WHERE SYSTEM_CODE = 'CO' AND TABLE_LEVEL = '2' AND DATA_TYPE = wsrce_type AND (STATUS_NAME1 = wstatus OR STATUS_NAME2 = wstatus);这里用wsrce_type和wstatus两个游标变量去查状态表，拿到act_cd。注意这个 SELECT INTO 在循环里执行，如果查不到会抛NO_DATA_FOUND，如果查到多行会抛TOO_MANY_ROWS。生产代码里最好加异常处理，或者用MAX(ACTIVITY_CODE)兜底。
分摊逻辑是核心：
IF wsp_per_unit_contr = 0 OR act_cd = '15' THEN wsp_disc := 0; ELSIF cnt2 < cnt_u THEN wsp_disc := ROUND(wspcl_disc * (wsp_per_unit_contr * wqty_order / sum_cc_all), 2); cnt2 := cnt2 + 1; ELSIF cnt2 >= cnt_u THEN wsp_disc := wspcl_disc - tot_disc; END IF;翻译一下：如果单价为 0 或者状态码是 15，这行不分摊，给 0。否则按占比算，cnt2是已分摊行计数器，cnt_u是有效行数。最后一行用wspcl_disc - tot_disc兜底，把四舍五入的误差补上，保证分摊总额等于总折扣。这个"最后一行兜底"是财务类分摊的经典手法，不然 ROUND 累积误差会让总额对不上。
更新落库：
UPDATE tbco_item SET special_disc = ROUND(wsp_disc, 2), date_modify = SYSDATE WHERE COMP_ID = compID_in AND CC_ID = ccID_in AND CO_NO = coNO_in AND item_no = witem_no;用游标里的witem_no精确定位行，逐行更新。这里没有 COMMIT，说明事务控制交给调用方，这是存储过程的常见约定。
1.4 在 Cursor 编辑器里把 Base URL 指向 TaoToken
写 PL/SQL 时我用的编辑器是 Cursor，它的 AI 功能默认走官方通道。我想统一走 TaoToken 的 Key/API 通道，这样模型调用集中管理。配置入口在 Cursor 的设置里，找到模型配置部分，把 Base URL 和 API Key 填进去。TaoToken 的 API 地址是https://taotoken.net/api，注意这个地址不带任何查询参数。
配置片段（JSON 形式，路径对应 Cursor 的 settings）：
{ "openai.baseUrl": "https://taotoken.net/api", "openai.apiKey": "你的TaoToken Key", "openai.model": "claude-sonnet-4-20250514" }三件套必须齐全：Base URL、Key、Model ID。少一个都会报错。Model ID 按你在 TaoToken 控制台看到的可用模型填，别照抄我的，以实际为准。填完后重启 Cursor，或者重新加载窗口，让配置生效。
如果你用的是 Claude Code 这类命令行工具，配置方式不同，走的是环境变量或配置文件。但 Cursor 编辑器就是上面这个 JSON 结构。我实测下来，改完 Base URL 后，AI 补全和对话都正常，响应速度取决于所选模型。
1.5 验证请求：确认配置生效与 FETCH 结果正确
配置改完，先验证通道通不通。在 Cursor 里随便问一句，比如"解释一下 Oracle 游标 %NOTFOUND 的用法"，如果正常返回，说明 Base URL 和 Key 生效。如果报 401，说明 Key 不对；如果报连接失败，检查 Base URL 有没有多写斜杠或路径。
数据库这边，验证游标逻辑是否正确，最直接的办法是单独跑一遍查询，看行数和分摊结果。先确认游标返回的行数：
SELECT COUNT(*) FROM tbco_item WHERE COMP_ID = '你的compID' AND CC_ID = '你的ccID' AND CO_NO = '你的coNO';把这个数字和存储过程里的cnt_i对比，应该一致。再检查分摊后的明细：
SELECT ITEM_NO, SP_PER_UNIT_CONTR, QTY_ORDER, SPECIAL_DISC FROM tbco_item WHERE COMP_ID = '你的compID' AND CC_ID = '你的ccID' AND CO_NO = '你的coNO' ORDER BY ITEM_NO;把所有行的SPECIAL_DISC加起来，应该等于tbco_head里的DISC_AMT。如果对不上，多半是最后一行兜底逻辑没生效，或者cnt_u和cnt_i的统计口径不一致。我实测时遇到过一次总额差 0.01，就是 ROUND 误差没兜住，检查后发现cnt2的递增条件写错了。
1.6 常见报错排查：从 ORA-01001 到字段错位
游标相关的报错有几个高频的，对照着查。
ORA-01001: invalid cursor：游标没 OPEN 就 FETCH，或者已经 CLOSE 了还在 FETCH。检查 OPEN 和 CLOSE 的位置，别在循环里误关。
ORA-01002: fetch out of sequence：通常是 FOR UPDATE 游标在 COMMIT 之后继续 FETCH。如果你在循环里 COMMIT，要么改成批量提交，要么别用 FOR UPDATE。
ORA-06502: PL/SQL: numeric or value error：FETCH INTO 的变量类型和字段不匹配，或者变量长度不够。比如witem_no VARCHAR2(4)但实际 ITEM_NO 有 6 位，就会截断报错。检查变量声明。
ORA-01403: no data found：循环里的 SELECT INTO 没查到数据。给状态码查询加异常处理，或者用MAX()聚合避免空结果。
ORA-01422: exact fetch returns more than requested number of rows：SELECT INTO 查到多行。检查 WHERE 条件是否唯一。
编辑器这边，如果 AI 请求报local proxy failed或reading choices之类的错误，先确认 Base URL 是不是https://taotoken.net/api，Key 有没有过期，Model ID 是否在可用列表里。OAuth 类报错通常出现在命令行工具，Cursor 编辑器走的是 Key 认证，不太会遇到。
1.7 把两件事串起来：统一通道 + 游标调试
把 Cursor 编辑器的 Base URL 指向 TaoToken 后，我写 PL/SQL 的流程变成：在编辑器里写游标逻辑，遇到%NOTFOUND用法不确定，直接问 AI；报错了把错误码贴进去，让 AI 解释；字段顺序拿不准，让 AI 帮我列对照表。数据库那边用 SQL Developer 或 sqlplus 跑验证查询。两边配合，调试效率比纯手工高不少。
如果你也想统一管理模型调用，可以先把 Cursor 的配置改好，再去 TaoToken 控制台确认 Key 和可用模型。配置片段就是上面那段 JSON，路径和字段名以你本地 Cursor 版本为准。数据库游标部分，建议从%NOTFOUND版本练起，把计数循环当进阶用法。分摊逻辑里的"最后一行兜底"是财务场景的必备技巧，记住它。
需要拿 Key 或看接入文档，走这两个入口：API Keys 在https://taotoken.net/api-keys，接入文档在https://taotoken.net/doc。想先试试模型对话效果，去https://taotoken.net/chat。长期写代码、跑 Agent 的话，Coding Plan 在https://taotoken.net/coding-plan。这些地址都带统一来源标识，方便你回溯。
最后留一个实用技巧：游标调试时，在 FETCH 后面加一句DBMS_OUTPUT.PUT_LINE(witem_no || ':' || wsp_disc);，把每行的中间结果打出来，比事后查表快得多。记得先SET SERVEROUTPUT ON。这个习惯帮我省了很多次来回查数据的时间。
