<% /*
     $Revision$
     $Id$

    File:               srtgroepFilter.inc
    Description:        functies voor srtgroep suggest velden
    Globals:
    Context:
    Note:
*/ %>


<%

function getFiltClauseSrtgroep(pfiltcode, params) // pfiltcode not used yet
{
  var lfiltClause = "";
  var module = params.module || "INS"; // geldige waarden: INS, BES

  if (module != "INS" && module != "BES")
    shared.internal_error(L("lcl_obj_bad_value") + " module={0}.".format(module));

  // Tot nu toe nog altijd voor alle srtgroep suggest velden de sleutelset/cilinderssets niet tonen.
  // Indien ook alleen sleutelsets/cilinderssets getoond dienen te worden dan extra parameter module invoeren (params.module == "INS", params.module == "SLE")
  // Vooralsnog volstaat uitsluiting van sleutelsets/cilinderssets:
  lfiltClause += " AND sg.ins_discipline_key = td.ins_discipline_key"
               + " AND td.ins_discipline_module = " + safe.quoted_sql(module)
               + (module == "INS"
                 ? " AND sg.ins_srtgroep_key NOT IN (" + S("sle_ins_srt_groep_key") + ", " + S("cil_ins_srt_groep_key") + ")"
                 : ""
                 );

  if (params.disc_key && params.disc_key > 0)
    lfiltClause += " AND td.ins_discipline_key = " + params.disc_key;

  if (params.srtgroep_key && params.srtgroep_key > 0)
    lfiltClause += " AND sg." + module + "_srtgroep_key = " + params.srtgroep_key;
    
  if (pfiltcode == "LEND")
  {
    lfiltClause += " AND sg.ins_srtgroep_key IN"
                 + "           (SELECT ins_srtgroep_key"
                 + "              FROM ins_srtdeel sd1"
                 + "             WHERE sd1.ins_srtdeel_verwijder IS NULL"
                 + "               AND sd1.ins_srtdeel_uitleenbaar = 1)";     
  }
  
  if (params.autfunction != "")
  {
    var authparams = user.checkAutorisation(params.autfunction);
    if (authparams.fac_functie_discipline == 1)
    {
        lfiltClause += " AND sg.ins_discipline_key IN ("
                     + "     SELECT g.ins_discipline_key"
                     + "       FROM fac_v_webgebruiker g"
                     + "      WHERE g.prs_perslid_key = " + user_key
                     + "        AND g.fac_functie_key = " + authparams.autfunctionkey
                     + ")";
    }
  }
  return lfiltClause;
}
%>
