74 lines
2.3 KiB
SQL
74 lines
2.3 KiB
SQL
--
|
|
-- $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
|