109 lines
4.0 KiB
SQL
109 lines
4.0 KiB
SQL
--
|
|
-- $Id$
|
|
--
|
|
-- Customer specific once-script BLCC#83852.SQL.
|
|
DEFINE thisfile = 'BLCC#83852.sql'
|
|
DEFINE dbuser = '^BLCC'
|
|
|
|
SET ECHO ON
|
|
SET DEFINE ON
|
|
COLUMN fcltlogfile NEW_VALUE fcltlogfile NOPRINT;
|
|
COLUMN fcltcusterr NEW_VALUE fcltcusterr NOPRINT;
|
|
WHENEVER SQLERROR CONTINUE;
|
|
SELECT adm.getscriptspoolfile('&thisfile') AS fcltlogfile FROM DUAL;
|
|
SPOOL &fcltlogfile
|
|
WHENEVER SQLERROR EXIT;
|
|
SELECT adm.checkscriptcust('&dbuser') AS fcltcusterr FROM DUAL;
|
|
WHENEVER SQLERROR CONTINUE;
|
|
PROMPT &fcltcusterr
|
|
SET DEFINE OFF
|
|
|
|
------ payload begin ------
|
|
|
|
-- BLCC#83852: Ondersteuning in Facilitor voor nieuw financieel pakket.
|
|
-- Zet laatste sync op 01-11-2024 voor niet verwerkte WO's, zodat
|
|
-- deze als aangeleverd staan gemarkeerd!
|
|
/*
|
|
SELECT o.mld_opdr_key,
|
|
o.mld_melding_key,
|
|
o.mld_opdr_bedrijfopdr_volgnr,
|
|
o.mld_statusopdr_key,
|
|
fac.gettrackingdate ('ORDNEW', mld_opdr_key) ordnew,
|
|
o.mld_opdr_datumbegin,
|
|
o.mld_opdr_externsyncdate
|
|
FROM mld_opdr o
|
|
WHERE o.mld_typeopdr_key IN (101, 2741, 3101, 3121) -- Relevante opdrachttypes
|
|
AND o.mld_statusopdr_key NOT IN (1, 2, 7) -- Afgewezen/Niet akkoord/Verwerkt
|
|
AND EXISTS
|
|
(SELECT 1
|
|
FROM fac_tracking
|
|
WHERE fac_srtnotificatie_key = 59 -- ORDNEW
|
|
AND fac_tracking_refkey = o.mld_opdr_key)
|
|
AND o.mld_opdr_externsyncdate IS NULL;
|
|
*/
|
|
UPDATE mld_opdr o
|
|
SET o.mld_opdr_externsyncdate = fac.safe_to_date ('01-11-2024', 'dd-mm-yyyy')
|
|
WHERE o.mld_typeopdr_key IN (101, 2741, 3101, 3121) -- Relevante opdrachttypes
|
|
AND o.mld_statusopdr_key NOT IN (1, 2, 7) -- Afgewezen/Niet akkoord/Verwerkt
|
|
AND EXISTS
|
|
(SELECT 1
|
|
FROM fac_tracking
|
|
WHERE fac_srtnotificatie_key = 59 -- ORDNEW
|
|
AND fac_tracking_refkey = o.mld_opdr_key)
|
|
AND o.mld_opdr_externsyncdate IS NULL;
|
|
/*
|
|
SELECT sm.mld_stdmelding_key,
|
|
sm.mld_stdmelding_omschrijving,
|
|
sm.mld_stdmelding_vervaldatum,
|
|
SUBSTR ('x' || sm.mld_stdmelding_omschrijving, 1, 60)
|
|
FROM mld_stdmelding sm
|
|
WHERE sm.mld_stdmelding_verwijder IS NULL
|
|
AND sm.mld_stdmelding_vervaldatum = fac.safe_to_date ('08-11-2024', 'dd-mm-yyyy')
|
|
AND NOT EXISTS
|
|
(SELECT 1
|
|
FROM mld_stdmelding
|
|
WHERE mld_stdmelding_upper = SUBSTR ('x' || sm.mld_stdmelding_upper, 1, 60)
|
|
AND mld_ins_discipline_key = sm.mld_ins_discipline_key
|
|
AND mld_stdmelding_key != sm.mld_stdmelding_key);
|
|
*/
|
|
UPDATE mld_stdmelding sm
|
|
SET sm.mld_stdmelding_omschrijving = SUBSTR ('x' || sm.mld_stdmelding_omschrijving, 1, 60)
|
|
WHERE sm.mld_stdmelding_verwijder IS NULL
|
|
AND sm.mld_stdmelding_vervaldatum = fac.safe_to_date ('08-11-2024', 'dd-mm-yyyy');
|
|
/*
|
|
SELECT sm.mld_ins_discipline_key,
|
|
sm.mld_stdmelding_key,
|
|
sm.mld_stdmelding_omschrijving,
|
|
sm.mld_stdmelding_vervaldatum,
|
|
SUBSTR (sm.mld_stdmelding_omschrijving, 2)
|
|
FROM mld_stdmelding sm
|
|
WHERE sm.mld_stdmelding_verwijder IS NULL
|
|
AND SUBSTR (sm.mld_stdmelding_omschrijving, 1, 1) = '*'
|
|
AND EXISTS
|
|
(SELECT 1
|
|
FROM prs_kostensoort
|
|
WHERE LENGTH (prs_kostensoort_oms) = 6
|
|
AND prs_kostensoort_key = sm.prs_kostensoort_key);
|
|
*/
|
|
UPDATE mld_stdmelding sm
|
|
SET sm.mld_stdmelding_omschrijving = SUBSTR (sm.mld_stdmelding_omschrijving, 2)
|
|
WHERE sm.mld_stdmelding_verwijder IS NULL
|
|
AND SUBSTR (sm.mld_stdmelding_omschrijving, 1, 1) = '*'
|
|
AND EXISTS
|
|
(SELECT 1
|
|
FROM prs_kostensoort
|
|
WHERE LENGTH (prs_kostensoort_oms) = 6
|
|
AND prs_kostensoort_key = sm.prs_kostensoort_key);
|
|
|
|
------ 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
|