Out of cursors voorkomen door oRs.Close binnen loop

svn path=/Website/branches/v2018.2/; revision=40966

APPL/BEZ/bez_check_out.asp

@@ -30,7 +30,7 @@ var deletedvis = false;
 var sql = "SELECT distinct bez_afspraak_key"
         + "  FROM bez_bezoekers"
         + " WHERE bez_bezoekers_key " + (bez_key_arr.length > 0? " IN (" + bez_key_arr.join(",") + ")" : " = -1");
-oRs = Oracle.Execute(sql);
+var oRs = Oracle.Execute(sql);
 while (!oRs.eof)
 {
     afspr_key = oRs("bez_afspraak_key").value;
@@ -64,11 +64,12 @@ for (i = 0 ; i < bez_key_arr.length; i++)
     var bezoeker = oRs("bez_afspraak_naam").value;
     var prs_key = oRs("prs_perslid_key").value || -1;
     var cps_key = oRs("prs_contactpersoon_key").value || -1;
+    oRs.Close();
 
     sql = "UPDATE bez_bezoekers"
         + "   SET bez_bezoekers_out = " + bezoekers_out
         + " WHERE bez_bezoekers_key = " + bez_key_arr[i];
-    oRs = Oracle.Execute(sql);
+    Oracle.Execute(sql);
     tobeapproved++;
     // Undo ook afzonderlijk tracken! (gebruikt zelfde label als bij undo checkin)
     var trackstr = L("lcl_bez_is_out_1") + bezoeker + (undo_check_out ? L("lcl_bez_is_in_3") : L("lcl_bez_is_out_2") );
@@ -137,6 +138,7 @@ for (i = 0 ; i < bez_key_arr.length; i++)
 
       oRs = Oracle.Execute(sql_a);
       aantal_ojb = oRs("aantal").value;
+      oRs.Close();
     }
   }
   else