Modul:Faktenbox/Zeilen: Unterschied zwischen den Versionen

Aktuelle Version vom 27. November 2025, 20:35 Uhr

Seiten-Übersicht

Zur Klasse *Faktenbox* gehörende Seiten:
		Hauptseite	Unterseiten
Allgemein		Faktenboxen Klasse:Faktenbox Kategorie:Faktenboxen Konzept:Alle Faktenboxen FürthWiki:Semantik FürthWiki:Wartung/Faktenbox
Faktenbox	Vorlagen	Faktenbox	Faktenbox/Check Faktenbox/Check/Doku
	Formulare	Faktenbox PositionKarte (sofern genutzt) Kategorie:Klassen-übergreifende Formulare
	Module	Faktenbox	Faktenbox/Common Faktenbox/Common/Doku Faktenbox/Doku Faktenbox/Tabs Faktenbox/Tabs/Adressen Faktenbox/Tabs/Adressen/Doku Faktenbox/Tabs/Doku Faktenbox/Tabs/Karte Faktenbox/Tabs/Karte/Doku Faktenbox/Zeilen Faktenbox/Zeilen/Doku
Abfrage	Vorlagen	Abfrage Faktenboxen
	Formulare	Abfrage Faktenboxen
	Sonstige	Abfrage ausführen

Dieses Modul enthält gemeinsame Funktionen, um eine Faktenbox zu füllen

Funktionen Modul:Faktenbox

`Faktenbox()`

Universelle Faktenbox ohne Formular/Klasse/Gebäude. Sie kann als zusätzliche Faktenboxen auf einer Seite eingebaut werden ähnlich Vorlage:Tabbox. Sie setzt ebenso Attribute wie die regulären Faktenboxen z.B. von Gebäuden, Straßen, Personen usw.

Funktionen Modul:Faktenbox/Tabs

`universalDatenTab()`

Universeller Daten-Tab zeigt alle seine übergebenen Parameter außer die für Karte und Bild an.

`bildTab()`

Selbsterklärend...

`benennungenTab()`

Tab mit Liste der Benennungen.

`tab()`

Vervollständigt Tab-Inhalt zu einem Tab.

Funktionen Modul:Faktenbox/Tabs/Karte

`kartenTab()`

Selbsterklärend...

`getKartenArgs()`

Karten-Argumente übernehmen und aufbereiten.

Funktionen Modul:Faktenbox/Tabs/Adressen

`adressenTab()`

Tab mit Liste der Adressen. Die Adressen werden bestmöglich chronologisch aufsteigend sortiert.

`p.sortIndex() und p.smwDate2SortIndex()`

Erstellen Sortierindizes anhand Datum und Schlüsselwörtern (z.B. Geburtshaus ganz oben) für chronologische Sortierung.

Funktionen Modul:Faktenbox/Zeilen

`zeileKategorieSeite()`

Diese Zeile ist die oberste Zeile eines Daten-Tabs, welche nochmal den Namen des Objekts und einen Link zur Klassen-Kategorie anzeigt und das Attribut:Seite setzt.

`zeileStrasseHnr()`

Wie zeile(attr, attrText, val), aber speziell ausgrichtet, um Attribut:Straße, Attribut:Hausnummer, Attribut:StraßeHnr und Attribut:AnzahlGebäude zu setzen und anzuzeigen.

`zeileAktenNr()`

Wie zeile(attr, attrText, val), aber speziell ausgrichtet, um Attribut:AktenNr zu setzen und anzuzeigen. Die AktenNr werden als Query-Link und mit Seitenanzahl mit dieser AktenNr angezeigt.

`zeileGeoDaten()`

Zeile um alle Attribut:Geokoordinaten mit OSM-Link und die Attribut:GeoJson-Karte zu anzuzeigen.

`zeileDatum()`

Zeile um ein Datum standardisiert per linkFormDate() anzuzeigen.

`zeileSemantikBrowsenAbfrage()`

Zeile mit Link zum semantischen Browsen (Datensicht) und zur Abfrage.

`zeile()`

