BLCC#64393 Herziening facturatie/allocatiemodel

svn path=/Customer/; revision=48902

onces/BLCC/BLCC#64393-Kostensoorten.sql

@@ -0,0 +1,73 @@
+--
+-- $Id$
+--
+-- Customer specific once-script BLCC#64393.SQL.
+DEFINE thisfile = 'BLCC#64393.SQL'
+DEFINE dbuser   = '^BLCC'
+
+SET ECHO ON
+SET DEFINE ON
+COLUMN fcltlogfile NEW_VALUE fcltlogfile NOPRINT;
+WHENEVER SQLERROR EXIT;
+SELECT adm.scriptspoolfile('&dbuser', '&thisfile') AS fcltlogfile FROM DUAL;
+WHENEVER SQLERROR CONTINUE;
+SPOOL &fcltlogfile
+SET DEFINE OFF
+
+------ payload begin ------
+
+-- BLCC#64393: Aanmaken nieuwe kostensoorten op basis van 'Eigen tabel'-import!
+
+-- *** PRE-CONDITIE ***
+-- Alleen inlezen (niet verwerken!) van bestand via 'FIP: Aanmaken/bijwerken
+-- eigen tabel'-import!
+
+-- Verwijder FAC_IMPORT-entry voor vandaag/zojuist door _FACILITOR ingelezen
+-- bestand (om verwerken te voorkomen).
+-- NB. De FAC_IMPORT_USRDATA-tabel blijft gevuld!
+DELETE FROM fac_import
+      WHERE fac_import_app_key = 23                     -- FIP: Eigen tabellen
+            AND TRUNC (fac_import_datum_gelezen) = TRUNC (SYSDATE)
+            --AND fac_import_filenaam = '2020-11-16 KostensoortenET.csv'
+            AND prs_perslid_key = 4                              -- _FACILITOR
+;
+
+COMMIT;
+
+-- Toevoegen kostensoortgroepen!
+INSERT INTO prs_kostensoortgrp (prs_kostensoortgrp_oms, prs_kostensoortgrp_altcode)
+       SELECT DISTINCT fac_usrtab_naam, NULL FROM fac_imp_usrdata;
+
+-- Toevoegen kostensoorten!
+INSERT INTO prs_kostensoort (prs_kostensoort_oms,
+                             prs_kostensoort_opmerking,
+                             prs_kostensoort_refcode,
+                             prs_kostensoort_doorbelasten,
+                             prs_kostensoort_btw,
+                             prs_kostensoortgrp_key,
+                             prs_kostensoort_altcode,
+                             fin_btwtabelwaarde_key)
+   SELECT ud.fac_usrdata_code,
+          ud.fac_usrdata_omschr,
+          ud.fac_usrdata_code refcode,
+          NULL,
+          NULL,
+          kpg.prs_kostensoortgrp_key,
+          SUBSTR (TO_CHAR (ud.fac_usrdata_prijs), 1, 4) altcode,
+          NULL
+     FROM fac_imp_usrdata ud, prs_kostensoortgrp kpg
+    WHERE ud.fac_usrtab_naam = kpg.prs_kostensoortgrp_oms;
+
+COMMIT;
+
+------ payload end   ------
+
+SET DEFINE OFF
+BEGIN adm.systrackscriptId ('$Id$', 1); END;
+/
+
+COMMIT;
+SET ECHO OFF
+SPOOL OFF
+SET DEFINE ON
+PROMPT Logfile of this upgrade is: &fcltlogfile