Modul:Publikation

Seiten-Übersicht

Zur Klasse Publikation gehörende Seiten:

		Hauptseite	Unterseiten
Allgemein		Publikationen Klasse:Publikation Kategorie:Publikationen Konzept:Alle Publikationen FürthWiki:Semantik FürthWiki:Wartung/Publikation
Faktenbox	Vorlagen	Publikation	Publikation/Doku
	Formulare	Publikation PositionKarte (sofern genutzt) Kategorie:Klassen-übergreifende Formulare	Publikation/Daten
	Module	Publikation	Publikation/Doku
Abfrage	Vorlagen	Abfrage Publikationen
	Formulare	Abfrage Publikationen
	Sonstige	Abfrage ausführen

Siehe auch

• Modul:Common
• Modul:String
• Modul:Wörterbuch
• Modul:Faktenbox
• Vorlage:Buch
• Kategorie:Bücher

---

local p = {}

local com = require("Modul:Common")
local str = require("Modul:String")
local wob = require("Modul:Wörterbuch")
local wik = require("Modul:Wiki")
local smw = require("Modul:SMW")
local fab = require("Modul:Faktenbox")
	
function p.Faktenbox(frame)
--	mw.log("Faktenbox(frame)")
--	mw.logObject(frame, "frame")
	-- Konsolenzeile zum Debuggen:
	-- =p.Faktenbox{pargs={Titel="Bla",Ausfuehrung="1234",Genre="Stadtgeschichte;Biografie"}}

	-- Basis-Faktenbox-Daten (Klasse/Kategorie/Formular)
	local fbdata = fab.getFbdata(frame)
	fbdata.klasse = {frame.args["Klasse"] or "Publikation"}
	if frame.args["KategorieEinzahl"] ~= nil then
		fbdata.kategorie_einzahl = {frame.args["KategorieEinzahl"]}
		fbdata.kategorie = {wob.mehrzahl(frame.args["KategorieEinzahl"])}
	else
		fbdata.kategorie = {frame.args["Kategorie"] or "Publikationen"}
	end
	fbdata.formular = frame.args["Formular"] or frame.args["KategorieEinzahl"] or "Publikation" -- ggf. "Publikation/Work"
	fbdata.positionscheck = false

	-- Tabs einsammeln und zusammenfügen
	local t = fab.bildTab(fbdata) .. p.datenTab(fbdata)
	t = fab.factbox(t)

	-- Buch-spezifische Kategorien usw.
	-- siehe Genre-Kategorisierung in function p.zeileGenre()

	-- Sonstige gemeinsame Dinge anfügen (Klasse, Formular, Kategorien, Wartung, ...)
	t = t .. fab.postprocess(fbdata)
	-- Pre-Processing
--	mw.logObject(t, "t")
	t = fbdata.frame:preprocess(t)
	return t
end

function p.datenTab(fbdata)
--	mw.log("datenTab(fbdata)")
--	mw.logObject(fbdata)
	--[[ Konsolenzeile zum Debuggen:
	fab=require("Modul:Faktenbox"); fbdata=fab.fbdata{pargs={Titel="Bla",Ausfuehrung="1234"}};
	fbdata.klasse={"Buch"}; fbdata.kategorie={"Bücher"}; fbdata.fullpagename="Pegnitz"; fbdata.subpagename="Pegnitz";
	print(p.datenTab(fbdata))
	]]
	local t = ""

	-- Zusammenbau
	t = t .. "<dl class = 'dataTable'>"
	t = t .. p.zeileKategorieSeite(fbdata)
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Untertitel",				delimiter = ";"}
	t = t .. p.zeileReihe(fbdata)
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Band",						attr_text = "Lfd. Nummer (Band)"}
	t = t .. p.zeileGenre(fbdata)
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Ausfuehrung"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Autor",					delimiter = ";"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Herausgeber",				delimiter = ";"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Erscheinungsjahr",			delimiter = ";"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Verlag",					delimiter = ";"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Auflage"}				
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Seitenzahl",				delimiter = ";"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "ISBNnr",					delimiter = ";"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Besonderheit",				delimiter = ";"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "BestandArchivFuerthWiki",	delimiter = ";"}
	t = t .. "</dl>"
	t = t .. fab.zeileSemantikBrowsenAbfrage(fbdata)

	-- Tab draus machen
	t = fab.tab(t, "Daten")
