Fixlenmiş NCS Başka Yerde Bulamayacağınız Başka Kod :)

Selamlar,

Bir Arkadaşımız Vermişti Fakat Kontrol Kısımları Yoktu vede Kralsanız Krallığınızda Gidiyordu Gerekli Düzenlemeleri Yaptım

Buyrun

Kod:
CREATE procedure [dbo].[ACCOUNT_CHAR_NAME_CHANGE]
(@strOldUserId varchar(30),@StrNewUserId varchar(30))
AS
/*
Author : AKUMA
*/
DECLARE @strCheckOldUserID varchar(30),@strCheckNewUserID varchar(30)
BEGIN TRAN
SELECT @strCheckOldUserID = Count(strUserId) FROM USERDATA WHERE strUserId = @strOldUserId
IF @strCheckOldUserID = 0
BEGIN
PRINT 'Veritabanında ' + @strOldUserId + ' Adında Karakter Bulunamadı.'
END
ELSE
BEGIN
SELECT @strCheckNewUserID = Count(strUserId) FROM USERDATA WHERE strUserId = @StrNewUserId
IF @strCheckNewUserID = 0
BEGIN
-- Change Account All Information

UPDATE ACCOUNT_CHAR SET strCharID1 = @StrNewUserId WHERE strCharID1 = @strCheckOldUserID AND strCharID1 is not null

UPDATE ACCOUNT_CHAR SET strCharID2 = @StrNewUserId WHERE strCharID2 = @strCheckOldUserID AND strCharID2 is not null

UPDATE ACCOUNT_CHAR SET strCharID3 = @StrNewUserId WHERE strCharID3 = @strCheckOldUserID AND strCharID3 is not null

UPDATE USERDATA SET strUserId = @StrNewUserId WHERE strUserId = @strCheckOldUserID AND strUserId is not null

-- Change Information a User in Knights

UPDATE KNIGHTS_USER SET strUserId = @StrNewUserId WHERE strUserId = @strCheckOldUserID AND strUserId is not null
UPDATE KNIGHTS SET Chief = @StrNewUserId WHERE Chief = @strCheckOldUserID AND Chief is not null
UPDATE KNIGHTS SET ViceChief_1 = @StrNewUserId WHERE ViceChief_1 = @strCheckOldUserID AND ViceChief_1 is not null
UPDATE KNIGHTS SET ViceChief_2 = @StrNewUserId WHERE ViceChief_2 = @strCheckOldUserID AND ViceChief_2 is not null
UPDATE KNIGHTS SET ViceChief_3 = @StrNewUserId WHERE ViceChief_3 = @strCheckOldUserID AND ViceChief_3 is not null
-- Change Information a User is King
UPDATE KING_SYSTEM SET strKingName = @StrNewUserId WHERE strKingName = @strCheckOldUserID AND strKingName is not null
UPDATE KING_ELECTION_LIST SET strName = @StrNewUserId WHERE strName = @strCheckOldUserID AND strName is not null
-- Change User Friend List Information

UPDATE FRIEND_LIST SET strUserID = @StrNewUserId where strUserID = @strCheckOldUserID

-- User Rental Item

UPDATE RENTAL_ITEM SET strLenderCharID = @StrNewUserId WHERE strLenderCharID = @strCheckOldUserID AND strLenderCharID is not null

UPDATE RENTAL_ITEM SET strBorrowerCharID = @StrNewUserId WHERE strBorrowerCharID = @strCheckOldUserID AND strBorrowerCharID is not null

UPDATE RENTAL_ITEM_LIST SET strBorrowerCharID = @StrNewUserId WHERE strBorrowerCharID = @strCheckOldUserID AND strBorrowerCharID is not null

-- Change CurrentUser

UPDATE CURRENTUSER SET strCharID = @StrNewUserId WHERE strCharID = @strCheckOldUserID
-- Name Change is Sucessfull
PRINT @strOldUserId + ' Olan Karakter Adı ' + @strNewUserId + ' Olarak Değiştirilmiştir.'
END
ELSE
BEGIN
PRINT @StrNewUserId + ' Karakter Adı Kullanımdadır, Lütfen Başka Bir Karakter Adı Yazınız.'
END
END
COMMIT TRAN

Kullanımı

Kod:
EXEC ACCOUNT_CHAR_NAME_CHANGE 'ESKINICK','YENINICK'

Kolay Gelsin

Fixlenmiş NCS Başka Yerde Bulamayacağınız Başka Kod :) User_offline

ty emege saygı

» GERCEK VE DOĞRU REST PROSUDURLERI BUNLAR BAŞKA YERDE ARAMA
» Private Serverlar İcin Yeni Sql Kodları Başka Yerde Arama
» Trabzonspor, bir başka deyişle "42.5 ayakkabı
» Rebirth İtemler (AqoN) PATCH BAŞKA SİTEDE BULAMZSINIZ
» ▓▒░£DITOR-PROGRAMLARININ ▓▒░▓▒░KRALI▓▒░BAŞKA-EDITORE-GEREK-YOK▓BY_HayLaZ-V11Xe▒░ ISTE-YILIN-▓▒EN-GUZEL-VE-SORUNSUZ-CALISAN--EDITORU░