From f4b0563f33e6aa3dee7fefca362f21c7e482d0f3 Mon Sep 17 00:00:00 2001
From: Alex Tiehuis <notexist@aareon.nl>
Date: Mon, 16 Nov 2020 16:49:23 +0000
Subject: [PATCH] AAXX#61363 Actiescherm voor opdrachten: ook meldingen af
 kunnen melden

svn path=/Website/trunk/; revision=48830
---
 APPL/API/shorturl.asp | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

diff --git a/APPL/API/shorturl.asp b/APPL/API/shorturl.asp
index 364f5e61b4..666e66f6e6 100644
--- a/APPL/API/shorturl.asp
+++ b/APPL/API/shorturl.asp
@@ -91,6 +91,21 @@ __Log("== Entering shorturl.asp ==");
         }
         if (!found)
         {
+            // add linked call as well
+            if (u == "opdracht")
+            {
+                var sql = "SELECT mld_melding_key"
+                        + "  FROM mld_opdr"
+                        + " WHERE mld_opdr_key = " + keyparam;
+                var oRs = Oracle.Execute(sql);
+                if (!oRs.EOF)
+                {
+                    user_allowed.push({ locked_user_key: lockuser_key,
+                                        xmlnode: "melding",
+                                        key: oRs("mld_melding_key").value
+                                    });
+                }
+            }
             user_allowed.push({ locked_user_key: lockuser_key,
                                 xmlnode: u,
                                 key: keyparam