| line | % | coverage | branch |
|---|
| 86 | 0 | T | F | unless $kohafield |
| 87 | 0 | T | F | unless $authtypecode |
| 110 | 0 | T | F | if ('C4::Context'->preference('NoZebra')) { } |
| 124 | 0 | T | F | if (@$value[$i]) |
| 125 | 0 | T | F | if (@$tags[$i] =~ /mainentry|mainmainentry/) { } |
| 130 | 0 | T | F | if (@$operator[$i] eq 'is') { } |
| 0 | T | F | elsif (@$operator[$i] eq '=') { } |
| 0 | T | F | elsif (@$operator[$i] eq 'start') { } |
| 131 | 0 | T | F | @$tags[$i] ? : |
| 133 | 0 | T | F | @$tags[$i] ? : |
| 135 | 0 | T | F | @$tags[$i] ? : |
| 137 | 0 | T | F | @$tags[$i] ? : |
| 145 | 0 | T | F | if ($dosearch) { } |
| 161 | 0 | T | F | if ($sortby eq 'HeadingDsc') { } |
| 175 | 0 | T | F | if $numbers < $offset + $length |
| 216 | 0 | T | F | if ($n > 1) |
| 226 | 0 | T | F | if (@$value[$i]) |
| 227 | 0 | T | F | if (@$tags[$i] eq 'mainmainentry') { } |
| 0 | T | F | elsif (@$tags[$i] eq 'mainentry') { } |
| 0 | T | F | elsif (@$tags[$i] eq 'any') { } |
| 0 | T | F | elsif (@$tags[$i] eq 'match') { } |
| 0 | T | F | elsif (@$tags[$i] eq 'match-heading') { } |
| 0 | T | F | elsif (@$tags[$i] eq 'see-from') { } |
| 0 | T | F | elsif (@$tags[$i] eq 'thesaurus') { } |
| 248 | 0 | T | F | if (@$operator[$i] eq 'is') { } |
| 0 | T | F | elsif (@$operator[$i] eq '=') { } |
| 0 | T | F | elsif (@$operator[$i] eq 'start') { } |
| 0 | T | F | elsif (@$operator[$i] eq 'exact') { } |
| 275 | 0 | T | F | if (defined $query and $query =~ /\S+/) { } |
| 276 | 0 | T | F | defined $q2 ? : |
| 282 | 0 | T | F | $sortby eq 'HeadingDsc' ? : |
| 0 | T | F | $sortby eq 'HeadingAsc' ? : |
| 289 | 0 | T | F | $query ? : |
| 290 | 0 | T | F | if $orderstring |
| 292 | 0 | T | F | unless $offset |
| 294 | 0 | T | F | unless $length |
| 303 | 0 | T | F | if $ev == ZOOM::Event::ZEND() |
| 306 | 0 | T | F | if ($error) |
| 317 | 0 | T | F | if ($nbresults > 0) |
| 335 | 0 | T | F | if (not $skipmetadata) |
| 345 | 0 | T | F | if ($mainentry) |
| 359 | 0 | T | F | if (not $skipmetadata) |
| 385 | 0 | T | F | if ('C4::Context'->preference('NoZebra')) { } |
| 395 | 0 | T | F | if ($err) |
| 444 | 0 | T | F | unless defined $record |
| 504 | 0 | T | F | if defined $record->field($field) |
| 519 | 0 | T | F | unless $record and $record->field('001') |
| 557 | 0 | T | F | unless $authtypecode |
| 559 | 0 | T | F | $forlibrarian == 1 ? : |
| 566 | 0 | T | F | unless $total > 0 |
| 578 | 0 | T | F | $forlibrarian || !$libopac ? : |
| 608 | 0 | T | F | $forlibrarian || !$libopac ? : |
| 641 | 0 | T | F | if (uc 'C4::Context'->preference('marcflavour') eq 'UNIMARC') { } |
| 651 | 0 | T | F | if (not $f5) { } |
| 659 | 0 | T | F | if ($format eq 'MARC21') |
| 660 | 0 | T | F | if (not $record->leader) |
| 663 | 0 | T | F | if (not $record->field('003')) |
| 669 | 0 | T | F | if (not $record->field('008')) |
| 672 | 0 | T | F | if (not $default_008 or length $default_008 < 34) { } |
| 681 | 0 | T | F | if (not $record->field('040')) |
| 691 | 0 | T | F | if ($format eq 'UNIMARCAUTH') |
| 692 | 0 | T | F | unless $record->leader |
| 694 | 0 | T | F | if (my $string = $record->subfield('100', 'a')) { } |
| 0 | T | F | elsif ($record->field('100')) { } |
| 708 | 0 | T | F | if (not $authid and $format eq 'MARC21') |
| 712 | 0 | T | F | if (my $field = $record->field($auth_type_tag)) { } |
| 721 | 0 | T | F | if (not $authid) { } |
| 727 | 0 | T | F | unless ($record->field('001') and $record->field('001')->data eq $authid) |
| 735 | 0 | T | F | if ($auth_exists > 0) { } |
| 737 | 0 | T | F | unless $record->field('001') |
| 740 | 0 | T | F | unless $sth->execute($authtypecode, $record->as_usmarc, $record->as_xml_record($format), $authid) |
| 747 | 0 | T | F | if 'C4::Context'->preference('AuthoritiesLog') |
| 766 | 0 | T | F | if 'C4::Context'->preference('AuthoritiesLog') |
| 792 | 0 | T | F | if (not 'C4::Context'->preference('dontmerge') eq '1') { } |
| 800 | 0 | T | F | if 'C4::Context'->preference('AuthoritiesLog') |
| 815 | 0 | T | F | if (uc 'C4::Context'->preference('marcflavour') eq 'UNIMARC') { } |
| 848 | 0 | T | F | 'C4::Context'->preference('marcflavour') eq 'UNIMARC' ? : |
| 850 | 0 | T | F | if $@ |
| 852 | 0 | T | F | if ('C4::Context'->preference('marcflavour') eq 'MARC21') |
| 873 | 0 | T | F | if (defined $authtypecode) |
| 877 | 0 | T | F | if (my $res = $sth->fetchrow_hashref) |
| 909 | 0 | T | F | if ($record->field($auth_tag_to_report)) |
| 911 | 0 | T | F | if $$_[0] =~ /[A-z]/ |
| 916 | 0 | T | F | if (not defined $error and @{$results;}) |
| 942 | 0 | T | F | if ($authtypecode) |
| 969 | 0 | T | F | if ($summary and 'C4::Context'->preference('marcflavour') eq 'UNIMARC') { } |
| 978 | 0 | T | F | if ($tag < 10) { } |
| 979 | 0 | T | F | if ($tag eq '001') |
| 991 | 0 | T | F | if $localsummary ne $summary |
| 1008 | 0 | T | F | if ('C4::Context'->preference('marcflavour') eq 'UNIMARC') { } |
| 1019 | 0 | T | F | if ($field->subfield('2')) |
| 1027 | 0 | T | F | if ($field->subfield('5') and $field->subfield('a') and $field->subfield('5') eq 'g') { } |
| 0 | T | F | elsif ($field->subfield('5') and $field->as_string and $field->subfield('5') eq 'h') { } |
| 0 | T | F | elsif ($field->subfield('a')) { } |
| 1044 | 0 | T | F | $notes ? : |
| 1045 | 0 | T | F | if $broaderterms |
| 1046 | 0 | T | F | if $narrowerterms |
| 1047 | 0 | T | F | if $seealso |
| 1048 | 0 | T | F | if $see |
| 1049 | 0 | T | F | if $seeheading |
| 1055 | 0 | T | F | if '152' eq $field->tag |
| 1058 | 0 | T | F | if ($record->field('100')) { } |
| 0 | T | F | elsif ($record->field('110')) { } |
| 0 | T | F | elsif ($record->field('111')) { } |
| 0 | T | F | elsif ($record->field('130')) { } |
| 0 | T | F | elsif ($record->field('148')) { } |
| 0 | T | F | elsif ($record->field('150')) { } |
| 0 | T | F | elsif ($record->field('151')) { } |
| 0 | T | F | elsif ($record->field('155')) { } |
| 0 | T | F | elsif ($record->field('180')) { } |
| 0 | T | F | elsif ($record->field('181')) { } |
| 0 | T | F | elsif ($record->field('182')) { } |
| 0 | T | F | elsif ($record->field('185')) { } |
| 1096 | 0 | T | F | if $summary |
| 1123 | 0 | T | F | if ($$data{'authtrees'} and not $force) { } |
| 1130 | 0 | T | F | unless $record |
| 1132 | 0 | T | F | if ($field->subfield('5') and $field->subfield('5') eq 'g') |
| 1134 | 0 | T | F | if $subfauthid eq $authid |
| 1140 | 0 | T | F | if ($trees =~ /;/) { } |
| 1154 | 0 | T | F | unless $hierarchies |
| 1183 | 0 | T | F | unless $record |
| 1190 | 0 | T | F | if ($subfauthid and $field->subfield('5') and $field->subfield('a')) |
| 1191 | 0 | T | F | if ($field->subfield('5') eq 'h') { } |
| 0 | T | F | elsif ($field->subfield('5') eq 'g') { } |
| 1200 | 0 | T | F | if scalar @loopparents > 0 |
| 1201 | 0 | T | F | if scalar @loopchildren > 0 |
| 1202 | 0 | T | F | if scalar @loopparents > 0 |
| 1203 | 0 | T | F | if scalar @loopchildren > 0 |
| 1206 | 0 | T | F | if $authid eq $authid_constructed |
| 1267 | 0 | T | F | if scalar $MARCfrom->fields == 0 |
| 1268 | 0 | T | F | if scalar $MARCto->fields == 0 |
| 1277 | 0 | T | F | if $MARCto->field($auth_tag_to_report_to) |
| 1279 | 0 | T | F | if $MARCfrom->field($auth_tag_to_report_from) |
| 1284 | 0 | T | F | if ('C4::Context'->preference('NoZebra')) { } |
| 1292 | 0 | T | F | if ($_ =~ /(\d+),.*/) |
| 1307 | 0 | T | F | if ($oResult) |
| 1335 | 0 | T | F | if ($authtypecodeto ne $authtypecodefrom) |
| 1350 | 0 | T | F | if ($auth_number == $mergefrom) |
| 1351 | 0 | T | F | $tag_to ? : |
| 1371 | 0 | T | F | if ($bibliotag < 10) { } |
| 1377 | 0 | T | F | unless ($biblionumber) |
| 1381 | 0 | T | F | if ($update == 1) |
| 1384 | 0 | T | F | if $counteditedbiblio % 10 and $ENV{'DEBUG'} |
| 1455 | 0 | T | F | @_ ? : |
| 1458 | 0 | T | F | if (defined $tag and defined $subfield and $tag != 0 and $subfield ne '' and $subfield ne ' ') { } |
| 1461 | 0 | T | F | if ('C4::Context'->preference('marcflavour') eq 'MARC21') { } |