83xav9uc

1declare @l int=65
2declare @v int=66
3declare @c int=(select cast(substring(dbver,2,9) as int) from lic)
4if(@c not between @l and @v) begin print('dbver er v'+cast(@c as varchar(10))+', ventet mellom v'+cast(@l as varchar(10))+' og v'+cast(@v as varchar(10))+'. Avbryter.') set noexec on end
5update lic set dbver='v'+cast(@v as varchar(10))
6
7GO
8
9IF EXISTS(SELECT * FROM INFORMATION_SCHEMA.COLUMNS WHERE TABLE_NAME = 'LogStilling' AND COLUMN_NAME = 'ChangeUser' AND CHARACTER_MAXIMUM_LENGTH<50)
10BEGIN
11	ALTER TABLE [LogStilling] ALTER COLUMN [ChangeUser] varchar(50)
12END
13
14GO
15
16IF EXISTS(SELECT * FROM INFORMATION_SCHEMA.COLUMNS WHERE TABLE_NAME = 'LogStilling' AND COLUMN_NAME = 'CreateUser' AND CHARACTER_MAXIMUM_LENGTH<50)
17BEGIN
18	ALTER TABLE [LogStilling] ALTER COLUMN [CreateUser] varchar(50)
19END
20
21GO
22
23IF EXISTS (SELECT 1 FROM sys.objects WHERE object_id=OBJECT_ID(N'[dbo].[AnsattAdgangLinjer]') AND [type] IN (N'TR'))
24BEGIN
25	DROP TRIGGER [dbo].[AnsattAdgangLinjer]
26END
27
28GO
29
30--Change date: <<<|||20191118|||>>>
31CREATE TRIGGER [dbo].[AnsattAdgangLinjer] ON [dbo].[AdgangAnsatt] FOR insert,update,delete AS
32BEGIN
33	IF EXISTS(SELECT 1 FROM deleted LEFT JOIN inserted ON inserted.Brukernavn=deleted.Brukernavn AND inserted.Adgangsektor=deleted.Adgangsektor AND inserted.Adgangkode=deleted.Adgangkode AND inserted.Fradato=deleted.Fradato AND inserted.Tildato=deleted.Tildato WHERE inserted.Brukernavn IS NULL)
34	BEGIN
35		DELETE AdgangLinjer
36		FROM deleted
37		INNER JOIN AdgangLinjer ON AdgangLinjer.BrukerNavn=deleted.BrukerNavn AND AdgangLinjer.Adgangkode>0 AND AdgangLinjer.Fradato IS NULL AND AdgangLinjer.Tildato IS NULL AND AdgangLinjer.changeuser='AvansTrigger'
38		INNER JOIN Tekst T52 ON T52.GrpNr=52 AND T52.TekstNr='AdgangSektor'
39		INNER JOIN Soknad ON Soknad.SoknadID=AdgangLinjer.SoknadId and ((T52.Tekst2='Tiltaktilbydt' AND ISNULL(Soknad.Tiltak,0)=deleted.Adgangsektor) OR (T52.Tekst2='TeamAdgang' AND ISNULL(Soknad.TeamAdgang,0)=deleted.Adgangsektor))
40		LEFT JOIN (
41			SELECT
42			 Soknad.SoknadID
43			,inserted.BrukerNavn
44			,inserted.Adgangkode
45			,inserted.Fradato
46			,inserted.Tildato
47			FROM inserted
48			INNER JOIN Tekst T52 ON T52.GrpNr=52 AND T52.TekstNr='AdgangSektor'
49			INNER JOIN Soknad ON (T52.Tekst2='Tiltaktilbydt' AND ISNULL(Soknad.Tiltak,0)=inserted.Adgangsektor) OR (T52.Tekst2='TeamAdgang' AND ISNULL(Soknad.TeamAdgang,0)=inserted.Adgangsektor)
50		) Behold ON Behold.SoknadID=Soknad.SoknadID AND Behold.Brukernavn=AdgangLinjer.BrukerNavn AND Behold.Adgangkode=deleted.Adgangkode AND Behold.Fradato=deleted.Fradato AND Behold.Tildato=deleted.Tildato
51		WHERE Behold.SoknadID IS NULL
52	END
53	IF EXISTS(SELECT 1 FROM inserted LEFT JOIN deleted ON deleted.Brukernavn=inserted.Brukernavn AND deleted.Adgangsektor=inserted.Adgangsektor AND deleted.Adgangkode=inserted.Adgangkode AND deleted.Fradato=inserted.Fradato AND deleted.Tildato=inserted.Tildato WHERE deleted.Brukernavn IS NULL)
54	BEGIN
55		INSERT INTO [AdgangLinjer] (SoknadID,[BrukerNavn],[Adgangkode],[Fradato],[Tildato],[createdt],[createuser],[changedt],[changeuser])
56		SELECT
57		 Soknad.SoknadID
58		,inserted.BrukerNavn
59		,inserted.Adgangkode
60		,inserted.Fradato
61		,inserted.Tildato
62		,GETDATE()
63		,'AvansTrigger'
64		,GETDATE()
65		,'AvansTrigger'--AnsattAdgangLinjer
66		FROM inserted
67		INNER JOIN Tekst T52 ON T52.GrpNr=52 AND T52.TekstNr='AdgangSektor'
68		INNER JOIN Soknad ON (T52.Tekst2='Tiltaktilbydt' AND ISNULL(Soknad.Tiltak,0)=inserted.Adgangsektor) OR (T52.Tekst2='TeamAdgang' AND ISNULL(Soknad.TeamAdgang,0)=inserted.Adgangsektor)
69		LEFT JOIN AdgangLinjer ON AdgangLinjer.BrukerNavn=inserted.Brukernavn AND AdgangLinjer.SoknadId=Soknad.SoknadID
70		WHERE AdgangLinjer.SoknadId IS NULL
71	END
72END
73
74GO
75
76IF EXISTS (SELECT 1 FROM sys.objects WHERE object_id=OBJECT_ID(N'[dbo].[SoknadAdgang]') AND [type] IN (N'TR'))
77BEGIN
78	DROP TRIGGER [dbo].[SoknadAdgang]
79END
80
81GO
82
83--Change date: <<<|||20191118|||>>>
84CREATE TRIGGER [dbo].[SoknadAdgang] ON [dbo].[Soknad] FOR insert,update,delete AS
85BEGIN
86	IF EXISTS (SELECT 1 FROM deleted)
87	BEGIN
88		DELETE AdgangLinjer
89		FROM deleted
90		INNER JOIN AdgangLinjer ON AdgangLinjer.SoknadId=deleted.SoknadID AND AdgangLinjer.changeuser='AvansTrigger'
91		LEFT JOIN (
92			SELECT
93			 inserted.SoknadID
94			,AdgangAnsatt.BrukerNavn
95			FROM inserted
96			INNER JOIN Tekst T52 ON T52.GrpNr=52 AND T52.TekstNr='AdgangSektor'
97			INNER JOIN AdgangAnsatt ON ((AdgangAnsatt.Adgangsektor=ISNULL(inserted.Tiltak,0) AND T52.Tekst2='Tiltaktilbydt') OR (AdgangAnsatt.Adgangsektor=ISNULL(inserted.TeamAdgang,0) AND T52.Tekst2='TeamAdgang'))
98		) Behold ON Behold.SoknadID=deleted.SoknadID AND Behold.Brukernavn=AdgangLinjer.BrukerNavn
99		WHERE Behold.SoknadID IS NULL
100	END
101	IF EXISTS (SELECT 1 FROM inserted)
102	BEGIN
103		INSERT INTO [AdgangLinjer] ([SoknadID],[BrukerNavn],[Adgangkode],[Fradato],[Tildato],[createdt],[createuser],[changedt],[changeuser])
104		SELECT
105		 inserted.SoknadID
106		,AdgangAnsatt.BrukerNavn
107		,AdgangAnsatt.Adgangkode
108		,AdgangAnsatt.Fradato
109		,AdgangAnsatt.Tildato
110		,GETDATE()
111		,'AvansTrigger'
112		,GETDATE()
113		,'AvansTrigger'--SoknadAdgangTrigger
114		FROM inserted
115		INNER JOIN Tekst T52 ON T52.GrpNr=52 AND T52.TekstNr='AdgangSektor'
116		INNER JOIN AdgangAnsatt ON ((AdgangAnsatt.Adgangsektor=ISNULL(inserted.Tiltak,0) AND T52.Tekst2='Tiltaktilbydt') OR (AdgangAnsatt.Adgangsektor=ISNULL(inserted.TeamAdgang,0) AND T52.Tekst2='TeamAdgang'))
117		LEFT JOIN AdgangLinjer ON AdgangLinjer.SoknadID=inserted.SoknadID AND AdgangLinjer.Brukernavn=Adgangansatt.Brukernavn
118		WHERE AdgangLinjer.SoknadId IS NULL
119	END
120END
121
122GO
123
124delete from Actor where BrukerNavn in ('MonicaAO','ArveAO','MagnarAO','KjetilAO','MartineAO','TerjeAO')
125delete from LogActor where BrukerNavn in ('MonicaAO','ArveAO','MagnarAO','KjetilAO','MartineAO','TerjeAO')
126update Actor set Passord='785D957FCEC9E057B4EC16FEC973FFB959BB6BE9' where isnull(Passord,'')='' and BrukerNavn in ('ReginaAO','ThomasAO','KristianAO','ChristerAO','SveinungAO')
127update Actor set PassordDato=getdate() where BrukerNavn in ('ReginaAO','ThomasAO','KristianAO','ChristerAO','SveinungAO')
128update Actor set Passord='D033E22AE348AEB5660FC2140AEC35850C4DA998' where BrukerNavn='admin' and Passord='D033E22AE348AEB5660FC2140AEC35850C4DA997'
129delete AdgangLinjer from AdgangLinjer left join Actor on Actor.BrukerNavn=AdgangLinjer.BrukerNavn where Actor.actno is null
130update AdgangLinjer set changeuser='AvansTrigger' where changeuser in ('AnsattAdgangLinjer','InsertFraAdgangRoller','SoknadAdgangTrigger','KonvSoknad')
131
132GO
133
134IF NOT EXISTS(SELECT 1 FROM sys.objects WHERE object_id=OBJECT_ID(N'[dbo].[PasientMenySok]') AND [type] in (N'P',N'PC'))
135BEGIN
136	EXEC('CREATE PROC [dbo].[PasientMenySok] AS SELECT 1')
137END
138
139GO
140
141--Change date: <<<|||20191120|||>>>
142ALTER proc [dbo].[PasientMenySok] (@Sok nvarchar(200),@BrukerRegion nvarchar(10),@BrukerActno nvarchar(20)) as
143select
144 Actor.actno
145,Actor.Navn+' ('+cast(count(Soknad.SoknadID) as nvarchar(20))+')' as Navn
146,isnull(max(Soknad.SoknadID),0) as SoknadID
147,isnull(Actor.tlfmobil,'') as tlfmobil
148from Actor
149left join Soknad on Soknad.ActNo=Actor.actno
150left join TiltakTilbydt on TiltakTilbydt.ID=Soknad.Tiltak
151left join Distrikt on Distrikt.ID=TiltakTilbydt.Distrikt and Distrikt.Region=isnull(@BrukerRegion,-1)
152left join AnsattDistrikt on AnsattDistrikt.DistriktID=Distrikt.ID and AnsattDistrikt.Actno=@BrukerActno
153inner join Tekst T52 on T52.GrpNr=52 and T52.TekstNr='AdgangSektor'
154inner join Actor Ansatt on Ansatt.actno=@BrukerActno
155inner join AdgangAnsatt on ((AdgangAnsatt.Adgangsektor=isnull(Soknad.Tiltak,0) and T52.Tekst2='Tiltaktilbydt') or (AdgangAnsatt.Adgangsektor=isnull(Soknad.TeamAdgang,0) AND T52.Tekst2='TeamAdgang')) and AdgangAnsatt.Brukernavn=Ansatt.BrukerNavn
156left join AdgangLinjer on AdgangLinjer.BrukerNavn=Ansatt.BrukerNavn and AdgangLinjer.SoknadId=Soknad.SoknadID
157where Actor.pasient=1
158and ((isnumeric(@Sok)=1 and Actor.Personnr like @Sok+'%') or (isnumeric(@Sok)<>1 and Actor.Navn like '%'+@Sok+'%'))
159and (
160    Soknad.SoknadID is null
161    or (
162        AdgangLinjer.Adgangkode>0
163        and (
164            isnull(TiltakTilbydt.Distrikt,-1)=-1
165            or AnsattDistrikt.DistriktID is not null
166        )
167    )
168)
169group by Actor.actno,Actor.Navn,Actor.tlfmobil
170
171GO
172
173IF NOT EXISTS(SELECT 1 FROM sys.objects WHERE object_id=OBJECT_ID(N'[dbo].[r_Deltakeroversikt]') AND [type] in (N'P',N'PC'))
174BEGIN
175	EXEC('CREATE PROC [dbo].[r_Deltakeroversikt] AS SELECT 1')
176END
177
178GO
179
180--Change date: <<<|||20191114|||>>>
181ALTER proc [dbo].[r_Deltakeroversikt] (@fradato date, @tildato date, @distrikt int = -1, @region varchar(MAX) = '-1') as
182select
183 @fradato as Periodestart
184,@tildato as Periodeslutt
185,isnull(Actor.Navn,'Slettet deltaker') as Navn
186,Actor.Personnr as Personnr
187,isnull(convert(date,Actor.fdt,114),'') as Fødselsdato
188,case dbo.Kjonn(Actor.Personnr)
189	when 0 then 0.
190	when 1 then 1.
191	else NULL end as Kjønn
192,dbo.GetAge(Actor.fdt, Soknad.TiltakOppstartdato) as AlderOppstart
193,Soknad.TiltakOppstartdato as Startdato
194,Soknad.TiltakAvsluttdato as Sluttdato
195,isnull(dbo.fTxt(36,Tiltak.Sluttarsak),'') Sluttårsak
196,isnull((select Navn
197	from Actor A
198	where actno in (select top 1 actno
199		from SoknadActor
200		where SoknadId=Soknad.SoknadID
201		and Bestiller=1
202		order by SoknadActor.Fra desc)),'')
203	as Innsøker
204,isnull(Soknad.SoknadDato,'') as Søkedato
205,isnull(dbo.gKommuneNavn(Actor.Postnr),'') as Kommune
206,isnull(dbo.gFylkeNavn(Actor.Postnr),'') as Fylke
207,isnull((select coalesce(Navn2, Navn)
208	from Actor A
209	where actno = (select top 1 actno
210		from SoknadActor
211		where SoknadId=Soknad.SoknadID
212		and [TYPE]=2)),'')
213	as Saksbehandler
214,isnull(coalesce(Deltakeransvarlig.Navn2, Deltakeransvarlig.Navn),'') as SP
215,isnull(left(TiltakTilbydt.TiltakNavn, isnull(XL.Tekst1,25)),'Ikke bestemt tiltak') as Tiltak
216,isnull(Stilling.Stillingsprosent, 100) as Stillingprosent
217,isnull(Tiltak.GulLapp,'') as Merknad
218,isnull(dbo.fTxt(38, Tiltak.NavYtelse),'') as Ytelse
219,isnull(dbo.fTxt(56, Soknad.Soknadstatus),'') as Søknadsstatus
220,dbo.fActorNavn(Stilling.Virksomhet) as EksterntFirma
221,dbo.fActorNavn(SoknadActor.ActNo) as EksternKontakt
222,dbo.fTxt(30,Stilling.Avdeling) as [ØnsketAvd]
223,isnull(TiltakTilsagn.Plasser,0) as AntallPlasser
224,isnull(TiltakTilsagn.TiltakTilsagnsNr,'Mangler tilsagn') as Tiltaksnummer
225,isnull(Deltakeransvarlig.Navn,'') as Deltakeransvarlig
226,isnull(Deltakeransvarlig.Epost,'') as DeltakeransvarligEpost
227--Statistikker
228,(select COUNT(*)
229	from TallyDato
230	inner join Soknad S on TallyDato.Dato between S.TiltakOppstartdato and S.TiltakAvsluttdato and Soknad.SoknadID=S.SoknadID
231	where TallyDato.Mndnr=1 and YEAR(@fradato)=Tallydato.Ar) as Jan
232,(select COUNT(*)
233	from TallyDato
234	inner join Soknad S on TallyDato.Dato between S.TiltakOppstartdato and S.TiltakAvsluttdato and Soknad.SoknadID=S.SoknadID
235	where TallyDato.Mndnr=2 and YEAR(@fradato)=Tallydato.Ar) as Feb
236,(select COUNT(*)
237	from TallyDato
238	inner join Soknad S on TallyDato.Dato between S.TiltakOppstartdato and S.TiltakAvsluttdato and Soknad.SoknadID=S.SoknadID
239	where TallyDato.Mndnr=3 and YEAR(@fradato)=Tallydato.Ar) as Mar
240,(select COUNT(*)
241	from TallyDato
242	inner join Soknad S on TallyDato.Dato between S.TiltakOppstartdato and S.TiltakAvsluttdato and Soknad.SoknadID=S.SoknadID
243	where TallyDato.Mndnr in (1,2,3) and YEAR(@fradato)=Tallydato.Ar) as [1kv]
244,(select COUNT(*)
245	from TallyDato
246	inner join Soknad S on TallyDato.Dato between S.TiltakOppstartdato and S.TiltakAvsluttdato and Soknad.SoknadID=S.SoknadID
247	where TallyDato.Mndnr=4 and YEAR(@fradato)=Tallydato.Ar) as Apr
248,(select COUNT(*)
249	from TallyDato
250	inner join Soknad S on TallyDato.Dato between S.TiltakOppstartdato and S.TiltakAvsluttdato and Soknad.SoknadID=S.SoknadID
251	where TallyDato.Mndnr=5 and YEAR(@fradato)=Tallydato.Ar) as Mai
252,(select COUNT(*)
253	from TallyDato
254	inner join Soknad S on TallyDato.Dato between S.TiltakOppstartdato and S.TiltakAvsluttdato and Soknad.SoknadID=S.SoknadID
255	where TallyDato.Mndnr=6 and YEAR(@fradato)=Tallydato.Ar) as Jun
256,(select COUNT(*)
257	from TallyDato
258	inner join Soknad S on TallyDato.Dato between S.TiltakOppstartdato and S.TiltakAvsluttdato and Soknad.SoknadID=S.SoknadID
259	where TallyDato.Mndnr in (4,5,6) and YEAR(@fradato)=Tallydato.Ar) as [2kv]
260,(select COUNT(*)
261	from TallyDato
262	inner join Soknad S on TallyDato.Dato between S.TiltakOppstartdato and S.TiltakAvsluttdato and Soknad.SoknadID=S.SoknadID
263	where TallyDato.Mndnr in (1,2,3,4,5,6) and YEAR(@fradato)=Tallydato.Ar) as [1halvår]
264,(select COUNT(*)
265	from TallyDato
266	inner join Soknad S on TallyDato.Dato between S.TiltakOppstartdato and S.TiltakAvsluttdato and Soknad.SoknadID=S.SoknadID
267	where TallyDato.Mndnr=7 and YEAR(@fradato)=Tallydato.Ar) as Jul
268,(select COUNT(*)
269	from TallyDato
270	inner join Soknad S on TallyDato.Dato between S.TiltakOppstartdato and S.TiltakAvsluttdato and Soknad.SoknadID=S.SoknadID
271	where TallyDato.Mndnr=8 and YEAR(@fradato)=Tallydato.Ar) as Aug
272,(select COUNT(*)
273	from TallyDato
274	inner join Soknad S on TallyDato.Dato between S.TiltakOppstartdato and S.TiltakAvsluttdato and Soknad.SoknadID=S.SoknadID
275	where TallyDato.Mndnr=9 and YEAR(@fradato)=Tallydato.Ar) as Sep
276,(select COUNT(*)
277	from TallyDato
278	inner join Soknad S on TallyDato.Dato between S.TiltakOppstartdato and S.TiltakAvsluttdato and Soknad.SoknadID=S.SoknadID
279	where TallyDato.Mndnr in (7,8,9) and YEAR(@fradato)=Tallydato.Ar) as [3kv]
280,(select COUNT(*)
281	from TallyDato
282	inner join Soknad S on TallyDato.Dato between S.TiltakOppstartdato and S.TiltakAvsluttdato and Soknad.SoknadID=S.SoknadID
283	where TallyDato.Mndnr=10 and YEAR(@fradato)=Tallydato.Ar) as Okt
284,(select COUNT(*)
285	from TallyDato
286	inner join Soknad S on TallyDato.Dato between S.TiltakOppstartdato and S.TiltakAvsluttdato and Soknad.SoknadID=S.SoknadID
287	where TallyDato.Mndnr=11 and YEAR(@fradato)=Tallydato.Ar) as Nov
288,(select COUNT(*)
289	from TallyDato
290	inner join Soknad S on TallyDato.Dato between S.TiltakOppstartdato and S.TiltakAvsluttdato and Soknad.SoknadID=S.SoknadID
291	where TallyDato.Mndnr=12 and YEAR(@fradato)=Tallydato.Ar) as Des
292,(select COUNT(*)
293	from TallyDato
294	inner join Soknad S on TallyDato.Dato between S.TiltakOppstartdato and S.TiltakAvsluttdato and Soknad.SoknadID=S.SoknadID
295	where TallyDato.Mndnr in (10,11,12) and YEAR(@fradato)=Tallydato.Ar) as [4kv]
296,(select COUNT(*)
297	from TallyDato
298	inner join Soknad S on TallyDato.Dato between S.TiltakOppstartdato and S.TiltakAvsluttdato and Soknad.SoknadID=S.SoknadID
299	where TallyDato.Mndnr in (7,8,9,10,11,12) and YEAR(@fradato)=Tallydato.Ar) as [2halvår]
300,(select COUNT(*)
301	from TallyDato
302	inner join Soknad S on TallyDato.Dato between S.TiltakOppstartdato and S.TiltakAvsluttdato and Soknad.SoknadID=S.SoknadID
303	where YEAR(@fradato)=Tallydato.Ar) as [HeleÅret]
304,isnull((select top 1 dbo.fTxt(13, Tiltak)
305	from Soknad SS
306	where TiltakAvsluttdato between  DATEADD(d,-2,Soknad.TiltakOppstartdato) and Soknad.TiltakOppstartdato
307	and SS.actno=Soknad.ActNo
308	), 'Direkte') as ForrigeTiltak
309,isnull(Tinfo.Kode2,12) as TiltaksKode
310,isnull(Tiltak.Sluttarsak,'') SluttårsakNr	
311,isnull(Tiltak.FormidletTilSektor,'') FormidletTilSektorNr
312,isnull(dbo.fTxt(405, Tiltak.FormidletTilSektor),'') FormidletTilSektor
313,isnull(Tinfo.Kode2,'') as NavTiltakKode
314,isnull(Sinfo.Kode1,'') as NavSluttArsak
315,FirmaView.*
316from Soknad
317left join Actor on Actor.actno=Soknad.ActNo
318inner join Tiltak on Tiltak.SoknadID=Soknad.SoknadID
319left join Actor Deltakeransvarlig on Soknad.Deltakeransvarlig=Deltakeransvarlig.actno
320inner join TiltakTilbydt on TiltakTilbydt.ID = Soknad.Tiltak and (@region='-1' or TiltakTilbydt.Distrikt in (select Distrikt.ID from (select B.a.value('.','int') as l from (select cast('<M>'+replace(@region,',','</M><M>')+'</M>' as xml) as r) A cross apply r.nodes('/M') as B(a)) R inner join Distrikt on Distrikt.Region=R.l))
321left join TiltakTilsagn on TiltakTilbydt.Tilsagn = TiltakTilsagn.id
322left join Tekst Tinfo on Tinfo.TekstNr=TiltakTilsagn.id and Tinfo.GrpNr=13
323left Join Tekst Sinfo on Sinfo.TekstNr=Tiltak.Sluttarsak and Sinfo.GrpNr=36
324inner join FirmaView on 1=1
325left join Stilling on Stilling.SoknadId=Soknad.SoknadID and Stilling.Startdato <= Soknad.TiltakAvsluttdato and Stilling.Sluttdato >= Soknad.TiltakOppstartdato and Stilling.Startdato <= @tildato and Stilling.Sluttdato >= @fradato --and Stilling.Sluttdato = (Select top 1 ss.sluttdato from stilling as ss where ss.SoknadId = Soknad.SoknadID order by Sluttdato desc) 
326left join Tekst XL on XL.GrpNr=52 and XL.TekstNr = 'ExcelArkNavnMaxTegn'
327left join SoknadActor on SoknadActor.SoknadId = Soknad.SoknadID and SoknadActor.Type = 4 and SoknadActor.Fra = (select top 1 sa.Fra from SoknadActor as sa where sa.SoknadId = soknad.SoknadID order by sa.Fra desc)
328where (
329	Soknad.SoknadID in (select distinct
330	Soknad.SoknadID
331	from Soknad
332	inner join TallyDato on TallyDato.Dato between Soknad.TiltakOppstartdato and Soknad.TiltakAvsluttdato
333	where TallyDato.Dato between @fradato and @tildato)
334)
335and (@distrikt = -1 or (@distrikt > -1 and TiltakTilbydt.Distrikt = @distrikt))
336and dbo.DeltakerMott(Soknad.SoknadID) = 1
337
338GO