[open-ils-commits] r10398 - trunk/Open-ILS/src/perlmods/OpenILS/Application

[svn at svn.open-ils.org]

Author: erickson
Date: 2008-08-21 11:13:13 -0400 (Thu, 21 Aug 2008)
New Revision: 10398

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm
Log:
added a method to return the org unit closed dates

Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm	2008-08-21 15:13:06 UTC (rev 10397)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm	2008-08-21 15:13:13 UTC (rev 10398)
@@ -3044,5 +3044,24 @@
 }
 
 
+__PACKAGE__->register_method (
+	method		=> 'retrieve_org_hours',
+	api_name	=> 'open-ils.actor.org_unit.hours_of_operation.retrieve',
+	signature	=> q/
+        Returns the hours of operation for a specified org unit
+		@param authtoken The login session key
+		@param org_id The org_unit ID
+	/
+);
+
+sub retrieve_org_hours {
+    my($self, $conn, $auth, $org_id) = @_;
+    my $e = new_editor(authtoken => $auth);
+	return $e->die_event unless $e->checkauth;
+    $org_id ||= $e->requestor->ws_ou;
+    return $e->retrieve_actor_org_unit_hours_of_operation($org_id);
+}
+
+
 1;