@@ -, +, @@ damaged items --- C4/SIP/ILS/Item.pm | 3 +++ C4/SIP/Sip/MsgType.pm | 8 +++++++- 2 files changed, 10 insertions(+), 1 deletion(-) --- a/C4/SIP/ILS/Item.pm +++ a/C4/SIP/ILS/Item.pm @@ -281,6 +281,9 @@ sub sip_circulation_status { elsif ( $self->{location} eq 'CART' ) { return '09'; # waiting to be re-shelved } + elsif ( $self->{damaged} ) { + return '01'; # damaged + } elsif ( $self->{notforloan} < 0 ) { return '02'; # on order } --- a/C4/SIP/Sip/MsgType.pm +++ a/C4/SIP/Sip/MsgType.pm @@ -1206,11 +1206,16 @@ sub handle_item_information { } else { # Valid Item ID, send the good stuff - $resp .= $item->sip_circulation_status; + my $circulation_status = $item->sip_circulation_status; + $resp .= $circulation_status; $resp .= $item->sip_security_marker; $resp .= $item->sip_fee_type; $resp .= timestamp; + if ( $circulation_status eq '01' ) { + $resp .= maybe_add( FID_SCREEN_MSG, "Item is damaged", $server ); + } + $resp .= add_field( FID_ITEM_ID, $item->id, $server ); $resp .= add_field( FID_TITLE_ID, $item->title_id, $server ); @@ -1219,6 +1224,7 @@ sub handle_item_information { $resp .= maybe_add( FID_CURRENT_LOCN, $item->current_location, $server ); $resp .= maybe_add( FID_ITEM_PROPS, $item->sip_item_properties, $server ); + if ( my $CR = $server->{account}->{cr_item_field} ) { $resp .= maybe_add( FID_COLLECTION_CODE, $item->{$CR}, $server ); } else { --