请问这样的存储过程在Oracle中怎么写?
/*
过程名: uspUpdateUser
过程说明: 修改用户名密码
参数说明:
@UserName:用户名
@Password: 密码
*/
IF EXISTS(SELECT * FROM sysobjects where Name='uspUpdateUser' AND TYPE='P')
DROP PROCEDURE uspUpdateUser
GO
CREATE PROCEDURE uspUpdateUser
(
@id int,
@UserName VARCHAR(20),
@Password VARCHAR(30)
)
AS
IF EXISTS(SELECT UserName FROM Admin WHERE UserName=@UserName)
BEGIN
RAISERROR 51002 '用户名已经存在,修改无效'
END
ELSE
BEGIN
UPDATE Admin SET UserName=@UserName,Password=@Password
WHERE id = @id
END