USE [Vertragsverwaltung_20160404]
GO
/****** Object:  StoredProcedure [dbo].[sp_vertragsuebersicht_get_Struktur_Vertragstyp]    Script Date: 02.12.2016 09:08:53 ******/
DROP PROCEDURE [dbo].[sp_vertragsuebersicht_get_Struktur_Vertragstyp]
GO
/****** Object:  StoredProcedure [dbo].[sp_vertragsuebersicht_get_Struktur_Vertragstyp]    Script Date: 02.12.2016 09:08:55 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO

CREATE proc [dbo].[sp_vertragsuebersicht_get_Struktur_Vertragstyp] 
@vertragstypnr int,
@mitarbeiternr int, 
@details int,
@suchstring varchar(255)
as

CREATE TABLE #tmpd(
	[vertragselementnr] [int]  ,
	[bezeichnung] [varchar] (255) null,
	[parentid] [int] null,
	[Vertragstypnr] [int],
	[aktiv] [bit] null
) ON [DEFAULT]

set @suchstring='%'+@suchstring+'%'
declare @vnr int
declare @vtype varchar(255)
declare @tmpid int
declare @tmpid_base int
declare @aktiv bit
set @tmpid=-100

----------------------------------------------------------------------------------------------------------
-- Struktur nach Vertragstyp
----------------------------------------------------------------------------------------------------------
insert #tmpd (vertragselementnr, bezeichnung, parentid, vertragstypnr, aktiv) values(0,'Root',null,0,1)
-- S„mtliche relevanten Root-Strukturen auslesen - nur diejenigen, bei welchen Vertragselemente vorhanden sind und der User berechtigt ist
if substring(@suchstring,2,2)='V:' or @suchstring='' begin
    set @suchstring='%'+substring(@suchstring,4,len(@suchstring)-3)
    print @suchstring
    declare firstloop cursor for
	SELECT distinct dbo.Vertragselement.VertragspartnerNr, 
               dbo.Vertragspartner.NameZ1 + ' ' + dbo.Vertragspartner.NameZ2 + ', ' + dbo.Vertragspartner.PLZ + ' ' + dbo.Vertragspartner.Ort AS Partner,
			   dbo.Vertragspartner.aktiv	
               --,dbo.Vertragselement.Vertragselementnr
	FROM   dbo.Vertragselement INNER JOIN
               dbo.Vertragspartner ON dbo.Vertragselement.VertragspartnerNr = dbo.Vertragspartner.VertragspartnerNr
	WHERE  (dbo.Vertragselement.Aktiv = 1) AND (dbo.Vertragselement.VertragstypNr = @vertragstypnr) 
    and (dbo.Vertragselement.SecurityLevelNr in (select SecurityLevelNr from dbo.Get_SecurityLevelTab(@mitarbeiternr)))
    and (dbo.vertragspartner.namez1 like @suchstring or dbo.vertragspartner.namez2 like @suchstring or dbo.vertragspartner.ort like @suchstring)

   open firstloop
   fetch next from firstloop into @vnr, @vtype, @aktiv
   while @@fetch_status=0 begin
      insert #tmpd (vertragselementnr, bezeichnung, parentid, vertragstypnr, aktiv) values(@tmpid,@vtype,0,@vnr, @aktiv)
      set @tmpid=@tmpid-1
      fetch next from firstloop into @vnr, @vtype, @aktiv
   end
   close firstloop
   deallocate firstloop	
   if @details=0 begin
      delete from #tmpd where parentid > 0
   end
   select distinct  * from #tmpd order by bezeichnung
   return
end
return



GO