【SQL开源代码栏目提醒】:本文主要为网学会员提供ISOPEN.sql,希望对需要ISOPEN.sql网友有所帮助,学习一下!
/* 打开显示模式 */
SET ServerOutput ON;
DECLARE --开始声明部分
varName VARCHAR2(50); --声明变量,用来保存游标中的用户名
varId NUMBER; --声明变量,用来保存游标中的用户编号
--定义游标, varType为参数, 指定用户类型编号
CURSOR MyCur(varType NUMBER) IS
SELECT UserId, UserName FROM Users
WHERE UserType = varType;
BEGIN --开始程序体
IF MyCur%ISOPEN = FALSE Then
OPEN MyCur(2);
END IF;
FETCH MyCur INTO varId, varName; --读取当前游标位置的数据
CLOSE MyCur; --关闭游标
dbms_output.put_line('用户编号:' || varId ||', 用户名:' || varName); --显示读取的数据
END; --结束
程序体