admin/Customer
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

AAIT#57262 -- Volledig afschakelen omgevingen

Browse Source 
svn path=/Customer/; revision=42633
This commit is contained in:
Arthur Egberink
2019-05-22 09:43:32 +00:00
parent 88de8153ed
commit dc16521092
15 changed files with 0 additions and 1180 deletions
Download Patch File Download Diff File Expand all files Collapse all files

88
onces/AA/AAEY/AAEY#26935.sql
View File

@@ -1,88 +0,0 @@
select * from alg_locatie
select * from alg_gebouw
CREATE TABLE aaey_imp_catering
(
nummer VARCHAR2(20),
object VARCHAR2(50),
objectcode VARCHAR2(10),
managementunit VARCHAR2(10),
engagementnummer VARCHAR2(10),
leveringsdatum DATE,
ruimte VARCHAR2(100),
aanvrager VARCHAR2(100),
aantal NUMBER(10),
eenheid VARCHAR2(15),
omschrijving VARCHAR2(100),
totaalbedrag NUMBER(8,2),
import_key NUMBER (10),
import_datum DATE,
export_datum DATE,
mld_opdr_key NUMBER (10),
alg_gebouw_key NUMBER (10)
);
CREATE TABLE aaey_imp_officesup
(
nummer VARCHAR2(20),
object VARCHAR2(50),
objectcode VARCHAR2(10),
managementunit VARCHAR2(10),
engagementnummer VARCHAR2(10),
leverancier VARCHAR2(100),
ruimte VARCHAR2(100),
aanvrager VARCHAR2(100),
aantal NUMBER(10),
eenheid VARCHAR2(15),
omschrijving VARCHAR2(100),
totaalbedrag NUMBER(8,2),
import_key NUMBER (10),
import_datum DATE,
export_datum DATE,
mld_opdr_key NUMBER (10),
alg_gebouw_key NUMBER (10),
prs_bedrijf_levkey NUMBER(10)
);
select * from res_artikel
/* Formatted on 7/8/2013 5:27:48 PM (QP5 v5.136.908.31019) */
DECLARE
CURSOR c
IS
SELECT fac_imp_file_line
FROM fac_imp_file
WHERE fac_import_key = 901;
bedrijf VARCHAR2 (100);
v_count NUMBER;
BEGIN
FOR rec IN c
LOOP
BEGIN
fac.imp_getfield_nr (rec.fac_imp_file_line,
';',
6,
bedrijf);
SELECT COUNT ( * )
INTO v_count
FROM prs_bedrijf
WHERE UPPER (prs_bedrijf_naam) = UPPER (bedrijf);
IF v_count = 0
THEN
DBMS_OUTPUT.put_line (bedrijf);
INSERT INTO prs_bedrijf (prs_bedrijf_naam,
prs_bedrijf_uitvoerende)
VALUES (bedrijf, 1);
END IF;
END;
END LOOP;
COMMIT;
END;
COMMIT;

387
onces/AA/AAEY/AAEY#28246.sql
View File