Standard-Zeile um ein Attribut zu setzen und anzuzeigen. Wenn es sich beim Attribut-Wert um eine Liste mit mehreren Elementen handelt, wird vom Attribut-Anzeigetext automatisch die Mehrzahl gebildet.

Parameter	Beschreibung
`attr_name`	Attribut-Name
`attr_text`	Optionaler Attribut-Anzeigetext. Default: `attr_name`. Siehe auch `attr_text_anzeige`
`attr_val`	Attribut-Wert. Wenn nicht übergeben, werden die von der #invoke:-Vorlage übergegebenen Parameter (`fbdata.pargs`) verwendet.
`fbdata`	fbdata-Daten-table mit von der #invoke:-Vorlage übergegebenen Parameter (`fbdata.pargs`).
`delimiter`	Trennzeichen bei Werte-Listen. Bei Nicht-Übergabe wird Attribut-Wert auch nicht als Liste behandelt.
`val_prefix`	Attribut-Wert-Prefix z.B. "ca."
`val_postfix`	Attribut-Wert-Postfix z.B. "km"
`val_show_only`	Attribut-Wert nur anzeigen, aber nicht setzen

`setPageAttr()`

Setzen eines Attributs vom Datentyp Seite in folgender Prüf- und Setzreihenfolge:

