一、某学生成绩大于60分，输出good；某学生成绩小于60分输出oh no。（在输出中查看信息）
~需要一张成绩表单，包含成绩信息和学生学号。

1、创建存储过程。
create or replace procedure myprocedure（sid in number）
as
exam number；
begin
select * from score where sid=score.userid;
dbms_output.put_line(exam);
if exam>60 then
dbms_output.put_line('good');
else
dbms_output.put_line('oh no');
end if;
end myprocedure;

2、调用该存储过程，括号内为学生学号。
begin
myprocedure(1007);
end;

二、若全班平均成绩大于等于60分，输出good；若平均成绩小于60分，每位同学成绩在原来基础上+5分（做循环），直到输出为good，停止循环。
~需要一张成绩表单，包含所有学生成绩。

1、创建存储过程。
create or replace procedure system.scr_pro
as
avgscnum number;
begin
  select avg(scnum) into avgscnum from system.score;
  while avgscnum<60 loop
    select avg(scnum) into avgscnum from system.score;
  dbms_output.put_line(avgscnum);
  if avgscnum>=60 then
    dbms_output.put_line('good');
  else
    update system.score set scnum=scnum+5;
  end if;
 end loop;
end scr_pro;

2、调用该存储过程。
begin
  system.scr_pro;
end;

~注：

1、空格、分号在英文状态下输入；

2、千万不要忘记，该写分号时，一定不能忘（自己就吃了亏）；

3、敲代码，练习自己的逻辑思维。

基本语法记的不扎实，总是忘，这里做个总结，以后查询起来方便。
 
一、创建存储过程
 
create or replace procedure proc_insert(departno in number) is
begin
  declare 
    cursor cur_insert is select * from emp where deptno = departno;
    rec emp%rowtype;
  begin
    open cur_insert;
    loop
      fetch cur_insert into rec;
      exit when cur_insert%notfound;
      --dbms_output.put_line('empno=' || rec.empno);
      insert into emp_new values (rec.EMPNO,rec.ENAME,rec.JOB,rec.MGR,rec.HIREDATE,rec.SAL,rec.COMM,rec.DEPTNO);
      commit;
    end loop;
    exception
    when others then
      rollback;
  end;
end proc_insert;
 
网上看到一个例子，连错误处理都有，保存下来，以备后查。
--创建存储过程
CREATE OR REPLACE PROCEDURE xxxxxxxxxxx_p
(
   --参数IN表示输入参数，
    --OUT表示输入参数，类型可以使用任意Oracle中的合法类型。
   is_ym  IN CHAR
)
AS
--定义变量
vs_msg   VARCHAR2(4000);   --错误信息变量
vs_ym_beg  CHAR(6);      --起始月份
vs_ym_end  CHAR(6);      --终止月份
vs_ym_sn_beg CHAR(6);     --同期起始月份
vs_ym_sn_end CHAR(6);     --同期终止月份

--定义游标(简单的说就是一个可以遍历的结果集)
CURSOR cur_1 IS
  SELECT area_code,CMCODE,SUM(rmb_amt)/10000 rmb_amt_sn,SUM(usd_amt)/10000 usd_amt_sn
  FROM BGD_AREA_CM_M_BASE_T
    WHERE ym >= vs_ym_sn_beg
       AND ym <= vs_ym_sn_end
   GROUP BY area_code,CMCODE;

BEGIN
--用输入参数给变量赋初值，用到了Oralce的SUBSTR TO_CHAR ADD_MONTHS TO_DATE 等很常用的函数。
vs_ym_beg := SUBSTR(is_ym,1,6);
vs_ym_end := SUBSTR(is_ym,7,6);
vs_ym_sn_beg := TO_CHAR(ADD_MONTHS(TO_DATE(vs_ym_beg,'yyyymm'), -12),'yyyymm');
vs_ym_sn_end := TO_CHAR(ADD_MONTHS(TO_DATE(vs_ym_end,'yyyymm'), -12),'yyyymm');
--先删除表中特定条件的数据。
DELETE FROM xxxxxxxxxxx_T WHERE ym = is_ym;
  --然后用内置的DBMS_OUTPUT对象的put_line方法打印出影响的记录行数，其中用到一个系统变量SQL%rowcount
