From fd9533c72b51e40b996d5d541a1b1d7520df0641 Mon Sep 17 00:00:00 2001 From: KammM Date: Fri, 19 Apr 2024 11:14:01 +0200 Subject: [PATCH] DEV, TEST, PROD: Anpassung [PRDD_CUST_SUPPORT_ERR_7000998] --- .../[PRDD_CUST_SUPPORT_ERR_7000998].sql | 47 +++++++++++++++++++ .../[PRDD_CUST_SUPPORT_ERR_7000998].sql | 47 +++++++++++++++++++ .../[PRDD_CUST_SUPPORT_ERR_7000998].sql | 47 +++++++++++++++++++ 3 files changed, 141 insertions(+) create mode 100644 W2K12SRV244/SQL-Server/Prozeduren/[PRDD_CUST_SUPPORT_ERR_7000998].sql create mode 100644 W2K12SRV364/SQL-Server/Prozeduren/[PRDD_CUST_SUPPORT_ERR_7000998].sql create mode 100644 W2K12SRV400/SQL-Server/Prozeduren/[PRDD_CUST_SUPPORT_ERR_7000998].sql diff --git a/W2K12SRV244/SQL-Server/Prozeduren/[PRDD_CUST_SUPPORT_ERR_7000998].sql b/W2K12SRV244/SQL-Server/Prozeduren/[PRDD_CUST_SUPPORT_ERR_7000998].sql new file mode 100644 index 0000000..dccab3d --- /dev/null +++ b/W2K12SRV244/SQL-Server/Prozeduren/[PRDD_CUST_SUPPORT_ERR_7000998].sql @@ -0,0 +1,47 @@ +USE [DD_ECM] +GO +/****** Object: StoredProcedure [dbo].[PRDD_CUST_SUPPORT_ERR_7000998] Script Date: 4/19/2024 10:39:10 AM ******/ +SET ANSI_NULLS ON +GO +SET QUOTED_IDENTIFIER ON +GO +-- ============================================= +-- Author: DD MS +-- Changed: 18.04.2024 MK If @COUNT von 25 auf 100 umgestellt +-- Changed: 18.04.2024 MK/MP Umstellung auf 'support-flow@digitaldata.works' +-- Change date: 15.12.2020 MS Mail-Adresse geändert +-- Change date: 02.09.2020 MS Erweiterung Select +-- Change date: 18.08.2020 MS Erweiterung der Prüfung +-- Change date: 31.07.2020 MS DATEDIFF = Minute 45 +-- Change date: 28.07.2020 MS DATEDIFF = 30 Minuten +-- Creation date: 07.05.2020 +-- ============================================= +CREATE PROCEDURE [dbo].[PRDD_CUST_SUPPORT_ERR_7000998] +AS +DECLARE @SUBJECT VARCHAR(100), @BODY VARCHAR(MAX) +,@EMAIL_TO VARCHAR(100),@MAIL_FROM VARCHAR(200),@COMMENT VARCHAR(MAX), @SYS_DESCR VARCHAR(5),@COUNT Integer +SELECT @SYS_DESCR = STRING2 FROM TBDD_MODULES WHERE SHORT_NAME = 'FERDI' +SELECT @EMAIL_TO = CAT_STRING FROM IDB.dbo.TBIDB_CATALOG WHERE CAT_TITLE = 'DD_SUPPORT_EMAIL'; + +select @COUNT = count(*) FROM VWCUST_RPTERGEBNISBERICHT2BCREATED +If @COUNT > 100 + BEGIN + SET @SUBJECT = 'WISAG - FERDinand - ' + @SYS_DESCR + ' - ERGEBNISBERICHT Überlauf - EB Creator' + SET @BODY = 'ACHTUNG: potentieller ERGEBNISBERICHT Überlauf im EB Creator Modul
' + SET @BODY += 'AUSLÖSER: Mehr als 25 Belege warte auf Erzeugung!

' + SET @BODY += '' + CONVERT(VARCHAR(10),@COUNT) + ' Belege warten auf die EB-Erzeugung' + SET @BODY += '

Prüfen Sie den EB-Creator auf W2K12SRV243!' + SET @BODY += '

