Modul:Stadtteil: Unterschied zwischen den Versionen

fix attr_text
Keine Bearbeitungszusammenfassung
(fix attr_text)
 
(42 dazwischenliegende Versionen von 3 Benutzern werden nicht angezeigt)
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.getFbdata(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 t = p.kartenTab(fbdata) .. -- Karten-Tab muss vor Tabs mit zeileGeoDaten() sein
tpl_daten = p.Daten( frame, args )
fab.bildTab(fbdata) .. p.datenTab(fbdata)
tab_daten='<tab name=Daten>' ..  
t = fab.factbox_header_footer(t)
tpl_daten .. '</tab>'
 
-- Stadtteil-spezifische Kategorien usw.
t ='<div class=factbox><tabs>' ..  
t = t .. "[[Kategorie:" .. fbdata.pagename .. "|*]]"
  tab_karte ..
  tab_bild ..
  tab_daten ..
  '</tabs></div>'


-- Use preprocess to render the factbox and all contens at once
-- Sonstige gemeinsame Dinge anfügen (Klasse, Formular, Kategorien, Wartung, ...)
return frame:preprocess(t)
t = t .. fab.postprocess(fbdata)
-- Pre-Processing
-- mw.logObject(t, "t")
t = fbdata.frame:preprocess(t)
return t
end
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 .. fab.zeileKategorieSeite(fbdata)
t = t .. fab.zeileDatum{fbdata = fbdata, attr_date = "Eingemeindungsdatum", date = fbdata.pargs["Eingemeindungsdatum"], attr_text = "Eingemeindung", attr_day = "Eingemeindungstag", attr_year = "Eingemeindungsjahr"}
t = t .. fab.zeileDatum{fbdata = fbdata, attr_date = "Erschließungsdatum", date = fbdata.pargs["Erschließungsdatum"], attr_text = "Erschließung", attr_day = "Erschließungstag", attr_year = "Erschließungsjahr"}
t = t .. fab.zeile{fbdata = fbdata, attr_name = "Ehemals"}
t = t .. fab.zeile{fbdata = fbdata, attr_name = "PLZ", delimiter = ";"}
t = t .. fab.zeile{fbdata = fbdata, attr_name = "Stadtbezirk"}
t = t .. fab.zeile{fbdata = fbdata, attr_name = "Stadtteil", delimiter = ";"}
t = t .. fab.zeile{fbdata = fbdata, attr_name = "StatistischerBezirk", delimiter = ";"}
t = t .. fab.zeile{fbdata = fbdata, attr_name = "StatistischerDistrikt", delimiter = ";"}
t = t .. fab.zeile{fbdata = fbdata, attr_name = "Fläche", attr_text = "Fläche" .. bemerkungshinweis, val_prefix="ca.", val_postfix="km<sup>2</sup>"}
t = t .. fab.zeile{fbdata = fbdata, attr_name = "Bevölkerung", attr_text = "Bevölkerung" .. bemerkungshinweis, val_prefix="ca."}
t = t .. fab.zeile{fbdata = fbdata, attr_name = "Haushalte", attr_text = "Haushalte" .. bemerkungshinweis, val_prefix="ca."}
if bemerkungshinweis ~= "" then
t = t .. fab.zeile{fbdata = fbdata, attr_name = "Bemerkung", attr_val = fbdata.pargs["Bemerkung"], attr_text = "*)"}
end
t = t .. fab.zeileGeoDaten(fbdata)
t = fab.table_header_footer(t)
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
     return t
end
end


function p.Karte ( frame, args )
function p.kartenTab(fbdata)
t = frame:expandTemplate{title = 'Kartentab', 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)
-- 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
end
end
-- Karte erstellen
-- mw.logObject(args, "args")
local t_karte
t_karte, fbdata.geoobjects = kar.karte(fbdata.frame, args)
t = t .. t_karte
end
-- Tab draus machen
t = fab.tab(t, "Karte")
-- mw.logObject(t, "t")
return t
return t
end
end


return p
return p