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

UWVA#13637

Browse Source 
svn path=/Database/trunk/; revision=9661
This commit is contained in:
Peter Feij
2008-01-03 13:50:08 +00:00
parent e8804645c7
commit d871ab8dc9
2 changed files with 27 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
BEZ/BEZ_TRI.SRC
View File

@@ -1,7 +1,7 @@
#ifdef BEZ // 03-11-2000 PF #ifdef BEZ // 03-11-2000 PF
/* $Revision: 25 $ /* $Revision: 26 $
* $Modtime: 20-12-07 13:54 $ * $Modtime: 3-01-08 15:03 $
*/ */
#include "comsql.h" #include "comsql.h"
@@ -141,8 +141,8 @@ BEGIN
WHERE bez_afspraak_key = :NEW.bez_afspraak_key; WHERE bez_afspraak_key = :NEW.bez_afspraak_key;
-- We support substitution of placeholders in the messages -- We support substitution of placeholders in the messages
-- ##KEY## = ins_srtdiscipline_prefix+key+/+volgnr -- ##KEY## = afspraaknummer
-- ##NAAM## = volledige naam van de afmelder -- ##NAAM## = volledige naam van de bezoeker
IF INSTR2(soms, '#') > 0 IF INSTR2(soms, '#') > 0
THEN THEN
soms := soms :=
@@ -266,12 +266,13 @@ BEGIN
); );
END IF; END IF;
IF soms IS NOT NULL -- Prevent sending these messages to self
IF soms IS NOT NULL AND lsender != lreceiver
THEN THEN
fac.putnotificationsrt (lsender, lreceiver, scode, :NEW.bez_afspraak_key, soms, NULL, NULL, NULL, NULL); fac.putnotificationsrt (lsender, lreceiver, scode, :NEW.bez_afspraak_key, soms, NULL, NULL, NULL, NULL);
END IF; END IF;
IF soms2 IS NOT NULL IF soms2 IS NOT NULL AND lsender != lreceiver2
THEN THEN
fac.putnotificationsrt (lsender, lreceiver2, scode2, :NEW.bez_afspraak_key, soms2, NULL, NULL, NULL, NULL); fac.putnotificationsrt (lsender, lreceiver2, scode2, :NEW.bez_afspraak_key, soms2, NULL, NULL, NULL, NULL);
END IF; END IF;

25
_UP/471to480.src
View File

@@ -1,5 +1,5 @@
-- --
-- Update script van Facilitor versie 4.71.3 naar 4.80 $Revision: 29 $ -- Update script van Facilitor versie 4.71.3 naar 4.80 $Revision: 30 $
-- --
/* /*
* This script is to be precompiled. * This script is to be precompiled.
@@ -35,8 +35,8 @@ PROMPT versie voor MS SQL Server
#else #else
PROMPT versie voor Oracle PROMPT versie voor Oracle
#endif #endif
PROMPT $Revision: 29 $ PROMPT $Revision: 30 $
PROMPT $Modtime: 21-12-07 14:38 $ PROMPT $Modtime: 3-01-08 15:47 $
PROMPT Copyright 1996-2007 Dijkoraad IT bv/Facilitor Software Nederland bv PROMPT Copyright 1996-2007 Dijkoraad IT bv/Facilitor Software Nederland bv
PROMPT PROMPT
SELECT 'De huidige versie van Facilitor/' || USER || ' is: ' || fac_module_version SELECT 'De huidige versie van Facilitor/' || USER || ' is: ' || fac_module_version
@@ -357,6 +357,21 @@ DEF_FAC_MESSAGE ('ALG_OPEN_CONTRACT', 'heeft lopend contract', '');
///////////////////////////////////////////////////////////////////////////////////////////////// DML ///////////////////////////////////////////////////////////////////////////////////////////////// DML
///////////////////////////////////////////////////////////////////////////////////////////////// UWVA#13637
-- Verwijder alle informatieve portalberichten (statusinfo) ouder dan 2 maanden;
-- dit ruimt op en de nieuwswaarde is ondertussen nihil
DELETE FROM web_user_messages w
WHERE web_user_mess_action_datum + 30 < SYSDATE
AND w.fac_srtnotificatie_key IN (SELECT s.fac_srtnotificatie_key
FROM fac_srtnotificatie s
WHERE s.fac_srtnotificatie_code NOT IN ('BESAP1', 'MLDAP1'));
-- Onverhoopte fiatteringsverzoeken ouder dan een half jaar zijn ook wel vervallen
DELETE FROM web_user_messages w
WHERE web_user_mess_action_datum + 60 < SYSDATE
AND w.fac_srtnotificatie_key IN (SELECT s.fac_srtnotificatie_key
FROM fac_srtnotificatie s
WHERE s.fac_srtnotificatie_code IN ('BESAP1', 'MLDAP1'));
///////////////////////////////////////////////////////////////////////////////////////////////// DDL ///////////////////////////////////////////////////////////////////////////////////////////////// DDL
@@ -370,11 +385,11 @@ DEF_FAC_MESSAGE ('ALG_OPEN_CONTRACT', 'heeft lopend contract', '');
UPDATE_VERSION(_VERSION); UPDATE_VERSION(_VERSION);
UPDATE FAC_MESSAGE UPDATE FAC_MESSAGE
SET FAC_MESSAGE_TEXT = 'Facilitor '||_VERSION||'$Revision: 29 $' SET FAC_MESSAGE_TEXT = 'Facilitor '||_VERSION||'$Revision: 30 $'
WHERE FAC_MESSAGE_CODE = 'FAC_M002'; WHERE FAC_MESSAGE_CODE = 'FAC_M002';
UPDATE FAC_MESSAGE UPDATE FAC_MESSAGE
SET FAC_MESSAGE_TEXT = 'Welkom bij Facilitor '||_VERSION||'$Revision: 29 $' SET FAC_MESSAGE_TEXT = 'Welkom bij Facilitor '||_VERSION||'$Revision: 30 $'
WHERE FAC_MESSAGE_CODE = 'FAC_M035'; WHERE FAC_MESSAGE_CODE = 'FAC_M035';
COMMIT; COMMIT;