ConfigCustom/Stadtwerke_Bebra
7
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Initial

Browse Source
This commit is contained in:
KammM 2024-03-21 17:47:57 +01:00
commit 9b7b684dc4
84 changed files with 6990 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
DMS/SQL-Server/Prozeduren/[PRCUST_ADD_HISTORY_STATE].sql Normal file
View File

@ -0,0 +1,19 @@
USE [DD_ECM]
GO
/****** Object: StoredProcedure [dbo].[PRCUST_ADD_HISTORY_STATE] Script Date: 21.03.2024 17:07:58 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[PRCUST_ADD_HISTORY_STATE] @MessageID VARCHAR(250), @TITLE1 VARCHAR(250), @TITLE2 VARCHAR(250), @COMMENT VARCHAR(3000) = 0
AS
BEGIN
INSERT INTO TBEMLP_HISTORY_STATE
(MESSAGE_ID,STATE_TITLE,STATE_TITLE1,COMMENT) VALUES (@MessageID,@TITLE1,@TITLE2,@COMMENT)
END
GO

96
DMS/SQL-Server/Prozeduren/[PRCUST_CREATE_PM_REMINDER_MAILS].sql Normal file
View File

@ -0,0 +1,96 @@
USE [DD_ECM]
GO
/****** Object: StoredProcedure [dbo].[PRCUST_CREATE_PM_REMINDER_MAILS] Script Date: 21.03.2024 17:08:30 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[PRCUST_CREATE_PM_REMINDER_MAILS] @SUBJECT as VARCHAR(100) = ''
AS
DECLARE @EMAIL VARCHAR(250),
@EMAIL_BODY VARCHAR(MAX),
@BODYPRAEFIX VARCHAR(1000),
@BODY_SUFFIX VARCHAR(1000)
DECLARE @Table TABLE (TITLE Varchar(100),Anzahl VARCHAR(3),PType Varchar(50))
--#######
SET @SUBJECT = 'Erinnerung unerledigte Workflowschritte'
SET @BODYPRAEFIX = 'Sehr geehrte Kollegin, sehr geehrter Kollege, <br><p>diese Email informiert Sie darüber, dass elektronische Eingangsrechnungen für
Sie zur Bearbeitung im Workflow bereit stehen: <br><p>'
SET @BODY_SUFFIX = 'Mit freundlichen Grüßen.<p>Ihr ProcessManager'
--#######
DECLARE cUser CURSOR FOR
SELECT DISTINCT EMail FROM [VWCUST_PM_PROFILE_TODO]
ORDER BY Email
OPEN CUser
FETCH NEXT FROM cUser INTO @EMAIL
WHILE @@FETCH_STATUS = 0
BEGIN
DELETE FROM @Table
SET @EMAIL_BODY = '<!DOCTYPE html><html><body style=''font-family:"Arial";font-size:10.0pt''">' + @BODYPRAEFIX +
'<table border = 1 style=''font-family:"arial";font-size:10.0pt''">
<tr>
<th>Workflow-Titel</th><th>Anzahl Belege</th><th>Aufgaben-Typ</th>'
DECLARE @Anz Varchar(3),@Title Varchar(250),@PType Varchar(50)
DECLARE cJobs CURSOR FOR
SELECT Title,Convert(varchar(3), Anzahl),PType FROM [VWCUST_PM_PROFILE_TODO] WHERE Email = @EMAIL order by oSequence
OPEN cJobs
FETCH NEXT FROM cJobs INTO @Title,@Anz,@PType
WHILE @@FETCH_STATUS = 0
BEGIN
INSERT INTO @Table (TITLE,Anzahl,PType) Values (@Title,@Anz,@PType);
--Print @EMAIL + '#' + @Anz + ' ' + @Title
FETCH NEXT FROM cJobs INTO @Title,@Anz,@PType
END
CLOSE cJobs
DEALLOCATE cJobs
Declare @xml NVARCHAR(Max)
SET @xml = CAST((SELECT TITLE as 'td','',Anzahl as 'td','',PType as 'td','' FROM @Table FOR XML PATH('tr'),ELEMENTS) as NVARCHAR(MAX))
SET @EMAIL_BODY = @EMAIL_BODY + @xml + '</table><p>' + @BODY_SUFFIX +
'</body></html>' --</body></html>
Print @EMAIL_BODY
IF NOT EXISTS(SELECT GUID FROM TBEMLP_EMAIL_OUT WHERE [EMAIL_ADRESS] = @EMAIL AND [EMAIL_SUBJ] = @SUBJECT and [EMAIL_SENT] is not null)
-- AND DATEDIFF(Minute,ADDED_WHEN,GETDATE()) = 0)
BEGIN
INSERT INTO [dbo].[TBEMLP_EMAIL_OUT]
([SENDING_PROFILE]
,[REFERENCE_ID]
,[WF_ID]
,[EMAIL_ADRESS]
,[EMAIL_SUBJ]
,[EMAIL_BODY]
,[COMMENT]
,[ADDED_WHO])
VALUES (1,
88888,
0,
@EMAIL,-- + ';m.schreiber@digitaldata.works',
@SUBJECT,
@EMAIL_BODY,
'PM Reminder',
'PRPM_CUST_CREATE_REMINDER_MAILS')
END
ELSE
PRINT 'ALREADY SENT IN THIS MINUTE'
--Print '######'
FETCH NEXT FROM cUser INTO @EMAIL
END
CLOSE cUser
DEALLOCATE cUser
GO

94
DMS/SQL-Server/Prozeduren/[PRCUST_PUSH_PM_EMAIL_USER_INFO_PROFILEID_11].sql Normal file
View File

@ -0,0 +1,94 @@
USE [DD_ECM]
GO
/****** Object: StoredProcedure [dbo].[PRCUST_PUSH_PM_EMAIL_USER_INFO_PROFILEID_11] Script Date: 21.03.2024 17:09:05 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Table function to set E-mail notification, based on a string field
-- Stand: MK // 11.11.2021
-- 11.11.2021 Erweiterung windream DocID für Mail
-- 28.10.2021 Initial
-- PM Profil: SWB - ER 3.1 - Auffangprofil für alle abgelehnten Dokumente
CREATE PROCEDURE [dbo].[PRCUST_PUSH_PM_EMAIL_USER_INFO_PROFILEID_11] (
@windreamDocID BIGINT, -- = windream DocID
@VerifierUsername VARCHAR(150), -- = Name des Prüfers
@VendorName VARCHAR(250) -- = Lieferantenname
)
AS
BEGIN
DECLARE @Result INTEGER = 0,
@EMail VARCHAR(200);
----------------------------------------------------------------------------------------------------------------------------------
-- Get User MailAddress
SELECT TOP 1 @EMail = [EMAIL]
FROM [TBDD_USER]
WHERE [USERNAME] = @VerifierUsername
----------------------------------------------------------------------------------------------------------------------------------
IF (LEN(@EMail) > 5) and (@EMail like '%@%')
BEGIN
DECLARE @EMAIL_BODY VARCHAR(MAX),
@BODYPRAEFIX VARCHAR(1000),
@BODY_SUFFIX VARCHAR(1000),
@SUBJECT VARCHAR(100) = '';
SET @SUBJECT = 'ProcessManager: Eine Eingangsrechnung von ' + @VendorName + ' soll von Ihnen neu angefordert werden!'
SET @BODYPRAEFIX = 'Sehr geehrte Kollegin, sehr geehrter Kollege, <br><p>
diese E-Mail informiert Sie darüber, dass eine elektronische Eingangsrechnung für Sie zur Bearbeitung im Workflow bereit steht! <br><p>
Workflow-Profil: SWB - ER 4.1 - Auffangprofil für alle neu angeforderten Dokumente <br><p>
DocID: ' + convert(varchar(250),@windreamDocID) + ' <br><p>'
SET @BODY_SUFFIX = 'Mit freundlichen Grüßen.<p>
Ihr ProcessManager'
SET @EMAIL_BODY = '<!DOCTYPE html><html><body style=''font-family:"Arial";font-size:10.0pt''">' + @BODYPRAEFIX + @BODY_SUFFIX + '</body></html>'
INSERT INTO [dbo].[TBEMLP_EMAIL_OUT]
([SENDING_PROFILE]
,[REFERENCE_ID]
,[WF_ID]
,[EMAIL_ADRESS]
,[EMAIL_SUBJ]
,[EMAIL_BODY]
,[COMMENT]
,[ADDED_WHO])
VALUES (1,
@windreamDocID,
0,
@EMAIL,-- + ';m.kamm@digitaldata.works',
@SUBJECT,
@EMAIL_BODY,
'PM Reminder',
'[FNCUST_PUSH_PM_EMAIL_USER_INFO_PROFILEID_11]')
SET @Result = 0
END
-- 1 = Error
ELSE
SET @Result = 1
----------------------------------------------------------------------------------------------------------------------------------
RETURN @Result;
END
GO

95
DMS/SQL-Server/Prozeduren/[PRCUST_PUSH_PM_EMAIL_USER_INFO_PROFILEID_3].sql Normal file
View File

@ -0,0 +1,95 @@
USE [DD_ECM]
GO
/****** Object: StoredProcedure [dbo].[PRCUST_PUSH_PM_EMAIL_USER_INFO_PROFILEID_3] Script Date: 21.03.2024 17:09:39 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Table function to set E-mail notification, based on a string field
-- Stand: MK // 11.11.2021
-- 11.11.2021 Erweiterung windream DocID für Mail
-- 28.10.2021 Initial
-- PM Profil: SWB - ER 3.0 - Zuweisung und Vorprüfung durch die FiBu
CREATE PROCEDURE [dbo].[PRCUST_PUSH_PM_EMAIL_USER_INFO_PROFILEID_3] (
@windreamDocID BIGINT, -- = windream DocID
@VerifierUsername VARCHAR(150), -- = Name des Prüfers
@VendorName VARCHAR(250) -- = Lieferantenname
)
AS
BEGIN
DECLARE @Result INTEGER = 0,
@EMail VARCHAR(200);
----------------------------------------------------------------------------------------------------------------------------------
-- Get User MailAddress
SELECT TOP 1 @EMail = [EMAIL]
FROM [TBDD_USER]
WHERE [USERNAME] = @VerifierUsername
----------------------------------------------------------------------------------------------------------------------------------
IF (LEN(@EMail) > 5) and (@EMail like '%@%')
BEGIN
DECLARE @EMAIL_BODY VARCHAR(MAX),
@BODYPRAEFIX VARCHAR(1000),
@BODY_SUFFIX VARCHAR(1000),
@SUBJECT VARCHAR(100) = '';
SET @SUBJECT = 'ProcessManager: Eine Eingangsrechnung von ' + @VendorName + ' möchte von Ihnen geprüft werden!'
SET @BODYPRAEFIX = 'Sehr geehrte Kollegin, sehr geehrter Kollege, <br><p>
diese E-Mail informiert Sie darüber, dass eine elektronische Eingangsrechnung für Sie zur Bearbeitung im Workflow bereit steht! <br><p>
Workflow-Profil: SWB - ER 4.0 - Prüfung durch die Fachabteilung<br><p>
DocID: ' + convert(varchar(250),@windreamDocID) + ' <br><p>'
SET @BODY_SUFFIX = 'Mit freundlichen Grüßen.<p>
Ihr ProcessManager'
SET @EMAIL_BODY = '<!DOCTYPE html><html><body style=''font-family:"Arial";font-size:10.0pt''">' + @BODYPRAEFIX + @BODY_SUFFIX + '</body></html>'
INSERT INTO [dbo].[TBEMLP_EMAIL_OUT]
([SENDING_PROFILE]
,[REFERENCE_ID]
,[WF_ID]
,[EMAIL_ADRESS]
,[EMAIL_SUBJ]
,[EMAIL_BODY]
,[COMMENT]
,[ADDED_WHO])
VALUES (1,
@windreamDocID,
0,
@EMAIL,-- + ';m.kamm@digitaldata.works',
@SUBJECT,
@EMAIL_BODY,
'PM Reminder',
'[FNCUST_PUSH_PM_EMAIL_USER_INFO_PROFILEID_3]')
SET @Result = 0
END
-- 1 = Error
ELSE
SET @Result = 1
----------------------------------------------------------------------------------------------------------------------------------
RETURN @Result;
END
GO

118
DMS/SQL-Server/Prozeduren/[PRCUST_PUSH_PM_EMAIL_USER_INFO_PROFILEID_5].sql Normal file
View File

@ -0,0 +1,118 @@
USE [DD_ECM]
GO
/****** Object: StoredProcedure [dbo].[PRCUST_PUSH_PM_EMAIL_USER_INFO_PROFILEID_5] Script Date: 21.03.2024 17:10:03 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Table function to set E-mail notification, based on a vector field
-- Stand: MK // 10.11.2021
-- 10.11.2021 Initial
-- PM Profil: SWB - ER 6.0 - Terminüberweisung - Finale Freigabe
CREATE PROCEDURE [dbo].[PRCUST_PUSH_PM_EMAIL_USER_INFO_PROFILEID_5] (
@windreamDocID BIGINT, -- = windream DocID
@VendorName VARCHAR(250), -- = Lieferantenname
@windreamAttributFinalApprover INT = 10044 -- = Terminzahlung Finale Freigeber
)
AS
BEGIN
DECLARE @Result INTEGER = 0,
@EMail VARCHAR(200) = NULL,
@ApproverName VARCHAR(50) = NULL;
DECLARE @EMAIL_BODY VARCHAR(MAX),
@BODYPRAEFIX VARCHAR(1000),
@BODY_SUFFIX VARCHAR(1000),
@SUBJECT VARCHAR(100) = '';
----------------------------------------------------------------------------------------------------------------------------------
-- Loop for every set approver in vector field @windreamAttributFinalApprover
-- if approver has an email address, inform him via mail
DECLARE CURSOR_FINAL_APPROVER CURSOR FOR
SELECT [szValue] as 'ApproverName'
FROM [windream60].[dbo].[Vector]
WHERE [szValue] is not null
and [dwAttrID] = @windreamAttributFinalApprover
and [dwDocID] = @windreamDocID
OPEN CURSOR_FINAL_APPROVER
FETCH NEXT FROM CURSOR_FINAL_APPROVER INTO @ApproverName
WHILE @@FETCH_STATUS = 0
BEGIN
-- Get User MailAddress
SELECT TOP 1 @EMail = [EMAIL]
FROM [TBDD_USER]
WHERE [USERNAME] = @ApproverName
----------------------------------------------------------
IF (LEN(@EMail) > 5) and (@EMail like '%@%')
BEGIN
SET @SUBJECT = 'ProcessManager: Eine Eingangsrechnung von ' + @VendorName + ' soll von Ihnen final freigegeben werden!'
SET @BODYPRAEFIX = 'Sehr geehrte Kollegin, sehr geehrter Kollege, <br><p>
diese E-Mail informiert Sie darüber, dass eine elektronische Eingangsrechnung für Sie zur Bearbeitung im Workflow und im SFIRM bereit steht! <br><p>
Workflow-Profil: SWB - ER 6.0 - Terminüberweisung - Finale Freigabe <br><p>
DocID: ' + convert(varchar(250),@windreamDocID) + ' <br><p>'
SET @BODY_SUFFIX = 'Mit freundlichen Grüßen.<p>
Ihr ProcessManager'
SET @EMAIL_BODY = '<!DOCTYPE html><html><body style=''font-family:"Arial";font-size:10.0pt''">' + @BODYPRAEFIX + @BODY_SUFFIX + '</body></html>'
INSERT INTO [dbo].[TBEMLP_EMAIL_OUT]
([SENDING_PROFILE]
,[REFERENCE_ID]
,[WF_ID]
,[EMAIL_ADRESS]
,[EMAIL_SUBJ]
,[EMAIL_BODY]
,[COMMENT]
,[ADDED_WHO])
VALUES (1,
@windreamDocID,
0,
@EMAIL,-- + ';m.kamm@digitaldata.works',
@SUBJECT,
@EMAIL_BODY,
'PM Reminder',
'[FNCUST_PUSH_PM_EMAIL_USER_INFO_PROFILEID_16]')
SET @Result = 0
END
-- 1 = Error
ELSE
BEGIN
SET @Result = 1
break
END
----------------------------------------------------------
FETCH NEXT FROM CURSOR_FINAL_APPROVER INTO @ApproverName
END
CLOSE CURSOR_FINAL_APPROVER
DEALLOCATE CURSOR_FINAL_APPROVER
----------------------------------------------------------------------------------------------------------------------------------
RETURN @Result;
END
GO

94
DMS/SQL-Server/Prozeduren/[PRCUST_PUSH_PM_EMAIL_USER_INFO_PROFILEID_7].sql Normal file
View File

@ -0,0 +1,94 @@
USE [DD_ECM]
GO
/****** Object: StoredProcedure [dbo].[PRCUST_PUSH_PM_EMAIL_USER_INFO_PROFILEID_7] Script Date: 21.03.2024 17:10:47 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Table function to set E-mail notification, based on a string field
-- Stand: MK // 10.12.2021
-- 10.12.2021 Initial
-- PM Profil: SWB - ER 94.0 - Zuweisung und Vorprüfung durch die FiBu
create PROCEDURE [dbo].[PRCUST_PUSH_PM_EMAIL_USER_INFO_PROFILEID_7] (
@windreamDocID BIGINT, -- = windream DocID
@VerifierUsername VARCHAR(150), -- = Name des Prüfers
@VendorName VARCHAR(250) -- = Lieferantenname
)
AS
BEGIN
DECLARE @Result INTEGER = 0,
@EMail VARCHAR(200);
----------------------------------------------------------------------------------------------------------------------------------
-- Get User MailAddress
SELECT TOP 1 @EMail = [EMAIL]
FROM [TBDD_USER]
WHERE [USERNAME] = @VerifierUsername
----------------------------------------------------------------------------------------------------------------------------------
IF (LEN(@EMail) > 5) and (@EMail like '%@%')
BEGIN
DECLARE @EMAIL_BODY VARCHAR(MAX),
@BODYPRAEFIX VARCHAR(1000),
@BODY_SUFFIX VARCHAR(1000),
@SUBJECT VARCHAR(100) = '';
SET @SUBJECT = 'ProcessManager: Eine Eingangsrechnung von ' + @VendorName + ' möchte von Ihnen geprüft werden!'
SET @BODYPRAEFIX = 'Sehr geehrte Kollegin, sehr geehrter Kollege, <br><p>
diese E-Mail informiert Sie darüber, dass eine elektronische Eingangsrechnung für Sie zur Bearbeitung im Workflow bereit steht! <br><p>
Workflow-Profil: SWB - ER 4.0 - Prüfung durch die Fachabteilung<br><p>
DocID: ' + convert(varchar(250),@windreamDocID) + ' <br><p>'
SET @BODY_SUFFIX = 'Mit freundlichen Grüßen.<p>
Ihr ProcessManager'
SET @EMAIL_BODY = '<!DOCTYPE html><html><body style=''font-family:"Arial";font-size:10.0pt''">' + @BODYPRAEFIX + @BODY_SUFFIX + '</body></html>'
INSERT INTO [dbo].[TBEMLP_EMAIL_OUT]
([SENDING_PROFILE]
,[REFERENCE_ID]
,[WF_ID]
,[EMAIL_ADRESS]
,[EMAIL_SUBJ]
,[EMAIL_BODY]
,[COMMENT]
,[ADDED_WHO])
VALUES (1,
@windreamDocID,
0,
@EMAIL,-- + ';m.kamm@digitaldata.works',
@SUBJECT,
@EMAIL_BODY,
'PM Reminder',
'[FNCUST_PUSH_PM_EMAIL_USER_INFO_PROFILEID_3]')
SET @Result = 0
END
-- 1 = Error
ELSE
SET @Result = 1
----------------------------------------------------------------------------------------------------------------------------------
RETURN @Result;
END
GO

71
DMS/SQL-Server/Prozeduren/[PRCUST_SET_PM_VIA_TC_RECURRING_DOCUMENTS].sql Normal file
View File

@ -0,0 +1,71 @@
USE [DD_ECM]
GO
/****** Object: StoredProcedure [dbo].[PRCUST_SET_PM_VIA_TC_RECURRING_DOCUMENTS] Script Date: 21.03.2024 17:11:14 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Table procedure to set recurring doc active again in workflow
-- Stand: MK // 31.10.2021
-- 31.10.2021 Initial
-- TC Profil: ...
CREATE PROCEDURE [dbo].[PRCUST_SET_PM_VIA_TC_RECURRING_DOCUMENTS] (
@windreamDocID BIGINT, -- Test mit 730491
@windreamAttrID INT = 10042
)
AS
BEGIN
DECLARE @CurrentMonthID TINYINT,
@CurrentMonthName VARCHAR(20),
@BookingMonthName VARCHAR(20),
@Result INTEGER = 0;
----------------------------------------------------------------------------------------------------------------------------------
SELECT @CurrentMonthID = MONTH(getdate()); -- aktuell nicht weiter verwendet
SELECT @CurrentMonthName = FORMAT(GETDATE(),'MMMM')
IF @CurrentMonthName in (SELECT [szValue] FROM [windream60].[dbo].[Vector] where dwAttrID = @windreamAttrID and dwDocId = @windreamDocID)
BEGIN
PRINT @CurrentMonthName + ' found in windream Attribut'
SELECT @BookingMonthName = FORMAT((SELECT CONVERT(DATETIME, convert(varchar(8),dwDate04)) FROM windream60.dbo.BaseAttributes where dwDocID = @windreamDocID),'MMMM')
IF (@BookingMonthName <> @CurrentMonthName)
BEGIN
PRINT 'FINAL: @BookingMonthName <> @CurrentMonthName'
SELECT @Result = 1
END
ELSE
BEGIN
PRINT 'FINAL: @BookingMonthName = @CurrentMonthName'
SELECT @Result = 0
END
END
ELSE
SELECT @Result = 0
----------------------------------------------------------------------------------------------------------------------------------
RETURN @Result;
END
GO

29
DMS/SQL-Server/Sichten/[VWCUST_EB2B_CREATED].sql Normal file
View File

@ -0,0 +1,29 @@
USE [DD_ECM]
GO
/****** Object: View [dbo].[VWCUST_EB2B_CREATED] Script Date: 21.03.2024 16:58:20 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE VIEW [dbo].[VWCUST_EB2B_CREATED] as
SELECT
ba.dwDocID as DOC_ID,
'STANDARD' as Outputfilename,
CAST(CAST(ba.dwCreationDate as CHAR(10)) as DATE) as CreationDate
FROM
windream60.dbo.BaseAttributes ba LEFT JOIN TBCUST_PM_RPT_CREATED REF ON ba.dwDocID = REF.DocID
WHERE
DATEPART(YEAR,CAST(CAST(ba.dwCreationDate as CHAR(10)) as DATE)) > 2022 AND
--ba.dwDocID in (741833,740744) AND
ba.sztext37 = 'Eingangsrechnung' AND
ba.szText33 = 'erledigt' AND
ba.szFile_Ext = '.PDF' AND
ba.dwDate04 is not null AND
LEFT(ba.szLongName,6) = 'ERE_ER' AND
REF.DocID IS NULL
GO

57
DMS/SQL-Server/Sichten/[VWCUST_NAVISION_COST_UNITS].sql Normal file
View File

@ -0,0 +1,57 @@
USE [DD_ECM]
GO
/****** Object: View [dbo].[VWCUST_NAVISION_COST_UNITS] Script Date: 21.03.2024 16:58:40 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- TSQL View für die Ausgabe von Kostenstellen
--14.07.2023 Anpassen der Views
-- Stand: MK // 23.09.2021
-- 23.09.2021 - initial
CREATE view [dbo].[VWCUST_NAVISION_COST_UNITS]
as
SELECT TOP 1000000 'SB-Abwasserbetrieb' as 'Mandant'
,[Code] as 'Kostenstelle'
,[Name]
FROM --[NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[Abwasserbetrieb d_ Stadt Bebra$Dimension Value]
[NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[Abwasserbetrieb d_ Stadt Bebra$Dimension Value$437dbf0e-84ff-417a-965d-ed2bb9650972]
UNION ----------------------------------------------------------------------
SELECT TOP 1000000 'SB-Bäderbetrieb' as 'Mandant'
,[Code] as 'Kostenstelle'
,[Name]
FROM --[NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[Bäderbetrieb der Stadt Bebra$Dimension Value]
[NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[Bäderbetrieb der Stadt Bebra$Dimension Value$437dbf0e-84ff-417a-965d-ed2bb9650972]
UNION ----------------------------------------------------------------------
SELECT TOP 1000000'SWB-Netz' as 'Mandant'
,[Code] as 'Kostenstelle'
,[Name]
FROM --[NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[STW Bebra GmbH inkl Netz$Dimension Value]
[NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[STW Bebra GmbH inkl Netz$Dimension Value$437dbf0e-84ff-417a-965d-ed2bb9650972]
UNION ----------------------------------------------------------------------
SELECT TOP 1000000 'SWB-Vertrieb' as 'Mandant'
,[Code] as 'Kostenstelle'
,[Name]
FROM --[NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[Vertrieb STW Bebra$Dimension Value]
[NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[Vertrieb STW Bebra$Dimension Value$437dbf0e-84ff-417a-965d-ed2bb9650972]
ORDER BY Mandant, Kostenstelle ASC
GO

54
DMS/SQL-Server/Sichten/[VWCUST_NAVISION_IMPERSONAL_ACCOUNT].sql Normal file
View File

@ -0,0 +1,54 @@
USE [DD_ECM]
GO
/****** Object: View [dbo].[VWCUST_NAVISION_IMPERSONAL_ACCOUNT] Script Date: 21.03.2024 16:59:11 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- TSQL View um Sachkonten aus NAV abzurufen
-- 14.07.2023 - MS - Update BC ID
-- 23.09.2021 - initial
CREATE view [dbo].[VWCUST_NAVISION_IMPERSONAL_ACCOUNT]
as
SELECT TOP 1000000
'SB-Abwasserbetrieb' as 'Mandant'
,[No_] as 'Sachkonto'
,[Name] as 'Bezeichnung'
FROM [NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[Abwasserbetrieb d_ Stadt Bebra$G_L Account$437dbf0e-84ff-417a-965d-ed2bb9650972]
UNION -------------------------------------------------------------------
SELECT TOP 1000000
'SB-Bäderbetrieb' as 'Mandant'
,[No_] as 'Sachkonto'
,[Name] as 'Bezeichnung'
FROM [NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[Bäderbetrieb der Stadt Bebra$G_L Account$437dbf0e-84ff-417a-965d-ed2bb9650972]
UNION -------------------------------------------------------------------
SELECT TOP 1000000
'SWB-Netz' as 'Mandant'
,[No_] as 'Sachkonto'
,[Name] as 'Bezeichnung'
FROM [NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[STW Bebra GmbH inkl Netz$G_L Account$437dbf0e-84ff-417a-965d-ed2bb9650972]
UNION -------------------------------------------------------------------
SELECT TOP 1000000
'SWB-Vertrieb' as 'Mandant'
,[No_] as 'Sachkonto'
,[Name] as 'Bezeichnung'
FROM [NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[Vertrieb STW Bebra$G_L Account$437dbf0e-84ff-417a-965d-ed2bb9650972]
ORDER BY Mandant, Sachkonto ASC
GO

49
DMS/SQL-Server/Sichten/[VWCUST_NAVISION_MANDATORS].sql Normal file
View File

@ -0,0 +1,49 @@
USE [DD_ECM]
GO
/****** Object: View [dbo].[VWCUST_NAVISION_MANDATORS] Script Date: 21.03.2024 16:59:36 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL View um NAV Mandanten standardisiert darzustellen (als Einschränkung für weitere Views benötigt)
-- Stand: MK // 22.09.2021
-- 22.09.2021 - "Stadtentwicklung Bebra GmbH" entfernt, da seit 2016 inaktiv
-- 20.09.2021 - initial
CREATE view [dbo].[VWCUST_NAVISION_MANDATORS]
as
SELECT
CASE
When [companyname] = 'Abwasserbetrieb d. Stadt Bebra' Then 'SB-Abwasserbetrieb'
When [companyname] = 'Bäderbetrieb der Stadt Bebra' Then 'SB-Bäderbetrieb'
-- When [companyname] = 'Stadtentwicklung Bebra GmbH' Then 'SB-Stadtentwicklung'
When [companyname] = 'STW Bebra GmbH inkl Netz' Then 'SWB-Netz'
When [companyname] = 'Vertrieb STW Bebra' Then 'SWB-Vertrieb'
End as 'Mandant',
[companyname] as 'NAV-Mandant',
CASE
When [companyname] = 'Abwasserbetrieb d. Stadt Bebra' Then 'Abwasserbetrieb d_ Stadt Bebra'
When [companyname] = 'Bäderbetrieb der Stadt Bebra' Then 'Bäderbetrieb der Stadt Bebra'
-- When [companyname] = 'Stadtentwicklung Bebra GmbH' Then 'Stadtentwicklung Bebra GmbH'
When [companyname] = 'STW Bebra GmbH inkl Netz' Then 'STW Bebra GmbH inkl Netz'
When [companyname] = 'Vertrieb STW Bebra' Then 'Vertrieb STW Bebra'
End as 'NAV-Tabellen-Präfix'
FROM [NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[$ndo$tenantcompany]
WHERE [$companyid] > 1000 and [$companyid] <> 1012
GO

1201
DMS/SQL-Server/Sichten/[VWCUST_NAVISION_PURCHASE_HEADER].sql Normal file
View File

File diff suppressed because it is too large Load Diff

73
DMS/SQL-Server/Sichten/[VWCUST_NAVISION_TASKNRS].sql Normal file
View File

@ -0,0 +1,73 @@
USE [DD_ECM]
GO
/****** Object: View [dbo].[VWCUST_NAVISION_TASKNRS] Script Date: 21.03.2024 17:01:24 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- TSQL View um Arbeitsaufträge aus NAV abzurufen
-- 14.07.2023 - Update BC
-- 01.12.2021 - Abfrage auf "nur Aufträge in Ausführung" ([WOStateValue]) beschränkt
-- 23.09.2021 - Order by eingebaut
-- 22.09.2021 - initial
CREATE view [dbo].[VWCUST_NAVISION_TASKNRS]
as
SELECT TOP 1000000 'SB-Abwasserbetrieb' as 'Mandant'
,[No_] as 'Auftragsnummer'
,[Description] as 'Beschreibung'
,[Description 2] as 'Beschreibung 2'
,[Description 3] as 'Beschreibung 3'
FROM --[NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[Abwasserbetrieb d_ Stadt Bebra$Work Order Header]
[NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[Abwasserbetrieb d_ Stadt Bebra$Work Order Header$dd2404d3-f489-4ae2-8f51-232ea4d4f649]
WHERE [WOStateValue] = 200 -- 200 = Ausführung; 300 = Fertig; 400 = ?
UNION
SELECT TOP 1000000 'SB-Bäderbetrieb' as 'Mandant'
,[No_] as 'Auftragsnummer'
,[Description] as 'Beschreibung'
,[Description 2] as 'Beschreibung 2'
,[Description 3] as 'Beschreibung 3'
FROM --[NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[Bäderbetrieb der Stadt Bebra$Work Order Header]
[NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[Bäderbetrieb der Stadt Bebra$Work Order Header$dd2404d3-f489-4ae2-8f51-232ea4d4f649]
WHERE [WOStateValue] = 200 -- 200 = Ausführung; 300 = Fertig; 400 = ?
UNION
SELECT TOP 1000000 'SWB-Netz' as 'Mandant'
,[No_] as 'Auftragsnummer'
,[Description] as 'Beschreibung'
,[Description 2] as 'Beschreibung 2'
,[Description 3] as 'Beschreibung 3'
FROM --[NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[STW Bebra GmbH inkl Netz$Work Order Header]
[NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[STW Bebra GmbH inkl Netz$Work Order Header$dd2404d3-f489-4ae2-8f51-232ea4d4f649]
WHERE [WOStateValue] = 200 -- 200 = Ausführung; 300 = Fertig; 400 = ?
UNION
SELECT TOP 1000000 'SWB-Vertrieb' as 'Mandant'
,[No_] as 'Auftragsnummer'
,[Description] as 'Beschreibung'
,[Description 2] as 'Beschreibung 2'
,[Description 3] as 'Beschreibung 3'
FROM --[NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[Vertrieb STW Bebra$Work Order Header]
[NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[Vertrieb STW Bebra$Work Order Header$dd2404d3-f489-4ae2-8f51-232ea4d4f649]
WHERE [WOStateValue] = 200 -- 200 = Ausführung; 300 = Fertig; 400 = ?
ORDER BY Mandant, Auftragsnummer ASC
GO

503
DMS/SQL-Server/Sichten/[VWCUST_NAVISION_VENDORACCOUNTS].sql Normal file
View File

@ -0,0 +1,503 @@
USE [DD_ECM]
GO
/****** Object: View [dbo].[VWCUST_NAVISION_VENDORACCOUNTS] Script Date: 21.03.2024 17:01:54 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- 14.07.2023 MS Update BC ID
-- 10.01.2022 Ergänzung IBAN per join
-- 23.09.2021 Order by eingebaut
-- 22.09.2021 "Stadtentwicklung Bebra GmbH" entfernt, da seit 2016 inaktiv
-- 20.09.2021 initial
CREATE view [dbo].[VWCUST_NAVISION_VENDORACCOUNTS]
as
SELECT TOP 1000000
'SB-Abwasserbetrieb' as 'Mandant'
,[V].[No_] as 'LieferantenNr'
,[V].[Name]
,[VBA].[IBAN] as 'Pay-to IBAN'
,[V].[Search Name]
,[V].[Name 2]
,[V].[Address]
,[V].[Address 2]
,[V].[City]
,[V].[Contact]
,[V].[Phone No_]
,[V].[Telex No_]
,[V].[Our Account No_]
,[V].[Territory Code]
,[V].[Global Dimension 1 Code]
,[V].[Global Dimension 2 Code]
,[V].[Budgeted Amount]
,[V].[Vendor Posting Group]
,[V].[Currency Code]
,[V].[Language Code]
,[V].[Statistics Group]
,[V].[Payment Terms Code]
,[V].[Fin_ Charge Terms Code]
,[V].[Purchaser Code]
,[V].[Shipment Method Code]
,[V].[Shipping Agent Code]
,[V].[Invoice Disc_ Code]
,[V].[Country_Region Code]
,[V].[Blocked]
,[V].[Pay-to Vendor No_]
,[V].[Priority]
,[V].[Payment Method Code]
,[V].[Last Date Modified]
,[V].[Application Method]
,[V].[Prices Including VAT]
,[V].[Fax No_]
,[V].[Telex Answer Back]
,[V].[VAT Registration No_]
,[V].[Gen_ Bus_ Posting Group]
,[V].[GLN]
,[V].[Post Code]
,[V].[County]
,[V].[E-Mail]
,[V].[Home Page]
,[V].[No_ Series]
,[V].[Tax Area Code]
,[V].[Tax Liable]
,[V].[VAT Bus_ Posting Group]
,[V].[Block Payment Tolerance]
,[V].[IC Partner Code]
,[V].[Prepayment _]
,[V].[Partner Type]
,[V].[Privacy Blocked]
,[V].[Creditor No_]
,[V].[Preferred Bank Account Code]
,[V].[Cash Flow Payment Terms Code]
,[V].[Primary Contact No_]
,[V].[Responsibility Center]
,[V].[Location Code]
,[V].[Lead Time Calculation]
,[V].[Base Calendar Code]
,[V].[Registration No_]
,[V].[OU]
,[V].[OU Code]
,[V].[No_ Entries for Avis]
,[V].[Direction Code]
,[V].[Payment Type]
,[V].[Delivery Reminder Terms]
,[V].[VU Person No_]
,[V].[Pers_ Salutation]
,[V].[Title]
,[V].[First Name]
,[V].[Lowest Order Value]
,[V].[Industry Group]
,[V].[Quality Mgt_]
,[V].[QM Certificate valid till]
,[V].[Work Safety Mgt_]
,[V].[WS Certificate valid till]
,[V].[Ecology Mgt_]
,[V].[EC Certificate valid till]
,[V].[Energy Mgt_]
,[V].[EN Certificate valid till]
,[V].[Outside Company Training]
,[V].[OC Training valid till]
,[V].[Secrecy Aggreement]
,[V].[SE Aggreement valid till]
,[V].[Payment Terms Code (IR)]
,[V].[Exemption answer]
,[V].[Exemption answer valid to]
,[V].[Exemption answer re-submission]
,[V].[Responsibly Tax office]
,[V].[Reference to exemption answer]
,[V].[Days before expiration E_ a_]
,[V].[Safety No_]
,[V].[Concern Elimination]
,[V].[Elimination ShortcutDimCode]
,[V].[Customizing WO]
,[V].[Customizing WO valid till]
,[V].[Last Modified Date Time]
,[V].[Disable Search by Name]
,[V].[Document Sending Profile]
,[V].[Validate EU Vat Reg_ No_]
,[V].[Id]
,[V].[Currency Id]
,[V].[Payment Terms Id]
,[V].[Payment Method Id]
,[V].[Information Security]
,[V].[Information Security valid to]
,[V].[Security Clause]
,[V].[Security Clause valid to]
,[V].[ISMS]
,[V].[ISMS valid to]
FROM [NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[Abwasserbetrieb d_ Stadt Bebra$Vendor$437dbf0e-84ff-417a-965d-ed2bb9650972] as [V]
LEFT JOIN [NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[Abwasserbetrieb d_ Stadt Bebra$Vendor Bank Account$437dbf0e-84ff-417a-965d-ed2bb9650972] as [VBA] (NOLOCK) ON [V].[No_] = [VBA].[Vendor No_]
WHERE LEN([V].[Name]) > 1
UNION ------------------------------------------------------------------------------------
SELECT TOP 1000000
'SB-Bäderbetrieb' as 'Mandant'
,[V].[No_] as 'LieferantenNr'
,[V].[Name]
,[VBA].[IBAN] as 'Pay-to IBAN'
,[V].[Search Name]
,[V].[Name 2]
,[V].[Address]
,[V].[Address 2]
,[V].[City]
,[V].[Contact]
,[V].[Phone No_]
,[V].[Telex No_]
,[V].[Our Account No_]
,[V].[Territory Code]
,[V].[Global Dimension 1 Code]
,[V].[Global Dimension 2 Code]
,[V].[Budgeted Amount]
,[V].[Vendor Posting Group]
,[V].[Currency Code]
,[V].[Language Code]
,[V].[Statistics Group]
,[V].[Payment Terms Code]
,[V].[Fin_ Charge Terms Code]
,[V].[Purchaser Code]
,[V].[Shipment Method Code]
,[V].[Shipping Agent Code]
,[V].[Invoice Disc_ Code]
,[V].[Country_Region Code]
,[V].[Blocked]
,[V].[Pay-to Vendor No_]
,[V].[Priority]
,[V].[Payment Method Code]
,[V].[Last Date Modified]
,[V].[Application Method]
,[V].[Prices Including VAT]
,[V].[Fax No_]
,[V].[Telex Answer Back]
,[V].[VAT Registration No_]
,[V].[Gen_ Bus_ Posting Group]
,[V].[GLN]
,[V].[Post Code]
,[V].[County]
,[V].[E-Mail]
,[V].[Home Page]
,[V].[No_ Series]
,[V].[Tax Area Code]
,[V].[Tax Liable]
,[V].[VAT Bus_ Posting Group]
,[V].[Block Payment Tolerance]
,[V].[IC Partner Code]
,[V].[Prepayment _]
,[V].[Partner Type]
,[V].[Privacy Blocked]
,[V].[Creditor No_]
,[V].[Preferred Bank Account Code]
,[V].[Cash Flow Payment Terms Code]
,[V].[Primary Contact No_]
,[V].[Responsibility Center]
,[V].[Location Code]
,[V].[Lead Time Calculation]
,[V].[Base Calendar Code]
,[V].[Registration No_]
,[V].[OU]
,[V].[OU Code]
,[V].[No_ Entries for Avis]
,[V].[Direction Code]
,[V].[Payment Type]
,[V].[Delivery Reminder Terms]
,[V].[VU Person No_]
,[V].[Pers_ Salutation]
,[V].[Title]
,[V].[First Name]
,[V].[Lowest Order Value]
,[V].[Industry Group]
,[V].[Quality Mgt_]
,[V].[QM Certificate valid till]
,[V].[Work Safety Mgt_]
,[V].[WS Certificate valid till]
,[V].[Ecology Mgt_]
,[V].[EC Certificate valid till]
,[V].[Energy Mgt_]
,[V].[EN Certificate valid till]
,[V].[Outside Company Training]
,[V].[OC Training valid till]
,[V].[Secrecy Aggreement]
,[V].[SE Aggreement valid till]
,[V].[Payment Terms Code (IR)]
,[V].[Exemption answer]
,[V].[Exemption answer valid to]
,[V].[Exemption answer re-submission]
,[V].[Responsibly Tax office]
,[V].[Reference to exemption answer]
,[V].[Days before expiration E_ a_]
,[V].[Safety No_]
,[V].[Concern Elimination]
,[V].[Elimination ShortcutDimCode]
,[V].[Customizing WO]
,[V].[Customizing WO valid till]
,[V].[Last Modified Date Time]
,[V].[Disable Search by Name]
,[V].[Document Sending Profile]
,[V].[Validate EU Vat Reg_ No_]
,[V].[Id]
,[V].[Currency Id]
,[V].[Payment Terms Id]
,[V].[Payment Method Id]
,[V].[Information Security]
,[V].[Information Security valid to]
,[V].[Security Clause]
,[V].[Security Clause valid to]
,[V].[ISMS]
,[V].[ISMS valid to]
FROM [NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[Bäderbetrieb der Stadt Bebra$Vendor$437dbf0e-84ff-417a-965d-ed2bb9650972] as [V]
LEFT JOIN [NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[Bäderbetrieb der Stadt Bebra$Vendor Bank Account$437dbf0e-84ff-417a-965d-ed2bb9650972] as [VBA] (NOLOCK) ON [V].[No_] = [VBA].[Vendor No_]
WHERE LEN([V].[Name]) > 1
UNION ------------------------------------------------------------------------------------
SELECT TOP 1000000
'SWB-Netz' as 'Mandant'
,[V].[No_] as 'LieferantenNr'
,[V].[Name]
,[VBA].[IBAN] as 'Pay-to IBAN'
,[V].[Search Name]
,[V].[Name 2]
,[V].[Address]
,[V].[Address 2]
,[V].[City]
,[V].[Contact]
,[V].[Phone No_]
,[V].[Telex No_]
,[V].[Our Account No_]
,[V].[Territory Code]
,[V].[Global Dimension 1 Code]
,[V].[Global Dimension 2 Code]
,[V].[Budgeted Amount]
,[V].[Vendor Posting Group]
,[V].[Currency Code]
,[V].[Language Code]
,[V].[Statistics Group]
,[V].[Payment Terms Code]
,[V].[Fin_ Charge Terms Code]
,[V].[Purchaser Code]
,[V].[Shipment Method Code]
,[V].[Shipping Agent Code]
,[V].[Invoice Disc_ Code]
,[V].[Country_Region Code]
,[V].[Blocked]
,[V].[Pay-to Vendor No_]
,[V].[Priority]
,[V].[Payment Method Code]
,[V].[Last Date Modified]
,[V].[Application Method]
,[V].[Prices Including VAT]
,[V].[Fax No_]
,[V].[Telex Answer Back]
,[V].[VAT Registration No_]
,[V].[Gen_ Bus_ Posting Group]
,[V].[GLN]
,[V].[Post Code]
,[V].[County]
,[V].[E-Mail]
,[V].[Home Page]
,[V].[No_ Series]
,[V].[Tax Area Code]
,[V].[Tax Liable]
,[V].[VAT Bus_ Posting Group]
,[V].[Block Payment Tolerance]
,[V].[IC Partner Code]
,[V].[Prepayment _]
,[V].[Partner Type]
,[V].[Privacy Blocked]
,[V].[Creditor No_]
,[V].[Preferred Bank Account Code]
,[V].[Cash Flow Payment Terms Code]
,[V].[Primary Contact No_]
,[V].[Responsibility Center]
,[V].[Location Code]
,[V].[Lead Time Calculation]
,[V].[Base Calendar Code]
,[V].[Registration No_]
,[V].[OU]
,[V].[OU Code]
,[V].[No_ Entries for Avis]
,[V].[Direction Code]
,[V].[Payment Type]
,[V].[Delivery Reminder Terms]
,[V].[VU Person No_]
,[V].[Pers_ Salutation]
,[V].[Title]
,[V].[First Name]
,[V].[Lowest Order Value]
,[V].[Industry Group]
,[V].[Quality Mgt_]
,[V].[QM Certificate valid till]
,[V].[Work Safety Mgt_]
,[V].[WS Certificate valid till]
,[V].[Ecology Mgt_]
,[V].[EC Certificate valid till]
,[V].[Energy Mgt_]
,[V].[EN Certificate valid till]
,[V].[Outside Company Training]
,[V].[OC Training valid till]
,[V].[Secrecy Aggreement]
,[V].[SE Aggreement valid till]
,[V].[Payment Terms Code (IR)]
,[V].[Exemption answer]
,[V].[Exemption answer valid to]
,[V].[Exemption answer re-submission]
,[V].[Responsibly Tax office]
,[V].[Reference to exemption answer]
,[V].[Days before expiration E_ a_]
,[V].[Safety No_]
,[V].[Concern Elimination]
,[V].[Elimination ShortcutDimCode]
,[V].[Customizing WO]
,[V].[Customizing WO valid till]
,[V].[Last Modified Date Time]
,[V].[Disable Search by Name]
,[V].[Document Sending Profile]
,[V].[Validate EU Vat Reg_ No_]
,[V].[Id]
,[V].[Currency Id]
,[V].[Payment Terms Id]
,[V].[Payment Method Id]
,[V].[Information Security]
,[V].[Information Security valid to]
,[V].[Security Clause]
,[V].[Security Clause valid to]
,[V].[ISMS]
,[V].[ISMS valid to]
FROM [NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[STW Bebra GmbH inkl Netz$Vendor$437dbf0e-84ff-417a-965d-ed2bb9650972] as [V]
LEFT JOIN [NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[STW Bebra GmbH inkl Netz$Vendor Bank Account$437dbf0e-84ff-417a-965d-ed2bb9650972] as [VBA] (NOLOCK) ON [V].[No_] = [VBA].[Vendor No_]
WHERE LEN([V].[Name]) > 1
UNION ------------------------------------------------------------------------------------
SELECT TOP 1000000
'SWB-Vertrieb' as 'Mandant'
,[V].[No_] as 'LieferantenNr'
,[V].[Name]
,[VBA].[IBAN] as 'Pay-to IBAN'
,[V].[Search Name]
,[V].[Name 2]
,[V].[Address]
,[V].[Address 2]
,[V].[City]
,[V].[Contact]
,[V].[Phone No_]
,[V].[Telex No_]
,[V].[Our Account No_]
,[V].[Territory Code]
,[V].[Global Dimension 1 Code]
,[V].[Global Dimension 2 Code]
,[V].[Budgeted Amount]
,[V].[Vendor Posting Group]
,[V].[Currency Code]
,[V].[Language Code]
,[V].[Statistics Group]
,[V].[Payment Terms Code]
,[V].[Fin_ Charge Terms Code]
,[V].[Purchaser Code]
,[V].[Shipment Method Code]
,[V].[Shipping Agent Code]
,[V].[Invoice Disc_ Code]
,[V].[Country_Region Code]
,[V].[Blocked]
,[V].[Pay-to Vendor No_]
,[V].[Priority]
,[V].[Payment Method Code]
,[V].[Last Date Modified]
,[V].[Application Method]
,[V].[Prices Including VAT]
,[V].[Fax No_]
,[V].[Telex Answer Back]
,[V].[VAT Registration No_]
,[V].[Gen_ Bus_ Posting Group]
,[V].[GLN]
,[V].[Post Code]
,[V].[County]
,[V].[E-Mail]
,[V].[Home Page]
,[V].[No_ Series]
,[V].[Tax Area Code]
,[V].[Tax Liable]
,[V].[VAT Bus_ Posting Group]
,[V].[Block Payment Tolerance]
,[V].[IC Partner Code]
,[V].[Prepayment _]
,[V].[Partner Type]
,[V].[Privacy Blocked]
,[V].[Creditor No_]
,[V].[Preferred Bank Account Code]
,[V].[Cash Flow Payment Terms Code]
,[V].[Primary Contact No_]
,[V].[Responsibility Center]
,[V].[Location Code]
,[V].[Lead Time Calculation]
,[V].[Base Calendar Code]
,[V].[Registration No_]
,[V].[OU]
,[V].[OU Code]
,[V].[No_ Entries for Avis]
,[V].[Direction Code]
,[V].[Payment Type]
,[V].[Delivery Reminder Terms]
,[V].[VU Person No_]
,[V].[Pers_ Salutation]
,[V].[Title]
,[V].[First Name]
,[V].[Lowest Order Value]
,[V].[Industry Group]
,[V].[Quality Mgt_]
,[V].[QM Certificate valid till]
,[V].[Work Safety Mgt_]
,[V].[WS Certificate valid till]
,[V].[Ecology Mgt_]
,[V].[EC Certificate valid till]
,[V].[Energy Mgt_]
,[V].[EN Certificate valid till]
,[V].[Outside Company Training]
,[V].[OC Training valid till]
,[V].[Secrecy Aggreement]
,[V].[SE Aggreement valid till]
,[V].[Payment Terms Code (IR)]
,[V].[Exemption answer]
,[V].[Exemption answer valid to]
,[V].[Exemption answer re-submission]
,[V].[Responsibly Tax office]
,[V].[Reference to exemption answer]
,[V].[Days before expiration E_ a_]
,[V].[Safety No_]
,[V].[Concern Elimination]
,[V].[Elimination ShortcutDimCode]
,[V].[Customizing WO]
,[V].[Customizing WO valid till]
,[V].[Last Modified Date Time]
,[V].[Disable Search by Name]
,[V].[Document Sending Profile]
,[V].[Validate EU Vat Reg_ No_]
,[V].[Id]
,[V].[Currency Id]
,[V].[Payment Terms Id]
,[V].[Payment Method Id]
,[V].[Information Security]
,[V].[Information Security valid to]
,[V].[Security Clause]
,[V].[Security Clause valid to]
,[V].[ISMS]
,[V].[ISMS valid to]
FROM [NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[Vertrieb STW Bebra$Vendor$437dbf0e-84ff-417a-965d-ed2bb9650972] as [V]
LEFT JOIN [NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[Vertrieb STW Bebra$Vendor Bank Account$437dbf0e-84ff-417a-965d-ed2bb9650972] as [VBA] (NOLOCK) ON [V].[No_] = [VBA].[Vendor No_]
WHERE LEN([V].[Name]) > 1
ORDER BY Mandant, No_ ASC
GO

16
DMS/SQL-Server/Sichten/[VWCUST_NI_NAVISION_VENDOR].sql Normal file
View File

@ -0,0 +1,16 @@
USE [DD_ECM]
GO
/****** Object: View [dbo].[VWCUST_NI_NAVISION_VENDOR] Script Date: 21.03.2024 17:02:38 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE VIEW [dbo].[VWCUST_NI_NAVISION_VENDOR] AS
SELECT DISTINCT Name,LieferantenNr
FROM [VWCUST_NAVISION_VENDORACCOUNTS]
GO

56
DMS/SQL-Server/Sichten/[VWCUST_PM_PROFILE_TODO].sql Normal file
View File

@ -0,0 +1,56 @@
USE [DD_ECM]
GO
/****** Object: View [dbo].[VWCUST_PM_PROFILE_TODO] Script Date: 21.03.2024 17:03:12 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- DIE FUNKTION "[PRCUST_CREATE_PM_REMINDER_MAILS]" UND DER VIEW [VWCUST_PM_PROFILE_TODO] WERDEN AKTUELL NICHT VERWENDET! STAND 31.10.2021
-- TSQL View provides procedure with the data/ the info which users should be informed
-- Stand: MK // 25.10.2021
CREATE VIEW [dbo].[VWCUST_PM_PROFILE_TODO]
AS
SELECT
LOWER(T5.EMAIL) as Email,
Count(T1.DOC_ID) Anzahl,
T1.PROFIL_ID AS ProfileID,
T2.TITLE,
'Aufgabe' as PType,
Case T1.PROFIL_ID
When 1 then 1
else 4
end as OSequence
FROM [TBPM_PROFILE_FILES] as [T1]
INNER JOIN [TBPM_PROFILE] as [T2] ON T1.PROFIL_ID = T2.GUID
INNER JOIN [windream60].[dbo].[BaseAttributes] as [T3] ON T1.DOC_ID = T3.dwDocID
INNER JOIN [TBPM_PROFILE_USER] as T4 ON T2.GUID = T4.PROFIL_ID
INNER JOIN [TBDD_USER] as T5 ON T4.USER_ID = T5.GUID
WHERE
T3.sztext22 = t5.USERNAME and
T1.DOC_ID not in (SELECT DOC_ID FROM TBPM_PROFILE_FILES WHERE ACTIVE = 0 or IN_WORK = 1 or EDIT = 1)
GROUP BY LOWER(T5.EMAIL),T1.PROFIL_ID, T2.TITLE
-- Tabelle gefüllt mit:
-- INSERT INTO [DD_ECM].[dbo].[TBPM_PROFILE_USER]([PROFIL_ID],[USER_ID])
-- SELECT 4 as [PROFIL_ID], [GUID] as [USER_ID]
-- FROM [TBDD_USER]
-- WHERE [name] not in ('Schellhase','') and len(email) > 2
GO

25
DMS/SQL-Server/Sichten/[VWCUST_RPTERGEBNISBERICHT].sql Normal file
View File

@ -0,0 +1,25 @@
USE [DD_ECM]
GO
/****** Object: View [dbo].[VWCUST_RPTERGEBNISBERICHT] Script Date: 21.03.2024 17:04:19 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE VIEW [dbo].[VWCUST_RPTERGEBNISBERICHT] as
SELECT
T.*,
T1.Prozessschritt,
T1.Durch,
T1.Status_Change,
T1.Wann wannPos,
T1.Kommentar
FROM
VWCUST_RPTERGEBNISBERICHT_HEAD T INNER JOIN VWCUST_RPTERGEBNISBERICHT_POS T1 ON T.DocID = T1.DocID
--WHERE
--T.DocID = 785040
GO

48
DMS/SQL-Server/Sichten/[VWCUST_RPTERGEBNISBERICHT_HEAD].sql Normal file
View File

@ -0,0 +1,48 @@
USE [DD_ECM]
GO
/****** Object: View [dbo].[VWCUST_RPTERGEBNISBERICHT_HEAD] Script Date: 21.03.2024 17:04:48 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE VIEW [dbo].[VWCUST_RPTERGEBNISBERICHT_HEAD] as
SELECT DISTINCT
BA.dwDocID as DocID,
CONVERT(date,COALESCE(EML.EMAIL_DATE,CAST(CONVERT(varchar(20),ba.decCreationTime) as CHAR(8)))) [DatumIn],
CONVERT(date,CAST(ba.dwdate09 AS char(8))) AS Belegdatum,
vec_KRED.szValue as KreditorNummer,
ba.sztext08 AS KreditorName_Lang,
ba.sztext08 AS KreditorName,
ba.sztext19 as RechnungNr,
COALESCE(ba.sztext36,'NONE') as Referenz,
ba.lfFloat10 as Nettobetrag,
ba.lfFloat11 as Bruttobetrag,
'1999-12-24' Zahlungsziel,
'4711' as Mandant,
'Mandant1' as [Mandant Name],
'4711' as Kostenstelle,
'4712' as BestellNr,
COALESCE(eml.EMAIL_FROM,'') as Absender,
'' as [Finaler Freigeber]
FROM
windream60.dbo.BaseAttributes BA LEFT join
TBEMLP_HISTORY EML ON BA.szText07 = EML.EMAIL_MSGID LEFT join
(Select dwDocID, szValue From windream60.dbo.Vector where dwAttrID = 10010) vec_KRED ON BA.dwDocID = vec_KRED.dwDocID
-- WHERE
-- ba.dwDocID = 785040
GO

35
DMS/SQL-Server/Sichten/[VWCUST_RPTERGEBNISBERICHT_POS].sql Normal file
View File

@ -0,0 +1,35 @@
USE [DD_ECM]
GO
/****** Object: View [dbo].[VWCUST_RPTERGEBNISBERICHT_POS] Script Date: 21.03.2024 17:05:14 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE VIEW [dbo].[VWCUST_RPTERGEBNISBERICHT_POS] as
SELECT
--4712 as DocID,
--'Fachliche Freigabe' as Prozessschritt,
--'CHAPPE' as Durch,
--'Ja' Status_Change,
--convert(Datetime,'2019-12-17 12:32:27',120) Wann
--,'' Kommentar
dwDocID as DocID,
(SELECT Data FROM FNDD_SPLIT_STRING(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(szValue,'SWB - ER 1.0 - ',''),'SWB - ER ',''),'3.0 - ',''),'4.0 - ',''),'5.0 - ',''),'~') WHERE SequentialOrder = 5) as Prozessschritt,
(SELECT Data FROM FNDD_SPLIT_STRING(REPLACE(REPLACE(szValue,'PMProfile loaded: [',''),']','') ,'~') where SequentialOrder = 1) as Durch,
(SELECT Data FROM FNDD_SPLIT_STRING(REPLACE(REPLACE(szValue,'PMProfile loaded: [',''),']','') ,'~') where SequentialOrder = 2) Status_Change,
(SELECT Data FROM FNDD_SPLIT_STRING(szValue,'~') where SequentialOrder = 4) Wann,
'' Kommentar
FROM
windream60.dbo.Vector
where
--dwDocID = 785040 and
dwAttrID = 10040
GO

30
DMS/SQL-Server/Sichten/[VWCUST_RPTERGEBNISBERICHT_POS_KONTIERUNG].sql Normal file
View File

@ -0,0 +1,30 @@
USE [DD_ECM]
GO
/****** Object: View [dbo].[VWCUST_RPTERGEBNISBERICHT_POS_KONTIERUNG] Script Date: 21.03.2024 17:05:46 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE VIEW [dbo].[VWCUST_RPTERGEBNISBERICHT_POS_KONTIERUNG] as
SELECT
(SELECT Data FROM FNDD_SPLIT_STRING(szValue ,'~') where SequentialOrder = 1) as 'AuftragNr',
(SELECT Data FROM FNDD_SPLIT_STRING(szValue ,'~') where SequentialOrder = 2) as 'Kostenstelle',
(SELECT Data FROM FNDD_SPLIT_STRING(szValue ,'~') where SequentialOrder = 3) as 'Sachkonto',
(SELECT Data FROM FNDD_SPLIT_STRING(szValue ,'~') where SequentialOrder = 4) as 'Lagermaterial',
(SELECT Data FROM FNDD_SPLIT_STRING(szValue ,'~') where SequentialOrder = 5) as 'Nettobetrag',
(SELECT Data FROM FNDD_SPLIT_STRING(szValue ,'~') where SequentialOrder = 6) as 'Steuerschlüssel',
(SELECT Data FROM FNDD_SPLIT_STRING(szValue ,'~') where SequentialOrder = 7) as 'Bruttobetrag',
(SELECT Data FROM FNDD_SPLIT_STRING(szValue ,'~') where SequentialOrder = 8) as 'Geschäftsbereich',
(SELECT Data FROM FNDD_SPLIT_STRING(szValue ,'~') where SequentialOrder = 9) as 'S/H',
(SELECT Data FROM FNDD_SPLIT_STRING(szValue ,'~') where SequentialOrder = 10) as 'Option'
FROM
windream60.dbo.Vector
where
dwAttrID = 10041
--and dwDocID = 752928
GO

34
DMS/SQL-Server/Sichten/[VWCUST_RPT_EB_POS_KONTIERUNG].sql Normal file
View File

@ -0,0 +1,34 @@
USE [DD_ECM]
GO
/****** Object: View [dbo].[VWCUST_RPT_EB_POS_KONTIERUNG] Script Date: 21.03.2024 17:03:40 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE VIEW [dbo].[VWCUST_RPT_EB_POS_KONTIERUNG] as
SELECT
dwDocID as DocID,
dwRow,
(SELECT Data FROM FNDD_SPLIT_STRING(szValue ,'~') where SequentialOrder = 1) as 'AuftragNr',
(SELECT Data FROM FNDD_SPLIT_STRING(szValue ,'~') where SequentialOrder = 2) as 'Kostenstelle',
(SELECT Data FROM FNDD_SPLIT_STRING(szValue ,'~') where SequentialOrder = 3) as 'Sachkonto',
(SELECT Data FROM FNDD_SPLIT_STRING(szValue ,'~') where SequentialOrder = 4) as 'Lagermaterial',
(SELECT Data FROM FNDD_SPLIT_STRING(szValue ,'~') where SequentialOrder = 5) as 'Nettobetrag',
(SELECT Data FROM FNDD_SPLIT_STRING(szValue ,'~') where SequentialOrder = 6) as 'Steuerschlüssel',
(SELECT Data FROM FNDD_SPLIT_STRING(szValue ,'~') where SequentialOrder = 7) as 'Bruttobetrag',
(SELECT Data FROM FNDD_SPLIT_STRING(szValue ,'~') where SequentialOrder = 8) as 'Geschäftsbereich',
(SELECT Data FROM FNDD_SPLIT_STRING(szValue ,'~') where SequentialOrder = 9) as 'S/H',
(SELECT Data FROM FNDD_SPLIT_STRING(szValue ,'~') where SequentialOrder = 10) as 'Option'
FROM
windream60.dbo.Vector
where
dwAttrID = 10041
GO

46
DMS/SQL-Server/Sichten/[VWCUST_STAMP].sql Normal file
View File

@ -0,0 +1,46 @@
USE [DD_ECM]
GO
/****** Object: View [dbo].[VWCUST_STAMP] Script Date: 21.03.2024 17:06:11 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE VIEW [dbo].[VWCUST_STAMP] AS
--SELECT 'FF' FG_TYP,4711 as DocID, 'm.schreiber@honey.de' as Email, 'Ja' as Freigabe, convert(Datetime,'2019-12-17 12:40:25',120) Wann
--UNION
--SELECT 'VA' FG_TYP,4711 as DocID, 'n.schreiber@honey.de' as Email, 'Ja' as Freigabe, convert(Datetime,'2019-12-17 12:32:40',120) Wann
--UNION
--SELECT 'VA' FG_TYP,4711 as DocID, 'v.schreiber@honey.de' as Email, 'Ja' as Freigabe, convert(Datetime,'2019-12-17 12:28:19',120) Wann
--UNION
--SELECT 'FF' FG_TYP,4712 as DocID, 'm.Kamm@dd-works.de' as Email, 'Ja' as Freigabe, convert(Datetime,'2019-12-17 12:40:25',120) Wann
--UNION
--SELECT 'VA' FG_TYP,4712 as DocID, 'v.feygin@ukraina.de' as Email, 'Ja' as Freigabe, convert(Datetime,'2019-12-16 12:11:08',120) Wann
--UNION
--SELECT 'VA' FG_TYP,4712 as DocID, 'j.hoss@karate.de' as Email, 'Ja' as Freigabe, convert(Datetime,'2019-12-14 11:28:23',120) Wann
--UNION
--SELECT 'VA' FG_TYP,4712 as DocID, 'a.treubenbach@stitching.de' as Email, 'Ja' as Freigabe, convert(Datetime,'2019-12-13 18:28:23',120) Wann
--GO
SELECT
Vec.dwDocID as DocID,
(SELECT Data FROM FNDD_SPLIT_STRING(Vec.szvalue,'~') where SequentialOrder = 1) as Email,
(SELECT Data FROM FNDD_SPLIT_STRING(Vec.szvalue,'~') where SequentialOrder = 2) as [Freigabe],
(SELECT Data FROM FNDD_SPLIT_STRING(Vec.szvalue,'~') where SequentialOrder = 5) as [FG_TYP],
(SELECT Data FROM FNDD_SPLIT_STRING(Vec.szvalue,'~') where SequentialOrder = 4) as [Wann]
FROM
windream60.dbo.Vector Vec
WHERE
--vec.dwDocID = 741833 AND
vec.dwAttrID = 10040 AND
SUBSTRING((SELECT Data FROM FNDD_SPLIT_STRING(Vec.szvalue,'~') where SequentialOrder = 5),7,6) IN ('ER 4.0','ER 2.0')
-- select * from windream60.dbo.Vector where dwDocID = 785040 and dwAttrID = 10040
GO

32
DMS/SQL-Server/Sichten/[VWCUST_SUGGESTED_APPROVER].sql Normal file
View File

@ -0,0 +1,32 @@
USE [DD_ECM]
GO
/****** Object: View [dbo].[VWCUST_SUGGESTED_APPROVER] Script Date: 21.03.2024 17:06:41 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- TSQL View Zur Ermittlung des des vorschlags Prüfers für gewisse Kreditoren
-- Stand: MK // 30.09.2021
CREATE view [dbo].[VWCUST_SUGGESTED_APPROVER] as
SELECT [T].[GUID]
,[T].[CREDITOR_NR]
,[T].[USER_ID]
,[T2].[USERNAME]
,[T].[GROUP_ID]
,[T].[COMMENT]
,[T].[ADDED_WHO]
,[T].[ADDED_WHEN]
,[T].[CHANGED_WHO]
,[T].[CHANGED_WHEN]
FROM [DD_ECM].[dbo].[TBCUST_SUGGESTED_APPROVER] as [T]
INNER JOIN [TBDD_USER] as [T2] ON [T].[USER_ID] = [T2].[GUID]
GO

40
DMS/SQL-Server/Sichten/[VWCUST_USER_REPRESENTATION].sql Normal file
View File

@ -0,0 +1,40 @@
USE [DD_ECM]
GO
/****** Object: View [dbo].[VWCUST_USER_REPRESENTATION] Script Date: 21.03.2024 17:07:07 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
/****** Skript für SelectTopNRows-Befehl aus SSMS ******/
-- Stand: MK // 17.09.2021
-- 17.09.2021 - initial
CREATE view [dbo].[VWCUST_USER_REPRESENTATION]
as
SELECT
[TBDD_USER_REPRESENTATION].[GUID]
,[USER_ID]
,[TBDD_USER].[USERNAME] as [USERNAME]
,[REPR_USER]
,[REPR_GROUP]
,[REPR_GROUP].[NAME] as [REPR_GROUPNAME]
,[RIGHT_GROUP]
,[RIGHT_GROUP].[NAME] as [RIGHT_GROUPNAME]
,[TBDD_USER_REPRESENTATION].[ADDED_WHO]
,[TBDD_USER_REPRESENTATION].[ADDED_WHEN]
,[TBDD_USER_REPRESENTATION].[CHANGED_WHO]
,[TBDD_USER_REPRESENTATION].[CHANGED_WHEN]
FROM [DD_ECM].[dbo].[TBDD_USER_REPRESENTATION]
INNER JOIN [TBDD_USER] ON [TBDD_USER_REPRESENTATION].[USER_ID] = [TBDD_USER].[GUID]
LEFT JOIN [TBDD_GROUPS] as [REPR_GROUP] ON [TBDD_USER_REPRESENTATION].[REPR_GROUP] = [REPR_GROUP].[GUID]
LEFT JOIN [TBDD_GROUPS] as [RIGHT_GROUP] ON [TBDD_USER_REPRESENTATION].[RIGHT_GROUP] = [RIGHT_GROUP].[GUID]
GO

