Condition Coverage

File:C4/Biblio.pm
Coverage:0.0%

line%coveragecondition
2470
ABCdec
0XX0
10X0
1100
1111
defined $options and exists $$options{'defer_marc_save'} and $$options{'defer_marc_save'}
3060
ABCdec
00X0
0100
0111
1XX1
scalar $field->subfields == 0 or scalar $field->subfields == 1 and $field->subfield('9')
3150
ABdec
000
011
1X1
not $frameworkcode or $frameworkcode eq 'Default'
4910
ABdec
0X0
100
111
defined $current_link and $current_link eq $authid
5260
ABdec
0X0
100
111
$$row{'subfieldcode'} ne '' and $field->subfield($$row{'subfieldcode'})
7750
Adec
00
11
$1 || 0
7760
Adec
00
11
$2 || ''
8030
ABdec
0X0
100
111
$calculated and not $hasputtextbefore
8400
ABdec
0X0
100
111
$calculated and not $hasputtextbefore
9290
ABdec
0X0
100
111
defined $marc_structure_cache and exists $$marc_structure_cache{$forlibrarian}{$frameworkcode}
9480
ABdec
000
011
1X1
$forlibrarian || !$libopac
9810
ABdec
000
011
1X1
$forlibrarian || !$libopac
10160
Adec
00
11
shift @_ || ''
10400
ABdec
0X0
100
111
$kohafield and defined $frameworkcode
10610
Adec
00
11
shift @_ || 0
11820
Adec
00
11
$record->subfield('700', 'a') || ''
11830
Adec
00
11
$record->subfield('700', 'b') || ''
11960
Adec
00
11
$record->subfield('210', 'd') || ''
11970
Adec
00
11
$record->subfield('210', 'c') || ''
11980
Adec
00
11
$record->subfield('010', 'a') || ''
11990
Adec
00
11
$record->subfield('011', 'a') || ''
12160
Adec
00
11
$record->subfield('245', 'b') || ''
12190
Adec
00
11
$record->field('008') || ''
12210
Adec
00
11
$record->subfield('773', 'z') || ''
12220
Adec
00
11
$record->subfield('773', 'x') || ''
12240
ABdec
000
011
1X1
$record->subfield('773', 't') || $record->subfield('773', 'a')
12260
ABdec
000
011
1X1
$record->subfield('773', 't') || $record->subfield('773', 'a') || ''
12350
Adec
00
11
$record->subfield('260', 'c') || ''
12360
Adec
00
11
$record->subfield('260', 'b') || ''
12370
Adec
00
11
$record->subfield('020', 'a') || ''
12380
Adec
00
11
$record->subfield('022', 'a') || ''
13610
ABdec
0X0
100
111
$opac && $$data{'lib_opac'}
13800
ABCdec
0000
0011
01X1
1XX1
$marcflavour eq 'MARC21' or $marcflavour eq 'UNIMARC' or $marcflavour eq 'NORMARC'
15230
ABdec
0X0
100
111
$field->tag >= $mintag and $field->tag <= $maxtag
15340
ABdec
0X0
100
111
$marcflavour eq 'UNIMARC' and $$subject_subfield[0] =~ /2|3|4|5/
15370
ABdec
0X0
100
111
$marcflavour eq 'MARC21' and $$subject_subfield[0] =~ /2/
15860
ABdec
000
011
1X1
$marcflavour eq 'MARC21' or $marcflavour eq 'NORMARC'
15980
ABdec
0X0
100
111
$field->tag >= $mintag and $field->tag <= $maxtag
16090
ABdec
0X0
100
111
$marcflavour eq 'UNIMARC' and $$authors_subfield[0] =~ /3|5/
16250
ABdec
0X0
100
111
$marcflavour eq 'UNIMARC' and $$authors_subfield[0] eq '4'
16300
ABdec
0X0
100
111
$marcflavour eq 'UNIMARC' and $$authors_subfield[0] =~ /4/
16940
ABCDdec
00000
00011
001X1
01XX1
1XXX1
$link || $s3 || 'C4::Context'->preference('URLLinkText') || $url
16960
ABdec
0X0
100
111
defined $s3 and $s3 =~ /^[Tt]able/
16980
ABCdec
0000
0011
01X1
1XX1
$field->subfield('2') || 'C4::Context'->preference('URLLinkText') || $url
18010
Adec
00
11
$marcflavour ||= 'MARC21'
18020
ABdec
000
011
1X1
$marcflavour eq 'MARC21' or $marcflavour eq 'NORMARC'
18920
Adec
00
11
$marcflavour ||= 'MARC21'
18980
ABdec
000
011
1X1
$marcflavour eq 'MARC21' or $marcflavour eq 'NORMARC'
19980
ABCdec
0XX0
10X0
1100
1111
'C4::Context'->preference('marcflavour') eq 'UNIMARC' and @$tags[$i] eq '100' and @$subfields[$i] eq 'a'
20030
ABCdec
0000
0011
01X1
1XX1
$enc eq '01' or $enc eq '50' or $enc eq '03'
20320
ABCdec
0XX0
10X0
1100
1111
@$tags[$i] and @$tags[$i] > 10 and @$values[$i] ne ''
20820
ABdec
0X0
100
111
'C4::Context'->preference('marcflavour') eq 'UNIMARC' and not $unimarc_and_100_exist
21100
ABdec
000
011
1X1
not defined $s or $s eq ''
22050
ABdec
0X0
100
111
defined $params[$j] and $params[$j] =~ /_code_/
22120
ABdec
0X0
100
111
$fval ne '' and $newfield
22470
Adec
00
11
$limit_table || 0
22550
ABdec
0X0
100
111
defined $limit_table and $limit_table eq 'items'
22740
ABCdec
00X0
0100
0111
1X00
1X11
$key eq 'biblionumber' || $key eq 'biblioitemnumber' and $field->data eq ''
22930
ABCdec
00X0
0100
0111
1X00
1X11
$key eq 'biblionumber' || $key eq 'biblioitemnumber' and $value eq ''
23080
ABdec
0X0
100
111
$temp =~ /c(\d\d\d\d)/ and $1 > 0
23190
ABdec
0X0
100
111
$temp =~ /c(\d\d\d\d)/ and $1 > 0
23870
ABdec
000
011
1X1
$column eq 'cn_sort' or $column eq 'cn_source'
27090
ABdec
000
011
1X1
$index{$key} =~ /$tag\*/ or $index{$key} =~ /$tag$subfieldcode/
27200
ABdec
0X0
100
111
defined $result{$key}{$_} and $result{$key}{$_} =~ /$biblionumber,$title\-(\d);/
28240
ABdec
000
011
1X1
$index{$key} =~ /$tag\*/ or $index{$key} =~ /$tag$subfieldcode/
28370
ABdec
0X0
100
111
exists $result{$key}{$_} and $result{$key}{"$_"} =~ /$biblionumber,\Q$title\E\-(\d+);/
28750
Adec
00
11
$result{'__RAW__'}{"$_"} || ''
30890
ABdec
000
011
1X1
$dbh->errstr or not $$biblio{'biblionumber'}
33540
ABdec
0X0
100
111
$string and length $record->subfield(100, 'a') == 36
34360
ABdec
0X0
100
111
defined $$tagslib{$tag}{$subfield}{'authorised_value'} and exists $$bibliolevel_authorised_values{$$tagslib{$tag}{$subfield}{'authorised_value'}}