53 lines
2.2 KiB
Plaintext
53 lines
2.2 KiB
Plaintext
<%@language = "javascript" %>
|
|
<% /*
|
|
$Revision$
|
|
$Id$
|
|
*/ %>
|
|
|
|
<%
|
|
DOCTYPE_Disable = true;
|
|
%>
|
|
|
|
<!-- #include file="../Shared/common.inc" -->
|
|
<!-- #include file="../Shared/selector.inc" -->
|
|
|
|
<%
|
|
// Build an article list
|
|
var autfunction = getQParam("autfunction", ""); // Check of user rechten heeft op meegegeven artikelen
|
|
var artcat_key_arr = getQParamIntArray("artcat_key_str", []); // Artikel catalogus string: -2 als lege waarde meegegeven omdat -1 een geldige waarde is
|
|
var article_arr = getQParamIntArray("article_str", []); // Artikel string
|
|
|
|
var sql_aut = " SELECT rd.ins_discipline_key ins_discipline_key"
|
|
+ " FROM res_v_aanwezigdiscipline rd"
|
|
+ ", fac_v_webgebruiker fw"
|
|
+ ", fac_functie fwf"
|
|
+ " WHERE rd.ins_discipline_min_level = 2"
|
|
+ " AND fw.ins_discipline_key = rd.ins_discipline_key"
|
|
+ " AND fw.fac_functie_key = fwf.fac_functie_key"
|
|
+ " AND fwf.fac_functie_code = " + safe.quoted_sql(autfunction)
|
|
+ " AND fw.prs_perslid_key = " + user_key;
|
|
|
|
var sql = "SELECT DISTINCT a.res_artikel_key"
|
|
+ ", "+ lcl.xsql('a.res_artikel_omschrijving', 'a.res_artikel_key')
|
|
+ " || CASE"
|
|
+ " WHEN (a.res_artikel_ingangsdatum IS NULL OR a.res_artikel_ingangsdatum <= SYSDATE) AND (a.res_artikel_vervaldatum IS NULL OR a.res_artikel_vervaldatum > SYSDATE) "
|
|
+ " THEN ''"
|
|
+ " ELSE " + safe.quoted_sql(L("lcl_inactive_data_suffix"))
|
|
+ " END res_artikel_omschrijving"
|
|
+ ", "+ lcl.xsqla('a.res_artikel_eenheid','a.res_artikel_key')
|
|
+ " FROM res_v_aanwezigartikel a"
|
|
+ " WHERE a.res_discipline_key IN (" + sql_aut + ")"
|
|
+ (artcat_key_arr.length
|
|
? " AND a.res_discipline_key IN (" + artcat_key_arr.join(",") + ")"
|
|
: "")
|
|
+ " ORDER BY "+ lcl.xsql('res_artikel_omschrijving','a.res_artikel_key');
|
|
|
|
FCLTselector("artmulti",
|
|
sql,
|
|
{ initKey: article_arr.length? article_arr.join(",") : "-1", // Indien geen waarde meegegeven dan "Alles" selecteren (key = -1).
|
|
multi: true,
|
|
emptyOption: L("lcl_all")
|
|
});
|
|
%>
|
|
|