PLSQL之循环和游标

最新推荐文章于 2023-01-17 09:37:39 发布
最新推荐文章于 2023-01-17 09:37:39 发布
阅读量4.8k 收藏 5
点赞数 2
分类专栏： 数据库
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/cpp1781089410/article/details/50992952
版权

 

关于Struts2 + spring + hibernate进Q群: 130529143交流

 

 

 

1.PLSQL循环：

--使用循环语句打印;1--100:

--1.初始化条件；2.循环体；3.循环条件；4.迭代条件
declare 
  v_i number(5) := 1;--1.初始化条件
begin 
  loop 
      dbms_output.put_line(v_i);--2.循环体
      
  exit when v_i >= 100; --3.循环条件
       v_i := v_i + 1;--4.迭代条件
  end loop;              
end;




--使用循环语句打印;1--100;
--1.初始化条件；2.循环体；3.循环条件；4.迭代条件
declare 
  v_i number(5) := 1;--1.初始化条件
begin 
  while v_i <= 100 loop --3.循环条件
      dbms_output.put_line(v_i);--2.循环体
       v_i := v_i + 1;--4.迭代条件
  end loop;              
end;



--使用循环语句打印;1--100;
--1.初始化条件；2.循环体；3.循环条件；4.迭代条件
begin 
  for c in 1 .. 100 loop 
    dbms_output.put_line(c);
  end loop;
end;




--使用循环语句打印;1--100;
--1.初始化条件；2.循环体；3.循环条件；4.迭代条件
begin 
  for c in reverse 1 .. 100 loop 
    dbms_output.put_line(c);
  end loop;
end;

 

 

 


--输出2-100之间的质数
declare 
  v_i number(3) := 2;
  v_j number(3) := 2;
  v_flag number(1) := 1;
begin 
  while v_i <= 100 loop 
    while v_j <= sqrt(v_i) loop 
      if mod(v_i,v_j)= 0 then v_flag := 0;
      end if;
      v_j := v_j + 1;
    end loop;
    v_j := 2;--初始化
    
    if v_flag = 1 then 
      dbms_output.put_line(v_i);
    end if;
    
    v_i := v_i + 1;
    v_flag := 1;
  end loop;
end;




--输出2-100之间的质数
declare
  v_flag number(1) := 1;
begin 
  for i in 2 .. 100 loop 
    for j in 2 .. trunc(sqrt(i)) loop  
      if mod(i,j)= 0 then v_flag := 0;
      end if;
    end loop;
    if v_flag = 1 then 
      dbms_output.put_line(i);
    end if;
    v_flag := 1;
  end loop;
end;







--输出2-100之间的质数
declare
  v_flag number(1) := 1;
begin 
  for i in 2 .. 100 loop 
    for j in 2 .. trunc(sqrt(i)) loop  
      if mod(i,j)= 0 then v_flag := 0;
         goto label;--满足条件跳出当前层循环
      end if;
    end loop;
    
    <<label>>
    if v_flag = 1 then 
      dbms_output.put_line(i);
    end if;
    v_flag := 1;
  end loop;
end;







begin 
  for i in 1 .. 100 loop 
    if i = 50 then 
       goto label;
    end if; 
   
    dbms_output.put_line(i);
  end loop;
  <<label>>
  dbms_output.put_line('打印结束');
end;






begin 
  for i in 1 .. 100 loop 
    if i = 51 then 
       dbms_output.put_line('打印结束');
       exit;
    end if; 
    dbms_output.put_line(i);
  end loop;
  

 

 

end;

 


2.PLSQL游标：

--打印80号部门的所有员工的工资
declare 
  v_sal employees.salary%type;
  --定义游标
  cursor emp_sal_cursor is select salary from employees where department_id = 80;
begin 
  --打开游标
  open emp_sal_cursor;
  
  --提取游标
  fetch emp_sal_cursor into v_sal;
  
  while emp_sal_cursor%found loop
    dbms_output.put_line('salary:'||v_sal);
    fetch emp_sal_cursor into v_sal;
  end loop;  

   --关闭游标
  close emp_sal_cursor;
end; 




--打印80号部门的所有员工的工资
declare 
  v_sal employees.salary%type;
  v_empid employees.employee_id%type;
  --定义游标
  cursor emp_sal_cursor is select employee_id, salary from employees where department_id = 80;
