总结项目中写的存储过程例子:
Oracle存储过程基本语法 存储过程
1 CREATE OR REPLACE PROCEDURE 存储过程名
2 IS/AS
3 BEGIN
4 NULL;
5 EXCEIPTION;
6 END;
1、创建存储过程,后面可用is或者as:
create or replace procedure PRO_COMPLAIN_TEMPLATE as
2、定义变量,此处用到了%TYPE和%ROWTYPE,参考http://johnny-gz.iteye.com/blog/1726305,另外定义了一个游标,TEM_INSTANCE TEMPLATE_CUR%ROWTYPE这个类型定义必须要在游标定义之后:
NEED_DO_FOR_ZL INTEGER;
CURRENT_MAX_ID MEMO_TEMPLET.TEMPLET_ID%TYPE;
CURSOR TEMPLATE_CUR IS SELECT TEMPLET_NAME, TEMPLET_CONTENT FROM SYS_COMPLAINT_TEMPLET;
TEM_INSTANCE TEMPLATE_CUR%ROWTYPE;
3、begin开始块:
begin
4、该插入语句使用了DBLINK(参考http://johnny-gz.iteye.com/blog/1726028
),还有使用DBMS_OUTPUT.put_line('打印信息')进行信息输出:
insert into MEMO_TEMPLET (TEMPLET_ID, TEMPLET_CONTENT, TEMPLET_TYPE, TEMPLET_MEMO) (SELECT * FROM MEMO_TEMPLET@COMPANY);
SELECT COUNT(*) INTO NEED_DO_FOR_ZL FROM SYS_COMPLAINT_TEMPLET;
IF(NEED_DO_FOR_ZL > 0) THEN
DBMS_OUTPUT.put_line('打印信息');
SELECT MAX(TEMPLET_ID)+1 INTO CURRENT_MAX_ID FROM MEMO_TEMPLET;
DBMS_OUTPUT.put_line('MEMO_TEMPLET最大ID' || CURRENT_MAX_ID);
FOR TEM_INSTANCE IN TEMPLATE_CUR LOOP
INSERT INTO MEMO_TEMPLET (TEMPLET_ID, TEMPLET_CONTENT, TEMPLET_TYPE, TEMPLET_MEMO) VALUES (CURRENT_MAX_ID, TEM_INSTANCE.TEMPLET_CONTENT, '7', NULL);
CURRENT_MAX_ID := CURRENT_MAX_ID + 1;
DBMS_OUTPUT.put_line(TEM_INSTANCE.TEMPLET_CONTENT);
END LOOP;
END IF;
COMMIT;
4、exception块,使用WHEN OTHERS THEN(所有异常都这么处理),其中用raise可显示错误信息:
exception
WHEN OTHERS THEN
DBMS_OUTPUT.put_line('sqlcode : ' ||sqlcode);
DBMS_OUTPUT.put_line('sqlerrm : ' || sqlerrm);
raise;
ROLLBACK;
IF TEMPLATE_CUR%ISOPEN THEN
CLOSE TEMPLATE_CUR;
END IF;
DBMS_OUTPUT.put_line('打印信息');
end;
注:关于游标的使用,如果像本例中使用for循环去遍历游标的话则不需要显式的去用open/close cursor打开和关闭游标,此处会自己处理,如果使用fetch into的话就需要显式开关游标,另外任意执行一个update操作,用隐式游标sql的属性%found,%notfound,%rowcount,%isopen观察update语句的执行情况,也可以使用来判断游标状态,如IF TEMPLATE_CUR%ISOPEN THEN。
存储过程调用:
参数对应,最后两个为输出参数,如果要挪动参数位置,则写 参数名=>参数值
declare
p_CallTime VARCHAR2(255);
p_SerialId VARCHAR2(255);
p_SystemNo VARCHAR2(255);
p_BusinessType VARCHAR2(255);
p_TaskType VARCHAR2(255);
p_TaskId VARCHAR2(255);
p_CustId VARCHAR2(255);
p_Phone VARCHAR2(255);
p_Content VARCHAR2(255);
p_AgentName VARCHAR2(255);
p_ProdCode VARCHAR2(255);
p_SMachineID VARCHAR2(255);
p_InfoRecordID VARCHAR2(255);
p_RetCode varchar2(255);
p_RetInfo varchar2(255);
begin
p_CallTime:='2013-03-29 14:22:44';
p_SerialId:='E11122';
p_SystemNo:='MDKT';
p_BusinessType:='14';
p_TaskType:='4';
p_TaskId:='T332133';
p_CustId:='C44332211';
p_Phone:='15999979607';
p_Content:='test';
p_AgentName:='admin';
p_ProdCode:=p_SystemNo;
p_SMachineID:='M2334343';
p_InfoRecordID:=p_TaskId;
P_Create_Callback_Task_Ocs(p_CallTime, p_SerialId, p_SystemNo, p_BusinessType, p_TaskType, p_TaskId, p_CustId, p_Phone, p_Content, p_AgentName, p_ProdCode, p_SMachineID, p_InfoRecordID, p_RetCode, p_RetInfo);
Dbms_Output.put_line(p_RetCode || '---' || p_RetInfo);
end;
Oracle存储过程-写法实例--以及调用
猜你喜欢
转载自johnny-gz.iteye.com/blog/1730448
今日推荐
周排行