Lines 151-158
while ( my $data = $sth->fetchrow_hashref ) {
Link Here
|
151 |
holdingbranch_list => [split('\|', $data->{holdingbranch_list})], |
151 |
holdingbranch_list => [split('\|', $data->{holdingbranch_list})], |
152 |
branch => $data->{branch}, |
152 |
branch => $data->{branch}, |
153 |
itemcallnumber => $data->{itemcallnumber}, |
153 |
itemcallnumber => $data->{itemcallnumber}, |
154 |
location => => [split('\|', $data->{l_location})], |
154 |
location => [split('\|', $data->{l_location})], |
155 |
itype => => [split('\|', $data->{l_itype})], |
155 |
itype => [split('\|', $data->{l_itype})], |
156 |
reservecount => $data->{reservecount}, |
156 |
reservecount => $data->{reservecount}, |
157 |
itemcount => $data->{itemcount}, |
157 |
itemcount => $data->{itemcount}, |
158 |
ratiocalc => sprintf( "%.0d", $ratio_atleast1 ? ( $thisratio / $ratio ) : $thisratio ), |
158 |
ratiocalc => sprintf( "%.0d", $ratio_atleast1 ? ( $thisratio / $ratio ) : $thisratio ), |
159 |
- |
|
|