Alchemy Point Sistemi

[ßyMesMes]

HERAKLES Otomatik Avlı kalıcı sunucu. 19 Haziran'da açılıyor. Atius & Wizard güvencesiyle hemen kayıt ol, ön kayıt ödülleri aktif. HEMEN TIKLA!

Alchemy Point Sistemidir. Kolay gelsin.

[CODE title="SRO_VT_ACCOUNT"]USE [SRO_VT_ACCOUNT]
GO
/****** Object: StoredProcedure [CGI].[CGI_WebPurchaseAlchemySilk] Script Date: 30.03.2019 23:48:11 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER OFF
GO

CREATE PROCEDURE [CGI].[CGI_WebPurchaseAlchemySilk]
@OrderID VARCHAR(25),
@UserID VARCHAR(25),
@PkgID INT,
@NumSilk INT,
@price INT
as

DECLARE @UserJID INT
DECLARE @SilkRemain INT
--DECLARE @PointRemain INT
SET @UserJID = CGI.getUserJID(@UserID)
IF( @UserJID >= 0)
BEGIN
IF( not exists( SELECT OrderNumber from SK_SilkBuyList where OrderNumber = @OrderID))
BEGIN
BEGIN TRANSACTION
IF( not exists( SELECT * from SK_Silk where JID = @UserJID))
BEGIN
INSERT SK_Silk(JID,silk_own,silk_gift,silk_Point)VALUES(@UserJID,@NumSilk,0,0)
--INSERT Silk Own
INSERT SK_SilkBuyList(UserJID,Silk_Type,Silk_Reason,Silk_Offset,Silk_Remain,ID,BuyQuantity,OrderNumber,SlipPaper,RegDate) VALUES( @UserJID,0,0,@NumSilk,@NumSilk,@PkgID,1,@OrderID,"User Purchase Silk from VDC-Net2E Billing System",GETDATE())
INSERT SK_SilkChange_BY_Web(JID,silk_remain,silk_offset,silk_type,reason) VALUES(@UserJID,@NumSilk,@NumSilk,0,0)
END
ELSE
BEGIN
SET @SilkRemain = CGI.getSilkOwn(@UserJID)
UPDATE SK_Silk SET silk_point = silk_point + @NumSilk WHERE JID = @UserJID
--INSERT Silk Own

INSERT SK_SilkBuyList(UserJID,Silk_Type,Silk_Reason,Silk_Offset,Silk_Remain,ID,BuyQuantity,OrderNumber,SlipPaper,RegDate) VALUES( @UserJID,0,0,@NumSilk,@SilkRemain + @NumSilk,@PkgID,1,@OrderID,"User Purchase Silk from VDC-Net2E Billing System",GETDATE())
INSERT SK_SilkChange_BY_Web(JID,silk_remain,silk_offset,silk_type,reason) VALUES(@UserJID,@SilkRemain + @NumSilk,@NumSilk,0,0)
END
IF (@@error <> 0 or @@rowcount = 0)
BEGIN
SELECT Result = "FAIL"
ROLLBACK TRANSACTION
RETURN
END
SELECT Result = "SUCCESS"
COMMIT TRANSACTION
RETURN
END
ELSE --else if order
BEGIN
SELECT Result = "ORDEREXIST"
END
END
ELSE
BEGIN
SELECT Result = "NOUSER"
RETURN
END

SET QUOTED_IDENTIFIER OFF[/CODE]

[CODE title="AddLogItem"]----------------------------Alchemy Point Baslangic---------------
IF (@Operation = 90) or (@Operation = 160)
BEGIN
SET @strDesc = REPLACE(@strDesc, LEFT (@strDesc, CHARINDEX('+',@StrDesc)),'')
SET @strDesc = REPLACE(@strDesc, RIGHT (@strDesc, CHARINDEX(']',REVERSE(@StrDesc))), '')
IF @strDesc like '%' BEGIN
SET @strDesc = REPLACE(@strDesc, RIGHT (@strDesc, CHARINDEX('[',REVERSE(@StrDesc))), '')
END
DECLARE @plus tinyint = @StrDesc
declare @USERID varchar(64) = (Select StrUserID from SRO_VT_ACCOUNT.dbo.TB_User inner join SRO_VT_SHARD.dbo._User
On SRO_VT_SHARD.dbo._User.UserJID = SRO_VT_ACCOUNT.dbo.TB_User.JID where SRO_VT_SHARD.dbo._User.CharID = @CharID)
IF @plus = 7
BEGIN
EXEC [SRO_VT_ACCOUNT].[CGI].[CGI_WebPurchaseAlchemySilk] @OrderID = NULL, @UserID = @USERID, @PkgID = NULL, @NumSilk = 5, @price = 5
END
IF @plus = 8
BEGIN
EXEC [SRO_VT_ACCOUNT].[CGI].[CGI_WebPurchaseAlchemySilk] @OrderID = NULL, @UserID = @USERID, @PkgID = NULL, @NumSilk = 25, @price = 25
END
IF @plus = 9
BEGIN
EXEC [SRO_VT_ACCOUNT].[CGI].[CGI_WebPurchaseAlchemySilk] @OrderID = NULL, @UserID = @USERID, @PkgID = NULL, @NumSilk = 75, @price = 75
END
IF @plus = 10
BEGIN
EXEC [SRO_VT_ACCOUNT].[CGI].[CGI_WebPurchaseAlchemySilk] @OrderID = NULL, @UserID = @USERID, @PkgID = NULL, @NumSilk = 150, @price = 150
END
end
----------------------------Alchemy Point Bitis---------------[/CODE]