Lines 371-377
sub GetOtherReserves {
Link Here
|
371 |
my $messages; |
371 |
my $messages; |
372 |
my $nextreservinfo; |
372 |
my $nextreservinfo; |
373 |
my ( $restype, $checkreserves ) = CheckReserves($itemnumber); |
373 |
my ( $restype, $checkreserves ) = CheckReserves($itemnumber); |
374 |
if ($checkreserves) { |
374 |
if ($checkreserves and $restype ne "Waiting" ) { |
375 |
my $iteminfo = GetItem($itemnumber); |
375 |
my $iteminfo = GetItem($itemnumber); |
376 |
if ( $iteminfo->{'holdingbranch'} ne $checkreserves->{'branchcode'} ) { |
376 |
if ( $iteminfo->{'holdingbranch'} ne $checkreserves->{'branchcode'} ) { |
377 |
$messages->{'transfert'} = $checkreserves->{'branchcode'}; |
377 |
$messages->{'transfert'} = $checkreserves->{'branchcode'}; |
378 |
- |
|
|