35
DMS/SQL-Server/Tabellen/[TBCUST_PM_RPT_2BCREATED].sql Normal file
View File

@ -0,0 +1,35 @@
USE [DD_ECM]
GO
/****** Object: Table [dbo].[TBCUST_PM_RPT_2BCREATED] Script Date: 21.03.2024 16:55:34 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE TABLE [dbo].[TBCUST_PM_RPT_2BCREATED](
[DocID] [bigint] NOT NULL,
[GEN_ID] [varchar](3) NOT NULL,
[COMMENT] [varchar](500) NULL,
[ADDED_WHEN] [datetime] NOT NULL,
[Outputfilename] [varchar](50) NULL,
CONSTRAINT [PK_TBCUST_PM_RPT_2BCREATED] PRIMARY KEY CLUSTERED
(
[DocID] ASC,
[GEN_ID] ASC
)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY],
UNIQUE NONCLUSTERED
(
[DocID] ASC
)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
) ON [PRIMARY]
GO
ALTER TABLE [dbo].[TBCUST_PM_RPT_2BCREATED] ADD DEFAULT ('001') FOR [GEN_ID]
GO
ALTER TABLE [dbo].[TBCUST_PM_RPT_2BCREATED] ADD DEFAULT (getdate()) FOR [ADDED_WHEN]
GO

31
DMS/SQL-Server/Tabellen/[TBCUST_PM_RPT_CREATED].sql Normal file
View File

@ -0,0 +1,31 @@
USE [DD_ECM]
GO
/****** Object: Table [dbo].[TBCUST_PM_RPT_CREATED] Script Date: 21.03.2024 16:56:01 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE TABLE [dbo].[TBCUST_PM_RPT_CREATED](
[GUID] [bigint] IDENTITY(1,1) NOT NULL,
[DocID] [bigint] NOT NULL,
[COMMENT] [varchar](500) NULL,
[ADDED_WHEN] [datetime] NOT NULL,
[GEN_ID] [varchar](3) NOT NULL,
CONSTRAINT [PK_TBCUST_PM_RPT_CREATED] PRIMARY KEY CLUSTERED
(
[GUID] ASC
)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY],
CONSTRAINT [UQ__TBCUST_P__3EF1888CA7B0AC48] UNIQUE NONCLUSTERED
(
[DocID] ASC
)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
) ON [PRIMARY]
GO
ALTER TABLE [dbo].[TBCUST_PM_RPT_CREATED] ADD CONSTRAINT [DF__TBCUST_PM__ADDED__47E69B3D] DEFAULT (getdate()) FOR [ADDED_WHEN]
GO

34
DMS/SQL-Server/Tabellen/[TBCUST_SUGGESTED_APPROVER].sql Normal file
View File

@ -0,0 +1,34 @@
USE [DD_ECM]
GO
/****** Object: Table [dbo].[TBCUST_SUGGESTED_APPROVER] Script Date: 21.03.2024 16:56:36 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE TABLE [dbo].[TBCUST_SUGGESTED_APPROVER](
[GUID] [tinyint] IDENTITY(1,1) NOT NULL,
[CREDITOR_NR] [varchar](50) NOT NULL,
[USER_ID] [bigint] NOT NULL,
[GROUP_ID] [nchar](10) NULL,
[COMMENT] [varchar](max) NULL,
[ADDED_WHO] [varchar](50) NOT NULL,
[ADDED_WHEN] [datetime] NOT NULL,
[CHANGED_WHO] [varchar](50) NULL,
[CHANGED_WHEN] [datetime] NULL,
CONSTRAINT [PK_TBCUST_SUGGESTED_APPROVER] PRIMARY KEY CLUSTERED
(
[GUID] ASC
)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]
GO
ALTER TABLE [dbo].[TBCUST_SUGGESTED_APPROVER] ADD CONSTRAINT [DF_TBCUST_SUGGESTED_APPROVER_ADDED_WHO] DEFAULT ('ECM-Admin') FOR [ADDED_WHO]
GO
ALTER TABLE [dbo].[TBCUST_SUGGESTED_APPROVER] ADD CONSTRAINT [DF_TBCUST_SUGGESTED_APPROVER_ADDED_WHEN] DEFAULT (getdate()) FOR [ADDED_WHEN]
GO

25
DMS/SQL-Server/Tabellen/[TBCUST_TC_WD_RIGHTS].sql Normal file
View File

@ -0,0 +1,25 @@
USE [DD_ECM]
GO
/****** Object: Table [dbo].[TBCUST_TC_WD_RIGHTS] Script Date: 21.03.2024 16:57:06 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE TABLE [dbo].[TBCUST_TC_WD_RIGHTS](
[GUID] [bigint] IDENTITY(1,1) NOT NULL,
[DocID] [bigint] NOT NULL,
[RightType] [nchar](10) NOT NULL,
[RightUserOrGroup] [nvarchar](50) NOT NULL,
[Created_Who] [nvarchar](100) NOT NULL,
[Created_When] [datetime] NOT NULL,
CONSTRAINT [PK_TBCUST_TC_WD_RIGHTS] PRIMARY KEY CLUSTERED
(
[GUID] ASC
)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
) ON [PRIMARY]
GO

37
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_GET_NAVISION_VENDORACCOUNT_LIST].sql Normal file
View File

@ -0,0 +1,37 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_GET_NAVISION_VENDORACCOUNT_LIST] Script Date: 21.03.2024 17:18:06 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenwertfunktion zu Ausgabe der Kreditoren
-- 14.07.2023 MS Update BC ID
-- Stand: MK // 15.09.2021
CREATE FUNCTION [dbo].[FNCUST_GET_NAVISION_VENDORACCOUNT_LIST] (
@Mandant VARCHAR(8) -- Default SWB
)
RETURNS TABLE
AS
RETURN
-- Daten aus dem Vendor Modul
SELECT TOP 10000
LTRIM(RTRIM([No_])) as 'Lieferanten-Nummer'
----------------------------------------------------------------------------------------------
,LTRIM(RTRIM([Name])) as 'Lieferanten-Name'
----------------------------------------------------------------------------------------------
FROM [NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[STW Bebra GmbH inkl Netz$Vendor$437dbf0e-84ff-417a-965d-ed2bb9650972]
GO

35
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_GET_NAVISION_VENDOR_INFO].sql Normal file
View File

@ -0,0 +1,35 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_GET_NAVISION_VENDOR_INFO] Script Date: 21.03.2024 17:17:31 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenwertfunktion zu Ausgabe des Kreditor Namen
--14.07.2023 MS Update BC ID
-- Stand: MK // 15.09.2021
CREATE FUNCTION [dbo].[FNCUST_GET_NAVISION_VENDOR_INFO] (
@Mandant VARCHAR(8), -- Default VHM
@VendorNr VARCHAR(25)
)
RETURNS TABLE
AS
RETURN
-- Daten aus dem FiBu Modul
SELECT TOP 1 LTRIM(RTRIM([Name])) as 'Lieferanten-Name',
LTRIM(RTRIM([Our Account No_])) as 'KundenNr-Lieferant'
FROM [NTSERP\NTSSUITE].[NTSsuite2015].[dbo].[STW Bebra GmbH inkl Netz$Vendor$437dbf0e-84ff-417a-965d-ed2bb9650972]
WHERE LTRIM(RTRIM([No_])) = LTRIM(RTRIM(@VendorNr))
GO

42
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_GET_PM_MONITORING_HISTORY_GRID1].sql Normal file
View File

@ -0,0 +1,42 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_GET_PM_MONITORING_HISTORY_GRID1] Script Date: 21.03.2024 17:19:03 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- TSQL Table function for PM Monitoring - Gird 1
-- Stand: MK // 04.02.2022
-- 04.02.2022 Initial
create FUNCTION [dbo].[FNCUST_GET_PM_MONITORING_HISTORY_GRID1] (
)
RETURNS TABLE
AS
RETURN
SELECT
[dwDocID] as 'DocID',
[szText37] as 'Dokumentart',
[szText38] as 'Lieferanten-Nummer',
[szText08] as 'Lieferanten-Name',
[szText36] as 'NAV-Nr.',
[lfFloat12] as 'Rechnungsbetrag',
[szText19] as 'ex. Rechnungs-Nr',
[szText33] as 'Status',
[szText32] as 'letzte Entscheidung',
[DD_ECM].dbo.FNDD_GET_WINDREAM_FILE_PATH ([dwDocID],0) as 'FULL_FILE_PATH'
FROM [windream60].[dbo].[BaseAttributes]
WHERE szText37 like 'Eingangsrechnung%'
or szText37 like 'Eingangsgutschrift%'
GO

104
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_GET_PM_MONITORING_HISTORY_GRID2].sql Normal file
View File

@ -0,0 +1,104 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_GET_PM_MONITORING_HISTORY_GRID2] Script Date: 21.03.2024 17:19:26 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- TSQL Table function for PM Monitoring - Gird 2
-- Stand: MK // 30.01.2021
-- 30.01.2021 Initial
CREATE FUNCTION [dbo].[FNCUST_GET_PM_MONITORING_HISTORY_GRID2] (
@windreamDocID BIGINT,
@windreamAttrID INT = 10040,
@Seperator VARCHAR(1) = '~'
)
RETURNS @vTB_HISTORY TABLE ([GUID] [INT] IDENTITY(1,1) NOT NULL,
HISTORY_USER [VARCHAR](max) NULL,
HISTORY_STATE [VARCHAR](max) NULL,
HISTORY_DESCRIPTION [VARCHAR](max) NULL,
HISTORY_DATE [DATETIME] NULL,
HISTORY_PROFILE [VARCHAR](max) NULL)
AS
BEGIN
DECLARE @szValue VARCHAR(max)
DECLARE CURSOR_HISTORY CURSOR
FOR
SELECT [szValue]
FROM [windream60].[dbo].[Vector]
WHERE [dwAttrID] = @windreamAttrID
and [dwDocID] = @windreamDocID
order by dwRow ASC
OPEN CURSOR_HISTORY
FETCH NEXT FROM CURSOR_HISTORY INTO @szValue
WHILE @@FETCH_STATUS = 0
BEGIN
INSERT INTO @vTB_HISTORY (HISTORY_USER,HISTORY_STATE,HISTORY_DESCRIPTION,HISTORY_DATE,HISTORY_PROFILE)
VALUES (
(SELECT [Item] FROM FNCUST_SPLIT_STRING_WITH_GUID (@szValue, @Seperator) where GUID = 1),
(SELECT [Item] FROM FNCUST_SPLIT_STRING_WITH_GUID (@szValue, @Seperator) where GUID = 2),
(SELECT [Item] FROM FNCUST_SPLIT_STRING_WITH_GUID (@szValue, @Seperator) where GUID = 3),
(SELECT [Item] FROM FNCUST_SPLIT_STRING_WITH_GUID (@szValue, @Seperator) where GUID = 4),
(SELECT [Item] FROM FNCUST_SPLIT_STRING_WITH_GUID (@szValue, @Seperator) where GUID = 5)
)
FETCH NEXT FROM CURSOR_HISTORY INTO @szValue
END
CLOSE CURSOR_HISTORY
DEALLOCATE CURSOR_HISTORY
--select * from @vTB_HISTORY
RETURN;
END
--THIS FUNCTION IS NEEDED::
--SET ANSI_NULLS ON
--GO
--SET QUOTED_IDENTIFIER ON
--GO
--ALTER FUNCTION [dbo].[FNCUST_SPLIT_STRING_WITH_GUID]
--(
-- @Input NVARCHAR(MAX),
-- @Character CHAR(1)
--)
--RETURNS @Output TABLE (GUID INTEGER IDENTITY(1,1),
-- Item NVARCHAR(1000)
--)
--AS
--BEGIN
-- DECLARE @StartIndex INT, @EndIndex INT
-- SET @StartIndex = 1
-- IF SUBSTRING(@Input, LEN(@Input) - 1, LEN(@Input)) <> @Character
-- BEGIN
-- SET @Input = @Input + @Character
-- END
-- WHILE CHARINDEX(@Character, @Input) > 0
-- BEGIN
-- SET @EndIndex = CHARINDEX(@Character, @Input)
-- INSERT INTO @Output(Item)
-- SELECT SUBSTRING(@Input, @StartIndex, @EndIndex - 1)
-- SET @Input = SUBSTRING(@Input, @EndIndex + 1, LEN(@Input))
-- END
-- RETURN
--END
GO

116
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_GET_PM_MONITORING_HISTORY_GRID3].sql Normal file
View File

@ -0,0 +1,116 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_GET_PM_MONITORING_HISTORY_GRID3] Script Date: 21.03.2024 17:19:51 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- TSQL Table function for PM Monitoring - Gird 3
-- Stand: MK // 05.11.2021
-- 05.11.2021 Ergänzung um
-- 31.10.2021 Ergänzung um brutto Betrag
-- 20.10.2021 Initial
CREATE FUNCTION [dbo].[FNCUST_GET_PM_MONITORING_HISTORY_GRID3] (
@windreamDocID BIGINT,
@windreamAttrID INT = 10041,
@Seperator VARCHAR(1) = '~'
)
RETURNS @vTB_HISTORY TABLE ([GUID] [INT] IDENTITY(1,1) NOT NULL,
[ORDER_NR] [VARCHAR](max) NULL, -- Auftragsnummer
[COST_UNIT] [VARCHAR](max) NULL, -- Kostenstelle
[IMPERSONAL_ACCOUNT] [VARCHAR](max) NULL, -- Sachkonto
[STORAGE] [VARCHAR](max) NULL, -- Lagermaterial Ja/Nein
[NET_AMOUNT] [VARCHAR](max) NULL, -- netto Betrag
[TAX_KEY] [VARCHAR](max) NULL, -- Steuerschlüssel
[AMOUNT] [VARCHAR](max) NULL, -- brutto Betrag
[BUSINESS_UNIT] [VARCHAR](max) NULL, -- Geschäftsbereich
[DEBIT_AND_CREDIT] [VARCHAR](max) NULL, -- Soll/Haben Kennzeichen
[OPTION] [VARCHAR](max) NULL) -- "Weiterbelastung" oder "----"
AS
BEGIN
DECLARE @szValue VARCHAR(max)
DECLARE CURSOR_HISTORY CURSOR
FOR
SELECT [szValue]
FROM [windream60].[dbo].[Vector]
WHERE [dwAttrID] = @windreamAttrID
and [dwDocID] = @windreamDocID
order by dwRow ASC
OPEN CURSOR_HISTORY
FETCH NEXT FROM CURSOR_HISTORY INTO @szValue
WHILE @@FETCH_STATUS = 0
BEGIN
INSERT INTO @vTB_HISTORY ([ORDER_NR], [COST_UNIT], [IMPERSONAL_ACCOUNT], [STORAGE], [NET_AMOUNT], [TAX_KEY], [AMOUNT], [BUSINESS_UNIT], [DEBIT_AND_CREDIT], [OPTION])
VALUES (
(SELECT [Item] FROM FNCUST_SPLIT_STRING_WITH_GUID (@szValue, @Seperator) where GUID = 1),
(SELECT [Item] FROM FNCUST_SPLIT_STRING_WITH_GUID (@szValue, @Seperator) where GUID = 2),
(SELECT [Item] FROM FNCUST_SPLIT_STRING_WITH_GUID (@szValue, @Seperator) where GUID = 3),
(SELECT [Item] FROM FNCUST_SPLIT_STRING_WITH_GUID (@szValue, @Seperator) where GUID = 4),
(SELECT [Item] FROM FNCUST_SPLIT_STRING_WITH_GUID (@szValue, @Seperator) where GUID = 5),
(SELECT [Item] FROM FNCUST_SPLIT_STRING_WITH_GUID (@szValue, @Seperator) where GUID = 6),
(SELECT [Item] FROM FNCUST_SPLIT_STRING_WITH_GUID (@szValue, @Seperator) where GUID = 7),
(SELECT [Item] FROM FNCUST_SPLIT_STRING_WITH_GUID (@szValue, @Seperator) where GUID = 8),
(SELECT [Item] FROM FNCUST_SPLIT_STRING_WITH_GUID (@szValue, @Seperator) where GUID = 9),
(SELECT [Item] FROM FNCUST_SPLIT_STRING_WITH_GUID (@szValue, @Seperator) where GUID = 10)
)
FETCH NEXT FROM CURSOR_HISTORY INTO @szValue
END
CLOSE CURSOR_HISTORY
DEALLOCATE CURSOR_HISTORY
--select * from @vTB_HISTORY
RETURN;
END
--THIS FUNCTION IS NEEDED::
--SET ANSI_NULLS ON
--GO
--SET QUOTED_IDENTIFIER ON
--GO
--ALTER FUNCTION [dbo].[FNCUST_SPLIT_STRING_WITH_GUID]
--(
-- @Input NVARCHAR(MAX),
-- @Character CHAR(1)
--)
--RETURNS @Output TABLE (GUID INTEGER IDENTITY(1,1),
-- Item NVARCHAR(1000)
--)
--AS
--BEGIN
-- DECLARE @StartIndex INT, @EndIndex INT
-- SET @StartIndex = 1
-- IF SUBSTRING(@Input, LEN(@Input) - 1, LEN(@Input)) <> @Character
-- BEGIN
-- SET @Input = @Input + @Character
-- END
-- WHILE CHARINDEX(@Character, @Input) > 0
-- BEGIN
-- SET @EndIndex = CHARINDEX(@Character, @Input)
-- INSERT INTO @Output(Item)
-- SELECT SUBSTRING(@Input, @StartIndex, @EndIndex - 1)
-- SET @Input = SUBSTRING(@Input, @EndIndex + 1, LEN(@Input))
-- END
-- RETURN
--END
GO

84
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_GET_PM_OVERVIEW].sql Normal file
View File

@ -0,0 +1,84 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_GET_PM_OVERVIEW] Script Date: 21.03.2024 17:20:23 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- Stand: MK // 28.10.2021
-- 28.10.2021 Mandant hinzugefügt, Dateiname verschoben
-- 20.09.2021 Initial
CREATE FUNCTION [dbo].[FNCUST_GET_PM_OVERVIEW] (
@USER_ID BIGINT
)
RETURNS TABLE
AS
RETURN (
/*## Following Columns need to be part of sql ##
TL_STATE Returns the TrafficLight-State for each doc (1=Red;2=Orange;3=Green)
PROFILE_ID TITLE Profile-Title used for default-grouping
DOC_ID
FULL_FILE_PATH
LAST USE
LAST EDITED */
--DECLARE @USER_ID INTEGER = 20;
SELECT
T.GUID,
DATEDIFF(DAY, [dbo].[FNPM_LAST_EDITED_DOC] (T.PROFIL_ID,T.DOC_ID),GETDATE()) AS [Zuletzt Bearbeitet],
Case DATEDIFF(DAY, [dbo].[FNPM_LAST_EDITED_DOC] (T.PROFIL_ID,T.DOC_ID),GETDATE())
WHEN 0 THEN 3
WHEN 1 THEN 3
WHEN 2 THEN 3
WHEN 3 THEN 2
WHEN 4 THEN 2
WHEN 5 THEN 2
WHEN 6 THEN 2
WHEN 7 THEN 2
ELSE 1 -- Wenn drei tage = gelb | wenn mehr als 7 tage = rot
END AS TL_STATE,
T.PROFIL_ID AS PROFILE_ID,
T.DOC_ID AS DocID,
T.FILE_PATH AS FULL_FILE_PATH,
TWM_BA.szText37 AS Dokumentart,
TWM_BA.szText36 AS 'NAV-Nr.',
--TWM_BA.lfFloat12 AS 'Rechnungsbetrag',
TWM_BA.szText19 AS 'ex-RechnungsNummer',
TWM_BA.szText38 AS 'Kreditor-Nummer',
TWM_BA.szText08 AS 'Kreditor-Name',
T.DMS_ERSTELLT_DATE AS 'Erhalten wann',
TWM_BA.szText22 AS 'Prüfer',
[dbo].[FNPM_LAST_WORKUSER_DOC] (T.PROFIL_ID,T.DOC_ID) AS 'Letzter Bearbeiter',
FORMAT(CONVERT(date, convert(varchar(8),[TWM_BA].[dwChangeDate]), 120), N'dd.MM.yyyy') AS 'Letzte Bearbeitung', --Default: [dbo].[FNPM_LAST_EDITED_DOC] (T.PROFIL_ID,T.DOC_ID) AS 'Letzte Bearbeitung',
--FORMAT(CONVERT(date, convert(varchar(8),[TWM_BA].[dwDate06]), 120), N'dd.MM.yyyy') AS 'Fällig am', --Default: [dbo].[FNPM_LAST_EDITED_DOC] (T.PROFIL_ID,T.DOC_ID) AS 'Letzte Bearbeitung',
TWM_BA.szText31 AS 'Mandant',
TWM_BA.szLongName AS Dateiname,
[dbo].[FNPM_PROFILE_GROUP_COLOR] (T.PROFIL_ID) AS 'GROUP_COLOR',
[dbo].[FNPM_PROFILE_GROUP_TEXT] (T.PROFIL_ID) AS 'GROUP_TEXT'
,0 CONV_YN
FROM
[FNPM_CUST_GET_DOC_IDS] (@USER_ID) TDOC
INNER JOIN TBPM_PROFILE_FILES T ON TDOC.DOC_GUID = T.GUID
INNER JOIN TBPM_PROFILE T1 ON T.PROFIL_ID = T1.GUID
INNER JOIN windream60.dbo.BaseAttributes TWM_BA ON T.DOC_ID = TWM_BA.dwDocID
AND T.EDIT = 0 AND T.IN_WORK = 0 AND T.ACTIVE = 1
--ORDER By T1.PRIORITY
-- SELECT * FROM [dbo].[FNPM_GET_ACTIVE_PROFILES_USER] (20)
-- SELECT * FROM [dbo].[FNPM_CUST_GET_DOC_IDS] (2)
-- Aufruf aus ProcessManager:
-- Stand: MK // 28.01.2021
-- SELECT * FROM [FNCUST_GET_PM_OVERVIEW]({#USER#USER_ID})
-- ORDER BY [Zuletzt Bearbeitet] DESC
);
GO

49
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_GET_TC_WD_RIGHTS].sql Normal file
View File

