Files
Facilitor/APPL/Shared/get_ctr_info.asp
Maykel Geerdink f0a201c651 FSN#33999: Realisatie TMJ module voor TobiasAX obv Inspectiemodule.
svn path=/Website/trunk/; revision=30413
2016-08-25 08:25:43 +00:00

46 lines
1.4 KiB
Plaintext

<%@language = "javascript" %>
<% /*
$Revision$
$Id$
File: get_ctr_info.asp
Description: Levert de discipline gegevens op van de ctr discipline.
Parameters:
ctr_disc ctr discipline key
*/ %>
<%
var JSON_Result = true;
%>
<!-- #include file="../Shared/common.inc" -->
<!-- #include file="../Shared/json2.js" -->
<%
/***** Get webform parameters *****/
var ctr_disc = getQParamInt("ctr_disc", -1);
// Geen autorisatie check nodig
/***** End get webform parameters *****/
var sql = "SELECT cd.ins_discipline_key"
+ " , cd.ins_discipline_omschrijving"
+ " , cdp.ctr_disc_params_controle_type"
+ " , cdp.ctr_disc_params_ismjob"
+ " FROM ctr_discipline cd"
+ " , ctr_disc_params cdp"
+ " WHERE cd.ins_discipline_key = cdp.ctr_ins_discipline_key"
+ " AND cd.ins_discipline_key = " + ctr_disc;
var oRs = Oracle.Execute(sql);
var disc_key = oRs("ins_discipline_key").Value;
var disc_omschr = oRs("ins_discipline_omschrijving").Value;
var controle_type = oRs("ctr_disc_params_controle_type").Value;
var ismjob = oRs("ctr_disc_params_ismjob").Value == 1;
var result = { disc_key: ctr_disc,
disc_omschr: disc_omschr,
controle_type: controle_type,
ismjob: ismjob };
Response.Write(JSON.stringify(result));
%>