CONN#57009 -- Migratie naar SaaS

svn path=/Customer/; revision=42500

onces/CONN/CONN#57009.sql

@@ -0,0 +1,468 @@
+--
+-- $Id$
+--
+-- Conversie script Connexxion om van licentie naar SaaS te gaan.
+
+DEFINE thisfile = 'CONN#57009.SQL'
+DEFINE dbuser   = '^CONN'
+
+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 ------
+
+
+-- De gebruiker _Facilitor was verwijderd. Deze gaan we reanimeren.
+update prs_perslid set prs_perslid_oslogin = '_FACILITOR', prs_perslid_verwijder = NULL
+where prs_perslid_key = 104606;
+
+-- En Facilitor koppelen aan de Facilitor groep
+insert into fac_gebruikersgroep (fac_groep_key, prs_perslid_key) -- _Facilitor
+values (2101, 104606);
+
+-- En Facilitor koppelen aan de Beheer groep
+insert into fac_gebruikersgroep (fac_groep_key, prs_perslid_key) -- Beheer
+values (1, 104606);
+
+-- Een aantal menu-items bestaan nog niet in de connexxion omgeving
+-- te weten: Instellingen, Stylesheet editor, Styling en Widgets.
+INSERT INTO fac_menu (fac_menu_volgnr, fac_menuitems_key)
+    SELECT 18800, fac_menuitems_key
+      FROM fac_menuitems
+     WHERE fac_menuitems_label = 'lcl_menu_fac_setting';
+
+INSERT INTO fac_menu (fac_menu_volgnr, fac_menuitems_key)
+    SELECT 18820, fac_menuitems_key
+      FROM fac_menuitems
+     WHERE fac_menuitems_label = 'lcl_menu_fac_xsledit';
+
+INSERT INTO fac_menu (fac_menu_volgnr, fac_menuitems_key)
+    SELECT 18840, fac_menuitems_key
+      FROM fac_menuitems
+     WHERE fac_menuitems_label = 'lcl_menu_fac_styling';
+
+INSERT INTO fac_menu (fac_menu_volgnr, fac_menuitems_key)
+    SELECT 18860, fac_menuitems_key
+      FROM fac_menuitems
+     WHERE fac_menuitems_label = 'lcl_menu_fac_widgets';
+
+-- Verwijdere package, functies, procedures en view die niet meer gebruikt worden.
+DROP PACKAGE perman;
+DROP FUNCTION conn_get_contract_key;
+DROP PROCEDURE conn_export_huurmutatie;
+DROP PROCEDURE conn_import_budget;
+DROP PROCEDURE conn_import_contractmutatie;
+DROP PROCEDURE conn_import_kosten;
+DROP PROCEDURE conn_import_srtdeel_swap;
+DROP PROCEDURE conn_import_xelion_contract;
+DROP PROCEDURE conn_update_budget;
+DROP PROCEDURE conn_update_contractmutatie;
+DROP PROCEDURE conn_update_kosten;
+DROP PROCEDURE conn_update_srtdeel_swap;
+DROP PROCEDURE conn_update_xelion_contract;
+DROP PROCEDURE conn_verwerk_huurmutatie;
+DROP TRIGGER conn_etn_ari;
+DROP TRIGGER conn_etn_aru;
+DROP TRIGGER oac_ced_ariu;
+DROP TRIGGER conn_prs_kenmerklink_d2;
+DROP TRIGGER conn_prs_kenmerklink_d;
+DROP TRIGGER conn_prs_kenmerklink_u_i2;
+DROP TRIGGER conn_prs_kenmerklink_u_i;
+DROP TRIGGER conn_prs_perslid_d;
+DROP TRIGGER conn_prs_perslid_u_i2;
+DROP TRIGGER conn_prs_perslid_u_i;
+DROP VIEW conn_v_bad_perman_import;
+DROP VIEW conn_v_export_contractmutatie;
+DROP VIEW conn_v_export_finorders_coda;
+DROP VIEW conn_v_export_finorders_nav_fb;
+DROP VIEW conn_v_export_finorders_nav_vg;
+DROP VIEW conn_v_export_opdracht_;
+DROP VIEW conn_v_huurcontracten;
+DROP VIEW conn_v_huurcontract_details;
+DROP VIEW conn_v_lev_diversen;
+DROP VIEW conn_v_lev_geldwaardetransport;
+DROP VIEW conn_v_lev_kantoormeubilair;
+DROP VIEW conn_v_lev_kluizen;
+DROP VIEW conn_v_lev_mobieletelefonie;
+DROP VIEW conn_v_lev_sloten;
+DROP VIEW conn_v_lev_verkoopapparatuur;
+DROP VIEW conn_v_locatiehuurder;
+DROP VIEW conn_v_locatie_huurder;
+DROP VIEW conn_v_loctype_huur;
+DROP VIEW conn_v_loctype_huur_detail;
+DROP VIEW conn_v_opplochuur;
+DROP VIEW conn_v_rap_locatie_verpl;
+DROP VIEW conn_v_ruimtegeg;
+DROP VIEW conn_v_rap_locatie_kosten;
+DROP VIEW conn_v_rap_srtdeel_swap_expimp;
+DROP PACKAGE conn_partners;
+DROP PROCEDURE conn_export_contractmutatie;
+DROP PROCEDURE conn_export_finorders_coda;
+DROP PROCEDURE conn_export_finorders_nav_fb;
+DROP PROCEDURE conn_export_finorders_nav_vg;
+DROP PROCEDURE conn_select_finorders_coda;
+DROP PROCEDURE conn_select_finorders_nav_fb;
+DROP PROCEDURE conn_select_finorders_nav_vg;
+DROP TABLE conn_contactpersonen_error;
+DROP TABLE conn_exp_contractmutatie;
+DROP TABLE conn_exp_debiteur;
+DROP TABLE conn_exp_debiteur_tmp;
+DROP TABLE conn_exp_finorders_coda;
+DROP TABLE conn_exp_finorders_nav_fb;
+DROP TABLE conn_exp_finorders_nav_vg;
+DROP TABLE conn_exp_telefoon;
+DROP TABLE conn_imp_budget;
+DROP TABLE conn_imp_contractmutatie;
+DROP TABLE conn_imp_kosten;
+DROP TABLE conn_imp_srtdeel_swap;
+DROP TABLE conn_imp_xelion_contract;
+DROP TABLE conn_partners_error;
+DROP TABLE conn_tmp_import_afd;
+
+-- Voorzie het menu van mooie icons.
+UPDATE fac_menu SET fac_menu_image = 'fa-bell-o' WHERE fac_menu_altlabel ='lcl_menu_fe_mld';
+UPDATE fac_menu SET fac_menu_image = 'fa-calendar' WHERE fac_menu_altlabel ='lcl_menu_fe_res';
+UPDATE fac_menu SET fac_menu_image = 'fa-user-plus' WHERE fac_menu_altlabel ='lcl_menu_fe_bez';
+UPDATE fac_menu SET fac_menu_image = 'fa-cart-plus' WHERE fac_menu_altlabel ='lcl_menu_fe_bes';
+UPDATE fac_menu SET fac_menu_image = 'fa-random' WHERE fac_menu_altlabel ='lcl_menu_fe_other';
+UPDATE fac_menu SET fac_menu_image = 'fa-user-o' WHERE fac_menu_altlabel ='lcl_fo';
+UPDATE fac_menu SET fac_menu_image = 'fa-list-ul' WHERE fac_menu_altlabel ='lcl_bo';
+UPDATE fac_menu SET fac_menu_image = 'fa-bar-chart' WHERE fac_menu_altlabel ='lcl_maninfo';
+UPDATE fac_menu SET fac_menu_image = 'fa-pie-chart' WHERE fac_menu_altlabel ='lcl_menu_fac_qlikview';
+UPDATE fac_menu SET fac_menu_image = 'fa-money' WHERE fac_menu_altlabel ='lcl_bgt';
+UPDATE fac_menu SET fac_menu_image = 'fa-eur' WHERE fac_menu_altlabel ='lcl_fin';
+UPDATE fac_menu SET fac_menu_image = 'fa-wrench' WHERE fac_menu_altlabel ='lcl_beheer';
+UPDATE fac_menu SET fac_menu_image = 'fa-map-o' WHERE fac_menu_altlabel ='lcl_fg';
+UPDATE fac_menu SET fac_menu_image = 'fa-building-o' WHERE fac_menu_altlabel ='lcl_alg';
+UPDATE fac_menu SET fac_menu_image = 'fa-users' WHERE fac_menu_altlabel ='lcl_prs';
+UPDATE fac_menu SET fac_menu_image = 'fa-key' WHERE fac_menu_altlabel ='lcl_facmgt_aut';
+UPDATE fac_menu SET fac_menu_image = 'fa-life-ring' WHERE fac_menu_altlabel ='lcl_facmgt_fac';
+UPDATE fac_menu SET fac_menu_image = 'fa-building-o' WHERE fac_menu_altlabel ='lcl_facmgt_alg';
+UPDATE fac_menu SET fac_menu_image = 'fa-users' WHERE fac_menu_altlabel ='lcl_facmgt_prs';
+UPDATE fac_menu SET fac_menu_image = 'fa-fire-extinguisher' WHERE fac_menu_altlabel ='lcl_facmgt_ins';
+UPDATE fac_menu SET fac_menu_image = 'fa-desktop' WHERE fac_menu_altlabel ='lcl_facmgt_mld';
+UPDATE fac_menu SET fac_menu_image = 'fa-calendar' WHERE fac_menu_altlabel ='lcl_facmgt_res';
+UPDATE fac_menu SET fac_menu_image = 'fa-cart-plus' WHERE fac_menu_altlabel ='lcl_facmgt_bes';
+UPDATE fac_menu SET fac_menu_image = 'fa-file-text-o' WHERE fac_menu_altlabel ='lcl_facmgt_cnt';
+UPDATE fac_menu SET fac_menu_image = 'fa-eur' WHERE fac_menu_altlabel ='lcl_facmgt_fin';
+UPDATE fac_menu SET fac_menu_image = 'fa-map-o' WHERE fac_menu_altlabel ='lcl_facmgt_fg';
+UPDATE fac_menu SET fac_menu_image = 'fa-clipboard' WHERE fac_menu_altlabel ='lcl_facmgt_mrk';
+UPDATE fac_menu SET fac_menu_image = 'fa-user-plus' WHERE fac_menu_altlabel ='lcl_facmgt_bez';
+UPDATE fac_menu SET fac_menu_image = 'fa-info-circle' WHERE fac_menu_altlabel ='lcl_facmgt_faq';
+UPDATE fac_menu SET fac_menu_image = 'fa-cogs' WHERE fac_menu_altlabel ='lcl_facmgt_overig';
+UPDATE fac_menu SET fac_menu_image = 'fa-sliders' WHERE fac_menu_altlabel ='lcl_facmgt_setup';
+
+-- Mobile hebben we bij nader inzien toch niet aangezet
+--update fac_setting set fac_setting_pvalue = '1' WHERE fac_setting_name = 'mobile_enabled';
+-- standaard sortering voor backoffice lijsten is descending
+update fac_setting set fac_setting_pvalue = '1' WHERE fac_setting_name = 'mld_bo_sort_descending';
+-- Zet het flexpad. LETOP deze moet ook via de userinterface gezet worden.
+update fac_setting set fac_setting_pvalue = '*_DATA' WHERE fac_setting_name = 'flexfilespath';
+-- Zet os_logon uit
+update fac_setting set fac_setting_pvalue = 'false' WHERE fac_setting_name = 'os_logon';
+
+-- Aanpassen styling
+UPDATE FAC_SETTING
+   SET fac_setting_pvalue =
+           '{"headerimage":"../cust/conn/banner.png","buttonbackgroundcolor":"#e20070","buttonhoverbackgroundcolor":"#006772","frameheaderbackgroundcolor":"#d1ea32","frameheadercolor":"#000","iconcolor":"#000","iconhoverbackgroundcolor":"#006772","icontextcolor":"#000","labelbackgroundcolor":"#d1ea32","labelcolor":"#000","mgtmenucolor":"#006772","mywelcomebackgroundcolor":"#d1ea32","mywelcomecolor":"#000","persmenucolor":"#006772","profmenucolor":"#006772","tableheaderbackgroundcolor":"#006772"}'
+ WHERE fac_setting_name = 'csstemplate';
+
+
+-- Reanimeren van de Basware user
+UPDATE prs_perslid
+   SET prs_perslid_verwijder = NULL,
+       prs_perslid_apikey = 'FE0BCD3B3E154F199988D78109CC7D0C',
+       prs_perslid_oslogin = '_BASWARE'
+ WHERE prs_perslid_key = 200635;
+
+INSERT INTO fac_gebruikersgroep (prs_perslid_key, fac_groep_key) VALUES (200635, 122);
+
+-- verwijder facturen en contracten.
+delete fin_factuurregel;
+
+delete fin_factuur;
+
+
+update mld_opdr set cnt_contract_key = NULL;
+
+UPDATE alg_locatie l
+   SET alg_locatie_vervaldatum =
+           (SELECT fac.safe_to_date (alg_onrgoedkenmerk_waarde, 'dd-mm-yyyy')
+              FROM alg_onrgoedkenmerk
+             WHERE     alg_kenmerk_key = 22
+                   AND alg_onrgoed_key = l.alg_locatie_key),
+       alg_locatie_omschrijving =
+           SUBSTR (
+               REPLACE (alg_locatie_omschrijving,
+                        'UITBEHEER',
+                        alg_locatie_adres),
+               1,
+               60)
+ WHERE EXISTS
+           (SELECT alg_onrgoed_key
+              FROM alg_onrgoedkenmerk
+             WHERE     alg_kenmerk_key = 22
+                   AND alg_onrgoed_key = l.alg_locatie_key);
+
+DELETE alg_onrgoedkenmerk
+ WHERE alg_kenmerk_key = 22;
+
+DELETE alg_kenmerk
+ WHERE alg_kenmerk_key = 22;
+
+-- Aanpassen bedrijfadres. Waar eerder de bestanden op de interne FTP server van Connexxion kwamen worden
+-- deze nu in een map geplaatst waarbij de via sftp naar Connexxion verzonden worden.
+UPDATE prs_bedrijfadres
+   SET prs_bedrijfadres_url =
+           'file:d:\Apps\Facilitor\Fplace5i\CUST\CONN\export\bestanden\'
+ WHERE LOWER (prs_bedrijfadres_url) =
+       '\\hvs-lap-fs01\shared\_applicaties\facilitor\basware_import_orders';
+
+
+-- Deze worden nog niet verwijderd omdat we dan de relaties bij de inspecties missen
+
+-- delete cnt_contract_plaats;
+-- delete cnt_contract_object;
+-- delete cnt_contract;
+
+
+-- Opdrachten en meldingen ouder dan 1 jan 2019 worden afgemeld
+DECLARE
+    CURSOR c IS
+        SELECT mld_opdr_key, mld_statusopdr_key, mld_melding_key, mld_opdr_datumbegin
+          FROM mld_opdr o
+         WHERE     mld_opdr_datumbegin < TO_DATE ('20190101', 'yyyymmdd');
+
+         --      AND o.mld_opdr_key = 59958;
+
+    v_count NUMBER;
+    v_date DATE;
+
+BEGIN
+    v_date := SYSDATE;
+    FOR rec IN c
+    LOOP
+        CASE rec.mld_statusopdr_key
+            WHEN 1
+            THEN
+                --1 Afgewezen
+                NULL;
+            --2 Niet akkoord
+            WHEN 2
+            THEN
+                NULL;
+            --3 Ter fiattering
+            WHEN 3
+            THEN
+                mld.setopdrachtstatus (rec.mld_opdr_key, 2, 104606); -- Facilitor
+            --4 Gefiatteerd
+            WHEN 4
+            THEN
+                mld.setopdrachtstatus (rec.mld_opdr_key, 5, 104606); -- Facilitor
+                mld.setopdrachtstatus (rec.mld_opdr_key, 6, 104606); -- Facilitor
+                IF rec.mld_opdr_datumbegin < FAC.safe_to_date('01-01-2017', 'dd-mm-yyyy')
+                THEN
+                   mld.setopdrachtstatus (rec.mld_opdr_key, 7, 104606); -- Facilitor
+                END IF;
+            --5 Toegekend
+            WHEN 5
+            THEN
+                mld.setopdrachtstatus (rec.mld_opdr_key, 6, 104606); -- Facilitor
+                IF rec.mld_opdr_datumbegin < FAC.safe_to_date('01-01-2017', 'dd-mm-yyyy')
+                THEN
+                   mld.setopdrachtstatus (rec.mld_opdr_key, 7, 104606); -- Facilitor
+                END IF;
+            --6 Afgemeld
+            WHEN 6
+            THEN
+                IF rec.mld_opdr_datumbegin < FAC.safe_to_date('01-01-2017', 'dd-mm-yyyy')
+                THEN
+                   mld.setopdrachtstatus (rec.mld_opdr_key, 7, 104606); -- Facilitor
+                END IF;
+            --7 Verwerkt
+            WHEN 7
+            THEN
+                NULL;
+            --8 Geaccepteerd
+            WHEN 8
+            THEN
+                mld.setopdrachtstatus (rec.mld_opdr_key, 6, 104606); -- Facilitor
+                IF rec.mld_opdr_datumbegin < FAC.safe_to_date('01-01-2017', 'dd-mm-yyyy')
+                THEN
+                   mld.setopdrachtstatus (rec.mld_opdr_key, 7, 104606); -- Facilitor
+                END IF;
+            --9 Afgerond
+            WHEN 9
+            THEN
+                IF rec.mld_opdr_datumbegin < FAC.safe_to_date('01-01-2017', 'dd-mm-yyyy')
+                THEN
+                   mld.setopdrachtstatus (rec.mld_opdr_key, 7, 104606); -- Facilitor
+                END IF;
+            WHEN 10
+            THEN
+                --10 Ter goedkeuring
+                mld.setopdrachtstatus (rec.mld_opdr_key, 2, 104606); -- Facilitor
+        END CASE;
+        SELECT count(*)
+          INTO v_count
+          FROM fac_v_orderqueue
+         WHERE xmlnode = 'opdracht'
+           AND key = rec.mld_opdr_key;
+
+        IF v_count = 1
+        THEN
+           fac.markorderassent ('opdracht', rec.mld_opdr_key, 0, 'Afgemeld door script');
+        END IF;
+        MLD.updatemeldingstatus (rec.mld_melding_key, 1, 104606);
+        DELETE fac_notificatie WHERE fac_notificatie_datum > v_date;
+    END LOOP;
+
+    COMMIT;
+END;
+/
+
+/* Formatted on 7/5/2019 12:57:02 (QP5 v5.336) */
+DECLARE
+    CURSOR c IS
+        SELECT mld_melding_key, mld_melding_status, mld_melding_datum
+          FROM mld_melding m
+         WHERE mld_melding_datum < TO_DATE ('20190101', 'yyyymmdd');
+
+    --      AND o.mld_opdr_key = 59958;
+
+    v_count   NUMBER;
+    v_date    DATE;
+BEGIN
+    v_date := SYSDATE;
+
+    FOR rec IN c
+    LOOP
+        CASE rec.mld_melding_status
+            --1 Bij FrontOffice
+            WHEN 0
+            THEN
+                mld.setmeldingstatus (rec.mld_melding_key,
+                                      5,
+                                      104606,
+                                      0);
+                mld.setmeldingstatus (rec.mld_melding_key,
+                                      6,
+                                      104606,
+                                      0);
+            --1 Afgewezen
+            WHEN 1
+            THEN
+                NULL;
+            --2 Nieuw
+            WHEN 2
+            THEN
+                mld.setmeldingstatus (rec.mld_melding_key,
+                                      5,
+                                      104606,
+                                      0);
+
+                IF rec.mld_melding_datum < FAC.safe_to_date('01-01-2017', 'dd-mm-yyyy')
+                THEN
+                    mld.setmeldingstatus (rec.mld_melding_key,
+                                          6,
+                                          104606,
+                                          0);
+                END IF;
+
+            --3 Te accepteren
+            WHEN 3
+            THEN
+                mld.setmeldingstatus (rec.mld_melding_key,
+                                      5,
+                                      104606,
+                                      0);
+                IF rec.mld_melding_datum < FAC.safe_to_date('01-01-2017', 'dd-mm-yyyy')
+                THEN
+                    mld.setmeldingstatus (rec.mld_melding_key,
+                                          6,
+                                          104606,
+                                          0);
+                END IF;
+            --4 In behandeling
+            WHEN 4
+            THEN
+                mld.setmeldingstatus (rec.mld_melding_key,
+                                      5,
+                                      104606,
+                                      0);
+                IF rec.mld_melding_datum < FAC.safe_to_date('01-01-2017', 'dd-mm-yyyy')
+                THEN
+                    mld.setmeldingstatus (rec.mld_melding_key,
+                                          6,
+                                          104606,
+                                          0);
+                END IF;
+            -- 5 Afgemeld
+            WHEN 5
+            THEN
+                IF rec.mld_melding_datum < FAC.safe_to_date('01-01-2017', 'dd-mm-yyyy')
+                THEN
+                    mld.setmeldingstatus (rec.mld_melding_key,
+                                          6,
+                                          104606,
+                                          0);
+                END IF;
+            -- 6 Historie
+            WHEN 6
+            THEN
+                NULL;
+            -- 7 Uitgegeven
+            WHEN 7
+            THEN
+                mld.setmeldingstatus (rec.mld_melding_key,
+                                      5,
+                                      104606,
+                                      0);
+                IF rec.mld_melding_datum < FAC.safe_to_date('01-01-2017', 'dd-mm-yyyy')
+                THEN
+                    mld.setmeldingstatus (rec.mld_melding_key,
+                                          6,
+                                          104606,
+                                          0);
+                END IF;
+            --99 Niet opgelost
+            WHEN 99
+            THEN
+                mld.setmeldingstatus (rec.mld_melding_key,
+                                      5,
+                                      104606,
+                                      0);
+                IF rec.mld_melding_datum < FAC.safe_to_date('01-01-2017', 'dd-mm-yyyy')
+                THEN
+                    mld.setmeldingstatus (rec.mld_melding_key,
+                                          6,
+                                          104606,
+                                          0);
+                END IF;
+        END CASE;
+
+        DELETE fac_notificatie
+         WHERE fac_notificatie_datum > v_date;
+    END LOOP;
+
+    COMMIT;
+END;
+/
+
+------ 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