Modul:Kommunfakta Belgien WD

local wikidata = require('Modul:Wikidata2').formatStatementsFromLualocal Ortsfaktarat = require('Modul:Ortsfakta').ratlocal namnversalisering = require('Modul:Textformatering').namnversaliseringlocal established = require('Modul:Ortsfakta/Aux').establishedp = {}function test(item, claim)local f = falsefor k, v in pairs(claim) doif v.item == item then return trueendendreturn falseendfunction test2(item, claim)local f = falsefor k, v in pairs(claim) doif v == item then return trueendendreturn falseendfunction p.ort( entity, args )local ill_kat = ''local a = {}table.insert(a, "{{Geobox\n| Region")local namn = args['namn'] if not namn or namn == '' thenif entity.labels and entity.labels.sv thennamn = entity.labels.sv.valueelsenamn = mw.title.getCurrentTitle().textendendlocal titel = 'Borgmästare'local huvud = 'Centralort'local lokalt = ''local nl = ''local fr = ''local de = ''if entity.labels thenif entity.labels.nl thennl = mw.getCurrentFrame():preprocess('{{Lang|nl|' .. entity.labels.nl.value .. '}}')endif entity.labels.fr thenfr = mw.getCurrentFrame():preprocess('{{Lang|fr|' .. entity.labels.fr.value .. '}}')endif entity.labels.de thende = mw.getCurrentFrame():preprocess('{{Lang|de|' .. entity.labels.de.value .. '}}')endendlocal fd = falsetable.insert(a, "\n| name = " .. namn)local v = wikidata({entity = entity, property = 'P31', avoidqualifier='P582', raw = 'true', noref = 'true'})if test('Q15273785', v) thentable.insert(a, "\n| category = [[Belgiens kommuner|Stadskommun]]")titel = '[[Borgmästare]]'huvud = '[[Centralort]]'elseif test('Q493522', v) thentable.insert(a, "\n| category = [[Belgiens kommuner|Kommun]]")titel = '[[Borgmästare]]'huvud = '[[Centralort]]'elseif test('Q91028', v) thentable.insert(a, "\n| category = [[Arrondissement#Belgiska arrondissement|Arrondissement]]")elseif test('Q83116', v) thentable.insert(a, "\n| category = [[Belgiens administrativa indelning#Provinser|Provins]]")titel = 'Guvernör'huvud = '[[Residensstad]]'elseif test('Q83057', v) thentable.insert(a, "\n| category = [[Belgiens administrativa indelning|Federal region]]")titel = '[[Ministerpresident]]'huvud = '[[Huvudstad]]'elsev = wikidata({entity = entity, property = 'P31', raw = 'true', noref = 'true'})if test('Q15273785', v) thentable.insert(a, "\n| category = Tidigare [[Belgiens kommuner|stadskommun]]")titel = '[[Borgmästare]]'huvud = '[[Centralort]]'elseif test('Q493522', v) thentable.insert(a, "\n| category = Tidigare [[Belgiens kommuner|kommun]]")titel = '[[Borgmästare]]'huvud = '[[Centralort]]'fd = trueelsetable.insert(a, "\n| category_hide = true")endendlocal bild = args.bildlocal bildtext = args.bildtextif not bild thenlocal data = wikidata({entity = entity, property = 'P18', raw = 'true', noref='true', enbarten = 'true', langpref = 'sv'})if data and #data > 0 thenbild = data[1].valuebildtext = data[1].bildtext or data[1].motivendendif bild and bild ~= '' thentable.insert(a, "\n| image         = " .. (bild or ''))if bildtext thentable.insert(a, "\n| image_caption = " .. (bildtext or ''))endif args['bildstorlek'] thentable.insert(a, "\n| image_size    = " .. args['bildstorlek'])endendlocal flagga = args.flaggaif flagga and flagga ~= '' thentable.insert(a, "\n| flag = " .. flagga)table.insert(a, "\n| flag_type = Flagga" )elseif not flagga thenlocal data = wikidata({entity = entity, property = 'P41', raw = 'true', noref='true', enbarten = 'true'})if data and #data > 0 thentable.insert(a, "\n| flag = " .. data[1].value)local data2 = wikidata({entity = entity, property = 'P163', raw = 'true', noref='true', enbarten = 'true'})if data2 and #data2 > 0 thentable.insert(a, "\n| flag_type = " .. data2[1].value)elsetable.insert(a, "\n| flag_type = Flagga" )endendendlocal vapen = args.vapen or args.vapenbildif vapen and vapen ~= '' thentable.insert(a, "\n| symbol      = " .. vapen )table.insert(a, "\n| symbol_type = [[Heraldiskt vapen|Vapen]]")elseif not vapen thenlocal data = wikidata({entity = entity, property = 'P94', raw = 'true', noref='true', enbarten = 'true'})local data2 = wikidata({entity = entity, property = 'P237', raw = 'true', noref='true', enbarten = 'true'})if data and #data > 0 thentable.insert(a, "\n| symbol = " .. data[1].value)if data2 and #data2 > 0 thentable.insert(a, "\n| symbol_type = " .. data2[1].value)elsetable.insert(a, "\n| symbol_type = [[Heraldiskt vapen|Vapen]]")endendendtable.insert(a, "\n| country       = Belgien")table.insert(a, "\n| country_flag  = 1")local level2 = nilif args.region and args.region ~= '' thentable.insert(a, "\n| state       = " .. args.region)table.insert(a, "\n| state_type  = [[Belgiens administrativa indelning|Federal region]]")if args.provins and args.provins ~= '' thentable.insert(a, "\n| region       = " .. args.provins)table.insert(a, "\n| region_type  = [[Belgiens administrativa indelning#Provinser|Provins]]")if args.arrondissement and args.arrondissement ~= '' thentable.insert(a, "\n| district       = " .. args.arrondissement)table.insert(a, "\n| district_type  = [[Arrondissement#Belgiska arrondissement|Arrondissement]]")endendelselocal v = USAharva(entity, {})if v and #v > 0 thentable.insert(a, "\n| state       = " .. v[#v].value )table.insert(a, "\n| state_type  = " .. v[#v].typ   )if #v > 1 thentable.insert(a, "\n| region       = " .. v[#v-1].value)table.insert(a, "\n| region_type  = " .. v[#v-1].typ  )level2 = v[#v-1].itemif #v > 2 thentable.insert(a, "\n| district       = " .. v[#v-2].value)table.insert(a, "\n| district_type  = " .. v[#v-2].typ  )endendif v[#v].item == 'Q240' or entity.id == 'Q240' then -- Bryssellokalt = fr .. '<br/>' .. nlelseif v[#v].item == 'Q231' or entity.id == 'Q231' then -- Vallonienlokalt = frelseif v[#v].item == 'Q234' or v[#v].item == 'Q9337' or entity.id == 'Q234' or entity.id == 'Q9337' then -- Flandernlokalt = nlendendendif args['lokaltnamn'] or args['lokalt_namn'] thentable.insert(a, "\n| other_name = " .. (args['lokaltnamn'] or args['lokalt_namn']) )elseif test2(entity.id, {'Q159868','Q159981','Q152737','Q160005','Q151831','Q159864','Q159958','Q152734','Q152748'}) then -- tyska gemenskapentable.insert(a, "\n| other_name = " .. de) elsetable.insert(a, "\n| other_name = " .. lokalt) endendif args.slogan thentable.insert(a, "\n| motto      = " .. args.slogan )table.insert(a, "\n| motto_type = [[Slogan]]" )elselocal data = wikidata({entity = entity, property = 'P6251', noref = 'noimport'})if data and data ~= '' thentable.insert(a, "\n| motto      = " .. data )table.insert(a, "\n| motto_type = [[Slogan]]" )endendif args.koordinat thentable.insert(a, "\n| location = " .. args.koordinat)endlocal elevation = args['höjdläge'] if elevation thentable.insert(a, "\n| elevation = " .. elevation)elselocal v = wikidata({entity=entity, property='P2044', enbarten = 'true', raw = 'true', convertunit='Q11573', noref='noimport'})if v and #v > 0 thenv = v[1]if tonumber(v.amount) thentable.insert(a, "\n| elevation = " .. math.abs( tonumber(v.amount)) )if tonumber(v.amount) < 0 thentable.insert(a, "\n| elevation_unit = muh" )elsetable.insert(a, "\n| elevation_unit = möh" )endif v.ref and v.ref ~= '' thentable.insert(a, "\n| elevation_note = " .. v.ref)endendendendlocal highest = args['högsta punkt namn'] if highest thentable.insert(a, "\n| highest = " .. highest )local highest_elevation = args['högsta punkt meter'] if highest_elevation thentable.insert(a, "\n| highest_elevation = " .. highest_elevation )endelselocal v = wikidata({entity=entity, property='P610', enbarten = 'true', raw = 'true'})if v and #v > 0 thentable.insert(a, "\n| highest = " .. v[1].value .. v[1].ref)local v2 = wikidata({entityId=v[1].item, property='P2044', enbarten = 'true', raw = 'true', convertunit='Q11573', noref='noimport'})if v2 and #v2 > 0 thenif tonumber(v2[1].amount) thentable.insert(a, "\n| highest_elevation = " .. math.abs( tonumber(v2[1].amount)) )if tonumber(v2[1].amount) < 0 thentable.insert(a, "\n| highest_elevation_unit = muh" )elsetable.insert(a, "\n| highest_elevation_unit = möh" )endtable.insert(a, "\n| highest_elevation_note = " .. v2[1].ref)endendv2 = wikidata({entityId=v[1].item, property='P625', enbarten = 'true', raw = 'true', noref = 'true', nogeodataparser = 'true'})if v2 and #v2 > 0 thenv2 = Ortsfaktarat(v2[1], 'sekund')table.insert(a, "\n| highest_lat_d   = " .. (v2.lat_g or ''))table.insert(a, "\n| highest_lat_m   = " .. (v2.lat_m or ''))table.insert(a, "\n| highest_lat_s   = " .. (v2.lat_s or ''))table.insert(a, "\n| highest_lat_NS  = " .. (v2.lat_NS or ''))table.insert(a, "\n| highest_long_d  = " .. (v2.long_g or ''))table.insert(a, "\n| highest_long_m  = " .. (v2.long_m or ''))table.insert(a, "\n| highest_long_s  = " .. (v2.long_s or ''))table.insert(a, "\n| highest_long_EW = " .. (v2.long_EW or ''))endendendlocal lowest = args['lägsta punkt namn'] if lowest thentable.insert(a, "\n| lowest = " .. lowest )local lowest_elevation = args['lägsta punkt meter'] if lowest_elevation thentable.insert(a, "\n| lowest_elevation = " .. lowest_elevation )endelselocal v = wikidata({entity=entity, property='P1589', enbarten = 'true', raw = 'true'})if v and #v > 0 thentable.insert(a, "\n| lowest = " .. v[1].value .. v[1].ref)local v2 = wikidata({entityId=v[1].item, property='P2044', enbarten = 'true', raw = 'true', convertunit='Q11573', noref='noimport'})if v2 and #v2 > 0 thenif tonumber(v2[1].amount) thentable.insert(a, "\n| lowest_elevation = " .. math.abs( tonumber(v2[1].amount)) )if tonumber(v2[1].amount) < 0 thentable.insert(a, "\n| lowest_elevation_unit = muh" )elsetable.insert(a, "\n| lowest_elevation_unit = möh" )endtable.insert(a, "\n| lowest_elevation_note = " .. v2[1].ref)endendv2 = wikidata({entityId=v[1].item, property='P625', enbarten = 'true', raw = 'true', noref = 'true', nogeodataparser = 'true'})if v2 and #v2 > 0 thenv2 = Ortsfaktarat(v2[1], 'sekund')table.insert(a, "\n| lowest_lat_d   = " .. (v2.lat_g or ''))table.insert(a, "\n| lowest_lat_m   = " .. (v2.lat_m or ''))table.insert(a, "\n| lowest_lat_s   = " .. (v2.lat_s or ''))table.insert(a, "\n| lowest_lat_NS  = " .. (v2.lat_NS or ''))table.insert(a, "\n| lowest_long_d  = " .. (v2.long_g or ''))table.insert(a, "\n| lowest_long_m  = " .. (v2.long_m or ''))table.insert(a, "\n| lowest_long_s  = " .. (v2.long_s or ''))table.insert(a, "\n| lowest_long_EW = " .. (v2.long_EW or ''))endendendlocal nordligt = nilif args.lat_dec or args.lat_g thennordligt = tonumber(args.lat_dec or args.lat_g)table.insert(a, "\n| lat_d   = " .. (args.lat_dec or args.lat_g))table.insert(a, "\n| lat_m   = " .. (args.lat_m or ''))table.insert(a, "\n| lat_s   = " .. (args.lat_s or ''))table.insert(a, "\n| lat_NS  = " .. (args.lat_NS or ''))table.insert(a, "\n| long_d  = " .. (args.long_dec or args.long_g or ''))table.insert(a, "\n| long_m  = " .. (args.long_m or ''))table.insert(a, "\n| long_s  = " .. (args.long_s or ''))table.insert(a, "\n| long_EW = " .. (args.long_EW or ''))elseif not args.koordinat thenlocal v = wikidata({entity = entity, property = 'P625', raw = 'true', noref='true', enbarten = 'true', nogeodataparser = 'true'})if v and #v > 0 thenv = Ortsfaktarat(v[1], 'sekund')if v thennordligt = tonumber(v.lat_g)table.insert(a, "\n| lat_d   = " .. (v.lat_g or ''))table.insert(a, "\n| lat_m   = " .. (v.lat_m or ''))table.insert(a, "\n| lat_s   = " .. (v.lat_s or ''))table.insert(a, "\n| lat_NS  = " .. (v.lat_NS or ''))table.insert(a, "\n| long_d  = " .. (v.long_g or ''))table.insert(a, "\n| long_m  = " .. (v.long_m or ''))table.insert(a, "\n| long_s  = " .. (v.long_s or ''))table.insert(a, "\n| long_EW = " .. (v.long_EW or ''))endendenda = established(entity, a, args) -- hämtar uppgifter om bildande, gränsjusteringar och upplösning mmtable.insert(a, '\n| timezone     = [[Centraleuropeisk tid|CET]] | utc_offset = +1 ')table.insert(a, '\n| timezone_DST = [[Centraleuropeisk tid|CEST]]| utc_offset_DST = +2')if args.postnummer thentable.insert(a, '\n| postal_code = ' .. args.postnummer)table.insert(a, '\n| postal_code_type = [[Postnummer#Belgien|Postnummer]]')elselocal v = wikidata({entity = entity, property = 'P281'})if v and v ~= '' thentable.insert(a, '\n| postal_code = ' .. v)table.insert(a, '\n| postal_code_type = [[Postnummer#Belgien|Postnummer]]')endendif args.riktnummer thentable.insert(a, '\n| area_code = ' .. args.riktnummer)table.insert(a, '\n| area_code_type = [[Riktnummer]]')elselocal v = wikidata({entity = entity, property = 'P473', noref='noimport'})if v and v ~= '' thentable.insert(a, '\n| area_code = ' .. v)table.insert(a, '\n| area_code_type = [[Riktnummer]]')endendif args.kommunkod and args.kommunkod ~= '' thentable.insert(a, '\n| code = ' .. args.kommunkod)table.insert(a, '\n| code_type = [[Kommunkod]]')elselocal data = wikidata({entity = entity, property = 'P1567', noref='noref', withintervall = 'yes', modifyqualifiertime = 'Y', conjunction = '<br/>', separator = '<br/>', rank = 'valid'})if data and #data > 0 thentable.insert(a, '\n| code = ' .. data)table.insert(a, '\n| code_type = [[Kommunkod]]')endendif args.nuts and args.nuts ~= '' thentable.insert(a, '\n| code1 = ' .. args.nuts)table.insert(a, '\n| code1_type = [[Nomenklatur för statistiska territoriella enheter|NUTS]]')elselocal data = wikidata({entity = entity, property = 'P605', noref='noref', withintervall = 'yes', modifyqualifiertime = 'Y', conjunction = '<br/>', separator = '<br/>', rank = 'valid'})if data and #data > 0 thentable.insert(a, '\n| code1 = ' .. data)table.insert(a, '\n| code1_type = [[Nomenklatur för statistiska territoriella enheter|NUTS]]')endendif args.iso31662 and args.iso31662 ~= '' thentable.insert(a, '\n| code2 = ' .. args.iso31662)table.insert(a, '\n| code2_type = [[ISO 3166-2]]')elselocal data = wikidata({entity = entity, property = 'P300', noref='noref', withintervall = 'yes', modifyqualifiertime = 'Y', conjunction = '<br/>', separator = '<br/>', rank = 'valid'})if data and #data > 0 thentable.insert(a, '\n| code2 = ' .. data)table.insert(a, '\n| code2_type = [[ISO 3166-2]]')endendlocal ledare = falselocal borg = args['borgmästare'] or args['ministerpresident'] or args['guvernör']if borg and borg ~= '' thenledare = truetable.insert(a, '\n| leader1 = ' .. borg)table.insert(a, '\n| leader1_type = ' .. titel)elseif not borg thenlocal data = wikidata({entity = entity, property = 'P6', withintervall = 'yes', modifyqualifiertime = 'Y', noref = 'noimport', raw = 'true', cat = 'true'})if data and #data > 0 thenledare = trueif data[1].tifr thentable.insert(a, '\n| leader1 = ' .. data[1].value .. '<small> (' .. data[1].tifr .. ')</small>')elsetable.insert(a, '\n| leader1 = ' .. data[1].value )endif data[1].parti and data[1].parti ~= '' thentable.insert(a, '\n| leader1_party = ' .. data[1].parti)endtable.insert(a, '\n| leader1_type = ' .. titel )if data[1].ref thentable.insert(a, '\n| leader1_note = ' .. data[1].ref)endendendif ledare thentable.insert(a, '\n| leader = &nbsp;')table.insert(a, '\n| leader_type = Politik')endlocal y1 = falselocal y2 = falselocal area = args.ytaif area and area ~= '' thentable.insert(a, "\n| area = " .. area)if args['yta_datum'] thentable.insert(a, "\n| area_date = " .. args['yta_datum'])endif args['yta_ref'] thentable.insert(a, "\n| area_note = " .. args['yta_ref'])endif args['yta_land'] thentable.insert(a, "\n| area_land = " .. args['yta_land'])y1 = trueif args['yta_land_datum'] thentable.insert(a, "\n| area_land_date = " .. args['yta_land_datum'])endif args['yta_land_ref'] thentable.insert(a, "\n| area_land_note = " .. args['yta_land_ref'])endendif args['yta_vatten'] thentable.insert(a, "\n| area_water = " .. args['yta_vatten'])if args['yta_vatten_datum'] thentable.insert(a, "\n| area_water_date = " .. args['yta_vatten_datum'])endif args['yta_land_ref'] thentable.insert(a, "\n| area_water_note = " .. args['yta_vatten_ref'])endendelseif not area then-- area totallocal v = wikidata({entity = entity, property = "P2046", sortbytime = 'chronological', enbarten = 'yes', raw = 'true', preferqualifier ='P518', rank = 'valid', preferqualifiervalue = 'Q16868672', modifyqualifiertime = 'Y', convertunit = 'Q712226', noref='noimport'})if not v or #v == 0 then -- area total, utan qualifier om ovan inte funkadev = wikidata({entity = entity, property = "P2046", sortbytime = 'chronological', enbarten = 'yes', raw = 'true', avoidqualifier='P518', rank = 'valid', modifyqualifiertime = 'Y', convertunit = 'Q712226', noref='noimport'})endif v and #v > 0 theny1 = truetable.insert(a, "\n| area = " .. tonumber(plus(v[1].amount)))table.insert(a, "\n| area_decimals = 2")if v[1].datum and v[1].datum ~= '' thentable.insert(a, "\n| area_date = " .. v[1].datum)endif v[1].ref thentable.insert(a, "\n| area_note = " .. v[1].ref)endendlocal v2 = wikidata({entity = entity, property = "P2046", sortbytime = 'chronological', enbarten = 'yes', raw = 'true', preferqualifier ='P518', rank = 'valid', preferqualifiervalue = 'Q205895', modifyqualifiertime = 'Y', convertunit = 'Q712226', noref='true'})local v4 = wikidata({entity = entity, property = "P2046", sortbytime = 'chronological', enbarten = 'yes', raw = 'true', preferqualifier ='P518', rank = 'valid', preferqualifiervalue = 'Q23397', convertunit = 'Q712226', noref='true', modifyqualifiertime = 'Y'}) -- insjövattenlocal v5 = wikidata({entity = entity, property = "P2046", sortbytime = 'chronological', enbarten = 'yes', raw = 'true', preferqualifier ='P518', rank = 'valid', preferqualifiervalue = 'Q4022', convertunit = 'Q712226', noref='true', modifyqualifiertime = 'Y'}) -- floderif v2 and #v2 > 0 thenlocal land = tonumber(plus(v2[1].amount))if v4 and #v4 > 0 thenland = land - tonumber(plus(v4[1].amount))endif v5 and #v5 > 0 thenland = land - tonumber(plus(v5[1].amount))endtable.insert(a, "\n| area_land = " .. land )y1 = truetable.insert(a, "\n| area_land_decimals = 2")if v2[1].datum and v2[1].datum ~= '' thentable.insert(a, "\n| area_land_date = " .. v2[1].datum)endendlocal vatten = 0local v3 = wikidata({entity = entity, property = "P2046", sortbytime = 'chronological', enbarten = 'yes', raw = 'true', preferqualifier ='P518', rank = 'valid', preferqualifiervalue = 'Q213204', convertunit = 'Q712226', noref='true', modifyqualifiertime = 'Y'})if v3 and #v3 > 0 thenvatten = vatten + tonumber(plus(v3[1].amount))endif v4 and #v4 > 0 thenvatten = vatten + tonumber(plus(v4[1].amount))endif v5 and #v5 > 0 thenvatten = vatten + tonumber(plus(v5[1].amount))endif vatten > 0 thentable.insert(a, "\n| area_water = " .. vatten)table.insert(a, "\n| area_water_decimals = 2")if v3[1] and v3[1].datum and v4[1] and v4[1].datum and v5[1] and v5[1].datum and v3[1].datum == v4[1].datum and v3[1].datum == v5[1].datum thentable.insert(a, "\n| area_water_date = " .. v3[1].datum)endendendlocal inv = args['folkmängd']if inv and inv ~= '' thentable.insert(a, "\n| population = " .. inv)y2 = trueif args.invdatum thentable.insert(a, "\n| population_date = " .. args['folkmängd_datum'] )endif args.invref thentable.insert(a, "\n| population_note = " .. args['folkmängd_ref'] )endelseif not inv thenlocal v = wikidata({entity = entity, property='P1082', sortbytime = 'chronological', enbarten = 'yes', raw = 'true', avoidqualifier='P518', noref='noimport', modifyqualifiertime = 'Y'})if v and v[1] and v[1].amount thentable.insert(a, "\n| population = " .. tonumber(plus(v[1].amount)))y2 = trueif v[1].datum thentable.insert(a, "\n| population_date = " .. v[1].datum)endif v[1].ref thentable.insert(a, "\n| population_note = " .. v[1].ref)endendendif y1 and y2 thentable.insert(a, "\n| population_density = auto")endlocal central = args.residensstad or args.centralort or args.huvudstadif central and central ~= '' thentable.insert(a, "\n| capital = " .. central)table.insert(a, "\n| capital_type = " .. huvud)elseif not residensstad thenlocal v = wikidata({entity = entity, property='P36', noref='true'})if v and v ~= '' thentable.insert(a, "\n| capital = " .. v)table.insert(a, "\n| capital_type = " .. huvud)endendif args.geonames thentable.insert(a, '\n| geonames = ' .. args.geonames)endif args.karta and args.karta ~= '' thenif args['positionskarta'] thentable.insert(a, '\n| map_locator     = ' .. args['positionskarta'])endtable.insert(a, '\n| map           = ' .. (args.karta or ''))table.insert(a, '\n| map_caption   = ' .. (args.karttext or 'Översiktskarta'))elseif not args.karta thendata = wikidata({entity = entity, property = 'P1943', raw = 'true', noref='true', enbarten = 'true'})if not data or #data == 0 thendata = wikidata({entity = entity, property = 'P242', raw = 'true', noref='true', enbarten = 'true'})endif data and #data > 0 then table.insert(a, '\n| map   = ' .. data[1].value)if data[1].bildtext thentable.insert(a, '\n| map_caption   = ' .. data[1].bildtext)elsetable.insert(a, '\n| map_caption   = Översiktskarta')endelsetable.insert(a, '\n| map_locator = Belgien')table.insert(a, '\n| map         = Belgium location map.svg')table.insert(a, '\n| map_caption = Läge i Belgien')endendif args.karta2 thenif args.positionskarta2 thentable.insert(a, '\n| map2_locator = ' .. args.positionskarta2 )endtable.insert(a, '\n| map2         = ' .. args.karta2)table.insert(a, '\n| map2_caption = ' .. args.karta2text)if args.karta2storlek thentable.insert(a, '\n| map2_size     = ' .. args.karta2storlek)endelseif level2 thenlocal data = wikidata({entityId = level2, property = 'P242', raw = 'true', noref='true', enbarten = 'true'})if data and #data > 0 thentable.insert(a, '\n| map2   = ' .. data[1].value)if level2 == 'Q90870' thentable.insert(a, '\n| map2_caption   = Brussel-Hoofdstads läge i Belgien')elsetable.insert(a, '\n| map2_caption   = Provinsens läge i Belgien')endendendlocal kmlfaktaruta = require('Modul:KML faktaruta').mainlocal k = kmlfaktaruta(entity)if k thentable.insert(a, '\n| KML                   = ' .. k)endif args.fotnot and args.fotnot ~= '' thentable.insert(a, '\n| footnotes         = ' .. args.fotnot ..  '<br />[[d:'.. entity.id .. '|Redigera Wikidata]]')elsetable.insert(a, '\n| footnotes         = [[d:'.. entity.id .. '|Redigera Wikidata]]')endif args.commons thentable.insert(a, '\n| commons               = ' .. args.commons)elsetable.insert(a, '\n| commons               = ' .. Comcat(entity))endif args.hemsida and args.hemsida ~= '' thentable.insert(a, '\n| website = ' .. args.hemsida)elseif not args.hemsida and not fd thenlocal v = wikidata({entity = entity, property = "P856", enbarten = 'yes', noref='true'})if v and v ~= '' thentable.insert(a, '\n| website = ' .. v)endendtable.insert(a, '\n}}')return mw.getCurrentFrame():preprocess(table.concat(a))endfunction USAharva(entity, s)local v = wikidata({entity = entity, property = 'P131', noref = 'true', raw = 'true', avoidqualifier='P582'})if not v or #v == 0 or v[1].item == 'Q31' then return selseif #v > 1 then -- bypass en nivå om den innhåller mer än en p131local entity2 = mw.wikibase.getEntityObject( v[1].item )return USAharva( entity2, s)elselocal entity2 = mw.wikibase.getEntityObject( v[1].item )local flag = wikidata({entity = entity2, property = 'P41', noref = 'true', enbarten = 'true'})local p31 = wikidata({entity = entity2, property = 'P31', noref = 'true'})local p32 = wikidata({entity = entity2, property = 'P31', noref = 'true', raw = true})if test("Q91028", p32) thenp31 = '[[Arrondissement#Belgiska arrondissement|Arrondissement]]'elseif test("Q83116", p32) thenp31 = '[[Belgiens administrativa indelning#Provinser|Provins]]'elseif test('Q83057', p32) thenp31 = '[[Belgiens administrativa indelning|Federal region]]'elsep31 = p31 .. '[[Kategori:Underhållskategori för Ortsfakta WD|B]]'endtable.insert(s, {item = v[1].item, flag = flag, typ = p31, value = v[1].value}) -- return USAharva( entity2, s)endendfunction Comcat(entity)if not entity or not entity.claims or not entity.claims.P373 thenreturn ''elseif entity.claims.P373[1].mainsnak.snaktype ~= 'value' thenreturn ''elsereturn entity.claims.P373[1].mainsnak.datavalue.valueendendendfunction plus(a)if string.sub(a, 1, 1) == '+' thenreturn string.sub(a, 2)endreturn aendreturn p