talkingDB 2020-02-22
---pl/sql编程语言 ---pl/sql编程语言是对sql语言的扩展,使得sql语言具有过程化编程的特性。 ---pl/sql编程语言比一般的过程化编程语言,更加灵活高效。 ---pl/sql编程语言主要用来编写存储过程和存储函数等。 ---声明方法 ---赋值操作可以使用:= 也可以使用into查询语句赋值 declare i number(2) := 10; s varchar2(10) := ‘小明‘; ena emp.ename%type;---引用型变量 emprow emp%rowtype;---记录型变量 begin dbms_output.put_line(i); -- 10 dbms_output.put_line(s); -- 小明 select ename into ena from emp where empno = 7788; dbms_output.put_line(ena); -- SCOTT select * into emprow from emp where empno = 7788; dbms_output.put_line(emprow.ename || ‘的工作为:‘ || emprow.job); -- SCOTT的工作为:ANALYST end;
--- pl/sql中的if判断 -- 范例 1:如果从控制台输入 1 则输出我是 1 declare pnum number := # begin if pnum = 1 then dbms_output.put_line(‘我是1‘); end if; end; -- 范例 2:如果从控制台输入 1 则输出我是 1否则输出我不是 1 declare mynum number := # begin if mynum = 1 then dbms_output.put_line(‘我是1‘); else dbms_output.put_line(‘我不是1‘); end if; end; -- 范例 3:判断人的不同年龄段 18岁以下是未成年人,18岁以上 40以下是成年人,40以上是老年人 declare mynum number := # begin if mynum < 18 then dbms_output.put_line(‘未成年人‘); elsif mynum >= 18 and mynum < 40 then dbms_output.put_line(‘中年人‘); elsif mynum >= 40 then dbms_output.put_line(‘老年人‘); end if; end;
---pl/sql中的loop循环 ---用三种方式输出1到10个数字 ---while循环 declare i number(2) := 1; begin while i<11 loop dbms_output.put_line(i); i := i+1; end loop; end; ---exit循环 declare i number(2) := 1; begin loop exit when i>10; dbms_output.put_line(i); i := i+1; end loop; end; ---for循环 declare begin for i in 1..10 loop dbms_output.put_line(i); end loop; end;
游标 Cursor
语法:
CURSOR 游标名 [ (参数名 数据类型,参数名 数据类型,...)] IS SELECT 语句;
例如: cursor c1 is select ename from emp;
游标的使用步骤:
打开游标: open c1; (打开游标执行查询)
取一行游标的值:fetch c1 into pjob; (取一行到变量中)
关闭游标: close c1;(关闭游标释放资源)
游标的结束方式 exit when c1%notfound
注意: 上面的 pjob 必须与 emp表中的 job 列类型一致:
定义:pjob emp.empjob%type;
---游标:可以存放多个对象,多行记录。 ---输出emp表中所有员工的姓名 declare cursor c1 is select * from emp; emprow emp%rowtype; begin open c1; loop fetch c1 into emprow; exit when c1%notfound; dbms_output.put_line(emprow.ename); end loop; close c1; end; -----给指定部门员工涨工资 declare cursor c2(eno emp.deptno%type) is select empno from emp where deptno = eno; en emp.empno%type; begin open c2(10); loop fetch c2 into en; exit when c2%notfound; update emp set sal=sal+100 where empno=en; commit; end loop; close c2; end; ----查询10号部门员工信息 select * from emp where deptno = 10;