1. 基本结构
CREATE OR REPLACE PROCEDURE 存储过程名字
(
参数1 IN NUMBER,
) IS
变量1 INTEGER :=0;
变量2 DATE;
BEGIN
END 存储过程名字
2.SELECT INTO STATEMENT
将select查询的结果存入到变量中,可以同时将多个列存储多个变量中,必须有一条
记录,否则抛出异常(如果没有记录抛出NO_DATA_FOUND)例子:
BEGIN
SELECT col1,col2 into 变量1,变量2 FROM typestruct where xxx;
EXCEPTION
WHEN NO_DATA_FOUND THEN
xxxx;
END;
3.IF 判断
IF V_TEST=1 THEN
BEGIN
do something
END;
END IF;
4.while 循环
WHILE V_TEST=1 LOOP
BEGIN
XXXX
END;
END LOOP;
5.变量赋值
V_TEST := 123;
6.用for in 使用cursor
...
IS
CURSOR cur IS SELECT * FROM xxx;
BEGIN
FOR cur_result in cur LOOP
BEGIN
V_SUM :=cur_result.列名1+cur_result.列名2
END;
END LOOP;
END;
[b]create or replace procedure[/b] test
(
id in varchar2
)
[b]is[/b]
deptno varchar2(10);
[b]begin[/b]
select dno into deptno from emp where empno=id;
dbms_output.put_line(deptno);
[b]exception[/b]
when others then
dbms_output.put_line(‘no data found’);
end;
[b]create or replace procedure[/b] update_professor
(
v_prof_name professors.prof_name%TYPE,
v_salary professors.salary%TYPE :=NULL,
v_tenure professors.tenure%TYPE :=NULL
)
[b]is
begin[/b]
if
V_salary is null and v_tenure is null
then
Return;
end if;
update professors set salary=NVL(v_salary,salary),Tenure=NVL(v_tenure,tenure)
where Prof_name=v_prof_name;
end;
CREATE OR REPLACE PROCEDURE 存储过程名字
(
参数1 IN NUMBER,
) IS
变量1 INTEGER :=0;
变量2 DATE;
BEGIN
END 存储过程名字
2.SELECT INTO STATEMENT
将select查询的结果存入到变量中,可以同时将多个列存储多个变量中,必须有一条
记录,否则抛出异常(如果没有记录抛出NO_DATA_FOUND)例子:
BEGIN
SELECT col1,col2 into 变量1,变量2 FROM typestruct where xxx;
EXCEPTION
WHEN NO_DATA_FOUND THEN
xxxx;
END;
3.IF 判断
IF V_TEST=1 THEN
BEGIN
do something
END;
END IF;
4.while 循环
WHILE V_TEST=1 LOOP
BEGIN
XXXX
END;
END LOOP;
5.变量赋值
V_TEST := 123;
6.用for in 使用cursor
...
IS
CURSOR cur IS SELECT * FROM xxx;
BEGIN
FOR cur_result in cur LOOP
BEGIN
V_SUM :=cur_result.列名1+cur_result.列名2
END;
END LOOP;
END;
[b]create or replace procedure[/b] test
(
id in varchar2
)
[b]is[/b]
deptno varchar2(10);
[b]begin[/b]
select dno into deptno from emp where empno=id;
dbms_output.put_line(deptno);
[b]exception[/b]
when others then
dbms_output.put_line(‘no data found’);
end;
[b]create or replace procedure[/b] update_professor
(
v_prof_name professors.prof_name%TYPE,
v_salary professors.salary%TYPE :=NULL,
v_tenure professors.tenure%TYPE :=NULL
)
[b]is
begin[/b]
if
V_salary is null and v_tenure is null
then
Return;
end if;
update professors set salary=NVL(v_salary,salary),Tenure=NVL(v_tenure,tenure)
where Prof_name=v_prof_name;
end;