|
Lines 244-256
sub title_id {
Link Here
|
| 244 |
|
244 |
|
| 245 |
sub sip_circulation_status { |
245 |
sub sip_circulation_status { |
| 246 |
my $self = shift; |
246 |
my $self = shift; |
| 247 |
if ($self->{patron}) { |
247 |
if ( $self->{patron} ) { |
| 248 |
return '04'; # charged |
248 |
return '04'; # charged |
| 249 |
} elsif (scalar @{$self->{hold_queue}}) { |
249 |
} |
| 250 |
return '08'; # waiting on hold shelf |
250 |
elsif ( grep { $_->{itemnumber} == $self->{itemnumber} } @{ $self->{hold_shelf} } ) { |
| 251 |
} else { |
251 |
return '08'; # waiting on hold shelf |
| 252 |
return '03'; # available |
252 |
} |
| 253 |
} # FIXME: 01-13 enumerated in spec. |
253 |
else { |
|
|
254 |
return '03'; # available |
| 255 |
} # FIXME: 01-13 enumerated in spec. |
| 254 |
} |
256 |
} |
| 255 |
|
257 |
|
| 256 |
sub sip_security_marker { |
258 |
sub sip_security_marker { |
| 257 |
- |
|
|