Modul:Stadtteil: Unterschied zwischen den Versionen

← Zum vorherigen Versionsunterschied

Modul:Stadtteil (Quelltext anzeigen)

Version vom 12. November 2025, 09:51 Uhr

4.213 Bytes hinzugefügt , 12 November

args["Ehemals"]

HeikoBot

Bots, SMW-Administratoren, SMW-Kuratoren, SMW-Editoren, Administratoren

15.075

Bearbeitungen

@@ Zeile 1: / Zeile 1: @@
-local p = {} --p stands for package
+local p = {}
-function p.Faktenbox( frame )
+local com = require("Modul:Common")
-	pf = frame:getParent()
+local fab = require("Modul:Faktenbox")
-	args = pf.args
+local wik = require("Modul:Wiki")
+local kar = require("Modul:Karte")
-	tpl_bild = p.Bild( frame, args )
-	tab_bild=''
+function p.Faktenbox(frame)
-	if tpl_bild:gsub("%s+", "") ~= '' then
+--	mw.logObject(frame, "Faktenbox(frame)")
-		tab_bild='<tab name=Bild>' ..
+	-- Konsolenzeile zum Debuggen:
-		tpl_bild .. '</tab>'
+	-- =p.Faktenbox{pargs={["Stadtbezirk"]="NSOW",["Eingemeindungsdatum"]="1971/01/21",["Stadtteil"]="BlaStadtteil",["Fläche"]="123" }}
-	end
+	-- Basis-Faktenbox-Daten (Klasse/Kategorie/Formular)
-	tpl_karte = p.Karte( frame, args )
+	local fbdata = fab.fbdata(frame)
-	tab_karte=''
+	fbdata.klasse = {"Stadtteil"}
-	if tpl_karte:gsub("%s+", "") ~= '' then
+	fbdata.kategorie = {"Stadtteile"}
-		tab_karte='<tab name=Karte>' ..
+	fbdata.formular = "Stadtteil" -- ggf. "Stadtteil/Work"
-		tpl_karte .. '</tab>'
+	fbdata.positionscheck = true
-	end
+	-- Tabs einsammeln und zusammenfügen
-	-- The tab "Daten" is visible everytime
+	local box =
-	tpl_daten = p.Daten( frame, args )
+		"<div class = factbox><tabs>" ..
-	tab_daten='<tab name=Daten>' ..
+		p.kartenTab(fbdata) ..
-	tpl_daten .. '</tab>'
+		fab.bildTab(fbdata) ..
+		p.datenTab(fbdata) ..
-	t ='<div class=factbox><tabs>' ..
+		"</tabs></div>"
-	   tab_karte ..
-	   tab_bild ..
+	-- Stadtteil-spezifische Kategorien usw.
-	   tab_daten ..
+	box = box .. "[[Kategorie:" .. fbdata.pagename .. "|*]]"
-	   '</tabs></div>'
+	-- Sonstige gemeinsame Dinge anfügen (Klasse, Formular, Kategorien, Wartung, ...)
+	box = box .. fab.common(fbdata)
+--	mw.logObject(box, "box")
-	-- Use preprocess to render the factbox and all contens at once
+	-- Pre-Processing und String-Länge checken
-	return frame:preprocess(t)
+	box = fbdata.frame:preprocess(box)
+	box = box .. com.returnStringCheck(box)
+--	mw.logObject(box, "box")
+	return box
 end
