about summary refs log tree commit diff
diff options
context:
space:
mode:
authorMunyoki Kilyungi2023-05-23 16:07:11 +0300
committerBonfaceKilz2023-05-26 08:40:22 +0300
commit7d9964474deaea4e06dcc8a415c0bcbc316c24b4 (patch)
tree2215235d96daceb9ec8ca74e132182a91863433e
parent8076e5c096d709e707927b1bad7090063dc68ce0 (diff)
downloadgn-transform-databases-7d9964474deaea4e06dcc8a415c0bcbc316c24b4.tar.gz
Return an empty string if a dataset doesn't have a name
Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
-rwxr-xr-xexamples/dump-genotype.scm2
-rwxr-xr-xexamples/dump-phenotype.scm7
-rwxr-xr-xexamples/dump-probeset.scm2
3 files changed, 6 insertions, 5 deletions
diff --git a/examples/dump-genotype.scm b/examples/dump-genotype.scm
index 13e4885..cffa917 100755
--- a/examples/dump-genotype.scm
+++ b/examples/dump-genotype.scm
@@ -74,7 +74,7 @@
          (ontology 'dataset:
                    (regexp-substitute/global
                     #f "[^A-Za-z0-9:]"
-                    (field GenoFreeze Name)
+                    (field ("IFNULL(GenoFreeze.Name, '')" DatasetName))
                     'pre "_" 'post)))
     (set gn:chrNum
          (annotate-field
diff --git a/examples/dump-phenotype.scm b/examples/dump-phenotype.scm
index 08d5127..5f8cd94 100755
--- a/examples/dump-phenotype.scm
+++ b/examples/dump-phenotype.scm
@@ -91,9 +91,10 @@
     (set gn:sequence (annotate-field (field PublishXRef Sequence) '^^xsd:int))
     (set gn:phenotypeOfDataset
          (ontology 'dataset:
-                   (regexp-substitute/global #f "[^A-Za-z0-9:]"
-                                             (field PublishFreeze Name)
-                                             'pre "_" 'post)))
+                   (regexp-substitute/global
+                    #f "[^A-Za-z0-9:]"
+                    (field ("IFNULL(PublishFreeze.Name, '')" DatasetName))
+                    'pre "_" 'post)))
     (set gn:phenotypeOfPublication
          (let ((pmid (field
                       ("IF(Publication.PubMed_ID IS NULL, '', CONVERT(Publication.PubMed_Id, INT))"
diff --git a/examples/dump-probeset.scm b/examples/dump-probeset.scm
index 0b37514..a71f708 100755
--- a/examples/dump-probeset.scm
+++ b/examples/dump-probeset.scm
@@ -44,7 +44,7 @@
           'probeset:
           (regexp-substitute/global
            #f "[^A-Za-z0-9:]"
-           (field ProbeSetFreeze Name)
+           (field ("IFNULL(ProbeSetFreeze.Name, '')" DatasetName))
            'pre "_" 'post)))
     (set gn:mean (annotate-field (field ("IFNULL(ProbeSetXRef.mean, '')" mean))
                                  '^^xsd:double))