| 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 |
| 195 | 0 | T | F | if ($f =~ /^'(.*)'.*/) { } |
| 0 | T | F | elsif ($f =~ /^($match_kohatable).*/) { } |
| 0 | T | F | elsif ($f =~ /^([0-9a-z]{3})(\w)(\W?).*?/) { } |
| 202 | 0 | T | F | if ($$item{$f}) { } |
| 205 | 0 | T | F | if $debug |
| 215 | 0 | T | F | if (@marcfield) |
| 216 | 0 | T | F | if ($field eq $itemtag) { } |
| 219 | 0 | T | F | if ($itemfield->subfield($itemsubfieldcode) eq $$item{'itemnumber'}) |
| 220 | 0 | T | F | if ($itemfield->subfield($subf)) { } |
| 230 | 0 | T | F | if ($marcfield[0]->subfield($subf)) { } |
| 291 | 0 | T | F | if $debug |
| 329 | 0 | T | F | if ($$self{'guidebox'}) |
| 343 | 0 | T | F | if (_check_params(@_) eq 1) |
| 347 | 0 | T | F | if (exists $$self{$attr}) { } |
| 364 | 0 | T | F | if ($$self{'printing_type'} =~ /BIB/) |
| 371 | 0 | T | F | if ($$self{'printing_type'} =~ /BAR/) |
| 379 | 0 | T | F | if $label_text |
| 394 | 0 | T | F | $$item{'cn_source'} ? : |
| 397 | 0 | T | F | if ($$field{'code'} eq 'itemtype') { } |
| 398 | 0 | T | F | 'C4::Context'->preference('item-level_itypes') ? : |
| 403 | 0 | T | F | $font =~ /T/ ? : |
| 0 | T | F | $$field{'code'} eq 'title' ? : |
| 405 | 0 | T | F | if ($field_data) |
| 412 | 0 | T | F | if (grep {$$field{'code'} =~ /$_/;} @callnumber_list and $$self{'printing_type'} eq 'BIB' and $$self{'callnum_split'}) { } |
| 413 | 0 | T | F | if ($cn_source eq 'lcc' or $cn_source eq 'nlm') { } |
| 0 | T | F | elsif ($cn_source eq 'ddc') { } |
| 415 | 0 | T | F | if not @label_lines |
| 416 | 0 | T | F | if not @label_lines |
| 419 | 0 | T | F | if not @label_lines |
| 420 | 0 | T | F | if not @label_lines |
| 427 | 0 | T | F | if ($field_data) |
| 435 | 0 | T | F | if ($$field{'code'} eq 'title' and scalar @line >= 2) { } |
| 448 | 0 | T | F | if $line eq '' |
| 450 | 0 | T | F | if ($$self{'justify'} eq 'R') { } |
| 0 | T | F | elsif ($$self{'justify'} eq 'C') { } |
| 482 | 0 | T | F | if not $params{'barcode_data'} |
| 483 | 0 | T | F | if not $params{'barcode_type'} |
| 490 | 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') { } |
| 494 | 0 | T | F | if ($params{'barcode_type'} eq 'CODE39MOD') { } |
| 0 | T | F | elsif ($params{'barcode_type'} eq 'CODE39MOD10') { } |
| 515 | 0 | T | F | if ($@) |
| 533 | 0 | T | F | if ($@) |
| 551 | 0 | T | F | if ($@) |