Module:CommunityProjectList
From MaRDI portal
Documentation for this module may be created at Module:CommunityProjectList/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 = {}
-- Function to convert JSON results into a comma-separated string
function p.convertJsonToCommaSeparatedList(jsonResults)
local resultsString = ""
if jsonResults and jsonResults.results and jsonResults.results.bindings then
local bindings = jsonResults.results.bindings
for i = 0, #bindings do
local binding = bindings[i]
if binding.internal_project_id and binding.internal_project_id.value then
if resultsString ~= "" then
resultsString = resultsString .. ""
end
local name = binding.internal_project_id.value
if string.find(name, "https://") then
name = "Unnamed Publication"
end
local link = "https://mathplus.de/research-2/"
local nameAndLink = "<li>[" .. link .. " " .. name .. "]</li>"
resultsString = resultsString .. nameAndLink
end
end
end
return "<ul> " .. resultsString .. " </ul>"
end
-- Function to build the list
function p.buildProjectList(frame)
-- Retrieve target1 from frame arguments or return error message if not set
local target1 = frame.args[1]
if not target1 or target1 == '' then
return "No records found"
end
-- Constructing the SPARQL query with dynamic entity target1
local sparqlQuery = [[
PREFIX target1: <https://portal.mardi4nfdi.de/entity/]] .. target1 .. [[>
PREFIX wdt: <https://portal.mardi4nfdi.de/prop/direct/>
PREFIX wd: <https://portal.mardi4nfdi.de/entity/>
SELECT DISTINCT ?internal_project_id
WHERE {
?work wdt:P1495 target1: .
?work wdt:P31 wd:Q6205094 . # Checks that "instance of" is "scientific project"
OPTIONAL {
?work wdt:P1507 ?internal_project_id .
}
SERVICE wikibase:label { bd:serviceParam wikibase:language "[AUTO_LANGUAGE],en". }
}
ORDER BY ?internal_project_id
]]
mw.log( sparqlQuery )
-- Executing the SPARQL query and retrieving results in JSON format
local jsonResults = sparql.runQuery(sparqlQuery)
mw.logObject(jsonResults)
-- 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
local describedByList = p.convertJsonToCommaSeparatedList(jsonResults)
-- mw.log(describedByList)
return describedByList
end
-- Return the created html table
return p