Files
Facilitor/APPL/INS/get_ins_info_ajax.asp
2024-08-28 15:38:53 +00:00

108 lines
3.5 KiB
Plaintext

<%@ language = "JavaScript" %>
<%
/*
$Revision$
$Id$
File: get_ins_info_ajax.asp
Description: Ophalen van allerlei info om client-side data te hebben
Parameters: req_info: "ins_discipline_key" --> requires "ins_discipline_key"
Context:
Note:
Sample: appl/ins/get_ins_info_ajax.asp?req_info=ins_discipline_key&disc_key=1
*/ %>
<%
var JSON_Result = true;
%>
<!-- #include file="../Shared/common.inc"-->
<!-- #include file="./ins.inc" -->
<%
var req_info = getQParam("req_info");
var result = {};
switch (req_info)
{
case "ins_discipline_key":
{
var disc_key = getQParamInt("disc_key");
result = ins.ins_disciplineinfo(disc_key);
break;
}
case "ins_srtcontrole":
{
var srtcontrole_key = getQParamInt("srtcontrole_key");
var sql = "SELECT ctr_discipline_key"
+ " FROM ins_srtcontrole"
+ " WHERE ins_srtcontrole_key = " + srtcontrole_key;
var oRs = Oracle.Execute(sql);
if (!oRs.eof)
result.disc_key = oRs("ctr_discipline_key").Value;
break;
}
case "ins_srtinstallatie":
{
var niveau = getQParam("niveau","");
var install_key = getQParamInt("install_key");
var init_key = getQParamInt("init_key", -1);
var available = getQParamInt("available", 0) == 1;
var sql = "SELECT a.ins_srtinstallatie_key"
+ " , DECODE(niveau, 'D', a.discipline_oms"
+ " , 'G', a.srtgroep_oms"
+ " , 'S', a.srtdeel_oms) ins_srtinstallatie_oms"
+ " FROM ins_v_allsrtinstallatie a";
if (available)
{
switch(niveau)
{
case "D": sql += ", ins_discipline d"; break;
case "G": sql += ", ins_srtgroep g"; break;
case "S": sql += ", ins_srtdeel s"; break;
}
}
sql += " WHERE a.niveau = " + safe.quoted_sql(niveau);
if (available)
{
switch(niveau)
{
case "D": sql += " AND a.ins_discipline_key = d.ins_discipline_key"
+ " AND d.ins_discipline_verwijder IS NULL";
break;
case "G": sql += " AND a.ins_srtgroep_key = g.ins_srtgroep_key"
+ " AND g.ins_srtgroep_verwijder IS NULL";
break;
case "S": sql += " AND a.ins_srtdeel_key = s.ins_srtdeel_key"
+ " AND s.ins_srtdeel_verwijder IS NULL";
break;
}
}
switch(niveau)
{
case "G": sql += " AND a.ins_discipline_key = " + install_key; break;
case "S": sql += " AND a.ins_srtgroep_key = " + install_key; break;
}
sql += " ORDER BY 2"
var new_lov = [];
var oRs = Oracle.Execute(sql);
while(!oRs.eof)
{
new_lov.push({key: oRs("ins_srtinstallatie_key").Value,
oms: oRs("ins_srtinstallatie_oms").Value,
sel: oRs("ins_srtinstallatie_key").Value == init_key});
oRs.MoveNext();
}
oRs.Close();
result.niveau = niveau;
result.lov = new_lov;
break;
}
}
Response.Write(JSON.stringify(result));
%>
<% ASPPAGE_END(); %>