Silk Automated System

Results 1 to 8 of 8
  1. #1
    Apprentice Daniiel5 is offline
    MemberRank
    Apr 2012 Join Date
    5Posts

    thumbs up Silk Automated System

    Hello guys! can someone explain me how I can activate the automatic silk during the game .. No need to be resetting the game

    example so



  2. #2
    Member Chrysler is offline
    MemberRank
    Dec 2011 Join Date
    55Posts

    Re: Silk Automated System

    Wondering 2..

  3. #3
    Apprentice Daniiel5 is offline
    MemberRank
    Apr 2012 Join Date
    5Posts

    Re: Silk Automated System

    up ...

  4. #4
    CPP/C#/PHP/ASM Naty48 is offline
    MemberRank
    Apr 2009 Join Date
    IsraelLocation
    655Posts

    Re: Silk Automated System

    using the sp : CGI_WebPurchaseSilk (ACC DB) .

  5. #5
    Apprentice Daniiel5 is offline
    MemberRank
    Apr 2012 Join Date
    5Posts

    thumbs down Re: Silk Automated System

    Example ? this is my ACC DB

    Code:
    USE [SRO_VT_ACCOUNT]
    GO
    /****** Object:  StoredProcedure [CGI].[CGI_WebPurchaseSilk]    Script Date: 12/27/2012 09:43:28 ******/
    SET ANSI_NULLS ON
    GO
    SET QUOTED_IDENTIFIER OFF
    GO
    
    ALTER                   PROCEDURE [CGI].[CGI_WebPurchaseSilk] 
        @OrderID VARCHAR(25), 
        @UserID   VARCHAR(25), 
        @PkgID   INT, 
        @NumSilk INT, 
        @Price INT 
        --@GiftSilk INT 
    as 
        DECLARE @UserJID INT 
        DECLARE @SilkRemain INT 
        DECLARE @GiftSilkRemain 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 
                        IF( @NumSilk <= 0) 
                            BEGIN 
                                INSERT SK_Silk(JID,silk_own,silk_gift,silk_Point)VALUES(@UserJID,@NumSilk,0,0) 
                            END 
                        ELSE 
                            BEGIN 
                                INSERT SK_Silk(JID,silk_own,silk_gift,silk_Point)VALUES(@UserJID,@NumSilk,0,0) 
                            END 
                        --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) 
                        SET @GiftSilkRemain = CGI.getSilkGift(@UserJID) 
                        IF( @NumSilk <= 0) 
                            BEGIN 
                                UPDATE SK_Silk SET silk_own = silk_own + @NumSilk WHERE JID = @UserJID 
                                UPDATE SK_Silk SET silk_gift = silk_gift + 0 WHERE JID = @UserJID 
                            END 
                        ELSE 
                            BEGIN 
                                UPDATE SK_Silk SET silk_own = silk_own + @NumSilk WHERE JID = @UserJID 
                            END 
                     
                        --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

  6. #6
    Apprentice Daniiel5 is offline
    MemberRank
    Apr 2012 Join Date
    5Posts

    Re: Silk Automated System

    example ? this my CGI_WebPurchaseSilk

    USE [SRO_VT_ACCOUNT]
    GO
    /****** Object: StoredProcedure [CGI].[CGI_WebPurchaseSilk] Script Date: 12/27/2012 09:43:28 ******/
    SET ANSI_NULLS ON
    GO
    SET QUOTED_IDENTIFIER OFF
    GO

    ALTER PROCEDURE [CGI].[CGI_WebPurchaseSilk]
    @OrderID VARCHAR(25),
    @UserID VARCHAR(25),
    @PkgID INT,
    @NumSilk INT,
    @Price INT
    --@GiftSilk INT
    as
    DECLARE @UserJID INT
    DECLARE @SilkRemain INT
    DECLARE @GiftSilkRemain 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
    IF( @NumSilk <= 0)
    BEGIN
    INSERT SK_Silk(JID,silk_own,silk_gift,silk_Point)VALUES(@UserJID,@NumSilk,0,0)
    END
    ELSE
    BEGIN
    INSERT SK_Silk(JID,silk_own,silk_gift,silk_Point)VALUES(@UserJID,@NumSilk,0,0)
    END
    --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)
    SET @GiftSilkRemain = CGI.getSilkGift(@UserJID)
    IF( @NumSilk <= 0)
    BEGIN
    UPDATE SK_Silk SET silk_own = silk_own + @NumSilk WHERE JID = @UserJID
    UPDATE SK_Silk SET silk_gift = silk_gift + 0 WHERE JID = @UserJID
    END
    ELSE
    BEGIN
    UPDATE SK_Silk SET silk_own = silk_own + @NumSilk WHERE JID = @UserJID
    END

    --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

  7. #7
    Valued Member Mixizi is offline
    MemberRank
    Oct 2012 Join Date
    122Posts

    Re: Silk Automated System

    you need to exec the procedure .
    So exec CGI.CGI_WebPurchaseSilk blablabla...

  8. #8
    CPP/C#/PHP/ASM Naty48 is offline
    MemberRank
    Apr 2009 Join Date
    IsraelLocation
    655Posts

    Re: Silk Automated System

    from php , it will look like that :

    mssql_query("exec CGI.CGI_WebPurchaseSilk 0,'$username',0,'$silkamount',0");



Advertisement