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

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

Return to bug 17665