Lines Matching refs:fd

15   set fd [open $sqlfile r]
16 set sql [string trim [read $fd [file size $sqlfile]]]
17 close $fd
75 set fd [open clear.sql w]
76 puts $fd {
80 close $fd
83 set fd [open 2kinit.sql w]
84 puts $fd {
88 close $fd
91 set fd [open nosync-init.sql w]
92 puts $fd {
96 close $fd
128 set fd [open test$cnt.sql w]
129 puts $fd "CREATE TABLE t1(a INTEGER, b INTEGER, c VARCHAR(100));"
132 puts $fd "INSERT INTO t1 VALUES($i,$r,'[number_name $r]');"
134 close $fd
139 set fd [open test$cnt.sql w]
140 puts $fd "BEGIN;"
141 puts $fd "CREATE TABLE t2(a INTEGER, b INTEGER, c VARCHAR(100));"
144 puts $fd "INSERT INTO t2 VALUES($i,$r,'[number_name $r]');"
146 puts $fd "COMMIT;"
147 close $fd
152 set fd [open test$cnt.sql w]
156 puts $fd "SELECT count(*), avg(b) FROM t2 WHERE b>=$lwr AND b<$upr;"
158 close $fd
163 set fd [open test$cnt.sql w]
165 puts $fd "SELECT count(*), avg(b) FROM t2 WHERE c LIKE '%[number_name $i]%';"
167 close $fd
172 set fd [open test$cnt.sql w]
173 puts $fd {CREATE INDEX i2a ON t2(a);}
174 puts $fd {CREATE INDEX i2b ON t2(b);}
175 close $fd
180 set fd [open test$cnt.sql w]
184 puts $fd "SELECT count(*), avg(b) FROM t2 WHERE b>=$lwr AND b<$upr;"
186 close $fd
191 set fd [open test$cnt.sql w]
192 puts $fd "BEGIN;"
196 puts $fd "UPDATE t1 SET b=b*2 WHERE a>=$lwr AND a<$upr;"
198 puts $fd "COMMIT;"
199 close $fd
204 set fd [open test$cnt.sql w]
205 puts $fd "BEGIN;"
208 puts $fd "UPDATE t2 SET b=$r WHERE a=$i;"
210 puts $fd "COMMIT;"
211 close $fd
215 set fd [open test$cnt.sql w]
216 puts $fd "BEGIN;"
219 puts $fd "UPDATE t2 SET c='[number_name $r]' WHERE a=$i;"
221 puts $fd "COMMIT;"
222 close $fd
227 set fd [open test$cnt.sql w]
228 puts $fd "BEGIN;"
229 puts $fd "INSERT INTO t1 SELECT * FROM t2;"
230 puts $fd "INSERT INTO t2 SELECT * FROM t1;"
231 puts $fd "COMMIT;"
232 close $fd
237 set fd [open test$cnt.sql w]
238 puts $fd {DELETE FROM t2 WHERE c LIKE '%fifty%';}
239 close $fd
244 set fd [open test$cnt.sql w]
245 puts $fd {DELETE FROM t2 WHERE a>10 AND a<20000;}
246 close $fd
251 set fd [open test$cnt.sql w]
252 puts $fd {INSERT INTO t2 SELECT * FROM t1;}
253 close $fd
258 set fd [open test$cnt.sql w]
259 puts $fd {BEGIN;}
260 puts $fd {DELETE FROM t1;}
263 puts $fd "INSERT INTO t1 VALUES($i,$r,'[number_name $r]');"
265 puts $fd {COMMIT;}
266 close $fd
271 set fd [open test$cnt.sql w]
272 puts $fd {DROP TABLE t1;}
273 puts $fd {DROP TABLE t2;}
274 close $fd