-for (my $i=0;$i<$count;$i++){
- my %line;
- $line{name}="$data->[$i]->{'surname'}\, $data->[$i]->{'firstname'}";
- $line{'reservedate'}=$data->[$i]->{'reservedate'};
- $line{'title'}=$data->[$i]->{'title'};
- $line{'classification'}="$data->[$i]->{'classification'}$data->[$i]->{'dewey'}";
- push(@dataloop,\%line);
+my $toggle;
+for ( my $i = 0 ; $i < $count ; $i++ ) {
+ my %line;
+ $toggle = $i%2 ? 0 : 1;
+ $line{'borrowernumber'} = $data->[$i]->{'borrowernumber'};
+ $line{'surname'} = $data->[$i]->{'surname'};
+ $line{'firstname'} = $data->[$i]->{'firstname'};
+ $line{'sortdate'} = $data->[$i]->{'reservedate'};
+ $line{'reservedate'} = format_date($data->[$i]->{'reservedate'});
+ $line{'biblionumber'} = $data->[$i]->{'biblionumber'};
+ $line{'title'} = $data->[$i]->{'title'};
+ $line{'classification'} = $data->[$i]->{'classification'};
+ $line{'dewey'} = $data->[$i]->{'dewey'};
+ $line{'status'} = $data->[$i]->{'found'};
+ $line{'branchcode'} = $data->[$i]->{'branchcode'};
+ $line{'toggle'} = $toggle;
+ if ( $line{'status'} ne 'W' ) {
+
+ # its not waiting, we need to find if its on issue, or on the shelf
+ # FIXME still need to shift the text to the template so its translateable
+ if ( $data->[$i]) {
+ # find if its on issue
+ my @items = GetItemsInfo($line{'biblionumber'}, 'intra' );
+ my $onissue = 0;
+ foreach my $item (@items) {
+ if ( $item->{'datedue'} eq 'Reserved' ) {
+ $onissue = 0;
+ if ($item->{'branchname'} eq ''){
+ $line{'status'}='In Transit';
+ }
+ else {
+ $line{'status'} = "On shelf at $item->{'branchname'}";
+ }
+
+ }
+
+ else {
+ $onissue = 1;
+ }
+ }
+ if ($onissue) {
+ $line{'status'} = 'On Issue';
+ }
+ }
+ else {
+ $line{'status'}="Waiting for pickup";
+
+ }
+ }
+ push( @dataloop, \%line );