Erzeugt von Procedure: PRDD_CUST_SUPPORT_ERR_7000998' + IF NOT EXISTS(SELECT * FROM TBEMLP_EMAIL_OUT WHERE [WF_ID] = 7000998 AND DATEDIFF(MINUTE,ADDED_WHEN,GETDATE()) < 60) + BEGIN + + IF @BODY IS NOT NULL + BEGIN + --PRINT 'NOW THE INSERT' + EXEC PREMAIL_NEW_EMAIL 1,@EMAIL_TO,@SUBJECT,@BODY,'',7000998,7000998,'PRDD_CUST_SUPPORT_ERR_7000998' + END + END + ELSE + PRINT 'Mail 7000998 already sent!' + END + diff --git a/W2K12SRV364/SQL-Server/Prozeduren/[PRDD_CUST_SUPPORT_ERR_7000998].sql b/W2K12SRV364/SQL-Server/Prozeduren/[PRDD_CUST_SUPPORT_ERR_7000998].sql new file mode 100644 index 0000000..dccab3d --- /dev/null +++ b/W2K12SRV364/SQL-Server/Prozeduren/[PRDD_CUST_SUPPORT_ERR_7000998].sql @@ -0,0 +1,47 @@ +USE [DD_ECM] +GO +/****** Object: StoredProcedure [dbo].[PRDD_CUST_SUPPORT_ERR_7000998] Script Date: 4/19/2024 10:39:10 AM ******/ +SET ANSI_NULLS ON +GO +SET QUOTED_IDENTIFIER ON +GO +-- ============================================= +-- Author: DD MS +-- Changed: 18.04.2024 MK If @COUNT von 25 auf 100 umgestellt +-- Changed: 18.04.2024 MK/MP Umstellung auf 'support-flow@digitaldata.works' +-- Change date: 15.12.2020 MS Mail-Adresse geändert +-- Change date: 02.09.2020 MS Erweiterung Select +-- Change date: 18.08.2020 MS Erweiterung der Prüfung +-- Change date: 31.07.2020 MS DATEDIFF = Minute 45 +-- Change date: 28.07.2020 MS DATEDIFF = 30 Minuten +-- Creation date: 07.05.2020 +-- ============================================= +CREATE PROCEDURE [dbo].[PRDD_CUST_SUPPORT_ERR_7000998] +AS +DECLARE @SUBJECT VARCHAR(100), @BODY VARCHAR(MAX) +,@EMAIL_TO VARCHAR(100),@MAIL_FROM VARCHAR(200),@COMMENT VARCHAR(MAX), @SYS_DESCR VARCHAR(5),@COUNT Integer +SELECT @SYS_DESCR = STRING2 FROM TBDD_MODULES WHERE SHORT_NAME = 'FERDI' +SELECT @EMAIL_TO = CAT_STRING FROM IDB.dbo.TBIDB_CATALOG WHERE CAT_TITLE = 'DD_SUPPORT_EMAIL'; + +select @COUNT = count(*) FROM VWCUST_RPTERGEBNISBERICHT2BCREATED +If @COUNT > 100 + BEGIN + SET @SUBJECT = 'WISAG - FERDinand - ' + @SYS_DESCR + ' - ERGEBNISBERICHT Überlauf - EB Creator' + SET @BODY = 'ACHTUNG: potentieller ERGEBNISBERICHT Überlauf im EB Creator Modul
' + SET @BODY += 'AUSLÖSER: Mehr als 25 Belege warte auf Erzeugung!

' + SET @BODY += '' + CONVERT(VARCHAR(10),@COUNT) + ' Belege warten auf die EB-Erzeugung' + SET @BODY += '

Prüfen Sie den EB-Creator auf W2K12SRV243!' + SET @BODY += '