--	mw.logObject(t, "t")
    return t
end

function p.zeileKategorieSeite(fbdata, kindex)
--	mw.log(fbdata, "zeileKategorieSeite(fbdata, " .. (kindex or 1) .. ")")
--	mw.logObject(fbdata, "fbdata")
	-- Konsolenzeile zum Debuggen:
	-- =p.zeileKategorieSeite({pagename="fpn",kategorie={"kat1","kat2"},kategorie_einzahl={"k1","k2"},klasse={"kla1","kla2"},pargs={["Titel"]="T"}}, 2)
	local t = ""
	local kategorie_einzahl
	if fbdata.kategorie_einzahl ~= nil then
		kategorie_einzahl = fbdata.kategorie_einzahl[kindex or 1]
	else
		kategorie_einzahl = fbdata.klasse[kindex or 1]
	end
	t = t .. "<dt>[[:Kategorie:" .. fbdata.kategorie[kindex or 1] .. "|" .. kategorie_einzahl .. "-Titel]]</dt>"
	t = t .. "<dd>'''[[" .. (fbdata.pargs["Titel"] or fbdata.pagename) .. "]]'''</dd>"
	smw.addAttrToList(fbdata.attr.list, "Publikationstitel", fbdata.pargs["Titel"] or fbdata.pagename)
	smw.addAttrToList(fbdata.attr.list, "Seite", fbdata.pagename)
--	mw.logObject(t, "t")
	return t
end

function p.zeileReihe(fbdata)
--	mw.log("zeileReihe(fbdata)")
--	mw.logObject(fbdata.pargs, "fbdata.pargs")
	-- Konsolenzeile zum Debuggen:
	-- =p.zeileReihe{pargs={Reihe=" Chronik Geschichtswerkstatt ; Durch Fürth geführt (Buchreihe) ; BlaBla "}}
	local t = ""
	local reihe = str.splitAndStrip(fbdata.pargs["Reihe"], ";")
	if #reihe > 0 then
		if #reihe > 1 then
			t = t .. "<dt>" .. "[[Attribut:Reihe|Reihen]]</dt><dd>"
		else
			t = t .. "<dt>" .. "[[Attribut:Reihe|Reihe]]</dt><dd>"
		end
		for i, r in ipairs(reihe) do
			if i > 1 then
				t = t .. ", "
			end
			-- "(Buchreihe)" abschneiden (r_ohne) bzw. zu r hinzufügen
			local r_ohne
			if string.find(r, "(Buchreihe)") ~= nil then
				r_ohne = str.strip(string.sub(r, 1, string.len(r) - 11))
			else
				r_ohne = r
				local r_mit = r .. " (Buchreihe)"
				if wik.pageExists(r_mit) or not wik.pageExists(r) then
					r = r_mit
				end
			end
			if wik.pageExists(r) then
				t = t .. "[[" .. r_ohne .. "]]"
			else
				t = t .. r_ohne
			end
			smw.addAttrToList(fbdata.attr.list, "Reihe", r)
		end
		t = t .. "</dd>"
	end
--	mw.logObject(t, "t")
	return t
end

function p.zeileGenre(fbdata)
--	mw.log("zeileGenre(fbdata)")
--	mw.logObject(fbdata.pargs, "fbdata.pargs")
	-- Konsolenzeile zum Debuggen:
	-- =p.zeileGenre{pargs={Genre="Stadtgeschichte;Biografie"}}
	local t = ""
	local genre = str.splitAndStrip(fbdata.pargs["Genre"], ";")
	if #genre > 0 then
		if #genre > 1 then
			t = t .. "<dt>" .. "[[Attribut:Genre|Genres]]</dt><dd>"
		else
			t = t .. "<dt>" .. "[[Attribut:Genre|Genre]]</dt><dd>"
		end
		for i, g in ipairs(genre) do
			if i > 1 then
				t = t .. ", "
			end
			t = t .. "[[:Kategorie:" .. g .. "|" .. g .. "]][[Kategorie:" .. g .. "]]"
			smw.addAttrToList(fbdata.attr.list, "Genre", g)
		end
		t = t .. "</dd>"
	end
--	mw.logObject(t, "t")
	return t
end

return p