48 lines
2.0 KiB
Transact-SQL
48 lines
2.0 KiB
Transact-SQL
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<br>'
|
|
SET @BODY += 'AUSLÖSER: Mehr als 25 Belege warte auf Erzeugung!<p>'
|
|
SET @BODY += '<b>' + CONVERT(VARCHAR(10),@COUNT) + '</b> Belege warten auf die EB-Erzeugung'
|
|
SET @BODY += '<p>Prüfen Sie den EB-Creator auf W2K12SRV243!<b>'
|
|
SET @BODY += '<p>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
|
|
|