@ -0,0 +1,49 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_GET_TC_WD_RIGHTS] Script Date: 21.03.2024 17:21:03 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Ermittle Gruppenrechte anhand des gesetzten Benutzernamens (WINDREAM STRING 22)
-- Stand: MK // 18.11.2021
-- 18.11.2021 Initial
CREATE FUNCTION [dbo].[FNCUST_GET_TC_WD_RIGHTS] (
@windreamDocID BIGINT
)
RETURNS TABLE
AS
RETURN
----------------------------------------------------------------------------------------------------------------------------------
SELECT DISTINCT concat([wdGI].[szNTDomain],'\',[wdGI].[szGroupName]) as 'RightGroups'
FROM [windream60].[dbo].[BaseAttributes] as [wdBA] (NOLOCK)
INNER JOIN [windream60].[dbo].[UserInfo] as [wdUI] (NOLOCK) ON UPPER([wdBA].[szText22]) = UPPER([wdUI].[szUserName]) -- Username for UserID
INNER JOIN [windream60].[dbo].[UserGroup] as [wdU2G] (NOLOCK) ON [wdUI].[dwUserID] = [wdU2G].[dwUserOrGroupID] -- UserID for GroupsID
INNER JOIN [windream60].[dbo].[GroupInfo] as [wdGI] (NOLOCK) ON [wdU2G].[dwGroupID] = [wdGI].[dwGroupID] -- GroupIDs for Groupnames
INNER JOIN [DD_ECM].[dbo].[TBDD_USER] as [ddUI] (NOLOCK) ON [wdUI].[dwUserID] = [ddUI].[USERID_FK_INT_ECM] -- windream UserID to DD UserID
INNER JOIN [DD_ECM].[dbo].[TBDD_GROUPS_USER] as [ddU2G] (NOLOCK) ON [ddUI].[GUID] = [ddU2G].[USER_ID] -- UserID for GroupsID
INNER JOIN [DD_ECM].[dbo].[TBDD_GROUPS] as [ddGI] (NOLOCK) ON [ddU2G].[GROUP_ID] = [ddGI].[GUID] -- GroupIDs for Groupnames
WHERE UPPER([wdGI].[szGroupName]) = UPPER([ddGI].[NAME])
AND [wdBA].[dwDocID] = @windreamDocID
AND [wdGI].[szGroupName] not in ('Eingangsrechnungsworkflow-FinaleFreigeber')
AND [wdGI].[szGroupName] not like '%Scan-Erfasser%'
----------------------------------------------------------------------------------------------------------------------------------
-- TEST:
-- select * from [FNCUST_GET_TC_WD_RIGHTS](730231)
-- select * from [FNCUST_GET_TC_WD_RIGHTS](741102)
GO

42
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_GET_TC_WD_RIGHTS_FOR_FIBU].sql Normal file
View File

@ -0,0 +1,42 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_GET_TC_WD_RIGHTS_FOR_FIBU] Script Date: 21.03.2024 17:21:32 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Ermittle Gruppenrechte anhand des gesetzten Benutzernamens (WINDREAM STRING 22)
-- Stand: MK // 10.12.2021
-- 10.12.2021 Initial
CREATE FUNCTION [dbo].[FNCUST_GET_TC_WD_RIGHTS_FOR_FIBU] (
@windreamDocID BIGINT
)
RETURNS TABLE
AS
RETURN
----------------------------------------------------------------------------------------------------------------------------------
SELECT DISTINCT concat([wdGI].[szNTDomain],'\',[wdBA].[szText31],'-FiBu') as 'RightGroups'
FROM [windream60].[dbo].[BaseAttributes] as [wdBA] (NOLOCK)
INNER JOIN [windream60].[dbo].[UserInfo] as [wdUI] (NOLOCK) ON UPPER([wdBA].[szText22]) = UPPER([wdUI].[szUserName]) -- Username for UserID
INNER JOIN [windream60].[dbo].[UserGroup] as [wdU2G] (NOLOCK) ON [wdUI].[dwUserID] = [wdU2G].[dwUserOrGroupID] -- UserID for GroupsID
INNER JOIN [windream60].[dbo].[GroupInfo] as [wdGI] (NOLOCK) ON [wdU2G].[dwGroupID] = [wdGI].[dwGroupID] -- GroupIDs for Groupnames
WHERE [wdBA].[szText31] IS NOT NULL
AND [wdBA].[dwDocID] = @windreamDocID
----------------------------------------------------------------------------------------------------------------------------------
-- TEST:
-- select * from [FNCUST_GET_TC_WD_RIGHTS](730231)
-- select * from [FNCUST_GET_TC_WD_RIGHTS_FOR_FIBU](741102)
GO

42
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_GET_USER_MAILADRESS_LIST].sql Normal file
View File

@ -0,0 +1,42 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_GET_USER_MAILADRESS_LIST] Script Date: 21.03.2024 17:22:09 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- MK // 19.01.2021
-- Funktion sollte erweitert werden um die Mandanten Abfrage
CREATE FUNCTION [dbo].[FNCUST_GET_USER_MAILADRESS_LIST] (
@Mandant VARCHAR(8) -- Default SWB
)
RETURNS TABLE
AS
RETURN
SELECT [E-Mail Adressen Liste] from
(SELECT '' AS 'E-Mail Adressen Liste') as Query1
UNION
SELECT TOP 10000 [E-Mail Adressen Liste] from
(SELECT TOP 10000 [EMAIL] AS 'E-Mail Adressen Liste'
FROM [DD_ECM].[dbo].[TBDD_USER]
WHERE [EMAIL] LIKE '%@%'
ORDER BY [EMAIL]) as Query2
ORDER BY [E-Mail Adressen Liste] ASC
GO

150
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_GET_USER_REPRESENTATION_GROUPS].sql Normal file
View File

