   Alter Table LizenzVertragselementApplikation add Hyperlink_Vertrag varchar(8000)
   go
   UPDATE dbo.Vertragspartner SET aktiv=0, mutiert_am=GETDATE() WHERE vertragspartnernr<>1 AND aktiv=1
   go
   UPDATE person SET aktiv=0, Mutiert_am=GETDATE() WHERE Vertragspartnernr<>1 AND aktiv=1
   go
   UPDATE ApplikationKontakt SET aktiv=0, mutiert_am = GETDATE() WHERE aktiv=1 AND personnr IN (SELECT personnr FROM person WHERE vertragspartnernr <> 1)
   go
   ALTER TABLE Dokument ADD Hyperlink VARCHAR(8000)
   go
   update dokument set hyperlink=''
   go
   update LizenzVertragselementApplikation set Hyperlink_Vertrag=''
   go
go
   /****** Object:  StoredProcedure [dbo].[sp_get_vertragspartner]    Script Date: 10.08.2018 07:43:07 ******/
DROP PROCEDURE [dbo].[sp_get_vertragspartner]
GO

/****** Object:  StoredProcedure [dbo].[sp_get_vertragspartner]    Script Date: 10.08.2018 07:43:07 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO


-- =============================================
-- Author:		<Stefan Hutter>
-- Create date: <09.03.2009>
-- Description:	<Liefert eine Liste der Vertragspartner>
-- =============================================
CREATE PROCEDURE [dbo].[sp_get_vertragspartner]
@mitarbeiternr INT,
@suchstring VARCHAR(255)
AS
BEGIN
	SET NOCOUNT ON;
    SET @suchstring='%'+@suchstring+'%'
    SELECT VertragspartnerNr ,NameZ1 + ' ' + NameZ2 + ', ' + PLZ + ' ' + Ort AS Description, aktiv
    FROM   dbo.Vertragspartner 
    WHERE  dbo.vertragspartner.securitylevelnr <= dbo.get_securitylevel(@mitarbeiternr) AND 
    (namez1 LIKE @suchstring OR namez2 LIKE @suchstring OR ort LIKE @suchstring)
	AND dbo.Vertragspartner.VertragspartnerNr=1
    ORDER  BY namez1,namez2, ort
END

GO

DROP PROCEDURE [dbo].[sp_get_lizenz_vertragselement_applikation]
GO

/****** Object:  StoredProcedure [dbo].[sp_get_lizenz_vertragselement_applikation]    Script Date: 10.08.2018 09:49:34 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO





-- =============================================
-- Author:		<Author,,Name>
-- Create date: <Create Date,,>
-- Description:	<Description,,>
-- =============================================
CREATE PROCEDURE [dbo].[sp_get_lizenz_vertragselement_applikation]
@mitarbeiternr AS INTEGER,
@lizenznr AS INTEGER
AS
BEGIN
	SET NOCOUNT ON;
SELECT     dbo.VertragselementApplikation.VertragselementApplikationnr, dbo.Vertragspartner.VertragspartnerNr, 
                      dbo.Vertragspartner.NameZ1 + ', ' + dbo.Vertragspartner.Ort AS Vertragspartner, dbo.LizenzvertragselementApplikation.Hyperlink_Vertrag AS Vertragselement, -- dbo.Vertragselement.Bezeichnung AS Vertragselement, 
					  dbo.Applikation.ApplikationNr, 
                      dbo.Applikation.Bezeichnung AS Applikation, dbo.ApplikationVersion.ApplikationVersionNr, dbo.ApplikationVersion.Version, dbo.LizenzVertragselementApplikation.Aktiv, 
                      dbo.LizenzVertragselementApplikation.Erstellt_am, dbo.LizenzVertragselementApplikation.Mutiert_am, dbo.LizenzVertragselementApplikation.Mutierer, 
                      dbo.VertragselementApplikation.BezeichnungLizenverwaltung, dbo.LizenzVertragselementApplikation.Lizenznr, 
                      dbo.LizenzVertragselementApplikation.LizenzVEApplNr, dbo.LizenzVertragselementApplikation.Bemerkung
INTO #tmp1                      
FROM         dbo.VertragselementApplikation INNER JOIN
                      dbo.Vertragselement ON dbo.VertragselementApplikation.Vertragselementnr = dbo.Vertragselement.Vertragselementnr INNER JOIN
                      dbo.Vertragspartner ON dbo.Vertragselement.VertragspartnerNr = dbo.Vertragspartner.VertragspartnerNr INNER JOIN
                      dbo.Applikation ON dbo.VertragselementApplikation.Applikationnr = dbo.Applikation.ApplikationNr INNER JOIN
                      dbo.LizenzVertragselementApplikation ON 
                      dbo.VertragselementApplikation.VertragselementApplikationnr = dbo.LizenzVertragselementApplikation.VertragselementApplikationNr LEFT OUTER JOIN
                      dbo.ApplikationVersion ON dbo.VertragselementApplikation.ApplikationVersionNr = dbo.ApplikationVersion.ApplikationVersionNr
WHERE     dbo.LizenzVertragselementApplikation.Lizenznr=@lizenznr  AND vertragselementapplikation.VertragselementApplikationnr=-9999  

INSERT INTO #tmp1
SELECT     dbo.VertragselementApplikation.VertragselementApplikationnr, 0 AS Vertragspartnernr, '' AS Vertragspartner,  dbo.LizenzvertragselementApplikation.Hyperlink_Vertrag AS Vertragselement, --'' AS Vertragselement, 
                      dbo.Applikation.ApplikationNr, 
                      dbo.Applikation.Bezeichnung AS Applikation, dbo.ApplikationVersion.ApplikationVersionNr, dbo.ApplikationVersion.Version, 
                      dbo.LizenzVertragselementApplikation.Aktiv, dbo.LizenzVertragselementApplikation.Erstellt_am, dbo.LizenzVertragselementApplikation.Mutiert_am, 
                      dbo.LizenzVertragselementApplikation.Mutierer, dbo.VertragselementApplikation.BezeichnungLizenverwaltung, dbo.LizenzVertragselementApplikation.Lizenznr, 
                      dbo.LizenzVertragselementApplikation.LizenzVEApplNr,dbo.LizenzVertragselementApplikation.Bemerkung
FROM         dbo.VertragselementApplikation INNER JOIN
                      dbo.Applikation ON dbo.VertragselementApplikation.Applikationnr = dbo.Applikation.ApplikationNr INNER JOIN
                      dbo.LizenzVertragselementApplikation ON 
                      dbo.VertragselementApplikation.VertragselementApplikationnr = dbo.LizenzVertragselementApplikation.VertragselementApplikationNr LEFT OUTER JOIN
                      dbo.ApplikationVersion ON dbo.VertragselementApplikation.ApplikationVersionNr = dbo.ApplikationVersion.ApplikationVersionNr
WHERE     (dbo.LizenzVertragselementApplikation.Lizenznr = @lizenznr) AND (dbo.VertragselementApplikation.Vertragselementnr = - 99)

SELECT * FROM #tmp1
DROP TABLE #tmp1
END






GO






GO

DROP PROCEDURE [dbo].[sp_get_vertragselement_applikation]
GO

/****** Object:  StoredProcedure [dbo].[sp_get_vertragselement_applikation]    Script Date: 11.08.2018 10:33:17 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER OFF
GO


CREATE PROCEDURE [dbo].[sp_get_vertragselement_applikation]
	@KeyValue INT,
	@mitarbeiternr INT
AS
--  SELECT   dbo.VertragselementApplikation.VertragselementApplikationnr, 
--           dbo.VertragselementApplikation.Vertragselementnr, 
--           dbo.VertragselementApplikation.Applikationnr, 
--           dbo.Vertragselement.Bezeichnung as Vertragselement, dbo.Applikation.Bezeichnung AS Applikation,
--	       dbo.VertragselementApplikation.Bemerkung, dbo.VertragselementApplikation.Aktiv, 
--           dbo.VertragselementApplikation.Erstellt_am, dbo.VertragselementApplikation.Mutiert_am, 
--		   dbo.VertragselementApplikation.Mutierer
--   into #tmp1 
--   FROM    dbo.VertragselementApplikation INNER JOIN
--           dbo.Vertragselement ON dbo.VertragselementApplikation.Vertragselementnr = dbo.Vertragselement.Vertragselementnr INNER JOIN
--           dbo.Applikation ON dbo.VertragselementApplikation.Applikationnr = dbo.Applikation.ApplikationNr
--   where   dbo.vertragselementapplikation.applikationnr=@keyvalue and
--           dbo.vertragselement.SecurityLevelnr<=dbo.Get_SecurityLevel(@mitarbeiternr) and
--           dbo.vertragselementapplikation.aktiv=1
--   order   by dbo.applikation.bezeichnung


--insert into #tmp1
--   SELECT     - 99 AS vertragselementapplikationsnr, dbo.Vertragselement.Vertragselementnr, dbo.Applikation.ApplikationNr, dbo.Vertragselement.Bezeichnung AS Vertragselement, 
--                      dbo.Applikation.Bezeichnung AS Applikation, 'Lizenzelemnt' AS bemekrung, 1 AS aktiv, dbo.Vertragselement.Erstellt_am, dbo.Vertragselement.Mutiert_am, 
--                      dbo.Vertragselement.Mutierer
--   FROM         dbo.Vertragselement INNER JOIN
--                      dbo.Applikation ON dbo.Vertragselement.ApplikationNr = dbo.Applikation.ApplikationNr INNER JOIN
--                      dbo.Vertragstyp ON dbo.Vertragselement.VertragstypNr = dbo.Vertragstyp.Vertragstypnr
--   WHERE     (dbo.Vertragselement.Aktiv = 1) AND (dbo.Vertragstyp.AlsLizenz = 1) and
--                dbo.vertragselement.SecurityLevelnr<=dbo.Get_SecurityLevel(@mitarbeiternr)
--              and dbo.applikation.applikationnr=@keyvalue
--DROP TABLE #tmp1



SELECT        dbo.VertragselementApplikation.VertragselementApplikationnr, 0 AS Vertragselementnr, dbo.VertragselementApplikation.Applikationnr, ISNULL(dbo.LizenzVertragselementApplikation.Hyperlink_Vertrag,'') AS Vertragselement, 
                         dbo.Applikation.Bezeichnung AS Applikation, 'Lizenzelement' AS Bemerkung, 1 AS Aktiv, dbo.LizenzVertragselementApplikation.Erstellt_am, dbo.LizenzVertragselementApplikation.Mutiert_am, 
                         dbo.LizenzVertragselementApplikation.Mutierer
   INTO #tmp1 
FROM            dbo.LizenzVertragselementApplikation INNER JOIN
                         dbo.VertragselementApplikation ON dbo.LizenzVertragselementApplikation.VertragselementApplikationNr = dbo.VertragselementApplikation.VertragselementApplikationnr INNER JOIN
                         dbo.Applikation ON dbo.VertragselementApplikation.Applikationnr = dbo.Applikation.ApplikationNr

WHERE        (dbo.VertragselementApplikation.Applikationnr = @keyvalue) AND dbo.VertragselementApplikation.aktiv=1 AND dbo.LizenzVertragselementApplikation.aktiv=1
AND ISNULL(dbo.LizenzVertragselementApplikation.Hyperlink_Vertrag,'')<>''




SELECT DISTINCT * FROM #tmp1 WHERE VertragselementApplikationnr >-1
DROP TABLE #tmp1

GO


DROP PROCEDURE [dbo].[sp_get_lizenz_vertragselement_applikation]
GO

/****** Object:  StoredProcedure [dbo].[sp_get_lizenz_vertragselement_applikation]    Script Date: 11.08.2018 17:24:53 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO





-- =============================================
-- Author:		<Author,,Name>
-- Create date: <Create Date,,>
-- Description:	<Description,,>
-- =============================================
CREATE PROCEDURE [dbo].[sp_get_lizenz_vertragselement_applikation]
@mitarbeiternr AS INTEGER,
@lizenznr AS INTEGER
AS
BEGIN
	SET NOCOUNT ON;
--SELECT     dbo.VertragselementApplikation.VertragselementApplikationnr, dbo.Vertragspartner.VertragspartnerNr, 
--                      dbo.Vertragspartner.NameZ1 + ', ' + dbo.Vertragspartner.Ort AS Vertragspartner, dbo.LizenzvertragselementApplikation.Hyperlink_Vertrag AS Vertragselement, -- dbo.Vertragselement.Bezeichnung AS Vertragselement, 
--					  dbo.Applikation.ApplikationNr, 
--                      dbo.Applikation.Bezeichnung AS Applikation, dbo.ApplikationVersion.ApplikationVersionNr, dbo.ApplikationVersion.Version, dbo.LizenzVertragselementApplikation.Aktiv, 
--                      dbo.LizenzVertragselementApplikation.Erstellt_am, dbo.LizenzVertragselementApplikation.Mutiert_am, dbo.LizenzVertragselementApplikation.Mutierer, 
--                      dbo.VertragselementApplikation.BezeichnungLizenverwaltung, dbo.LizenzVertragselementApplikation.Lizenznr, 
--                      dbo.LizenzVertragselementApplikation.LizenzVEApplNr, dbo.LizenzVertragselementApplikation.Bemerkung
--INTO #tmp1                      
--FROM         dbo.VertragselementApplikation INNER JOIN
--                      dbo.Vertragselement ON dbo.VertragselementApplikation.Vertragselementnr = dbo.Vertragselement.Vertragselementnr INNER JOIN
--                      dbo.Vertragspartner ON dbo.Vertragselement.VertragspartnerNr = dbo.Vertragspartner.VertragspartnerNr INNER JOIN
--                      dbo.Applikation ON dbo.VertragselementApplikation.Applikationnr = dbo.Applikation.ApplikationNr INNER JOIN
--                      dbo.LizenzVertragselementApplikation ON 
--                      dbo.VertragselementApplikation.VertragselementApplikationnr = dbo.LizenzVertragselementApplikation.VertragselementApplikationNr LEFT OUTER JOIN
--                      dbo.ApplikationVersion ON dbo.VertragselementApplikation.ApplikationVersionNr = dbo.ApplikationVersion.ApplikationVersionNr
--WHERE     dbo.LizenzVertragselementApplikation.Lizenznr=@lizenznr  AND vertragselementapplikation.VertragselementApplikationnr=-9999  

--INSERT INTO #tmp1
SELECT     dbo.VertragselementApplikation.VertragselementApplikationnr, 0 AS Vertragspartnernr, '' AS Vertragspartner,  dbo.LizenzvertragselementApplikation.Hyperlink_Vertrag AS Vertragselement, --'' AS Vertragselement, 
                      dbo.Applikation.ApplikationNr, 
                      dbo.Applikation.Bezeichnung AS Applikation, dbo.ApplikationVersion.ApplikationVersionNr, dbo.ApplikationVersion.Version, 
                      dbo.LizenzVertragselementApplikation.Aktiv, dbo.LizenzVertragselementApplikation.Erstellt_am, dbo.LizenzVertragselementApplikation.Mutiert_am, 
                      dbo.LizenzVertragselementApplikation.Mutierer, dbo.VertragselementApplikation.BezeichnungLizenverwaltung, dbo.LizenzVertragselementApplikation.Lizenznr, 
                      dbo.LizenzVertragselementApplikation.LizenzVEApplNr,dbo.LizenzVertragselementApplikation.Bemerkung
FROM         dbo.VertragselementApplikation INNER JOIN
                      dbo.Applikation ON dbo.VertragselementApplikation.Applikationnr = dbo.Applikation.ApplikationNr INNER JOIN
                      dbo.LizenzVertragselementApplikation ON 
                      dbo.VertragselementApplikation.VertragselementApplikationnr = dbo.LizenzVertragselementApplikation.VertragselementApplikationNr LEFT OUTER JOIN
                      dbo.ApplikationVersion ON dbo.VertragselementApplikation.ApplikationVersionNr = dbo.ApplikationVersion.ApplikationVersionNr
WHERE     (dbo.LizenzVertragselementApplikation.Lizenznr = @lizenznr) AND (dbo.VertragselementApplikation.Vertragselementnr = - 99)

--SELECT * FROM #tmp1
--DROP TABLE #tmp1
END






GO


DROP PROCEDURE [dbo].[sp_get_dokumente]
GO

/****** Object:  StoredProcedure [dbo].[sp_get_dokumente]    Script Date: 12.08.2018 13:42:04 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO


CREATE PROCEDURE [dbo].[sp_get_dokumente]
---------------------------------------------------------------------------------
-- Stored procedure that will select all rows from the table 'Kuendigungsfrist'
-- Returns: @iErrorCode int
---------------------------------------------------------------------------------
	@keyvalue INT,
	@doktype INT,
	@mitarbeiternr INT
AS
SELECT     0 AS DokIcon, dbo.Dokument.DokumentNr, dbo.Dokument.KeyValue, dbo.Dokumenttyp.Bezeichnung AS Dokumenttyp, dbo.Dokument.Bezeichnung AS Bezeichnung, dbo.Dokument.Beschreibung, 
                      dbo.Dokument.Filename, dbo.Dokument.OriginalFilename_incl_Path, dbo.Dokument.Version, dbo.Dokument.VersionsNr, dbo.Dokument.Versionsdatum, 
                      dbo.Dokument.Erstellt_am, dbo.Dokument.Mutiert_am, dbo.Dokument.Mutierer, dbo.Dokument.Aktiv, dbo.Dokument.SecurityLevelNr, dbo.dokument.hyperlink
FROM         dbo.Dokument INNER JOIN
                      dbo.Dokumenttyp ON dbo.Dokument.DokumenttypNr = dbo.Dokumenttyp.Dokumenttypnr
WHERE dbo.dokument.SecurityLevelnr<=dbo.Get_SecurityLevel(@mitarbeiternr) AND Keyvalue = @keyvalue AND doktype=@doktype
ORDER BY dbo.dokument.erstellt_am DESC



RETURN





GO

