create_procedure_input_college.sql

一个挺好的招生管理系统

CREATE OR REPLACE  PROCEDURE INPUT_COLLEGE 
		(V_YXBH IN NUMBER,V_YXMC IN VARCHAR2,V_LQFSX IN NUMBER,V_ZSRS IN NUMBER)
		AS 
 		R NUMBER;
		BEGIN
SELECT COUNT(*) INTO R FROM COLLEGE WHERE 院校编号=V_YXBH;
 		IF R>0 THEN 
 		 DBMS_OUTPUT.PUT_LINE('院校'||V_YXBH||'已经存在!');
 		ELSE
		 INSERT INTO COLLEGE
 		 VALUES(V_YXBH,V_YXMC,V_LQFSX,V_ZSRS,0);
 		 COMMIT;
 		 DBMS_OUTPUT.PUT_LINE('院校'||V_YXMC||'插入成功!');
 		END IF;
EXCEPTION
 		WHEN OTHERS THEN
 		DBMS_OUTPUT.PUT_LINE('院校'||V_YXMC||'插入失败!');
		END;