CSUN#40658: Einddatum melding verspringt (ongewenst) vanzelf.

svn path=/Website/branches/v2017.1/; revision=34130

APPL/MLD/mld_forward_save.asp

@@ -52,6 +52,7 @@ var sql = "SELECT mm.mld_stdmelding_key"
         + "     , mm.mld_melding_opmerking"
         + "     , mm.mld_melding_spoed"
         + "     , msm.mld_ins_discipline_key"
+        + "     , mm.mld_melding_einddatum"
         + "  FROM mld_melding mm, mld_stdmelding msm"
         + " WHERE mm.mld_stdmelding_key = msm.mld_stdmelding_key"
         + "   AND mld_melding_key = " + mld_key;
@@ -60,6 +61,7 @@ var old_stdm = oRs("mld_stdmelding_key").Value;
 var old_disc = oRs("mld_ins_discipline_key").Value;
 var mld_opm = oRs("mld_melding_opmerking").Value || "";
 var spoed = oRs("mld_melding_spoed").Value;
+var einddatum = new Date(oRs("mld_melding_einddatum").Value);
 oRs.Close();
 
 var this_stdm = mld.mld_stdmeldinginfo(stdm_key);
@@ -107,6 +109,18 @@ else
     fields.push({ dbs: "mld_melding_spoed",  typ: "key",    val: 3,      track: L("lcl_mld_urg"), foreign: mld.getpriotext });
   var mldUpd = buildTrackingUpdate("mld_melding", " mld_melding_key = " + mld_key, fields);
   Oracle.Execute(mldUpd.sql);
+
+  // Als een melding wordt doorgestuurd naar een andere stdmelding die niet planbaar is, kan de einddatum aangepast worden door de trigger mld_t_mld_melding_B_IU.
+  // Dan wordt dat niet getrackt. Hier controleren of de einddatum door de trigger is aangepast en desnoods tracking toevoegen.
+  var sql = "SELECT m.mld_melding_einddatum"
+          + "  FROM mld_melding m"
+          + " WHERE m.mld_melding_key = " + mld_key;
+  var oRs = Oracle.Execute(sql);
+  var einddatum_new = new Date(oRs("mld_melding_einddatum").Value);
+  oRs.Close();
+  if (einddatum.getTime() != einddatum_new.getTime())
+    mldUpd.trackarray.push(L("lcl_mld_enddate") + ": " + buildTrackText("datetime", einddatum, einddatum_new));
+
   if (mldUpd.trackarray.length)
   {
     var formattedID = this_stdm.ins_srtdiscipline_prefix + mld_key + " (" + this_stdm.discipline_omschrijving + "/" + this_stdm.stdmelding_omschrijving + ")";