begin 
  --打开游标
  open emp_sal_cursor;
  
  --提取游标
  fetch emp_sal_cursor into v_empid,v_sal;
  
  while emp_sal_cursor%found loop
    dbms_output.put_line('id:'||v_empid || 'salary:'||v_sal);
    fetch emp_sal_cursor into v_empid,v_sal;
  end loop;  
  
  --关闭游标
  close emp_sal_cursor;
end; 




--打印80号部门的所有员工的工资
declare 
  --声明记录类型
  type emp_record is record(
    v_empid employees.employee_id%type,
    v_sal employees.salary%type
  );
  --声明一个记录类型变量
  v_emp_record emp_record;
 
  --定义游标
  cursor emp_sal_cursor is select employee_id, salary from employees where department_id = 80;
begin 
  --打开游标
  open emp_sal_cursor;
  
  --提取游标
  fetch emp_sal_cursor into v_emp_record;
  
  while emp_sal_cursor%found loop
    dbms_output.put_line('id:'||v_emp_record.v_empid || 'salary:'||v_emp_record.v_sal);
    fetch emp_sal_cursor into v_emp_record;
  end loop;  
  
  --关闭游标
  close emp_sal_cursor;
end; 





--打印80号部门的所有员工的工资
declare 
  --声明记录类型
  type emp_record is record(
    v_empid employees.employee_id%type,--这个两个顺序与定义游标时的顺序对应
    v_sal employees.salary%type --这个两个顺序与定义游标时的顺序对应
  );
  --声明一个记录类型变量
  v_emp_record emp_record;
 
  --定义游标
  cursor emp_sal_cursor is select employee_id, salary from employees where department_id = 80;
begin 
  --打开游标
  open emp_sal_cursor;
  
  --提取游标
  fetch emp_sal_cursor into v_emp_record;
  
  while emp_sal_cursor%found loop
    dbms_output.put_line('id:'||v_emp_record.v_empid || 'salary:'||v_emp_record.v_sal);
    fetch emp_sal_cursor into v_emp_record;
  end loop;  
  
  --关闭游标
  close emp_sal_cursor;
end; 






--打印80号部门的所有员工的工资
declare 
  --定义游标
  cursor emp_sal_cursor is select employee_id, salary from employees where department_id = 80;
begin 
  for c in emp_sal_cursor loop
    dbms_output.put_line('id:'||c.employee_id || 'salary:'||c.salary);
  end loop;  
end; 





--使用游标调整公司中员工的工资
declare 
  cursor emp_sal_cursor is select employee_id, salary from employees;
  
  v_temp number(4,2);
  v_empid employees.employee_id%type;
  v_sal employees.salary%type;
  
begin 
  open emp_sal_cursor;
  fetch emp_sal_cursor into v_empid, v_sal;


  while emp_sal_cursor%found loop
    if v_sal < 5000 then v_temp := 0.05;
    elsif v_sal < 10000 then v_temp := 0.03;
    elsif v_sal < 15000 then v_temp := 0.02;
    else v_temp := 0.01;
    end if;
    dbms_output.put_line(v_empid||','||v_sal);
    update employees set salary = salary * (1 + v_temp) where employee_id = v_empid;
    
    fetch emp_sal_cursor into v_empid, v_sal;
  end loop;
  
  close emp_sal_cursor;
    
end;
  





--使用游标调整公司中员工的工资
declare 
  cursor emp_sal_cursor is select employee_id, salary from employees;
  v_temp number(4,2);
 
begin 
  for c in emp_sal_cursor loop
    if c.salary < 5000 then v_temp := 0.05;
    elsif c.salary < 10000 then v_temp := 0.03;
    elsif c.salary < 15000 then v_temp := 0.02;
    else v_temp := 0.01;
    end if;
    dbms_output.put_line(c.employee_id||','||c.salary);
    update employees set salary = salary * (1 + v_temp) where employee_id = c.employee_id;
    
  end loop;   
end;

--取出游标中的多个属性

