Files
Facilitor/APPL/ALG/alg_edit_district_save.asp
Jos Groot Lipman 0b3bc6525b FSN#23111 Overal svn:needlock op, keyword expansion aan en $Modtime vervangen door $Id
svn path=/Website/trunk/; revision=6149
2012-04-15 16:16:32 +00:00

74 lines
2.5 KiB
Plaintext

<%@language = "javascript" %>
<% /*
$Revision$
$Id$
SUBMIT-form
*/ %>
<!-- #include file="../Shared/common.inc" -->
<!-- #include file="../shared/save2db.inc" -->
<!-- #include file="../Shared/kenmerk_common.inc"-->
<% FCLTHeader.Requires({ plugins:["jQuery", "kenmerk"],
js: []
}) %>
<%
var dis_key = getQParamInt( "dis_key" );
var fields = [ { dbs: "alg_district_omschrijving", typ: "varchar", frm: "dis_oms" },
{ dbs: "alg_regio_key", typ: "number", frm: "regiokey" }];
var warning = "";
if (dis_key > 0)
{
sql = buildUpdate("alg_district", fields)
+ " alg_district_key = " + dis_key;
var err = Oracle.Execute(sql, true);
if (err.friendlyMsg)
warning = err.friendlyMsg;
}
else
{
fields.push({ dbs: "alg_district_key", typ: "key", seq: "alg_s_alg_district_key" });
var regIns = buildInsert("alg_district", fields);
var dis_key = regIns.sequences["alg_district_key"];
sql = regIns.sql;
var err = Oracle.Execute(sql, true);
if (err.friendlyMsg)
warning = err.friendlyMsg;
}
if (!warning)
{
currentKenmerkenSQL = " SELECT k.ALG_kenmerk_key " +
" , ok.alg_onrgoedkenmerk_waarde" +
" FROM ALG_ONRGOEDKENMERK ok, ALG_KENMERK k " +
" WHERE k.ALG_KENMERK_KEY = ok.ALG_KENMERK_KEY " +
" AND ALG_ONRGOEDKENMERK_VERWIJDER IS NULL " +
" AND ALG_ONRGOED_NIVEAU = 'D' " +
" AND ALG_ONRGOED_KEY = " + dis_key;
saveFlexKenmerken(dis_key, "ALG_ONRGOEDKENMERK", "ALG_ONRGOED_KEY",
"ALG_ONRGOEDKENMERK_WAARDE", "ALG_KENMERK_KEY",
currentKenmerkenSQL, false, //QueryForm, rest QueryString
"ALG_ONRGOED_NIVEAU", "D",
(dis_key<0),"ALG/D")
}
%>
<html>
<head>
<% FCLTHeader.Generate() %>
<script>
$(document).ready(function () {
FcltMgr.closeDetail(window, { dis_key: <%=dis_key%>,
warning: "<%=safe.jsstring(warning)%>",
keepForm: <%=warning?"true":"false"%>
}); } );
</script>
</head>
<body>
</body>
</html>