From 553409c30d53f2dd54bd90cc0dca24341beec8d8 Mon Sep 17 00:00:00 2001 From: Lyon3 Team Date: Tue, 27 Apr 2021 16:13:39 +0200 Subject: [PATCH] Bug 28238 Add itemcallnumber to ils-di GetAvailability output --- C4/ILSDI/Services.pm | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/C4/ILSDI/Services.pm b/C4/ILSDI/Services.pm index a28c382d68..03920b8766 100644 --- a/C4/ILSDI/Services.pm +++ b/C4/ILSDI/Services.pm @@ -120,7 +120,7 @@ sub GetAvailability { foreach my $id ( split( / /, $cgi->param('id') ) ) { if ( $cgi->param('id_type') eq "item" ) { - my ( $biblionumber, $status, $msg, $location ) = _availability($id); + my ( $biblionumber, $status, $msg, $location, $itemcallnumber ) = _availability($id); $out .= " \n"; $out .= " \n"; @@ -131,6 +131,7 @@ sub GetAvailability { $out .= " " . $status . "\n"; if ($msg) { $out .= " " . $msg . "\n"; } if ($location) { $out .= " " . $location . "\n"; } + if ($itemcallnumber) { $out .= " " . $itemcallnumber. "\n"; } $out .= " \n"; $out .= " \n"; $out .= " \n"; @@ -147,13 +148,14 @@ sub GetAvailability { # We loop over the items to clean them while ( my $item = $items->next ) { my $itemnumber = $item->itemnumber; - my ( $biblionumber, $status, $msg, $location ) = _availability($itemnumber); + my ( $biblionumber, $status, $msg, $location, $itemcallnumber ) = _availability($itemnumber); $out .= " \n"; $out .= " \n"; $out .= " " . $itemnumber . "\n"; $out .= " " . $status . "\n"; if ($msg) { $out .= " " . $msg . "\n"; } if ($location) { $out .= " " . $location . "\n"; } + if ($itemcallnumber) { $out .= " " . $itemcallnumber. "\n"; } $out .= " \n"; $out .= " \n"; } @@ -960,6 +962,7 @@ sub _availability { my $biblionumber = $item->biblioitemnumber; my $library = Koha::Libraries->find( $item->holdingbranch ); my $location = $library ? $library->branchname : ''; + my $itemcallnumber = $item->itemcallnumber; if ( $item->notforloan ) { return ( $biblionumber, 'not available', 'Not for loan', $location ); @@ -972,7 +975,7 @@ sub _availability { } elsif ( $item->damaged ) { return ( $biblionumber, 'not available', 'Item damaged', $location ); } else { - return ( $biblionumber, 'available', undef, $location ); + return ( $biblionumber, 'available', undef, $location, $itemcallnumber ); } } -- 2.11.0