[open-ils-commits] r16864 - trunk/Open-ILS/src/perlmods/OpenILS/Application/Search (erickson)
svn at svn.open-ils.org
svn at svn.open-ils.org
Tue Jul 6 22:13:21 EDT 2010
Author: erickson
Date: 2010-07-06 22:13:19 -0400 (Tue, 06 Jul 2010)
New Revision: 16864
Modified:
trunk/Open-ILS/src/perlmods/OpenILS/Application/Search/CNBrowse.pm
Log:
updated call number browse pass-thru to accommodate new copy location and status filters
Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Search/CNBrowse.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Search/CNBrowse.pm 2010-07-07 00:29:37 UTC (rev 16863)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Search/CNBrowse.pm 2010-07-07 02:13:19 UTC (rev 16864)
@@ -44,12 +44,36 @@
}
-
-
__PACKAGE__->register_method(
- method => "cn_browse",
- api_name => "open-ils.search.callnumber.browse",
- notes => "Starts a callnumber browse"
+ method => "cn_browse",
+ api_name => "open-ils.search.callnumber.browse",
+ signature => {
+ desc => q/Paged call number browse/,
+ params => [
+ { name => 'label',
+ desc => 'The target call number lable',
+ type => 'string' },
+ { name => 'org_unit',
+ desc => 'The org unit shortname (or "-" or undef for global) to browse',
+ type => 'string' },
+ { name => 'page_size',
+ desc => 'Count of call numbers to retrieve, default is 9',
+ type => 'number' },
+ { name => 'offset',
+ desc => 'The page of call numbers to retrieve, calculated based on page_size. Can be positive, negative or 0.',
+ type => 'number' },
+ { name => 'statuses',
+ desc => 'Array of statuses to filter copies by, optional and can be undef.',
+ type => 'array' },
+ { name => 'locations',
+ desc => 'Array of copy locations to filter copies by, optional and can be undef.',
+ type => 'array' },
+ ],
+ return => {
+ type => 'array',
+ desc => q/List of callnumber (acn) and record (mvr) objects/
+ }
+ }
);
sub cn_browse {
@@ -63,7 +87,7 @@
my $data = $ses->request(
'open-ils.supercat.call_number.browse',
- $cn, $name, $size, $offset )->gather(1);
+ $cn, $name, $size, $offset, $copy_statuses, $copy_locations )->gather(1);
return [] unless $data;
More information about the open-ils-commits
mailing list