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
37
38
39
40
41
42
43
44
45
46
|
#
# Access every record in a Registry result record.
# Set the test description string.
votest.descr = "Access every record in a Registry result record"
print ("------------------------------------------------------------------")
print ("Req 3.3: Users shall have access to all information in the query")
print (" return record.")
print ("------------------------------------------------------------------")
fcache init
# -------------------------------------------
# Execute the test commands.
# -------------------------------------------
# -------------------------------------------
# Using the REGISTRY task we can print all
# fields in the record as follows:
# -------------------------------------------
registry ("noao", verbose+, record=2, interactive-)
printf ("\n\n")
# -------------------------------------------
# Programmatically this is done as follows:
# -------------------------------------------
int ires, icount
ires = regSearch ("noao", 0)
icount = regResCount (ires)
printf ("\nFound %d records:\n\n", icount)
printf ("Num %10.10s %s\n", "ShortName", "Title")
printf ("--- %10.10s %s\n", "---------", "-----")
for (i=0; i < icount; i=i+1) {
printf ("%3d %10.10s %s\n", (i+1),
trim(regValue (ires, "ShortName", i)),
trim(regValue (ires, "Title", i))
}
|
