-my ($template, $loggedinuser, $cookie)
-= get_template_and_user({template_name => "serials/routing.tmpl",
- query => $query,
- type => "intranet",
- authnotrequired => 0,
- flagsrequired => {serials => 1},
- debug => 1,
- });
-# my $date;
-# if($serialseq){
-# for(my $i = 0;$i<@serials; $i++){
-# if($serials[$i]->{'serialseq'} eq $serialseq){
-# $date = $serials[$i]->{'planneddate'}
-# }
-# }
-# } else {
-# $serialseq = $serials[0]->{'serialseq'};
-# $date = $serials[0]->{'planneddate'};
-# }
-
-# my $issue = "$serialseq ($date)";
-
-my @results;
-my $data;
-for(my $i=0;$i<$routing;$i++){
- $data=GetMember($routinglist[$i]->{'borrowernumber'},'borrowernumber');
- $data->{'location'}=$data->{'streetaddress'};
- $data->{'name'}="$data->{'firstname'} $data->{'surname'}";
- $data->{'routingid'}=$routinglist[$i]->{'routingid'};
- $data->{'subscriptionid'}=$subscriptionid;
- my $rankingbox = '<select name="itemrank" onchange="reorder_item('.$subscriptionid.','.$routinglist[$i]->{'routingid'}.',this.options[this.selectedIndex].value)">';
- for(my $j=1; $j <= $routing; $j++) {
- $rankingbox .= "<option ";
- if($routinglist[$i]->{'ranking'} == $j){
- $rankingbox .= " selected=\"selected\"";
- }
- $rankingbox .= " value=\"$j\">$j</option>";
+my $member_loop = [];
+for my $routing ( @routinglist ) {
+ my $member = Koha::Patrons->find( $routing->{borrowernumber} )->unblessed;
+ $member->{location} = $member->{branchcode};
+ if ($member->{firstname} ) {
+ $member->{name} = $member->{firstname} . q| |;