|
Lines 602-607
foreach ( sort { $a <=> $b } keys %returneditems ) {
Link Here
|
| 602 |
$ri{barcode} = $bar_code; |
602 |
$ri{barcode} = $bar_code; |
| 603 |
$ri{homebranch} = $item->homebranch; |
603 |
$ri{homebranch} = $item->homebranch; |
| 604 |
$ri{holdingbranch} = $item->holdingbranch; |
604 |
$ri{holdingbranch} = $item->holdingbranch; |
|
|
605 |
$ri{damaged} = $item->damaged; |
| 605 |
|
606 |
|
| 606 |
$ri{location} = $item->location; |
607 |
$ri{location} = $item->location; |
| 607 |
my $shelfcode = $ri{'location'}; |
608 |
my $shelfcode = $ri{'location'}; |