HCAS#39022: onderwerp geplande acties.

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

APPL/MLD/mld_edit_melding.asp

@@ -88,8 +88,19 @@ else // Nieuwe melding
   // en zijn we nog verder van huis
   user.auth_required_or_abort(urole=='fe'?this_mld.canFEwrite:this_mld.canFOwrite); // Dit is nog ongeacht de melding
 
+  var act_key = getQParamInt("act_key", -1);  // fac_activiteit_key voor geplande meldingen.
+  var act_oms = "";
+  if (act_key > 0)
+  {
+    var sql = "SELECT fac_activiteit_omschrijving"
+            + "  FROM fac_activiteit"
+            + " WHERE fac_activiteit_key = " + act_key;
+    oRs = Oracle.Execute(sql);
+    act_oms = oRs("fac_activiteit_omschrijving").Value;
+  }
+  var mld_omschr = getQParam("txt" , act_oms);
+
   var mld_defaultstdmelding = getQParamInt("mld_defaultstdmelding", -1);
-  var mld_omschr = getQParam("txt" , "");
   var disc = getQParamInt("disc", -1);
   var loc_key = getQParamInt("loc_key", -1);
   var bld_key = getQParamInt("bld_key", -1);
@@ -182,7 +193,7 @@ else
                   melder_key: rsv_ruimte_key > 0? contact_key : null,
                   place: -1,
                   stdm: mld_defaultstdmelding,
-                  act_key: getQParamInt("act_key", -1), // fac_activiteit_key voor geplande meldingen
+                  act_key: act_key,
                   einddatum: einddatum,
                   melddatum: new Date(),
                   mld_ordernr: "",