From: erickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Tue, 7 Oct 2008 20:01:48 +0000 (+0000)
Subject: run total owed and total checked out inside a transaction.  in particular, give the... 
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=e274ff823d867c90183d413f52e379c76e226c40;p=Evergreen.git

run total owed and total checked out inside a transaction.  in particular, give the penalty server latest information to work with

git-svn-id: svn://svn.open-ils.org/ILS/trunk@10784 dcc99617-32d9-48b4-a31d-7c20da2025e4
---

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/AppUtils.pm b/Open-ILS/src/perlmods/OpenILS/Application/AppUtils.pm
index bdf4212753..8300a17acd 100644
--- a/Open-ILS/src/perlmods/OpenILS/Application/AppUtils.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/AppUtils.pm
@@ -1138,14 +1138,20 @@ sub __patron_money_owed {
 
 sub patron_money_owed {
 	my( $self, $userid ) = @_;
-	return $self->storagereq(
-		'open-ils.storage.actor.user.total_owed', $userid);
+	my $ses = $self->start_db_session();
+	my $val = $ses->request(
+		'open-ils.storage.actor.user.total_owed', $userid)->gather(1);
+	$self->rollback_db_session($ses);
+	return $val;
 }
 
 sub patron_total_items_out {
 	my( $self, $userid ) = @_;
-	return $self->storagereq(
-		'open-ils.storage.actor.user.total_out', $userid);
+	my $ses = $self->start_db_session();
+	my $val = $ses->request(
+		'open-ils.storage.actor.user.total_out', $userid)->gather(1);
+	$self->rollback_db_session($ses);
+	return $val;
 }