aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xexamples/dump-dataset-metadata.scm3
1 files changed, 3 insertions, 0 deletions
diff --git a/examples/dump-dataset-metadata.scm b/examples/dump-dataset-metadata.scm
index afbec75..cf0504a 100755
--- a/examples/dump-dataset-metadata.scm
+++ b/examples/dump-dataset-metadata.scm
@@ -95,6 +95,7 @@
(schema-triples
(gn:dataset rdfs:range rdfs:Literal)
(gn:datasetOfInvestigator rdfs:domain gn:dataset)
+ (gn:datasetOfOrganization rdfs:domain gn:dataset)
(gn:datasetOfInvestigator rdfs:range foaf:Person)
(gn:datasetOfInbredSet rdfs:domain gn:dataset)
(gn:datasetOfInbredSet rdfs:range gn:inbredSet)
@@ -139,6 +140,8 @@
(investigator-attributes->id (field Investigators FirstName)
(field Investigators LastName)
(field Investigators Email)))
+ (set gn:datasetOfOrganization
+ (field ("CAST(CONVERT(BINARY CONVERT(Organizations.OrganizationName USING latin1) USING utf8) AS VARCHAR(1500))" Organizations)))
(set gn:accessionId (string-append "GN" (number->string
(field InfoFiles GN_AccesionId))))
(set gn:datasetStatusName (string-downcase