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

FMHN#85761 View gereed gemaakt voor rapportage.

Browse Source 
Bovendien FMHN_DAILY in de sql uitgezet totdat FMHN#84596 is goedgekeurd, geen aanpassingen in de FMHN_DAILY leveren.
Op dit moment is de taak FMHN.inactiveren_accounts actief in de acceptatieomgeving, maar nog niet in de productieomgeving.

svn path=/Customer/trunk/; revision=67355
This commit is contained in:
Sander Schepers
2024-12-10 14:51:01 +00:00
parent c1bdaddcff
commit 159a91d1fd
1 changed files with 24 additions and 24 deletions
Download Patch File Download Diff File Expand all files Collapse all files

48
FMHN/fmhn.sql
View File

@@ -78,7 +78,7 @@ AS
SELECT *
FROM fac_imp_file
WHERE fac_import_key = p_import_key
ORDER BY fac_imp_file_index;
ORDER BY fac_imp_file_index;
-- Controleer tijdens import-fase op bestaan van kenmerk
FUNCTION bepaal_kenmerk_key (kw IN VARCHAR)
@@ -1126,7 +1126,7 @@ END IF;
-- ********************
-- ***RUIMTEAFDELING***
-- ********************
-- AAES#25942: koppel afdeling(en) aan ruimte; <EFBFBD><EFBFBD>n afdeling per regel, ruimte kan meerdere keren voorkomen.
-- AAES#25942: koppel afdeling(en) aan ruimte; één afdeling per regel, ruimte kan meerdere keren voorkomen.
IF (recRuimte.prs_afdeling_naam IS NOT NULL)
THEN
IF (recRuimte.prs_afdeling_key IS NULL)
@@ -3425,7 +3425,7 @@ BEGIN
v_count_tot := 0;
-- Toevoegen melding-notitie na afmelden Uitvoeringsopdracht door Prequest
-- en kopi<EFBFBD>ren opdracht-opmerking naar melding-opmerking na bijwerken door
-- en kopiëren opdracht-opmerking naar melding-opmerking na bijwerken door
-- Prequest van afgemelde Uitvoeringsopdracht.
FOR rec IN c_ord2mld
LOOP
@@ -3762,7 +3762,7 @@ BEGIN
FROM fmhn_imp_org
WHERE fac_import_key = p_import_key;
-- Randvoorwaarde dat <EFBFBD><EFBFBD>n intern bedrijf bestaat met bepaalde mincode!
-- Randvoorwaarde dat één intern bedrijf bestaat met bepaalde mincode!
v_errormsg := 'Fout (uniek) bepalen bedrijf';
SELECT b.prs_bedrijf_key, ud.fac_usrdata_key, ud.fac_usrdata_omschr, afdid.prs_kenmerklink_waarde
INTO v_bedrijf_key, v_minomschr_key, v_minomschr, v_afdidroot
@@ -3805,7 +3805,7 @@ BEGIN
-- Bijwerken dat het 'Organisatielevel (in IDM)'-kenmerk correct gevuld!
-- Check op verplichte velden bij INSERT: afdcode, afdoms!
*/
-- Voorkennis: CSV-import zou full-load moeten zijn met <EFBFBD><EFBFBD>n afdeling zonder
-- Voorkennis: CSV-import zou full-load moeten zijn met één afdeling zonder
-- parent. Bij >1 afdelingen zonder parent, pak laagste volgnr!
-- IDM-import zou een XML-bericht per afdeling moeten aanbieden
-- met volgnr=1 (in de juiste volgorde). Bij >1 afdelingen, dan
@@ -3900,8 +3900,8 @@ BEGIN
-- Is de ontvangen afdeling het hoogste niveau=interne bedrijf? Dit
-- is het geval als geldt: Geen parent ontvangen en INSERT!
-- Randvoorwaarde is dat in IDM op hoogste niveau maar <EFBFBD><EFBFBD>n afdeling
-- bestaat! Zo niet, dan wint <EFBFBD><EFBFBD>n tak van de boom!
-- Randvoorwaarde is dat in IDM op hoogste niveau maar één afdeling
-- bestaat! Zo niet, dan wint één tak van de boom!
IF rc.afdidparent IS NULL AND COALESCE (UPPER (rc.operator), 'INSERT') = 'INSERT'
THEN
--v_errormsg := 'Fout bijwerken bedrijfsnaam';
@@ -4668,7 +4668,7 @@ BEGIN
FROM fmhn_imp_prs
WHERE fac_import_key = p_import_key;
-- Randvoorwaarde dat <EFBFBD><EFBFBD>n intern bedrijf bestaat met bepaalde mincode!
-- Randvoorwaarde dat één intern bedrijf bestaat met bepaalde mincode!
v_errormsg := 'Fout (uniek) bepalen bedrijf';
SELECT b.prs_bedrijf_key, ud.fac_usrdata_key, ud.fac_usrdata_omschr, afdid.prs_kenmerklink_waarde
INTO v_bedrijf_key, v_minomschr_key, v_minomschr, v_afdidroot
@@ -4885,7 +4885,7 @@ BEGIN
-- controle op uniciteit van - evt. gewijzigd - e-mail
-- adres (als uniek bij aanmaken, dan onwaarschijnlijk
-- dat later ineens dubbel?)!
-- NB. Even los van dubbele adressen v<EFBFBD><EFBFBD>r FMHN#71214!
-- NB. Even los van dubbele adressen vóór FMHN#71214!
-- FMHN#74750: Bij wijziging van afdeling binnen BZK (bedrijf_key = 921):
-- Autorisaties mogen worden verwijderd
@@ -6790,7 +6790,7 @@ AS
fac.writelog (c_applname, 'E', v_errormsg, 'Daily achtergrond taak afgebroken!');
END;
-- Dagelijks afmelden alle (RS8-)reserveringen in de nacht <EFBFBD><EFBFBD>n dag na de
-- Dagelijks afmelden alle (RS8-)reserveringen in de nacht één dag na de
-- (tot-)datum van de reservering!
PROCEDURE afmelden_res
AS
@@ -11070,7 +11070,7 @@ SELECT
fa.pad) organisatie,
planonnr,
tab.categorienummer,
(SELECT MAX (alg_onrgoedkenmerk_waarde) -- LET OP:Voorkennis dat <EFBFBD><EFBFBD>n gebouw per locatie!
(SELECT MAX (alg_onrgoedkenmerk_waarde) -- LET OP:Voorkennis dat één gebouw per locatie!
FROM alg_gebouw g, alg_v_aanwezigonrgoedkenmerk ok
WHERE g.alg_gebouw_verwijder IS NULL
AND g.alg_gebouw_key = ok.alg_onrgoed_key
@@ -11092,7 +11092,7 @@ SELECT
departement,
TRIM (SUBSTR (a2d.debiteur, INSTR (a2d.debiteur, '/') + 1))
debiteur,
(SELECT MAX (alg_onrgoedkenmerk_waarde) -- LET OP:Voorkennis dat <EFBFBD><EFBFBD>n gebouw per locatie!
(SELECT MAX (alg_onrgoedkenmerk_waarde) -- LET OP:Voorkennis dat één gebouw per locatie!
FROM alg_gebouw g, alg_v_aanwezigonrgoedkenmerk ok
WHERE g.alg_gebouw_verwijder IS NULL
AND g.alg_gebouw_key = ok.alg_onrgoed_key
@@ -11101,7 +11101,7 @@ SELECT
AND g.alg_locatie_key = l.alg_locatie_key)
kostendrager,
'600-'
|| (SELECT MAX (alg_onrgoedkenmerk_waarde) -- LET OP:Voorkennis dat <EFBFBD><EFBFBD>n gebouw per locatie!
|| (SELECT MAX (alg_onrgoedkenmerk_waarde) -- LET OP:Voorkennis dat één gebouw per locatie!
FROM alg_gebouw g, alg_v_aanwezigonrgoedkenmerk ok
WHERE g.alg_gebouw_verwijder IS NULL
AND g.alg_gebouw_key = ok.alg_onrgoed_key
@@ -11843,7 +11843,7 @@ AS
fa.pad) organisatie,
planonnr,
tab.categorienummer,
(SELECT MAX (alg_onrgoedkenmerk_waarde) -- LET OP:Voorkennis dat <EFBFBD><EFBFBD>n gebouw per locatie!
(SELECT MAX (alg_onrgoedkenmerk_waarde) -- LET OP:Voorkennis dat één gebouw per locatie!
FROM alg_gebouw g, alg_v_aanwezigonrgoedkenmerk ok
WHERE g.alg_gebouw_verwijder IS NULL
AND g.alg_gebouw_key = ok.alg_onrgoed_key
@@ -11867,7 +11867,7 @@ AS
departement,
TRIM (SUBSTR (a2d.debiteur, INSTR (a2d.debiteur, '/') + 1))
debiteur,
(SELECT MAX (alg_onrgoedkenmerk_waarde) -- LET OP:Voorkennis dat <EFBFBD><EFBFBD>n gebouw per locatie!
(SELECT MAX (alg_onrgoedkenmerk_waarde) -- LET OP:Voorkennis dat één gebouw per locatie!
FROM alg_gebouw g, alg_v_aanwezigonrgoedkenmerk ok
WHERE g.alg_gebouw_verwijder IS NULL
AND g.alg_gebouw_key = ok.alg_onrgoed_key
@@ -11876,7 +11876,7 @@ AS
AND g.alg_locatie_key = l.alg_locatie_key)
kostendrager,
'600-'
|| (SELECT MAX (alg_onrgoedkenmerk_waarde) -- LET OP:Voorkennis dat <EFBFBD><EFBFBD>n gebouw per locatie!
|| (SELECT MAX (alg_onrgoedkenmerk_waarde) -- LET OP:Voorkennis dat één gebouw per locatie!
FROM alg_gebouw g, alg_v_aanwezigonrgoedkenmerk ok
WHERE g.alg_gebouw_verwijder IS NULL
AND g.alg_gebouw_key = ok.alg_onrgoed_key
@@ -15044,9 +15044,9 @@ AS
AND hho.ins_kenmerk_key = 27 -- HBHV herhaling op
;
/*
Basishulpverlener <EFBFBD> 253,07
Allround bhv-er <EFBFBD> 506,11
Bhv-er met leidinggevende taken <EFBFBD> 759,18
Basishulpverlener € 253,07
Allround bhv-er € 506,11
Bhv-er met leidinggevende taken € 759,18
*/
CREATE OR REPLACE VIEW FMHN_V_RAP_BHV_GRATIFICATIE
(
@@ -19430,7 +19430,7 @@ CREATE OR REPLACE VIEW FMHN_V_RS8_ARBO_BANQ
AS
SELECT fac_usrdata_key,
DECODE (INSTR (fac_usrdata_omschr, '|'), 0, fac_usrdata_omschr, SUBSTR (fac_usrdata_omschr, INSTR (fac_usrdata_omschr, '|') + 1))
|| ' / <EFBFBD>' || REPLACE (TO_CHAR (fac_usrdata_prijs, 'FM99990.00'), '.', ',')
|| ' / €' || REPLACE (TO_CHAR (fac_usrdata_prijs, 'FM99990.00'), '.', ',')
|| ' [' || DECODE (SUBSTR (fac_usrdata_code, 1, 1), '_', 'ARBO', '') || fac_usrdata_code || ']',
fac_usrdata_vervaldatum
FROM fac_usrdata
@@ -19447,7 +19447,7 @@ CREATE OR REPLACE VIEW FMHN_V_RS8_OLIE_BANQ
AS
SELECT fac_usrdata_key,
DECODE (INSTR (fac_usrdata_omschr, '|'), 0, fac_usrdata_omschr, SUBSTR (fac_usrdata_omschr, INSTR (fac_usrdata_omschr, '|') + 1))
|| ' / <EFBFBD>' || REPLACE (TO_CHAR (fac_usrdata_prijs, 'FM99990.00'), '.', ',')
|| ' / €' || REPLACE (TO_CHAR (fac_usrdata_prijs, 'FM99990.00'), '.', ',')
|| ' [' || DECODE (SUBSTR (fac_usrdata_code, 1, 1), '_', 'OLIE', '') || fac_usrdata_code || ']',
fac_usrdata_vervaldatum
FROM fac_usrdata
@@ -20227,7 +20227,7 @@ AS
AND fac_usrdata_verwijder IS NULL) x
WHERE m.mld_melding_key = t.fac_tracking_refkey
AND t.fac_srtnotificatie_key = sn.fac_srtnotificatie_key
AND m.mld_stdmelding_key IN (663, 664) --Specificeren <EFBFBD>n Uitvoeren
AND m.mld_stdmelding_key IN (663, 664) --Specificeren én Uitvoeren
AND sn.fac_srtnotificatie_code = 'MLDUPD'
AND t.fac_tracking_oms LIKE '%-->%'
AND ( t.fac_tracking_oms LIKE '%Projectlid %'
@@ -20266,7 +20266,7 @@ AS
FROM mld_melding m, fac_tracking t, fac_srtnotificatie sn
WHERE m.mld_melding_key = t.fac_tracking_refkey
AND t.fac_srtnotificatie_key = sn.fac_srtnotificatie_key
AND m.mld_stdmelding_key IN (663, 664) --Specificeren <EFBFBD>n Uitvoeren
AND m.mld_stdmelding_key IN (663, 664) --Specificeren én Uitvoeren
AND sn.fac_srtnotificatie_code = 'MLDUPD'
AND t.fac_tracking_oms LIKE '%-->%'
AND ( t.fac_tracking_oms LIKE '%Projectlid %'
@@ -23256,7 +23256,7 @@ AS
SELECT DISTINCT 'CUST28',
NULL,
NULL,
'Automatisch bericht bij locatieverandering bhv<EFBFBD>er in de bhv tool',
'Automatisch bericht bij locatieverandering bhv’er in de bhv tool',
d.ins_deel_key,
NULL,
NULL,