From: Jason Etheridge Date: Thu, 22 Aug 2013 18:15:16 +0000 (-0400) Subject: some circ wrappers X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=70a0e5c25985f86515a7601cee10bb221a42a8ed;p=working%2FEvergreen.git some circ wrappers --- diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Utils/Cronscript.pm.in b/Open-ILS/src/perlmods/lib/OpenILS/Utils/Cronscript.pm.in index 32ac711ce5..26607f56c7 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Utils/Cronscript.pm.in +++ b/Open-ILS/src/perlmods/lib/OpenILS/Utils/Cronscript.pm.in @@ -401,6 +401,31 @@ sub cache { return $self->{memcache}; } +sub register_workstation { + my ($self,$name,$lib) = (shift,shift,shift); + my $resp = $apputils->simplereq( + 'open-ils.actor', + 'open-ils.actor.workstation.register', + $self->authtoken, $name, $lib); + return $resp; +} + +sub do_checkout { + my ($self,$args) = (shift,shift); + my $resp = $apputils->simplereq( + 'open-ils.circ', + 'open-ils.circ.checkout.full', $self->authtoken, $args); + return $resp; +} + +sub do_checkin { + my ($self,$args) = (shift,shift); + my $resp = $apputils->simplereq( + 'open-ils.circ', + 'open-ils.circ.checkin', $self->authtoken, $args ); + return $resp; +} + 1; __END__