From b9530003aff56ed15db6b0e8194794397204cbfc Mon Sep 17 00:00:00 2001
From: Jos Groot Lipman <jos.grootlipman@aareon.nl>
Date: Thu, 18 Feb 2016 14:45:18 +0000
Subject: [PATCH] FSN#33490 Alleen BES-artikelen tonen waar je BESFOF of BESUSE
 voor hebt

svn path=/Website/trunk/; revision=28217
---
 APPL/FAC/prodsearch.inc | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/APPL/FAC/prodsearch.inc b/APPL/FAC/prodsearch.inc
index 51ac05fb32..b60fd4d842 100644
--- a/APPL/FAC/prodsearch.inc
+++ b/APPL/FAC/prodsearch.inc
@@ -59,6 +59,8 @@ function prodsearch_queries(write_discs, filter)
   // extra is voor als je nader de omschrijving wilt aanpassen (in plaats van 'Bestelling' toon je 'van der Most')
   // daarnaast kan/zal de sql naar eigen inzicht nog meer kolommen opleveren die alleen gebruikt
   // zullen/kunnen worden voor histogrammen als de soort fixed is
+  var write_discs_BESUSEFOF = fac.mydisciplinessqlstring(user_key, ["WEB_BESUSE", "WEB_BESFOF"]).write;
+
   queries['besartikel'] =
       { sql:
             "SELECT bes_srtdeel_key product_key, "
@@ -78,6 +80,7 @@ function prodsearch_queries(write_discs, filter)
           + "   AND (sd.bes_srtdeel_vervaldatum IS NULL OR sd.bes_srtdeel_vervaldatum > SYSDATE)"
           + "   AND sd.prs_bedrijf_key IS NOT NULL"
           + "   AND sd.prs_bedrijf_key = p.prs_bedrijf_key"
+          + "   AND d.ins_discipline_key IN (" + write_discs_BESUSEFOF + ")"
           + "   AND " + fac.createOrClause("UPPER("+ lcl.xsql('sd.bes_srtdeel_omschrijving',   'sd.bes_srtdeel_key')   + "||','||"
                                                    + lcl.xsql('d.ins_discipline_omschrijving', 'd.ins_discipline_key') + "||','||"
                                                    + lcl.xsql('bes_srtgroep_omschrijving',     'sg.bes_srtgroep_key')  + "||','||"