@ -0,0 +1,150 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_GET_USER_REPRESENTATION_GROUPS] Script Date: 21.03.2024 17:23:22 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- TSQL Table function to determ/get user access group informations
-- Stand: MK // 20.09.2021
-- 21.09.2021 Änderung Parameter
-- 20.09.2021 Initial
CREATE FUNCTION [dbo].[FNCUST_GET_USER_REPRESENTATION_GROUPS] (
@USER VARCHAR(250)
)
RETURNS @USERGROUPS TABLE ([USER_ID] [BIGINT] NOT NULL, -- eg = 1
[USER_NAME] [VARCHAR](100) NULL, -- eg = admin
[USER_GROUP_IDS] [VARCHAR](100) NULL, -- eg = 35,36,37
[USER_GROUP_NAMES] [VARCHAR](250) NULL, -- eg = Netzbetrieb-Gas-Wasser-Wärme,Netzservice,Netzbetrieb-Strom
[USER_BUSINESS_DIVISION] [VARCHAR](250) NULL) -- eg = Technik
AS
BEGIN
DECLARE @USER_REPRESENTATION_COUNT INT,
@USER_ID BIGINT,
@USERNAME VARCHAR(100),
@REPR_GROUP VARCHAR(100),
@REPR_GROUPNAME VARCHAR(250),
@USER_GROUP_IDS VARCHAR(100),
@USER_GROUP_NAMES VARCHAR(250),
@USER_BUSINESS_DIVISION VARCHAR(250);
--=================================================-- Get count --=============================================--
SELECT @USER_REPRESENTATION_COUNT = COUNT(*)
FROM [dbo].[VWCUST_USER_REPRESENTATION]
WHERE [USERNAME] = @USER
--===============================================-- Get division --============================================--
SELECT TOP 1 @USER_BUSINESS_DIVISION = [REPR_GROUPNAME],
@USER_ID = [USER_ID]
FROM [dbo].[VWCUST_USER_REPRESENTATION]
WHERE [USERNAME] = @USER
IF (@USER_BUSINESS_DIVISION like 'SWB-Netz%')
SET @USER_BUSINESS_DIVISION = 'SWB-Netz'
ELSE IF (@USER_BUSINESS_DIVISION like 'SWB-Vertrieb%')
SET @USER_BUSINESS_DIVISION = 'SWB-Vertrieb'
ELSE IF (@USER_BUSINESS_DIVISION like 'SB-Abwasserbetrieb%')
SET @USER_BUSINESS_DIVISION = 'SB-Abwasserbetrieb'
ELSE IF (@USER_BUSINESS_DIVISION like 'SB-Bäderbetrieb%')
SET @USER_BUSINESS_DIVISION = 'SB-Bäderbetrieb'
ELSE -- shared services
SET @USER_BUSINESS_DIVISION = 'SWB-Netz'
--=============================================================================================================--
If (@USER_REPRESENTATION_COUNT = 1)
BEGIN
INSERT INTO @USERGROUPS ([USER_ID],[USER_NAME],[USER_GROUP_IDS],[USER_GROUP_NAMES],[USER_BUSINESS_DIVISION])
SELECT @USER_ID,
[USERNAME],
[REPR_GROUP],
[REPR_GROUPNAME],
@USER_BUSINESS_DIVISION
FROM [dbo].[VWCUST_USER_REPRESENTATION]
WHERE [USER_ID] = @USER_ID
ORDER BY [GUID] ASC
END
--=============================================================================================================--
Else If (@USER_REPRESENTATION_COUNT > 1)
BEGIN
DECLARE CURSOR_USER_REPRESENTATION_DATA CURSOR
FOR
SELECT @USER_ID, USERNAME, REPR_GROUP, REPR_GROUPNAME
FROM [dbo].[VWCUST_USER_REPRESENTATION]
WHERE USER_ID = @USER_ID
ORDER BY GUID ASC
OPEN CURSOR_USER_REPRESENTATION_DATA
FETCH NEXT FROM CURSOR_USER_REPRESENTATION_DATA INTO @USER_ID, @USERNAME, @REPR_GROUP, @REPR_GROUPNAME
WHILE @@FETCH_STATUS = 0
BEGIN
BEGIN
SET @USER_GROUP_IDs = CONCAT(@USER_GROUP_IDs,convert(VARCHAR(100),@REPR_GROUP),',')
SET @USER_GROUP_NAMEs = CONCAT(@USER_GROUP_NAMEs,convert(VARCHAR(100),@REPR_GROUPNAME),',')
END
FETCH NEXT FROM CURSOR_USER_REPRESENTATION_DATA INTO @USER_ID,@USERNAME,@REPR_GROUP,@REPR_GROUPNAME
END
CLOSE CURSOR_USER_REPRESENTATION_DATA
DEALLOCATE CURSOR_USER_REPRESENTATION_DATA
------------------------------------------------------------------------------------------------------------
INSERT INTO @USERGROUPS ([USER_ID],[USER_NAME],[USER_GROUP_IDS],[USER_GROUP_NAMES],[USER_BUSINESS_DIVISION])
SELECT TOP 1
@USER_ID,
[USERNAME],
substring(@USER_GROUP_IDS, 1, (len(@USER_GROUP_IDS) - 1)),
substring(@USER_GROUP_NAMES, 1, (len(@USER_GROUP_NAMES) - 1)),
@USER_BUSINESS_DIVISION
FROM [dbo].[VWCUST_USER_REPRESENTATION]
WHERE [USER_ID] = @USER_ID
ORDER BY [GUID] ASC
END
--=============================================================================================================--
Else
BEGIN
--------------------------------------------------------
INSERT INTO @USERGROUPS ([USER_ID],[USER_NAME],[USER_GROUP_IDS],[USER_GROUP_NAMES],[USER_BUSINESS_DIVISION])
SELECT @USER_ID,NULL,NULL,NULL,@USER_BUSINESS_DIVISION
END
-----------------------------------------------------------------------------------------------------------------
RETURN;
END
GO

35
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_GET_USER_USERNAME_LIST].sql Normal file
View File

@ -0,0 +1,35 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_GET_USER_USERNAME_LIST] Script Date: 21.03.2024 17:23:59 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- MK // 19.01.2021
-- Funktion sollte erweitert werden um die Mandanten Abfrage
create FUNCTION [dbo].[FNCUST_GET_USER_USERNAME_LIST] (
@Mandant VARCHAR(8) -- Default SWB
)
RETURNS TABLE
AS
RETURN
SELECT TOP 10000 [USERNAME] as 'Benutzername',
[PRENAME] as 'Vorname',
[NAME] as 'Nachname',
[EMAIL] as 'E-Mail Adresse'
FROM [DD_ECM].[dbo].[TBDD_USER]
WHERE [EMAIL] LIKE '%@%'
ORDER BY [USERNAME] ASC
GO

36
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_GET_USER_USERNAME_LIST_FINAL_APPROVER].sql Normal file
View File

@ -0,0 +1,36 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_GET_USER_USERNAME_LIST_FINAL_APPROVER] Script Date: 21.03.2024 17:24:39 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- Stand: MK // 10.11.2021
CREATE FUNCTION [dbo].[FNCUST_GET_USER_USERNAME_LIST_FINAL_APPROVER] (
@Mandant VARCHAR(8) -- Default SWB
)
RETURNS TABLE
AS
RETURN
SELECT TOP 10000 [USERNAME] as 'Benutzername',
[PRENAME] as 'Vorname',
[NAME] as 'Nachname',
[EMAIL] as 'E-Mail Adresse'
FROM [DD_ECM].[dbo].[TBDD_USER]
WHERE [EMAIL] LIKE '%@%'
AND [GUID] IN (SELECT [USER_ID]
FROM [DD_ECM].[dbo].[TBDD_GROUPS_USER]
WHERE [GROUP_ID] in (44)) -- 44=Eingangsrechnungsworkflow-FinaleFreigeber;
ORDER BY [USERNAME] ASC
GO

78
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_SET_PM_CONTROL_DATA_PROFILEID_10].sql Normal file
View File

@ -0,0 +1,78 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_SET_PM_CONTROL_DATA_PROFILEID_10] Script Date: 21.03.2024 17:25:11 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Setze Werte in anderen Feldern anhand der Auswahl der NAV Nummer
-- Stand: MK // 27.10.2021
-- 27.10.2021 Initial
-- PM Profil: SWB - ER 4.1 - Auffangprofil für alle neu angeforderten Dokumente
CREATE FUNCTION [dbo].[FNCUST_SET_PM_CONTROL_DATA_PROFILEID_10] (
@Mandant VARCHAR(200), -- = '{#CTRL#CMB_Mandant}'
@BelegNr VARCHAR(200) -- = '{#CTRL#LU_NAV-Nr.}'
)
RETURNS @vTB_RESULT TABLE ([Control2Set] [BIGINT] NOT NULL,
[Caption] [VARCHAR](max) NOT NULL,
[BackgroundColor] [VARCHAR](50) NOT NULL,
[FontColor] [VARCHAR](50) NOT NULL)
AS
BEGIN
DECLARE @ControlFremdreferenz_1 Varchar(10) = '427',
@ControlZahlungsart Varchar(10) = '435',
@ControlRechnungssummeBrutto Varchar(10) = '584',
@ControlSkontoRabattProzent Varchar(10) = '585',
@ControlSkontoRabattWert Varchar(10) = '590',
@ControlRechnungssummeBruttoAbzglSkontoRabatt Varchar(10) = '591';
DECLARE @Fremdreferenz_1 Varchar(200) = NULL,
@Zahlungsart Varchar(200) = NULL,
@RechnungssummeBrutto Varchar(200) = NULL,
@SkontoRabattProzent Varchar(200) = NULL,
@SkontoRabattWert Varchar(200) = NULL,
@RechnungssummeBruttoAbzglSkontoRabatt Varchar(200) = NULL;
----------------------------------------------------------------------------------------------------------------------------------
SELECT @Fremdreferenz_1 = [Ex. Rech-Nr.],
@Zahlungsart = [Payment Method Code], -- ÜBW-K oder ABB-K
@RechnungssummeBrutto = Replace([Gesamtbetrag],'.',','),
@SkontoRabattProzent = Replace([Skonto/Rabatt Prozent],'.',','),
@SkontoRabattWert = Replace([Skonto/Rabatt Wert],'.',','),
@RechnungssummeBruttoAbzglSkontoRabatt = Replace([Gesamtbetrag (brutto) abzgl. Skonto/Rabatt],'.',',')
FROM [VWCUST_NAVISION_PURCHASE_HEADER]
WHERE [Mandant] = @Mandant --SWB-Netz
AND [Belegnummer] = @BelegNr --ER21-1986
----------------------------------------------------------------------------------------------------------------------------------
INSERT INTO @vTB_RESULT ([Control2Set], [Caption], [BackgroundColor], [FontColor])
SELECT @ControlFremdreferenz_1 as Control2Set, @Fremdreferenz_1 as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlZahlungsart as Control2Set, @Zahlungsart as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlRechnungssummeBrutto as Control2Set, @RechnungssummeBrutto as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlSkontoRabattProzent as Control2Set, @SkontoRabattProzent as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlSkontoRabattWert as Control2Set, @SkontoRabattWert as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlRechnungssummeBruttoAbzglSkontoRabatt as Control2Set, @RechnungssummeBruttoAbzglSkontoRabatt as Caption, '' as BackgroundColor, '' as FontColor
RETURN;
END
GO

78
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_SET_PM_CONTROL_DATA_PROFILEID_3].sql Normal file
View File

@ -0,0 +1,78 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_SET_PM_CONTROL_DATA_PROFILEID_3] Script Date: 21.03.2024 17:25:39 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Setze Werte in anderen Feldern anhand der Auswahl der NAV Nummer
-- Stand: MK // 27.10.2021
-- 27.10.2021 Initial
-- PM Profil: SWB - ER 3.0 - Zuweisung und Vorprüfung durch die FiBu
CREATE FUNCTION [dbo].[FNCUST_SET_PM_CONTROL_DATA_PROFILEID_3] (
@Mandant VARCHAR(200), -- = '{#CTRL#CMB_Mandant}'
@BelegNr VARCHAR(200) -- = '{#CTRL#LU_NAV-Nr.}'
)
RETURNS @vTB_RESULT TABLE ([Control2Set] [BIGINT] NOT NULL,
[Caption] [VARCHAR](max) NOT NULL,
[BackgroundColor] [VARCHAR](50) NOT NULL,
[FontColor] [VARCHAR](50) NOT NULL)
AS
BEGIN
DECLARE @ControlFremdreferenz_1 Varchar(10) = '208',
@ControlZahlungsart Varchar(10) = '396',
@ControlRechnungssummeBrutto Varchar(10) = '548',
@ControlSkontoRabattProzent Varchar(10) = '549',
@ControlSkontoRabattWert Varchar(10) = '554',
@ControlRechnungssummeBruttoAbzglSkontoRabatt Varchar(10) = '555';
DECLARE @Fremdreferenz_1 Varchar(200) = NULL,
@Zahlungsart Varchar(200) = NULL,
@RechnungssummeBrutto Varchar(200) = NULL,
@SkontoRabattProzent Varchar(200) = NULL,
@SkontoRabattWert Varchar(200) = NULL,
@RechnungssummeBruttoAbzglSkontoRabatt Varchar(200) = NULL;
----------------------------------------------------------------------------------------------------------------------------------
SELECT @Fremdreferenz_1 = [Ex. Rech-Nr.],
@Zahlungsart = [Payment Method Code], -- ÜBW-K oder ABB-K
@RechnungssummeBrutto = Replace([Gesamtbetrag],'.',','),
@SkontoRabattProzent = Replace([Skonto/Rabatt Prozent],'.',','),
@SkontoRabattWert = Replace([Skonto/Rabatt Wert],'.',','),
@RechnungssummeBruttoAbzglSkontoRabatt = Replace([Gesamtbetrag (brutto) abzgl. Skonto/Rabatt],'.',',')
FROM [VWCUST_NAVISION_PURCHASE_HEADER]
WHERE [Mandant] = @Mandant --SWB-Netz
AND [Belegnummer] = @BelegNr --ER21-1986
----------------------------------------------------------------------------------------------------------------------------------
INSERT INTO @vTB_RESULT ([Control2Set], [Caption], [BackgroundColor], [FontColor])
SELECT @ControlFremdreferenz_1 as Control2Set, @Fremdreferenz_1 as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlZahlungsart as Control2Set, @Zahlungsart as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlRechnungssummeBrutto as Control2Set, @RechnungssummeBrutto as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlSkontoRabattProzent as Control2Set, @SkontoRabattProzent as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlSkontoRabattWert as Control2Set, @SkontoRabattWert as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlRechnungssummeBruttoAbzglSkontoRabatt as Control2Set, @RechnungssummeBruttoAbzglSkontoRabatt as Caption, '' as BackgroundColor, '' as FontColor
RETURN;
END
GO

78
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_SET_PM_CONTROL_DATA_PROFILEID_4].sql Normal file
View File

@ -0,0 +1,78 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_SET_PM_CONTROL_DATA_PROFILEID_4] Script Date: 21.03.2024 17:26:16 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Setze Werte in anderen Feldern anhand der Auswahl der NAV Nummer
-- Stand: MK // 27.10.2021
-- 27.10.2021 Initial
-- PM Profil: SWB - ER 4.0 - Prüfung durch die Fachabteilung
CREATE FUNCTION [dbo].[FNCUST_SET_PM_CONTROL_DATA_PROFILEID_4] (
@Mandant VARCHAR(200), -- = '{#CTRL#CMB_Mandant}'
@BelegNr VARCHAR(200) -- = '{#CTRL#LU_NAV-Nr.}'
)
RETURNS @vTB_RESULT TABLE ([Control2Set] [BIGINT] NOT NULL,
[Caption] [VARCHAR](max) NOT NULL,
[BackgroundColor] [VARCHAR](50) NOT NULL,
[FontColor] [VARCHAR](50) NOT NULL)
AS
BEGIN
DECLARE @ControlFremdreferenz_1 Varchar(10) = '219',
@ControlZahlungsart Varchar(10) = '434',
@ControlRechnungssummeBrutto Varchar(10) = '572',
@ControlSkontoRabattProzent Varchar(10) = '573',
@ControlSkontoRabattWert Varchar(10) = '578',
@ControlRechnungssummeBruttoAbzglSkontoRabatt Varchar(10) = '579';
DECLARE @Fremdreferenz_1 Varchar(200) = NULL,
@Zahlungsart Varchar(200) = NULL,
@RechnungssummeBrutto Varchar(200) = NULL,
@SkontoRabattProzent Varchar(200) = NULL,
@SkontoRabattWert Varchar(200) = NULL,
@RechnungssummeBruttoAbzglSkontoRabatt Varchar(200) = NULL;
----------------------------------------------------------------------------------------------------------------------------------
SELECT @Fremdreferenz_1 = [Ex. Rech-Nr.],
@Zahlungsart = [Payment Method Code], -- ÜBW-K oder ABB-K
@RechnungssummeBrutto = Replace([Gesamtbetrag],'.',','),
@SkontoRabattProzent = Replace([Skonto/Rabatt Prozent],'.',','),
@SkontoRabattWert = Replace([Skonto/Rabatt Wert],'.',','),
@RechnungssummeBruttoAbzglSkontoRabatt = Replace([Gesamtbetrag (brutto) abzgl. Skonto/Rabatt],'.',',')
FROM [VWCUST_NAVISION_PURCHASE_HEADER]
WHERE [Mandant] = @Mandant --SWB-Netz
AND [Belegnummer] = @BelegNr --ER21-1986
----------------------------------------------------------------------------------------------------------------------------------
INSERT INTO @vTB_RESULT ([Control2Set], [Caption], [BackgroundColor], [FontColor])
SELECT @ControlFremdreferenz_1 as Control2Set, @Fremdreferenz_1 as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlZahlungsart as Control2Set, @Zahlungsart as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlRechnungssummeBrutto as Control2Set, @RechnungssummeBrutto as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlSkontoRabattProzent as Control2Set, @SkontoRabattProzent as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlSkontoRabattWert as Control2Set, @SkontoRabattWert as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlRechnungssummeBruttoAbzglSkontoRabatt as Control2Set, @RechnungssummeBruttoAbzglSkontoRabatt as Caption, '' as BackgroundColor, '' as FontColor
RETURN;
END
GO

78
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_SET_PM_CONTROL_DATA_PROFILEID_5].sql Normal file
View File

@ -0,0 +1,78 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_SET_PM_CONTROL_DATA_PROFILEID_5] Script Date: 21.03.2024 17:26:47 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Setze Werte in anderen Feldern anhand der Auswahl der NAV Nummer
-- Stand: MK // 27.10.2021
-- 27.10.2021 Initial
-- PM Profil: SWB - ER 5.0 - Buchung und Zahlung durch die FiBu
CREATE FUNCTION [dbo].[FNCUST_SET_PM_CONTROL_DATA_PROFILEID_5] (
@Mandant VARCHAR(200), -- = '{#CTRL#CMB_Mandant}'
@BelegNr VARCHAR(200) -- = '{#CTRL#LU_NAV-Nr.}'
)
RETURNS @vTB_RESULT TABLE ([Control2Set] [BIGINT] NOT NULL,
[Caption] [VARCHAR](max) NOT NULL,
[BackgroundColor] [VARCHAR](50) NOT NULL,
[FontColor] [VARCHAR](50) NOT NULL)
AS
BEGIN
DECLARE @ControlFremdreferenz_1 Varchar(10) = '229',
@ControlZahlungsart Varchar(10) = '436',
@ControlRechnungssummeBrutto Varchar(10) = '596',
@ControlSkontoRabattProzent Varchar(10) = '597',
@ControlSkontoRabattWert Varchar(10) = '602',
@ControlRechnungssummeBruttoAbzglSkontoRabatt Varchar(10) = '603';
DECLARE @Fremdreferenz_1 Varchar(200) = NULL,
@Zahlungsart Varchar(200) = NULL,
@RechnungssummeBrutto Varchar(200) = NULL,
@SkontoRabattProzent Varchar(200) = NULL,
@SkontoRabattWert Varchar(200) = NULL,
@RechnungssummeBruttoAbzglSkontoRabatt Varchar(200) = NULL;
----------------------------------------------------------------------------------------------------------------------------------
SELECT @Fremdreferenz_1 = [Ex. Rech-Nr.],
@Zahlungsart = [Payment Method Code], -- ÜBW-K oder ABB-K
@RechnungssummeBrutto = Replace([Gesamtbetrag],'.',','),
@SkontoRabattProzent = Replace([Skonto/Rabatt Prozent],'.',','),
@SkontoRabattWert = Replace([Skonto/Rabatt Wert],'.',','),
@RechnungssummeBruttoAbzglSkontoRabatt = Replace([Gesamtbetrag (brutto) abzgl. Skonto/Rabatt],'.',',')
FROM [VWCUST_NAVISION_PURCHASE_HEADER]
WHERE [Mandant] = @Mandant --SWB-Netz
AND [Belegnummer] = @BelegNr --ER21-1986
----------------------------------------------------------------------------------------------------------------------------------
INSERT INTO @vTB_RESULT ([Control2Set], [Caption], [BackgroundColor], [FontColor])
SELECT @ControlFremdreferenz_1 as Control2Set, @Fremdreferenz_1 as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlZahlungsart as Control2Set, @Zahlungsart as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlRechnungssummeBrutto as Control2Set, @RechnungssummeBrutto as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlSkontoRabattProzent as Control2Set, @SkontoRabattProzent as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlSkontoRabattWert as Control2Set, @SkontoRabattWert as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlRechnungssummeBruttoAbzglSkontoRabatt as Control2Set, @RechnungssummeBruttoAbzglSkontoRabatt as Caption, '' as BackgroundColor, '' as FontColor
RETURN;
END
GO

78
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_SET_PM_CONTROL_DATA_PROFILEID_6].sql Normal file
View File

@ -0,0 +1,78 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_SET_PM_CONTROL_DATA_PROFILEID_6] Script Date: 21.03.2024 17:27:13 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Setze Werte in anderen Feldern anhand der Auswahl der NAV Nummer
-- Stand: MK // 27.10.2021
-- 27.10.2021 Initial
-- PM Profil: SWB - ER 5.1 - Buchung und Zahlung durch die FiBu - Angehaltende Dokumente
CREATE FUNCTION [dbo].[FNCUST_SET_PM_CONTROL_DATA_PROFILEID_6] (
@Mandant VARCHAR(200), -- = '{#CTRL#CMB_Mandant}'
@BelegNr VARCHAR(200) -- = '{#CTRL#LU_NAV-Nr.}'
)
RETURNS @vTB_RESULT TABLE ([Control2Set] [BIGINT] NOT NULL,
[Caption] [VARCHAR](max) NOT NULL,
[BackgroundColor] [VARCHAR](50) NOT NULL,
[FontColor] [VARCHAR](50) NOT NULL)
AS
BEGIN
DECLARE @ControlFremdreferenz_1 Varchar(10) = '269',
@ControlZahlungsart Varchar(10) = '437',
@ControlRechnungssummeBrutto Varchar(10) = '608',
@ControlSkontoRabattProzent Varchar(10) = '609',
@ControlSkontoRabattWert Varchar(10) = '614',
@ControlRechnungssummeBruttoAbzglSkontoRabatt Varchar(10) = '615';
DECLARE @Fremdreferenz_1 Varchar(200) = NULL,
@Zahlungsart Varchar(200) = NULL,
@RechnungssummeBrutto Varchar(200) = NULL,
@SkontoRabattProzent Varchar(200) = NULL,
@SkontoRabattWert Varchar(200) = NULL,
@RechnungssummeBruttoAbzglSkontoRabatt Varchar(200) = NULL;
----------------------------------------------------------------------------------------------------------------------------------
SELECT @Fremdreferenz_1 = [Ex. Rech-Nr.],
@Zahlungsart = [Payment Method Code], -- ÜBW-K oder ABB-K
@RechnungssummeBrutto = Replace([Gesamtbetrag],'.',','),
@SkontoRabattProzent = Replace([Skonto/Rabatt Prozent],'.',','),
@SkontoRabattWert = Replace([Skonto/Rabatt Wert],'.',','),
@RechnungssummeBruttoAbzglSkontoRabatt = Replace([Gesamtbetrag (brutto) abzgl. Skonto/Rabatt],'.',',')
FROM [VWCUST_NAVISION_PURCHASE_HEADER]
WHERE [Mandant] = @Mandant --SWB-Netz
AND [Belegnummer] = @BelegNr --ER21-1986
----------------------------------------------------------------------------------------------------------------------------------
INSERT INTO @vTB_RESULT ([Control2Set], [Caption], [BackgroundColor], [FontColor])
SELECT @ControlFremdreferenz_1 as Control2Set, @Fremdreferenz_1 as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlZahlungsart as Control2Set, @Zahlungsart as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlRechnungssummeBrutto as Control2Set, @RechnungssummeBrutto as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlSkontoRabattProzent as Control2Set, @SkontoRabattProzent as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlSkontoRabattWert as Control2Set, @SkontoRabattWert as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlRechnungssummeBruttoAbzglSkontoRabatt as Control2Set, @RechnungssummeBruttoAbzglSkontoRabatt as Caption, '' as BackgroundColor, '' as FontColor
RETURN;
END
GO

78
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_SET_PM_CONTROL_DATA_PROFILEID_9].sql Normal file
View File

@ -0,0 +1,78 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_SET_PM_CONTROL_DATA_PROFILEID_9] Script Date: 21.03.2024 17:27:37 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Setze Werte in anderen Feldern anhand der Auswahl der NAV Nummer
-- Stand: MK // 27.10.2021
-- 27.10.2021 Initial
-- PM Profil: SWB - ER 5.2 - Buchung durch die FiBu und Abbuchung durch den Kreditor
CREATE FUNCTION [dbo].[FNCUST_SET_PM_CONTROL_DATA_PROFILEID_9] (
@Mandant VARCHAR(200), -- = '{#CTRL#CMB_Mandant}'
@BelegNr VARCHAR(200) -- = '{#CTRL#LU_NAV-Nr.}'
)
RETURNS @vTB_RESULT TABLE ([Control2Set] [BIGINT] NOT NULL,
[Caption] [VARCHAR](max) NOT NULL,
[BackgroundColor] [VARCHAR](50) NOT NULL,
[FontColor] [VARCHAR](50) NOT NULL)
AS
BEGIN
DECLARE @ControlFremdreferenz_1 Varchar(10) = '387',
@ControlZahlungsart Varchar(10) = '438',
@ControlRechnungssummeBrutto Varchar(10) = '620',
@ControlSkontoRabattProzent Varchar(10) = '621',
@ControlSkontoRabattWert Varchar(10) = '626',
@ControlRechnungssummeBruttoAbzglSkontoRabatt Varchar(10) = '627';
DECLARE @Fremdreferenz_1 Varchar(200) = NULL,
@Zahlungsart Varchar(200) = NULL,
@RechnungssummeBrutto Varchar(200) = NULL,
@SkontoRabattProzent Varchar(200) = NULL,
@SkontoRabattWert Varchar(200) = NULL,
@RechnungssummeBruttoAbzglSkontoRabatt Varchar(200) = NULL;
----------------------------------------------------------------------------------------------------------------------------------
SELECT @Fremdreferenz_1 = [Ex. Rech-Nr.],
@Zahlungsart = [Payment Method Code], -- ÜBW-K oder ABB-K
@RechnungssummeBrutto = Replace([Gesamtbetrag],'.',','),
@SkontoRabattProzent = Replace([Skonto/Rabatt Prozent],'.',','),
@SkontoRabattWert = Replace([Skonto/Rabatt Wert],'.',','),
@RechnungssummeBruttoAbzglSkontoRabatt = Replace([Gesamtbetrag (brutto) abzgl. Skonto/Rabatt],'.',',')
FROM [VWCUST_NAVISION_PURCHASE_HEADER]
WHERE [Mandant] = @Mandant --SWB-Netz
AND [Belegnummer] = @BelegNr --ER21-1986
----------------------------------------------------------------------------------------------------------------------------------
INSERT INTO @vTB_RESULT ([Control2Set], [Caption], [BackgroundColor], [FontColor])
SELECT @ControlFremdreferenz_1 as Control2Set, @Fremdreferenz_1 as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlZahlungsart as Control2Set, @Zahlungsart as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlRechnungssummeBrutto as Control2Set, @RechnungssummeBrutto as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlSkontoRabattProzent as Control2Set, @SkontoRabattProzent as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlSkontoRabattWert as Control2Set, @SkontoRabattWert as Caption, '' as BackgroundColor, '' as FontColor
UNION
SELECT @ControlRechnungssummeBruttoAbzglSkontoRabatt as Control2Set, @RechnungssummeBruttoAbzglSkontoRabatt as Caption, '' as BackgroundColor, '' as FontColor
RETURN;
END
GO

30
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_SET_PM_DECISION_LIST_PROFILEID_10].sql Normal file
View File

@ -0,0 +1,30 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_SET_PM_DECISION_LIST_PROFILEID_10] Script Date: 21.03.2024 17:28:44 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Erzeugung der Auswahlliste für die Benutzer Entscheidung (String32 / Status-Detail)
-- Stand: MK // 03.10.2021
create FUNCTION [dbo].[FNCUST_SET_PM_DECISION_LIST_PROFILEID_10] (
)
RETURNS TABLE
AS
RETURN
----------------------------------------------------------------------------------------------------------------------------------
SELECT 'Bestätigt' as 'Entscheidung'
--order by 'Entscheidung' desc
----------------------------------------------------------------------------------------------------------------------------------
GO

40
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_SET_PM_DECISION_LIST_PROFILEID_11].sql Normal file
View File

@ -0,0 +1,40 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_SET_PM_DECISION_LIST_PROFILEID_11] Script Date: 21.03.2024 17:29:14 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Erzeugung der Auswahlliste für die Benutzer Entscheidung (String32 / Status-Detail)
-- Stand: MK // 29.09.2021
CREATE FUNCTION [dbo].[FNCUST_SET_PM_DECISION_LIST_PROFILEID_11] (
)
RETURNS TABLE
AS
RETURN
----------------------------------------------------------------------------------------------------------------------------------
SELECT 'Abgelehnt (FINAL)' as 'Entscheidung'
UNION
SELECT 'Abgelehnt - Neue Rechnung angefordert'
--UNION
--SELECT 'Zurück zu: ER 2.0 - Durchsicht der Geschäftsführung'
--UNION
--SELECT 'Zurück zu: ER 3.0 - Zuweisung und Vorprüfung durch die FiBu'
--UNION
--SELECT 'Zurück zu: ER 4.0 - Prüfung durch die Fachabteilung'
--UNION
--SELECT 'Zurück zu: ER 5.0 - Prüfung und Kontierung durch die FiBu'
--order by 'Entscheidung' desc
----------------------------------------------------------------------------------------------------------------------------------
GO

35
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_SET_PM_DECISION_LIST_PROFILEID_14].sql Normal file
View File

@ -0,0 +1,35 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_SET_PM_DECISION_LIST_PROFILEID_14] Script Date: 21.03.2024 17:29:42 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Erzeugung der Auswahlliste für die Benutzer Entscheidung (String32 / Status-Detail)
-- Stand: MK // 22.09.2021
CREATE FUNCTION [dbo].[FNCUST_SET_PM_DECISION_LIST_PROFILEID_14] (
)
RETURNS TABLE
AS
RETURN
----------------------------------------------------------------------------------------------------------------------------------
SELECT 'Bestätigt' as 'Entscheidung'
--UNION
--SELECT 'Angehalten'
--UNION
--SELECT 'Abgelehnt'
--order by 'Entscheidung' desc
----------------------------------------------------------------------------------------------------------------------------------
GO

38
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_SET_PM_DECISION_LIST_PROFILEID_15].sql Normal file
View File

@ -0,0 +1,38 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_SET_PM_DECISION_LIST_PROFILEID_15] Script Date: 21.03.2024 17:30:10 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Erzeugung der Auswahlliste für die Benutzer Entscheidung (String32 / Status-Detail)
-- Stand: MK // 05.11.2021
CREATE FUNCTION [dbo].[FNCUST_SET_PM_DECISION_LIST_PROFILEID_15] (
)
RETURNS TABLE
AS
RETURN
----------------------------------------------------------------------------------------------------------------------------------
SELECT 'Bestätigt' as 'Entscheidung'
--UNION
--SELECT 'Abgelehnt'
--UNION
--SELECT 'Abgelehnt - Neue Rechnung angefordert'
--UNION
--SELECT 'Falscher Prüfer ausgewählt'
--order by 'Entscheidung' desc
----------------------------------------------------------------------------------------------------------------------------------
GO

33
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_SET_PM_DECISION_LIST_PROFILEID_16].sql Normal file
View File

@ -0,0 +1,33 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_SET_PM_DECISION_LIST_PROFILEID_16] Script Date: 21.03.2024 17:30:35 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Erzeugung der Auswahlliste für die Benutzer Entscheidung (String32 / Status-Detail)
-- Stand: MK // 22.09.2021
create FUNCTION [dbo].[FNCUST_SET_PM_DECISION_LIST_PROFILEID_16] (
)
RETURNS TABLE
AS
RETURN
----------------------------------------------------------------------------------------------------------------------------------
SELECT 'Bestätigt' as 'Entscheidung'
--UNION
--SELECT 'Abgelehnt'
--order by 'Entscheidung' desc
----------------------------------------------------------------------------------------------------------------------------------
GO

35
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_SET_PM_DECISION_LIST_PROFILEID_17].sql Normal file
View File

@ -0,0 +1,35 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_SET_PM_DECISION_LIST_PROFILEID_17] Script Date: 21.03.2024 17:31:07 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Erzeugung der Auswahlliste für die Benutzer Entscheidung (String32 / Status-Detail)
-- Stand: MK // 27.01.2022
create FUNCTION [dbo].[FNCUST_SET_PM_DECISION_LIST_PROFILEID_17] (
)
RETURNS TABLE
AS
RETURN
----------------------------------------------------------------------------------------------------------------------------------
SELECT 'Bestätigt' as 'Entscheidung'
--UNION
--SELECT 'Abgelehnt'
--order by 'Entscheidung' desc
----------------------------------------------------------------------------------------------------------------------------------
GO

32
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_SET_PM_DECISION_LIST_PROFILEID_1].sql Normal file
View File

@ -0,0 +1,32 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_SET_PM_DECISION_LIST_PROFILEID_1] Script Date: 21.03.2024 17:28:18 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Erzeugung der Auswahlliste für die Benutzer Entscheidung (String32 / Status-Detail)
-- Stand: MK // 22.09.2021
CREATE FUNCTION [dbo].[FNCUST_SET_PM_DECISION_LIST_PROFILEID_1] (
)
RETURNS TABLE
AS
RETURN
----------------------------------------------------------------------------------------------------------------------------------
SELECT 'Bestätigt' as 'Entscheidung'
UNION
SELECT 'Abgelehnt'
--order by 'Entscheidung' desc
----------------------------------------------------------------------------------------------------------------------------------
GO

32
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_SET_PM_DECISION_LIST_PROFILEID_2].sql Normal file
View File

