line | % | coverage | branch |
44 | 0 | T | F | unless (defined $prefformat) |
45 | 0 | T | F | unless ($prefformat = 'C4::Context'->preference('autoBarcode')) |
69 | 0 | T | F | unless ref $self |
70 | 0 | T | F | if @_ |
75 | 0 | T | F | if (@_) |
77 | 0 | T | F | if (defined $value) { } |
78 | 0 | T | F | if $debug |
87 | 0 | T | F | unless @_ |
89 | 0 | T | F | unless my $value = $$self{'autoBarcode'} |
95 | 0 | T | F | @_ ? : |
96 | 0 | T | F | unless ($barcode =~ /(.*?)(\d+)$/) |
100 | 0 | T | F | if $debug |
105 | 0 | T | F | if ($$self{'is_max'}) |
106 | 0 | T | F | if $debug |
109 | 0 | T | F | if $debug |
121 | 0 | T | F | scalar @_ ? : |
122 | 0 | T | F | $specific ? : |
123 | 0 | T | F | unless ($max) |
127 | 0 | T | F | if $debug |
129 | 0 | T | F | unless (defined $incr) |
134 | 0 | T | F | if $incr =~ /^9+$/ |
139 | 0 | T | F | if $debug |
143 | 0 | T | F | if $debug |
147 | 0 | T | F | unless my $self = shift @_ |
148 | 0 | T | F | if @_ |
152 | 0 | T | F | unless my $self = shift @_ |
153 | 0 | T | F | if @_ |
157 | 0 | T | F | unless my $self = shift @_ |
158 | 0 | T | F | if @_ |
162 | 0 | T | F | unless @_ |
163 | 0 | T | F | @_ ? : |
185 | 0 | T | F | ref $class_or_object ? : |
186 | 0 | T | F | if ($from_obj) |
187 | 0 | T | F | if $debug |
189 | 0 | T | F | $from_obj ? : |
| 0 | T | F | @_ ? : |
191 | 0 | T | F | unless ($autoBarcodeType) |
195 | 0 | T | F | unless (defined $$types{$autoBarcodeType}) |
199 | 0 | T | F | if $debug |
201 | 0 | T | F | if ($autoBarcodeType eq 'OFF') { } |
| 0 | T | F | elsif ($from_obj) { } |
205 | 0 | T | F | unless $class_or_object->autoBarcode eq $autoBarcodeType |
209 | 0 | T | F | if ($class_or_object->is_max) { } |
210 | 0 | T | F | if $debug |
214 | 0 | T | F | if $self->is_max(1) |
219 | 0 | T | F | if $debug |
221 | 0 | T | F | if $self->value($self->next_value) |
224 | 0 | T | F | if ($self) |
234 | 0 | T | F | ref $class_or_object ? : |
235 | 0 | T | F | $from_obj ? : |