DBMS_OUTPUT.put_line('del上月记录='||SQL%rowcount||'条');

INSERT INTO xxxxxxxxxxx_T(area_code,ym,CMCODE,rmb_amt,usd_amt)
SELECT area_code,is_ym,CMCODE,SUM(rmb_amt)/10000,SUM(usd_amt)/10000
FROM BGD_AREA_CM_M_BASE_T
  WHERE ym >= vs_ym_beg
  AND ym <= vs_ym_end
GROUP BY area_code,CMCODE;

DBMS_OUTPUT.put_line('ins当月记录='||SQL%rowcount||'条');
--遍历游标处理后更新到表。遍历游标有几种方法，用for语句是其中比较直观的一种。
FOR rec IN cur_1 LOOP
  UPDATE xxxxxxxxxxx_T
  SET rmb_amt_sn = rec.rmb_amt_sn,usd_amt_sn = rec.usd_amt_sn
   WHERE area_code = rec.area_code
   AND CMCODE = rec.CMCODE
   AND ym = is_ym;
END LOOP;

COMMIT;
--错误处理部分。OTHERS表示除了声明外的任意错误。SQLERRM是系统内置变量保存了当前错误的详细信息。
EXCEPTION
   WHEN OTHERS THEN
      vs_msg := 'ERROR IN xxxxxxxxxxx_p('||is_ym||'):'||SUBSTR(SQLERRM,1,500);
   ROLLBACK;
   --把当前错误记录进日志表。
   INSERT INTO LOG_INFO(proc_name,error_info,op_date)
   VALUES('xxxxxxxxxxx_p',vs_msg,SYSDATE);
   COMMIT;
   RETURN;
END; 


 

首先来写一条简单的创建存储过程的语句，将教师表中中符合条件的教师数量进行统计返回到num中，代码如下：

CREATE PROCEDURE teacherSum(IN sex varchar(4), IN depart varchar(10), OUT num INT)

BEGIN

SELECT COUNT(0) INTO num FROM teachers t WHERE t.SEX = sex and t.depart = depart;

END;



在Navicat中我们会发现这段代码运行没有问题，但是在SQLyog中，就会报错，这是需要将代码改为，如图：



这样就可以了，不需要通过界面去手动点击创建。

--1.查找18岁以上姓张的年龄最大的前20%
select top 20 percent * from stu
where 年龄>18 and 姓名 like '张_'
go


--2.创建存储过程，在stu表中性别那一列插入“男”或“女”时，在表中记录的是“1”或“0”
create procedure stu_insert  @num int,@name char(5),@sex char(6)
as 
	if @sex='男'
	insert into stu values(@num,@name,1,null)
	else
	if @sex='女'
	insert into stu values(@num,@name,0,null)
go

exec stu_insert 7,'赵四',男
go

--3.创建存储过程，输入学号，输出性别（显示的是“男”或“女”）
create proc stu_out @num int,@sex char(6) output
as
	declare @se bit
	set @se=(select 性别 from stu where 学号=@num)
	if @se=1
	set @sex='男'
	else if @se=0
	set @sex='女' 
go

declare @sex char(6)
exec stu_out 2 ,@sex output
select @sex;
go

--新建一个表，在表中创建一个触发器，每次插入操作时，变量@str值会显示。
create table table1(a int)
go

create trigger table1_insert on table1 after insert
as
	declare @str char(50)
	set @str='trigger is working'
	print @str
go

insert into table1 values(1)
select * from table1

--instead of触发器触发时只执行触发器内部的sql语句，而不执行激活该触发器的sql语句。
create table table2(a int)
go

create trigger table2_insert on table2 instead of insert
as
	print 'instead of trigger is working'
go

insert into table2 values(1)
select * from table2

select * from cjb
select * from kcb
select * from xsb
go

--创建触发器，当向成绩表中插入一个学生的成绩时，将学生表中该学生的总学分加上添加的课程分数
create trigger cjb_insert on cjb after insert
as
	declare @num char(6),@kc_num char(3),@xf int
	select @num=学号,@kc_num=课程号 from inserted
	select @xf=学分 from kcb where 课程号=@kc_num
	update xsb set 总学分=总学分+@xf where 学号=@num
	print '修改成功'
go

注意事项：
1、理解存储过程中的输入参数和输出参数。
2、定义参数的类型