From 724d91b60a9e08f937d4a8bc71c6f3c4ed3b3792 Mon Sep 17 00:00:00 2001
From: Peter Koerhuis <peter.koerhuis@aareon.com>
Date: Fri, 22 Mar 2013 16:25:09 +0000
Subject: [PATCH] svn path=/Customer/trunk/; revision=17341

---
 DEMO/demo.sql | 122 ++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 122 insertions(+)

diff --git a/DEMO/demo.sql b/DEMO/demo.sql
index 9c503f113..dbac0598b 100644
--- a/DEMO/demo.sql
+++ b/DEMO/demo.sql
@@ -2014,6 +2014,128 @@ AS
     WHERE x.prs_afdeling_key = a.prs_afdeling_key;
 
 
+CREATE OR REPLACE VIEW demo_v_rap_voorraad
+(
+   HIDE_F_EXTERN_DISKEY,
+   HIDE_F_SRTGROEP_OMSCHRIJVING,
+   FCLT_F_CATALOGUS,
+   ARTIKEL_NR,
+   ARTIKEL_OMSCHRIJVING,
+   ARTIKEL_PRIJS,
+   MAGAZIJN,
+   MIN_VOORRAAD,
+   MAX_VOORRAAD,
+   INKOOP_GELEVERD,
+   INTERN_BESTELD,
+   VOORRAAD,
+   INKOOP_BESTELD,
+   INKOOP_LEVERDATUM,
+   INKOOP_GEWENST
+)
+AS
+   SELECT extern.dkey,
+          COALESCE (intern.bes_srtgroep_omschrijving,
+                    extern.bes_srtgroep_omschrijving),
+          COALESCE (intern.ins_discipline_omschrijving,
+                    extern.ins_discipline_omschrijving),
+          extern.bes_srtdeel_nr,
+          COALESCE (intern.bes_srtdeel_omschrijving,
+                    extern.bes_srtdeel_omschrijving),
+          COALESCE (intern.srtdeel_prijs, extern.srtdeel_prijs),
+          intern.magazijn,
+          extern.vmin,
+          extern.vmax,
+          extern.geleverd,
+          intern.besteld,
+          extern.geleverd - COALESCE (intern.besteld, 0) voorraad,
+          extern.besteld,
+          TO_CHAR(extern.leverdatum, 'dd-mm-yyyy'),
+          CASE
+             WHEN ( (COALESCE (extern.besteld, 0)
+                     + COALESCE (extern.geleverd, 0))
+                   - COALESCE (intern.besteld, 0)) < extern.vmin
+             THEN
+                extern.vmax
+                - ( (COALESCE (extern.besteld, 0)
+                     + COALESCE (extern.geleverd, 0))
+                   - COALESCE (intern.besteld, 0))
+             ELSE
+                NULL
+          END
+             extern_gewenst
+     FROM    (SELECT bd.ins_discipline_key dkey,                 -- INKOOP-key
+                     g.bes_srtgroep_omschrijving,
+                     sd.bes_srtdeel_nr,                      -- ext. artikelnr
+                     sd.bes_srtdeel_omschrijving,
+                     bes.getsrtdeelprijs (sd.bes_srtdeel_key, NULL)
+                        srtdeel_prijs,
+                     bd.ins_discipline_omschrijving,     -- ext. catalogusnaam
+                     sd.bes_srtdeel_voorraadmin vmin,      -- ext. voorraadmin
+                     sd.bes_srtdeel_voorraadmax vmax,      -- ext. voorraadmax
+                     (SELECT SUM (coalesce(boi.bes_bestelopdr_item_aantal, bi.bes_bestelling_item_aantal)-COALESCE(boi.bes_bestelopdr_item_aantalontv,0))
+                        FROM bes_bestelling b, bes_bestelling_item bi, bes_bestelopdr_item boi
+                       WHERE     boi.bes_bestelopdr_item_key(+) = bi.bes_bestelopdr_item_key
+                             AND bi.bes_bestelling_item_status IN (2, 3, 4, 5)
+                             AND b.bes_bestelling_key = bi.bes_bestelling_key
+                             AND bi.bes_srtdeel_key = sd.bes_srtdeel_key)
+                        besteld,
+                     (SELECT MIN (b.bes_bestelling_leverdatum)
+                        FROM bes_bestelling b, bes_bestelling_item bi, bes_bestelopdr_item boi
+                       WHERE     boi.bes_bestelopdr_item_key(+) = bi.bes_bestelopdr_item_key
+                             AND bi.bes_bestelling_item_status IN (2, 3, 4, 5)
+                             AND COALESCE(bes_bestelopdr_item_aantal, bi.bes_bestelling_item_aantal) <> COALESCE(bes_bestelopdr_item_aantalontv, 0)
+                             AND b.bes_bestelling_key = bi.bes_bestelling_key
+                             AND bi.bes_srtdeel_key = sd.bes_srtdeel_key)
+                        leverdatum,
+                     (SELECT SUM (boi.bes_bestelopdr_item_aantalontv)
+                        FROM bes_bestelling b, bes_bestelling_item bi, bes_bestelopdr_item boi
+                       WHERE  --   boi.bes_bestelopdr_item_status in (6,7) AND
+                                 b.bes_bestelling_key = bi.bes_bestelling_key
+                             AND boi.bes_bestelopdr_item_key = bi.bes_bestelopdr_item_key
+                             AND bi.bes_srtdeel_key = sd.bes_srtdeel_key)
+                        geleverd
+                FROM bes_srtdeel sd,
+                     bes_srtgroep g,
+                     bes_discipline bd,
+                     bes_disc_params dp
+               WHERE     sd.bes_srtdeel_verwijder IS NULL
+                     AND sd.bes_srtgroep_key = g.bes_srtgroep_key
+                     AND g.ins_discipline_key = bd.ins_discipline_key
+                     AND bd.ins_discipline_key = dp.bes_ins_discipline_key
+                     AND dp.bes_ins_discipline_key_inkoop IS NULL
+                     AND bd.ins_discipline_key IN
+                              (SELECT bes_ins_discipline_key_inkoop
+                                 FROM bes_disc_params
+                                WHERE bes_ins_discipline_key_inkoop IS NOT NULL))
+             extern                 -- Inkoop artikelen uit externe catalogus!
+          FULL JOIN
+             (SELECT dp.bes_ins_discipline_key_inkoop dkey,      -- INKOOP-key
+                     g.bes_srtgroep_omschrijving,
+                     sd.bes_srtdeel_nr,                      -- int. artikelnr
+                     sd.bes_srtdeel_omschrijving,
+                     sd.bes_srtdeel_notitie magazijn,
+                     bes.getsrtdeelprijs (sd.bes_srtdeel_key, NULL)
+                        srtdeel_prijs,
+                     bd.ins_discipline_omschrijving,     -- int. catalogusnaam
+                     (SELECT SUM (COALESCE(boi.bes_bestelopdr_item_aantal, bi.bes_bestelling_item_aantal))
+                        FROM bes_bestelling b, bes_bestelling_item bi, bes_bestelopdr_item boi
+                       WHERE boi.bes_bestelopdr_item_key(+) = bi.bes_bestelopdr_item_key
+                             AND b.bes_bestelling_key = bi.bes_bestelling_key
+                             AND bi.bes_srtdeel_key = sd.bes_srtdeel_key)
+                        besteld
+                FROM bes_srtdeel sd,
+                     bes_srtgroep g,
+                     bes_discipline bd,
+                     bes_disc_params dp
+               WHERE     sd.bes_srtdeel_verwijder IS NULL
+                     AND sd.bes_srtgroep_key = g.bes_srtgroep_key
+                     AND g.ins_discipline_key = bd.ins_discipline_key
+                     AND bd.ins_discipline_key = dp.bes_ins_discipline_key
+                     AND dp.bes_ins_discipline_key_inkoop IS NOT NULL) intern -- Verkoop artikelen uit interne catalogus!
+          ON extern.dkey = intern.dkey
+             AND extern.bes_srtdeel_nr = intern.bes_srtdeel_nr;
+
+
 BEGIN adm.systrackscript('$Workfile: demo.sql $', '$Revision$', 0); END;
 /
 BEGIN fac.registercustversion('DEMO', 0); END;