@ -0,0 +1,32 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_SET_PM_DECISION_LIST_PROFILEID_2] Script Date: 21.03.2024 17:31:31 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Erzeugung der Auswahlliste für die Benutzer Entscheidung (String32 / Status-Detail)
-- Stand: MK // 22.09.2021
CREATE FUNCTION [dbo].[FNCUST_SET_PM_DECISION_LIST_PROFILEID_2] (
)
RETURNS TABLE
AS
RETURN
----------------------------------------------------------------------------------------------------------------------------------
SELECT 'Bestätigt' as 'Entscheidung'
UNION
SELECT 'Abgelehnt'
--order by 'Entscheidung' desc
----------------------------------------------------------------------------------------------------------------------------------
GO

38
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_SET_PM_DECISION_LIST_PROFILEID_3].sql Normal file
View File

@ -0,0 +1,38 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_SET_PM_DECISION_LIST_PROFILEID_3] Script Date: 21.03.2024 17:31:58 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Erzeugung der Auswahlliste für die Benutzer Entscheidung (String32 / Status-Detail)
-- Stand: MK // 22.09.2021
CREATE FUNCTION [dbo].[FNCUST_SET_PM_DECISION_LIST_PROFILEID_3] (
)
RETURNS TABLE
AS
RETURN
----------------------------------------------------------------------------------------------------------------------------------
SELECT 'Bestätigt' as 'Entscheidung'
UNION
SELECT 'Abgelehnt'
--UNION
--SELECT 'Abgelehnt - falsche Fimierung'
--UNION
--SELECT 'Abgelehnt - falscher MwSt Satz'
--UNION
--SELECT 'Abgelehnt - Neue Rechnung angefordert'
--order by 'Entscheidung' desc
----------------------------------------------------------------------------------------------------------------------------------
GO

36
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_SET_PM_DECISION_LIST_PROFILEID_4].sql Normal file
View File

@ -0,0 +1,36 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_SET_PM_DECISION_LIST_PROFILEID_4] Script Date: 21.03.2024 17:32:32 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Erzeugung der Auswahlliste für die Benutzer Entscheidung (String32 / Status-Detail)
-- Stand: MK // 22.09.2021
CREATE FUNCTION [dbo].[FNCUST_SET_PM_DECISION_LIST_PROFILEID_4] (
)
RETURNS TABLE
AS
RETURN
----------------------------------------------------------------------------------------------------------------------------------
SELECT 'Bestätigt' as 'Entscheidung'
UNION
SELECT 'Abgelehnt'
UNION
--SELECT 'Abgelehnt - Neue Rechnung angefordert'
--UNION
SELECT 'Falscher Prüfer ausgewählt'
--order by 'Entscheidung' desc
----------------------------------------------------------------------------------------------------------------------------------
GO

33
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_SET_PM_DECISION_LIST_PROFILEID_5].sql Normal file
View File

@ -0,0 +1,33 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_SET_PM_DECISION_LIST_PROFILEID_5] Script Date: 21.03.2024 17:34:03 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Erzeugung der Auswahlliste für die Benutzer Entscheidung (String32 / Status-Detail)
-- Stand: MK // 22.09.2021
CREATE FUNCTION [dbo].[FNCUST_SET_PM_DECISION_LIST_PROFILEID_5] (
)
RETURNS TABLE
AS
RETURN
----------------------------------------------------------------------------------------------------------------------------------
SELECT 'Bestätigt' as 'Entscheidung'
UNION
SELECT 'Angehalten'
UNION
SELECT 'Abgelehnt'
--order by 'Entscheidung' desc
----------------------------------------------------------------------------------------------------------------------------------
GO

31
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_SET_PM_DECISION_LIST_PROFILEID_6].sql Normal file
View File

@ -0,0 +1,31 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_SET_PM_DECISION_LIST_PROFILEID_6] Script Date: 21.03.2024 17:34:31 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Erzeugung der Auswahlliste für die Benutzer Entscheidung (String32 / Status-Detail)
-- Stand: MK // 22.09.2021
create FUNCTION [dbo].[FNCUST_SET_PM_DECISION_LIST_PROFILEID_6] (
)
RETURNS TABLE
AS
RETURN
----------------------------------------------------------------------------------------------------------------------------------
SELECT 'Bestätigt' as 'Entscheidung'
UNION
SELECT 'Abgelehnt'
--order by 'Entscheidung' desc
----------------------------------------------------------------------------------------------------------------------------------
GO

33
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_SET_PM_DECISION_LIST_PROFILEID_9].sql Normal file
View File

@ -0,0 +1,33 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_SET_PM_DECISION_LIST_PROFILEID_9] Script Date: 21.03.2024 17:35:00 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Erzeugung der Auswahlliste für die Benutzer Entscheidung (String32 / Status-Detail)
-- Stand: MK // 22.09.2021
create FUNCTION [dbo].[FNCUST_SET_PM_DECISION_LIST_PROFILEID_9] (
)
RETURNS TABLE
AS
RETURN
----------------------------------------------------------------------------------------------------------------------------------
SELECT 'Bestätigt' as 'Entscheidung'
--UNION
--SELECT 'Angehalten'
--UNION
--SELECT 'Abgelehnt'
--order by 'Entscheidung' desc
----------------------------------------------------------------------------------------------------------------------------------
GO

79
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_SET_PM_FINAL_INDEX_PROFILEID_16].sql Normal file
View File

@ -0,0 +1,79 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_SET_PM_FINAL_INDEX_PROFILEID_16] Script Date: 21.03.2024 17:35:30 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Prüfung ob die eingetragenen finalen Freigeber auch unterschrieben haben
-- Stand: MK // 10.11.2021
-- PM Profil: SWB - ER 6.0 - Terminüberweisung - Finale Freigabe
CREATE FUNCTION [dbo].[FNCUST_SET_PM_FINAL_INDEX_PROFILEID_16] (
@windreamDocID BIGINT, -- = '{#CTRL#TXT_Entscheidungs-Beschreibung}';
@windreamAttributFinalApprover INT = 10044, -- = Terminzahlung Finale Freigeber
@windreamAttributHistory INT = 10040 -- = Workflow-Historie
)
RETURNS @vTB_RESULT TABLE ([RESULT] [VARCHAR](50) NOT NULL)
AS
BEGIN
DECLARE @Result VARCHAR(50) = 'incomplete',
@ApproverMatch INT = 0,
@ApproverName VARCHAR(50) = NULL;
----------------------------------------------------------------------------------------------------------------------------------
-- Loop for every set approver
-- if approver was not found in history Table, retun 'incomplete'
DECLARE CURSOR_FINAL_APPROVER CURSOR FOR
SELECT [szValue] as 'ApproverName'
FROM [windream60].[dbo].[Vector]
WHERE [szValue] is not null
and [dwAttrID] = @windreamAttributFinalApprover
and [dwDocID] = @windreamDocID
OPEN CURSOR_FINAL_APPROVER
FETCH NEXT FROM CURSOR_FINAL_APPROVER INTO @ApproverName
WHILE @@FETCH_STATUS = 0
BEGIN
SELECT @ApproverMatch = count([szValue])
FROM [windream60].[dbo].[Vector]
WHERE [szValue] like (@ApproverName + '%ER 6.%Terminüberweisung%')
and [dwAttrID] = @windreamAttributHistory
and [dwDocID] = @windreamDocID
IF (@ApproverMatch = 0)
BEGIN
SET @Result = 'incomplete'
BREAK
END
ELSE
BEGIN
SET @Result = 'complete'
END
FETCH NEXT FROM CURSOR_FINAL_APPROVER INTO @ApproverName
END
CLOSE CURSOR_FINAL_APPROVER
DEALLOCATE CURSOR_FINAL_APPROVER
----------------------------------------------------------------------------------------------------------------------------------
INSERT INTO @vTB_RESULT ([RESULT])
VALUES (@Result)
RETURN;
END
GO

74
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_SET_PM_VIA_TC_RECURRING_DOCUMENTS].sql Normal file
View File

@ -0,0 +1,74 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_SET_PM_VIA_TC_RECURRING_DOCUMENTS] Script Date: 21.03.2024 17:36:12 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Table procedure to set recurring doc active again in workflow
-- Stand: MK // 31.10.2021
-- 31.10.2021 Initial
-- TC Profil: SWB_NI-DB_Eingangsrechnung-Daueranweisung
CREATE function [dbo].[FNCUST_SET_PM_VIA_TC_RECURRING_DOCUMENTS] (
@windreamDocID BIGINT, -- Test mit 730491
@windreamAttrID INT = 10042
)
RETURNS @vTB_RESULT TABLE ([RESULT] [TINYINT] NOT NULL)
AS
BEGIN
DECLARE @CurrentMonthID TINYINT,
@CurrentMonthName VARCHAR(20),
@BookingMonthName VARCHAR(20);
----------------------------------------------------------------------------------------------------------------------------------
-- Get current month name
SELECT @CurrentMonthName = FORMAT(GETDATE(),'MMMM')
-- Check if the real current month is in windream list of the file, if so go on
IF @CurrentMonthName in (SELECT [szValue] FROM [windream60].[dbo].[Vector] where dwAttrID = @windreamAttrID and dwDocId = @windreamDocID)
BEGIN
SELECT @BookingMonthName = FORMAT((SELECT CONVERT(DATETIME, convert(varchar(8),dwDate04)) FROM windream60.dbo.BaseAttributes where dwDocID = @windreamDocID),'MMMM')
-- Check if last export month is the current month, only if NOT go on
IF (@BookingMonthName <> @CurrentMonthName)
BEGIN
INSERT INTO @vTB_RESULT ([RESULT])
VALUES (1)
END
ELSE
BEGIN
INSERT INTO @vTB_RESULT ([RESULT])
VALUES (0)
END
END
ELSE
BEGIN
INSERT INTO @vTB_RESULT ([RESULT])
VALUES (0)
END
----------------------------------------------------------------------------------------------------------------------------------
RETURN;
END
GO

154
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_SET_TC_MOVE_AND_RENAME].sql Normal file
View File

@ -0,0 +1,154 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_SET_TC_MOVE_AND_RENAME] Script Date: 21.03.2024 17:36:35 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- TSQL Function to build target path and filename, for TC Move and Rename
-- Stand: MK // 05.11.2021
CREATE FUNCTION [dbo].[FNCUST_SET_TC_MOVE_AND_RENAME] (
@pDOCID BIGINT
)
RETURNS @vTB_RESULT TABLE ([PATH] [VARCHAR](max) NOT NULL,
[FILENAME] [VARCHAR](max) NOT NULL)
AS
BEGIN
DECLARE @DOCID BIGINT,
@ObjectTypeID BIGINT,
@ObjectTypeSeparator VARCHAR(1) = '-',
@ObjectTypeName VARCHAR(150),
@ImportTool VARCHAR(150),
@Mandator VARCHAR(150),
@DocumentType VARCHAR(150),
@DocumentTypeShort VARCHAR(150),
@CreditorNr VARCHAR(150),
@CreditorName VARCHAR(150),
@ExternalReference1 VARCHAR(150),
@InternalNr VARCHAR(150),
@CustomerNr VARCHAR(150),
@CustomerName VARCHAR(150),
@Path VARCHAR(MAX),
@Filename VARCHAR(MAX),
@FileExtension VARCHAR(5);
----------------------------------------------------------------------------------------------------------------------------------
-- Get Index data from doc --
SELECT @DOCID = [dwDocID],
@ObjectTypeID = [dwObjectTypeID],
@CreditorName = [szText08],
@CustomerName = IIF([szText09] IS NULL, 'Kein Ergebnis', [szText09]),
@ExternalReference1 = [szText19],
@ImportTool = [szText28],
@Mandator = [szText31],
@InternalNr = [szText36],
@DocumentType = [szText37],
@CreditorNr = [szText38],
@CustomerNr = IIF([szText39] IS NULL, 'Kein Ergebnis', [szText39]),
@FileExtension = [szFile_Ext]
FROM [windream60].[dbo].[BaseAttributes]
WHERE [dwDocID] = @pDOCID
AND [dwCatalogID] = 1 -- Only Files
AND ([szText33] is NULL OR [szText33] = 'erledigt') -- Only Files which are done processing
----------------------------------------------------------------------------------------------------------------------------------
-- Get windream Objecttype name --
SELECT @ObjectTypeName = [szDocTypeName]
FROM [windream60].[dbo].[ObjectType]
WHERE [dwObjectTypeID] = @ObjectTypeID
----------------------------------------------------------------------------------------------------------------------------------
-- Clean windream Objecttype name --
SELECT @ObjectTypeName = RTRIM(LTRIM([Item]))
FROM [FNCUST_SPLIT_STRING_WITH_GUID](@ObjectTypeName,@ObjectTypeSeparator)
WHERE [GUID] = (SELECT max([GUID])
FROM [FNCUST_SPLIT_STRING_WITH_GUID](@ObjectTypeName,@ObjectTypeSeparator))
----------------------------------------------------------------------------------------------------------------------------------
-- Build path --
IF (LEN(@ObjectTypeName) > 1) AND (LEN(@ImportTool) > 1) AND (LEN(@Mandator) > 1) AND (LEN(@DocumentType) > 1)
BEGIN
SET @Path =
CASE
WHEN @ImportTool like '%GLOBIX%'OR @ImportTool like '%GLOBAL%'
THEN @Mandator + @ObjectTypeSeparator + @ObjectTypeName + '\Manually\File'
WHEN @ImportTool like '%Tool%'OR @ImportTool like '%Collection%'
THEN @Mandator + @ObjectTypeSeparator + @ObjectTypeName + '\DocumentProcessing\File'
END
-- Replace invalid chars
SET @Path = Replace(@Path,'/','')
SET @Path = Replace(@Path,':','')
SET @Path = Replace(@Path,'*','')
SET @Path = Replace(@Path,'?','')
SET @Path = Replace(@Path,'"','')
SET @Path = Replace(@Path,'<','')
SET @Path = Replace(@Path,'>','')
SET @Path = Replace(@Path,'|','')
END
----------------------------------------------------------------------------------------------------------------------------------
-- Find short names for Document Types (ONLY FOR FILENAME NOT THE PATH) --
SELECT TOP 1 @DocumentTypeShort = RTRIM(LTRIM([KURZNAME]))
FROM [TBDD_DOKUMENTART]
WHERE [AKTIV] = 1
AND ([BEZEICHNUNG] LIKE ('%' + @DocumentType + '%')
OR [BESCHREIBUNG] LIKE ('%' + @DocumentType + '%'))
IF (LEN(@DocumentTypeShort) < 2) -- Fallback
SET @DocumentTypeShort = @DocumentType
----------------------------------------------------------------------------------------------------------------------------------
-- Build filename --
IF ((LEN(@CreditorNr) > 1) AND (LEN(@CreditorName) > 1)) OR ((LEN(@CustomerNr) > 1) AND (LEN(@CustomerName) > 1)) AND (LEN(@FileExtension) > 1)
BEGIN
SET @Filename =
CASE
WHEN (LEN(@CreditorNr) > 1) AND (LEN(@CreditorName) > 1) AND (LEN(@InternalNr) > 1) AND (LEN(@ExternalReference1) > 1)
THEN @DocumentTypeShort + '_' + @InternalNr + '#' + @CreditorName + '_' + @ExternalReference1 + @FileExtension
WHEN (LEN(@CreditorNr) > 1) AND (LEN(@CreditorName) > 1) AND (LEN(@InternalNr) > 1)
THEN @DocumentTypeShort + '_' + @InternalNr + '#' + @CreditorName + @FileExtension
------------------------------------------------------------------------------------------------------------------
WHEN (LEN(@CustomerNr) > 1) AND (LEN(@CustomerName) > 1) AND (LEN(@InternalNr) > 1)
THEN @DocumentTypeShort + '_' + @InternalNr + '#' + @CustomerName + @FileExtension
END
-- Replace invalid chars
SET @Filename = Replace(@Filename,'\','')
SET @Filename = Replace(@Filename,'/','')
SET @Filename = Replace(@Filename,':','')
SET @Filename = Replace(@Filename,'*','')
SET @Filename = Replace(@Filename,'?','')
SET @Filename = Replace(@Filename,'"','')
SET @Filename = Replace(@Filename,'<','')
SET @Filename = Replace(@Filename,'>','')
SET @Filename = Replace(@Filename,'|','')
END
----------------------------------------------------------------------------------------------------------------------------------
INSERT INTO @vTB_RESULT ([PATH],[FILENAME])
VALUES (@Path, @Filename)
RETURN;
END
GO

154
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_SET_TC_MOVE_AND_RENAME_DEBUG].sql Normal file
View File

@ -0,0 +1,154 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_SET_TC_MOVE_AND_RENAME_DEBUG] Script Date: 21.03.2024 17:37:02 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- TSQL Function to build target path and filename, for TC Move and Rename
-- Stand: MK // 05.11.2021
CREATE FUNCTION [dbo].[FNCUST_SET_TC_MOVE_AND_RENAME_DEBUG] (
@pDOCID BIGINT
)
RETURNS @vTB_RESULT TABLE ([PATH] [VARCHAR](max) NOT NULL,
[FILENAME] [VARCHAR](max) NOT NULL)
AS
BEGIN
DECLARE @DOCID BIGINT,
@ObjectTypeID BIGINT,
@ObjectTypeSeparator VARCHAR(1) = '-',
@ObjectTypeName VARCHAR(150),
@ImportTool VARCHAR(150),
@Mandator VARCHAR(150),
@DocumentType VARCHAR(150),
@DocumentTypeShort VARCHAR(150),
@CreditorNr VARCHAR(150),
@CreditorName VARCHAR(150),
@ExternalReference1 VARCHAR(150),
@InternalNr VARCHAR(150),
@CustomerNr VARCHAR(150),
@CustomerName VARCHAR(150),
@Path VARCHAR(MAX),
@Filename VARCHAR(MAX),
@FileExtension VARCHAR(5);
----------------------------------------------------------------------------------------------------------------------------------
-- Get Index data from doc --
SELECT @DOCID = [dwDocID],
@ObjectTypeID = [dwObjectTypeID],
@CreditorName = [szText08],
@CustomerName = IIF([szText09] IS NULL, 'Kein Ergebnis', [szText09]),
@ExternalReference1 = [szText19],
@ImportTool = [szText28],
@Mandator = [szText31],
@InternalNr = [szText36],
@DocumentType = [szText37],
@CreditorNr = [szText38],
@CustomerNr = IIF([szText39] IS NULL, 'Kein Ergebnis', [szText39]),
@FileExtension = [szFile_Ext]
FROM [windream60].[dbo].[BaseAttributes]
WHERE [dwDocID] = @pDOCID
AND [dwCatalogID] = 1 -- Only Files
AND ([szText33] is NULL OR [szText33] = 'erledigt') -- Only Files which are done processing
----------------------------------------------------------------------------------------------------------------------------------
-- Get windream Objecttype name --
SELECT @ObjectTypeName = [szDocTypeName]
FROM [windream60].[dbo].[ObjectType]
WHERE [dwObjectTypeID] = @ObjectTypeID
----------------------------------------------------------------------------------------------------------------------------------
-- Clean windream Objecttype name --
SELECT @ObjectTypeName = RTRIM(LTRIM([Item]))
FROM [FNCUST_SPLIT_STRING_WITH_GUID](@ObjectTypeName,@ObjectTypeSeparator)
WHERE [GUID] = (SELECT max([GUID])
FROM [FNCUST_SPLIT_STRING_WITH_GUID](@ObjectTypeName,@ObjectTypeSeparator))
----------------------------------------------------------------------------------------------------------------------------------
-- Build path --
IF (LEN(@ObjectTypeName) > 1) AND (LEN(@ImportTool) > 1) AND (LEN(@Mandator) > 1) AND (LEN(@DocumentType) > 1)
BEGIN
SET @Path =
CASE
WHEN @ImportTool like '%GLOBIX%'OR @ImportTool like '%GLOBAL%'
THEN @Mandator + @ObjectTypeSeparator + @ObjectTypeName + '\Manually\File'
WHEN @ImportTool like '%Tool%'OR @ImportTool like '%Collection%'
THEN @Mandator + @ObjectTypeSeparator + @ObjectTypeName + '\DocumentProcessing\File'
END
-- Replace invalid chars
SET @Path = Replace(@Path,'/','')
SET @Path = Replace(@Path,':','')
SET @Path = Replace(@Path,'*','')
SET @Path = Replace(@Path,'?','')
SET @Path = Replace(@Path,'"','')
SET @Path = Replace(@Path,'<','')
SET @Path = Replace(@Path,'>','')
SET @Path = Replace(@Path,'|','')
END
----------------------------------------------------------------------------------------------------------------------------------
-- Find short names for Document Types (ONLY FOR FILENAME NOT THE PATH) --
SELECT TOP 1 @DocumentTypeShort = RTRIM(LTRIM([KURZNAME]))
FROM [TBDD_DOKUMENTART]
WHERE [AKTIV] = 1
AND ([BEZEICHNUNG] LIKE ('%' + @DocumentType + '%')
OR [BESCHREIBUNG] LIKE ('%' + @DocumentType + '%'))
IF (LEN(@DocumentTypeShort) < 2) -- Fallback
SET @DocumentTypeShort = @DocumentType
----------------------------------------------------------------------------------------------------------------------------------
-- Build filename --
IF ((LEN(@CreditorNr) > 1) AND (LEN(@CreditorName) > 1)) OR ((LEN(@CustomerNr) > 1) AND (LEN(@CustomerName) > 1)) AND (LEN(@FileExtension) > 1)
BEGIN
SET @Filename =
CASE
WHEN (LEN(@CreditorNr) > 1) AND (LEN(@CreditorName) > 1) AND (LEN(@InternalNr) > 1) AND (LEN(@ExternalReference1) > 1)
THEN @DocumentTypeShort + '_' + @InternalNr + '#' + @CreditorName + '_' + @ExternalReference1 + @FileExtension
WHEN (LEN(@CreditorNr) > 1) AND (LEN(@CreditorName) > 1) AND (LEN(@InternalNr) > 1)
THEN @DocumentTypeShort + '_' + @InternalNr + '#' + @CreditorName + @FileExtension
------------------------------------------------------------------------------------------------------------------
WHEN (LEN(@CustomerNr) > 1) AND (LEN(@CustomerName) > 1) AND (LEN(@InternalNr) > 1)
THEN @DocumentTypeShort + '_' + @InternalNr + '#' + @CustomerName + @FileExtension
END
-- Replace invalid chars
SET @Filename = Replace(@Filename,'\','')
SET @Filename = Replace(@Filename,'/','')
SET @Filename = Replace(@Filename,':','')
SET @Filename = Replace(@Filename,'*','')
SET @Filename = Replace(@Filename,'?','')
SET @Filename = Replace(@Filename,'"','')
SET @Filename = Replace(@Filename,'<','')
SET @Filename = Replace(@Filename,'>','')
SET @Filename = Replace(@Filename,'|','')
END
----------------------------------------------------------------------------------------------------------------------------------
INSERT INTO @vTB_RESULT ([PATH],[FILENAME])
VALUES (@Path, @Filename)
RETURN;
END
GO

45
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_SPLIT_STRING_WITH_GUID].sql Normal file
View File

@ -0,0 +1,45 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_SPLIT_STRING_WITH_GUID] Script Date: 21.03.2024 17:37:36 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- Stand: MK // 28.01.2021
-- Verwendet in Schleupen Schnittstelle und PM Monitoring
CREATE FUNCTION [dbo].[FNCUST_SPLIT_STRING_WITH_GUID] (
@Input NVARCHAR(MAX),
@Character CHAR(1)
)
RETURNS @Output TABLE (GUID INTEGER IDENTITY(1,1), Item NVARCHAR(1000))
AS
BEGIN
DECLARE @StartIndex INT, @EndIndex INT
SET @StartIndex = 1
IF SUBSTRING(@Input, LEN(@Input) - 1, LEN(@Input)) <> @Character
BEGIN
SET @Input = @Input + @Character
END
WHILE CHARINDEX(@Character, @Input) > 0
BEGIN
SET @EndIndex = CHARINDEX(@Character, @Input)
INSERT INTO @Output(Item)
SELECT SUBSTRING(@Input, @StartIndex, @EndIndex - 1)
SET @Input = SUBSTRING(@Input, @EndIndex + 1, LEN(@Input))
END
RETURN
END
GO

62
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_TEST_PM_USER_INPUT_PROFILEID_10].sql Normal file
View File

@ -0,0 +1,62 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_TEST_PM_USER_INPUT_PROFILEID_10] Script Date: 21.03.2024 17:38:32 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Prüfung diverser Werte und Eingaben bei Betätigung das Abschluss Buttons
-- Stand: MK // 29.09.2021
-- PM Profil: SWB - ER 4.1 - Auffangprofil für alle neu angeforderten Dokumente
create FUNCTION [dbo].[FNCUST_TEST_PM_USER_INPUT_PROFILEID_10] (
@Status_Detail VARCHAR(150), -- = '{#CTRL#DGV_Status-Detail}',
@Status_Detail_Text VARCHAR(200) -- = '{#CTRL#TXT_Entscheidungs-Beschreibung}';
)
RETURNS @vTB_TEST_RESULT TABLE ([MSGTYPE] [VARCHAR](max) NULL,
[QUESTION] [VARCHAR](max) NULL,
[TITLE] [VARCHAR](max) NULL)
AS
BEGIN
DECLARE @MSGTYPE VARCHAR(100) = 'Continue',
@QUESTION VARCHAR(300) = '',
@TITLE VARCHAR(100) = 'Bitte prüfen Sie Ihre Eingaben!';
----------------------------------------------------------------------------------------------------------------------------------
IF (@Status_Detail LIKE 'Abgelehnt%') and (LEN(@STATUS_DETAIL_TEXT) < 4) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Sie müssen eine Begründung eintragen (mind. 4 Zeichen)!'
END
ELSE IF (@Status_Detail not in (SELECT * from [FNCUST_SET_PM_DECISION_LIST_PROFILEID_10]())) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Bitte wählen Sie eine andere Entscheidung aus!'
END
ELSE
BEGIN
SET @MSGTYPE = 'Continue'
SET @QUESTION = ''
END
----------------------------------------------------------------------------------------------------------------------------------
INSERT INTO @vTB_TEST_RESULT ([MSGTYPE], [QUESTION], [TITLE])
VALUES (@MsgType, @QUESTION, @TITLE)
RETURN;
END
GO

62
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_TEST_PM_USER_INPUT_PROFILEID_11].sql Normal file
View File

@ -0,0 +1,62 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_TEST_PM_USER_INPUT_PROFILEID_11] Script Date: 21.03.2024 17:38:57 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Prüfung diverser Werte und Eingaben bei Betätigung das Abschluss Buttons
-- Stand: MK // 29.09.2021
-- PM Profil: SWB - ER 3.1 - Auffangprofil für alle abgelehnten Dokumente
CREATE FUNCTION [dbo].[FNCUST_TEST_PM_USER_INPUT_PROFILEID_11] (
@Status_Detail VARCHAR(150), -- = '{#CTRL#DGV_Status-Detail}',
@Status_Detail_Text VARCHAR(200) -- = '{#CTRL#TXT_Entscheidungs-Beschreibung}';
)
RETURNS @vTB_TEST_RESULT TABLE ([MSGTYPE] [VARCHAR](max) NULL,
[QUESTION] [VARCHAR](max) NULL,
[TITLE] [VARCHAR](max) NULL)
AS
BEGIN
DECLARE @MSGTYPE VARCHAR(100) = 'Continue',
@QUESTION VARCHAR(300) = '',
@TITLE VARCHAR(100) = 'Bitte prüfen Sie Ihre Eingaben!';
----------------------------------------------------------------------------------------------------------------------------------
IF (@Status_Detail LIKE 'Abgelehnt%') and (LEN(@STATUS_DETAIL_TEXT) < 4) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Sie müssen eine Begründung eintragen (mind. 4 Zeichen)!'
END
ELSE IF (@Status_Detail not in (SELECT * from [FNCUST_SET_PM_DECISION_LIST_PROFILEID_11]())) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Bitte wählen Sie eine andere Entscheidung aus!'
END
ELSE
BEGIN
SET @MSGTYPE = 'Continue'
SET @QUESTION = ''
END
----------------------------------------------------------------------------------------------------------------------------------
INSERT INTO @vTB_TEST_RESULT ([MSGTYPE], [QUESTION], [TITLE])
VALUES (@MsgType, @QUESTION, @TITLE)
RETURN;
END
GO

64
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_TEST_PM_USER_INPUT_PROFILEID_14].sql Normal file
View File

@ -0,0 +1,64 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_TEST_PM_USER_INPUT_PROFILEID_14] Script Date: 21.03.2024 17:39:22 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Prüfung diverser Werte und Eingaben bei Betätigung das Abschluss Buttons
-- Stand: MK // 29.09.2021
-- PM Profil: SWB - ER 5.3 - Buchung und Zahlung durch die FiBu - Daueranweisungen
CREATE FUNCTION [dbo].[FNCUST_TEST_PM_USER_INPUT_PROFILEID_14] (
@Status_Detail VARCHAR(150), -- = '{#CTRL#DGV_Status-Detail}',
@Status_Detail_Text VARCHAR(200) -- = '{#CTRL#TXT_Entscheidungs-Beschreibung}';
)
RETURNS @vTB_TEST_RESULT TABLE ([MSGTYPE] [VARCHAR](max) NULL,
[QUESTION] [VARCHAR](max) NULL,
[TITLE] [VARCHAR](max) NULL)
AS
BEGIN
DECLARE @MSGTYPE VARCHAR(100) = 'Continue',
@QUESTION VARCHAR(300) = '',
@TITLE VARCHAR(100) = 'Bitte prüfen Sie Ihre Eingaben!';
----------------------------------------------------------------------------------------------------------------------------------
IF (@Status_Detail LIKE 'Abgelehnt%') and (LEN(@STATUS_DETAIL_TEXT) < 4) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Sie müssen eine Begründung eintragen (mind. 4 Zeichen)!'
END
ELSE IF (@Status_Detail not in (SELECT * from [FNCUST_SET_PM_DECISION_LIST_PROFILEID_14]())) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Bitte wählen Sie eine andere Entscheidung aus!'
END
ELSE
BEGIN
SET @MSGTYPE = 'Continue'
SET @QUESTION = ''
END
----------------------------------------------------------------------------------------------------------------------------------
INSERT INTO @vTB_TEST_RESULT ([MSGTYPE], [QUESTION], [TITLE])
VALUES (@MsgType, @QUESTION, @TITLE)
RETURN;
END
GO

65
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_TEST_PM_USER_INPUT_PROFILEID_15].sql Normal file
View File

@ -0,0 +1,65 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_TEST_PM_USER_INPUT_PROFILEID_15] Script Date: 21.03.2024 17:39:48 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Prüfung diverser Werte und Eingaben bei Betätigung das Abschluss Buttons
-- Stand: MK // 05.11.2021
-- PM Profil: SWB - AR 1.0 - Eingangsrechnung zur Weiterbelastung
CREATE FUNCTION [dbo].[FNCUST_TEST_PM_USER_INPUT_PROFILEID_15] (
@Status_Detail VARCHAR(150), -- = '{#CTRL#DGV_Status-Detail}',
@Status_Detail_Text VARCHAR(200) -- = '{#CTRL#TXT_Entscheidungs-Beschreibung}';
)
RETURNS @vTB_TEST_RESULT TABLE ([MSGTYPE] [VARCHAR](max) NULL,
[QUESTION] [VARCHAR](max) NULL,
[TITLE] [VARCHAR](max) NULL)
AS
BEGIN
DECLARE @MSGTYPE VARCHAR(100) = 'Continue',
@QUESTION VARCHAR(300) = '',
@TITLE VARCHAR(100) = 'Bitte prüfen Sie Ihre Eingaben!',
@Fremdreferenz1Count INT = 0;
----------------------------------------------------------------------------------------------------------------------------------
IF (@Status_Detail LIKE 'Abgelehnt%') and (LEN(@STATUS_DETAIL_TEXT) < 4) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Sie müssen eine Begründung eintragen (mind. 4 Zeichen)!'
END
ELSE IF (@Status_Detail not in (SELECT * from [FNCUST_SET_PM_DECISION_LIST_PROFILEID_15]())) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Bitte wählen Sie eine andere Entscheidung aus!'
END
ELSE
BEGIN
SET @MSGTYPE = 'Continue'
SET @QUESTION = ''
END
----------------------------------------------------------------------------------------------------------------------------------
INSERT INTO @vTB_TEST_RESULT ([MSGTYPE], [QUESTION], [TITLE])
VALUES (@MsgType, @QUESTION, @TITLE)
RETURN;
END
GO

