Files
Facilitor/APPL/Shared/Suggest/SuggestSrtdeel.asp
Erik Groener cefc074154 PNBR#34712 overzicht bestelopdrachten
svn path=/Website/trunk/; revision=27922
2016-01-26 13:16:08 +00:00

72 lines
3.0 KiB
Plaintext

<%@language = "javascript" %>
<% /*
$Revision$
$Id$
File: SuggestSrtdeel.asp
Description: Suggereer Srtdelen
Parameters: k De eerste paar letters
filtcode beperk de lijst met getoonde locaties TO BE DEFINED
perslidKey : verplicht Voor wie is de Srtdeel
autfunctionKey: verplicht fac_function_key of -1 als alles toegestaan
autfunction : verplicht:
Globals:
Context:
Note:
TODO: Vergelijk autorisatie in ../MLD/UploadDisciplines.asp
*/ %>
<%
JSON_Result = true;
%>
<!-- #include file="../../Shared/common.inc" -->
<!-- #include file="./suggest.inc" -->
<!-- #include file="./SrtdeelFilter.inc" -->
<%
var chars = getQParam("k", "");
var autfunction = getQParam("autfunction");
var bAll = getQParamInt("SuggestAll", 0) == 1;
var disc_key = getQParamInt("disc_key", -1);
var srtgroep_key = getQParamInt("srtgroep_key", -1);
var module = getQParam("module", "");
var extracode = getQParam("extracode", "");
var filtcode = getQParam("filtcode", "");
var chars = chars.replace(/\*/g,"%");
var params = { autfunction: autfunction,
disc_key: disc_key,
srtgroep_key: srtgroep_key,
module: module };
var filtClause = getFiltClauseSrtdeel(filtcode, params);
var extraInf = getExtraInfSrtdeel(extracode, module);
var sql = "SELECT sd." + module + "_srtdeel_key srtdeel_key"
+ ", COALESCE(sd." + module + "_srtdeel_nr, '') ||"
+ " CASE"
+ " WHEN sd." + module + "_srtdeel_nr IS NULL"
+ " THEN ''"
+ " ELSE sd." + module + "_srtdeel_nr || ' '"
+ " END ||"
+ lcl.xsql("sd." + module + "_srtdeel_omschrijving", "sd." + module + "_srtdeel_key") + " srtdeel_omschrijving"
+ ", " + lcl.xsql("sg." + module + "_srtgroep_omschrijving", "sg." + module + "_srtgroep_key") + " srtgroep_omschrijving"
+ extraInf
+ " FROM " + module + "_v_aanwezigsrtdeel sd"
+ ", " + module + "_v_aanwezigsrtgroep sg"
+ filtClause.from
+ " WHERE sd." + module + "_srtgroep_key = sg." + module + "_srtgroep_key"
+ " AND (" + module + "_srtdeel_vervaldatum IS NULL"
+ " OR " + module + "_srtdeel_vervaldatum > SYSDATE)"
+ " AND (UPPER(" + lcl.xsql("sd." + module + "_srtdeel_omschrijving", "sd." + module + "_srtdeel_key") + ") LIKE " + safe.quoted_sql_wild("%" + chars + "%")
+ " OR UPPER(" + lcl.xsql("sg." + module + "_srtgroep_omschrijving", "sg." + module + "_srtgroep_key") + ") LIKE " + safe.quoted_sql_wild("%" + chars + "%")
+ ")"
+ filtClause.where
+ " ORDER BY sd." + module + "_srtdeel_nr"
+ ", UPPER(" + lcl.xsql("sd." + module + "_srtdeel_omschrijving", "sd." + module + "_srtdeel_key") + ")";
WriteResult(sql, bAll, "srtdeel_omschrijving", "srtdeel_key", "srtgroep_omschrijving", "extra");
%>