69 lines
2.6 KiB
Plaintext
69 lines
2.6 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
|
|
*/ %>
|
|
|
|
<%
|
|
DOCTYPE_Disable = 1;
|
|
%>
|
|
|
|
<!-- #include file="../../Shared/common.inc" -->
|
|
<!-- #include file="./suggest.inc" -->
|
|
<!-- #include file="./SrtdeelFilter.inc" -->
|
|
|
|
<%
|
|
var chars = getQParam("k", null);
|
|
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 extracode = getQParam("extracode", "");
|
|
var filtcode = getQParam("filtcode", "");
|
|
|
|
var chars = chars.replace(/\*/g,"%");
|
|
|
|
var params = { autfunction: autfunction,
|
|
disc_key: disc_key,
|
|
srtgroep_key: srtgroep_key,
|
|
filtcode: filtcode };
|
|
|
|
var filtClause = getFiltClauseSrtdeel(params);
|
|
var extraInf = getExtraInfSrtdeel(extracode);
|
|
|
|
var sql = "SELECT sd.ins_srtdeel_key"
|
|
+ ", COALESCE(sd.ins_srtdeel_nr, '') ||"
|
|
+ " CASE"
|
|
+ " WHEN sd.ins_srtdeel_nr IS NULL"
|
|
+ " THEN ''"
|
|
+ " ELSE sd.ins_srtdeel_nr || ' '"
|
|
+ " END ||"
|
|
+ lcl.xsqla('sd.ins_srtdeel_omschrijving', 'sd.ins_srtdeel_key')
|
|
+ ", " + lcl.xsqla('sg.ins_srtgroep_omschrijving', 'sg.ins_srtgroep_key')
|
|
+ extraInf
|
|
+ " FROM ins_v_aanwezigsrtdeel sd"
|
|
+ ", ins_v_aanwezigsrtgroep sg"
|
|
+ " WHERE sd.ins_srtgroep_key = sg.ins_srtgroep_key"
|
|
+ " AND (ins_srtdeel_vervaldatum IS NULL"
|
|
+ " OR ins_srtdeel_vervaldatum > SYSDATE)"
|
|
+ " AND (UPPER(" + lcl.xsql('sd.ins_srtdeel_omschrijving', 'sd.ins_srtdeel_key') +") LIKE " + safe.quoted_sql_wild("%" + chars + "%")
|
|
+ " OR UPPER(" + lcl.xsql('sg.ins_srtgroep_omschrijving', 'sg.ins_srtgroep_key') + ") LIKE " + safe.quoted_sql_wild("%" + chars + "%") + ")"
|
|
+ filtClause
|
|
+ " ORDER BY sd.ins_srtdeel_nr"
|
|
+ ", UPPER(" + lcl.xsql('sd.ins_srtdeel_omschrijving', 'sd.ins_srtdeel_key') + ")";
|
|
|
|
WriteResult(sql, bAll, "ins_srtdeel_omschrijving", "ins_srtdeel_key", "ins_srtgroep_omschrijving", "extra");
|
|
%>
|