Lines Matching refs:txn
73 set txn ""
77 set t [$env txn]
78 error_check_good txn [is_valid_txn $t $env] TRUE
79 set txn "-txn $t"
81 set dbc [eval {$db cursor} $txn]
91 set ret [eval {$db put} $txn $pflags \
98 $txn $pflags {$str [chop_data $method $datastr]}]
106 test033_recno.check $db $dbc $method $str $txn $key
108 test033_check $db $dbc $method $str $txn $ndups
123 test033_recno.check $db $dbc $method $str $txn $key
125 test033_check $db $dbc $method $str $txn $ndups
133 error_check_good txn [$t commit] 0
139 proc test033_recno.check {db dbc method str txn key} {
140 set ret [eval {$db get} $txn {-recno $key}]
150 proc test033_check {db dbc method str txn ndups} {
154 set ret [eval {$db get} $txn {-get_both $str $datastr}]
169 set ret [eval {$db get} $txn {-get_both $str $datastr}]