|
|
@ -141,8 +141,8 @@ while ( my $data = $sth->fetchrow_hashref ) { |
|
|
|
phone => $previous eq $this?"":$data->{phone}, |
|
|
|
email => $previous eq $this?"":$data->{email}, |
|
|
|
biblionumber => $previous eq $this?"":$data->{biblionumber}, |
|
|
|
statusw => ( $data->{found} eq "w" ), |
|
|
|
statusf => ( $data->{found} eq "f" ), |
|
|
|
statusw => ( $data->{found} eq "W" ), |
|
|
|
statusf => ( $data->{found} eq "F" ), |
|
|
|
holdingbranch => $data->{holdingbranch}, |
|
|
|
branch => $previous eq $this?"":$data->{branch}, |
|
|
|
itemcallnumber => $data->{itemcallnumber}, |
|
|
@ -180,8 +180,8 @@ while ( my $data = $sth->fetchrow_hashref ) { |
|
|
|
phone => $previous eq $this?"":$data->{phone}, |
|
|
|
email => $previous eq $this?"":$data->{email}, |
|
|
|
biblionumber => $previous eq $this?"":$data->{biblionumber}, |
|
|
|
statusw => ( $data->{found} eq "w" ), |
|
|
|
statusf => ( $data->{found} eq "f" ), |
|
|
|
statusw => ( $data->{found} eq "W" ), |
|
|
|
statusf => ( $data->{found} eq "F" ), |
|
|
|
holdingbranch => $data->{holdingbranch}, |
|
|
|
branch => $previous eq $this?"":$data->{branch}, |
|
|
|
itemcallnumber => $data->{itemcallnumber}, |
|
|
|