循环嵌套的格式打给你写了一下 以参考一下换上你的数据就行:
CREATE OR REPLACE PROCEDURE P_name
AS
定义变量如:
V$PO_NO VARCHAR2(20);
V$ITM_CD VARCHAR2(20);
V$ITM_CD1 VARCHAR2( 40);
CURSOR CUR_A
IS
SELECT *
FROM a;
CURSOR CUR_B
IS
SELECT *
FROM B;
BEGIN
OPEN CUR_A;
LOOP
FETCH CUR_A INTO 变量V$PO_NO;
EXIT WHEN CUR_A%NOTFOUND;
循环处理;
OPEN CUR_B;
LOOP
FETCH CUR_B INTO 变量V$ITM_CD;
EXIT WHEN CUR_B%NOTFOUND;
次循环处理;
END LOOP ;
CLOSE CUR_B;
END LOOP ;
CLOSE CUR_A;
COMMIT;
异常处理:
EXCEPTION
WHEN NO_DATA_FOUND THEN
DBMS_OUTPUT.PUT_LINE( '无值');
ROLLBACK;
WHEN OTHERS THEN
P$RET:= SQLCODE;
ROLLBACK;
END;
Ⅱ sql语句编写存储过程,使用游标循环打印学生表中的数据,求大神
写一个例子给楼主看下就知道了:
在sqlserver2000中新建一个存储过程:
CREATEPROCEDUREPK_Test
AS
//声明1个变量
declare@namenvarchar(20)
//声明一个游标mycursor,select语句中参数的个数必须要和从游标取出的变量名相同
//打开游标
openmycursor
//从游标里取出数据赋值到我们刚才声明的2个变量中
fetchnextfrommycursorinto@name
//判断游标的状态
//0fetch语句成功
//-1fetch语句失败或此行不在结果集中
//-2被提取的行不存在
while(@@fetch_status=0)
begin
//显示出我们每次用游标取出的值
print'游标成功取出一条数据'
print@name
//用游标去取下一条记录
fetchnextfrommycursorinto@name
end
//关闭游标
closemycursor
//撤销游标
deallocatemycursor
GO
Ⅲ 存储过程中For循环怎么写啊
方法和详细的操作步骤如下:
1、第一步,编写存储过程的整体结构,定义变量,见下图,转到下面的步骤。
Ⅳ mysql存储过程 游标双重循环
在老版本的MySQL 3.22中,MySQL的单表限大小为4GB,当时的MySQL的存储引擎还是ISAM存储引擎。但是,当出现MyISAM存储引擎之后,也就是从MySQL 3.23开始,MySQL单表最大限制就已经扩大到了64PB了(官方文档显示)。也就是说,从目前的技术环境来看,MySQL数据库的MyISAM存储 引擎单表大小限制已经不是有MySQL数据库本身来决定,而是由所在主机的OS上面的文件系统来决定了。
而MySQL另外一个最流行的存储引擎之一Innodb存储数据的策略是分为两种的,一种是共享表空间存储方式,还有一种是独享表空间存储方式。
当使用共享表空间存储方式的时候,Innodb的所有数据保存在一个单独的表空间里面,而这个表空间可以由很多个文件组成,一个表可以跨多个文件存在,所 以其大小限制不再是文件大小的限制,而是其自身的限制。从Innodb的官方文档中可以看到,其表空间的最大限制为64TB,也就是说,Innodb的单 表限制基本上也在64TB左右了,当然这个大小是包括这个表的所有索引等其他相关数据。
而当使用独享表空间来存放Innodb的表的时候,每个表的数据以一个单独的文件来存放,这个时候的单表限制,又变成文件系统的大小限制了。
Ⅳ ORACLE存储过程怎么实现跳出游标当前循环,继续获取下一行
Oracle 11g开始,已经支持continue的。
Ⅵ SQL存储过程中 循环判断变量值+游标问题
写在打开游标的后头:
if state = flase then
raise_application_error(-20010,'state值为false,中断执行');
end if;
后面再接正常的处理过程,这样就OK
Ⅶ Sql存储过程游标循环的用法及sql如何使用cu
--1.声明名称为
cursor_fruit的游标USE sample_db;GODECLARE cursor_fruit CURSOR FORSELECT f_name,f_price FROM fruits;
--2.打开游标
OPEN cursor_fruit;
--3.读取游标中的数据
--【例】使用名称为cursor_fruit的光标,检索fruits表中的记录,输入如下:USE sample_db;
GOFETCH NEXT FROM cursor_fruit
WHILE @@FETCH_STATUS=0
BEGIN
FETCH NEXT FROM cursor_fruit
END;
--4.关闭关闭名称为cursor_fruit的游标
CLOSE cursor_fruit
--5.释放游标
DEALLOCATE cursor_fruit;
Ⅷ SQL存储过程中怎么写循环
方法和详细的操作步骤如下:
1、第一步,编写存储过程的整体结构,定义变量,见下图,转到下面的步骤。
Ⅸ 怎么在存储过程中进行循环
用游标,和WHILE可以遍历您的查询中的每一条记录并将要求的字段传给变量进行相应的处理
==================
DECLARE @A1 VARCHAR(10),@A2 VARCHAR(10),@A3 INT
DECLARE CURSOR YOUCURNAME FOR SELECT A1,A2,A3 FROM YOUTABLENAME
OPEN YOUCURNAME
fetch next from youcurname into @a1,@a2,@a3
while @@fetch_status<>-1
begin
update ... set ...=@a1,...=a2 ...-a3 where ...
......您要执行的操作写在这里
fetch next from youcurname into @a1,@a2,@a3
end
close youcurname
deallocate youcurname
Ⅹ 写一个存储过程,用游标循环每一个学生,每一次循环统计每一学生各个科目的成绩,打印到控制到输出如下
--学生表
create table t_xsb (xsbh number(10),xsxm varchar2(300));
comment on table t_xsb is '学生表';
comment on column t_xsb.xsbh is '学生编号';
comment on column t_xsb.xsxm is '学生姓名';
alter table t_xsb add constraints pk_xsb primary key (xsbh) using index;
--科目表
create table t_kmb (kmbh number(10),kmmc varchar2(300));
comment on table t_kmb is '科目表';
comment on column t_kmb.kmbh is '科目编号';
comment on column t_kmb.kmmc is '科目名称';
alter table t_kmb add constraints pk_kmb primary key (kmbh) using index;
--成绩表
create table t_cjb
(cjbh number(10),
cjfs number(10,1),
xsbh number(10),
kmbh number(10));
comment on table t_cjb is '成绩表';
comment on column t_cjb.cjbh is '成绩编号';
comment on column t_cjb.cjfs is '成绩分数';
comment on column t_cjb.xsbh is '学生编号';
comment on column t_cjb.kmbh is '科目编号';
alter table t_cjb add constraints pk_cjb primary key (cjbh) using index;
alter table t_cjb add constraints fk_cjb_xsbh foreign key (xsbh)
references t_xsb(xsbh);
alter table t_cjb add constraints fk_cjb_kmbh foreign key (kmbh)
references t_kmb(kmbh);
--创建序列
create sequence sq_ls
increment by 1
start with 1000000000
maxvalue 9999999999
nocycle
nocache;
--创建学生表的before insert触发器,实现对学生表主键的自动增长列
create or replace trigger r_xsb
before insert on t_xsb
for each row
declare
v_xsbh number(10) := null;
begin
v_xsbh := sq_ls.nextval;
:new.xsbh := v_xsbh;
end;
--写一个存储过程,用游标循环每一个学生,
--每一次循环统计每一学生各个科目的成绩,打印到控制
create or replace procere p_xscjtj is
v_xsbh number(10) := null;
v_xsxm varchar2(300) := null;
v_sx_nm number(10) := null;
v_yw_nm number(10) := null;
v_yy_nm number(10) := null;
v_zf_nm number(10) := null;
v_sx_ch varchar2(300) := null;
v_yw_ch varchar2(300) := null;
v_yy_ch varchar2(300) := null;
v_zf_ch varchar2(300) := null;
cursor c_xs is
select t.xsbh, t.xsxm from t_xsb t;
begin
dbms_output.enable(buffer_size => null);
open c_xs;
dbms_output.put_line(rpad(STR1 => '姓名',
PAD => ' ',
LEN => lengthb('姓名') + 5) ||
rpad(STR1 => '数学',
PAD => ' ',
LEN => lengthb('数学') + 5) ||
rpad(STR1 => '语文',
PAD => ' ',
LEN => lengthb('语文') + 5) ||
rpad(STR1 => '英语',
PAD => ' ',
LEN => lengthb('英语') + 5) ||
rpad(STR1 => '总分',
PAD => ' ',
LEN => lengthb('总分') + 5));
loop
fetch c_xs
into v_xsbh, v_xsxm;
exit when c_xs%notfound;
begin
select nvl(sum(case
when t2.kmmc = '数学' then
t1.cjfs
else
0
end),
0) sx,
nvl(sum(case
when t2.kmmc = '语文' then
t1.cjfs
else
0
end),
0) yw,
nvl(sum(case
when t2.kmmc = '英语' then
t1.cjfs
else
0
end),
0) yy,
nvl(sum(t1.cjfs), 0) zf
into v_sx_nm, v_yw_nm, v_yy_nm, v_zf_nm
from t_cjb t1, t_kmb t2
where t1.kmbh = t2.kmbh
and t1.xsbh = v_xsbh
group by t1.xsbh;
exception
when others then
v_sx_nm := 0;
v_yw_nm := 0;
v_yy_nm := 0;
v_zf_nm := 0;
end;
v_xsxm := rpad(STR1 => v_xsxm, PAD => ' ', LEN => lengthb('姓名') + 5);
v_sx_ch := rpad(STR1 => v_sx_nm, PAD => ' ', LEN => lengthb('数学') + 5);
v_yw_ch := rpad(STR1 => v_yw_nm, PAD => ' ', LEN => lengthb('语文') + 5);
v_yy_ch := rpad(STR1 => v_yy_nm, PAD => ' ', LEN => lengthb('英语') + 5);
v_zf_ch := rpad(STR1 => v_zf_nm, PAD => ' ', LEN => lengthb('总分') + 5);
dbms_output.put_line(v_xsxm || v_sx_ch || v_yw_ch || v_yy_ch ||
v_zf_ch);
end loop;
close c_xs;
exception
when others then
dbms_output.put_line(sqlerrm);
end;