| line |
true |
false |
branch |
|
52
|
26 |
920 |
if ($name eq 'record') { } |
|
|
4 |
916 |
elsif ($name eq 'collection') { } |
|
|
915 |
1 |
elsif (defined $self->{'record'}) { } |
|
57
|
26 |
889 |
if ($name eq 'leader') { } |
|
|
87 |
802 |
elsif ($name eq 'controlfield') { } |
|
|
305 |
497 |
elsif ($name eq 'datafield') { } |
|
|
497 |
0 |
elsif ($name eq 'subfield') { } |
|
81
|
1 |
0 |
if ($name eq 'leader' or $name eq 'controlfield' or $name eq 'datafield' or $name eq 'subfield') |
|
90
|
497 |
447 |
if ($name eq 'subfield') { } |
|
|
87 |
360 |
elsif ($name eq 'controlfield') { } |
|
|
305 |
55 |
elsif ($name eq 'datafield') { } |
|
|
26 |
29 |
elsif ($name eq 'leader') { } |
|
|
26 |
3 |
elsif ($name eq 'record') { } |
|
93
|
71 |
426 |
if ($self->{'transcode'}) { } |
|
125
|
6 |
0 |
if substr($ldr, 9, 1) eq 'a' and $self->{'toMARC8'} |
|
127
|
6 |
20 |
if $self->{'transcode'} |
|
140
|
628 |
802 |
if (exists $self->{'subcode'} and $self->{'subcode'} ne '' or $self->{'tag'} and $self->{'tag'} eq 'LDR' || $self->{'tag'} < 10) |