Oracle的存储过程基本写法 Oracle的存储过程基本写法

 1 CREATE OR REPLACE PROCEDURE 存储过程名( param1 IN TYPE， param2 OUT TYPE)
 2 AS 
 3      变量 1 类型(值范围);--a_dov varchar(100)
 4      变量 2 类型(值范围);
 5 BEGIN
 6 SELECT count( * ) INTO 变量 1 FROM 表 A WHERE  列名 = param1; --从表中取某列或某些列的值,要想使用肯定要赋值给变量的,那么select into就是为了赋值而营定义的语法
 7 IF (判断条件) THEN
 8 　　SELECT 列名 INTO 变量 2 FROM 表 A WHERE  列名 = param1;
 9 　　Dbms_output.Put_line ('打印信息');
10 ELSIF (判断条件) THEN
11 　　Dbms_output.Put_line ('打印信息');
12 　　ELSE Raise 异常名(NO_DATA_FOUND);
13 END IF;
14 　　EXCEPTION 
15 　　WHEN others THEN
16 　　Rollback；
17 END;
18 
19 --调用存储过程
20 DECLARE
21      变量 1 类型(值范围);--a_dov varchar(100)
22      变量 2 类型(值范围);
23 BEGIN
24     param1:=7788; --对参数进行赋值
25     存储过程名(param1);
26 END;

 1 CREATE OR REPLACE PROCEDURE MYDEMO02 
 2 AS 
 3         name VARCHAR (10);
 4         age int;
 5 BEGIN
 6         name := 'xiaoming';--:=则是对属性进行赋值
 7         age := 18;
 8         dbms_output.put_line ( 'name=' || name || ', age=' || age );--这条是输出语句
 9 END;
10 --存储过程调用(下面只是调用存储过程语法)
11 BEGIN 
12     MYDEMO02();
13 END;

 1 CREATE OR REPLACE procedure MYDEMO03(name in varchar,age in int)
 2 AS
 3 BEGIN
 4       dbms_output.put_line('name='||name||', age='||age);
 5 END;
 6 
 7 --存储过程调用
 8 BEGIN 
 9     MYDEMO03('姜煜',18);
10 END;

 1 CREATE OR REPLACE PROCEDURE MYDEMO04
 2 AS
 3     age INT;
 4 BEGIN
 5     age:=10/0;
 6     dbms_output.put_line(age);
 7     exception when others then
 8     dbms_output.put_line('error');
 9 END;
10 --调用存储过程
11 BEGIN
12      MYDEMO04;
13 END;

 1 CREATE OR REPLACE PROCEDURE TEST_COUNT01
 2 IS 
 3     v_total int;
 4     v_date varchar(20);
 5 BEGIN
 6     select count(*) into v_total from EMP_TEST WHERE ENAME ='燕小六'; 
 7     select to_char(sysdate,'yyyy-mm-dd')into v_date FROM EMP_TEST WHERE ENAME ='郭芙蓉';
 8     DBMS_OUTPUT.put_line('总人数:'||v_total);
 9     DBMS_OUTPUT.put_line('当前日期'||v_date);
10 END;
11 
12 --调用存储过程
13 BEGIN
14     TEST_COUNT01();
15 END;

 1 CREATE OR REPLACE PROCEDURE TEST_COUNT04(v_id in int,v_name out varchar2)
 2 IS
 3 BEGIN
 4         SELECT ENAME into v_name FROM EMP_TEST WHERE EMPNO = v_id;
 5         dbms_output.put_line(v_name);
 6 EXCEPTION
 7         when no_data_found then dbms_output.put_line('no_data_found');
 8 END;
 9 
10 --调用存储过程
11 DECLARE
12         v_name varchar(200);
13 BEGIN
14         TEST_COUNT04('1002',v_name);
15 END;

 1 CREATE OR REPLACE PROCEDURE job_day04(de in varchar,name out varchar,App_Code out varchar,error_Msg out varchar)
 2 AS
 3 BEGIN
 4         SELECT ENAME into name FROM EMP_TEST WHERE ENAME=de;
 5 EXCEPTION WHEN others THEN
 6         error_Msg:='未找到数据';
 7 END;
 8 --调用存储过程
 9 DECLARE
10    de varchar(10);
11    ab varchar(10);
12    appcode varchar(20);
13    ermg varchar(20);
14 BEGIN
15    de:= '张三丰';
16    JOB_DAY04(de,ab,appcode,ermg);
17    dbms_output.put_line(ermg);
18 END;

 1 CREATE OR REPLACE PROCEDURE job_day05(do1 in varchar,dn1 in varchar,eo1 in number,en1 in varchar,App_Code out varchar,error_Msg out varchar)
 2 AS
 3 BEGIN
 4         INSERT INTO STUDENT(NAME,CLASS)VALUES(do1,dn1); 
 5         INSERT INTO COMPANY(EMPID,NAME,DEPARNAME)VALUES(eo1,en1,do1);
 6 COMMIT;
 7 EXCEPTION WHEN OTHERS THEN
 8         App_Code:=-1;
 9         error_Msg:='插入失败';
10 END;
11 --调用存储过程
12 DECLARE
13    do1 varchar(10);
14    dn1 varchar(10);
15    eo1 number(20);
16    App_Code varchar(20);
17    error_Msg varchar(20);
18 BEGIN
19     do1:= '张三丰';
20     dn1:='新桥';
21     eo1:=1001;
22     JOB_DAY04(do1,dn1,App_Code,error_Msg);
23     dbms_output.put_line(ermg);
24 END;

 1 CREATE OR REPLACE PROCEDURE job_day06(epo in number)
 2     AS
 3     BEGIN
 4         UPDATE EMPS SET SAL=(SAL+100) WHERE empno = epo;
 5     IF SQL%FOUND
 6     THEN
 7         DBMS_OUTPUT.PUT_LINE('成功修改雇员工资！');
 8     commit;
 9     else
10         DBMS_OUTPUT.PUT_LINE('修改雇员工资失败！');
11     END IF;
12 END;
13 --调用存储过程
14 declare
15     e_number number;
16 begin
17     e_number:=1001;
18     job_day06(e_number);
19 end;

 1 CREATE OR REPLACE PROCEDURE job_day07
 2 IS
 3 BEGIN
 4 DECLARE
 5     cursor emp_sor is select name,sal FROM EMPS WHERE EMPNO = '1001';
 6     cname EMPS.NAME%type;
 7     csal EMPS.SAL%type;
 8 BEGIN
 9     open emp_sor;
10     loop
11 --     取游标值给变量
12     FETCH emp_sor into cname,csal;
13     dbms_output.put_line('name:'||cname);
14     exit when emp_sor%notfound;
15     end loop;
16     close emp_sor;
17 end;
18 end;
19 --调用存储过程
20 BEGIN
21     job_day07();
22 END;