SKAF#67168 -- Import Artikelcatalogi voor Viking met Prijzen inclusief btw

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

SKAF/skaf.sql

@@ -1257,6 +1257,49 @@ BEGIN
 END skaf_update_prs;
 /
 
+-- Import voor Viking - catalogus Boodschappen - Beperkt Assortiment
+CREATE OR REPLACE PROCEDURE skaf_import_catalogus (p_import_key IN NUMBER)
+AS
+
+   CURSOR c
+   IS
+      SELECT ins_srtdeel_nr, ins_srtdeel_prijs, ins_srtdeel_btw
+      FROM fac_imp_catalogus
+      WHERE ins_srtdeel_prijs IS NOT NULL and ins_srtdeel_btw IS NOT NULL;
+
+   v_ins_srtdeel_prijs   NUMBER(8,2);
+
+
+BEGIN
+-- standaard catalogus-import aanroepen
+fac_import_catalogus(p_import_key) ;
+
+
+-- updaten prijzen: Wordt door Viking exclusief btw aangeleverd en zetten we hier om naar prijzen inclusief btw
+      FOR rec IN c
+      LOOP
+         BEGIN
+            v_ins_srtdeel_prijs := rec.ins_srtdeel_prijs * ((100 + rec.ins_srtdeel_btw)/100);
+            
+            UPDATE fac_imp_catalogus
+               SET ins_srtdeel_prijs = v_ins_srtdeel_prijs
+             WHERE ins_srtdeel_nr = rec.ins_srtdeel_nr ;
+
+         END;
+      END LOOP;
+
+END skaf_import_catalogus;
+/
+
+CREATE OR REPLACE PROCEDURE skaf_update_catalogus (p_import_key IN NUMBER)
+AS
+BEGIN
+-- standaard catalogus-update aanroepen
+fac_update_catalogus(p_import_key);
+
+END skaf_update_catalogus;
+/
+
 
 CREATE OR REPLACE VIEW skaf_v_factuur_bestand (fin_factuur_key, fin_factuur_bestand)
 AS