use CGI;
use C4::Koha;
use C4::Auth;
-use C4::Date;
+use C4::Dates;
use C4::Output;
use C4::Acquisition;
-use C4::Interface::CGI::Output;
+use C4::Output;
use C4::Context;
use C4::Members;
my @results;
my $data;
for(my $i=0;$i<$routing;$i++){
- $data=borrdata('',$routinglist[$i]->{'borrowernumber'});
+ $data=GetMember($routinglist[$i]->{'borrowernumber'},'borrowernumber');
$data->{'location'}=$data->{'streetaddress'};
$data->{'name'}="$data->{'firstname'} $data->{'surname'}";
$data->{'routingid'}=$routinglist[$i]->{'routingid'};
for(my $j=1; $j <= $routing; $j++) {
$rankingbox .= "<option ";
if($routinglist[$i]->{'ranking'} == $j){
- $rankingbox .= " selected='SELECTED'";
+ $rankingbox .= " selected=\"selected\"";
}
- $rankingbox .= " value='$j'>$j</option>";
+ $rankingbox .= " value=\"$j\">$j</option>";
}
$rankingbox .= "</select>";
$data->{'routingbox'} = $rankingbox;
$new = 1;
} else {
# for modify routing list default
- $new => 0;
+ $new = 0;
}
$template->param(