MDUX#31137 MDUX - Kan in exp_export.asp een bevestigingsvraag worden ingebouwd?

svn path=/Website/trunk/; revision=40503
This commit is contained in:
Erik Groener
2019-01-11 08:43:34 +00:00
parent fe4773ddd6
commit 9c4b7bffcf

View File

@@ -0,0 +1,78 @@
<%@ LANGUAGE = JavaScript %>
<% /*
$Revision$
$Id$
File: exp_export_confirm.asp
Description: Vraag om bevestiging voor het uitvoeren van de export
Parameters:
Context:
Note:
*/
%>
<!-- #include file="../Shared/common.inc" -->
<!-- #include file="../Shared/iface.inc" -->
<!-- #include file="../Shared/json2.js" -->
<%
var export_key = getQParamInt("export_key", -1);
var menu_key = getQParamInt("from_menu_key", -1);
FCLTHeader.Requires({ plugins: ["jQuery"] });
%>
<html>
<head>
<% FCLTHeader.Generate(); %>
<script type="text/javascript">
function exp_cancel()
{
FcltMgr.closeDetail(window, { cancel: true } );
}
function exp_submit(close)
{
var my_url = "../exp/exp_export.asp?export_key=<%=export_key%>";
window.open(my_url);
FcltMgr.closeDetail(window);
return true; // disable button
}
</script>
</head>
<body class="modal" id="mod_expconfirm">
<form id="confirmform" name="confirmform" action="exp_export.asp?export_key=<%=export_key%>" method="post">
<%
var exp_naam = "";
var sql = "SELECT fac_menu_altlabel"
+ " FROM fac_menu"
+ " WHERE fac_menu_key = " + menu_key;
var oRs = Oracle.Execute(sql);
if (!oRs.eof)
exp_naam = oRs("fac_menu_altlabel").Value;
oRs.Close();
var ttl = L("lcl_export_confirm").format(exp_naam);
BLOCK_START("mldCancel", ttl);
ROFIELDTR("fld", "", "\n"+L("lcl_R_U_sure"));
BLOCK_END();
var buttons = [ {title: L("lcl_cnt_export"), icon: "accept.png", action: "exp_submit()", singlepress: true, id: "exp_export_submit" }
, {title: L("lcl_cancel"), icon: "cancel.png", action: "exp_cancel()" }
];
CreateButtons(buttons);
IFACE.FORM_END();
%>
</form>
</body>
</html>