| line |
true |
false |
branch |
|
31
|
34 |
17 |
unless ref $schema_ids eq 'ARRAY'
|
|
33
|
0 |
51 |
unless @$schema_ids
|
|
39
|
0 |
51 |
unless my $schemas = $dbrh->select(-'table', 'dbr_schemas', -'fields', 'schema_id handle display_name', -'where', {'schema_id', ['d in', @{$schema_ids;}]})
|
|
51
|
0 |
51 |
unless 'DBR::Config::Table'->load('session', $$self{'session'}, 'instance', $instance, 'schema_id', \@schema_ids)
|
|
67
|
0 |
82 |
unless my $schema_id = $params{'schema_id'}
|
|
68
|
0 |
82 |
unless $SCHEMAS_BY_ID{$schema_id}
|
|
70
|
0 |
82 |
unless my $name = $params{'name'}
|
|
71
|
0 |
82 |
unless my $table_id = $params{'table_id'}
|
|
82
|
0 |
17 |
unless my $schema_id = $params{'schema_id'}
|
|
83
|
0 |
17 |
unless my $class = $params{'class'}
|
|
84
|
0 |
17 |
unless my $guid = $params{'guid'}
|
|
102
|
0 |
259 |
unless $$self{'session'}
|
|
104
|
82 |
177 |
if ($params{'schema_id'}) { }
|
|
|
177 |
0 |
elsif ($params{'handle'}) { }
|
|
107
|
0 |
177 |
unless $$self{'schema_id'} = $SCHEMAS_BY_HANDLE{$params{'handle'}}
|
|
112
|
0 |
259 |
unless $SCHEMAS_BY_ID{$$self{'schema_id'}}
|
|
119
|
0 |
258 |
unless my $tname = shift()
|
|
123
|
0 |
258 |
unless my $table = 'DBR::Config::Table'->new('session', $$self{'session'}, 'table_id', $table_id)
|
|
137
|
0 |
0 |
unless my $table = 'DBR::Config::Table'->new('session', $$self{'session'}, 'table_id', $table_id)
|
|
145
|
0 |
0 |
wantarray ? :
|
|
154
|
0 |
0 |
unless my $instance = 'DBR::Config::Instance'->lookup('session', $$self{'session'}, 'guid', $guid)
|
|
168
|
0 |
0 |
unless my $instance = 'DBR::Config::Instance'->lookup('session', $$self{'session'}, 'guid', $guid)
|
|
176
|
0 |
0 |
wantarray ? :
|
|
188
|
0 |
0 |
unless my $schema = $SCHEMAS_BY_ID{$$self{'schema_id'}}
|
|
194
|
0 |
0 |
unless my $schema = $SCHEMAS_BY_ID{$$self{'schema_id'}}
|