FSN#34419 alleen groepen met uitleenbare objectsoorten tonen igv uitleenmodule

svn path=/Website/trunk/; revision=28493

APPL/Shared/Suggest/srtgroepFilter.inc

@@ -35,7 +35,16 @@ function getFiltClauseSrtgroep(pfiltcode, params) // pfiltcode not used yet
 
   if (params.srtgroep_key && params.srtgroep_key > 0)
     lfiltClause += " AND sg." + module + "_srtgroep_key = " + params.srtgroep_key;
-
+    
+  if (pfiltcode == "LEND")
+  {
+    lfiltClause += " AND sg.ins_srtgroep_key IN"
+                 + "           (SELECT ins_srtgroep_key"
+                 + "              FROM ins_srtdeel sd1"
+                 + "             WHERE sd1.ins_srtdeel_verwijder IS NULL"
+                 + "               AND sd1.ins_srtdeel_uitleenbaar = 1)";     
+  }
+  
   if (params.autfunction != "")
   {
     var authparams = user.checkAutorisation(params.autfunction);