aboutsummaryrefslogtreecommitdiff
path: root/vo/votest/tests/req_4.5.cl
blob: a35ace57a2591a1cd91b634cf7f84ee4a2179bbd (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
#
#  Select DAL results for download.

# Set the test description string.
votest.descr = "Select DAL results for download"

print ("------------------------------------------------------------------")
print ("Req  4.5:  Users shall be able to select which data returned by a")
print ("	   DAL service query is to be downloaded to local disk.")
print ("------------------------------------------------------------------")


fcache init

# Execute the test commands.

string  ofn1, ofn2

ofn1 = mktemp ("tmp$req45")
ofn2 = mktemp ("tmp$req45") // ".fits"

# Get an SIA service result.
getimg ("dss", "m83", size=0.1, output=ofn1, format="raw")

# Select only the FITS data.  Note the use of the column name here
# implies some knowledge of the table schema.
tselect (ofn1, ofn2, expr="Format ?= 'fits'")

# Print the URLs we would like to download.
tdump (ofn2, columns="URL", cdfile="",  pfile="",  datafile="STDOUT")

# Clean up.
delete (ofn1, verify-, >& "dev$null")
delete (ofn2, verify-, >& "dev$null")