From 666bed5f8ebd97d62112a1725d5789212454c8cc Mon Sep 17 00:00:00 2001 From: erickson Date: Thu, 13 Nov 2008 20:17:40 +0000 Subject: [PATCH] ranged (scoped by org/depth) billing_type retrieval method git-svn-id: svn://svn.open-ils.org/ILS/trunk@11170 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Open-ILS/src/perlmods/OpenILS/Application/Circ.pm | 14 ++++++++++++++ 1 file changed, 14 insertions(+) diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm index 3fe64b46e0..1d888c4a81 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm @@ -83,6 +83,20 @@ sub fetch_bill_types { } +__PACKAGE__->register_method( + method => 'ranged_billing_types', + api_name => 'open-ils.circ.billing_type.ranged.retrieve.all'); + +sub ranged_billing_types { + my($self, $conn, $auth, $org_id, $depth) = @_; + my $e = new_editor(authtoken => $auth); + return $e->event unless $e->checkauth; + return $e->search_config_billing_type( + {owner => $U->get_org_full_path($org_id, $depth)}); +} + + + # ------------------------------------------------------------------------ # Returns an array of {circ, record} hashes checked out by the user. # ------------------------------------------------------------------------ -- 2.11.0