Erzeugt von Procedure: PRDD_CUST_SUPPORT_ERR_7000998' + IF NOT EXISTS(SELECT * FROM TBEMLP_EMAIL_OUT WHERE [WF_ID] = 7000998 AND DATEDIFF(MINUTE,ADDED_WHEN,GETDATE()) < 60) + BEGIN + + IF @BODY IS NOT NULL + BEGIN + --PRINT 'NOW THE INSERT' + EXEC PREMAIL_NEW_EMAIL 1,@EMAIL_TO,@SUBJECT,@BODY,'',7000998,7000998,'PRDD_CUST_SUPPORT_ERR_7000998' + END + END + ELSE + PRINT 'Mail 7000998 already sent!' + END + diff --git a/W2K12SRV400/SQL-Server/Prozeduren/[PRDD_CUST_SUPPORT_ERR_7000998].sql b/W2K12SRV400/SQL-Server/Prozeduren/[PRDD_CUST_SUPPORT_ERR_7000998].sql new file mode 100644 index 0000000..dccab3d --- /dev/null +++ b/W2K12SRV400/SQL-Server/Prozeduren/[PRDD_CUST_SUPPORT_ERR_7000998].sql @@ -0,0 +1,47 @@ +USE [DD_ECM] +GO +/****** Object: StoredProcedure [dbo].[PRDD_CUST_SUPPORT_ERR_7000998] Script Date: 4/19/2024 10:39:10 AM ******/ +SET ANSI_NULLS ON +GO +SET QUOTED_IDENTIFIER ON +GO +-- ============================================= +-- Author: DD MS +-- Changed: 18.04.2024 MK If @COUNT von 25 auf 100 umgestellt +-- Changed: 18.04.2024 MK/MP Umstellung auf 'support-flow@digitaldata.works' +-- Change date: 15.12.2020 MS Mail-Adresse geändert +-- Change date: 02.09.2020 MS Erweiterung Select +-- Change date: 18.08.2020 MS Erweiterung der Prüfung +-- Change date: 31.07.2020 MS DATEDIFF = Minute 45 +-- Change date: 28.07.2020 MS DATEDIFF = 30 Minuten +-- Creation date: 07.05.2020 +-- ============================================= +CREATE PROCEDURE [dbo].[PRDD_CUST_SUPPORT_ERR_7000998] +AS +DECLARE @SUBJECT VARCHAR(100), @BODY VARCHAR(MAX) +,@EMAIL_TO VARCHAR(100),@MAIL_FROM VARCHAR(200),@COMMENT VARCHAR(MAX), @SYS_DESCR VARCHAR(5),@COUNT Integer +SELECT @SYS_DESCR = STRING2 FROM TBDD_MODULES WHERE SHORT_NAME = 'FERDI' +SELECT @EMAIL_TO = CAT_STRING FROM IDB.dbo.TBIDB_CATALOG WHERE CAT_TITLE = 'DD_SUPPORT_EMAIL'; + +select @COUNT = count(*) FROM VWCUST_RPTERGEBNISBERICHT2BCREATED +If @COUNT > 100 + BEGIN + SET @SUBJECT = 'WISAG - FERDinand - ' + @SYS_DESCR + ' - ERGEBNISBERICHT Überlauf - EB Creator' + SET @BODY = 'ACHTUNG: potentieller ERGEBNISBERICHT Überlauf im EB Creator Modul
' + SET @BODY += 'AUSLÖSER: Mehr als 25 Belege warte auf Erzeugung!

' + SET @BODY += '' + CONVERT(VARCHAR(10),@COUNT) + ' Belege warten auf die EB-Erzeugung' + SET @BODY += '

Prüfen Sie den EB-Creator auf W2K12SRV243!' + SET @BODY += '

Erzeugt von Procedure: PRDD_CUST_SUPPORT_ERR_7000998' + IF NOT EXISTS(SELECT * FROM TBEMLP_EMAIL_OUT WHERE [WF_ID] = 7000998 AND DATEDIFF(MINUTE,ADDED_WHEN,GETDATE()) < 60) + BEGIN + + IF @BODY IS NOT NULL + BEGIN + --PRINT 'NOW THE INSERT' + EXEC PREMAIL_NEW_EMAIL 1,@EMAIL_TO,@SUBJECT,@BODY,'',7000998,7000998,'PRDD_CUST_SUPPORT_ERR_7000998' + END + END + ELSE + PRINT 'Mail 7000998 already sent!' + END +