Lines Matching refs:fd

18   set fd [open $sqlfile r]
19 set sql [string trim [read $fd [file size $sqlfile]]]
20 close $fd
78 set fd [open clear.sql w]
79 puts $fd {
83 close $fd
86 set fd [open 2kinit.sql w]
87 puts $fd {
91 close $fd
94 set fd [open nosync-init.sql w]
95 puts $fd {
99 close $fd
131 set fd [open test$cnt.sql w]
132 puts $fd "CREATE TABLE t1(a INTEGER, b INTEGER, c VARCHAR(100));"
135 puts $fd "INSERT INTO t1 VALUES($i,$r,'[number_name $r]');"
137 close $fd
142 set fd [open test$cnt.sql w]
143 puts $fd "BEGIN;"
144 puts $fd "CREATE TABLE t2(a INTEGER, b INTEGER, c VARCHAR(100));"
147 puts $fd "INSERT INTO t2 VALUES($i,$r,'[number_name $r]');"
149 puts $fd "COMMIT;"
150 close $fd
155 set fd [open test$cnt.sql w]
159 puts $fd "SELECT count(*), avg(b) FROM t2 WHERE b>=$lwr AND b<$upr;"
161 close $fd
166 set fd [open test$cnt.sql w]
168 puts $fd "SELECT count(*), avg(b) FROM t2 WHERE c LIKE '%[number_name $i]%';"
170 close $fd
175 set fd [open test$cnt.sql w]
176 puts $fd {CREATE INDEX i2a ON t2(a);}
177 puts $fd {CREATE INDEX i2b ON t2(b);}
178 close $fd
183 set fd [open test$cnt.sql w]
187 puts $fd "SELECT count(*), avg(b) FROM t2 WHERE b>=$lwr AND b<$upr;"
189 close $fd
194 set fd [open test$cnt.sql w]
195 puts $fd "BEGIN;"
199 puts $fd "UPDATE t1 SET b=b*2 WHERE a>=$lwr AND a<$upr;"
201 puts $fd "COMMIT;"
202 close $fd
207 set fd [open test$cnt.sql w]
208 puts $fd "BEGIN;"
211 puts $fd "UPDATE t2 SET b=$r WHERE a=$i;"
213 puts $fd "COMMIT;"
214 close $fd
218 set fd [open test$cnt.sql w]
219 puts $fd "BEGIN;"
222 puts $fd "UPDATE t2 SET c='[number_name $r]' WHERE a=$i;"
224 puts $fd "COMMIT;"
225 close $fd
230 set fd [open test$cnt.sql w]
231 puts $fd "BEGIN;"
232 puts $fd "INSERT INTO t1 SELECT * FROM t2;"
233 puts $fd "INSERT INTO t2 SELECT * FROM t1;"
234 puts $fd "COMMIT;"
235 close $fd
240 set fd [open test$cnt.sql w]
241 puts $fd {DELETE FROM t2 WHERE c LIKE '%fifty%';}
242 close $fd
247 set fd [open test$cnt.sql w]
248 puts $fd {DELETE FROM t2 WHERE a>10 AND a<20000;}
249 close $fd
254 set fd [open test$cnt.sql w]
255 puts $fd {INSERT INTO t2 SELECT * FROM t1;}
256 close $fd
261 set fd [open test$cnt.sql w]
262 puts $fd {BEGIN;}
263 puts $fd {DELETE FROM t1;}
266 puts $fd "INSERT INTO t1 VALUES($i,$r,'[number_name $r]');"
268 puts $fd {COMMIT;}
269 close $fd
274 set fd [open test$cnt.sql w]
275 puts $fd {DROP TABLE t1;}
276 puts $fd {DROP TABLE t2;}
277 close $fd