Modul:Quellen

Die Dokumentation für dieses Modul kann unter Modul:Quellen/Doku erstellt werden

--[[
Lua Modul zum zuverlässigen darstellen von Artikelquellen
]]--


local p = {} --local p = {} -- p steht für Paket (engl. package)

function p.getQuellen( frame )
	--teste ob argument ungleich nichts
	local arg = frame.args['Pagename']
	if arg == nil then return nil end
	local returnString = ""
	local queryResult =  mw.smw.ask('[[Typ::Gesamtquellen]][[-Hat Unterobjekt::Dakardsmyr]]|?=#|limit=1999|format=array|')
	local i = 1
	while i <= table.getn(queryResult)
		do
			local queryQuelle = mw.smw.ask('[[' .. queryResult[i][1] ..']]|?Seitenausgabe Quelle|?Publikation|mainlabel=-')	
			returnString = returnString .. queryQuelle[1]['Publikation'] .. ":"
			if (type(queryResult[1]['Seitenausgabe Quelle']) == "table") then --another table!
				returnString = returnString .. table.getn(queryResult[1]['Seitenausgabe Quelle'])
			else
				if (queryResult[1]['Seitenausgabe Quelle'][1] == nil) then
					returnString = returnString
				else
					returnString = returnString .. queryResult[1]['Seitenausgabe Quelle'][1] -- keine tabelle 
				end
			end
		i = i +1
		end

    return returnString
end

return p