Modul:Faktenbox/Tabs/Adressen: Unterschied zwischen den Versionen

Version vom 4. November 2025, 15:57 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 que = require("Modul:Queries")
local lfd = require("Modul:LinkFormDatum")

local fab_tabs = require("Modul:Faktenbox/Tabs")

function p.adressenTab_(fbdata)
--	mw.log("adressenTab_()")
--	mw.logObject(fbdata)
	-- Konsolenzeile zum Debuggen:
	-- =p.adressenTab_({fullpagename="Jakob Bock"})
	-- =p.adressenTab_({fullpagename="Ludwig Erhard"})
	-- =p.adressenTab_({fullpagename="Druck & Kopie Hartmann KG"})
	-- =p.adressenTab_({fullpagename="Rathaus"})
	-- =p.adressenTab_({fullpagename="E-Tankstelle Hochstraße"})
	-- =p.adressenTab_({fullpagename="TestPerson2"})
	-- =p.adressenTab_({fullpagename="Jakob Wassermann"})
	local t = ""

	-- Attribute-Liste
	local attr = {
		["Adressart"]	= { querypostfix = "",		default = ""},
		["Straße"] 		= { querypostfix = "#-",	default = ""},
		["Hausnummer"]	= { querypostfix = "",		default = 0},
		["StraßeHnr"]	= { querypostfix = "#-",	default = ""},
		["VonObjekt"]	= { querypostfix = "#-",	default = ""},
		["AdresseVon"]	= { querypostfix = "",		default = ""},
		["AdresseBis"]	= { querypostfix = "",		default = ""}}

	-- DB-Abfrage
	local query = "[[-Has subobject::".. fbdata.fullpagename .. "]][[SubObjektTyp::Adresse]]|?#-|limit=100"
	for i, a in pairs(attr) do
		query = query .. "|?" .. i .. a.querypostfix
	end
	local addresses = mw.smw.ask(query)

	if addresses ~= nil then

		-- defaults fehlender Attribute und Sortier-Index setzen
		for i, _ in pairs(addresses) do
			for j, a in pairs(attr) do
				addresses[i][j] = addresses[i][j] or a.default
			end
			addresses[i].von_sort_index	= smwDate2SortIndex(addresses[i]["AdresseVon"])
			addresses[i].bis_sort_index	= smwDate2SortIndex(addresses[i]["AdresseBis"])
		end

		-- Tabelle sortieren
		for i = 1, #addresses - 1 do											-- max. #addresses - 1 Durchgänge nötig
			local swap_this_interation = false
			for j = 1, #addresses - 1 do
				local swap = vonBisSortCompare(addresses[j], addresses[j+1])
				if swap then
					addresses[j], addresses[j+1] = addresses[j+1], addresses[j]
				end
				swap_this_interation = swap_this_interation or swap
			end
			if not swap_this_interation then
				break
			end
		end

		-- Liste erstellen
		t = t .. "<nowiki></nowiki>\n"												-- nötig, warum auch immer, damit erster Listeeintrag richtig gerendert wird
		for _, e in ipairs(addresses) do
			t = t .. "* '''"														-- Zeilenanfang Liste
			-- Straße/Hausnummer ausgeben
			if wik.pageExists(e["StraßeHnr"]) then									-- Link zu Einzel-Gebäude-Seite
				t = t .. "[[" .. e["StraßeHnr"] .. "]]"
			elseif wik.pageExists(e["VonObjekt"]) then								-- alternativ Link zu Gebäude-Komplex-Seite
				t = t .. "[[" .. e["VonObjekt"] .. "|" .. e["StraßeHnr"] .. "]]"
			elseif wik.pageExists(e["Straße"]) then									-- alternativ Link zu Straße-Seite
				t = t .. "[[" .. e["Straße"] .. "]] " .. tostring(e["Hausnummer"])
			else
				t = t .. "" .. e["StraßeHnr"] .. ""									-- alternativ nur fetter Text
			end
			t = t .. "'''"
			-- Zusatzinfos in Klammern anfügen
			local bracket = {}
			if e["Adressart"] ~= "" then
				table.insert(bracket, e["Adressart"])
			end
			if e["AdresseVon"] ~= "" then
				if e["AdresseBis"] ~= "" then
					table.insert(bracket, " " .. lfd.formatDate(e["AdresseVon"]))
				else
					table.insert(bracket, "seit " .. lfd.formatDate(e["AdresseVon"]))
				end
			end
			if e["AdresseBis"] ~= "" then
				if e["AdresseVon"] ~= "" then
					table.insert(bracket, "- " .. lfd.formatDate(e["AdresseBis"]))
				else
					table.insert(bracket, "bis " .. lfd.formatDate(e["AdresseBis"]))
				end
			end
			if #bracket > 0 then
				t = t .. " (" .. table.concat(bracket, " ") ..")"
			end
			t = t .. "\n"
		end
	end

	-- Tab draus machen
	t = fab_tabs.tab_(t, "Adressen")
--	mw.log("t = " .. t)
	return t
end

function smwDate2SortIndex(date)
--	mw.log("smwDate2SortIndex(" .. date .. ")")
	-- Konsolenzeile zum Debuggen:
	-- =p.smwDate2SortIndex("2000")
	-- =p.smwDate2SortIndex("Februar 2000")
	-- =p.smwDate2SortIndex("3. Februar 2000")
	local sort_index = ""
	local date=str.split2(date, " ")

	if #date == 1 then -- nur Jahr
		sort_index = tostring(date[1]) .. 
			"0101" -- 1. Januar
	elseif #date == 2 then -- nur Monat + Jahr
		sort_index = tostring(date[2]) ..
			string.format("%02d", com.getMonthnr(date[1])) ..
			"01" -- 1. Tag
	elseif #date == 3 then -- komplettes Datum
		sort_index = tostring(date[3]) ..
			string.format("%02d",com.getMonthnr(date[2])) ..
			string.format("%02d", tonumber(string.match(date[1], "%d*")))
	end
	sort_index = tonumber(sort_index) or 0
--	mw.log("sort_index = " .. tostring(sort_index))
	return sort_index
end

function vonBisSortCompare(k1, k2)
--	mw.log("vonBisSortCompare(k1, k2)")
--	mw.logObject(k1)
--	mw.logObject(k2)
	local swap = false
	if k1.bis_sort_index ~= 0 then
		if k2.von_sort_index ~= 0 then
			swap = ( k1.bis_sort_index > k2.von_sort_index )
		elseif k2.bis_sort_index ~= 0 then
			swap = ( k1.bis_sort_index > k2.bis_sort_index )
		end
	elseif k1.von_sort_index ~= 0 then
		if k2.von_sort_index ~= 0 then
			swap = ( k1.von_sort_index > k2.von_sort_index )
		elseif k2.bis_sort_index ~= 0 then
			swap = ( k1.von_sort_index > k2.bis_sort_index )
		end
	else
		if k2.von_sort_index ~= 0 or k2.bis_sort_index ~= 0 then
			swap = true
		end
	end
--	mw.log("swap = " .. tostring(swap))
	return swap
end

return p

Modul:Faktenbox/Tabs/Adressen: Unterschied zwischen den Versionen

Version vom 4. November 2025, 15:57 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()