FSN#39750 App registraties tonen en kunnen wissen

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

APPL/API2/model_aut_client_perslid.inc

@@ -31,7 +31,12 @@ function model_aut_client_perslid(params)
             "label": L("aut_client"),
             "typ": "key",
             "hidden_fld": true,
-            "required": true
+            "required": true,
+            "foreign": {
+                "tbl": "aut_client",
+                "key": "aut_client_key",
+                "desc": "aut_client_omschrijving"
+            }
         },
         "device_id": {
             "dbs": "aut_client_perslid_device_id",

APPL/API2/model_aut_idp.inc

@@ -128,7 +128,8 @@ function model_aut_idp(params)
             "label": L("aut_idp_autocreate"),
             "typ": "key",
             "required": "true",
-            "LOV": "0;Weigeren bij onbekend;1;Aanmaken;2;Alleen bijwerken;3;Aanmaken en bijwerken" ///L("aut_idp_autocreateLOV")
+            "LOV": L("aut_idp_autocreateLOV"),
+            "defaultvalue": 0
         },
         "company": {
              "dbs": "prs_bedrijf_key",
@@ -155,7 +156,8 @@ function model_aut_idp(params)
         "loglevel": {
             "dbs": "aut_idp_loglevel",
             "label": L("aut_idp_loglevel"),
-            "typ": "number"
+            "typ": "number",
+            "defaultvalue": 0
         },
         "internal": {
             "dbs": "aut_idp_internal",

APPL/AUT/getapptoken.asp

@@ -18,6 +18,9 @@ var JSON_Result = true;
 <!-- #include file="../api2/api2.inc" -->
 <!-- #include file="../api2/model_aut_client.inc" -->
 <%
+    Session.Codepage = 65001; // We doen *uitsluitend* utf-8
+    Response.Charset = 'utf-8';
+
     var client_id = getQParam("client_id");
     var device_id = getQParam("device_id", "AUTO_" + shared.random(32)); // optional device identification
                                                                          // Hetzelfde device krijgt altijd hetzelfde token terug

APPL/FAC/fac_user_info.asp

@@ -482,6 +482,18 @@ oRs.Close();
             CreateButtons(buttons);
           BLOCK_END();
         }
+
+        var sql = "SELECT COUNT(*)"
+                + "  FROM aut_client_perslid"
+                + " WHERE prs_perslid_key = " + prs_key;
+        var oRs = Oracle.Execute(sql);
+        var cnt = oRs(0).Value;
+        oRs.Close()
+        if (cnt > 0)
+        {
+            page = "../mgt/aut_client_perslid.asp?mode=list&person=" + prs_key;
+            IFRAMER("appFrame", page, { initHide: true } );
+        }
 %>
       </form>
     </div>

APPL/PRS/prs_perslid_clear_sessions.asp

@@ -35,7 +35,10 @@ Oracle.Execute(sql);
 // Deze ook weg
 var sql = "DELETE FROM fac_bookmark"
         + " WHERE fac_bookmark_naam IN ('PRS password reset', 'PRS QR code indentificatie')"
-        + "   AND prs_perslid_key = " + user_key;
+        + "   AND prs_perslid_key = " + theUser_key;
+Oracle.Execute(sql);
+var sql = "DELETE FROM aut_client_perslid"
+        + " WHERE prs_perslid_key = " + theUser_key;
 Oracle.Execute(sql);
 
 // if (theUser_key == user_key)