init

Kreta.DataAccess.Migrations/Scripts/Archive/20200214110408_KRETA_9865/uspIntezmenyLetrehozas.sql

@@ -0,0 +1,138 @@
+-- =============================================
+-- Author:		Kecskeméthy Zsolt
+-- Create date: 2016.05.09
+-- Description:	Intézményhez tartozó adatok.
+-- =============================================
+DROP PROCEDURE IF EXISTS [dev].[uspIntezmenyLetrehozas]
+GO
+
+CREATE PROCEDURE [dev].[uspIntezmenyLetrehozas]
+	@fenntartoAzonosito nvarchar(20),
+	@intezmenyAzonosito nvarchar(30),
+	@tanevNeve nvarchar(200),
+	@kovetkezoTanevNeve nvarchar(200),
+	@intezmenyNeve nvarchar(255),
+	@intezmenyIranyitoSzam nvarchar(20),
+	@intezmenyVaros nvarchar(255),
+	@intezmenyKozteruletNev nvarchar(40),
+	@intezmenyKozteruletJelleg int,
+	@intezmenyHazszam nvarchar(30),
+	@intezmenyEmelet nvarchar(40),
+	@intezmenyAjto nvarchar(30),
+	@intezmenyOMKod nvarchar(20),
+	@intezmenyIgazgato nvarchar(255),
+	@intezmenyTagkod nvarchar(50),
+	@intezmenyEmail nvarchar(255),
+	@adminJelszo nvarchar(8),
+	@kellABHet bit,
+	@teljesKreta bit,
+	@dbJelszo nvarchar(50)
+AS
+BEGIN
+	DECLARE @intezmenyID int = (SELECT TOP 1 ID FROM T_INTEZMENY WHERE T_INTEZMENY.C_AZONOSITO = @intezmenyAzonosito);
+
+	-- Létezik-e az intézmény
+	IF(@intezmenyID IS NULL)
+	BEGIN
+		-- Intézmény létrehozása
+		INSERT INTO [dbo].[T_INTEZMENY]
+			   ([C_AZONOSITO]
+			   ,[C_POSZEIDONBEJELENTKEZESINEV]
+			   ,[C_IKTATOSZERVEZETAZONOSITO]
+			   ,[C_FENNTARTOAZONOSITO]
+			   ,[C_FENNTARTOID]
+			   ,[TOROLT]
+			   ,[SERIAL]
+			   ,[LASTCHANGED]
+			   ,[CREATED]
+			   ,[MODIFIER]
+			   ,[CREATOR])
+		 VALUES
+			   (@intezmenyAzonosito
+			   ,@intezmenyAzonosito
+			   ,@intezmenyAzonosito
+			   ,@fenntartoAzonosito
+			   ,0
+			   ,'F'
+			   ,0
+			   ,getdate()
+			   ,getdate()
+			   ,null
+			   ,null)
+		
+		SET @intezmenyID = SCOPE_IDENTITY();
+
+		PRINT 'Intézmény létrehozása sikeres! (ID:' + CAST(@intezmenyID as VARCHAR) + ')';
+	END
+	ELSE
+	BEGIN
+		PRINT 'Már létezik az intézmény! (ID:' + CAST(@intezmenyID AS VARCHAR) + ')';
+		--PRINT 'Kilépés';
+		--RETURN 1;
+	END
+
+	-- Aktuális tanév létrehozása
+	DECLARE @tanevID int = (SELECT TOP 1 ID FROM T_TANEV WHERE T_TANEV.C_NEV = @tanevNeve AND T_TANEV.C_INTEZMENYID = @intezmenyID AND TOROLT = 'F');
+	IF @tanevID IS NULL BEGIN
+	   -- tanéves adatok létrehozása
+	   EXEC [dev].[uspGenerateTanevAdatok] 
+       @intezmenyId = @intezmenyID
+      ,@intezmenyAzonosito = @intezmenyAzonosito
+      ,@tanevNeve = @tanevNeve
+      ,@kovetkezoTanev = 0
+      ,@intezmenyNeve = @intezmenyNeve
+      ,@intezmenyIranyitoSzam = @intezmenyIranyitoSzam
+      ,@intezmenyVaros = @intezmenyVaros
+      ,@intezmenyKozteruletNev = @intezmenyKozteruletNev
+      ,@intezmenyKozteruletJelleg = @intezmenyKozteruletJelleg
+      ,@intezmenyHazszam = @intezmenyHazszam
+      ,@intezmenyEmelet = @intezmenyEmelet
+      ,@intezmenyAjto = @intezmenyAjto
+      ,@intezmenyOMKod = @intezmenyOMKod
+      ,@intezmenyIgazgato = @intezmenyIgazgato
+      ,@intezmenyTagkod = @intezmenyTagkod
+      ,@intezmenyEmail = @intezmenyEmail
+      ,@adminJelszo = @adminJelszo
+      ,@kellABHet = @kellABHet
+      ,@teljesKreta = @teljesKreta
+      ,@dbJelszo = @dbJelszo
+	END
+	ELSE BEGIN
+		PRINT 'Már létezik ilyan tanév! (ID:' + CAST(@tanevID AS VARCHAR) + ', Tanév: '+ @tanevNeve +')';
+	END
+
+	-- Következő tanév létrehozása, ha szükséges
+	IF @kovetkezoTanevNeve IS NOT NULL AND @kovetkezoTanevNeve != '' BEGIN
+		SET @tanevID = (SELECT TOP 1 ID FROM T_TANEV WHERE T_TANEV.C_NEV = @kovetkezoTanevNeve AND T_TANEV.C_INTEZMENYID = @intezmenyID AND TOROLT = 'F');
+		IF @tanevID IS NULL BEGIN
+		   -- tanéves adatok létrehozása
+		  EXEC [dev].[uspGenerateTanevAdatok] 
+         @intezmenyId = @intezmenyID
+        ,@intezmenyAzonosito = @intezmenyAzonosito
+        ,@tanevNeve = @kovetkezoTanevNeve
+        ,@kovetkezoTanev = 1
+        ,@intezmenyNeve = @intezmenyNeve
+        ,@intezmenyIranyitoSzam = @intezmenyIranyitoSzam
+        ,@intezmenyVaros = @intezmenyVaros
+        ,@intezmenyKozteruletNev = @intezmenyKozteruletNev
+        ,@intezmenyKozteruletJelleg = @intezmenyKozteruletJelleg
+        ,@intezmenyHazszam = @intezmenyHazszam
+        ,@intezmenyEmelet = @intezmenyEmelet
+        ,@intezmenyAjto = @intezmenyAjto
+        ,@intezmenyOMKod = @intezmenyOMKod
+        ,@intezmenyIgazgato = @intezmenyIgazgato
+        ,@intezmenyTagkod = @intezmenyTagkod
+        ,@intezmenyEmail = @intezmenyEmail
+        ,@adminJelszo = @adminJelszo
+        ,@kellABHet = @kellABHet
+        ,@teljesKreta = @teljesKreta
+        ,@dbJelszo = @dbJelszo
+		END
+		ELSE BEGIN
+			PRINT 'Már létezik ilyan tanév! (ID:' + CAST(@tanevID AS VARCHAR) + ', Tanév: '+ @kovetkezoTanevNeve +')';
+			PRINT 'Kilépés';
+			RETURN ;
+		END
+	END
+END
+