Module:Populacion de France/Sôrses

Apondre de lims
De Vouiquipèdia, l’enciclopèdia abada.

La documentation pour ce module peut être créée à Module:Populacion de France/Sôrses/doc 

--[[
  Sous-module de Module:Tableau population d'article de commune de France contenant
  les fonctions de génération des sources associées à des données de population
--]]

local p = {}

p.outils = require("Module:Populacion de France/Outils")

--[[
--]]
function p.sorsa_canton(data)
	local resu
	if (data["premier"] >= 2013) then
		-- nouveau canton
		resu = "Base [[Institut national de la statistique et des études économiques|Insee]], population municipale à partir de 2015"
		local txt = "Fiches Insee - Populations légales du canton " .. p.outils.lista_ans(data)
		resu = resu .. mw.getCurrentFrame():extensionTag{ name = "ref", content = txt .. ".", args = nil } .. "."
	else  -- sinon canton plus ancien
		resu = "Base [[Institut national de la statistique et des études économiques|Insee]], [[Chiffres de population de la France|population sans doubles comptes]] à partir de 1962"
		resu = resu .. mw.getCurrentFrame():extensionTag{ name = "ref",
			   content = "[https://www.insee.fr/fr/statistiques/1893204 Population selon le sexe et l'âge quinquennal de 1968 à 2013 - Recensements harmonisés - Séries départementales et communales]",
			   args = nil }
		resu = resu .. " puis [[Chiffres de population de la France#La population municipale|population municipale]] à partir de 2006"
		local txt = "Fiches Insee - Populations légales du canton " .. p.outils.lista_ans(data)
		resu = resu .. mw.getCurrentFrame():extensionTag{ name = "ref", content = txt .. ".", args = nil } .. "."
	end
	return resu
end

--[[
--]]
function p.sorsa_arrondissement(data)
local resu
	resu = "Base [[Institut national de la statistique et des études économiques|Insee]], [[Chiffres de population de la France|population sans doubles comptes]] à partir de 1962"
	resu = resu .. mw.getCurrentFrame():extensionTag{ name = "ref",
		content = "[https://www.insee.fr/fr/statistiques/1893204 Population selon le sexe et l'âge quinquennal de 1968 à 2013 - Recensements harmonisés - Séries départementales et communales]",
			   args = nil }
	resu = resu .. " puis [[Chiffres de population de la France#La population municipale|population municipale]] à partir de 2006"
	local txt = "Fiches Insee - Populations légales de l'arrondissement " .. p.outils.lista_ans(data)
	resu = resu .. mw.getCurrentFrame():extensionTag{ name = "ref", content = txt .. ".", args = nil } .. "."
	
	return resu
end

--[[
--]]
function p.sorsa_departament(data)
	local resu = "SPLAF - population totale du département depuis sa création jusqu'en 1962"
	resu = resu .. mw.getCurrentFrame():extensionTag{ name = "ref", content = "[http://splaf.free.fr/ Site sur la Population et les Limites Administratives de la France - fiche historique du département]",
		   args = nil }
	resu = resu .. " − puis base Insee − population sans doubles comptes de 1968 à 2006"
	resu = resu .. mw.getCurrentFrame():extensionTag{ name = "ref", content = "[https://www.insee.fr/fr/statistiques/1893204 Population selon le sexe et l'âge quinquennal de 1968 à 2013 - Recensements harmonisés - Séries départementales et communales]",
		   args = nil }
	resu = resu .. " puis population municipale à partir de 2006"
	local txt = "Fiches Insee - Populations légales du département " .. p.outils.lista_ans(data)
	resu = resu .. mw.getCurrentFrame():extensionTag{ name = "ref", content = txt, args = nil } .. "."
	return resu
end

--[[
--]]
function p.sorsa_region(data)
	return p.sorsa_canton(data)
end

--[[
  Sous-fonction de celle ci-dessous : génère la référence Cassini
--]]
function p.sorsa_cassini(data)
	local resu = "Ldh/[[École des hautes études en sciences sociales|EHESS]]/Cassini jusqu'en 1999"
	local txt = ""
	if (data["sorsa1"] ~= nil) then
		txt = txt .. "[" .. data["sorsa1"] ..
		   " Des villages de Cassini aux communes d'aujourd'hui] sur le site de l'[[École des hautes études en sciences sociales]]."
		resu = resu .. mw.getCurrentFrame():extensionTag{ name = "ref", content = txt, args = { name="Cassini" } }
	end
	return resu