@@ -1,387 +0,0 @@
-- Customer specific once-script AAEY#28246.sql
--
-- Support: +31 53 4800700
--
SET ECHO ON
SPOOL AAEY#28246.lst
SET DEFINE OFF
CREATE TABLE tmp_imp_opdr (mld_opdr_id VARCHAR2 (20));
SET DEFINE OFF;
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102250/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102251/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102283/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('ST102282/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA101943/2');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('ST102376/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102382/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102473/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102499/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('ST101492/2');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102517/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA101968/2');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102048/2');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102090/2');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102209/2');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102667/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102668/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102669/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102670/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102671/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102672/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102673/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102674/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102675/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102676/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102677/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102694/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102696/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('ST102697/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('ST102698/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102708/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('ST102709/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('ST102710/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102813/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA101428/2');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102849/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('ST102844/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('ST102845/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102936/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102939/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('ST102932/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103028/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103029/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103030/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103032/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103033/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103053/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('ST103101/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103128/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103336/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103356/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('ST101482/4');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103475/2');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103620/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103621/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102248/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102253/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102375/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102380/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102501/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102600/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102601/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102602/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102603/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102604/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102606/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102607/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102608/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102610/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('ST102176/2');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('ST102178/2');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102814/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102834/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102835/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102836/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102837/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102839/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102840/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102841/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102842/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102852/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102871/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102872/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102873/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102874/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102901/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA102902/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA101875/3');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103098/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103099/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103100/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103138/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103139/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103140/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103141/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103143/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103284/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103290/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103366/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103476/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103477/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103478/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103479/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103481/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103482/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103551/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103290/2');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103142/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('SA103303/1');
INSERT INTO tmp_imp_opdr (mld_opdr_id)
VALUES ('ST103662/2');
COMMIT;
DECLARE
CURSOR c
IS
SELECT mld_opdr_key
FROM mld_opdr o, tmp_imp_opdr i
WHERE i.mld_opdr_id LIKE
'%'
|| mld_melding_key
|| '/'
|| o.mld_opdr_bedrijfopdr_volgnr;
BEGIN
FOR rec IN c
LOOP
BEGIN
UPDATE mld_opdr
SET mld_opdr_datumbegin = TO_DATE ('20130920', 'yyyymmdd')
WHERE mld_opdr_key = rec.mld_opdr_key;
INSERT INTO fac_tracking (fac_tracking_refkey,
fac_srtnotificatie_key,
fac_tracking_oms)
VALUES (rec.mld_opdr_key,
46, -- ordupd
'Begindatum van opdracht op verzoek van AAFM aangepast');
END;
END LOOP;
COMMIT;
END;
/
DROP TABLE tmp_imp_opdr;
COMMIT;
BEGIN adm.systrackscript('$Workfile: AAEY#28246 $', '$Revision$', 1); END;
/
COMMIT;
SPOOL OFF

8
onces/AA/AAEY/AAEY#28321.sql
View File

@@ -1,8 +0,0 @@
UPDATE prs_bedrijfadres
SET prs_bedrijfadres_type = 'B'
WHERE prs_bedrijfadres_type = 'C';
-- na seintje van Sander weer terugzetten in:
UPDATE prs_bedrijfadres
SET prs_bedrijfadres_type = 'C'
WHERE prs_bedrijfadres_type = 'B'

144
onces/AA/AAEY/AAEY#28791.sql
View File

@@ -1,144 +0,0 @@
alter session set nls_territory = 'America';
declare
cursor c is
SELECT (SELECT mld_opdr_key
FROM mld_opdr o
WHERE opdracht LIKE
'%'
|| o.mld_melding_key
|| '/'
|| o.mld_opdr_bedrijfopdr_volgnr)
mld_opdr_key,
(SELECT mld_melding_key
FROM mld_opdr o
WHERE opdracht LIKE
'%'
|| o.mld_melding_key
|| '/'
|| o.mld_opdr_bedrijfopdr_volgnr)
mld_melding_key,
(SELECT cnt_contract_key
FROM cnt_contract c
WHERE opdracht =
'CO'
|| cnt_contract_nummer_intern
|| '.'
|| COALESCE (cnt_contract_versie, '0'))
cnt_contract_key,
(SELECT prs_kostensoort_key
FROM prs_kostensoort ks
WHERE TRIM (ks.prs_kostensoort_oms) = TRIM (k.kostensoort))
prs_kostensoort_key,
k.*
FROM tmp_opdr_kostensoort k;
oracle_err_num NUMBER;
oracle_err_mes VARCHAR2 (200);
v_errormsg VARCHAR2 (200);
v_errorhint VARCHAR2 (200);
v_discipline_key NUMBER(10);
v_stdmelding_key NUMBER(10);
BEGIN
DELETE imp_log WHERE imp_log_applicatie = 'CONV_KOSTENSOORT';
FOR rec in c
LOOP
BEGIN
IF rec.prs_kostensoort_key IS NULL
THEN
fac.writelog ('CONV_KOSTENSOORT', 'E', 'Kostensoort is onbekend: ' || rec.kostensoort , rec.opdracht);
ELSIF rec.cnt_contract_key IS NOT NULL
THEN
dbms_output.put_line (rec.cnt_contract_key);
v_errorhint := 'Bepalen contractsoort';
BEGIN
SELECT ins_discipline_key
INTO v_discipline_key
FROM cnt_discipline
WHERE prs_kostensoort_key = rec.prs_kostensoort_key;
EXCEPTION WHEN NO_DATA_FOUND
THEN
v_errorhint := 'Toevoegen discipline';
INSERT INTO ins_discipline (ins_discipline_module, ins_discipline_omschrijving, ins_discipline_kpnverplicht, ins_discipline_btw, prs_kostensoort_key)
VALUES ('CNT', UPPER(TRIM(rec.kostensoort)), 0, 1, rec.prs_kostensoort_key)
RETURNING ins_discipline_key INTO v_discipline_key;
v_errorhint := 'Toevoegen discipline params';
INSERT INTO cnt_disc_params (cnt_ins_discipline_key, cnt_srtcontract_type, cnt_disc_params_factuurmarge, cnt_disc_params_factuurappr, cnt_disc_params_factuurpct)
VALUES (v_discipline_key, 5, 0 ,0, 0);
END;
v_errorhint := 'Aanpssen contract';
UPDATE cnt_contract
SET ins_discipline_key = v_discipline_key,
prs_kostensoort_key = rec.prs_kostensoort_key
WHERE cnt_contract_key = rec.cnt_contract_key;
v_errorhint := 'Toevoegen tracking';
INSERT INTO fac_tracking ( fac_srtnotificatie_key, fac_tracking_refkey, fac_tracking_oms)
SELECT fac_srtnotificatie_key, rec.cnt_contract_key, 'Kostensoort aangepast naar: ' || rec.kostensoort
FROM fac_srtnotificatie
WHERE fac_srtnotificatie_code = 'CNTUPD';
v_errorhint := 'Aanpassen factuur';
UPDATE fin_factuur
SET prs_kostensoort_key = rec.prs_kostensoort_key
WHERE cnt_contract_key = rec.cnt_contract_key;
v_errorhint := 'Toevoegen tracking aan factuur';
INSERT INTO fac_tracking ( fac_srtnotificatie_key, fac_tracking_refkey, fac_tracking_oms)
SELECT fac_srtnotificatie_key, f.fin_factuur_key, 'Kostensoort aangepast naar: ' || rec.kostensoort
FROM fac_srtnotificatie, fin_factuur f
WHERE fac_srtnotificatie_code = 'FINUPD'
AND f.cnt_contract_key = rec.cnt_contract_key;
ELSIF rec.mld_melding_key IS NOT NULL
THEN
dbms_output.put_line (rec.mld_melding_key);
v_errorhint := 'Bepaling standaardmelding';
SELECT MAX(mld_stdmelding_key)
INTO v_stdmelding_key
FROM mld_stdmelding
WHERE mld_stdmelding_verwijder IS NULL
AND COALESCE(mld_stdmelding_vervaldatum, SYSDATE+1) > SYSDATE
AND prs_kostensoort_key = rec.prs_kostensoort_key;
v_errorhint := 'Aanpassen melding';
UPDATE mld_melding
SET mld_stdmelding_key = v_stdmelding_key
WHERE mld_melding_key = rec.mld_melding_key;
v_errorhint := 'Toevoegen tracking';
INSERT INTO fac_tracking ( fac_srtnotificatie_key, fac_tracking_refkey, fac_tracking_oms)
SELECT fac_srtnotificatie_key, rec.mld_melding_key, 'Kostensoort aangepast naar: ' || rec.kostensoort
FROM fac_srtnotificatie
WHERE fac_srtnotificatie_code = 'MLDUPD';
v_errorhint := 'Aanpassen factuur';
UPDATE fin_factuur
SET prs_kostensoort_key = rec.prs_kostensoort_key
WHERE mld_opdr_key = rec.mld_opdr_key;
v_errorhint := 'Toevoegen tracking aan factuur';
INSERT INTO fac_tracking ( fac_srtnotificatie_key, fac_tracking_refkey, fac_tracking_oms)
SELECT fac_srtnotificatie_key, f.fin_factuur_key, 'Kostensoort aangepast naar: ' || rec.kostensoort
FROM fac_srtnotificatie, fin_factuur f
WHERE fac_srtnotificatie_code = 'FINUPD'
AND f.mld_opdr_key = rec.mld_opdr_key;
ELSE
fac.writelog ('CONV_KOSTENSOORT', 'E', 'Opdrachtkey en contractkey is leeg' , rec.opdracht);
END IF;
EXCEPTION WHEN OTHERS THEN
oracle_err_num := SQLCODE;
oracle_err_mes := SUBSTR (SQLERRM, 1, 100);
v_errormsg := 'OTHERS (error '||oracle_err_num||'/'||oracle_err_mes||')';
fac.writelog ('CONV_KOSTENSOORT', 'E', v_errormsg , rec.opdracht || ':' || v_errorhint);
END;
END LOOP;
COMMIT;
END;

114
onces/AA/AAEY/AAEY#29546.sql
View File

@@ -1,114 +0,0 @@
-- vraagtekens in omschrijving van contract aanpassen naar euro teken.
UPDATE aaxx_imp_contract
SET omschrijving = REPLACE (omschrijving, '?', '<EFBFBD>');
DECLARE
CURSOR c
IS
SELECT *
FROM aaxx_imp_contract
ORDER BY volgorde;
v_contract_key NUMBER;
v_contract_key_prev NUMBER;
v_discipline_key NUMBER;
v_gebouw_key NUMBER;
v_contract_plaats_key NUMBER;
p_contract_looptijd_tot DATE;
p_discipline_key NUMBER;
p_contract_document VARCHAR2(4000);
p_contract_kosten NUMBER(11,2);
p_contract_termijnkosten NUMBER(11,2);
p_contract_plaats_gewicht NUMBER(11,2);
v_wijzigingen VARCHAR2(1000);
BEGIN
fac.initsession ('NL');
FOR rec IN c
LOOP
BEGIN
SELECT cnt_contract_key
INTO v_contract_key
FROM cnt_contract
WHERE cnt_contract_nummer_intern = rec.contractnummer
AND COALESCE (cnt_contract_versie, '0') = rec.versie;
EXCEPTION
WHEN NO_DATA_FOUND
THEN
v_contract_key := NULL;
END;
IF rec.volgnummer IS NULL
THEN
-- zoek contractsoort
SELECT ins_discipline_key
INTO v_discipline_key
FROM cnt_discipline
WHERE ins_discipline_omschrijving = rec.contractsoort;
SELECT cnt_contract_looptijd_tot,
ins_discipline_key,
cnt_contract_document,
cnt_contract_kosten,
cnt_contract_termijnkosten
INTO p_contract_looptijd_tot,
p_discipline_key,
p_contract_document,
p_contract_kosten,
p_contract_termijnkosten
FROM cnt_contract
WHERE cnt_contract_key = v_contract_key;
v_wijzigingen := NULL;
IF p_contract_looptijd_tot <> rec.tot THEN v_wijzigingen := v_wijzigingen || CHR(10) || 'Looptijd: ' || to_char(p_contract_looptijd_tot, 'dd-mm-yyyy') || ' --> ' || to_char(rec.tot, 'dd-mm-yyyy'); END IF;
IF p_discipline_key <> v_discipline_key THEN v_wijzigingen := v_wijzigingen || CHR(10) || 'Srtcontract_key: ' || p_discipline_key || ' --> ' || v_discipline_key; END IF;
IF p_contract_document <> rec.omschrijving THEN v_wijzigingen := v_wijzigingen || CHR(10) || 'Omschrijving gewijzigd '; END IF;
IF p_contract_kosten <> rec.bedrag THEN v_wijzigingen := v_wijzigingen || CHR(10) || 'Bedrag: ' || p_contract_kosten || ' --> ' || rec.bedrag; END IF;
IF p_contract_termijnkosten <> rec.termijnbedrag THEN v_wijzigingen := v_wijzigingen || CHR(10) || 'Termijnbedrag: ' || p_contract_termijnkosten || ' --> ' || rec.termijnbedrag; END IF;
UPDATE cnt_contract
SET ins_discipline_key = v_discipline_key,
cnt_contract_looptijd_tot = rec.tot,
cnt_contract_document =
REPLACE (REPLACE (rec.omschrijving, '<(>', ''), '<)>', ''),
cnt_contract_kosten = rec.bedrag,
cnt_contract_termijnkosten = rec.termijnbedrag
WHERE cnt_contract_key = v_contract_key;
IF v_wijzigingen IS NOT NULL
THEN
INSERT INTO fac_tracking (fac_srtnotificatie_key, fac_tracking_refkey, fac_tracking_oms)
VALUES (77, v_contract_key, 'Contract gewijzigd via script' || v_wijzigingen);
END IF;
ELSE
SELECT alg_gebouw_key
INTO v_gebouw_key
FROM alg_v_aanweziggebouw
WHERE UPPER (alg_gebouw_code) = UPPER (rec.gebouw);
SELECT cnt_contract_plaats_key, cnt_contract_plaats_gewicht
INTO v_contract_plaats_key, p_contract_plaats_gewicht
FROM cnt_contract_plaats
WHERE cnt_contract_key = v_contract_key
AND cnt_alg_plaats_key = v_gebouw_key
AND cnt_alg_plaats_code = 'G';
v_wijzigingen := NULL;
IF p_contract_plaats_gewicht <> rec.bedrag THEN v_wijzigingen := v_wijzigingen || CHR(10) || 'Scope (' || rec.gebouw || '): ' || p_contract_plaats_gewicht || ' --> ' || rec.bedrag; END IF;
UPDATE cnt_contract_plaats
SET cnt_contract_plaats_gewicht = rec.bedrag
WHERE cnt_contract_plaats_key = v_contract_plaats_key;
IF v_wijzigingen IS NOT NULL
THEN
INSERT INTO fac_tracking (fac_srtnotificatie_key, fac_tracking_refkey, fac_tracking_oms)
VALUES (77, v_contract_key, 'Contract gewijzigd via script' || v_wijzigingen);
END IF;
END IF;
END LOOP;
COMMIT;
END;

18
onces/AA/AAEY/AAEY#30367.sql
View File

@@ -1,18 +0,0 @@
-- Op onderstaande (verlopen) contractorders moeten schijnbaar nog facturen geboekt worden.
-- Echter, de versie ontbreekt. Dit zou .0 moeten zijn. Kunnen jullie die alsnog toekennen? Alvast bedankt.
-- C2136, C2149, C2144, C2145 ,C2148, C2146 ,C2147
SET ECHO ON;
SPOOL xAAEY#30367;
SET DEFINE OFF;
UPDATE cnt_contract
SET cnt_contract_versie = 0
WHERE cnt_contract_key IN (2136, 2149, 2144, 2145, 2148, 2146, 2147);
BEGIN adm.systrackscriptId('$Id$'); END;
/
COMMIT;
SPOOL OFF;

91
onces/AA/AAEY/AAEY#32797.sql
View File

@@ -1,91 +0,0 @@
-- Customer specific once-script AAEY#32797.
--
-- (c) 2015 Facilitor bv
--
-- Support: +31 53 4800700
SET ECHO ON
SPOOL xAAEY#32797.lst
SET DEFINE OFF
INSERT INTO fac_api (fac_api_name, fac_api_filepath, fac_api_loglevel, fac_api_stylesheet, fac_api_options_json)
SELECT 'HBSORD', 'appl/api/api_opdrsoap.asp', 0, 'cust/aaey/xsl/hsb.xsl', '{"MLDremark":5,"ORDremark":5}'
FROM DUAL
WHERE NOT EXISTS (SELECT 1
FROM fac_api
WHERE fac_api_name = 'HBSORD');
COMMIT;
-- Pseudo-user tbv. koppeling met HSB Koeriers; dezelfde module, afdeling en
-- functie als _FACILITOR (= 4)!
INSERT INTO prs_perslid (prs_perslid_module,
prs_srtperslid_key,
prs_afdeling_key,
prs_perslid_naam,
prs_perslid_voornaam,
prs_perslid_nr,
prs_perslid_oslogin,
prs_perslid_flags,
prs_perslid_apikey)
SELECT p.prs_perslid_module,
p.prs_srtperslid_key,
p.prs_afdeling_key,
'API-user tbv. HSB-Koeriers',
'-',
'NIET WEG!!!',
'_HSB',
0,
'jlyQULIcWhfsmFeOZpsODvdwartitMcV'
FROM prs_perslid p
WHERE p.prs_perslid_key = 4;
-- Functional-users tbv. koppeling met HSB Koeriers; 1 per locatie!
--SELECT 5000 + ROWNUM,
-- 'PRS',
-- 1,
-- 1,
-- 'Gebouw-user '
-- || SUBSTR (alg_gebouw_naam, INSTR (alg_gebouw_naam, ' ', -1) + 1),
-- '-',
-- 'NIET WEG!!!',
-- '_' || SUBSTR (alg_gebouw_naam, INSTR (alg_gebouw_naam, ' ', -1) + 1),
-- 0
-- FROM ( SELECT *
-- FROM alg_v_aanweziggebouw g
-- ORDER BY SUBSTR (alg_gebouw_naam,
-- INSTR (alg_gebouw_naam, ' ', -1) + 1))
-- WHERE alg_gebouw_key NOT IN (121);
--SELECT prs_perslid_key voor, prs_perslid_naam gebouw_user
-- FROM prs_perslid
-- WHERE prs_perslid_key BETWEEN 5001 AND 5016;
/* Formatted on 10-6-2015 15:00:30 (QP5 v5.136.908.31019) */
INSERT INTO prs_perslid (prs_perslid_key,
prs_perslid_module,
prs_srtperslid_key,
prs_afdeling_key,
prs_perslid_naam,
prs_perslid_voornaam,
prs_perslid_nr,
prs_perslid_oslogin,
prs_perslid_flags)
SELECT 5000 + ROWNUM,
'PRS',
1,
1,
'Gebouw-user '
|| SUBSTR (alg_gebouw_naam, INSTR (alg_gebouw_naam, ' ', -1) + 1),
'-',
'NIET WEG!!!',
'_'
|| SUBSTR (alg_gebouw_naam, INSTR (alg_gebouw_naam, ' ', -1) + 1),
0
FROM ( SELECT *
FROM alg_v_aanweziggebouw g, mld_adres a
WHERE TO_CHAR (g.alg_gebouw_aanmaak, 'yyyy') = '2013'
AND g.mld_adres_key = a.mld_adres_key
ORDER BY SUBSTR (g.alg_gebouw_naam, INSTR (g.alg_gebouw_naam, ' ', -1) + 1));
COMMIT;
BEGIN adm.systrackscriptId('$Id$'); END;
/
SPOOL OFF

45
onces/AA/AAEY/AAEY#34262.sql
View File

@@ -1,45 +0,0 @@
-- Customer specific once-script AAEY#34262.
--
-- (c) 2015 Facilitor bv
--
-- Support: +31 53 4800700
SET ECHO ON
SPOOL xAAEY#34262.lst
SET DEFINE OFF
INSERT INTO fac_api (fac_api_name, fac_api_filepath, fac_api_loglevel, fac_api_stylesheet, fac_api_options_json)
SELECT 'HSBORDNL', 'appl/api/api_opdrsoap.asp', 0, 'cust/aaey/xsl/hsbnl.xsl', '{"MLDremark":5,"ORDremark":5}'
FROM DUAL
WHERE NOT EXISTS (SELECT 1
FROM fac_api
WHERE fac_api_name = 'HSBORDNL');
COMMIT;
-- Pseudo-user tbv. koppeling met HSB Koeriers; dezelfde module, afdeling en
-- functie als _FACILITOR (= 4)!
INSERT INTO prs_perslid (prs_perslid_module,
prs_srtperslid_key,
prs_afdeling_key,
prs_perslid_naam,
prs_perslid_voornaam,
prs_perslid_nr,
prs_perslid_oslogin,
prs_perslid_flags,
prs_perslid_apikey)
SELECT p.prs_perslid_module,
p.prs_srtperslid_key,
p.prs_afdeling_key,
'API-user tbv. HSB-Koeriers (NL)',
'-',
'NIET WEG!!!',
'_HSBNL',
1,
'sJgqfsqRaYIWQcxRKbgfCtLxmoRjLRqe'
FROM prs_perslid p
WHERE p.prs_perslid_key = 4;
COMMIT;
BEGIN adm.systrackscriptId('$Id$'); END;
/
SPOOL OFF

21
onces/AA/AAEY/AAEY#34871.sql
View File

@@ -1,21 +0,0 @@
-- Verwijderen van 1 inspectie.
SET ECHO ON;
SPOOL xAAEY#34871;
SET DEFINE OFF;
UPDATE ins_kmdeelsrtcontr v
SET v.ins_kmdeelsrtcontr_verwijder = SYSDATE
WHERE v.ins_deelsrtcontrole_key = 1462
AND v.ins_kmdeelsrtcontr_verwijder IS NULL;
DELETE ins_deelsrtcontrole
WHERE ins_deelsrtcontrole_key = 1462;
BEGIN adm.systrackscriptId('$Id$'); END;
/
COMMIT;
SPOOL OFF;

65
onces/AA/AAEY/AAEY#36065.sql
View File

@@ -1,65 +0,0 @@
-- Customer specific once-script AAEY#36065.
--
-- (c) 2015 Facilitor bv.
SET ECHO ON
SET DEFINE ON
column fcltlogfile new_value fcltlogfile NOPRINT;
SELECT UPPER (USER) || '_AAEY#36065' || '.lst' AS fcltlogfile FROM DUAL;
spool &fcltlogfile
SET DEFINE OFF;
-- Voeg de api toe om opdrachten van Unica via de api_ordsoap af te kunnen handelen.
INSERT INTO fac_api (fac_api_name,
fac_api_omschrijving,
fac_api_filepath,
fac_api_loglevel,
fac_api_stylesheet,
fac_api_options_json)
VALUES ('UNICA2OPDR',
'Statuswijzigingen ontvangen van Unica.',
'appl/api/api_opdrsoap.asp',
0,
'cust/aaxx/import/Unica/UnicaStatusResponse.xsl',
'{"MLDremark":6, "ORDremark":5}');
-- en de persoon
INSERT INTO prs_perslid (prs_perslid_module,
prs_srtperslid_key,
prs_afdeling_key,
prs_perslid_naam,
prs_perslid_oslogin,
prs_perslid_apikey,
prs_perslid_flags)
VALUES ('PRS',
1,
1,
'Unica koppeling',
'_UNICA_KOPPELING',
'nCYoBnxdXWroVIBsqqBmcAhdAcQuNToF',
4);
-- voeg de API user toe aan de autorisatiegroep voor leveranciers.
INSERT INTO fac_gebruikersgroep (prs_perslid_key, fac_groep_key)
(SELECT prs_perslid_key, 122
FROM prs_perslid
WHERE prs_perslid_naam = 'Unica koppeling');
-- koppel de api-user als contactpersoon aan het bedrijf
INSERT INTO prs_contactpersoon (prs_perslid_key, prs_bedrijf_key, prs_contactpersoon_naam)
(SELECT prs_perslid_key, 2182, prs_perslid_naam
FROM prs_perslid
WHERE prs_perslid_naam = 'Unica koppeling');
COMMIT;
BEGIN
adm.systrackscriptid (
'$Id$');
END;
/
SPOOL OFF
QUIT

28
onces/AA/AAEY/AAEY#37336.sql
View File

@@ -1,28 +0,0 @@
-- Customer specific once-script AAEY#37336.
--
-- (c) 2015 Facilitor bv.
SET ECHO ON
SET DEFINE ON
column fcltlogfile new_value fcltlogfile NOPRINT;
SELECT UPPER (USER) || '_AAEY#37336' || '.lst' AS fcltlogfile FROM DUAL;
spool &fcltlogfile
SET DEFINE OFF;
UPDATE fin_factuur
SET prs_kostensoort_key = 13
WHERE fin_factuur_key = 133322;
BEGIN
adm.systrackscriptid (
'$Id$');
END;
/
COMMIT;
SPOOL OFF
QUIT

76
onces/AA/AAEY/AAEY#39877.sql
View File

@@ -1,76 +0,0 @@
--
-- $Id$
DEFINE thisfile = 'AAEY#39877.SQL'
DEFINE dbuser = '^AAEY'
DEFINE custid = 'AAEY'
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 ------
-- Update kostensoort van factuur 140737 naar CV HMID-2.7.20.2 - Hulpmiddelen (=key 6)
UPDATE fin_factuur
SET prs_kostensoort_key = 6
WHERE fin_factuur_key = 140737;
-- Voeg ook tracking toe. Key 89 = FINUPD
INSERT INTO fac_tracking (fac_tracking_datum,
fac_srtnotificatie_key,
fac_tracking_refkey,
fac_tracking_oms)
VALUES (SYSDATE,
89,
140737,
'Kostensoort op verzoek van AAFM aanpepast naar CV HMID-2.7.20.2 - Hulpmiddelen');
-- Update kostensoort van factuur 141652 naar CV CONS AUT OPE-2.1.10.3 - Dranken- en versnaperingsvoorzieningen (=key 363)
UPDATE fin_factuur
SET prs_kostensoort_key = 363
WHERE fin_factuur_key = 141652;
-- Voeg ook tracking toe. Key 89 = FINUPD
INSERT INTO fac_tracking (fac_tracking_datum,
fac_srtnotificatie_key,
fac_tracking_refkey,
fac_tracking_oms)
VALUES (SYSDATE,
89,
141652,
'Kostensoort op verzoek van AAFM aanpepast naar CV CONS AUT OPE-2.1.10.3 - Dranken- en versnaperingsvoorzieningen');
-- Update kostensoort van factuur 142793 naar CF CONS AUT OPE-2.1.10.3 - Dranken- en versnaperingsvoorzieningen (=key 403)
UPDATE fin_factuur
SET prs_kostensoort_key = 403
WHERE fin_factuur_key = 142793;
-- Voeg ook tracking toe. Key 89 = FINUPD
INSERT INTO fac_tracking (fac_tracking_datum,
fac_srtnotificatie_key,
fac_tracking_refkey,
fac_tracking_oms)
VALUES (SYSDATE,
89,
142793,
'Kostensoort op verzoek van AAFM aanpepast naar CF CONS AUT OPE-2.1.10.3 - Dranken- en versnaperingsvoorzieningen');
------ 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
-- @@ &custid

34
onces/AA/AAEY/AAEY2.sql
View File

@@ -1,34 +0,0 @@
-- Customer specific once-script AAEY2.
--
-- (c) 2014 SG|facilitor bv
SET ECHO ON
SPOOL xAAEY2.lst
SET DEFINE OFF
-- DIENST_LOC_BLD-import!
/* Formatted on 10-10-2014 9:36:05 (QP5 v5.136.908.31019) */
CREATE TABLE aaxx_imp_dienst_loc_bld
(
prs_bedrijf_naam VARCHAR2 (60),
prs_bedrijf_nr VARCHAR2 (50),
prs_dienst_omschrijving VARCHAR2 (60),
alg_locatie_code VARCHAR2 (10),
alg_gebouw_code VARCHAR2 (10)
);
INSERT INTO fac_import_app (fac_import_app_code,
fac_import_app_oms,
fac_functie_key,
fac_import_app_prefix)
SELECT 'DIENST_LOC_BLD',
'AAXX: bedrijf dienst loc bld',
fac_functie_key,
'AAXX'
FROM fac_functie
WHERE fac_functie_code = 'WEB_PRSSYS';
COMMIT;
BEGIN adm.systrackscriptId('$Id$'); END;
/
SPOOL OFF
@aaey.sql

40
onces/AA/AAEY/AAFM#39270_2.sql
View File

@@ -1,40 +0,0 @@
--
-- $Id$
--
-- Extra bedrijf adres in alle omgevingen updaten naar archief@aa-fm.com
DEFINE thisfile = 'AAFM#39270_2.sql'
DEFINE dbuser = 'AAEY'
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 ------
UPDATE prs_bedrijfadres
SET prs_bedrijfadres_url =
REPLACE (prs_bedrijfadres_url,
'facilitair.meldpunt@nl.ey.com',
'archief@aa-fm.com')
WHERE prs_bedrijfadres_url LIKE 'mailto:%';
------ 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
--@@ &custid

21
onces/AA/AAEY/AAIT#29641-(AAEY).sql
View File

@@ -1,21 +0,0 @@
-- Customer specific once-script to update the invoice entry date of some invoices
--
-- Support: +31 53 4800700
SET ECHO ON
SPOOL xAAIT29641.lst
SET DEFINE OFF
UPDATE fin_factuur
SET fin_factuur_datum = TO_DATE ('4-12-2013', 'DD-MM-YYYY')
WHERE fin_factuur_key = 104763;
UPDATE fin_factuur
SET fin_factuur_datum = TO_DATE ('4-12-2013', 'DD-MM-YYYY')
WHERE fin_factuur_key = 103852;
COMMIT;
BEGIN adm.systrackscriptId('$Id$'); END;
SPOOL OFF