CREATE OR REPLACE PROCEDURE BRPMS.P_PREWORK_GZZB(V_REC_NUM      IN NUMBER,
                                                 V_JOBTYPE_ID   IN VARCHAR2,
                                                 V_DEV_TYPE     IN VARCHAR2,
                                                 V_DEV_MODAL    IN VARCHAR2,
                                                 V_SPEC_CODE    IN VARCHAR2,
                                                 V_PERWORK_TYPE IN VARCHAR2) AS
  TYPE R_TYPE IS RECORD(
    V_REC_NUM      BRPMS.TB_WIT_INSTRUCT_PREWORK.REC_NUM%TYPE,
    V_JOBTYPE_ID   BRPMS.TB_WIT_INSTRUCT_PREWORK.JOBTYPE_ID%TYPE,
    V_DEV_TYPE     BRPMS.TB_WIT_INSTRUCT_PREWORK.DEV_TYPE%TYPE,
    V_DEV_MODAL    BRPMS.TB_WIT_INSTRUCT_PREWORK.DEV_MODAL%TYPE,
    V_SPEC_CODE    BRPMS.TB_WIT_INSTRUCT_PREWORK.SPEC_CODE%TYPE,
    V_PERWORK_TYPE BRPMS.TB_WIT_INSTRUCT_PREWORK.PERWORK_TYPE%TYPE);

  V_R1 R_TYPE;

--定义游标
  CURSOR MYCURSOR IS
    SELECT MAX(P.REC_NUM),
           P.JOBTYPE_ID,
           P.DEV_TYPE,
           P.DEV_MODAL,
           P.SPEC_CODE,
           P.PERWORK_TYPE
      FROM BRPMS.TB_WIT_INSTRUCT_PREWORK P
     WHERE P.PERWORK_TYPE = '0600301'
       AND P.CONTENT != '工器具已准备完毕，材料、备品已落实。'
     GROUP BY P.JOBTYPE_ID,
              P.DEV_TYPE,
              P.DEV_MODAL,
              P.SPEC_CODE,
              P.PERWORK_TYPE;
BEGIN
  OPEN MYCURSOR;
  LOOP
    FETCH MYCURSOR
      INTO V_R1;
    EXIT WHEN MYCURSOR%NOTFOUND;
    INSERT INTO BRPMS.TB_WIT_INSTRUCT_PREWORK
      (GUID,
       JOBTYPE_ID,
       DEV_TYPE,
       DEV_MODAL,
       SPEC_CODE,
       PERWORK_TYPE,
       REC_NUM,
       CONTENT)
    VALUES
      (SYS_GUID(),

      --取出游标中的属性
       V_R1.V_JOBTYPE_ID,
       V_R1.V_DEV_TYPE,
       V_R1.V_DEV_MODAL,
       V_R1.V_SPEC_CODE,
       '0600301',
       V_R1.V_REC_NUM + 1,
       '工器具已准备完毕，材料、备品已落实。');
    COMMIT;
  END LOOP;
  CLOSE MYCURSOR;
END;

 

 

关于Struts2 + spring + hibernate进Q群: 130529143交流。
有偿技术支持Q群：398162181 

 