end

--[[
  Sous-fonction de celle ci-dessous : génère la référence INSEE
--]]
function p.sorsa_insee(data, prem)
	local resu = "[[Institut national de la statistique et des études économiques|Insee]] à partir de "
	if (prem) then
		resu = resu .. data["premier"]
	else
		resu = resu .. "2006"
	end
	local txt = "Fiches Insee - Populations légales de la commune " .. p.outils.lista_ans(data)
	resu = resu .. mw.getCurrentFrame():extensionTag{ name = "ref", content = txt .. ".", args = nil }
	return resu
end

--[[
  fonction générant les sources
--]]
function p.sorses(data)
	local resu
	
	-- on aiguille type autres que commune
	if (data["division"] == "canton") then
		return p.sorsa_canton(data)
	end
	if (data["division"] == "dèpartament") then
		return p.sorsa_departament(data)
	end
	if (data["division"] == "arrondissement") then
		return p.sorsa_arrondissement(data)
	end
	if (data["division"] == "règ·ion") then
		return p.sorsa_region(data)
	end
	if (data["division"] == "payis") then
		return nil -- par prudence
	end
	
	-- selon le type (comena) // note : en fait les communes n'ont pas de "division"…
	if ((data["division"] == "comena en DROM")) then
		resu = "[[Institut national de la statistique et des études économiques|Insee]] de 1968 à 2006"
		resu = resu .. mw.getCurrentFrame():extensionTag{ name = "ref", args = nil,
			content = "[https://www.insee.fr/fr/statistiques/1893204 Population selon le sexe et l'âge quinquennal de 1968 à 2013 - Recensements harmonisés - Séries départementales et communales]" }
		resu = resu .. " puis à partir de 2006" .. mw.getCurrentFrame():extensionTag{ name = "ref", args = nil, content = p.outils.lista_ans(data) }
	elseif ((data["division"] == "comena novèla")) then
		resu = p.sorsa_insee(data, true) .. "."
	elseif (data["division"] == "comena en COM2") then
		resu = "[[Institut de la statistique de la Polynésie française]]" .. mw.getCurrentFrame():extensionTag{ name = "ref", args = nil,
			     content = p.outils.lista_ans(data) } .. "."
	elseif (data["division"] == "comena en COM1") then
		resu = "Base [[Institut national de la statistique et des études économiques|Insee]], [[Chiffres de population de la France|population sans doubles comptes]]"
		resu = resu .. " jusqu'en 1999"
		if (data["sorsa1"] ~= nil) then
			resu = resu .. mw.getCurrentFrame():extensionTag{ name = "ref", args = nil,
			     content = "[" .. data["sorsa1"] .. " " .. data["sorsa1"] .. "]" }
		end
		resu = resu .. " puis population municipale à partir de 2006"
		resu = resu .. mw.getCurrentFrame():extensionTag{ name = "ref", args = nil,
			     content = p.outils.lista_ans(data) } .. "."
	else -- par défaut
		resu = p.sorsa_cassini(data)
		resu = resu .. " puis " .. p.sorsa_insee(data) .. "."
	end
	if ((data["sorses"] ~= nil) and (data["sorses"] ~= "")) then
		resu = resu .. " " .. data["sorses"]
	end

	return resu
end

-- sources pour les graphiques
function p.sorses_grafico(data)
	local resu
	if ((data["division"] == "canton") or (data["division"] == "règ·ion") or
		(data["division"] == "arrondissement") or (data["division"] == "comena novèla") or
		(data["division"] == "comena en DROM") or (data["division"] == "comena en COM1") or
		(data["division"] == "comena en COM3")) then
		resu = "base Insee."
	elseif (data["division"] == "comena en COM2") then
		resu = "base IsPf."
	elseif (data["division"] == "dèpartament") then
		resu = "SPLAF et base Insee."
	else -- comena + comena novèla
		resu = "base Cassini de l'EHESS et base Insee."
	end
	return resu
end


return p
Rècupèrâye de « https://frp.wikipedia.org/w/index.php?title=Module:Populacion_de_France/Sôrses&oldid=188366 »