Hesap Şifresi Değiştirme Proceduresi (Char İsmine Göre)

CREATE PROCEDURE [dbo].[ACCOUNT_PASSWORD_CHANGE]
@strUserId varchar(30),
@NewPassword varchar(30)
AS
/*
Author : AKUMA
*/

DECLARE @strAccountID varchar(30),@RecordCount int
SELECT @RecordCount = Count(bCharNum) FROM ACCOUNT_CHAR WHERE strCharID1 = @strUserID OR strCharID2 = @strUserID OR strCharID3 = @strUserID
IF @RecordCount = 0
BEGIN
PRINT 'Veritabanında ' + @strAccountID + ' Adında Karakter Bulunamadı.'
END
ELSE
BEGIN
SELECT @strAccountID = strAccountId FROM ACCOUNT_CHAR WHERE strCharID1 = @strUserID OR strCharID2 = @strUserID OR strCharID3 = @strUserID
UPDATE TB_USER SET strPasswd = @NewPassword WHERE strAccountID = @strAccountID
PRINT @strUserId + 'Karakterinin Bağlı Bulunduğu ' + @strAccountId + ' Hesabının Şifresi Başarıyla Değiştirilmiştir.'
END
GO

EXEC ACCOUNT_PASSWORD_CHANGE 'CHARISMİ','ŞİFRESİ'