AAFM#31226 Edit-mode bij vervolgmeldingen

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

APPL/MLD/mld_continue.asp

@@ -10,11 +10,19 @@
 <!-- #include file="../Shared/iface.inc" -->
 <!-- #include file="../Shared/disciplineselector.inc" -->
 <!-- #include file="../Shared/stdmeldingselector.inc" -->
+<!-- #include file="../Shared/persoonselector.inc" -->
 <!-- #include file="mld.inc" -->
 
 <%
 FCLTHeader.Requires({ plugins: ["suggest", "jQuery"] });
 var urole = getQParamSafe("urole");
+var backo  = urole == "bo";
+var autfunction = '';
+if (backo)
+  autfunction = 'WEB_MLDBOF';
+else
+  autfunction = 'WEB_MLDUSE';
+
 var mld_key = getQParamInt('mld_key');
 var this_mld = mld.func_enabled_melding(mld_key);
 user.auth_required_or_abort(this_mld.canContinue);
@@ -106,6 +114,19 @@ lcl.set_dialect(mld_melding.srtdisc, "MLD_SRTDISCIPLINE_KEY");
                                onChange: "onChangeStdMelding",
                                required: true
                              } );
+      // Melder
+      if (S("mld_continue_edit_issuer"))
+      {
+          FCLTpersoonselector("person",
+                              "sgPerson",
+                              { perslidKey: mld_melding.melder_key,
+                                label: L("lcl_mld_name"),
+                                fieldNameKey: "person",
+                                moreinfo: backo,
+                                autlevel: this_mld.authparams(autfunction) && this_mld.authparams(autfunction).PRSwritelevel,
+                                required: true
+                              });
+      }
       // Opmerking die wordt opgeslagen in de oorspronkelijke opmerking
 
       RWTEXTAREATR("opmerk",  "fldremark", L("lcl_mld_omschr_oorsprong"), mld_melding.remark,     {html: "rows='8'", readonly: (mld_melding.mld_status==5?true:false)});

APPL/MLD/mld_continue_save.asp

@@ -28,6 +28,8 @@ var mld_key = getQParamInt("mld_key");
 var stdm_key = getFParamInt("stdm");
 var opmerk = getFParam("opmerk", "");
 var vervolg = getFParam("vervolg", "");
+var person_key = getFParamInt("person", -1);
+var disc_key = getFParamInt("disc", -1);
 
 var stdm_info = mld.mld_stdmeldinginfo(stdm_key);
 
@@ -81,7 +83,20 @@ if (mldUpd.trackarray.length)
 var foundValue = false;
 var waarde = null;
 
-var melder_info = new Perslid(mld_melding.melder_key); // Je maakt de melding voor jezelf aan (prs_perslid_key_voor is user_key.
+var melder_key = ((S("mld_continue_edit_issuer") && person_key != -1) ? person_key : mld_melding.melder_key);
+var melder_info = new Perslid(melder_key); // Je maakt de melding voor jezelf of ander aan (prs_perslid_key_voor is user_key).
+
+if ((S("mld_continue_edit_issuer") && person_key != -1))
+{
+    var this_melder = melder_info.func_enabled2("MLD", { ins_discipline_key: disc_key,
+                                                         loc_key: mld_melding.loc_key,
+                                                         prs_key: melder_key
+                                                       });
+    var melder_auth = this_melder.authparams(authparams);
+    var canAdd = melder_auth && melder_auth.PRSwritelevel < 9 && melder_auth.ALGwritelevel<9;
+    user.auth_required_or_abort(canAdd);
+}
+
 var kp_key = mld_melding.kostenpl_key;
 
 // Kostenplaats is verplicht maar geen kostenplaats bij de orginele melding?
@@ -141,7 +156,7 @@ sql = "INSERT INTO mld_melding ("
     + ", mld_kosten_klant"
     + ", mld_melding_document"
     + ", mld_melding_ordernr"
-    + ", "+ (melder_info.isSystemUser() ? user_key : "prs_perslid_key")
+    + ", "+ (melder_info.isSystemUser() ? user_key : melder_key)
     + ", mld_adres_key"
     + ", " + mld_key
     + ", 3" // Altijd normaal. Vervolgmelding kent misschien onze prio niet