64
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_TEST_PM_USER_INPUT_PROFILEID_16].sql Normal file
View File

@ -0,0 +1,64 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_TEST_PM_USER_INPUT_PROFILEID_16] Script Date: 21.03.2024 17:41:20 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Prüfung diverser Werte und Eingaben bei Betätigung das Abschluss Buttons
-- Stand: MK // 29.09.2021
-- PM Profil: SWB - ER 6.0 - Terminüberweisung - Finale Freigabe
CREATE FUNCTION [dbo].[FNCUST_TEST_PM_USER_INPUT_PROFILEID_16] (
@Status_Detail VARCHAR(150), -- = '{#CTRL#DGV_Status-Detail}',
@Status_Detail_Text VARCHAR(200) -- = '{#CTRL#TXT_Entscheidungs-Beschreibung}';
)
RETURNS @vTB_TEST_RESULT TABLE ([MSGTYPE] [VARCHAR](max) NULL,
[QUESTION] [VARCHAR](max) NULL,
[TITLE] [VARCHAR](max) NULL)
AS
BEGIN
DECLARE @MSGTYPE VARCHAR(100) = 'Continue',
@QUESTION VARCHAR(300) = '',
@TITLE VARCHAR(100) = 'Bitte prüfen Sie Ihre Eingaben!';
----------------------------------------------------------------------------------------------------------------------------------
IF (@Status_Detail LIKE 'Abgelehnt%') and (LEN(@STATUS_DETAIL_TEXT) < 4) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Sie müssen eine Begründung eintragen (mind. 4 Zeichen)!'
END
ELSE IF (@Status_Detail not in (SELECT * from [FNCUST_SET_PM_DECISION_LIST_PROFILEID_16]())) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Bitte wählen Sie eine andere Entscheidung aus!'
END
ELSE
BEGIN
SET @MSGTYPE = 'Continue'
SET @QUESTION = ''
END
----------------------------------------------------------------------------------------------------------------------------------
INSERT INTO @vTB_TEST_RESULT ([MSGTYPE], [QUESTION], [TITLE])
VALUES (@MsgType, @QUESTION, @TITLE)
RETURN;
END
GO

66
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_TEST_PM_USER_INPUT_PROFILEID_17].sql Normal file
View File

@ -0,0 +1,66 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_TEST_PM_USER_INPUT_PROFILEID_17] Script Date: 21.03.2024 17:41:52 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Prüfung diverser Werte und Eingaben bei Betätigung das Abschluss Buttons
-- Stand: MK // 26.01.2022
-- PM Profil: SWB - ER 99.0 - Nachträgliche Korrektur
CREATE FUNCTION [dbo].[FNCUST_TEST_PM_USER_INPUT_PROFILEID_17] (
@Status_Detail VARCHAR(150), -- = '{#CTRL#DGV_Status-Detail}',
@Status_Detail_Text VARCHAR(200) -- = '{#CTRL#TXT_Entscheidungs-Beschreibung}';
)
RETURNS @vTB_TEST_RESULT TABLE ([MSGTYPE] [VARCHAR](max) NULL,
[QUESTION] [VARCHAR](max) NULL,
[TITLE] [VARCHAR](max) NULL)
AS
BEGIN
DECLARE @MSGTYPE VARCHAR(100) = 'Continue',
@QUESTION VARCHAR(300) = '',
@TITLE VARCHAR(100) = 'Bitte prüfen Sie Ihre Eingaben!';
----------------------------------------------------------------------------------------------------------------------------------
IF (LEN(@STATUS_DETAIL_TEXT) < 4) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Sie müssen eine Korrekturangabe tätigen (mind. 4 Zeichen)!'
END
ELSE IF (@Status_Detail not in (SELECT * from [FNCUST_SET_PM_DECISION_LIST_PROFILEID_17]())) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Bitte wählen Sie eine andere Entscheidung aus!'
END
ELSE
BEGIN
SET @MSGTYPE = 'Continue'
SET @QUESTION = ''
END
----------------------------------------------------------------------------------------------------------------------------------
INSERT INTO @vTB_TEST_RESULT ([MSGTYPE], [QUESTION], [TITLE])
VALUES (@MsgType, @QUESTION, @TITLE)
RETURN;
END
GO

74
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_TEST_PM_USER_INPUT_PROFILEID_1].sql Normal file
View File

@ -0,0 +1,74 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_TEST_PM_USER_INPUT_PROFILEID_1] Script Date: 21.03.2024 17:38:04 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Prüfung diverser Werte und Eingaben bei Betätigung das Abschluss Buttons
-- Stand: MK // 21.10.2021
-- 21.10.2021 Erweiterung der ungültigen Benutzernamensliste
-- 29.09.2021 Initial
-- PM Profil: SWB - ER 1.0 - Dokumentübernahme durch Erfasser
CREATE FUNCTION [dbo].[FNCUST_TEST_PM_USER_INPUT_PROFILEID_1] (
@WindowsUsername VARCHAR(150), -- = '{#INT#USERNAME}', -- Benutzername aus der Anmeldung
@InputBoxUsername VARCHAR(150), -- = '{#CTRL#TXT_Benutzername}' -- Benutzername aus der Eingabe
@Status_Detail VARCHAR(150), -- = '{#CTRL#DGV_Status-Detail}',
@Status_Detail_Text VARCHAR(200) -- = '{#CTRL#TXT_Entscheidungs-Beschreibung}';
)
RETURNS @vTB_TEST_RESULT TABLE ([MSGTYPE] [VARCHAR](max) NULL,
[QUESTION] [VARCHAR](max) NULL,
[TITLE] [VARCHAR](max) NULL)
AS
BEGIN
DECLARE @MSGTYPE VARCHAR(100) = 'Continue',
@QUESTION VARCHAR(300) = '',
@TITLE VARCHAR(100) = 'Bitte prüfen Sie Ihre Eingaben!';
----------------------------------------------------------------------------------------------------------------------------------
IF (@WindowsUsername IN ('IIMAdmin','DigitalData','Praktikant','Praktikanten','FOSPraktikant','Azubi','Azubis','Scanner') and (LEN(@InputBoxUsername) < 3)) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Ihr Name (' + @InputBoxUsername +') ist doch sicher länger, oder!? (mind. 3 Zeichen)'
END
ELSE IF (@Status_Detail LIKE 'Abgelehnt%') and (LEN(@STATUS_DETAIL_TEXT) < 4) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Sie müssen eine Begründung eintragen (mind. 4 Zeichen)!'
END
ELSE IF (@Status_Detail not in (SELECT * from [FNCUST_SET_PM_DECISION_LIST_PROFILEID_1]())) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Bitte wählen Sie eine andere Entscheidung aus!'
END
ELSE
BEGIN
SET @MSGTYPE = 'Continue'
SET @QUESTION = ''
END
----------------------------------------------------------------------------------------------------------------------------------
INSERT INTO @vTB_TEST_RESULT ([MSGTYPE], [QUESTION], [TITLE])
VALUES (@MsgType, @QUESTION, @TITLE)
RETURN;
END
GO

62
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_TEST_PM_USER_INPUT_PROFILEID_2].sql Normal file
View File

@ -0,0 +1,62 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_TEST_PM_USER_INPUT_PROFILEID_2] Script Date: 21.03.2024 17:42:56 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Prüfung diverser Werte und Eingaben bei Betätigung das Abschluss Buttons
-- Stand: MK // 29.09.2021
-- PM Profil: SWB - ER 2.0 - Durchsicht der Geschäftsführung
CREATE FUNCTION [dbo].[FNCUST_TEST_PM_USER_INPUT_PROFILEID_2] (
@Status_Detail VARCHAR(150), -- = '{#CTRL#DGV_Status-Detail}',
@Status_Detail_Text VARCHAR(200) -- = '{#CTRL#TXT_Entscheidungs-Beschreibung}';
)
RETURNS @vTB_TEST_RESULT TABLE ([MSGTYPE] [VARCHAR](max) NULL,
[QUESTION] [VARCHAR](max) NULL,
[TITLE] [VARCHAR](max) NULL)
AS
BEGIN
DECLARE @MSGTYPE VARCHAR(100) = 'Continue',
@QUESTION VARCHAR(300) = '',
@TITLE VARCHAR(100) = 'Bitte prüfen Sie Ihre Eingaben!';
----------------------------------------------------------------------------------------------------------------------------------
IF (@Status_Detail LIKE 'Abgelehnt%') and (LEN(@STATUS_DETAIL_TEXT) < 4) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Sie müssen eine Begründung eintragen (mind. 4 Zeichen)!'
END
ELSE IF (@Status_Detail not in (SELECT * from [FNCUST_SET_PM_DECISION_LIST_PROFILEID_2]())) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Bitte wählen Sie eine andere Entscheidung aus!'
END
ELSE
BEGIN
SET @MSGTYPE = 'Continue'
SET @QUESTION = ''
END
----------------------------------------------------------------------------------------------------------------------------------
INSERT INTO @vTB_TEST_RESULT ([MSGTYPE], [QUESTION], [TITLE])
VALUES (@MsgType, @QUESTION, @TITLE)
RETURN;
END
GO

89
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_TEST_PM_USER_INPUT_PROFILEID_3].sql Normal file
View File

@ -0,0 +1,89 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_TEST_PM_USER_INPUT_PROFILEID_3] Script Date: 21.03.2024 17:43:35 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Prüfung diverser Werte und Eingaben bei Betätigung das Abschluss Buttons
-- Stand: MK // 29.09.2021
-- PM Profil: SWB - ER 3.0 - Zuweisung und Vorprüfung durch die FiBu
CREATE FUNCTION [dbo].[FNCUST_TEST_PM_USER_INPUT_PROFILEID_3] (
@BestellSummeNetto VARCHAR(150), -- = 0, -- Ganze oder kommagetrennte Zahl
@RechnungsSummeNetto VARCHAR(150), -- = 0, -- Ganze oder kommagetrennte Zahl
@Dokumentart VARCHAR(150), -- = '{#CTRL#CMB_DOKUMENTART}',
@Fremdreferenz1 VARCHAR(150), -- = '{#CTRL#TXT_Fremdreferenz_1}',
@Prüfer_Person VARCHAR(150), -- = '{#CTRL#DGV_Prüfer_Person}',
@Prüfer_Gruppe VARCHAR(150), -- = '{#CTRL#DGV_Prüfer_Gruppe}',
@Prüfer_Abteilung VARCHAR(150), -- = '{#CTRL#DGV_Prüfer_Abteilung}',
@Status_Detail VARCHAR(150), -- = '{#CTRL#DGV_Status-Detail}',
@Status_Detail_Text VARCHAR(200) -- = '{#CTRL#TXT_Entscheidungs-Beschreibung}';
)
RETURNS @vTB_TEST_RESULT TABLE ([MSGTYPE] [VARCHAR](max) NULL,
[QUESTION] [VARCHAR](max) NULL,
[TITLE] [VARCHAR](max) NULL)
AS
BEGIN
DECLARE @MSGTYPE VARCHAR(100) = 'Continue',
@QUESTION VARCHAR(300) = '',
@TITLE VARCHAR(100) = 'Bitte prüfen Sie Ihre Eingaben!',
@Fremdreferenz1Count INT = 0;
SET @RechnungsSummeNetto = (SELECT [dbo].[FNDD_GET_DECIMAL_FOR_VARCHAR] (@RechnungsSummeNetto));
SET @BestellSummeNetto = (SELECT [dbo].[FNDD_GET_DECIMAL_FOR_VARCHAR] (@BestellSummeNetto));
SET @Fremdreferenz1Count = (SELECT COUNT(szText19)
FROM [windream60].[dbo].[BaseAttributes]
WHERE [szText37] = @Dokumentart
and [szText19] = @Fremdreferenz1)-1;
----------------------------------------------------------------------------------------------------------------------------------
IF (@Prüfer_Person in ('','0') AND @Prüfer_Gruppe in ('','0') AND @Prüfer_Abteilung in ('','0')) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Achtung: Sie haben keinen Prüfer eingetragen!'
END
ELSE IF (@Status_Detail LIKE 'Abgelehnt%') and (LEN(@STATUS_DETAIL_TEXT) < 4) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Sie müssen eine Begründung eintragen (mind. 4 Zeichen)!'
END
ELSE IF (@Status_Detail not in (SELECT * from [FNCUST_SET_PM_DECISION_LIST_PROFILEID_3]())) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Bitte wählen Sie eine andere Entscheidung aus!'
END
ELSE IF (@Fremdreferenz1Count > 0) -- Nachfragen ob ok - sollte weiter unten abgefragt werden da prio gering
BEGIN
SET @MSGTYPE = 'MsgboxResult'
SET @QUESTION = 'Achtung: Die ext. Rechnungs-Nr wurde bereits erfasst (' + CONVERT(VARCHAR(30),@Fremdreferenz1Count) + ' Dokumente) ! Möchten Sie fortfahren?'
END
ELSE
BEGIN
SET @MSGTYPE = 'Continue'
SET @QUESTION = ''
END
----------------------------------------------------------------------------------------------------------------------------------
INSERT INTO @vTB_TEST_RESULT ([MSGTYPE], [QUESTION], [TITLE])
VALUES (@MsgType, @QUESTION, @TITLE)
RETURN;
END
GO

63
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_TEST_PM_USER_INPUT_PROFILEID_4].sql Normal file
View File

@ -0,0 +1,63 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_TEST_PM_USER_INPUT_PROFILEID_4] Script Date: 21.03.2024 17:44:00 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Prüfung diverser Werte und Eingaben bei Betätigung das Abschluss Buttons
-- Stand: MK // 29.09.2021
-- PM Profil: SWB - ER 4.0 - Prüfung durch die Fachabteilung
CREATE FUNCTION [dbo].[FNCUST_TEST_PM_USER_INPUT_PROFILEID_4] (
@Status_Detail VARCHAR(150), -- = '{#CTRL#DGV_Status-Detail}',
@Status_Detail_Text VARCHAR(200) -- = '{#CTRL#TXT_Entscheidungs-Beschreibung}';
)
RETURNS @vTB_TEST_RESULT TABLE ([MSGTYPE] [VARCHAR](max) NULL,
[QUESTION] [VARCHAR](max) NULL,
[TITLE] [VARCHAR](max) NULL)
AS
BEGIN
DECLARE @MSGTYPE VARCHAR(100) = 'Continue',
@QUESTION VARCHAR(300) = '',
@TITLE VARCHAR(100) = 'Bitte prüfen Sie Ihre Eingaben!',
@Fremdreferenz1Count INT = 0;
----------------------------------------------------------------------------------------------------------------------------------
IF (@Status_Detail LIKE 'Abgelehnt%') and (LEN(@STATUS_DETAIL_TEXT) < 4) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Sie müssen eine Begründung eintragen (mind. 4 Zeichen)!'
END
ELSE IF (@Status_Detail not in (SELECT * from [FNCUST_SET_PM_DECISION_LIST_PROFILEID_4]())) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Bitte wählen Sie eine andere Entscheidung aus!'
END
ELSE
BEGIN
SET @MSGTYPE = 'Continue'
SET @QUESTION = ''
END
----------------------------------------------------------------------------------------------------------------------------------
INSERT INTO @vTB_TEST_RESULT ([MSGTYPE], [QUESTION], [TITLE])
VALUES (@MsgType, @QUESTION, @TITLE)
RETURN;
END
GO

62
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_TEST_PM_USER_INPUT_PROFILEID_5].sql Normal file
View File

@ -0,0 +1,62 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_TEST_PM_USER_INPUT_PROFILEID_5] Script Date: 21.03.2024 17:44:35 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Prüfung diverser Werte und Eingaben bei Betätigung das Abschluss Buttons
-- Stand: MK // 29.09.2021
-- PM Profil: SWB - ER 5.0 - Prüfung und Kontierung durch die FiBu
CREATE FUNCTION [dbo].[FNCUST_TEST_PM_USER_INPUT_PROFILEID_5] (
@Status_Detail VARCHAR(150), -- = '{#CTRL#DGV_Status-Detail}',
@Status_Detail_Text VARCHAR(200) -- = '{#CTRL#TXT_Entscheidungs-Beschreibung}';
)
RETURNS @vTB_TEST_RESULT TABLE ([MSGTYPE] [VARCHAR](max) NULL,
[QUESTION] [VARCHAR](max) NULL,
[TITLE] [VARCHAR](max) NULL)
AS
BEGIN
DECLARE @MSGTYPE VARCHAR(100) = 'Continue',
@QUESTION VARCHAR(300) = '',
@TITLE VARCHAR(100) = 'Bitte prüfen Sie Ihre Eingaben!';
----------------------------------------------------------------------------------------------------------------------------------
IF (@Status_Detail LIKE 'Abgelehnt%') and (LEN(@STATUS_DETAIL_TEXT) < 4) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Sie müssen eine Begründung eintragen (mind. 4 Zeichen)!'
END
ELSE IF (@Status_Detail not in (SELECT * from [FNCUST_SET_PM_DECISION_LIST_PROFILEID_5]())) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Bitte wählen Sie eine andere Entscheidung aus!'
END
ELSE
BEGIN
SET @MSGTYPE = 'Continue'
SET @QUESTION = ''
END
----------------------------------------------------------------------------------------------------------------------------------
INSERT INTO @vTB_TEST_RESULT ([MSGTYPE], [QUESTION], [TITLE])
VALUES (@MsgType, @QUESTION, @TITLE)
RETURN;
END
GO

70
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_TEST_PM_USER_INPUT_PROFILEID_6].sql Normal file
View File

@ -0,0 +1,70 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_TEST_PM_USER_INPUT_PROFILEID_6] Script Date: 21.03.2024 17:45:10 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Prüfung diverser Werte und Eingaben bei Betätigung das Abschluss Buttons
-- Stand: MK // 11.03.2021
-- PM Profil: SWB - ER 5.1 - Buchung und Zahlung durch die FiBu - Angehaltende Dokumente
CREATE FUNCTION [dbo].[FNCUST_TEST_PM_USER_INPUT_PROFILEID_6] (
@Status_Detail VARCHAR(150), -- = '{#CTRL#DGV_Status-Detail}',
@Status_Detail_Text VARCHAR(200), -- = '{#CTRL#TXT_Entscheidungs-Beschreibung}'
@Prüfer VARCHAR(150), -- = '{#WMI#String 22}'
@Username VARCHAR(150) -- = '{#INT#USERNAME}'
)
RETURNS @vTB_TEST_RESULT TABLE ([MSGTYPE] [VARCHAR](max) NULL,
[QUESTION] [VARCHAR](max) NULL,
[TITLE] [VARCHAR](max) NULL)
AS
BEGIN
DECLARE @MSGTYPE VARCHAR(100) = 'Continue',
@QUESTION VARCHAR(300) = '',
@TITLE VARCHAR(100) = 'Bitte prüfen Sie Ihre Eingaben!';
----------------------------------------------------------------------------------------------------------------------------------
IF (LTRIM(RTRIM(@Prüfer)) = LTRIM(RTRIM(@Username))) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Als eingetragener Prüfer, dürfen Sie den Beleg nicht freigeben!'
END
ELSE IF (@Status_Detail LIKE 'Abgelehnt%') and (LEN(@STATUS_DETAIL_TEXT) < 4) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Sie müssen eine Begründung eintragen (mind. 4 Zeichen)!'
END
ELSE IF (@Status_Detail not in (SELECT * from [FNCUST_SET_PM_DECISION_LIST_PROFILEID_6]())) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Bitte wählen Sie eine andere Entscheidung aus!'
END
ELSE
BEGIN
SET @MSGTYPE = 'Continue'
SET @QUESTION = ''
END
----------------------------------------------------------------------------------------------------------------------------------
INSERT INTO @vTB_TEST_RESULT ([MSGTYPE], [QUESTION], [TITLE])
VALUES (@MsgType, @QUESTION, @TITLE)
RETURN;
END
GO

62
DMS/SQL-Server/Tabellenwertfunktionen/[FNCUST_TEST_PM_USER_INPUT_PROFILEID_9].sql Normal file
View File

@ -0,0 +1,62 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNCUST_TEST_PM_USER_INPUT_PROFILEID_9] Script Date: 21.03.2024 17:45:36 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- T-SQL Tabellenfunktion: Prüfung diverser Werte und Eingaben bei Betätigung das Abschluss Buttons
-- Stand: MK // 29.09.2021
-- PM Profil: SWB - ER 5.2 - Buchung durch die FiBu und Abbuchung durch den Kreditor
CREATE FUNCTION [dbo].[FNCUST_TEST_PM_USER_INPUT_PROFILEID_9] (
@Status_Detail VARCHAR(150), -- = '{#CTRL#DGV_Status-Detail}',
@Status_Detail_Text VARCHAR(200) -- = '{#CTRL#TXT_Entscheidungs-Beschreibung}';
)
RETURNS @vTB_TEST_RESULT TABLE ([MSGTYPE] [VARCHAR](max) NULL,
[QUESTION] [VARCHAR](max) NULL,
[TITLE] [VARCHAR](max) NULL)
AS
BEGIN
DECLARE @MSGTYPE VARCHAR(100) = 'Continue',
@QUESTION VARCHAR(300) = '',
@TITLE VARCHAR(100) = 'Bitte prüfen Sie Ihre Eingaben!';
----------------------------------------------------------------------------------------------------------------------------------
IF (@Status_Detail LIKE 'Abgelehnt%') and (LEN(@STATUS_DETAIL_TEXT) < 4) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Sie müssen eine Begründung eintragen (mind. 4 Zeichen)!'
END
ELSE IF (@Status_Detail not in (SELECT * from [FNCUST_SET_PM_DECISION_LIST_PROFILEID_9]())) -- Stop Grund
BEGIN
SET @MSGTYPE = 'MsgBoxStop'
SET @QUESTION = 'Bitte wählen Sie eine andere Entscheidung aus!'
END
ELSE
BEGIN
SET @MSGTYPE = 'Continue'
SET @QUESTION = ''
END
----------------------------------------------------------------------------------------------------------------------------------
INSERT INTO @vTB_TEST_RESULT ([MSGTYPE], [QUESTION], [TITLE])
VALUES (@MsgType, @QUESTION, @TITLE)
RETURN;
END
GO

179
DMS/SQL-Server/Tabellenwertfunktionen/[FNDD_CHECK_USER_MODULE].sql Normal file
View File

@ -0,0 +1,179 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNDD_CHECK_USER_MODULE] Script Date: 21.03.2024 17:13:27 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE FUNCTION [dbo].[FNDD_CHECK_USER_MODULE] (@pUSERNAME VARCHAR(100), @pMODULE_SHORT_NAME VARCHAR(10),@pCLIENTID INTEGER)
RETURNS @Table TABLE
(SequentialOrder INT IDENTITY(1, 1),
USER_ID INTEGER,
USER_PRENAME VARCHAR(50),
USER_SURNAME VARCHAR(50),
USER_SHORTNAME VARCHAR(50),
USER_EMAIL VARCHAR(100),
USER_LANGUAGE VARCHAR(10),
USER_DATE_FORMAT VARCHAR(10),
USER_RIGHT_FILE_DEL BIT,
MODULE_ACCESS BIT,
IS_ADMIN BIT,
USERCOUNT_LOGGED_IN INTEGER,
COMMENT VARCHAR(500),
USER_RIGHT2 BIT NOT NULL DEFAULT 1,
USER_RIGHT3 BIT NOT NULL DEFAULT 0,
USER_RIGHT4 BIT NOT NULL DEFAULT 0,
USER_RIGHT5 BIT NOT NULL DEFAULT 0,
WORKING_MODE VARCHAR(5000) NOT NULL DEFAULT ''
,ADDITIONAL_TITLE VARCHAR(200))
AS
BEGIN
/*
This function checks all user-relevant relations an
*/
DECLARE
@RESULT VARCHAR(500),
@USER_ID INTEGER,
@USER_PRENAME VARCHAR(50),
@USER_SURNAME VARCHAR(50),
@USER_SHORTNAME VARCHAR(50),
@USER_EMAIL VARCHAR(50),
@USER_LANGUAGE VARCHAR(10),
@USER_DATE_FORMAT VARCHAR(10),
@IS_IN_MODULE BIT,
@IS_ADMIN BIT,
@USER_RIGHT_FILE_DEL BIT,
@USER_RIGHT2 BIT,
@USER_RIGHT3 BIT,
@USER_RIGHT4 BIT,
@USER_RIGHT5 BIT,
@USERCOUNT_LOGGED_IN INTEGER,
@MODULE_NAME VARCHAR(100),
@MODULE_GUID INTEGER,
@USER_GROUPNAME VARCHAR(100),
@ADMIN_GROUPNAME VARCHAR(100),
@WORKING_MODE VARCHAR(1000),
@ADDITIONAL_TITLE VARCHAR(500) = 'Stadtwerke Bebra - Workflows';
--'PM#NO_MASS_VALIDATOR;PM#FORCE_LAYOUT_OVERVIEW;PM#NO_CHARTS;PM#DEBUG_LOG'
SET @USER_RIGHT2 = 0 --0 = Drucken und Vorschau; 1 = DocumentPropertyView only View
SET @USER_RIGHT3 = 0
SET @USER_RIGHT4 = 0
SET @USER_RIGHT5 = 0
DECLARE @CONN_ID_IDB INTEGER
SELECT @CONN_ID_IDB = GUID FROM TBDD_CONNECTION WHERE SYS_CONNECTION = 1 AND BEZEICHNUNG = 'IDB'
SET @WORKING_MODE = ''
IF @pMODULE_SHORT_NAME = 'PM'
BEGIN
SET @WORKING_MODE = 'PM.NO_MASS_VALIDATOR#PM.FORCE_LAYOUT_OVERVIEW#PM.NO_CHARTS#PM.GHOSTMODE'--#PM.IDBWITHWMFS#PM.IDB_CONID!' + CONVERT(VARCHAR(2),@CONN_ID_IDB) #PM.DEBUG_LOG
+'#PM.MONITORING#PM.COLORSCHEME=Blue#PM.COL_LAST_EDITED=[Letzte Bearbeitung]#PM.COL_LAST_ADDED=[Erhalten wann]'
END
SET @USER_ID = 0
SET @IS_ADMIN = 0
SET @IS_IN_MODULE = 0
SET @USERCOUNT_LOGGED_IN = 0
SET @RESULT = ''
IF @pMODULE_SHORT_NAME = 'PM'
BEGIN
SET @USER_GROUPNAME = 'PM_USER'
SET @ADMIN_GROUPNAME = 'PM_ADMINS'
END
ELSE IF @pMODULE_SHORT_NAME = 'CW'
BEGIN
SET @USER_GROUPNAME = 'CW_USER'
SET @ADMIN_GROUPNAME = 'CW_ADMINS'
END
ELSE IF @pMODULE_SHORT_NAME = 'ADDI'
BEGIN
SET @USER_GROUPNAME = 'ADDI_USER'
SET @ADMIN_GROUPNAME = 'ADDI_ADMINS'
END
ELSE IF @pMODULE_SHORT_NAME = 'GLOBIX'
BEGIN
SET @USER_GROUPNAME = 'GLOBIX_USER'
SET @ADMIN_GROUPNAME = 'GLOBIX_ADMINS'
END
ELSE IF @pMODULE_SHORT_NAME = 'UM'
BEGIN
SET @USER_GROUPNAME = 'XXXX'
SET @ADMIN_GROUPNAME = 'UM_ADMINS'
END
SELECT @MODULE_GUID = GUID, @MODULE_NAME = NAME FROM TBDD_MODULES WHERE SHORT_NAME = @pMODULE_SHORT_NAME
IF NOT EXISTS(SELECT GUID FROM TBDD_USER WHERE UPPER(USERNAME) = UPPER(@pUSERNAME))
BEGIN
SET @RESULT = 'USER NOT CONFIGURED OR LISTED'
END
ELSE
BEGIN
SELECT @USER_ID = GUID,@USER_PRENAME = PRENAME,
@USER_SURNAME = NAME, @USER_SHORTNAME = SHORTNAME,@USER_EMAIL = EMAIL,@USER_LANGUAGE = LANGUAGE,@USER_DATE_FORMAT = DATE_FORMAT FROM TBDD_USER WHERE UPPER(USERNAME) = UPPER(@pUSERNAME)
--##### LICENSE COUNT
--SELECT @USERCOUNT_LOGGED_IN = [dbo].[FNDD_GET_LICENSE_COUNT] (@pCLIENTID)
SELECT @USERCOUNT_LOGGED_IN = COUNT(*) FROM TBDD_USER_MODULE_LOG_IN WHERE UPPER(MODULE) = UPPER(@MODULE_NAME) AND CLIENT_ID = @pCLIENTID
--CHECK USER ÍS IN MODULE_USER_GROUP
IF EXISTS(select T1.* from TBDD_GROUPS T, TBDD_GROUPS_USER T1 WHERE T.GUID = T1.GROUP_ID AND T1.USER_ID = @USER_ID AND UPPER(T.NAME) = @USER_GROUPNAME)
BEGIN
SET @IS_IN_MODULE = 1
SET @RESULT = 'User is part of Group (' + @USER_GROUPNAME + ')'
IF EXISTS(select T.* from TBDD_USER_MODULES T WHERE T.USER_ID = @USER_ID AND T.MODULE_ID = @MODULE_GUID)
BEGIN
SET @RESULT = @RESULT + '| User is also configured in User-Modules'
select @IS_ADMIN = T.IS_ADMIN,@USER_RIGHT_FILE_DEL = T.RIGHT1 from TBDD_USER_MODULES T WHERE T.USER_ID = @USER_ID AND T.MODULE_ID = @MODULE_GUID
END
END
ELSE
BEGIN
SET @RESULT = 'User not part of group (' + @USER_GROUPNAME + ')'
IF EXISTS(select T.* from TBDD_USER_MODULES T WHERE T.USER_ID = @USER_ID AND T.MODULE_ID = @MODULE_GUID)
BEGIN
SET @RESULT = @RESULT + '| BUT User configured in User-Modules'
select @IS_ADMIN = T.IS_ADMIN,@USER_RIGHT_FILE_DEL = T.RIGHT1
--,@USER_RIGHT2 = T.RIGHT2
from TBDD_USER_MODULES T WHERE T.USER_ID = @USER_ID AND T.MODULE_ID = @MODULE_GUID
END
END
-- Admin can do all!
IF EXISTS(select T1.* from TBDD_GROUPS T, TBDD_GROUPS_USER T1 WHERE T.GUID = T1.GROUP_ID AND T1.USER_ID = @USER_ID AND UPPER(T.NAME) = @ADMIN_GROUPNAME)
BEGIN
SET @RESULT = @RESULT + '| User is part of group (' + @ADMIN_GROUPNAME + ')'
SET @IS_ADMIN = 1
SET @IS_IN_MODULE = 1
SET @USER_RIGHT_FILE_DEL = 1
END
-- Scan Erfasser dürfen Dateien auch wieder löschen
IF EXISTS(select T1.* from TBDD_GROUPS T, TBDD_GROUPS_USER T1 WHERE T.GUID = T1.GROUP_ID AND T1.USER_ID = @USER_ID AND (UPPER(T.NAME) like '%Scan-Erfasser' ))
BEGIN
SET @USER_RIGHT_FILE_DEL = 1
END
-----------------------------------------------------------------------
-- GF, Admin und Fibu Gruppen sollen das Monitoring sehen, sonst keiner
IF EXISTS(select T1.* from TBDD_GROUPS T, TBDD_GROUPS_USER T1 WHERE T.GUID = T1.GROUP_ID AND T1.USER_ID = @USER_ID AND (UPPER(T.NAME) like '%Geschäftsführung' OR UPPER(T.NAME) like '%FiBu' OR UPPER(T.NAME) like '%Admins'))
BEGIN
SET @WORKING_MODE = @WORKING_MODE + '#PM.MONITORING'
END
-----------------------------------------------------------------------
END
INSERT INTO @Table (USER_ID,USER_PRENAME, USER_SURNAME,USER_SHORTNAME,USER_EMAIL,USER_LANGUAGE,USER_DATE_FORMAT, USER_RIGHT_FILE_DEL,
MODULE_ACCESS,IS_ADMIN,USERCOUNT_LOGGED_IN, COMMENT,WORKING_MODE,USER_RIGHT2,USER_RIGHT3,USER_RIGHT4,USER_RIGHT5
,ADDITIONAL_TITLE)
VALUES (@USER_ID,@USER_PRENAME,@USER_SURNAME,@USER_SHORTNAME,@USER_EMAIL,@USER_LANGUAGE,@USER_DATE_FORMAT,@USER_RIGHT_FILE_DEL,
@IS_IN_MODULE,@IS_ADMIN,@USERCOUNT_LOGGED_IN,@RESULT,@WORKING_MODE,@USER_RIGHT2,@USER_RIGHT3,@USER_RIGHT4,@USER_RIGHT5
,@ADDITIONAL_TITLE)
RETURN
END
GO

