How would access a value inside a player?

I am trying to make a script that saves multiple values I can save the value if I set it directly inside the datatosave table but for some reason when I try to save the value from the player It says the wring value. I used a print statement right before the save to detect that its not the save function that's the problem but just accessing the correct data. What's your thoughts?

--Get The Service's
local replicatedStorage = game:GetService("ReplicatedStorage")
local dsService = game:GetService("DataStoreService")
local mainStore = dsService:GetDataStore("MainDataStore")

local DataToSave = {}
--create player data
game:GetService("Players").PlayerAdded:Connect(function(plr)
	
	--create folders
	
	local leader = Instance.new("Folder",plr)
	leader.Name = "leaderstats"
	
	local achievementsFolder = Instance.new("Folder",leader)
	achievementsFolder.Name = "Achievements"
	
	local gameplayStats = Instance.new("Folder",leader)
	gameplayStats.Name = "GameplayStats"
	
	local playerStats = Instance.new("Folder",leader)
	playerStats.Name = "PlayerStats"
	
	
	--create achievements Values
	
	CompletedTutorial = Instance.new("BoolValue",achievementsFolder)
	CompletedTutorial.Name = "CompletedTutorialAchievement"
	CompletedTutorial.Value = false
	
	
	--create gameplay values
	
	CompletedMissions = Instance.new("IntValue",gameplayStats)
	CompletedMissions.Name = "CompletedMissions"
--	CompletedMissions.Value = 12
	
	FailedMissions = Instance.new("IntValue",gameplayStats)
	FailedMissions.Name = "FailedMissions"
	FailedMissions.Value = 0
	
	PreviousMission = Instance.new("StringValue",gameplayStats)
	PreviousMission.Name = "PreviousMission"
	PreviousMission.Value = "No Missions Attempted"
	
	TimesDied = Instance.new("IntValue",gameplayStats)
	TimesDied.Name = "TimesDied"
	TimesDied.Value = 0
	
	TrapsAvoided = Instance.new("IntValue",gameplayStats)
	TrapsAvoided.Name = "TrapsAvoided"
	TrapsAvoided.Value = 0
	
	TrapsFailed = Instance.new("IntValue",gameplayStats)
	TrapsFailed.Name = "TrapsFailed"
	TrapsFailed.Value = 0
	
	
	--create player values
	
	Coins = Instance.new("IntValue",playerStats)
	Coins.Name = "Coins"
	Coins.Value = 0
	
	
	local currentDay = os.date("*t").day
	local currentMonth = os.date("*t").month
	local currentYear = os.date("*t").year
	
	local dateJoined = (currentDay.."/"..currentMonth.."/"..currentYear)
	
	DateFirstJoined = Instance.new("StringValue",playerStats)
	DateFirstJoined.Name = "DateFirstJoined"
	DateFirstJoined.Value = dateJoined
	
	Rank = Instance.new("StringValue",playerStats)
	Rank.Name = "Rank"
	Rank.Value = "Junior Assistant"
	
	totalTime = Instance.new("IntValue",playerStats)
	totalTime.Name = "TotalTimePlayed"
	totalTime.Value = 0
	
	timePlayed = Instance.new("IntValue",playerStats)
	timePlayed.Name = "TimePlayed"
	timePlayed.Value = 0
	
	Experience = Instance.new("IntValue",playerStats)
	Experience.Name = "Experience"
	Experience.Value = 0
	
	wait(1)
	
	--load the data
	local success, err = pcall(function()
		local data = mainStore:GetAsync(plr.UserId) 
			--gameplay values
			CompletedMissions.Value = data[1] or 5
			--[[FailedMissions.Value = data[2]
			PreviousMission.Value = data[3]
			TimesDied.Value = data[4]
			TrapsAvoided.Value = data[5]
			TrapsFailed.Value = data[6]
			
			--player stats value
			Coins.Value = data[7]
			DateFirstJoined.Value = data[8]
			Rank.Value = data[9]
			totalTime.Value = data[10]
			Experience.Value = data[11]
			
			print(CompletedMissions.Value, FailedMissions.Value, PreviousMission.Value, TimesDied.Value, TrapsAvoided.Value, TrapsFailed.Value, Coins.Value, DateFirstJoined.Value, Rank.Value, totalTime.Value, Experience.Value)
			--]]
			print(CompletedMissions.Value)
	end)
	if err then
		print("error loading data")
	end
end)

--Increment Time Values
incrementor = coroutine.create(function()
	while wait(1) do
		timePlayed.Value = timePlayed.Value + 1
		totalTime.Value = totalTime.Value + 1
	end
end)

coroutine.resume(incrementor)

CompletedMissions.Changed:connect(function()
	DataToSave[1] = CompletedMissions.Value
	print("changed value to"..DataToSave[1])
end)

game:GetService("Players").PlayerRemoving:Connect(function(player)
	
	--[[
	local DataToSave = {CompletedMissions.Value, FailedMissions.Value, PreviousMission.Value, TimesDied.Value, TrapsAvoided.Value, TrapsFailed.Value, 
	Coins.Value, DateFirstJoined.Value, Rank.Value, totalTime.Value, Experience.Value}
	--]]
	
	print(player.leaderstats.GameplayStats.CompletedMissions.Value)

	local success, err = pcall(function()
		mainStore:SetAsync(player.UserId,DataToSave)
	end)
	if err then
		print("error saving")
	end
end)