--
-- $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