|
Lines 458-475
sub build_issue_data {
Link Here
|
| 458 |
|
458 |
|
| 459 |
if ($borrower) { |
459 |
if ($borrower) { |
| 460 |
|
460 |
|
| 461 |
# Getting borrower relatives |
|
|
| 462 |
my @relborrowernumbers = GetMemberRelatives($borrower->{'borrowernumber'}); |
| 463 |
#push @borrowernumbers, $borrower->{'borrowernumber'}; |
| 464 |
|
| 465 |
# get each issue of the borrower & separate them in todayissues & previous issues |
461 |
# get each issue of the borrower & separate them in todayissues & previous issues |
| 466 |
my ($issueslist) = GetPendingIssues($borrower->{'borrowernumber'}); |
462 |
my ($issueslist) = GetPendingIssues($borrower->{'borrowernumber'}); |
| 467 |
my ($relissueslist) = GetPendingIssues(@relborrowernumbers); |
|
|
| 468 |
|
| 469 |
build_issue_data($issueslist, 0); |
463 |
build_issue_data($issueslist, 0); |
| 470 |
build_issue_data($relissueslist, 1); |
464 |
|
| 471 |
|
465 |
# Getting borrower relatives |
| 472 |
$displayrelissues = scalar($relissueslist); |
466 |
my @relborrowernumbers = GetMemberRelatives($borrower->{'borrowernumber'}); |
|
|
467 |
if (scalar(@relborrowernumbers)>0){ |
| 468 |
my $relissueslist = GetPendingIssues(@relborrowernumbers); |
| 469 |
if ($relissueslist){ |
| 470 |
build_issue_data($relissueslist, 1); |
| 471 |
$displayrelissues = scalar($relissueslist); |
| 472 |
} |
| 473 |
} |
| 474 |
|
| 473 |
|
475 |
|
| 474 |
if ( C4::Context->preference( "todaysIssuesDefaultSortOrder" ) eq 'asc' ) { |
476 |
if ( C4::Context->preference( "todaysIssuesDefaultSortOrder" ) eq 'asc' ) { |
| 475 |
@todaysissues = sort { $a->{'timestamp'} cmp $b->{'timestamp'} } @todaysissues; |
477 |
@todaysissues = sort { $a->{'timestamp'} cmp $b->{'timestamp'} } @todaysissues; |