对student进行增删改

最新推荐文章于 2024-07-23 20:14:02 发布

weixin_33762130

最新推荐文章于 2024-07-23 20:14:02 发布

阅读量132

点赞数

CC 4.0 BY-SA版权

原文链接：http://www.cnblogs.com/selfimprove/p/3635999.html

本文介绍了一个用于学生信息管理的过程包TechEd_pkg_Student，其中包括创建、更新和删除学生记录的功能。该过程包定义了三个主要的操作：创建新的学生记录、更新现有学生的详细信息以及删除学生记录。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

drop package TechEd_pkg_Student;

CREATE OR REPLACE PACKAGE TechEd_pkg_Student AS
FUNCTION F_CREATE(p_id TechEd_T_Students.Id%TYPE,
p_adress TechEd_T_Students.Adress%TYPE,
p_name TechEd_T_Students.Name%TYPE
)
RETURN TechEd_T_Students.ID%TYPE;

PROCEDURE SP_UPDATE(p_id TechEd_T_Students.Id%TYPE,
p_adress TechEd_T_Students.Adress%TYPE,
p_name TechEd_T_Students.Name%TYPE
));

PROCEDURE SP_DELETE(p_id TechEd_T_Students.ID%TYPE);
END TechEd_pkg_Student;

CREATE OR REPLACE PACKAGE BODY TechEd_pkg_Student AS
FUNCTION F_CREATE(p_id TechEd_T_Students.Id%TYPE,
p_adress TechEd_T_Students.Adress%TYPE,
p_name TechEd_T_Students.Name%TYPE)
RETURN TechEd_T_Students.ID%TYPE AS
V_ID TechEd_T_Students.ID%TYPE;
BEGIN
--获得值
SELECT Sequence_TechEd_T_Students_Id.NEXTVAL INTO V_ID FROM DUAL;
--新增
INSERT INTO TechEd_T_Students
(ID, NAME, Adress)
VALUES
(V_ID, p_name, p_adress);
--返回
RETURN V_ID;
--异常
EXCEPTION
WHEN OTHERS THEN
ROLLBACK;
RAISE;
END F_CREATE;

PROCEDURE SP_UPDATE(p_id TechEd_T_Students.Id%TYPE,
p_adress TechEd_T_Students.Adress%TYPE,
p_name TechEd_T_Students.Name%TYPE) AS
BEGIN
--修改
UPDATE TechEd_T_Students
SET NAME = p_name, Adress = p_adress
WHERE ID = p_id;
--异常
EXCEPTION
WHEN OTHERS THEN
ROLLBACK;
RAISE;
END SP_UPDATE;

PROCEDURE SP_DELETE(p_id TechEd_T_Students.ID%TYPE) AS
BEGIN
DELETE TechEd_T_Students WHERE ID = p_id;
END SP_DELETE;

END TechEd_pkg_Student;

转载于:https://www.cnblogs.com/selfimprove/p/3635999.html