Module:Sandbox/ProcrastinatingReader/ib: Difference between revisions

Revision as of 12:25, 5 December 2020

Latest revision as of 13:37, 5 December 2020

(5 intermediate revisions by the same user not shown)

Line 2:

local p = {}

local function isempty(s)

return s == nil or s == ''

end

local function dataValue(frame, settlementName, parameterName, itemName)

Line 10 ⟶ 14:

end

local function getNetValue(frame, argCategory, argName)

local args = getArgs(frame)

local argType = args['arg_type'] and (args['arg_type']..'_') or ''

local netparamName = args['area_'..argTypeargCategory..'_'..argName] or dataValue(frame, args['subdivision_name'], 'area_'..argType..'_'..argName, args['name'])

local net = args[paramName] or dataValue(frame, args['subdivision_name'], paramName, args['name'])

return net

end

Line 34 ⟶ 41:

local args = getArgs(frame)

local km2argCategory = getNetValue(frame, 'km2area')

local ha = getNetValue(frame, 'ha')

local acre = getNetValue(frame, 'acre')

local sqmi = getNetValue(frame, 'sq_mi')

local dunam = getNetValue(frame, 'dunam')

local km2 = getNetValue(frame, argCategory, 'km2')

if km2 or ha or acre or sqmi or dunam then

local ha = getNetValue(frame, argCategory, 'ha')

local acre = getNetValue(frame, argCategory, 'acre')

local sqmi = getNetValue(frame, argCategory, 'sq_mi')

local dunam = getNetValue(frame, argCategory, 'dunam')

if not (isempty(km2) and isempty(ha) and isempty(acre) and isempty(sqmi) and isempty(dunam)) then

return frame:expandTemplate{ title = 'infobox_settlement/areadisp', args = {

['km2'] = km2,

Line 55 ⟶ 64:

return ""

end

end

function p.demographics(frame)

local args = getArgs(frame)

local tArgs = {

['child'] = 'yes',

['headerstyle'] = 'text-align:left',

}

for i = 1,2 do

local dtype = getNetValue(frame, 'demographics', 'type'..i)

if not isempty(dtype) then

local series = i + 20 * (i-1)

tArgs['header'..series] = dtype..'<div style="font-weight:normal;display:inline;">'.. getNetValue(frame, 'demographics1', 'footnotes') ..'</div>'

tArgs['rowclass'..series] = 'mergedtoprow'

for j = 1,10 do

local dval = getNetValue(frame, 'demographics1', 'title'..j)

if not isempty(dval) then

tArgs['rowclass'..(series + j)] = 'mergedrow'

tArgs['label'..(series + j)] = '&nbsp;•&nbsp;'..getNetValue(frame, 'demographics1', 'title'..j)

tArgs['data'..(series + j)] = getNetValue(frame, 'demographics1', 'info'..j)

end

end

end

end

return frame:expandTemplate{ title = 'infobox', args = tArgs}

end

function p.generic(frame)

local args = getArgs(frame)

local paramName = args['param_name']

return getNetValue(frame, 'area', paramName)

end