| line |
true |
false |
branch |
|
27
|
0 |
636 |
unless $$self{'conn'}
|
|
28
|
0 |
636 |
unless $$self{'instance'}
|
|
31
|
0 |
636 |
unless defined $$self{'schema'}
|
|
34
|
0 |
636 |
unless $$self{'dbrv1'} = 'DBR::Interface::DBRv1'->new('session', $$self{'session'}, 'instance', $$self{'instance'})
|
|
54
|
0 |
42 |
unless $method =~ /[^A-Z]/
|
|
55
|
0 |
42 |
unless $$self{'schema'}
|
|
57
|
0 |
42 |
unless my $table = $$self{'schema'}->get_table($method)
|
|
59
|
0 |
42 |
unless my $object = 'DBR::Interface::Object'->new('session', $$self{'session'}, 'instance', $$self{'instance'}, 'table', $table)
|
|
71
|
0 |
17 |
if $$self{'_intran'}
|
|
75
|
0 |
17 |
if ($conn->b_intrans and not $conn->b_nestedTrans)
|
|
81
|
0 |
17 |
unless $conn->begin
|
|
89
|
0 |
17 |
unless $$self{'_intran'}
|
|
93
|
0 |
17 |
if ($$self{'_faketran'})
|
|
100
|
0 |
17 |
unless $conn->commit
|
|
108
|
0 |
0 |
unless $$self{'_intran'}
|
|
111
|
0 |
0 |
if ($$self{'_faketran'})
|
|
119
|
0 |
0 |
unless $conn->rollback
|
|
131
|
0 |
0 |
unless $name
|
|
143
|
0 |
0 |
unless defined $row
|
|
144
|
0 |
0 |
unless $row
|
|
148
|
0 |
0 |
unless $self->update(-'table', $table, -'fields', {$field2, ['d', $id + 1]}, -'where', {$field1, $name})
|
|
167
|
0 |
636 |
if $$self{'_intran'}
|