FCLT#57324 Persoonlijk portal berich op mobile -> desktop

svn path=/Website/trunk/; revision=47860
2020-08-20 06:25:15 +00:00
parent c794af54cc
commit c0357ea04f
1 changed files with 49 additions and 0 deletions
--- a/APPL/PDA/message.asp
+++ b/APPL/PDA/message.asp
@@ -0,0 +1,49 @@
+<%@language="javascript"%>
+
+<!-- #include file="../Shared/common.inc" -->
+<!-- #include file="./mobile.inc" -->
+<!-- #include file="./iface.inc" -->
+<%
+var message_key = getQParamInt("msg_key");
+%>
+<html>
+  <head>
+<% FCLTMHeader.Generate({}); %>
+  </head>
+
+  <body>
+<%
+  var sql = "SELECT m.prs_perslid_key"
+          + "     , m.msg_message_oms"
+          + "     , m.msg_message_aanmaak"
+          + "     , m.msg_message_onderwerp"
+          + "     , m.msg_message_url"
+          + "     , pf.prs_perslid_naam_full"
+          + "  FROM msg_message m, prs_v_perslid_fullnames_all pf"
+          + " WHERE m.msg_message_key = " + message_key
+          + "   AND m.prs_perslid_key = pf.prs_perslid_key";
+
+  oRs = Oracle.Execute(sql);
+  var title = oRs("msg_message_onderwerp").value;
+  var msg_date = new Date(oRs("msg_message_aanmaak").value);
+  var content = oRs("msg_message_oms").value;
+  var sender = oRs("prs_perslid_naam_full").value;
+
+  oRs.Close();
+
+  PAGE_START();
+  HEADER({title: title, back: true, home: true});
+  CONTENT_START();
+
+  ROFIELD("fld", L("lcl_from"), sender);
+  ROFIELD("fld", L("lcl_date"), toDateTimeString(msg_date));
+  ROFIELD("fld", L("lcl_message"), content);
+  
+  CONTENT_END();
+  FOOTER();
+  PAGE_END();
+
+%>
+  </body>
+</html>
+<% ASPPAGE_END(); %>