From aae38477c019d211301447661eda2d1cd9ba00a2 Mon Sep 17 00:00:00 2001 From: D Ruth Bavousett Date: Wed, 25 Apr 2012 06:06:31 -0700 Subject: [PATCH] Bug 8009: Item descriptive data not populated on pay.pl Content-Type: text/plain; charset="UTF-8" GetBorNotifyAcctRecord was not populating the {title} element of the hash, which pay.tt will use. Signed-off-by: Jared Camins-Esakov --- C4/Members.pm | 5 +++++ 1 files changed, 5 insertions(+), 0 deletions(-) diff --git a/C4/Members.pm b/C4/Members.pm index 6161ac9..210d6fb 100644 --- a/C4/Members.pm +++ b/C4/Members.pm @@ -1184,6 +1184,11 @@ sub GetBorNotifyAcctRecord { $sth->execute( $borrowernumber, $notifyid ); my $total = 0; while ( my $data = $sth->fetchrow_hashref ) { + if ( $data->{itemnumber} ) { + my $biblio = GetBiblioFromItemNumber( $data->{itemnumber} ); + $data->{biblionumber} = $biblio->{biblionumber}; + $data->{title} = $biblio->{title}; + } $acctlines[$numlines] = $data; $numlines++; $total += int(100 * $data->{'amountoutstanding'}); -- 1.7.2.5