Module:Liste2

La documentation pour ce module peut être créée à Module:Liste2/doc

local p = {}
function p.main(frame)
	if frame == mw.getCurrentFrame() then
		args = require('Module:ProcessArgs').merge(true)
	else
		frame = mw.getCurrentFrame()
	end
	
	local query = {}
	for k, v in pairs(args) do
		if string.sub(k, 0, 2) == 'q?' then
			query[string.sub(k, 3)] = v
		end
	end

	supports={}	
	local result = mw.ext.cargo.query('Supports','idSupport,video',{groupBy = 'idSupport',limit=3000})
	for d, row in ipairs(result) do
		supports[row['idSupport']] = row['video']
	end
	
	result = mw.ext.cargo.query(query.tables, query.fields, query)
	if not next(result) then
		return frame:preprocess(args.default or '')
	end

	local tbl,tbl2,tbl3,tbl4,tbl5,tbl6 = {},{},{},{},{},{},{},{}
	for _, row in ipairs(result) do
		row['annee'] = tonumber(row['annee'])
		if row['video'] == '' then
			if supports[row['idSupport']] then row['video']=supports[row['idSupport']] end
		end
	end
	
	local an1 = 1900
	local periode = 7
	local texte_periode, msg = '\n Texte période', 1
	local retour = ''
	for _,row in ipairs(result) do
		if math.floor((row['annee'] - an1) / periode) == 0 and msg then
			retour = retour .. table.concat(tbl,args.delimiter or '') .. texte_periode .. an1 .. row['annee'] .. '\n\n'
			an1,tbl,msg = row['annee'],{},nil
		else
			tbl[#tbl+1] = frame:expandTemplate{ title = args.template, args = row }
			msg = 1
		end
	end
		
	local intro = frame:preprocess(args.intro or '')
	local outro = frame:preprocess(args.outro or '')

	return intro .. retour .. outro

end
return p