sub findguarantees{
my ($bornum)=@_;
my $dbh = C4::Context->dbh;
- my $query="select cardnumber,borrowernumber from borrowers where
+ my $query="select cardnumber,borrowernumber, firstname, surname from borrowers where
guarantor='$bornum'";
my $sth=$dbh->prepare($query);
$sth->execute;
Relationship: <TMPL_VAR NAME="altrelationship"><BR>
Notes: <TMPL_VAR NAME="altnotes"><P>
<TMPL_IF NAME="isguarantee">
- Guarantees:<TMPL_LOOP NAME="guaranteeloop"><A HREF="/cgi-bin/koha/moremember.pl?bornum=<TMPL_VAR NAME="borrowernumber">"><TMPL_VAR NAME="cardnumber"></a><br></TMPL_LOOP>
+ Guarantees:<br><TMPL_LOOP NAME="guaranteeloop"><A HREF="/cgi-bin/koha/moremember.pl?bornum=<TMPL_VAR NAME="borrowernumber">"><TMPL_VAR NAME=name> - <TMPL_VAR NAME="cardnumber"></a><br></TMPL_LOOP>
<TMPL_ELSE>
Guarantor:
<TMPL_IF NAME="guarantorborrowernumber">
my @guaranteedata;
for (my $i=0;$i<$count;$i++){
push (@guaranteedata, {borrowernumber => $guarantees->[$i]->{'borrowernumber'},
- cardnumber => $guarantees->[$i]->{'cardnumber'}});
+ cardnumber => $guarantees->[$i]->{'cardnumber'},
+ name => $guarantees->[$i]->{'firstname'} . " " . $guarantees->[$i]->{'surname'}});
}
$template->param(guaranteeloop => \@guaranteedata);