Wenn val problematische Wikitext/HTML-Inhalte enthält, dann wird
- val 1:1 angezeigt und ggf. gerendert (nicht innerhalb [[Attribut::Wert]])
- Attribut name mit val per {{#set:Attribut=Wert}} unsichtbar im Hintergrund gesetzt, auch wenn das Verarbeitungsfehler provoziert (gewollt)
Ansonsten wenn val als Seite existiert, wird diese 1:1 gesetzt und angezeigt ([[Attribut::Wert]])
Ansonsten wenn val Klammerungen am Anfang oder am Ende enthält (Beispiel: "(BlaBlub) Rathaus (BlaBla)"), wird geprüft, ob eine Seite ohne die Klammerungen (also Rathaus) existiert. Wenn ja, wird "(BlaBlub) Rathaus (BlaBla)" angezeigt und das Attribut mit nur "Rathaus" gesetzt.
Ansonsten wird
- val 1:1 angezeigt und ggf. gerendert (nicht innerhalb [[Attribut::Wert]])
- Attribut name mit val per {{#set:Attribut=Wert}} unsichtbar im Hintergrund gesetzt, auch wenn das Verarbeitungsfehler provoziert (gewollt)

`setStandardAttr()`

Setzen eines Standard-Attributs (nicht Datentyp Seite). Klammerwerte werden optional abgetrennt und Attribut-Wert wird optional nur angezeigt, aber nicht gesetzt.

Funktionen Modul:Faktenbox/Common

`common()`

Sonstige gemeinsame Dinge anfügen

Klasse
Formular
Kategorien
Wartung

`fbdata()`

Erstellt Faktenbox-Daten-Tabelle.

`fbdata`-Daten-table

Um die Parameter-Übergabe zu obigen Funktionen zu vereinfachen wird die fbdata-Daten-table verwendet, in der folgende Daten abgelegt werden:

fbdata.frame = frame von Faktenbox(frame)
fbdata.pargs = frame:getParent().args. Beispiel: fbdata.pargs["Ehemals"] oder fbdata.pargs.Ehemals
fbdata.klasse Klassen-table. Beispiel Kirche: fbdata.klasse = {"Kirche", "Gebäude"} ("Kirche" ist primäre und "Gebäude" sekundäre Klasse)
fbdata.kategorie Kategorien-table. Beispiel Kirche: fbdata.kategorie = {"Kirchen", "Gebäude"} ("Kirchen" ist primäre und "Gebäude" sekundäre Kategorie)
fbdata.kategorie_einzahl Einzahl-Kategorien-table als Alternative zu fbdata.klasse. Beispiel Kirche: fbdata.kategorie_einzahl = {"Kirche", "Gebäude"} ("Kirche" ist primäre und "Gebäude" sekundäre Kategorie)
fbdata.formular Formular
Pagesnames
- frame.fullpagename
- frame.pagename
- frame.subpagename
frame.strasse_hnr Untertabelle für Straße/Hausnummer-Daten
- frame.strasse_hnr.strasse Untertabelle für Straßen
  - frame.strasse_hnr.strasse.name Straßenname
  - frame.strasse_hnr.strasse.hausnummer Hausnummern-table dieser Straße
  - frame.strasse_hnr.strasse.suspekt Suspekte Formular-Werte dieser Straße
- frame.strasse_hnr.suspekt Suspekte Formular-Werte aller Straßen
- frame.strasse_hnr.anzahlGebaeude Anzahl aller gültigen Straße/Hausnummer-Kombinationen
Ggf. weitere Klassen-abhängige Einträge

`attr_text_anzeige`

Sofern kein attr_text angegeben, wird i. A. attr_name angezeigt. Jedoch wird bei manchen attr_name-Attributen stattdessen automatisch die ausgeschriebene Version angezeigt.

Beispiel: Beim Attribut:TeilDesEnsembles wird anhand der table attr_text_anzeige "Teil des Ensembles" angezeigt.

Diese Übersetzung von attr_name zur Anzeige-Version ist in attr_text_anzeige abgelegt und erfolgt global bei allen Faktenboxen.

Unterseiten

Siehe auch

local p = {}

local com = require("Modul:Common")
local str = require("Modul:String")
local wik = require("Modul:Wiki")
local geo = require("Modul:Geo")
local que = require("Modul:Queries")
local lfd = require("Modul:LinkFormDatum")
local wob = require("Modul:Wörterbuch")

function p.zeileKategorieSeite_(fbdata, kindex)
--	mw.log("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"}}, 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 .. "]]</dt>"
	if wik.pageExists("Kategorie:" .. fbdata.pagename) then
		t = t .. "<dd>[[:Kategorie:" .. fbdata.pagename .. "|" .. fbdata.pagename .. "]]{{#set:Seite=" .. fbdata.pagename .. "}}</dd>"
	else
		t = t .. "<dd>[[Seite::" .. fbdata.pagename .. "]]</dd>"
	end
--	mw.logObject(t, "t")
	return t
end

function p.zeileStrasseHnr_(fbdata)
--	mw.log("zeileStrasseHnr_(fbdata)")
--	mw.logObject(fbdata.strasse_hnr, "fbdata.strasse_hnr")
	-- Konsolenzeile zum Debuggen:
	-- =p.zeileStrasseHnr_{strasse_hnr={strasse={{name="Erlanger Straße",hausnummer={"11", "13"}},{name="XY Straße",hausnummer={}}},anzahlGebaeude=3}}
	local t = ""
	for is, sh in ipairs(fbdata.strasse_hnr.strasse) do -- Straßen/Hausnummer-Kombis durchiterieren
		t = t .. "<dt>"
		if is > 1 then
			t = t .. is .. ". " -- Numerierungsanzeige "2., "3." usw.
		else
			is = "" -- keine 1, aber 2, 3, ... für weitere Verwendung
		end
		t = t .. "Straße"
		if #sh.hausnummer > 0 then
			t = t .. " / " .. "Hausnummer" -- nur wenn Hausnummern vorhanden
			if #sh.hausnummer > 1 then
				t = t .. "n" -- Mehrzahl
			end
		end
		t = t .. "</dt><dd>[[Straße" .. is .. "::" .. sh.name .. "]]"
		for ih, h in ipairs(sh.hausnummer) do -- Hausnummern durchiterieren
			local strasse_hnr_ = sh.name .. " " .. h
			if ih > 1 then
				t = t .. "," -- Kommas davor ab 2. Hausnummer
			end
			if wik.pageExists(strasse_hnr_) then -- Link, wenn Seite vorhanden
				t = t .. " [[" .. strasse_hnr_ .. "|" .. h .. "]]"
			else
				t = t .. " " .. h
			end
			t = t .. "{{#set:Hausnummer" .. is .. "=" .. h .. "|StraßeHnr=" .. strasse_hnr_ .. "}}"
		end
		t = t .. "</dd>"
	end
	t = t .. "{{#set:AnzahlGebäude=" .. fbdata.strasse_hnr.anzahlGebaeude .. "}}"
--	mw.logObject(t, "t")
	return t
end

function p.zeileAktenNr_(fbdata)
--	mw.log("zeileAktenNr_(fbdata)")
--	mw.logObject(fbdata.pargs, "fbdata.pargs")
	-- Konsolenzeile zum Debuggen:
	-- =p.zeileAktenNr_{pargs={AktenNr="D-5-63-000-1464"}}
	local t = ""
	local aktennr = str.splitAndStrip(fbdata.pargs["AktenNr"] or "", ";")
	if #aktennr > 0 then
		t = t .. "<dt>" .. "Akten-Nr.</dt><dd>"
		for i, a in ipairs(aktennr) do
			if i > 1 then
				t = t .. ",<br>"
			end
			local p = que.getPages("[[:+]][[AktenNr::" .. a .. "]]", true)
			if #p > 1 then
				t = t .. "{{#queryformlink:form=Abfrage Denkmalschutz|link text=[[AktenNr::" .. a .. "]]|query string=Abfrage Denkmalschutz[AktenNr]=" .. a .. "&_run}}"
			else
				t = t .. "[[AktenNr::" .. a .. "]]"
			end
			t = t .. " (" .. #p .. ")" -- Anzahl der Artikel mit dieser Akten-Nr. in Klammern
		end
		t = t .. "</dd>"
	end
--	mw.logObject(t, "t")
	return t
end

function p.zeileGeoDaten_(fbdata)
--	mw.log("zeileGeoDaten(fbdata)")
--	mw.logObject(fbdata, "fbdata")
	-- Konsolenzeile zum Debuggen:
	-- fab = require("Modul:Faktenbox"); fbdata=fab.fbdata{pargs={}}; fbdata.fullpagename="Isaak-Loewi-Straße 1, 3, 5, 7, 9, Liesl-Kießling-Straße 16"; print(p.zeileGeoDaten_(fbdata))
	local t = ""
	local geokoordinate = que.getValues(fbdata.fullpagename, "Geokoordinate", true)
	local geojson = que.getValues(fbdata.fullpagename, "GeoJson", true)
	if #geojson > 0 then
		geojson = geojson[1]
	else
		geojson = "GeoJson:" .. fbdata.pagename
		if not wik.pageExists(geojson) then
			geojson = nil
		end
	end
	if #geokoordinate > 0 or geojson ~= nil then
		t = t .. "<dt>Geo-Daten</dt><dd>"
		local first = true
		for _, g in ipairs(geokoordinate) do
			if first then
				first = false
			else
				t = t .. ",<br>"
			end
			t = t .. geo.osmLink(fbdata.frame, g)
		end
		if geojson ~= nil then
			if not first then
				t = t .. ",<br>"
			end
			t = t .. "[[" .. geojson .. "|GeoJson-Karte]]"
		end
		t = t .. "</dd>"
	end
--	mw.logObject(t, "t")
	return t
end

function p.zeileDatum_(args)
--	mw.log("zeileDatum_(args)")
--	mw.logObject(args, "args")
	-- Konsolenzeile zum Debuggen:
	-- =p.zeileDatum_{attr_date="Weihedatum",date="1959/11/15",attr_day="Weihetag",attr_year="Weihejahr"}
	local t = ""
	local date = str.strip(args.date or "")
	if date ~= "" then
		t = t .. "<dt>" .. (args.attr_text or args.attr_date) .. "</dt><dd>"
		if com.isTrue(args.val_show_only) then
			t = t .. lfd.linkFormDate(date)
		else
			t = t .. lfd.linkFormDate(date, args.attr_date, args.attr_day, args.attr_year)
		end
		t = t .. "</dd>"
	end
--	mw.logObject(t, "t")
	return t
end

function p.zeileSemantikBrowsenAbfrage_(fbdata)
--	mw.log("zeileSemantikBrowsenAbfrage_(fbdata)")
--	mw.logObject(fbdata, "fbdata")
	-- Konsolenzeile zum Debuggen:
	-- =p.zeileSemantikBrowsenAbfrage_{fullpagename="Rathaus"}
	local t = ""
	t = t .. "&nbsp;"
	t = t .. "[[Bild:IconSearch.svg|16px|semantisches Browsen|link=[[Spezial:Durchsuchen/" .. fbdata.fullpagename .. "]]]]"
	t = t .. "&nbsp;&nbsp;&nbsp;"
	t = t .. "[[Spezial:Durchsuchen/" .. fbdata.fullpagename .. "|Sem. Browsen]]"
	if fbdata.kategorie ~= nil and wik.pageExists("Formular:Abfrage " .. fbdata.kategorie[1]) then
		t = t .. " / {{#queryformlink:form=Abfrage " .. fbdata.kategorie[1] .. "|link text=Abfrage}}"
	end
--	mw.logObject(t, "t")
	return t
end

function p.zeile_(args)
--	mw.log("zeile(args)")
--	mw.logObject(args, "args")
	-- Konsolenzeile zum Debuggen:
	-- =p.zeile_{attr_name="Vorgänger",attr_text="t",fbdata={pargs={["Vorgänger"]="; v11 , V12 ; v13 (a(b))"}},attr_val="; v1 ; v2, v3 (a(b))",val_prefix="pre",val_postfix="post",exclude_bracket_values=true,delimiter=","}
	local t = ""
	-- Attribut-Name/Wert aufbereiten (splitten, in table umwandeln)
	local attr_name = args.attr_name
	local attr_val
	if args.fbdata ~= nil then
		attr_val = args.attr_val or args.fbdata.pargs[attr_name] or {}
	else
		attr_val = args.attr_val or {}
	end
	if type(attr_val) ~= "table" then -- Liste in table umwandeln/zerteilen
		if args.delimiter ~= nil then
			attr_val = str.splitAndStrip(attr_val, args.delimiter or ";")
		elseif attr_val ~= "" then
			attr_val = { attr_val }
		else
			attr_val = {}
		end
	end
	-- Zeile zusammenbauen
	if #attr_val > 0 then
		-- Attribut-Text ermitteln und in Zeile übernehmen
		local attr_text = args.attr_text or wob.attr_text(attr_name)
		if #attr_val > 1 then
			attr_text = wob.mehrzahl(attr_text) -- Mehrzahl
		end
		t = t .. "<dt>" .. attr_text .. "</dt>"
		-- Attribut-Werte in Zeile übernehmen
		t = t .. "<dd>"
		if args.val_prefix ~= nil then
			t = t .. args.val_prefix .. " " -- Prefix
		end
		for idx, val in ipairs(attr_val) do -- Werte-Liste
			if idx > 1 then
				t = t .. ", " -- Listen-Kommata
			end
			if mw.smw.getPropertyType(attr_name) == "_wpg" then 				-- Seiten-Attribute Spezialbehandlung
				t = t .. p.setPageAttr(attr_name, val, args.val_show_only)
			else																-- alle anderen Attribut-Datentypen
				if mw.smw.getPropertyType(attr_name) == "_tel" then 			-- Telefonnummer Spezialbehandlung
					val =  p.getTelUri(val)
				end
				t = t .. p.setStandardAttr(attr_name, val, args.exclude_bracket_values, args.val_show_only)
			end
		end
		if args.val_postfix ~= nil then
			t = t .. " " .. args.val_postfix -- Postfix
		end
		t = t .. "</dd>"
	end
--	mw.logObject(t, "t")
	return t
end

function p.setPageAttr(name, val, val_show_only)
	local t = ""
	if string.find(val, "[#=<>%[%]%|%{%}]") ~= nil then							-- problematische Wikitext/HTML-Inhalte vorhanden?
		t = t .. val															-- ==> kein Link, sondern nur Attribut versteckt setzen
		if not val_show_only then
			t = t .. "{{#set:" .. name .. "=" .. val .. "}}"
		end
	elseif wik.pageExists(val) then												-- eine vorhandene Seite regulär verlinken bzw. setzen
		if val_show_only then
			t = t .. "[[" .. val .. "]]"
		else
			t = t .. "[[" .. name .. "::" .. val .. "]]"
		end
	else
		val_pre_bracket, val_without_bracket, val_post_bracket = str.bracketSplitAndStrip(val)	-- nach Klammern suchen und aufteilen
		if not wik.pageExists(val_without_bracket) then							-- Seite auch ohne Klammern nicht vorhanden?
			t = t .. val														-- ==> kein Link, sondern nur Attribut versteckt setzen
			if not val_show_only then
				t = t .. "{{#set:" .. name .. "=" .. val .. "}}"
			end
		else
			if val_pre_bracket ~= "" then										-- Klammer-Text vor eigentlicher Seite
				t = t .. val_pre_bracket .. " "
			end
			if val_show_only then
				t = t .. "[[" .. val_without_bracket .. "]]"					-- das eigentliche Attribut verlinken
			else
				t = t .. "[[" .. name .. "::" .. val_without_bracket .. "]]"	-- das eigentliche Attribut-Setzen
			end
			if val_post_bracket ~= "" then										-- Klammer-Text nach eigentlicher Seite
				t = t .. " " .. val_post_bracket
			end
		end
	end
--	mw.logObject(t, "t")
	return t
end

function p.setStandardAttr(name, val, exclude_bracket_values, val_show_only)
	local t = ""
	local val_pre_bracket, val_post_bracket = "", ""
	if com.isTrue(exclude_bracket_values) then									-- Klammer-Text separieren (kein Attribut-Wert)
		val_pre_bracket, val, val_post_bracket = str.bracketSplitAndStrip(val)	-- nach Klammern suchen und aufteilen
	end
	if val_pre_bracket ~= "" then
		t = t .. val_pre_bracket .. " "
	end
	if com.isTrue(val_show_only) then
		t = t .. val
	else
		t = t .. "[[" .. name .. "::" .. val .. "]]"
	end
	if val_post_bracket ~= "" then
		t = t .. " " .. val_post_bracket
	end
--	mw.logObject(t, "t")
	return t
end

function p.getTelUri(val)
	local tel = str.strip(val)													-- preload default
	if mw.ustring.sub(tel, 1, 1) == "0" and										-- beginnt mit 0zzz (z = Zahl)
		(tonumber(mw.ustring.sub(tel, 2, 2)) or 0) > 0 then
		tel = "+49 " .. mw.ustring.sub(tel, 2)
	elseif mw.ustring.sub(tel, 1, 3) == "+49" then								-- +49 (0) ...
		s, e = mw.ustring.find(tel, "%(0%)")
		if s ~= nil then
			tel = mw.ustring.sub(tel, 1, s - 1) .. " " .. mw.ustring.sub(tel, e + 1)
		end
	end
	-- Alle unerlaubten Zeichen und mehrfache Leerzeichen ausfiltern
	local telUri = ""
	local previous_char = ""
	tel = tel .. " "
	for i = 1, mw.ustring.len(tel) do
		local char = mw.ustring.sub(tel, i, i)
		if tonumber(char) ~= nil or
			char == "+" or char == "-" or char == "/" or 
			(char == " " and previous_char ~= " ") then
			telUri = telUri .. previous_char
			previous_char = char
		end
	end
	return telUri
end

return p

Modul:Faktenbox/Zeilen: Unterschied zwischen den Versionen

Aktuelle Version vom 27. November 2025, 20:35 Uhr

Seiten-Übersicht

Funktionen Modul:Faktenbox

Faktenbox()

Funktionen Modul:Faktenbox/Tabs

universalDatenTab()

bildTab()

benennungenTab()

tab()

Funktionen Modul:Faktenbox/Tabs/Karte

kartenTab()

getKartenArgs()

Funktionen Modul:Faktenbox/Tabs/Adressen

adressenTab()

p.sortIndex() und p.smwDate2SortIndex()

Funktionen Modul:Faktenbox/Zeilen

zeileKategorieSeite()

zeileStrasseHnr()

zeileAktenNr()

zeileGeoDaten()

zeileDatum()

zeileSemantikBrowsenAbfrage()

zeile()

setPageAttr()

setStandardAttr()