blob: 2ba294f8c339eac043a311db649b41d2c81318f3 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
# TBSELECT -- Select records from an APPHOT/DAOPHOT STSDAS table based
# on the value of an expression.
procedure tbselect (intable, outtable, expr)
file intable {"", prompt = "Input apphot/daophot tables database(s)"}
file outtable {"", prompt = "Output apphot/daophot tables database(s)"}
string expr {"", prompt = "Boolean expression for record selection"}
begin
# Declare the local variables.
string tintable, touttable, texpr
# Get the positional parameters.
tintable = intable
touttable = outtable
texpr = expr
tselect (tintable, touttable, texpr)
end
|
