Initial checkin of code to support fine detail enhancement to SIP

diff --git a/SIPconfig.xml b/SIPconfig.xml
index 180f4d4..1a3d735 100644 (file)
--- a/SIPconfig.xml
+++ b/SIPconfig.xml
@@ -58,10 +58,13 @@
     <server>127.0.0.1:11211</server>
   </cache>
 
+<!-- AV_format specifies format of fine detail. Values are:  -->
+<!-- 3M (default), Swyer_A, Swyer_B, EG_Legacy                     -->
   <accounts>
       <login id="scclient" password="clientpwd" institution="UWOLS">
       </login>
       <login id="scclient-2" password="clientpwd-2"
+             AV_format="Sywer_B" 
              institution="UWOLS" />
       <login id="lpl-sc" password="1234" institution="LPL" />
       <login id="lpl-sc-beacock" password="xyzzy" location_code="WORKSTATION5"
@@ -78,7 +81,7 @@
           <policy checkin="true" renewal="false"
                  status_update="false" offline="false"
                  timeout="600" client_location_code="true"
-                 retries="3" />
+                 retries="3" />
           <relais_extensions_to_msg24 enabled="false" />
     </institution>
 

diff --git a/Sip/MsgType.pm b/Sip/MsgType.pm
index 4079467..12af3b5 100644 (file)
--- a/Sip/MsgType.pm
+++ b/Sip/MsgType.pm
@@ -999,7 +999,7 @@ sub handle_patron_info {
         $resp .= add_count('patron_info/hold_items',    scalar @{$patron->hold_items(undef,undef,1)   });
         $resp .= add_count('patron_info/overdue_items', scalar @{$patron->overdue_items(undef,undef,1)});
         $resp .= add_count('patron_info/charged_items', scalar @{$patron->charged_items(undef,undef,1)});
-        $resp .= add_count('patron_info/fine_items',    scalar @{$patron->fine_items(undef,undef,1)   });
+        $resp .= add_count('patron_info/fine_items',    scalar @{$patron->fine_items(undef,undef,1,$server)   });
         $resp .= add_count('patron_info/recall_items',  scalar @{$patron->recall_items(undef,undef,1) });
         $resp .= add_count('patron_info/unavail_holds', scalar @{$patron->unavail_holds(undef,undef,1)});