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