Hi-
I noticed when a transaction fails my files arent getting closed.
maybe the db is getting closed...not sure.
Is there a way so after the error message pops up on the screen telling
me the reason
the transaction failed I can clean up ?
thanks,
marvin
db eval { begin transaction; }
db eval " $getval "
if {$mode > 0 } {
db eval " INSERT INTO t1 ($str) select * from $tbl " } else {
db eval " INSERT INTO t1 select * from $tbl " }
db eval " drop table $tbl; "
db eval " $getval1 "
db eval " INSERT INTO $tbl select * from t1 "
db eval { drop table t1 }
while { ![eof $resultfile3] } {
# tk_messageBox -message [gets $resultfile3]
db eval "[gets $resultfile3]" }
db eval { commit; }
db close
close $resultfile1
close $resultfile2
close $resultfile3
