From 2709b3592a9a14488657f35d37570f7a96d187b6 Mon Sep 17 00:00:00 2001 From: Dan Wells Date: Thu, 15 Mar 2018 12:00:01 -0400 Subject: [PATCH] LP#1756142 Stream other reporter data retrievals Similar to the "schedule" data, things like templates and reports can also get too large to send en masse. These are both handled by a generic function, so let's make that stream as well. Signed-off-by: Dan Wells --- Open-ILS/src/perlmods/lib/OpenILS/Application/Reporter.pm | 11 +++++++++-- 1 file changed, 9 insertions(+), 2 deletions(-) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Reporter.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Reporter.pm index 7251df4767..8d2fe414b9 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Reporter.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Reporter.pm @@ -105,7 +105,8 @@ sub retrieve_visible_folders { __PACKAGE__->register_method( api_name => 'open-ils.reporter.folder_data.retrieve', - method => 'retrieve_folder_data' + method => 'retrieve_folder_data', + stream => 1 ); sub retrieve_folder_data { @@ -127,7 +128,13 @@ sub retrieve_folder_data { }; $flesh->{limit} = $limit if $limit; $flesh->{offset} = $offset if $offset; - return $e->$meth([{ folder => $folderid }, $flesh]); + + my $items = $e->$meth([{ folder => $folderid }, $flesh]); + foreach my $item (@$items) { + $conn->respond($item); + } + + return undef; } __PACKAGE__->register_method( -- 2.11.0