Files
Facilitor/APPL/PDA/menu.asp

52 lines
1.4 KiB
Plaintext

<%@ language = "JavaScript" %>
<% /*
$Revision$
$Id$
File: pda/portalnews.asp
Shows the relevant (location-bound) news
Parameters: -
*/
%>
<!-- #include file="../Shared/common.inc" -->
<!-- #include file="./mobile.inc" -->
<!-- #include file="./iface.inc" -->
<!-- #include file="../FAC/fac_menu.inc" -->
<html>
<head>
<%
var qrc = getQParamInt("qrc", 0) != 0;
var menukop_key = getQParamInt("menukop_key", -1); // Voor mobile submenu's
var pageTitle = L("lcl_menu_level1");
var isSubMenu = (menukop_key > -1);
if (isSubMenu) {
var sqln = "SELECT " + lcl.xsql2('COALESCE (fac_menu_altlabel, fac_menuitems_label)', 'fac_menu_altlabel', 'fac_menu_key') + " label"
+ " FROM fac_menu m"
+ " , fac_menuitems mi"
+ " WHERE m.fac_menuitems_key = mi.fac_menuitems_key(+) AND fac_menu_key = " + menukop_key;
var oRs = Oracle.Execute(sqln);
var result;
if (!oRs.eof) {
pageTitle = oRs("label").Value;
}
oRs.close();
}
FCLTMHeader.Generate({}); %>
</head>
<body>
<%
PAGE_START();
HEADER({ title: pageTitle, back: !qrc, home: !qrc });
CONTENT_START();
var pmode = Session("app_build") ? 5 : 4;
generateMenu(pmode, { "menukop_key": menukop_key });
CONTENT_END();
FOOTER();
PAGE_END();
PDA_PAGE_END(); %>
</body>
</html>
<% ASPPAGE_END(); %>