<%@language = "javascript" %>
<% /*
     $Revision$
     $Id$

    File:               SuggestBesItem.asp
    Description:        Suggereer te bestellen artikelen
    Parameters:         k             De eerste paar letters
                        disc_key    : Toon alleen items uit deze catalogus
                        srtgroep_key
    Globals:
    Context:
    Note:               Omdat/doordat disc_key verpicht is hoeven we geen autorisatie meer te controleren.

*/ %>

<%
JSON_Result = true;
%>
<!-- #include file="../../Shared/common.inc" -->
<!-- #include file="./suggest.inc" -->
<%
var chars = getQParam("k", "");
var disc_key = getQParamInt("disc_key");
var srtgroep_key = getQParamInt("srtgroep_key", -1);
var staffel_key = getQParamInt("staffel_key", -1);
var bAll = getQParamInt("SuggestAll", 0) == 1;

chars = chars.replace(/\*/g,"%");

var filtClause = "";

sql = "SELECT " + lcl.xsqla('bd.ins_discipline_omschrijving', 'bd.ins_discipline_key')
    + "     , " + lcl.xsqla('bes_srtgroep_omschrijving','isg.bes_srtgroep_key')
    + "     , bes_srtdeel_nr || ' ' || "
    +         lcl.xsql('bes_srtdeel_omschrijving','isd.bes_srtdeel_key')
//optie, maar dan anders:    +         "|| ' ' ||TRIM(TO_CHAR(bes.getsrtdeelprijs(isd.bes_srtdeel_key, null),'9999999D99'))"
    +         " descr"
    + "     , bes_srtdeel_key"
    + "     , nvl2(isd.bes_srtdeel_image, p.prs_bedrijf_image_loc || isd.bes_srtdeel_image, null) foto"
    + "     , bd.ins_discipline_key"
    + "  FROM bes_srtdeel isd"
    + "     , bes_srtgroep isg"
    + "     , bes_discipline bd"
    + "     , prs_bedrijf p"
    + " WHERE (UPPER(bes_srtdeel_nr || ' ' || "+ lcl.xsql('bes_srtdeel_omschrijving','isd.bes_srtdeel_key') +") LIKE " + safe.quoted_sql_wild2(chars)
    + ( srtgroep_key < 0
          ? "  OR UPPER("+ lcl.xsql('bes_srtgroep_omschrijving','isg.bes_srtgroep_key') +") LIKE " + safe.quoted_sql_wild2(chars)
          : "")
    + "      )"
    + "   AND isd.prs_bedrijf_key = p.prs_bedrijf_key"
    + "   AND isd.bes_srtgroep_key = isg.bes_srtgroep_key"
    + "   AND isg.ins_discipline_key = bd.ins_discipline_key"
    + "   AND isd.prs_bedrijf_key IS NOT NULL"   // want die geven later een error en kunnen niet besteld worden
    + "   AND p.prs_bedrijf_verwijder IS NULL"   // want ook die geven later een error en kunnen niet besteld worden
    + "   AND bes_srtdeel_verwijder IS NULL"
    + "   AND (bes_srtdeel_vervaldatum IS NULL"
    + "       OR bes_srtdeel_vervaldatum > SYSDATE)"
if (disc_key > 0)
  sql += " AND bd.ins_discipline_key = " + disc_key;
if (srtgroep_key > 0)
  sql += " AND isg.bes_srtgroep_key = " + srtgroep_key;
if (staffel_key > 0)
  sql += " AND isd.bes_staffeltabel_key =" + staffel_key;

sql += " ORDER BY isd.bes_srtdeel_volgnr"
     + ", bes_srtdeel_nr || ' ' || "+ lcl.xsql('bes_srtdeel_omschrijving','isd.bes_srtdeel_key')
     + ", " + lcl.xsql('bd.ins_discipline_omschrijving', 'bd.ins_discipline_key')
     + ", " + lcl.xsql('bes_srtgroep_omschrijving','isg.bes_srtgroep_key');

function fnBesPhoto(oRs)
{
    var icon = oRs("foto").Value || "";
    if (icon.indexOf("/") == -1) // Nog geen enkele slash? Dan moet het wel lokaal zijn.
        icon = S("bes_image_path") + icon;
    return icon;
}

var params = { bAll:          bAll,
               fldName:       "descr",
               fldKey:        "bes_srtdeel_key",
               fldDesc:       (disc_key > 0)?"bes_srtgroep_omschrijving":"ins_discipline_omschrijving",
               fnFoto:        fnBesPhoto
            }

WriteResult2(sql, params);
%>
<% ASPPAGE_END(); %>
