View | Details | Raw Unified | Return to bug 17665
Collapse All | Expand All

(-)a/C4/SIP/ILS/Item.pm (-8 / +9 lines)
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
- 

Return to bug 17665