NYBU#33916 -- Goedkeuringsproces reserveringen

svn path=/Customer/trunk/; revision=26787

NYBU/nybu.sql

@@ -8562,6 +8562,148 @@ AS
 --   ON a.res_rsv_ruimte_key = r.res_rsv_ruimte_key
    ;
 
+---------------------------------------------------------------------------------
+-- Rapportages goedkeuring catering
+--
+CREATE OR REPLACE VIEW nybu_v_res_approve
+(
+   hide_f_srt,
+   datum,
+   contact_key,
+   contact,
+   rsv_ruimte_key,
+   goedgekeurd,
+   melding,
+   html_nieuwe_opmerking,
+   bedrag,
+   catering,
+   status,
+   export,
+   html_reservering,
+   aanvang,
+   omschrijving,
+   pnummer
+)
+AS
+   SELECT    ROUND (fac.safe_to_number (SYSDATE - res_rsv_ruimte_van), 5)
+          || rr.res_reservering_key
+          || '/'
+          || res_rsv_ruimte_volgnr
+             hide_f_srt,
+          res_rsv_ruimte_van datum,
+          rr.res_rsv_ruimte_contact_key,
+          pfc.prs_perslid_naam_friendly contact,
+          rr.res_rsv_ruimte_key,
+          DECODE (rr.res_rsv_ruimte_afgerond, 1, 'Ja', 'Nee') goedgekeurd,
+          mld_melding_key,
+          '<a class="details" onclick=''FcltMgr.openDetail("default.asp?u=YDsGBTulSHsSiCwP&amp;rsv_ruimte_key='
+          || rr.res_rsv_ruimte_key
+          || '&amp;txt=Opmerking over reservering:  '
+          || rr.res_reservering_key
+          || '/'
+          || res_rsv_ruimte_volgnr
+          || '")''>Opmerking</a>'
+             nieuwe_opmerking,
+          res.getdeelresprijs (rr.res_rsv_ruimte_key) bedrag,
+          COALESCE (
+             (SELECT SUM (res.getartikelprijs (res_rsv_artikel_key))
+                FROM res_rsv_artikel rra
+               WHERE res_rsv_artikel_verwijder IS NULL
+                 AND rra.res_rsv_ruimte_key = rr.res_rsv_ruimte_key),
+             0)
+             catering,
+          DECODE (res_kenmerkreservering_waarde,
+                  NULL, s.res_status_bo_omschrijving,
+                  'Verwerkt')
+             status,
+          res_kenmerkreservering_waarde export,
+          '<a class="details" onclick=''FcltMgr.openDetail("appl/res/res_reservering.asp?'
+          || 'rsv_ruimte_key='
+          || rr.res_rsv_ruimte_key
+          || '")''>'
+          || rr.res_reservering_key
+          || '/'
+          || res_rsv_ruimte_volgnr
+          || '</a>'
+             html_reservering,
+          TO_CHAR (rr.res_rsv_ruimte_van, 'DD-MM-YYYY HH24:MI') aanvang,
+          rr.res_rsv_ruimte_omschrijving omschrijving,
+          k.prs_kostenplaats_nr || ' - ' || k.prs_kostenplaats_omschrijving
+             pnummer
+     FROM res_rsv_ruimte rr,
+          prs_v_perslid_fullnames pfc,
+          prs_kostenplaats k,
+          res_status_bo s,
+          (SELECT res_rsv_ruimte_key, mld_melding_key
+             FROM mld_melding
+            WHERE mld_stdmelding_key = 1301) m,  -- opmerking over catering
+          (SELECT res_kenmerkreservering_waarde, res_rsv_ruimte_key
+             FROM res_kenmerkwaarde kw, res_kenmerk k
+            WHERE kw.res_kenmerk_key = k.res_kenmerk_key
+              AND k.res_srtkenmerk_key = 202) e,
+          (  SELECT MIN (res_status_bo_key) res_status_bo_key,
+                    res_rsv_ruimte_key
+               FROM (SELECT res_status_bo_key, rr1.res_rsv_ruimte_key
+                       FROM res_rsv_ruimte rr1
+                      WHERE rr1.res_rsv_ruimte_verwijder IS NULL
+                     UNION ALL
+                     SELECT res_status_bo_key, rd1.res_rsv_ruimte_key
+                       FROM res_rsv_deel rd1
+                      WHERE rd1.res_rsv_deel_verwijder IS NULL
+                     UNION ALL
+                     SELECT res_status_bo_key, ra1.res_rsv_ruimte_key
+                       FROM res_rsv_artikel ra1
+                      WHERE ra1.res_rsv_artikel_verwijder IS NULL)
+           GROUP BY res_rsv_ruimte_key) bo_stat
+    WHERE pfc.prs_perslid_key = rr.res_rsv_ruimte_contact_key
+      AND k.prs_kostenplaats_key = rr.prs_kostenplaats_key
+      AND bo_stat.res_status_bo_key = s.res_status_bo_key
+      AND bo_stat.res_rsv_ruimte_key = rr.res_rsv_ruimte_key
+      AND rr.res_rsv_ruimte_key = e.res_rsv_ruimte_key(+)
+      AND m.res_rsv_ruimte_key(+) = rr.res_rsv_ruimte_key
+      AND ( (s.res_status_bo_key = 5
+         AND res_kenmerkreservering_waarde IS NULL
+         AND SYSDATE - res_rsv_ruimte_van > 3)
+        OR (res_kenmerkreservering_waarde IS NOT NULL
+        AND res_rsv_ruimte_tot > SYSDATE - 50));
+              
+              
+CREATE OR REPLACE VIEW nybu_v_rap_res_approve
+AS
+   SELECT *
+     FROM nybu_v_res_approve
+    WHERE catering > 0;
+    
+-- notificatie naar contactpersoon als de reservering goedgekeurd moet worden. De mail wordt
+-- drie werkdagen na de reservering verzonden. Aangezien er ook in het weekend gereserveerd
+-- kan worden controleert de view of dezelfde notificatie ook gisteren verstuurd zou zijn.
+CREATE OR REPLACE VIEW nybu_v_noti_goedkeuring_cat
+(
+   CODE,
+   SENDER,
+   RECEIVER,
+   TEXT,
+   KEY,
+   XKEY
+)
+AS
+   SELECT 'CUST01',
+          NULL,
+          res_rsv_ruimte_contact_key,
+          'Akkoord cateringkosten',
+          res_rsv_ruimte_key,
+          NULL
+     FROM res_rsv_ruimte rrr
+    WHERE fac.datumtijdplusuitvoertijd (TRUNC (SYSDATE), -4, 'DAGEN', 0, 24, 1) <>
+             fac.datumtijdplusuitvoertijd (TRUNC (SYSDATE - 1 ), -4, 'DAGEN', 0, 24, 1)
+      AND res_rsv_ruimte_tot BETWEEN fac.datumtijdplusuitvoertijd (TRUNC (SYSDATE - 1 ), -4, 'DAGEN', 0, 24, 1)
+                                 AND fac.datumtijdplusuitvoertijd (TRUNC (SYSDATE), -4, 'DAGEN', 0, 24, 1)
+      AND COALESCE (
+             (SELECT SUM (res.getartikelprijs (res_rsv_artikel_key))
+                FROM res_rsv_artikel rra
+               WHERE res_rsv_artikel_verwijder IS NULL
+                 AND rra.res_rsv_ruimte_key = rrr.res_rsv_ruimte_key),
+             0) > 0;
 
 ---------------------------------------------------------------------------------
 -- Koppeling met VIPS.
@@ -8935,7 +9077,7 @@ AS
 
 BEGIN adm.systrackscriptId('$Id$', 0); END;
 /
-BEGIN fac.registercustversion ('nybu', 29); END;
+BEGIN fac.registercustversion ('nybu', 30); END;
 /
 
 COMMIT;