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