| line | % | coverage | branch |
|---|
| 44 | 50 | T | F | if (scalar @_ > 1) { } |
| 47 | 0 | T | F | if (not grep /$key/, @valid_label_params) |
| 54 | 50 | T | F | if (not grep /$_/, @valid_label_params) |
| 83 | 0 | T | F | if ($sth->err) |
| 90 | 0 | T | F | if ($sth1->err) |
| 96 | 0 | T | F | $barcode_only ? : |
| 103 | 100 | T | F | $_ eq 'callnumber' ? : |
| 107 | 50 | T | F | if $error |
| 125 | 100 | T | F | unless (scalar @parts) |
| 130 | 50 | T | F | if $debug |
| 144 | 50 | T | F | unless (scalar @parts) |
| 149 | 100 | T | F | if ($parts[0] =~ /^([-a-zA-Z]+)\s?($possible_decimal)$/) |
| 155 | 50 | T | F | if $debug |
| 167 | 100 | T | F | if (not $parts[-1] =~ /^.*\d-\d.*$/ and $parts[-1] =~ /^(.*\d+)(\D.*)$/) |
| 171 | 50 | T | F | unless (scalar @parts) |
| 175 | 50 | T | F | if $debug |
| 196 | 0 | T | F | if ($f =~ /^'(.*)'.*/) { } |
| 0 | T | F | elsif ($f =~ /^($match_kohatable).*/) { } |
| 0 | T | F | elsif ($f =~ /^([0-9a-z]{3})(\w)(\W?).*?/) { } |
| 203 | 0 | T | F | if ($$item{$f}) { } |
| 206 | 0 | T | F | if $debug |
| 216 | 0 | T | F | if (@marcfield) |
| 217 | 0 | T | F | if ($field eq $itemtag) { } |
| 220 | 0 | T | F | if ($itemfield->subfield($itemsubfieldcode) eq $$item{'itemnumber'}) |
| 221 | 0 | T | F | if ($itemfield->subfield($subf)) { } |
| 231 | 0 | T | F | if ($marcfield[0]->subfield($subf)) { } |
| 292 | 0 | T | F | if $debug |
| 330 | 0 | T | F | if ($$self{'guidebox'}) |
| 344 | 0 | T | F | if (_check_params(@_) eq 1) |
| 348 | 0 | T | F | if (exists $$self{$attr}) { } |
| 365 | 0 | T | F | if ($$self{'printing_type'} =~ /BIB/) |
| 372 | 0 | T | F | if ($$self{'printing_type'} =~ /BAR/) |
| 380 | 0 | T | F | if $label_text |
| 395 | 0 | T | F | $$item{'cn_source'} ? : |
| 398 | 0 | T | F | if ($$field{'code'} eq 'itemtype') { } |
| 399 | 0 | T | F | 'C4::Context'->preference('item-level_itypes') ? : |
| 404 | 0 | T | F | $font =~ /T/ ? : |
| 0 | T | F | $$field{'code'} eq 'title' ? : |
| 406 | 0 | T | F | if ($field_data) |
| 413 | 0 | T | F | if (grep {$$field{'code'} =~ /$_/;} @callnumber_list and $$self{'printing_type'} eq 'BIB' and $$self{'callnum_split'}) { } |
| 414 | 0 | T | F | if ($cn_source eq 'lcc' or $cn_source eq 'nlm') { } |
| 0 | T | F | elsif ($cn_source eq 'ddc') { } |
| 416 | 0 | T | F | if not @label_lines |
| 417 | 0 | T | F | if not @label_lines |
| 420 | 0 | T | F | if not @label_lines |
| 421 | 0 | T | F | if not @label_lines |
| 428 | 0 | T | F | if ($field_data) |
| 436 | 0 | T | F | if ($$field{'code'} eq 'title' and scalar @line >= 2) { } |
| 449 | 0 | T | F | if $line eq '' |
| 451 | 0 | T | F | if ($$self{'justify'} eq 'R') { } |
| 0 | T | F | elsif ($$self{'justify'} eq 'C') { } |
| 483 | 0 | T | F | if not $params{'barcode_data'} |
| 484 | 0 | T | F | if not $params{'barcode_type'} |
| 491 | 0 | T | F | if ($params{'barcode_type'} =~ /CODE39/) { } |
| 0 | T | F | elsif ($params{'barcode_type'} eq 'COOP2OF5') { } |
| 0 | T | F | elsif ($params{'barcode_type'} eq 'INDUSTRIAL2OF5') { } |
| 495 | 0 | T | F | if ($params{'barcode_type'} eq 'CODE39MOD') { } |
| 0 | T | F | elsif ($params{'barcode_type'} eq 'CODE39MOD10') { } |
| 516 | 0 | T | F | if ($@) |
| 534 | 0 | T | F | if ($@) |
| 552 | 0 | T | F | if ($@) |