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; |