Files
Facilitor/APPL/MLD/mld_reschedule_save.asp
Jos Groot Lipman e5d42faffd Merge 2024.1 Gold A patches
svn path=/Website/trunk/; revision=64055
2024-03-26 08:30:30 +00:00

73 lines
2.6 KiB
Plaintext

<%@language = "javascript" %>
<% /*
$Revision$
$Id$
File: mld_reschedule_save.asp
Description: Bewaar de nieuwe actiedatum en notitie bij het herplannen van een melding.
Parameters: mld_key
mld_note
Context: Vanuit mld_reschedule.asp
Note:
*/
var JSON_Result = true;
%>
<!-- #include file="../Shared/common.inc" -->
<!-- #include file="../Shared/save2db.inc" -->
<!-- #include file="mld.inc" -->
<!-- #include file="mld_edit_note.inc" -->
<%
protectRequest.validateToken();
var mld_key_arr = getQParamIntArray("mld_key");
var notitie = getFParam("opmerk", "");
var ingesloten = [];
for (var i=0; i < mld_key_arr.length; i++)
{
var this_mld = mld.func_enabled_melding(mld_key_arr[i]);
if (this_mld.canHerplan)
{ // Bepaal welke meldingen herpland mogen worden.
ingesloten.push(mld_key_arr[i]);
}
}
for (i=0; i<ingesloten.length; i++)
{
// Wijzig de actiedatum van de melding.
var fields = [ { dbs: "mld_melding_actiedatum", typ: "datetime", frm: "actiondate", track: L("lcl_mld_actiondate") } ];
var mldUpd = buildTrackingUpdate("mld_melding", " mld_melding_key = " + ingesloten[i], fields);
Oracle.Execute(mldUpd.sql);
if (mldUpd.trackarray.length)
mld.trackmeldingupdate(ingesloten[i], L("lcl_mld_is_mldupd") + "\n" + mldUpd.trackarray.join("\n"));
// Voeg de notitie aan de melding toe.
var mld_key = ingesloten[i];
var mld_info = mld.mld_melding_info(mld_key);
var result = mld_note_save(mld_key,
notitie, // Text van de notitie.
{ note_key: -1, // Als een nieuwe notitie.
note_parent_key: -1,
has_zichtbaarFE: true,
zichtFE: true,
notifyFE: false,
notifyFEchild: false,
notifyExt: false,
action2FE: mld_info.actiecode & 2, // Niet aanpassen
has_notifyBO: false,
notifyBO: false,
fac_note_group_key: null,
ismailnote: 0,
bijlage: false
});
}
var result = {success: true, message: "", key: ingesloten.join(",")};
Response.Write(JSON.stringify(result));
%>
<% ASPPAGE_END(); %>