added billing type retrieval method

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

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
index 93f7abb..0f2c125 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
@@ -63,15 +63,22 @@ sub retrieve_circ {
 
 __PACKAGE__->register_method(
        method => 'fetch_circ_mods',
-       api_name => 'open-ils.circ.circ_modifier.retrieve.all'
-);
-
+       api_name => 'open-ils.circ.circ_modifier.retrieve.all');
 sub fetch_circ_mods {
        my $conf = OpenSRF::Utils::SettingsClient->new;
        return $conf->config_value(
                'apps', 'open-ils.circ', 'app_settings', 'circ_modifiers', 'mod' );
 }
 
+__PACKAGE__->register_method(
+       method => 'fetch_bill_types',
+       api_name => 'open-ils.circ.billing_type.retrieve.all');
+sub fetch_bill_types {
+       my $conf = OpenSRF::Utils::SettingsClient->new;
+       return $conf->config_value(
+               'apps', 'open-ils.circ', 'app_settings', 'billing_types', 'type' );
+}
+
 
 # ------------------------------------------------------------------------
 # Returns an array of {circ, record} hashes checked out by the user.