alter_usp_insertrole.sql

Beginning VB.NET DatabasesAll_Code.rar

ALTER PROCEDURE usp_InsertRole
(
   @RoleID            UNIQUEIDENTIFIER,
   @RoleName          VARCHAR(50),
   @RoleDescription   TEXT,
   @Ranking           TINYINT
)
AS
IF EXISTS (SELECT Ranking FROM Roles WHERE Ranking = @Ranking)
   BEGIN
   RAISERROR('Ranking already exists and cannot be duplicated',18,1)
   END
ELSE
   BEGIN
   INSERT INTO Roles
      (RoleID, RoleName, RoleDescription, Ranking, LastUpdateDate)
      VALUES(@RoleID, @RoleName, @RoleDescription, @Ranking, GETDATE())
   END