249
DMS/SQL-Server/Tabellenwertfunktionen/[FNPM_CUST_GET_DOC_IDS].sql Normal file
View File

@ -0,0 +1,249 @@
USE [DD_ECM]
GO
/****** Object: UserDefinedFunction [dbo].[FNPM_CUST_GET_DOC_IDS] Script Date: 21.03.2024 17:14:16 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- 29.12.2022 MS Profil 18 - Abbuchung durch KReditor DA integriert
-- 29.12.2022 MS Nadine Metz bei Profil AR_PROFILE1 hinterlegt
-- 27.01.2022 MK Ergänzung um das neue Profil 99
-- 17.01.2022 Unterscheidung in Schritt 2 auf GMBH/GF und Abwasser-Bäder/Betriebsleiter
-- 10.11.2021 Prüfung für Schritt 6 eingebaut
-- 31.10.2021 Mandantenlogik eingebaut
-- 03.10.2021 ER Profile 4.1 hinzugefügt
-- 20.09.2021 Initial
CREATE FUNCTION [dbo].[FNPM_CUST_GET_DOC_IDS] (@USER_ID INTEGER)
RETURNS
@Table TABLE
(SCOPE VARCHAR(50),DOC_GUID BIGINT,DOC_ID BIGINT,PROFIL_ID INT, SequentialOrder INT IDENTITY(1, 1))
AS
BEGIN
DECLARE
@P_ID INTEGER,
@P_NAME VARCHAR(50),
@P_ER_2_0_ID INTEGER = 2, -- Einsicht für GMBH/GF oder Abwasser-Bäder/Betriebsleiter
@P_ER_3_0_ID INTEGER = 3, -- Einsicht für FiBu Mitarbeiter abhängig vom Mandant
@P_ER_3_1_ID INTEGER = 11, -- Einsicht für FiBu Mitarbeiter abhängig vom Mandant
@P_ER_4_0_ID INTEGER = 4, -- Einsicht für ausgesuchten Prüfer
@P_ER_4_1_ID INTEGER = 10, -- Einsicht für ausgesuchten Prüfer
@P_ER_5_0_ID INTEGER = 5, -- Einsicht für FiBu Mitarbeiter abhängig vom Mandant
@P_ER_5_1_ID INTEGER = 6, -- Einsicht für FiBu Mitarbeiter abhängig vom Mandant
@P_ER_5_2_ID INTEGER = 9, -- Einsicht für FiBu Mitarbeiter abhängig vom Mandant
@P_ER_5_3_ID INTEGER = 14, -- Einsicht für FiBu Mitarbeiter abhängig vom Mandant
@P_ABB_KRED_DA INTEGER = 18,
@P_ER_6_0_ID INTEGER = 16, -- Einsicht für ausgesuchte finale Freigeber
@P_ER_94_ID INTEGER = 7, -- Einsicht für FiBu Mitarbeiter abhängig vom Mandant
@P_ER_99_ID INTEGER = 17, -- Einsicht für FiBu Mitarbeiter abhängig vom Mandant
@P_AR_1_0_ID INTEGER = 15, -- Einsicht für FiBu Mitarbeiter abhängig vom Mandant
@PM_ADMIN_GROUP TINYINT = 2, -- = Admingruppen ID aus dem UserManager
@GF TINYINT = 16, -- = Führungsgruppe der GmbH
@Betriebsleiter TINYINT = 45, -- = Führungsgruppe der Abwasser + Bäder
@SBAbwasserbetriebFiBu TINYINT = 19, -- = Fibu Gruppe der Abwasserbetriebe
@SBBäderbetriebFiBu TINYINT = 21, -- = Fibu Gruppe der Bäderbetrieb
@SWBNetzFiBu TINYINT = 35, -- = Fibu Gruppe der GmbH
@SWBVertriebFiBu TINYINT = 41, -- = Fibu Gruppe des Vertriebs
@windreamAttributFinalApprover INTEGER = 10044; -- = Terminzahlung Finale Freigeber
------------------------------------------------------------------------------------------------------------
-- Standard -> Zuordnung erfolgt via PM Benutzer/Gruppenzuordnung
INSERT INTO @Table (SCOPE,DOC_GUID,DOC_ID,PROFIL_ID)
SELECT
'ACTIVE PROFILES',T.GUID, T.DOC_ID,T.PROFIL_ID
FROM
TBPM_PROFILE_FILES T INNER JOIN TBPM_PROFILE T1 on T.PROFIL_ID = T1.GUID
INNER JOIN windream60.dbo.BaseAttributes TWM_BA ON T.DOC_ID = TWM_BA.dwDocID
INNER JOIN [dbo].[FNPM_GET_ACTIVE_PROFILES_USER] (@USER_ID) T2 ON T.PROFIL_ID = T2.PROFILE_ID --INNER JOIN [dbo].[FNPM_GET_ACTIVE_PROFILES_USER] (2)
AND T.EDIT = 0 AND T.IN_WORK = 0 AND T.ACTIVE = 1 AND T1.ACTIVE = 1
AND T2.PROFILE_ID <> @P_ER_2_0_ID
AND T2.PROFILE_ID <> @P_ER_3_0_ID
AND T2.PROFILE_ID <> @P_ER_3_1_ID
AND T2.PROFILE_ID <> @P_ER_4_0_ID
AND T2.PROFILE_ID <> @P_ER_4_1_ID
AND T2.PROFILE_ID <> @P_ER_5_0_ID
AND T2.PROFILE_ID <> @P_ER_5_1_ID
AND T2.PROFILE_ID <> @P_ER_5_2_ID
AND T2.PROFILE_ID <> @P_ER_5_3_ID
AND T2.PROFILE_ID <> @P_ER_6_0_ID
AND T2.PROFILE_ID <> @P_ER_94_ID
AND T2.PROFILE_ID <> @P_ER_99_ID
AND T2.PROFILE_ID <> @P_AR_1_0_ID
AND T2.PROFILE_ID <> @P_ABB_KRED_DA;
----------------------------------------------------------------------------------------------------------------
-- AR Profile 1 für die GmbH
INSERT INTO @Table (SCOPE,DOC_GUID,DOC_ID,PROFIL_ID)
SELECT 'AR_PROFILE1', T.GUID, T.DOC_ID,T.PROFIL_ID
FROM
TBPM_PROFILE_FILES T
INNER JOIN windream60.dbo.BaseAttributes TWMBA ON T.DOC_ID = TWMBA.dwDocID
INNER JOIN TBPM_PROFILE TP ON T.PROFIL_ID = TP.GUID
WHERE
(T.PROFIL_ID = @P_AR_1_0_ID)
AND T.EDIT = 0 AND T.IN_WORK = 0 AND T.ACTIVE = 1
AND TP.ACTIVE = 1
AND ((TWMBA.sztext31 = 'SWB-Netz' and @USER_ID in (SELECT [USER_ID] FROM [TBDD_GROUPS_USER] WHERE [GROUP_ID] = @SWBNetzFiBu))
OR (TWMBA.sztext31 = 'SWB-Vertrieb' and @USER_ID in (SELECT [USER_ID] FROM [TBDD_GROUPS_USER] WHERE [GROUP_ID] = @SWBVertriebFiBu)
OR @USER_ID = 12
))
-- ER Profile 2 für Abwasser + Bäder
INSERT INTO @Table (SCOPE,DOC_GUID,DOC_ID,PROFIL_ID)
SELECT 'AR_PROFILE1', T.GUID, T.DOC_ID,T.PROFIL_ID
FROM
TBPM_PROFILE_FILES T
INNER JOIN windream60.dbo.BaseAttributes TWMBA ON T.DOC_ID = TWMBA.dwDocID
INNER JOIN TBPM_PROFILE TP ON T.PROFIL_ID = TP.GUID
WHERE
(T.PROFIL_ID = @P_AR_1_0_ID)
AND T.EDIT = 0 AND T.IN_WORK = 0 AND T.ACTIVE = 1
AND TP.ACTIVE = 1
AND ((TWMBA.sztext31 = 'SB-Abwasserbetrieb' and @USER_ID in (SELECT [USER_ID] FROM [TBDD_GROUPS_USER] WHERE [GROUP_ID] = @SBAbwasserbetriebFiBu))
OR (TWMBA.sztext31 = 'SB-Bäderbetrieb' and @USER_ID in (SELECT [USER_ID] FROM [TBDD_GROUPS_USER] WHERE [GROUP_ID] = @SBBäderbetriebFiBu)))
----------------------------------------------------------------------------------------------------------------
-- ER Profile 2 für die GmbH
INSERT INTO @Table (SCOPE,DOC_GUID,DOC_ID,PROFIL_ID)
SELECT 'ER_PROFILE2', T.GUID, T.DOC_ID,T.PROFIL_ID
FROM
TBPM_PROFILE_FILES T
INNER JOIN windream60.dbo.BaseAttributes TWMBA ON T.DOC_ID = TWMBA.dwDocID
INNER JOIN TBPM_PROFILE TP ON T.PROFIL_ID = TP.GUID
WHERE
(T.PROFIL_ID = @P_ER_2_0_ID)
AND T.EDIT = 0 AND T.IN_WORK = 0 AND T.ACTIVE = 1
AND TP.ACTIVE = 1
AND ((TWMBA.sztext31 = 'SWB-Netz' and @USER_ID in (SELECT [USER_ID] FROM [TBDD_GROUPS_USER] WHERE [GROUP_ID] = @GF))
OR (TWMBA.sztext31 = 'SWB-Vertrieb' and @USER_ID in (SELECT [USER_ID] FROM [TBDD_GROUPS_USER] WHERE [GROUP_ID] = @GF)))
-- ER Profile 2 für Abwasser + Bäder
INSERT INTO @Table (SCOPE,DOC_GUID,DOC_ID,PROFIL_ID)
SELECT 'ER_PROFILE2', T.GUID, T.DOC_ID,T.PROFIL_ID
FROM
TBPM_PROFILE_FILES T
INNER JOIN windream60.dbo.BaseAttributes TWMBA ON T.DOC_ID = TWMBA.dwDocID
INNER JOIN TBPM_PROFILE TP ON T.PROFIL_ID = TP.GUID
WHERE
(T.PROFIL_ID = @P_ER_2_0_ID)
AND T.EDIT = 0 AND T.IN_WORK = 0 AND T.ACTIVE = 1
AND TP.ACTIVE = 1
AND ((TWMBA.sztext31 = 'SB-Abwasserbetrieb' and @USER_ID in (SELECT [USER_ID] FROM [TBDD_GROUPS_USER] WHERE [GROUP_ID] = @Betriebsleiter))
OR (TWMBA.sztext31 = 'SB-Bäderbetrieb' and @USER_ID in (SELECT [USER_ID] FROM [TBDD_GROUPS_USER] WHERE [GROUP_ID] = @Betriebsleiter)))
------------------------------------------------------------------------------------------------------------
-- ER Profile 3, 3.1, 94 und 99 sollen nur von der entsprechenden FiBu Mitarbeiter einsehbarsein, anhängig vom ausgewählten Mandant
INSERT INTO @Table (SCOPE,DOC_GUID,DOC_ID,PROFIL_ID)
SELECT 'ER_PROFILE3', T.GUID, T.DOC_ID,T.PROFIL_ID
FROM
TBPM_PROFILE_FILES T
INNER JOIN windream60.dbo.BaseAttributes TWMBA ON T.DOC_ID = TWMBA.dwDocID
INNER JOIN TBPM_PROFILE TP ON T.PROFIL_ID = TP.GUID
WHERE
(T.PROFIL_ID in (@P_ER_3_0_ID,@P_ER_3_1_ID,@P_ER_5_0_ID,@P_ER_5_1_ID,@P_ER_5_2_ID,@P_ER_5_3_ID,@P_ER_94_ID,@P_ER_99_ID,@P_ABB_KRED_DA))
AND T.EDIT = 0 AND T.IN_WORK = 0 AND T.ACTIVE = 1
AND TP.ACTIVE = 1
AND ((TWMBA.sztext31 = 'SB-Abwasserbetrieb' and @USER_ID in (42,49))
OR (TWMBA.sztext31 = 'SB-Bäderbetrieb' and @USER_ID in (42,49))
OR (TWMBA.sztext31 = 'SWB-Netz' and @USER_ID in (31,42))
OR (TWMBA.sztext31 = 'SWB-Vertrieb' and @USER_ID in (31,42))
OR @USER_ID in (SELECT [USER_ID] FROM [TBDD_GROUPS_USER] WHERE [GROUP_ID] = @PM_ADMIN_GROUP)) -- <-- Admins dürfen immer mandatenübergreifend sehen
-- Für die GmbH bin ich (Fr. Mohr) und in Vertretung ist Frau Kurz zuständig
-- Für Abwasser und Bäderbetrieb ist Frau Hohmann und in Vertretung auch Frau Kurz zuständig
-- Frau Mohr = 31
-- Frau Kurz = 42
-- Frau Hohmann = 49
----------------------------------------------------------------------------------------------------------------
-- ER Profile 4 und 4.1 sollen nur von der FiBu und des jeweils eingetragenen Prüfer gesichtet werden können
INSERT INTO @Table (SCOPE,DOC_GUID,DOC_ID,PROFIL_ID)
SELECT 'ER_PROFILE4', T.GUID, T.DOC_ID,T.PROFIL_ID
FROM
TBPM_PROFILE_FILES T
INNER JOIN windream60.dbo.BaseAttributes TWMBA ON T.DOC_ID = TWMBA.dwDocID
INNER JOIN TBDD_USER T2 ON UPPER(TWMBA.sztext22) = UPPER(T2.USERNAME)
INNER JOIN TBPM_PROFILE TP ON T.PROFIL_ID = TP.GUID
WHERE
(T.PROFIL_ID = @P_ER_4_0_ID or T.PROFIL_ID = @P_ER_4_1_ID)
AND T2.GUID = @USER_ID
AND T.EDIT = 0 AND T.IN_WORK = 0 AND T.ACTIVE = 1
AND TP.ACTIVE = 1
----------------------------------------------------------------------------------------------------------------
-- ER Profile 6 soll nur von den eingetragenen finalen Freigebern gesehen werden (Vieraugen Prinzip)
INSERT INTO @Table (SCOPE,DOC_GUID,DOC_ID,PROFIL_ID)
SELECT 'ER_PROFILE6', T.GUID, T.DOC_ID,T.PROFIL_ID
FROM
TBPM_PROFILE_FILES as T
INNER JOIN windream60.dbo.BaseAttributes TWMBA ON T.DOC_ID = TWMBA.dwDocID
INNER JOIN TBPM_PROFILE TP ON T.PROFIL_ID = TP.GUID
WHERE
(T.PROFIL_ID = @P_ER_6_0_ID)
AND T.EDIT = 0 AND T.IN_WORK = 0 AND T.ACTIVE = 1
AND TP.ACTIVE = 1
AND (@USER_ID in (SELECT [GUID] FROM [TBDD_USER] WHERE [USERNAME] IN (SELECT [Vector].[szValue]
FROM [windream60].[dbo].[Vector] as [Vector] (NOLOCK)
INNER JOIN [windream60].[dbo].[BaseAttributes] as [BaseAttributes] (NOLOCK) ON [Vector].[dwDocID] = [BaseAttributes].[dwDocID]
WHERE [Vector].[szValue] is not null
and [Vector].[dwAttrID] = @windreamAttributFinalApprover
and [BaseAttributes].[szText33] = 'in Arbeit'))
OR @USER_ID in (SELECT [USER_ID] FROM [TBDD_GROUPS_USER] WHERE [GROUP_ID] = @PM_ADMIN_GROUP)) -- <-- Admins dürfen immer sehen
----------------------------------------------------------------------------------------------------------------
--Wenn User Mitgleid von PM_ADMIN ist...
IF EXISTS(SELECT GUID FROM TBDD_GROUPS_USER WHERE GROUP_ID = @PM_ADMIN_GROUP AND USER_ID = @USER_ID)
--Wenn es Belege zu Profil 4 gibt ist...
IF EXISTS(SELECT
T.DOC_ID
FROM
TBPM_PROFILE_FILES T
INNER JOIN windream60.dbo.BaseAttributes TWMBA ON T.DOC_ID = TWMBA.dwDocID
INNER JOIN TBDD_USER T2 ON UPPER(TWMBA.sztext22) <> UPPER(T2.USERNAME)
INNER JOIN TBPM_PROFILE TP ON T.PROFIL_ID = TP.GUID
WHERE
T2.GUID = @USER_ID
AND TP.ACTIVE = 1
AND T.PROFIL_ID = @P_ER_4_0_ID
OR T.PROFIL_ID = @P_ER_4_1_ID )
INSERT INTO @Table (SCOPE,DOC_GUID,DOC_ID,PROFIL_ID)
SELECT 'ER_PROFILE4_ADMIN',T.GUID,T.DOC_ID,T.PROFIL_ID
FROM
TBPM_PROFILE_FILES T
INNER JOIN windream60.dbo.BaseAttributes TWMBA ON T.DOC_ID = TWMBA.dwDocID
INNER JOIN TBDD_USER T2 ON UPPER(TWMBA.sztext22) <> UPPER(T2.USERNAME)
WHERE
T2.GUID = @USER_ID
AND (T.PROFIL_ID = @P_ER_4_0_ID
OR T.PROFIL_ID = @P_ER_4_1_ID )
RETURN
END
--SELECT * FROM [dbo].[FNPM_CUST_GET_DOC_IDS] (2)
GO

47
DMS/SQL-Server/Verbindungsserver/NTSSUITE.sql Normal file
View File

@ -0,0 +1,47 @@
USE [master]
GO
/****** Object: LinkedServer [NTSERP\NTSSUITE] Script Date: 21.03.2024 17:46:24 ******/
EXEC master.dbo.sp_addlinkedserver @server = N'NTSERP\NTSSUITE', @srvproduct=N'SQL Server'
GO
EXEC master.dbo.sp_serveroption @server=N'NTSERP\NTSSUITE', @optname=N'collation compatible', @optvalue=N'false'
GO
EXEC master.dbo.sp_serveroption @server=N'NTSERP\NTSSUITE', @optname=N'data access', @optvalue=N'true'
GO
EXEC master.dbo.sp_serveroption @server=N'NTSERP\NTSSUITE', @optname=N'dist', @optvalue=N'false'
GO
EXEC master.dbo.sp_serveroption @server=N'NTSERP\NTSSUITE', @optname=N'pub', @optvalue=N'false'
GO
EXEC master.dbo.sp_serveroption @server=N'NTSERP\NTSSUITE', @optname=N'rpc', @optvalue=N'false'
GO
EXEC master.dbo.sp_serveroption @server=N'NTSERP\NTSSUITE', @optname=N'rpc out', @optvalue=N'false'
GO
EXEC master.dbo.sp_serveroption @server=N'NTSERP\NTSSUITE', @optname=N'sub', @optvalue=N'false'
GO
EXEC master.dbo.sp_serveroption @server=N'NTSERP\NTSSUITE', @optname=N'connect timeout', @optvalue=N'0'
GO
EXEC master.dbo.sp_serveroption @server=N'NTSERP\NTSSUITE', @optname=N'collation name', @optvalue=null
GO
EXEC master.dbo.sp_serveroption @server=N'NTSERP\NTSSUITE', @optname=N'lazy schema validation', @optvalue=N'false'
GO
EXEC master.dbo.sp_serveroption @server=N'NTSERP\NTSSUITE', @optname=N'query timeout', @optvalue=N'0'
GO
EXEC master.dbo.sp_serveroption @server=N'NTSERP\NTSSUITE', @optname=N'use remote collation', @optvalue=N'true'
GO
EXEC master.dbo.sp_serveroption @server=N'NTSERP\NTSSUITE', @optname=N'remote proc transaction promotion', @optvalue=N'true'
GO

283
DMS/ToolCollection/Config/ToolCollection.exe.config Normal file
View File

@ -0,0 +1,283 @@
<?xml version="1.0" encoding="utf-8"?>
<configuration>
<configSections>
<sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<section name="ToolCollection.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false"/>
</sectionGroup>
<sectionGroup name="applicationSettings" type="System.Configuration.ApplicationSettingsGroup, System, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<section name="ToolCollection.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" requirePermission="false"/>
</sectionGroup>
<!-- For more information on Entity Framework configuration, visit http://go.microsoft.com/fwlink/?LinkID=237468 -->
<section name="entityFramework" type="System.Data.Entity.Internal.ConfigFile.EntityFrameworkSection, EntityFramework, Version=6.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" requirePermission="false"/>
</configSections>
<connectionStrings>
<add name="ToolCollection.My.MySettings.DDECMConString" connectionString="Data Source=dms\windream;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=DD_ECM;Password=svC#6440-ecMD" />
</connectionStrings>
<system.diagnostics>
<sources>
<!-- Dieser Abschnitt definiert die Protokollierungskonfiguration für My.Application.Log -->
<source name="DefaultSource" switchName="DefaultSwitch">
<listeners>
<add name="FileLog"/>
<!-- Auskommentierung des nachfolgenden Abschnitts aufheben, um in das Anwendungsereignisprotokoll zu schreiben -->
<!--<add name="EventLog"/>-->
</listeners>
</source>
</sources>
<switches>
<add name="DefaultSwitch" value="Information"/>
</switches>
<sharedListeners>
<add name="FileLog" type="Microsoft.VisualBasic.Logging.FileLogTraceListener, Microsoft.VisualBasic, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL" initializeData="FileLogWriter"/>
<!-- Auskommentierung des nachfolgenden Abschnitts aufheben und APPLICATION_NAME durch den Namen der Anwendung ersetzen, um in das Anwendungsereignisprotokoll zu schreiben -->
<!--<add name="EventLog" type="System.Diagnostics.EventLogTraceListener" initializeData="APPLICATION_NAME"/> -->
</sharedListeners>
</system.diagnostics>
<userSettings>
<ToolCollection.My.MySettings>
<setting name="licensekey" serializeAs="String">
<value />
</setting>
<setting name="DIDurchlaufRunning" serializeAs="String">
<value>False</value>
</setting>
<setting name="vNIConfigDatei" serializeAs="String">
<value>modNachindexierungConfig.xml</value>
</setting>
<setting name="vDIConfigDatei" serializeAs="String">
<value>modDateiimportConfig.xml</value>
</setting>
<setting name="vNIMailfrom" serializeAs="String">
<value>absender@IhrServer.de</value>
</setting>
<setting name="vNIEmailEmpf" serializeAs="String">
<value />
</setting>
<setting name="vNIMailBetreff" serializeAs="String">
<value>Fehler im Modul Nachindexierung</value>
</setting>
<setting name="vNIMailBody" serializeAs="String">
<value>&lt;p&gt;__________________&lt;br&gt;
&lt;b&gt;&lt;font face="Arial"&gt;Achtung Fehler:&lt;/font&gt;&lt;/b&gt;&lt;font face="Arial"&gt;&lt;br&gt;
&lt;br&gt;
Folgender Fehler wurde festgestellt:&lt;/font&gt; &lt;/p&gt;
</value>
</setting>
<setting name="vSMTP" serializeAs="String">
<value>mailODERpop.smtp.de</value>
</setting>
<setting name="vMailUser" serializeAs="String">
<value>Ihr User</value>
</setting>
<setting name="vMailPW" serializeAs="String">
<value />
</setting>
<setting name="vNIMailsenden" serializeAs="String">
<value>False</value>
</setting>
<setting name="frmNI_SQL_Loc" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="vPW_Admin" serializeAs="String">
<value>dd</value>
</setting>
<setting name="NIDurchlauf_Intervall" serializeAs="String">
<value>0</value>
</setting>
<setting name="vDIMailFrom" serializeAs="String">
<value>absender@IhrServer.de</value>
</setting>
<setting name="vDIMailEmpf" serializeAs="String">
<value />
</setting>
<setting name="vDIMailBetreff" serializeAs="String">
<value>Fehler im Modul Dateiimporter</value>
</setting>
<setting name="vDIMailBody" serializeAs="String">
<value>&lt;p&gt;__________________&lt;br&gt;
&lt;b&gt;&lt;font face="Arial"&gt;Achtung Fehler:&lt;/font&gt;&lt;/b&gt;&lt;font face="Arial"&gt;&lt;br&gt;
&lt;br&gt;
Folgender Fehler wurde festgestellt:&lt;/font&gt; &lt;/p&gt;
</value>
</setting>
<setting name="vDIDurchlaufRunning" serializeAs="String">
<value>False</value>
</setting>
<setting name="vDIMailSenden" serializeAs="String">
<value>False</value>
</setting>
<setting name="frmNIHauptseite_Loc" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmDIHauptseite_Loc" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="DIDurchlauf_Intervall" serializeAs="String">
<value>0</value>
</setting>
<setting name="NI_Durchlauf_Intervall" serializeAs="String">
<value>5</value>
</setting>
<setting name="frmDIProfileigenschaften_Loc" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmDIRegelverwaltung_Loc" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmDIRA_Loc" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmNIProfilhinzufuegen" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmNIProfileigenschaften" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="vMIConfigDatei" serializeAs="String">
<value>modDDIntegrationConfig.xml</value>
</setting>
<setting name="frmMIProfileigenschaften_Loc" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="vMoReConfigDatei" serializeAs="String">
<value>modMoReConfig.xml</value>
</setting>
<setting name="vMoReBasConfigDatei" serializeAs="String">
<value>modMoReBasConfig.xml</value>
</setting>
<setting name="spltCMoRe" serializeAs="String">
<value>232</value>
</setting>
<setting name="TBDMS_ORDNERZUORDNUNGDataGridView" serializeAs="String">
<value />
</setting>
<setting name="TBDMS_KUNDENDataGridView" serializeAs="String">
<value />
</setting>
<setting name="scOrdnerKonfig" serializeAs="String">
<value>415</value>
</setting>
<setting name="MR" serializeAs="String">
<value />
</setting>
<setting name="vLogErrorsonly" serializeAs="String">
<value>True</value>
</setting>
<setting name="vLogNI" serializeAs="String">
<value>log_Nachindexierung</value>
</setting>
<setting name="vLogDI" serializeAs="String">
<value>log_Dateiimporter</value>
</setting>
<setting name="vLogService" serializeAs="String">
<value>log_ServiceTC</value>
</setting>
<setting name="vlogNIServ" serializeAs="String">
<value>log_NachindexierungServ</value>
</setting>
<setting name="vlogDIServ" serializeAs="String">
<value>log_DateiimporterServ</value>
</setting>
<setting name="vDIAusschluss" serializeAs="String">
<value>thumbs</value>
</setting>
<setting name="Cores" serializeAs="String">
<value>Alle Kerne</value>
</setting>
<setting name="ERROR_INDEX" serializeAs="String">
<value>Error</value>
</setting>
<setting name="SQLLITE_CONNECTION" serializeAs="String">
<value />
</setting>
<setting name="logolder_then" serializeAs="String">
<value>30</value>
</setting>
<setting name="errortext" serializeAs="String">
<value>Fehlermeldung</value>
</setting>
<setting name="vemailPort" serializeAs="String">
<value>25</value>
</setting>
<setting name="NI_RUNNING" serializeAs="String">
<value>False</value>
</setting>
<setting name="VFS_RESTART" serializeAs="String">
<value>DigitalData\windream_VFS_RESTART</value>
</setting>
<setting name="IIDConfig_ConString" serializeAs="String">
<value>Data Source=172.24.12.41\tests;Initial Catalog=DD_DMS;User ID=sa;Password=dd</value>
</setting>
</ToolCollection.My.MySettings>
</userSettings>
<applicationSettings>
<ToolCollection.My.MySettings>
<setting name="MRWD_Laufwerk" serializeAs="String">
<value>L</value>
</setting>
<setting name="PathLink2Navision" serializeAs="String">
<value>D:\Programme\Digital Data\DDLink2Navision\NavisionLink.exe</value>
</setting>
<setting name="DLL_WMOTOOL" serializeAs="String">
<value />
</setting>
<setting name="vWLaufwerk" serializeAs="String">
<value>L</value>
</setting>
<setting name="WMCC_RESTART" serializeAs="String">
<value>DigitalData\windream_CLIENT_WMCC_Neustart</value>
</setting>
<setting name="Sleep_Begin" serializeAs="String">
<value>0</value>
</setting>
<setting name="Sleep_End" serializeAs="String">
<value>0</value>
</setting>
<setting name="NI_WORKING_HOURS" serializeAs="String">
<value></value>
</setting>
<setting name="FB_DATASOURCE" serializeAs="String">
<value />
</setting>
<setting name="FB_DATABASE" serializeAs="String">
<value />
</setting>
<setting name="FB_USER" serializeAs="String">
<value />
</setting>
<setting name="FB_PW" serializeAs="String">
<value />
</setting>
</ToolCollection.My.MySettings>
</applicationSettings>
<startup>
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6.1"/>
</startup>
<entityFramework>
<defaultConnectionFactory type="System.Data.Entity.Infrastructure.LocalDbConnectionFactory, EntityFramework">
<parameters>
<parameter value="v11.0"/>
</parameters>
</defaultConnectionFactory>
<providers>
<provider invariantName="System.Data.SqlClient" type="System.Data.Entity.SqlServer.SqlProviderServices, EntityFramework.SqlServer"/>
<provider invariantName="System.Data.SQLite.EF6" type="System.Data.SQLite.EF6.SQLiteProviderServices, System.Data.SQLite.EF6"/>
</providers>
</entityFramework>
<system.data>
<DbProviderFactories>
<remove invariant="System.Data.SQLite"/>
<add name="SQLite Data Provider" invariant="System.Data.SQLite" description=".Net Framework Data Provider for SQLite" type="System.Data.SQLite.SQLiteFactory, System.Data.SQLite"/>
<remove invariant="System.Data.SQLite.EF6"/>
<add name="SQLite Data Provider (Entity Framework 6)" invariant="System.Data.SQLite.EF6" description=".Net Framework Data Provider for SQLite (Entity Framework 6)" type="System.Data.SQLite.EF6.SQLiteProviderFactory, System.Data.SQLite.EF6"/>
</DbProviderFactories>
</system.data>
<runtime>
<assemblyBinding xmlns="urn:schemas-microsoft-com:asm.v1">
<dependentAssembly>
<assemblyIdentity name="System.Data.SQLite" publicKeyToken="db937bc2d44ff139" culture="neutral"/>
<bindingRedirect oldVersion="0.0.0.0-1.0.92.0" newVersion="1.0.92.0"/>
</dependentAssembly>
</assemblyBinding>
</runtime>
</configuration>

BIN
DMS/ToolCollection/Config/ToolCollection.sqlite Normal file
View File

Binary file not shown.

80
DMS/ToolCollection/Config/modDateiimportConfig.xml Normal file
View File

