FilteringEnabled Data Stores (Saving Problem)?

Hello, its been a while since I entered this site, but that's not important, since I'm stuck in a problem related to Data Stores.

So recently, I've kind of discovered by myself on how to save stats to Data Stores even with FilteringEnabled, it worked manually, but I want it so save/load automatically.

It worked with loading data, but for saving? Nah, won't work.

Heres the client sided script. (LocalScript, located on StarterGui)

local player = game.Players.LocalPlayer
local loadingevent = game.ReplicatedStorage:WaitForChild("LoadingEvent")
local savingalertevent = game.ReplicatedStorage:WaitForChild("SavingAlertEvent")
local savingevent = game.ReplicatedStorage:WaitForChild("SavingEvent")

loadingevent.OnClientEvent:connect(function(callname, datavalue, dataname)
    print(callname, datavalue, dataname)
    if callname == "DataLoading" then
        local lead = player:FindFirstChild("leaderstats")
        if lead then
            local valuetype = lead:FindFirstChild(dataname)
            if valuetype then
                valuetype.Value = datavalue
                local ddd = player:FindFirstChild("DataLoaded")
                if ddd then
                    ddd.Value = true
                    print("yes yes true")
                end
            end
        end
    end
end)
--[
game.Players.PlayerRemoving:connect(function(p)
    local thing = p:FindFirstChild("DataLoaded")
    if thing and thing.Value == true then
        local leader = p:FindFirstChild("leaderstats")

        if leader then
            local stats = leader:GetChildren()
            for i = 1, #stats do

                savingevent:FireServer("SaveGame", player.Name, stats[i].Name, stats[i].Value)
                print("saved")
            end
        end
    end
end)
--]]
-- Scrapped off junk
--[[
savingalertevent.OnClientEvent:connect(function(callname, statname)
    print(callname, statname)
    if callname == "DataSaving" then
        local lead = player:FindFirstChild("leaderstats")
        if lead then
            local valuefind = lead:FindFirstChild(statname)
            if valuefind then
                savingevent:FireServer("SaveGame", player.Name, valuefind.Name, valuefind.Value)
            end
        end
    end
end)
--]]

Now, here's the code from the server sided script. (Script, located on ServerScriptService)

function datastoreloadingfunc(player, leader)
    local stats = leader:GetChildren()
    for i = 1, #stats do
        local statvalue = datastore:GetAsync(stats[i].Name)
        loadingevent:FireClient(player, "DataLoading", statvalue, stats[i].Name)
    end
end

game.Players.PlayerAdded:connect(function(p)
    local leader =  Instance.new("Folder", p)
    leader.Name = "leaderstats"

    local stat = Instance.new("NumberValue", leader)
    stat.Name = "Points"

    local dataloaded = Instance.new("BoolValue", p)
    dataloaded.Name = "DataLoaded"

    datastoreloadingfunc(p, leader)

end)

savingevents.OnServerEvent:connect(function(player, callname, playername, statname, statvalue)
    print(player, callname, playername, statname, statvalue)
    if callname == "SaveGame" then
        print("Saving... "..statvalue.." "..statvalue)
        datastore:SetAsync(statname, statvalue)
        print("Saved "..statvalue.." "..statvalue)
    end
end)

Answers would be appreciated, thanks in advance.