Modul:Person

Aus FürthWiki

Version vom 9. Januar 2026, 21:55 Uhr von HeikoBot (Diskussion | Beiträge) (Änderung 777616 von HeikoBot (Diskussion) rückgängig gemacht.)

Seiten-Übersicht

Zur Klasse Person gehörende Seiten:
Hauptseite Unterseiten
Allgemein
Faktenbox Vorlagen
Formulare
Module
Abfrage Vorlagen


Formulare


Sonstige


Siehe auch

local p = {}

local com = require("Modul:Common")
local str = require("Modul:String")
local fab = require("Modul:Faktenbox")
local smw = require("Modul:SMW")
local ber = require("Modul:Beruf")

function p.Faktenbox(frame)
--	mw.logObject(frame, "Faktenbox(frame)")
	-- Konsolenzeile zum Debuggen:
	-- =p.Faktenbox{pargs={Vorname="Hans",Nachname="Wurst",Geburtsort="Fürth",Geburtsdatum="2025/02/01"}}

	-- Basis-Faktenbox-Daten (Klasse/Kategorie/Formular)
	local fbdata = fab.getFbdata(frame)
	fbdata.klasse = {"Person"}
	fbdata.kategorie = {"Personen"}
	fbdata.formular = "Person" -- ggf. "Person/Work"
	fbdata.positionscheck = false

	-- Tabs einsammeln und zusammenfügen
	local t = fab.bildTab(fbdata) .. p.datenTab(fbdata) ..
		p.funktionenTab(fbdata) .. p.auszeichnungenTab(fbdata) ..
		fab.adressenTab(fbdata) .. p.familieTab(fbdata) ..
		p.beziehungenTab(fbdata)
	t = fab.factbox_header_footer(t)

	-- Personen-spezifische Kategorien usw.
	if fbdata.pargs["Geburtsort"] ~= nil then
		if fbdata.pargs["Geburtsort"] == "Fürth" or mw.smw.ask("[[" .. fbdata.pargs["Geburtsort"] .. "]][[KlassenName::Stadtteil]]|format=count") == 1 then
			t = t .. "[[Kategorie:Söhne und Töchter der Stadt Fürth]]"
			smw.addAttrToList(fbdata.attr.list, "GeburtsortHeuteFürth", "wahr")
		else
			smw.addAttrToList(fbdata.attr.list, "GeburtsortHeuteFürth", "falsch")
		end
	end
	if fbdata.pargs["Nachname"] ~= nil then
		if fbdata.pargs["Vorname"] ~= nil then
			t = t .. "{{DEFAULTSORT:" .. fbdata.pargs["Nachname"] .. ", " .. fbdata.pargs["Vorname"] .. "}}"
		else
			t = t .. "{{DEFAULTSORT:" .. fbdata.pargs["Nachname"] .. "}}"
		end
	elseif fbdata.pargs["Vorname"] ~= nil then
		t = t .. "{{DEFAULTSORT:" .. fbdata.pargs["Vorname"] .. "}}"
	end

	-- 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.logObject(fbdata, "datenTab(fbdata)")
	--[[ Konsolenzeile zum Debuggen:
	fab=require("Modul:Faktenbox"); fbdata=fab.fbdata{pargs={Vorname="Hans",Geburtsdatum="2025/02/01"}};
	fbdata.klasse={"Person"}; fbdata.kategorie={"Personen"}; fbdata.fullpagename="Ludwig Erhard"; fbdata.subpagename="Ludwig Erhard";
	print(p.datenTab(fbdata))
	]]
	local t = ""
	
	-- Shoah-Abfrage
	fbdata.shoah = p.opferShoah(fbdata)

	-- Zusammenbau
	t = t .. fab.zeileKategorieSeite(fbdata)
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Namenszusatz",				delimiter = ";"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Vorname",					delimiter = ";"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Nachname",					delimiter = ";"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Geschlecht"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "AbweichendeNamensform",	delimiter = ";"}
	t = t .. fab.zeileDatum{fbdata = fbdata,	attr_date = "Geburtsdatum",				date = fbdata.pargs["Geburtsdatum"],		attr_day = "Geburtstag",	attr_year = "Geburtsjahr"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Geburtsort"}
	if fbdata.shoah ~= nil then
		t = t .. fab.zeileDatum{fbdata = fbdata,	attr_date = "Deportationsdatum",	date = fbdata.shoah["Deportationsdatum"],	val_show_only = true}
		t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Deportationsort",				attr_val = fbdata.shoah["Deportationsort"],	val_show_only = true}
		t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Gebäude",						attr_val = fbdata.shoah["Gebäude"],			val_show_only = true}
		t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Quellangaben",					attr_val = fbdata.shoah["Quellangaben"],	val_show_only = true}
	end
	t = t .. fab.zeileDatum{fbdata = fbdata,	attr_date = "Todesdatum",				date = fbdata.pargs["Todesdatum"],			attr_day = "Todestag",		attr_year = "Todesjahr"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Todesort"}
	if fbdata.shoah ~= nil then
		t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Todesursache",					attr_val = fbdata.shoah["Todesursache"],	val_show_only = true}
	end
	t = t .. p.zeileBeruf(fbdata)
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Partei",		delimiter = ";"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Eigenart",		delimiter = ";"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Religion",		delimiter = ";"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Friedhof"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Grabstelle"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "Nachlass",		delimiter = ";"}
	t = t .. fab.zeile{fbdata = fbdata,	attr_name = "GND"}
	t = fab.table_header_footer(t)
	t = t .. fab.zeileSemantikBrowsenAbfrage(fbdata)

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

function p.funktionenTab(fbdata)
	local t = fbdata.frame:expandTemplate{title = 'Person/Funktionen'}
	t = fab.tab(t, "Funktionen")
    return t
end

function p.auszeichnungenTab(fbdata)
	local t = fbdata.frame:expandTemplate{title = 'Person/Auszeichnungen'}
	t = fab.tab(t, "Auszeichnungen")
    return t
end

function p.familieTab(fbdata)
	local t = fbdata.frame:expandTemplate{title = 'Person/Familie'}
	t = fab.tab(t, "Familie")
    return t
end

function p.beziehungenTab(fbdata)
	local t = fbdata.frame:expandTemplate{title = 'Person/Beziehungen'}
	t = fab.tab(t, "Beziehungen")
    return t
end

function p.opferShoah(fbdata)
--	mw.logObject(fbdata, "opferShoah(fbdata)")
	-- Konsolenzeile zum Debuggen:
	-- fbdata={pargs={Vorname="Berthold Benedikt",Nachname="Bing"}}; mw.logObject(p.opferShoah(fbdata))

	-- DB-Abfrage
	local query = "[[SubObjektTyp::Opfer der Shoah]]"
	query = query .. "[[Vorname::" .. (fbdata.pargs["Vorname"] or "") .. "]]"
	query = query .. "[[Nachname::" .. (fbdata.pargs["Nachname"] or "") .. "]]"
	query = query .. "|?Deportationsdatum#ISO-P"
	query = query .. "|?Deportationsort"
	query = query .. "|?Todesursache"
	query = query .. "|?Gebäude#-"
	query = query .. "|?Quellangaben"
	query = query .. "|mainlabel=-"
	query = query .. "|limit=1"
	local ask_result = mw.smw.ask(query) or {{}}
--	mw.logObject(ask_result[1], "ask_result[1]")
    return ask_result[1]
end

function p.zeileBeruf(fbdata)
--	mw.log("zeileBeruf(fbdata)")
--	mw.logObject(fbdata.pargs, "fbdata.pargs")
	-- Konsolenzeile zum Debuggen:
	-- =p.zeileBeruf{attr={list={}},pargs={Beruf="Tester",Geschlecht="weiblich"}}
	local t = ""
	local beruf = fbdata.pargs["Beruf"] or ""
	if beruf ~= "" then
		-- Berufe-Liste durchiterieren
		for _, beruf in ipairs(str.splitAndStrip(beruf, ";")) do
			local beruf_pagename = ber.getBerufPagename(beruf) or beruf
			local geschlecht = fbdata.pargs["Geschlecht"] or ""
			-- Berufname ermitteln
			local selector = "[[:+]]" ..
				"[[-has subobject::" .. beruf_pagename .. "]]" ..
				"[[Bemerkung::Einzahl]]" ..
				"[[Geschlecht::" .. geschlecht .. "]]"
			local query = {selector, "?BerufTemp", ["limit"] = 1}
			-- Wörterbuch befragen
			local ask = mw.smw.ask(query)
			mw.logObject(ask, "ask")
			if ask ~= nil then
				beruf = ask[1]["BerufTemp"]
			end
			-- Beruf zu Werte-Liste hinzufügen
			if t ~= "" then
				t = t .. ", "
			end
			t = t .. "[[" .. beruf_pagename .. "|" .. beruf .. "]]"
			smw.addAttrToList(fbdata.attr.list, "Beruf", beruf)
			smw.addAttrToList(fbdata.attr.list, "BerufTemp", beruf)
			smw.addAttrToList(fbdata.attr.list, "BerufSeite", beruf_pagename)
		end
		t = "<dt>Beruf</dt><dd>" .. t .. "</dd>"
	end
--	mw.logObject(t, "t")
--	mw.logObject(fbdata.attr.list, "fbdata.attr.list")
	return t
end

return p
Abgerufen von „https://www.fuerthwiki.de/wiki/index.php?title=Modul:Person&oldid=777618“