@ -0,0 +1,80 @@
<?xml version="1.0" encoding="ISO-8859-1" standalone="yes"?>
<Settings>
<Profile>
<Profil profilname="SB-Abwasserbetrieb Eingangsrechnung-WF via Scan" aktiv="True" verzoegerung="0" dokumenttyp="SWB - Geschaeftsprozesse" quellordner="E:\ECMLite\SB-Abwasserbetrieb-Geschaeftsprozesse\DocumentProcessing\File\Eingangsrechnung" zielordner="L:\SB-Abwasserbetrieb-Geschaeftsprozesse\DocumentProcessing\File\Eingangsrechnung-WF\InBearbeitung" subdirectories="False" subdirectoriesloeschen="False" backup="False" backupordner="" overwrite="True" datei_loeschen="True" Date_UV="" verzeichnis_loeschen="False" intervall="0" lastrun="21.03.2024 15:04:49" link2navision="False" link2navision_dokart="" link2navision_index="">
<Regel id="1" zielindex="String 37" aktiv="True" indexieren_aus="FEST" art="Eingangsrechnung" removeZeros="False" />
<Regel id="2" zielindex="String 33" aktiv="True" indexieren_aus="FEST" art="unbearbeitet" removeZeros="False" />
<Regel id="3" zielindex="String 28" aktiv="True" indexieren_aus="FEST" art="DD-ToolCollection" removeZeros="False" />
<Regel id="4" zielindex="String 23" aktiv="True" indexieren_aus="DATEI" art="KOMPLETT" removeZeros="False" mit_endung="False" />
<Regel id="5" zielindex="String 31" aktiv="True" indexieren_aus="FEST" art="SB-Abwasserbetrieb" removeZeros="False" mit_endung="False" />
<Regel id="6" zielindex="Vektor String 02" aktiv="True" indexieren_aus="FEST" art="Eingangsrechnungsprüfung" removeZeros="False" />
<Regel id="7" zielindex="Vektor Boolean 01" aktiv="True" indexieren_aus="FEST" art="false" removeZeros="False" />
<Regel id="8" zielindex="Vektor Boolean 02" aktiv="True" indexieren_aus="FEST" art="false" removeZeros="False" />
<Regel id="9" zielindex="Vektor Boolean 03" aktiv="True" indexieren_aus="FEST" art="false" removeZeros="False" />
<Regel id="10" zielindex="Vektor Boolean 04" aktiv="True" indexieren_aus="FEST" art="false" removeZeros="False" />
<Regel id="11" zielindex="Vektor Boolean 05" aktiv="True" indexieren_aus="FEST" art="false" removeZeros="False" />
<Regel id="16" zielindex="String 12" aktiv="True" indexieren_aus="FEST" art="Scan" removeZeros="False" />
</Profil>
<Profil profilname="SB-Bäderbetrieb Eingangsrechnung-WF via Scan" aktiv="True" verzoegerung="0" dokumenttyp="SWB - Geschaeftsprozesse" quellordner="E:\ECMLite\SB-Bäderbetrieb-Geschaeftsprozesse\DocumentProcessing\File\Eingangsrechnung" zielordner="L:\SB-Bäderbetrieb-Geschaeftsprozesse\DocumentProcessing\File\Eingangsrechnung-WF\InBearbeitung" subdirectories="False" subdirectoriesloeschen="False" backup="False" backupordner="" overwrite="True" datei_loeschen="True" Date_UV="" verzeichnis_loeschen="False" intervall="0" lastrun="21.03.2024 15:04:49" link2navision="False" link2navision_dokart="" link2navision_index="">
<Regel id="1" zielindex="String 37" aktiv="True" indexieren_aus="FEST" art="Eingangsrechnung" removeZeros="False" />
<Regel id="2" zielindex="String 33" aktiv="True" indexieren_aus="FEST" art="unbearbeitet" removeZeros="False" />
<Regel id="3" zielindex="String 28" aktiv="True" indexieren_aus="FEST" art="DD-ToolCollection" removeZeros="False" />
<Regel id="4" zielindex="String 23" aktiv="True" indexieren_aus="DATEI" art="KOMPLETT" removeZeros="False" mit_endung="False" />
<Regel id="5" zielindex="String 31" aktiv="True" indexieren_aus="FEST" art="SB-Bäderbetrieb" removeZeros="False" mit_endung="False" />
<Regel id="6" zielindex="Vektor String 02" aktiv="True" indexieren_aus="FEST" art="Eingangsrechnungsprüfung" removeZeros="False" />
<Regel id="7" zielindex="Vektor Boolean 01" aktiv="True" indexieren_aus="FEST" art="false" removeZeros="False" />
<Regel id="8" zielindex="Vektor Boolean 02" aktiv="True" indexieren_aus="FEST" art="false" removeZeros="False" />
<Regel id="9" zielindex="Vektor Boolean 03" aktiv="True" indexieren_aus="FEST" art="false" removeZeros="False" />
<Regel id="10" zielindex="Vektor Boolean 04" aktiv="True" indexieren_aus="FEST" art="false" removeZeros="False" />
<Regel id="11" zielindex="Vektor Boolean 05" aktiv="True" indexieren_aus="FEST" art="false" removeZeros="False" />
<Regel id="16" zielindex="String 12" aktiv="True" indexieren_aus="FEST" art="Scan" removeZeros="False" />
</Profil>
<Profil profilname="SWB-Netz Eingangsrechnung-WF via Scan" aktiv="True" verzoegerung="0" dokumenttyp="SWB - Geschaeftsprozesse" quellordner="E:\ECMLite\SWB-Netz-Geschaeftsprozesse\DocumentProcessing\File\Eingangsrechnung" zielordner="L:\SWB-Netz-Geschaeftsprozesse\DocumentProcessing\File\Eingangsrechnung-WF\InBearbeitung" subdirectories="False" subdirectoriesloeschen="False" backup="False" backupordner="" overwrite="True" datei_loeschen="True" Date_UV="" verzeichnis_loeschen="False" intervall="0" lastrun="21.03.2024 15:04:49" link2navision="False" link2navision_dokart="" link2navision_index="">
<Regel id="1" zielindex="String 37" aktiv="True" indexieren_aus="FEST" art="Eingangsrechnung" removeZeros="False" />
<Regel id="2" zielindex="String 33" aktiv="True" indexieren_aus="FEST" art="unbearbeitet" removeZeros="False" />
<Regel id="3" zielindex="String 28" aktiv="True" indexieren_aus="FEST" art="DD-ToolCollection" removeZeros="False" />
<Regel id="4" zielindex="String 23" aktiv="True" indexieren_aus="DATEI" art="KOMPLETT" removeZeros="False" mit_endung="False" />
<Regel id="5" zielindex="String 31" aktiv="True" indexieren_aus="FEST" art="SWB-Netz" removeZeros="False" mit_endung="False" />
<Regel id="6" zielindex="Vektor String 02" aktiv="True" indexieren_aus="FEST" art="Eingangsrechnungsprüfung" removeZeros="False" />
<Regel id="7" zielindex="Vektor Boolean 01" aktiv="True" indexieren_aus="FEST" art="false" removeZeros="False" />
<Regel id="8" zielindex="Vektor Boolean 02" aktiv="True" indexieren_aus="FEST" art="false" removeZeros="False" />
<Regel id="9" zielindex="Vektor Boolean 03" aktiv="True" indexieren_aus="FEST" art="false" removeZeros="False" />
<Regel id="10" zielindex="Vektor Boolean 04" aktiv="True" indexieren_aus="FEST" art="false" removeZeros="False" />
<Regel id="11" zielindex="Vektor Boolean 05" aktiv="True" indexieren_aus="FEST" art="false" removeZeros="False" />
<Regel id="16" zielindex="String 12" aktiv="True" indexieren_aus="FEST" art="Scan" removeZeros="False" />
</Profil>
<Profil profilname="SWB-Netz Eingangsrechnung-WF via Mail (kein ZUGFeRD)" aktiv="True" verzoegerung="0" dokumenttyp="SWB - Geschaeftsprozesse" quellordner="E:\DocumentProcessing\Input\File\DocumentKindAssigned\workflow-swb-netz" zielordner="L:\SWB-Netz-Geschaeftsprozesse\DocumentProcessing\File\Eingangsrechnung-WF\InBearbeitung" subdirectories="False" subdirectoriesloeschen="False" backup="False" backupordner="" overwrite="True" datei_loeschen="True" Date_UV="" verzeichnis_loeschen="False" intervall="0" lastrun="21.03.2024 15:04:49" link2navision="False" link2navision_dokart="" link2navision_index="">
<Regel id="1" zielindex="String 37" aktiv="True" indexieren_aus="FEST" art="Eingangsrechnung" removeZeros="False" />
<Regel id="2" zielindex="String 33" aktiv="True" indexieren_aus="FEST" art="unbearbeitet" removeZeros="False" />
<Regel id="3" zielindex="String 28" aktiv="True" indexieren_aus="FEST" art="DD-ToolCollection" removeZeros="False" />
<Regel id="5" zielindex="String 31" aktiv="True" indexieren_aus="FEST" art="SWB-Netz" removeZeros="False" mit_endung="False" />
<Regel id="6" zielindex="String 32" aktiv="True" indexieren_aus="FEST" art="Bestätigt" removeZeros="False" mit_endung="False" />
<Regel id="7" zielindex="Vektor String 02" aktiv="True" indexieren_aus="FEST" art="Eingangsrechnungsprüfung" removeZeros="False" />
<Regel id="8" zielindex="Vektor Boolean 01" aktiv="True" indexieren_aus="FEST" art="True" removeZeros="False" />
<Regel id="9" zielindex="Vektor Boolean 02" aktiv="True" indexieren_aus="FEST" art="false" removeZeros="False" />
<Regel id="10" zielindex="Vektor Boolean 03" aktiv="True" indexieren_aus="FEST" art="false" removeZeros="False" />
<Regel id="11" zielindex="Vektor Boolean 04" aktiv="True" indexieren_aus="FEST" art="false" removeZeros="False" />
<Regel id="12" zielindex="Vektor Boolean 05" aktiv="True" indexieren_aus="FEST" art="false" removeZeros="False" />
<Regel id="16" zielindex="String 12" aktiv="True" indexieren_aus="FEST" art="Mail (kein ZUGFeRD)" removeZeros="False" />
<Regel id="17" zielindex="String 01" aktiv="True" indexieren_aus="FEST" art="workflow-swb-netz@stadtwerke-bebra.de" removeZeros="False" />
<Regel id="18" zielindex="String 07" aktiv="True" indexieren_aus="DATEI" art="TRENNZEICHEN" removeZeros="False" trennzeichen="~" position="1" mit_endung="False" />
</Profil>
<Profil profilname="SWB-Vertrieb Eingangsrechnung-WF via Scan" aktiv="True" verzoegerung="0" dokumenttyp="SWB - Geschaeftsprozesse" quellordner="E:\ECMLite\SWB-Vertrieb-Geschaeftsprozesse\DocumentProcessing\File\Eingangsrechnung" zielordner="L:\SWB-Vertrieb-Geschaeftsprozesse\DocumentProcessing\File\Eingangsrechnung-WF\InBearbeitung" subdirectories="False" subdirectoriesloeschen="False" backup="False" backupordner="" overwrite="True" datei_loeschen="True" Date_UV="" verzeichnis_loeschen="False" intervall="0" lastrun="21.03.2024 15:04:49" link2navision="False" link2navision_dokart="" link2navision_index="">
<Regel id="1" zielindex="String 37" aktiv="True" indexieren_aus="FEST" art="Eingangsrechnung" removeZeros="False" />
<Regel id="2" zielindex="String 33" aktiv="True" indexieren_aus="FEST" art="unbearbeitet" removeZeros="False" />
<Regel id="3" zielindex="String 28" aktiv="True" indexieren_aus="FEST" art="DD-ToolCollection" removeZeros="False" />
<Regel id="4" zielindex="String 23" aktiv="True" indexieren_aus="DATEI" art="KOMPLETT" removeZeros="False" mit_endung="False" />
<Regel id="5" zielindex="String 31" aktiv="True" indexieren_aus="FEST" art="SWB-Vertrieb" removeZeros="False" mit_endung="False" />
<Regel id="6" zielindex="Vektor String 02" aktiv="True" indexieren_aus="FEST" art="Eingangsrechnungsprüfung" removeZeros="False" />
<Regel id="7" zielindex="Vektor Boolean 01" aktiv="True" indexieren_aus="FEST" art="false" removeZeros="False" />
<Regel id="8" zielindex="Vektor Boolean 02" aktiv="True" indexieren_aus="FEST" art="false" removeZeros="False" />
<Regel id="9" zielindex="Vektor Boolean 03" aktiv="True" indexieren_aus="FEST" art="false" removeZeros="False" />
<Regel id="10" zielindex="Vektor Boolean 04" aktiv="True" indexieren_aus="FEST" art="false" removeZeros="False" />
<Regel id="11" zielindex="Vektor Boolean 05" aktiv="True" indexieren_aus="FEST" art="false" removeZeros="False" />
<Regel id="16" zielindex="String 12" aktiv="True" indexieren_aus="FEST" art="Scan" removeZeros="False" />
</Profil>
<Profil profilname="Ergebnisbericht" aktiv="True" verzoegerung="0" dokumenttyp="SWB - Geschaeftsprozesse" quellordner="E:\DocumentProcessing\Input\File\DocumentKindAssigned\Ergebnisbericht" zielordner="L:\DocumentProcessing\File\Ergebnisbericht" subdirectories="False" subdirectoriesloeschen="False" backup="False" backupordner="" overwrite="True" datei_loeschen="True" Date_UV="YYYY-MM-DD" verzeichnis_loeschen="False" intervall="0" lastrun="21.03.2024 15:04:49" link2navision="False" link2navision_dokart="" link2navision_index="">
<Regel id="1" zielindex="String 37" aktiv="True" indexieren_aus="FEST" art="Ergebnisbericht ER" removeZeros="False" />
</Profil>
</Profile>
</Settings>

55
DMS/ToolCollection/Config/modNachindexierungConfig.xml Normal file
View File

@ -0,0 +1,55 @@
<?xml version="1.0" encoding="ISO-8859-1" standalone="yes"?>
<Settings>
<Profile>
<Profil profilname="SWB_NI-DB_E-MailDaten_anhand_E-MailMessageID" dokumenttyp="SWB - Geschaeftsprozesse" windreamsuche="L:\System\SearchProfiles\ToolCollection\SWB_NI-DB_E-MailDaten_anhand_E-MailMessageID.wdf" dbArt="MS-SQL" dataSource="DMS\WINDREAM" userId="DD_ECM" password="svC#6440-ecMD" initialCatalog="DD_ECM" sqlanweisung="" windreamIndex="String 07" ni_art="db" xml_end="" delete="" folder="" checkIndexSQL="IF (SELECT COUNT(*) FROM [TBEMLP_HISTORY_ATTACHMENT] WHERE EMAIL_MSGID = '[%String 07]') &gt;= 1&#xD;&#xA; SELECT 1&#xD;&#xA;ELSE&#xD;&#xA; SELECT 0&#xD;&#xA;&#xD;&#xA;-- Test mit ADR46000000083814250000D3A8398D21EDC88BD9B797E7DD8E1@EAM.DE" indexValidation="" indexFehler="" finalerIndex="" aktiv="True" mr_DAIndex="" mr_KDIndex="" move2Folder="" intervall="0" lastrun="14.11.2023 16:45:45" NB_AD="False" getordneridx="False" ordnerType="" ordnerType_eb="Parent" crfolderindex="" crfolder_folder="" crfolder_move="False">
<Link index="String 33" spalte="%in Arbeit%" from="manuell" select="" vktstate="1" />
<Link index="String 34" spalte="EMAIL_FROM" from="dbo.TBEMLP_HISTORY_ATTACHMENT" select="SELECT TOP 1 [%spalte] FROM [%view] WHERE EMAIL_MSGID = '[%String 07]' &#xD;&#xA;-- Test mit ADR46000000083814250000D3A8398D21EDC88BD9B797E7DD8E1@EAM.DE" vktstate="1" />
<Link index="String 06" spalte="EMAIL_SUBJECT" from="dbo.TBEMLP_HISTORY_ATTACHMENT" select="SELECT TOP 1 [%spalte] FROM [%view] WHERE EMAIL_MSGID = '[%String 07]' &#xD;&#xA;-- Test mit ADR46000000083814250000D3A8398D21EDC88BD9B797E7DD8E1@EAM.DE" vktstate="1" />
<Link index="Date 08" spalte="EMAIL_DATETIME" from="dbo.TBEMLP_HISTORY_ATTACHMENT" select="SELECT TOP 1 [%spalte] FROM [%view] WHERE EMAIL_MSGID = '[%String 07]' &#xD;&#xA;-- Test mit ADR46000000083814250000D3A8398D21EDC88BD9B797E7DD8E1@EAM.DE" vktstate="1" />
<Link index="String 23" spalte="EMAIL_ATTMT" from="dbo.TBEMLP_HISTORY_ATTACHMENT" select="SELECT TOP 1 [%spalte] FROM [%view] WHERE EMAIL_MSGID = '[%String 07]' &#xD;&#xA;-- Test mit ADR46000000083814250000D3A8398D21EDC88BD9B797E7DD8E1@EAM.DE&#xD;&#xA;&#xD;&#xA;" vktstate="1" />
</Profil>
<Profil profilname="SWB_NI-DB_LieferantenDaten_anhand_LieferantenNummer" dokumenttyp="SWB - Geschaeftsprozesse" windreamsuche="L:\System\SearchProfiles\ToolCollection\SWB_NI-DB_LieferantenDaten_anhand_LieferantenNummer.wdf" dbArt="MS-SQL" dataSource="DMS\WINDREAM" userId="DD_ECM" password="svC#6440-ecMD" initialCatalog="" sqlanweisung="" windreamIndex="String 38" ni_art="db" xml_end="" delete="" folder="" checkIndexSQL="SELECT COUNT(*) &#xD;&#xA;FROM [VWCUST_NI_NAVISION_VENDOR] &#xD;&#xA;WHERE [LieferantenNr] = '[%String 38]' " indexValidation="" indexFehler="" finalerIndex="" aktiv="True" mr_DAIndex="" mr_KDIndex="" move2Folder="" intervall="0" lastrun="14.11.2023 16:45:45" NB_AD="False" getordneridx="False" ordnerType="" ordnerType_eb="Parent" crfolderindex="" crfolder_folder="" crfolder_move="False">
<Link index="String 08" spalte="Name" from="dbo.VWCUST_NI_NAVISION_VENDOR" select="SELECT [%spalte] FROM [%view] WHERE [LieferantenNr] = '[%String 38]' " vktstate="1" />
<Link index="Vektor String 05" spalte="LieferantenNr" from="dbo.VWCUST_NI_NAVISION_VENDOR" select="SELECT [%spalte] FROM [%view] WHERE [LieferantenNr] = '[%String 38]' " vktstate="1" />
<Link index="Vektor String 51" spalte="Name" from="dbo.VWCUST_NI_NAVISION_VENDOR" select="SELECT [%spalte] FROM [%view] WHERE [LieferantenNr] = '[%String 38]' " vktstate="3" />
</Profil>
<Profil profilname="SWB_NI-DB_Eingangsrechnung-Daueranweisung" dokumenttyp="SWB - Geschaeftsprozesse" windreamsuche="L:\System\SearchProfiles\ToolCollection\SWB_NI-DB_Eingangsrechnung-Daueranweisung.wdf" dbArt="MS-SQL" dataSource="dms\windream" userId="DD_ECM" password="svC#6440-ecMD" initialCatalog="DD_ECM" sqlanweisung="" windreamIndex="Dokument-ID" ni_art="db" xml_end="" delete="" folder="" checkIndexSQL="SELECT * FROM [FNCUST_SET_PM_VIA_TC_RECURRING_DOCUMENTS]([%Dokument-ID],10042)&#xD;&#xA;&#xD;&#xA;-- Test mit 730491" indexValidation="" indexFehler="" finalerIndex="" aktiv="True" mr_DAIndex="" mr_KDIndex="" move2Folder="" intervall="0" lastrun="14.11.2023 16:45:47" NB_AD="False" getordneridx="False" ordnerType="" ordnerType_eb="Parent" crfolderindex="" crfolder_folder="" crfolder_move="False">
<Link index="String 33" spalte="ReturnValue" from="[dbo].[FNCUST_SET_PM_VIA_TC_RECURRING_DOCUMENTS]" select="DECLARE @RESULT TINYINT;&#xD;&#xA;SET @RESULT = (SELECT * FROM [FNCUST_SET_PM_VIA_TC_RECURRING_DOCUMENTS]([%Dokument-ID],10042))&#xD;&#xA;&#xD;&#xA;IF (@RESULT = 1)&#xD;&#xA; SELECT 'in Arbeit'" vktstate="1" />
<Link index="Vektor Boolean 05" spalte="ReturnValue" from="[dbo].[FNCUST_SET_PM_VIA_TC_RECURRING_DOCUMENTS]" select="DECLARE @RESULT TINYINT;&#xD;&#xA;SET @RESULT = (SELECT * FROM [FNCUST_SET_PM_VIA_TC_RECURRING_DOCUMENTS]([%Dokument-ID],10042))&#xD;&#xA;&#xD;&#xA;IF (@RESULT = 1)&#xD;&#xA; SELECT 0" vktstate="1" />
</Profil>
<Profil profilname="SWB_MoveAndRename" dokumenttyp="SWB - Geschaeftsprozesse" windreamsuche="L:\System\SearchProfiles\ToolCollection\SWB-MoveAndRename.wdf" dbArt="MS-SQL" dataSource="dms\windream" userId="DD_ECM" password="svC#6440-ecMD" initialCatalog="DD_ECM" sqlanweisung="" windreamIndex="Dokument-ID" ni_art="db" xml_end="" delete="" folder="" checkIndexSQL="SELECT count(*) FROM [FNCUST_SET_TC_MOVE_AND_RENAME]([%Dokument-ID])" indexValidation="" indexFehler="" finalerIndex="" aktiv="True" mr_DAIndex="" mr_KDIndex="" move2Folder="" intervall="0" lastrun="14.11.2023 16:45:47" NB_AD="False" getordneridx="False" ordnerType="" ordnerType_eb="Parent" crfolderindex="" crfolder_folder="" crfolder_move="False">
<Link index="Integer 00" spalte="ReturnValue" from="dbo.TBCUST_TC_MOVE_AND_RENAME" select="DECLARE @MoveAndRenamePath VARCHAR(MAX);&#xD;&#xA;SET @MoveAndRenamePath = (SELECT [PATH] FROM [FNCUST_SET_TC_MOVE_AND_RENAME]([%Dokument-ID]))&#xD;&#xA;&#xD;&#xA;-- If this var has a value Move and rename was executed before&#xD;&#xA;IF LEN(@MoveAndRenamePath) &gt; 1&#xD;&#xA; SELECT 4&#xD;&#xA;&#xD;&#xA;ELSE&#xD;&#xA; SELECT 2&#xD;&#xA;&#xD;&#xA;-- SELECT [%spalte] FROM [%view] WHERE " vktstate="1" />
<Link index="String 02" spalte="ReturnValue" from="dbo.TBCUST_TC_MOVE_AND_RENAME" select="SELECT [PATH] FROM [FNCUST_SET_TC_MOVE_AND_RENAME]([%Dokument-ID])" vktstate="1" />
<Link index="Dateiname" spalte="ReturnValue" from="dbo.TBCUST_TC_MOVE_AND_RENAME" select="SELECT [FILENAME] FROM [FNCUST_SET_TC_MOVE_AND_RENAME]([%Dokument-ID])" vktstate="1" />
</Profil>
<Profil profilname="SWB_Verrechtung" dokumenttyp="SWB - Geschaeftsprozesse" windreamsuche="L:\System\SearchProfiles\ToolCollection\SWB_Verrechtung.wdf" dbArt="MS-SQL" dataSource="dms\windream" userId="DD_ECM" password="svC#6440-ecMD" initialCatalog="windream60" sqlanweisung="" windreamIndex="Integer 18" ni_art="db" xml_end="" delete="" folder="" checkIndexSQL="select 1" indexValidation="" indexFehler="" finalerIndex="" aktiv="True" mr_DAIndex="" mr_KDIndex="" move2Folder="" intervall="0" lastrun="14.11.2023 16:45:47" NB_AD="True" getordneridx="False" ordnerType="" ordnerType_eb="Parent" crfolderindex="" crfolder_folder="" crfolder_move="False">
<Link index="Integer 18" spalte="decLockExpiration" from="dbo.LockInfo" select="-- Dummy, damit Rechte gesetzt werden&#xD;&#xA;-- SELECT [%spalte] FROM [%view] WHERE &#xD;&#xA;&#xD;&#xA;DECLARE @RechteFlag INT; &#xD;&#xA;SET @RechteFlag = '[%Integer 18]'; &#xD;&#xA;&#xD;&#xA;SELECT CASE&#xD;&#xA;&#xD;&#xA; When @RechteFlag = '1' Then 2&#xD;&#xA; When @RechteFlag = '3' Then 4&#xD;&#xA; Else 0&#xD;&#xA;&#xD;&#xA;End" vktstate="1" />
</Profil>
<Profil profilname="SWB_EB_Nachindexierung" dokumenttyp="SWB - Geschaeftsprozesse" windreamsuche="L:\System\SearchProfiles\ToolCollection\SWB_NI_Ergebnisbericht.wdf" dbArt="MS-SQL" dataSource="DMS\WINDREAM" userId="dd_ecm" password="svC#6440-ecMD" initialCatalog="windream60" sqlanweisung="" windreamIndex="Dateiname" ni_art="db" xml_end="" delete="" folder="" checkIndexSQL="" indexValidation="" indexFehler="" finalerIndex="" aktiv="True" mr_DAIndex="" mr_KDIndex="" move2Folder="" intervall="0" lastrun="14.11.2023 16:45:47" NB_AD="False" getordneridx="False" ordnerType="" ordnerType_eb="Parent" crfolderindex="" crfolder_folder="" crfolder_move="False">
<Link index="Float 11" spalte="lfFloat11" from="dbo.BaseAttributes" select="SELECT lfFloat11 FROM windream60.dbo.BaseAttributes WHERE dwdocID = (SELECT MAX(dwdocID) FROM windream60.dbo.BaseAttributes where szlongname = REPLACE('[%Dateiname]','_CC',''))" vktstate="1" />
<Link index="Float 12" spalte="lfFloat12" from="dbo.BaseAttributes" select="SELECT lfFloat12 FROM windream60.dbo.BaseAttributes WHERE dwdocID = (SELECT MAX(dwdocID) FROM windream60.dbo.BaseAttributes where szlongname = REPLACE('[%Dateiname]','_CC',''))" vktstate="1" />
<Link index="String 17" spalte="szText17" from="dbo.BaseAttributes" select="SELECT szText17 FROM windream60.dbo.BaseAttributes WHERE dwdocID = (SELECT MAX(dwdocID) FROM windream60.dbo.BaseAttributes where szlongname = REPLACE('[%Dateiname]','_CC',''))" vktstate="1" />
<Link index="String 38" spalte="szText38" from="dbo.BaseAttributes" select="SELECT szText38 FROM windream60.dbo.BaseAttributes WHERE dwdocID = (SELECT MAX(dwdocID) FROM windream60.dbo.BaseAttributes where szlongname = REPLACE('[%Dateiname]','_CC',''))" vktstate="1" />
<Link index="String 08" spalte="szText08" from="dbo.BaseAttributes" select="SELECT szText08 FROM windream60.dbo.BaseAttributes WHERE dwdocID = (SELECT MAX(dwdocID) FROM windream60.dbo.BaseAttributes where szlongname = REPLACE('[%Dateiname]','_CC',''))" vktstate="1" />
<Link index="Date 09" spalte="dwDate09" from="dbo.BaseAttributes" select="SELECT convert(Date,CAST(dwDate09 as VARCHAR(10))) FROM windream60.dbo.BaseAttributes WHERE dwdocID = (SELECT MAX(dwdocID) FROM windream60.dbo.BaseAttributes where szlongname = REPLACE('[%Dateiname]','_CC',''))" vktstate="1" />
<Link index="String 22" spalte="szText22" from="dbo.BaseAttributes" select="SELECT szText22 FROM windream60.dbo.BaseAttributes WHERE dwdocID = (SELECT MAX(dwdocID) FROM windream60.dbo.BaseAttributes where szlongname = REPLACE('[%Dateiname]','_CC',''))" vktstate="1" />
<Link index="String 31" spalte="szText31" from="dbo.BaseAttributes" select="SELECT szText31 FROM windream60.dbo.BaseAttributes WHERE dwdocID = (SELECT MAX(dwdocID) FROM windream60.dbo.BaseAttributes where szlongname = REPLACE('[%Dateiname]','_CC',''))" vktstate="1" />
<Link index="String 30" spalte="szText30" from="dbo.BaseAttributes" select="SELECT szText30 FROM windream60.dbo.BaseAttributes WHERE dwdocID = (SELECT MAX(dwdocID) FROM windream60.dbo.BaseAttributes where szlongname = REPLACE('[%Dateiname]','_CC',''))" vktstate="1" />
<Link index="Date 04" spalte="dwDate04" from="dbo.BaseAttributes" select="SELECT convert(Date,CAST(dwDate04 as VARCHAR(10))) FROM windream60.dbo.BaseAttributes WHERE dwdocID = (SELECT MAX(dwdocID) FROM windream60.dbo.BaseAttributes where szlongname = REPLACE('[%Dateiname]','_CC',''))" vktstate="1" />
<Link index="String 33" spalte="szText33" from="dbo.BaseAttributes" select="SELECT szText33 FROM windream60.dbo.BaseAttributes WHERE dwdocID = (SELECT MAX(dwdocID) FROM windream60.dbo.BaseAttributes where szlongname = REPLACE('[%Dateiname]','_CC',''))" vktstate="1" />
<Link index="Vektor String 25" spalte="szValue" from="dbo.Vector" select="SELECT szValue FROM windream60.dbo.Vector WHERE dwAttrID = 10020 and dwdocID = (SELECT MAX(dwdocID) FROM windream60.dbo.BaseAttributes where szlongname = REPLACE('[%Dateiname]','_CC',''))" vktstate="1" />
<Link index="Vektor String 05" spalte="szValue" from="dbo.Vector" select="SELECT szValue FROM windream60.dbo.Vector WHERE dwAttrID = 10010 and dwdocID = (SELECT MAX(dwdocID) FROM windream60.dbo.BaseAttributes where szlongname = REPLACE('[%Dateiname]','_CC',''))" vktstate="1" />
<Link index="Vektor String 51" spalte="szValue" from="dbo.Vector" select="SELECT szValue FROM windream60.dbo.Vector WHERE dwAttrID = 10018 and dwdocID = (SELECT MAX(dwdocID) FROM windream60.dbo.BaseAttributes where szlongname = REPLACE('[%Dateiname]','_CC',''))" vktstate="1" />
<Link index="Vektor String 00" spalte="szValue" from="dbo.Vector" select="SELECT szValue FROM windream60.dbo.Vector WHERE dwAttrID = 10023 and dwdocID = (SELECT MAX(dwdocID) FROM windream60.dbo.BaseAttributes where szlongname = REPLACE('[%Dateiname]','_CC',''))" vktstate="1" />
<Link index="Vektor String 29" spalte="szValue" from="dbo.Vector" select="SELECT szValue FROM windream60.dbo.Vector WHERE dwAttrID = 10040 and dwdocID = (SELECT MAX(dwdocID) FROM windream60.dbo.BaseAttributes where szlongname = REPLACE('[%Dateiname]','_CC',''))" vktstate="1" />
<Link index="Vektor Boolean 01" spalte="blValue" from="dbo.Vector" select="SELECT blValue FROM windream60.dbo.Vector WHERE dwAttrID = 10026 and dwdocID = (SELECT MAX(dwdocID) FROM windream60.dbo.BaseAttributes where szlongname = REPLACE('[%Dateiname]','_CC',''))" vktstate="1" />
<Link index="Vektor Boolean 02" spalte="blValue" from="dbo.Vector" select="SELECT blValue FROM windream60.dbo.Vector WHERE dwAttrID = 10027 and dwdocID = (SELECT MAX(dwdocID) FROM windream60.dbo.BaseAttributes where szlongname = REPLACE('[%Dateiname]','_CC',''))" vktstate="1" />
<Link index="Vektor Boolean 03" spalte="blValue" from="dbo.Vector" select="SELECT blValue FROM windream60.dbo.Vector WHERE dwAttrID = 10028 and dwdocID = (SELECT MAX(dwdocID) FROM windream60.dbo.BaseAttributes where szlongname = REPLACE('[%Dateiname]','_CC',''))" vktstate="1" />
<Link index="Vektor Boolean 04" spalte="blValue" from="dbo.Vector" select="SELECT blValue FROM windream60.dbo.Vector WHERE dwAttrID = 10029 and dwdocID = (SELECT MAX(dwdocID) FROM windream60.dbo.BaseAttributes where szlongname = REPLACE('[%Dateiname]','_CC',''))" vktstate="1" />
<Link index="Vektor Boolean 05" spalte="blValue" from="dbo.Vector" select="SELECT blValue FROM windream60.dbo.Vector WHERE dwAttrID = 10030 and dwdocID = (SELECT MAX(dwdocID) FROM windream60.dbo.BaseAttributes where szlongname = REPLACE('[%Dateiname]','_CC',''))" vktstate="1" />
<Link index="String 18" spalte="szText30" from="dbo.BaseAttributes" select="SELECT CASE &#xD;&#xA;WHEN ' [DOCPath] ' LIKE '%Netz-Abwasserbetrieb%' THEN 'SB-Abwasserbetrieb-Geschaeftsprozesse'&#xD;&#xA;WHEN ' [DOCPath]' LIKE '%Netz-Bäderbetrieb%' THEN 'SB-Bäderbetrieb-Geschaeftsprozesse'&#xD;&#xA;ELSE 'SWB-Netz-Geschaeftsprozesse' END&#xD;&#xA;" vktstate="1" />
<Link index="String 19" spalte="szText19" from="dbo.BaseAttributes" select="SELECT szText19 FROM windream60.dbo.BaseAttributes WHERE dwdocID = (SELECT MAX(dwdocID) FROM windream60.dbo.BaseAttributes where szlongname = REPLACE('[%Dateiname]','_CC',''))" vktstate="1" />
<Link index="Boolean 04" spalte="%1%" from="manuell" select="" vktstate="1" />
</Profil>
</Profile>
</Settings>