Module:CitesFormula

Documentation for this module may be created at Module:CitesFormula/doc

-- Required module containing helper methods
local helper = require('Module:HelperMethods')

-- Required modules for SPARQL queries and HTML table generation
local sparql = require('SPARQL')
local mwHtml = require('mw.html')

-- Main table to hold all functions
local p = {}

local function replaceItemWithFormulaLink(dataTable)
    -- Check if the data table is valid
    if not dataTable or type(dataTable) ~= 'table' then
        return nil, "Invalid data table"
    end

    -- Iterate through each row in the table
    for i, row in ipairs(dataTable) do
        -- Check if the row has at least three columns
        if #row >= 1 then
            -- Replace "Item:Q" with "Formula:" in the third column
            row[1] = row[1]:gsub("entity/Q", "wiki/Formula:")
        end
    end

    return dataTable
end


-- Function to build a HTML table from SPARQL query results
function p.buildTableFromSparql(frame)
	
    -- Retrieve target1 from frame arguments or return error message if not set
	local target = frame.args[1]
    if not target or target == '' then
        return "No records found"
    end    

    -- Constructing the SPARQL query with dynamic entity target1
    local sparqlQuery = [[
PREFIX target: <https://portal.mardi4nfdi.de/entity/]] .. target .. [[>

SELECT ?value ?valueLabel ?valueTypeLabel
WHERE {
    ?value wdt:P1456 target: .
    ?value wdt:P31 ?valueType .
    OPTIONAL {
        ?value rdfs:label ?valueLabel .
        FILTER(LANG(?valueLabel) = "en")
    }
    SERVICE wikibase:label { bd:serviceParam wikibase:language "[AUTO_LANGUAGE],en". }
}
    ]]

	-- Executing the SPARQL query and retrieving results in JSON format
	local jsonResults = sparql.runQuery(sparqlQuery)

	-- Handle error in SPARQL query execution
	if jsonResults and jsonResults.error then
    	mw.log("Error in SPARQL query: " .. tostring(jsonResults.error))
    	return nil
	end
	
	if not jsonResults then
        return "Could not fetch data."
	end

	if helper.countElementsInBindings(jsonResults.results.bindings) == 0 then
        return "No records found."
	end

	-- Convert the JSON results into a Lua table
	local dataTable = helper.convertJsonToTable(jsonResults)
	dataTable = replaceItemWithFormulaLink(dataTable)

	-- Create and return a HTML table from the data
    local headers = {"Resource", "Type"}

    -- return helper.createHtmlTableWithMergedCols(dataTable, headers, {{1, 3}})
    return helper.createHtmlTableWithMergedCols(dataTable, headers, {{1, 2}})
    
end

-- Return the created html table
return p