Return the RequestId in the RequestItem message.
authorJason Stephenson <jason@sigio.com>
Tue, 9 Dec 2014 23:33:39 +0000 (18:33 -0500)
committerJason Stephenson <jason@sigio.com>
Tue, 9 Dec 2014 23:33:39 +0000 (18:33 -0500)
Signed-off-by: Jason Stephenson <jason@sigio.com>
lib/NCIP/ILS/Evergreen.pm

index e682b76..02e5682 100644 (file)
@@ -1012,8 +1012,9 @@ sub requestitem {
         my $data = {
             RequestId => NCIP::RequestId->new(
                 {
         my $data = {
             RequestId => NCIP::RequestId->new(
                 {
-                    RequestIdentifierType => 'SYSNUMBER',
-                    RequestIdentifierValue => $hold->id()
+                    AgencyId => $request->{$message}->{RequestId}->{AgencyId},
+                    RequestIdentifierType => $request->{$message}->{RequestId}->{RequestIdentifierType},
+                    RequestIdentifierValue => $request->{$message}->{RequestId}->{RequestIdentifierValue}
                 }
             ),
             UserId => NCIP::User::Id->new(
                 }
             ),
             UserId => NCIP::User::Id->new(