-function p.Bild( frame, args )
+function p.datenTab(fbdata)
-	t = frame:expandTemplate{title = 'Bildertab', args=args}
+--	mw.logObject(fbdata, "datenTab(fbdata)")
-    return t
+	--[[ Konsolenzeile zum Debuggen:
-end
+	fab=require("Modul:Faktenbox"); fbdata=fab.fbdata{pargs={
+		["Stadtbezirk"]="NSOW",
+		["Eingemeindungsdatum"]="1971/01/21",
+		["Stadtteil"]="BlaStadtteil",
+		["Fläche"]="123" }};
+	fbdata.klasse={"Stadtteil"}; fbdata.kategorie={"Stadtteil"}; fbdata.fullpagename="Espan"; fbdata.subpagename="Espan";
+	print(p.datenTab(fbdata))
+	]]
+	local t = ""
+	local bemerkungshinweis = ""
+	if fbdata.pargs["Fläche"] ~= nil or fbdata.pargs["Bevölkerung"] ~= nil or fbdata.pargs["Haushalte"] ~= nil then
+		bemerkungshinweis = "<sup>*)</sup>"
+	end
+	-- Zusammenbau
+	t = t .. "<dl class = 'dataTable'>"
+	t = t .. fab.zeileKategorieSeite(fbdata)
+	t = t .. fab.zeileDatum{attr_date = "Eingemeindungsdatum",	date = fbdata.pargs["Eingemeindungsdatum"] or "",	attr_text = "Eingemeindung",	attr_day = "Eingemeindungstag",	attr_year = "Eingemeindungsjahr"}
+	t = t .. fab.zeileDatum{attr_date = "Erschließungsdatum",	date = fbdata.pargs["Erschließungsdatum"] or "",	attr_text = "Erschließung",		attr_day = "Erschließungstag",	attr_year = "Erschließungsjahr"}
+	t = t .. fab.zeile{attr_name = "Ehemals",					fbdata = fbdata}
+	t = t .. fab.zeile{attr_name = "PLZ",						fbdata = fbdata,																					delimiter = ";"}
+	t = t .. fab.zeile{attr_name = "Stadtbezirk",				fbdata = fbdata}
+	t = t .. fab.zeile{attr_name = "Stadtteil",					fbdata = fbdata,									attr_text = "Gehört zu Stadtteil", 				delimiter = ";"}
+	t = t .. fab.zeile{attr_name = "StatistischerBezirk",		fbdata = fbdata,																					delimiter = ";"}
+	t = t .. fab.zeile{attr_name = "StatistischerDistrikt",		fbdata = fbdata,																					delimiter = ";"}
+	t = t .. fab.zeile{attr_name = "Fläche",					fbdata = fbdata,									attr_text = "Fläche" .. bemerkungshinweis,		val_prefix="ca.", val_postfix="km<sup>2</sup>"}
+	t = t .. fab.zeile{attr_name = "Bevölkerung",				fbdata = fbdata,									attr_text = "Bevölkerung" .. bemerkungshinweis,	val_prefix="ca."}
+	t = t .. fab.zeile{attr_name = "Haushalte",					fbdata = fbdata,									attr_text = "Haushalte" .. bemerkungshinweis,	val_prefix="ca."}
+	if bemerkungshinweis ~= "" then
+		t = t .. fab.zeile{attr_name = "Bemerkung",				attr_val = fbdata.pargs["Bemerkung"] or "", 		attr_text = "*)"}
+	end
+	t = t .. fab.zeileGeoDaten(fbdata)
+	t = t .. "</dl>"
+	t = t .. fab.zeileSemantikBrowsenAbfrage(fbdata)
-function p.Daten( frame, args )
+	-- Tab draus machen
-	t = frame:expandTemplate{title = 'Stadtteil.Daten', args=args}
+	t = fab.tab(t, "Daten")
+--	mw.logObject(t, "t")
      return t
 end
-function p.Karte ( frame, args )
+function p.kartenTab(fbdata)
-	t = frame:expandTemplate{title = 'Stadtteil.Karte', args=args}
+--	mw.logObject(fbdata, "kartenTab(fbdata)")
+	-- Konsolenzeile zum Debuggen:
+	-- fab=require("Modul:Faktenbox"); fbdata=fab.fbdata{pargs={["lat"]="49",["lon"]="11",["location"]="Altstadt, Fürth, Bayern, Deutschland",["geojson"]="Altstadt",["zoom"]="11",["GeoJsonKarte"]="Ja",["Debug"]="Ja"}}; fbdata.pagename="Altstadt"; print(p.kartenTab(fbdata))
+	local t = ""
+	if string.find(fbdata.pagename, ";") ~= nil then
+		t = t .. "Semikolon im Artikel-/Seitennamen für korrekte Kartendarstellung nicht erlaubt!"
+	else
+		-- Karten-Argumente übernehmen und aufbereiten
+		local args = fab.getKartenArgs(fbdata, 13, {"Ehemals"})
+		-- location ermitteln
+		if args["location"] == nil and not com.isTrue(args["Ehemals"]) then
+			-- suburb probieren
+			local location = "suburb " .. fbdata.pagename .. ",Fürth,Bayern,Deutschland"
+			local geocode = fbdata.frame:callParserFunction("#geocode", location)
+			if geocode == "Geocoding failed" then
+				-- nochmal nackt probieren, wenn keine Koordinate übergeben
+				if args["lat"] == nil or args["lon"] == nil then
+					location = fbdata.pagename .. ",Fürth,Bayern,Deutschland"
+					geocode = fbdata.frame:callParserFunction("#geocode", location)
+				end
+			end
+			if geocode ~= "Geocoding failed" then
+				args["location"] = location
+				args["geocode"] = geocode
+			end
+		end
+		-- Karte erstellen
+--		mw.logObject(args, "args")
+		t = t .. kar.karte(fbdata.frame, args)
+	end
+	-- Tab draus machen
+	t = fab.tab(t, "Karte")
+--	mw.logObject(t, "t")
 	return t
 end
 return p