From 4e04613309aceca97fe9bab39cf1771c5c19e368 Mon Sep 17 00:00:00 2001 From: Maarten van der Heide Date: Fri, 2 Feb 2024 14:38:53 +0000 Subject: [PATCH] MNNL#69794 Beheer certificaten (CERT-import+DAILY) svn path=/Customer/trunk/; revision=63448 --- MNNL/mnnl.sql | 25 +++++-------------------- 1 file changed, 5 insertions(+), 20 deletions(-) diff --git a/MNNL/mnnl.sql b/MNNL/mnnl.sql index 48a688968..af21e054c 100644 --- a/MNNL/mnnl.sql +++ b/MNNL/mnnl.sql @@ -172,25 +172,6 @@ AS END; / -CREATE OR REPLACE PROCEDURE MNNL_DAILY -AS - v_errormsg VARCHAR2 (1000); - oracle_err_num NUMBER; - oracle_err_mes VARCHAR2 (200); -BEGIN - -- Registreren 'Vervangen certificaat'-melding (=3681) 30d voor Vervaldatum - -- van 'Certificaten'-object onder 'Certificaten'-discipline (=2241). - mnnl.vervangen_cert; -EXCEPTION - WHEN OTHERS - THEN - oracle_err_num := SQLCODE; - oracle_err_mes := SUBSTR (SQLERRM, 1, 200); - v_errormsg := 'ORACLE (error ' || oracle_err_num || '/' || oracle_err_mes || ')'; - fac.writelog ('DAILY', 'E', 'Proces afgebroken!', v_errormsg); -END MNNL_DAILY; -/ - -- ACTIVE DIRECTORY CREATE OR REPLACE PROCEDURE mnnl_import_prs (p_import_key IN NUMBER) AS @@ -10337,6 +10318,10 @@ AS v_datum1 DATE; v_datum2 DATE; BEGIN + -- Registreren 'Vervangen certificaat'-melding (=3681) 30d voor Vervaldatum + -- van 'Certificaten'-object onder 'Certificaten'-discipline (=2241). + mnnl.vervangen_cert; + -- Aanname dat er elk jaar iets te schonen valt, anders rustig jaartje! v_errormsg := 'Fout bepalen of er nog iets te schonen valt'; SELECT SUM (aantal) @@ -10583,7 +10568,7 @@ EXCEPTION oracle_err_num := SQLCODE; oracle_err_mes := SUBSTR (SQLERRM, 1, 200); v_errormsg := 'ORACLE (error ' || oracle_err_num || '/' || oracle_err_mes || ')'; - fac.writelog ('DAILY', 'E', 'Proces DAILY afgebroken!', v_errormsg); + fac.writelog ('DAILY', 'E', 'Proces afgebroken!', v_errormsg); COMMIT; END; /