AAEN#25393 Doublecheck meldingen bij objecten

svn path=/Website/branches/v5.2.3/; revision=16631

APPL/MLD/mld_edit_melding_save.asp

@@ -107,9 +107,8 @@ if (!forcesave && (fronto || frontend) && isNew)
     else if (stdm_info.alg_onrgoed_niveau == "L")
       var where_alg = "org.alg_locatie_key = " + locatiekey;
 
-    var where_obj = "";
-    if (one_object) // Als er 1 object is geselecteerd
-      where_obj = " OR mo.ins_deel_key = " + obj_arr;
+    // Als er exact 1 object is geselecteerd beschouwen
+    // we alleen meldingen op dat object
 
     sql = "SELECT DISTINCT m.mld_melding_key"
         + "  FROM mld_melding m"
@@ -117,12 +116,14 @@ if (!forcesave && (fronto || frontend) && isNew)
         + (one_object?
           "     , mld_melding_object mo" : "")
         + " WHERE m.mld_alg_onroerendgoed_keys = org.alg_onroerendgoed_keys"
-        + (one_object?
-          "   AND m.mld_melding_key = mo.mld_melding_key" : "")
+        + (one_object
+          ? "   AND m.mld_melding_key = mo.mld_melding_key"
+            + " AND mo.ins_deel_key = " + obj_arr
+          : "")
         + "   AND m.mld_melding_status IN (0, 2, 3, 4, 7)"
         + "   AND m.mld_melding_parentkey IS NULL" // Geen child meldingen tonen
         + "   AND m.mld_stdmelding_key = " + stdm_key
-        + "   AND (" + where_alg + where_obj + ")";
+        + "   AND " + where_alg;
     oRs = Oracle.Execute(sql);
     if (!oRs.eof)
     { // Er is mogelijk een dubbele melding aanwezig