eplusing
关注
专栏目录
plsql存过声明游标_plsql、游标、存储过程
weixin_39614060的博客
12-20 205
以下为个人学习笔记plsql语言不区分大小写。1.程序结构：Plsql分为三个部分：声明部分、可执行部分、异常处理部分 。语法：declare--声明变量，游标i integer;begin--执行语句--异常处理end;示例：打印hello world(在测试窗口编写)begin--打印hello worldDBMS_OUTPUT.PUT_LINE('hello world');end;(在命令...
PLSQL——游标（显式游标、隐式游标、REF游标）
m0_72036727的博客
07-14 2008
游标逐行处理查询结果，以编程的方式访问数据它实际上是一个指针，它在一段Oracle存放数据查询结果集或数据操作结果集的内存中(数据的缓存区)，游标就是指向这个缓冲区的一个指针。
plsql中的循环
点胡
03-29 323
plsql的循环有三种类型: • The simple or infinite loop• The FOR loop (numeric and cursor)• The WHILE loop   The simple loopIt’s called simple for a reason: it starts simply with the LOOP keyword and endswith...
PL/SQL 循环语句
weixin_30273175的博客
08-27 177
1、基本 LOOP 循环语句 语法： LOOP 语句序列; END LOOP; 其中，语句序列中需要一个EXIT语句或一个EXIT WHEN语句来中断循环。 实例： DECLARE x number(2) := 10; BEGIN LOOP dbms_output.put_line(x); x := x...
plsql 循环详解（for、while、loop、continue、exit、return）
鱼丸丶粗面
07-30 7558
文章目录1 概述2 循环的三种方式2.1 for 循环2.2 while 循环2.3 loop 循环3 退出循环的三种方式3.1 continue3.2 exit3.3 return 1 概述 1. 循环的三种方式 (1) for : 常用，'起始范围' (2) while : '起始范围' 其中之一 (3) loop : '先执行一条语句'，再判断是否满足循环条件 2. 退出循环的三种方式 (1) continue: 退出 '本次循环'，直接进入下一循环
plsql基础（游标）
06-14
本文将详细介绍游标的概念、基本语法，并通过具体示例讲解如何在不同的循环结构（如`WHILE`、`IF`和`FOR`循环）中使用游标。 #### 二、游标的基本概念 游标是PL/SQL中用于存储SELECT语句结果集的一种机制。它允许...
PLSQL编程（游标）.docx
04-20
总结来说，PL/SQL中的游标是处理查询结果集的有效手段，通过声明、打开、提取、处理和关闭等步骤，可以灵活地对数据库进行操作。在实际应用中，根据需求选择合适的方式使用游标，以实现高效的数据处理逻辑。
函数，游标，嵌套循环
最新发布
m0_71990227的博客
01-17 287
在Oracle中，通过关键词cursor来定义一组Oracle查询出来的数据结果集，将相数据集存储在内存中，游标类似指针输出其中一条记录，游标可达到循环数据库的目的。游标相当于指针的作用，优点是保存查询结果，方便以后使用，创建一次游标而重复使用若干次，比重复查询数据库要快的多。5、存储过程只能通过out和in/out来返回值，函数除了可以使用out，in/out以外，还可以使用return返回值。4、存储过程可作为独立的pl-sql执行，函数不能作为独立的plsql执行，必须作为表达式的一部分。
PLSQL几种循环语句用法
04-23
PLSQL几种循环语句用法：适合初级人员使用。
PLSQL中的循环语句
Sunflower —— A Java Programmer.
04-27 2907
PLSQL中的循环语句循环语句可以控制程序多次重复地执行某一组语句。PL/SQL中常用的循环语句有3种，在此基础上还可以演变出许多嵌套循环。1. loop···end loop 循环基本语法格式 [<<label_name>>] /*标签名*/ LOOP statements; exit when condition; END LOOP [label_name]
Oracle (PLSQL) [循环，游标]
weixin_43889788的博客
11-22 2198
(PLSQL) [循环，游标]
plsql循环语句
weixin_30652491的博客
07-18 164
循环结构有loop。。end，while和for循环 loop基本结构 LOOP 要执行的语句; EXIT WHEN <条件语句> /*条件满足，退出循环语句*/ END LOOP; declare int number(4) := 1;begin loop dbms_output.put_line('我是'||int||'|'); int :=...
PL/SQL语句——循环语句
小绵杨
06-19 2673
1、Loop……end Loop语句 标准格式： LOOP statement_list--循环代码块 IF exit_condition THEN EXIT;--满足IF条件 退出循环 END IF; END LOOP; --从1开始打印，当i=10退出循环。pl/sql中“=”表示比较，“:=”表示赋值。 DECLARE i NUMBER; BEGIN i := 0; LOOP i := i + 1; dbms_output.put_line ( i ); IF i =
PL/SQL 流程控制语句-循环语句
lxslf的博客
11-01 481
PL/SQL 流程控制语句-循环语句
plsql的三种循环
headfirsthtml5的博客
05-09 414
–循环语句有loop/while/for –loop declare tnum number:=1; begin loop exit when tnum>10; dbms_output.put_line(tnum); tnum :=tnum+1; end loop; end; –while declare tnum number:=1; begin while tnum<=10 loop dbms_output.put_line(tnum); tnum :=tnum+1; end loop; e
PLSQL编程实践：游标操作详解
4. **For循环游标**： PL/SQL 提供了一种更简洁的方式来遍历游标，即使用 `FOR` 循环： ```sql FOR c_row IN c_job LOOP dbms_output.put_line(c_row.empno || '-' || c_row.ename || '-' || c_row.job || '-' |...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值