From: Joe Atzberger <atz@esilibrary.com>
Date: Fri, 1 Oct 2010 19:57:55 +0000 (+0000)
Subject: Extension for exposing patron internal ID via Patron Information
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=faadb88a436fcc561ba895122fa0091336e53b0a;p=working%2FSIPServer.git

Extension for exposing patron internal ID via Patron Information

Used by some AMH systems
---

diff --git a/Sip/Constants.pm b/Sip/Constants.pm
index b205b7f..9f136a1 100644
--- a/Sip/Constants.pm
+++ b/Sip/Constants.pm
@@ -107,6 +107,7 @@ BEGIN {
         FID_ALERT_TYPE
         FID_HOLD_PATRON_ID
         FID_HOLD_PATRON_NAME
+        FID_PATRON_INTERNAL_ID
         )],
     );
 
@@ -259,6 +260,9 @@ use constant {
     FID_ALERT_TYPE             => 'CV',
     FID_HOLD_PATRON_ID         => 'CY',
     FID_HOLD_PATRON_NAME       => 'DA',
+
+    # SIP Extension by Evergreen for AMH: 10/01/2001
+    FID_PATRON_INTERNAL_ID     => 'XI',
 };
 
 #
diff --git a/Sip/MsgType.pm b/Sip/MsgType.pm
index 2d29104..6805294 100644
--- a/Sip/MsgType.pm
+++ b/Sip/MsgType.pm
@@ -980,6 +980,7 @@ sub handle_patron_info {
 
 	# Custom protocol extension to report patron internet privileges
 	$resp .= maybe_add(FID_INET_PROFILE, $patron->inet_privileges);
+    $resp .= maybe_add(FID_PATRON_INTERNAL_ID, $patron->internal_id);   # another extension
 
 	$resp .= maybe_add(FID_SCREEN_MSG, $patron->screen_msg);
 	$resp .= maybe_add(FID_PRINT_LINE, $patron->print_line);