Why isn't this Developer Product Purchase not working[Unanswered]?

local Market = game:GetService("MarketPlaceService")

local WalkspeedProductID = 120954837

local ReceiptStorage = game:GetService("DataStoreService"):GetDataStore("Receipts", "Market")


function PlayerAdded(Player)

Player.CharacterAdded:connect(function(Character)

    local Receipt = ReceiptStorage:GetAsync(tostring(Player.userId))

    if Receipt then

        if Receipt.WalkspeedProductBought then

            Character.Humanoid.MaxHealth = 200

        end

    end

end)

end



game.Players.PlayerAdded:connect(PlayerAdded)



function GetPlayerByID(id)

    for _, Player in pairs(game.Players:GetPlayers()) do

        if Player.userId == id then

            return Player

        end

    end

end


function Market.ProcessReceipt(ReceiptInfo)

    if ReceiptInfoProductId == tostring(WalkspeedProductID) then

        local Current = ReceiptStorage:GetAsync(tostring(ReceiptInfo.PlayerId))

        if not Current then

            Current = {} 

        end

        Current.WalkspeedProductBought = true

        ReceiptStorage:SetAsync(tostring(ReceiptInfo.PlayerId), Current)



        local Player = GetPlayerByID(ReceiptInfo.PlayerId) 

        if Player then

            Player.Character.Humanoid.MaxHealth = 200
        end

      return Enum.ProductPurchaseDescision.PurchaseGranted

    end

end