aboutsummaryrefslogtreecommitdiff
path: root/vo/votest/tests/votable_003.cl
diff options
context:
space:
mode:
Diffstat (limited to 'vo/votest/tests/votable_003.cl')
-rw-r--r--vo/votest/tests/votable_003.cl30
1 files changed, 30 insertions, 0 deletions
diff --git a/vo/votest/tests/votable_003.cl b/vo/votest/tests/votable_003.cl
new file mode 100644
index 00000000..5fe2a7b3
--- /dev/null
+++ b/vo/votest/tests/votable_003.cl
@@ -0,0 +1,30 @@
+#
+# Get a value from a VOTable cell
+
+# Set the test description string.
+votest.descr = "TABLES support: Get a value from a VOTable cell"
+
+# Convert the data$logical to a local path.
+s1 = data_url // "/usno-b.xml"
+s2 = "file://" // data_path // "/usno-b.xml"
+s3 = "file:///localhost" // data_path // "/usno-b.xml"
+
+
+fcache init
+
+# Execute the test commands.
+print ("\nLogical Path: data$usno-b.xml") # logical path
+tabpar ("data$usno-b.xml", "I2", 10)
+print ("cell value at (I2,10) = ", tabpar.value)
+
+print ("\nHTTP URI: " // s1) # remote http URI
+tabpar (s1, "I2", 10)
+print ("cell value at (I2,10) = ", tabpar.value)
+
+print ("\nFile URI: " // s2) # file URI
+tabpar (s2, "I2", 10)
+print ("cell value at (I2,10) = ", tabpar.value)
+
+print ("\nFile URI: " // s3) # file URI
+tabpar (s3, "I2", 10)
+print ("cell value at (I2,10) = ", tabpar.value)