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