Files
Facilitor/APPL/PRJ/prj_edit_scenario_save.asp
Jos Groot Lipman 2aa489e0c7 FCLT#Recordsets die niet gesloten zijn beter detecteren
svn path=/Website/trunk/; revision=47235
2020-06-24 15:42:24 +00:00

83 lines
2.8 KiB
Plaintext

<%@ LANGUAGE = JavaScript %>
<% /*
$Revision$
$Id$
File: prj_edit_scenario_save.asp
Description: Sla de wijzigingen van formulier scenario.asp op.
Merk op dat het voor zowel toevoegen als wijzigen gebruikt wordt.
Parameters:
prj_key Scenario key
mld_key Verhuisaanvraag
prj_perslidkey Invoerder
prjdate Geplande aanvang
prj_omschr Omschrijving van het scenario
prj_status Status van het scenario
prj_raming Geraamde kosten van het scenario
prj_opm Opmerking van het scenario
Context: POST formulier vanuit prj_edit_scenario.asp
Note: Eventueel wordt een BEZ_AFSPRAAK record aangemaakt
Eventueel worden ook parkeerplaatsen gereserveerd
*/ %>
<!-- #include file="../Shared/common.inc" -->
<!-- #include file="../Shared/iface.inc" -->
<!-- #include file="../shared/save2db.inc" -->
<!-- #include file="prj.inc" -->
<%
FCLTHeader.Requires({ js: [] })
/***** Get webform parameters *****/
var prj_key = getQParamInt("prj_key", -1); // Scenario key
/***** End get webform parameters *****/
var autfunction = "WEB_PRJBOF";
var authparams = user.checkAutorisation(autfunction);
var fields = [ { dbs: "prj_scenario_omschrijving", typ: "varchar", frm: "prj_omschr" }, // Omschrijving
{ dbs: "mld_melding_key", typ: "key", frm: "mld_key" }, // Verhuisaanvraag
{ dbs: "prj_scenario_status", typ: "varchar", frm: "prj_status" }, // Status
{ dbs: "prj_scenario_opmerking", typ: "varchar", frm: "prj_opm" }, // Opmerking
{ dbs: "prj_scenario_datum", typ: "date", frm: "prjdate" }, // Geplande aanvang
{ dbs: "prj_scenario_raming", typ: "float", frm: "prj_raming" }, // Geraamde kosten
{ dbs: "prs_perslid_key", typ: "key", frm: "prj_perslidkey" } // Invoerder
];
var sql = "";
if (prj_key <= 0)
{ // Nieuw scenario
fields.push({dbs: "prj_scenario_key", typ: "key", seq: "prj_s_prj_scenario_key"});
var prjIns = buildInsert("prj_scenario", fields);
prj_key = prjIns.sequences["prj_scenario_key"];
sql = prjIns.sql;
}
else
{ // Bestaand scenario
sql = buildUpdate("prj_scenario", fields)
+ " prj_scenario_key = " + prj_key;
}
if (sql != "")
{
oRs = Oracle.Execute(sql);
}
%>
<html>
<head>
<% FCLTHeader.Generate() %>
<script>
var doneParams = { prj_key: <%=prj_key%> };
$(function()
{
FcltMgr.closeDetail(window, doneParams)
});
</script>
</head>
<body id="info">
</body>
</html>
<% ASPPAGE_END(); %>