189 8069 5689
1、创建表
创新互联公司专业IDC数据服务器托管提供商，专业提供成都服务器托管，服务器租用，遂宁托管服务器，遂宁托管服务器，成都多线服务器托管等服务器托管服务。
1）创建未核销台账表x01：序列（主键）、票据起始号、票据结束号；
2）创建未核销台账明细表x02：序号、票据号（全表主键）；
2、存储过程写台账表
1）查询出未核销台账中最大的票据号和最小的票据号；
2）定义：序号（默认1）、票据起始号（默认最小票据号）、结束号、是否新序号（默认是）
2）游标查询最大票据号和最小票据号之间的所有票据号及核销状态（包括已核销和作废的）
3）逐条判断票据的核销状态
a 核销状态为未核销，是否新序号为是，则
为表x01插入数据：序号、票据起始号、票据结束号（等于当前票据号）；
为表x02插入数据：序号、票据号；
是否新序号写成否
b 核销状态为未核销，是否新序号为否，则
为表x01更新数据：票据结束号等于当前票据号（条件是序号等于当前序号）；
为表x02插入数据：序号、票据号；
b 核销状态为已核销或作废，是否新序号为是，则
不处理，继续循环；
b 核销状态为已核销或作废，是否新序号为否，则
变量序号加1，是否新序号写成是
4）提交
3、检索表X01，X02,得到 未核销台账表，以及对应的未核销台账明细
游标能够根据查询条件从数据表中提取一组记录，将其作为一个临时表置于数据缓冲区中，利用指针逐行对记录数据进行操作。
Oracle中的游标分为显示游标和隐式游标 。
在执行SQL语句时，Oracle会自动创建隐式游标，该游标是内存中处理该语句的数据缓冲区，存储了执行SQL语句的结果。通过隐式游标属性可获知SQL语句的执行状态信息。
%found：布尔型属性，如果sql语句至少影响到一行数据，值为true，否则为false。
%notfound：布尔型属性，与%found相反。
%rowcount：数字型属性，返回受sql影响的行数。
%isopen：布尔型属性，当游标已经打开时返回true，游标关闭时则为false。
用户可以显式定义游标。使用显式游标处理数据要4个步骤：定义游标、打开游标、提取游标数据和关闭游标。
游标由游标名称和游标对应的select结果集组成。定义游标应该放在pl/sql程序块的声明部分。
语法格式：cursor 游标名称(参数) is 查询语句
打开游标时，游标会将符合条件的记录送入数据缓冲区，并将指针指向第一条记录。
语法格式：open 游标名称(参数);
将游标中的当前行数据赋给指定的变量或记录变量。
语法格式：fetch 游标名称 into 变量名;
游标一旦使用完毕，就应将其关闭，释放与游标相关联的资源。
语法格式：close 游标名称;
declare
cursor c1 is select sno,cno,grade from sc;
v_sno sc.sno%type;
v_cno sc.cno%type;
v_grade sc.grade%type;
begin
open c1;
loop
fetch c1 into v_sno,v_cno,v_grade;
exit when c1%notfound;--紧跟fetch之后
if c1%found then
dbms_output.put_line(to_char(c1%rowcount)||v_cno);
end if;
end loop;
close c1;
end;
declare
cursor c1 is select sno,cno,grade from sc;
v_sno sc.sno%type;
v_cno sc.cno%type;
v_grade sc.grade%type;
begin
open c1;
fetch c1 into v_sno,v_cno,v_grade;
while c1%found loop
dbms_output.put_line(v_sno||v_cno||v_grade);
fetch c1 into v_sno,v_cno,v_grade;
end loop;
close c1;
end;
第三种：for
declare
cursor c1 is select sno,cno,grade from sc;
begin
for item in c1 loop
dbms_output.put_line(rpad(item.sno,'10',' ')||rpad(item.cno,'10',' ')||rpad(item.grade,'10',' '));
end loop;
end;
SQLshow parameter open_cursors; ---显示参数值
SQLalter system set open_cursors = 2500; ---修改参数值为2500
SQLcommit; ----提交
1.游标定义：\x0d\x0acursor XXXA is\x0d\x0a SELECT 语句;\x0d\x0aXXXB cursorName%rowtype;\x0d\x0a\x0d\x0aXXXA: 游标名\x0d\x0aXXXB: 游标行数据定义\x0d\x0a\x0d\x0a2. 打开游标：\x0d\x0a-- 打开之前最好先关一下，防止上次发生异常没有关掉而引发不必要的异常\x0d\x0a IF XXXA%ISOPEN THEN\x0d\x0a CLOSE XXXA;\x0d\x0a END IF;\x0d\x0a\x0d\x0aOpen XXXA ;\x0d\x0a Loop\x0d\x0a Fetch XXXA into XXXB;\x0d\x0a exit when XXXA%NOTFOUND;\x0d\x0a... ... 处理逻辑\x0d\x0a end loop;\x0d\x0a close XXXA;