/* ============================================================================= pl/sql编程 ============================================================================= */ --pl/sql块的结构 declare --声明部门:在此声明pl/sql用到的变量、类型以及游标,以及局部的存储过程和函数 begin --执行部分:过程及sql语句,即程序的组成部分 exception --异常处理部分:错误处理 end; --例子 create table toys ( id number(20), name varchar2(50), price number(5,2), sal_date date ) insert into toys values(1,'张三',525,sysdate) insert into toys values(2,'李四',525,'2016-05-06'); select * from toys; declare v_name varchar2(20); v_price number; begin select name,price into v_name,v_price from toys where id=1; dbms_output.put_line('名字:'||v_name||',价格'||v_price); end; 10 /* type和rowtype ------------------------------------------------- */ declare -- v_name varchar2(25); -- v_name1 toys.name%type; --返回一个 v_name1 toys%rowtype; --返回多个 e_ronull exception;--声明异常 begin select * into v_name1 from toys where id=1; dbms_output.put_line('名字:'||v_name1.name); exception when dlp_val_on_index then dbms_output.put_line('将重复键插入id列'); end; --税点 declare v_start constant number:=3500; --声明常量 begin --sql语句 end --常量和变量的声明 变量名称 pl/sql的数据类型(大小):=init_value; eg:variable_name constant data_type:=value; --应用实例 declare v_ename varchar2(20); v_rate number(7,2); c_rate_incr constant number(7,2):=1.10; begin --方法一:通过select into 赋值 select ename,sal* c_rate_incr into v_ename,v_rate from employee where empno='7788'; --方法二:通过赋值操作符“:=”给变量赋值 v_ename:='scott'; end; --使用序列赋值 v_no:=emp_seq.nextval; ----------------------实例2--------------------------------- --根据员工编号查询员工信息 declare v_empno employee.empno%type:=4; v_rec employee%rowtype; begin select * into v_rec from employee where empno=v_empno; dbms_output.put_line ('姓名:'||v_rec.ename||'工资:'||v_rec.sal||'工作时间:'||v_rec.hiredate); end; --==执行成功之后,输出:姓名:张四工资:10000工作时间:2017-02-02 00:00:00 /* ----------------------pl/sql控制语句-------------------------------- */ --if的语法 if <布尔表达式> then pl/sql和sql语句 end if; ------------------------ if<布尔表达式> then pl/sql和sql语句 else 其他语句 end if; ------------------------- if <布尔表达式> then pl/sql语句和sql语句 elsif <其他布尔表达式> then 其他语句 elsif <其他布尔表达式> then 其他语句 else 其他语句 end if; ----注意:是elsif 不是elseif ------------------------------case的语法-------------------------- -------格式一------ case 条件表达式 when 条件表达式结果1 then 语句段1 when 条件表达式结果2 then 语句段2 when 条件表达式结果n then 语句段n [else语句段] end case; -------格式二------ case when 条件表达式1 then 语句段1 when 条件表达式2 then 语句段2 when 条件表达式n then 语句段n else 语句段 end case; ------------------------------循环控制-------------------------- loop 要执行的语句; exit when <条件语句> --条件满足时,退出循环语句 end loop; ---while循环语句的语法 while <布尔表达式> loop 要执行的语句; end loop; --for循环语句的语法 for 循环计数器 in [reverse] 下限 ...上限 loop 要执行的语句 end loop; ------------------------------实例3------------------------- declare v_counter number:=5; begin dbms_output.put_line('v_counter的当前值为:'||v_counter); if v_counter>=10 then null;--为了使语法变得有意义,去掉null会报语法错误 else v_counter:=v_counter+10; dbms_output.put_line('v_counter 的改变值为:'||v_counter); end if; end; --========执行成功之后输出:v_counter的当前值为:5 v_counter 的改变值为:15 /* =======================异常处理机制=============================== */ --语法 begin sequence_of_statements; exception when then sequence_of_statements; when others then sequence_of_statements; end; ----------------------------实例4------------------------------------ --查询编号为7788的雇员的福利补助(comm列) declare v_comm employee.comm%type; e_comm_is_null exception ;--定义异常类型变量 begin select comm into v_comm from employee where empno=7788; if v_comm is null then raise e_comm_is_null; end if; exception when no_data_found then dbms_output.put_line('雇员不存在!错误为:'||sqlcode||sqlerrm); when e_comm_is_null then dbms_output.put_line('该雇员无补助'); when others then dbms_output.put_line('出现其他异常!'); end; ----================测试运行结果:雇员不存在!错误为:100ora-01403: 未找到任何数据 --自定义异常 raise_application_error(error_number,error_message); --实例 declare .... begin .... if v_com is null then raise_application_error(-20001,'该雇员无补助'); end if; end; /* ====================================显示游标================================ */ --1.声明游标 cursor cursor_name [(parameter [,parameter]...)] [return return_type] is select_statement; --2.打开游标 open cursor_name[(parameters)]; --3.提取游标 fetch cursor_name into variables; --4.关闭游标 close cursor_name; --------------------实例6------------------------ declare name employee.ename%type; sal employee.sal%type; --定义两个变量来存放ename和sal的内容 cursor emp_cursor is select ename,sal from employee; begin open emp_cursor; loop fetch emp_cursor into name,sal; exit when emp_cursor%notfound; dbms_output.put_line('第'||emp_cursor%rowcount||'个雇员:'||name|| 'oooo' || sal); end loop; close emp_cursor; end; --===执行成功输出: /* 第1个雇员:张一3000 第2个雇员:张二5000 第3个雇员:张三8000 第4个雇员:张四10000 第5个雇员:张五6300 */ --使用显示游标删除或者更新 cursor cursor_name id select_statement for update [of columns]; --在使用for update 子句声明游标时,可以使用下面语法更新行 update table_name set column_name=column_value where current of cursor_name; --根据编号查询雇员的姓名 declare v_ename varchar2(20); begin select ename into v_ename from employee where empno=&empno; dbms_output.put_line('雇员的名字是:'||v_ename); end; select * from employee;
PL/SQL编程基本概念
•
生活家
赞 (0)
怎样测两人有没有姻缘,怎样进入测试两个人的缘分
上一篇
2022年3月21日
官方相亲平台哪个最好,好的相亲软件?征婚免费的网站哪个比较好
下一篇
2022年3月21日