How would I get the Data save players currency?

No errors are showing in the code but still the data won't save. I added the print each stage to figure out if if there was a error before but it seems just to be the saving part. The print after the saving would work but just doesn't save for some odd reason. I have the API on if you're wondering Here's the code:

local datastore = game:GetService("DataStoreService")
local MyDataStore = datastore:GetDataStore("MyDataStore")

game.Players.PlayerAdded:Connect(function(players)
    local Stats = Instance.new("Folder")
    Stats.Name = "Stats"
    Stats.Parent = players

    local Cash = Instance.new("IntValue")
    Cash.Name = "Cash"
    Cash.Parent = Stats

    local XP = Instance.new("IntValue")
    XP.Name = "XP"
    XP.Parent = Stats   

    local Level = Instance.new("IntValue")
    Level.Name = "Level"
    Level.Parent = Stats
    print ("Stat loaded")

    local PlayerID = "SubjectID: "..players.UserId
    local data
    local Sucess, Errormessage = pcall(function()
         data = MyDataStore:GetASync(PlayerID)
    end)
    if Sucess then
        Cash.Value = data
    end

end)
print ("Stat Got")
game.Players.PlayerRemoving:Connect(function(players)
    local PlayerID = "SubjectID: "..players.UserId

    local data = players.Stats.Cash.Value

    local Sucess, Errormessage = pcall(function()
        MyDataStore:SetAsync(PlayerID, data)
    end)

    if Sucess then
        print ("Data was saved!")
    else
        print ("There was an error when saving!")
        warn(Errormessage)
    end
end)

Here is a screenshot of the explorer: https://prnt.sc/uagls1 No error shows in the Output