[HELP]How make a perfect lapisia?

USE [PS_GameData]
GO
/****** Object:  StoredProcedure [dbo].[usp_Read_Char_Items_Simple_R]    Script Date: 2015-05-13 18:14:21 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO

/****** 개체: 저장 프로시저 dbo.usp_Read_Char_Items_Simple_R    스크립트 날짜: 2006-05-29 오후 7:00:09 ******/



ALTER  Proc [dbo].[usp_Read_Char_Items_Simple_R]

@CharID int,
@Slot int,
@Bag int = 0

AS

SET NOCOUNT ON

SELECT Slot,Type,TypeID,Gem1,Gem2,Gem3,Gem4,Gem5,Gem6 FROM CharItems WHERE CharID=@CharID AND Del=0 AND Bag=0 

----Test1------
If exists (Select ItemID From PS_gameData.dbo.charitems where ItemID='25070' and bag='1' and slot='1' and CharID=@CharID)--Armor Lapasia as for me 25070
Begin
DECLARE @Enchant TINYINT = (SELECT CAST(SUBSTRING(Craftname, 19, 2) AS TINYINT) FROM CharItems WHERE CharID = @CharID AND Bag = '1' AND Slot = '0')

SET @Enchant += 1 -- this will increase the enchant by 1

IF @Enchant > 70 
	SET @Enchant = 50
ELSE IF @Enchant > 20 AND @Enchant < 50
	SET @Enchant = 20

DECLARE @EnchantString CHAR(2) = @Enchant

IF LEN(@EnchantString) = 1
	SET @EnchantString= '5' + @EnchantString

UPDATE CharItems
SET Craftname = SUBSTRING(Craftname, 1, 18) + @EnchantString
WHERE CharID = @CharID AND Bag = '1' AND Slot = '0' and Type in (16,17,18,19,20,21,31,32,33,34,35,36)
UPDATE CharItems
SET Count -= 1
WHERE CharID = @CharID AND Bag = '1' AND Slot = '1'
end

If exists (Select ItemID From PS_gameData.dbo.charitems where ItemID='25069' and bag='1' and slot='1' and CharID=@CharID) --Weap Lapasia as for me 25069
Begin
DECLARE @Enchant2 TINYINT = (SELECT CAST(SUBSTRING(Craftname, 19, 2) AS TINYINT) FROM CharItems WHERE CharID = @CharID AND Bag = '1' AND Slot = '0')

SET @Enchant2 += 1 -- this will increase the enchant by 1

IF @Enchant2 > 70 
	SET @Enchant2 = 50
ELSE IF @Enchant2 > 20 AND @Enchant2 < 50
	SET @Enchant2 = 20

DECLARE @EnchantString2 CHAR(2) = @Enchant2

IF LEN(@EnchantString2) = 1
	SET @EnchantString2= '0' + @EnchantString2

UPDATE CharItems
SET Craftname = SUBSTRING(Craftname, 1, 18) + @EnchantString2
WHERE CharID = @CharID AND Bag = '1' AND Slot = '0' and Type in (1,2,3,4,5,6,7,8,9,10,11,12,13,14,15)

UPDATE CharItems
SET Count -= 1
WHERE CharID = @CharID AND Bag = '1' AND Slot = '1'

end
SET NOCOUNT OFF

USE [PS_GameData]
GO

/****** Object: Trigger [dbo].[GM_Enchant] Script Date: 08/07/2014 22:49:59 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO


CREATE TRIGGER [dbo].[GM_Enchant]
ON [dbo].[CharQuests]
AFTER INSERT
AS 
BEGIN

SET NOCOUNT ON;

DECLARE @QuestID INT = (SELECT QuestID FROM inserted)

IF @QuestID = 1720 -- QuestID
BEGIN

DECLARE @CharID INT = (SELECT CharID FROM inserted)
DECLARE @UserUID INT = (SELECT UserUID FROM Chars WHERE CharID = @CharID)

DECLARE @ItemType TINYINT,
@EnchantItemId INT

DECLARE @EnchantItem TABLE (EnchantID INT)
DECLARE @GearTypes TABLE (GearTypes TINYINT)

SET @ItemType = (SELECT Type FROM UserStoredItems WHERE UserUID = @UserUID AND Slot = 0)
SET @EnchantItemId = (SELECT ItemID FROM UserStoredItems WHERE UserUID = @UserUID AND Slot = 1)
-- the perfect lapisia itemid, change it for you needs
INSERT INTO @EnchantItem VALUES (100230)
-- add all the gear types you want to use here
INSERT INTO @GearTypes VALUES (16),(17),(18),(19),(20),(21),(24),(31),(32),(33), (34),(35),(36),(39),(58) ,(1),(2),(3),
(4),(5),(6),(7),(8),(9),(10),(11),(12),(13),(14),( 15),(22),(23),(40)

IF ((@ItemType IN (SELECT GearTypes FROM @GearTypes)) AND (@EnchantItemID IN (SELECT EnchantID FROM @EnchantItem)))

BEGIN
DECLARE @Enchant TINYINT = (SELECT CAST(SUBSTRING(Craftname, 19, 2) AS TINYINT) FROM UserStoredItems WHERE UserUID = @UserUID AND Slot = 0)
--- max enchant its [10]
IF @Enchant > = 60 
GOTO FAIL
ELSE IF @Enchant > = 10 AND @Enchant < 50
GOTO FAIL

SET @Enchant += 1 -- this will increase the enchant by 1

DECLARE @EnchantString CHAR(2) = @Enchant

IF LEN(@EnchantString) = 1
SET @EnchantString = '0' + @EnchantString

UPDATE UserStoredItems
SET Craftname = SUBSTRING(Craftname, 1, 18) + @EnchantString
WHERE UserUID = @UserUID AND Slot = 0

END
ELSE GOTO FAIL
UPDATE UserStoredItems
SET Count -= 1
WHERE UserUID = @UserUID AND Slot = 1

DELETE FROM UserStoredItems
WHERE UserUID = @UserUID AND Slot = 1 AND Count = 0

FAIL:
DELETEQUEST:
DELETE FROM CharQuests
WHERE CharID = @CharID AND QuestID = @QuestID
END
END
GO

DECLARE @QuestID INT = (SELECT QuestID FROM inserted)

IF @QuestID = 1720 -- QuestID
BEGIN