This commit is contained in:
skidoodle 2024-03-13 00:33:46 +01:00
commit e124a47765
19374 changed files with 9806149 additions and 0 deletions

View file

@ -0,0 +1,62 @@
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
IF OBJECT_ID('[dbo].[sp_GetTanuloErtekelesMondatbankData]') IS NOT NULL
BEGIN
DROP PROCEDURE [dbo].[sp_GetTanuloErtekelesMondatbankData]
END
GO
-- =============================================
-- Description: <Előszedjük az intézmény értékelés mondatbank adatait a bemenő paraméterek alapján>
-- =============================================
CREATE PROCEDURE [dbo].[sp_GetTanuloErtekelesMondatbankData]
@pIntezmenyId INT
,@pTanevId INT
,@pTanuloErtekelesTipusId INT = NULL
,@pEvfolyamTipusId INT = NULL
,@pTantargyId INT = NULL
,@pEvfolyamTipusNaId INT
,@pTipusId INT
AS
BEGIN
-- SET NOCOUNT ON added to prevent extra result sets from interfering with SELECT statements.
SET NOCOUNT ON;
SELECT
TanuloErtekelesMondatbank.ID ID
,TanuloErtekelesMondatbank.C_ROVIDNEV RovidNev
,TanuloErtekelesMondatbank.C_SZOVEG Szoveg
,TanuloErtekelesMondatbank.C_ERTEKELESTIPUSA TanuloErtekelesTipusId
,TanuloErtekelesMondatbank.C_EVFOLYAMTIPUSA EvfolyamTipusId
,TanuloErtekelesMondatbank.C_TIPUSID TipusId
,CASE --
WHEN TanuloErtekelesMondatbank.C_TIPUSID = 7358 THEN 'Magatartás'
WHEN TanuloErtekelesMondatbank.C_TIPUSID = 7359 THEN 'Szorgalom'
ELSE IIF(TanuloErtekelesMondatbank.C_TANTARGYID IS NULL, 'Mind', Tantargy.C_NEV)
END TantargyNev
FROM
T_ERTEKELESMONDATBANK_OSSZES TanuloErtekelesMondatbank
LEFT JOIN
T_TANTARGY_OSSZES Tantargy ON
Tantargy.ID = TanuloErtekelesMondatbank.C_TANTARGYID
AND Tantargy.C_INTEZMENYID = @pIntezmenyId
AND Tantargy.C_TANEVID = @pTanevId
AND Tantargy.TOROLT = 'F'
WHERE
(@pTanuloErtekelesTipusId IS NULL OR TanuloErtekelesMondatbank.C_ERTEKELESTIPUSA IS NULL OR TanuloErtekelesMondatbank.C_ERTEKELESTIPUSA = @pTanuloErtekelesTipusId)
AND (@pEvfolyamTipusId IS NULL OR @pEvfolyamTipusId = @pEvfolyamTipusNaId OR TanuloErtekelesMondatbank.C_EVFOLYAMTIPUSA IS NULL OR TanuloErtekelesMondatbank.C_EVFOLYAMTIPUSA = @pEvfolyamTipusId)
AND (@pTantargyId IS NULL OR TanuloErtekelesMondatbank.C_TANTARGYID IS NULL OR TanuloErtekelesMondatbank.C_TANTARGYID = @pTantargyId)
AND (@pTipusId IS NULL OR TanuloErtekelesMondatbank.C_TIPUSID = @pTipusId OR (@pTipusId IS NOT NULL AND TanuloErtekelesMondatbank.C_TIPUSID = 7357 AND TanuloErtekelesMondatbank.C_TANTARGYID IS NULL))
AND TanuloErtekelesMondatbank.C_INTEZMENYID = @pIntezmenyId
AND TanuloErtekelesMondatbank.C_TANEVID = @pTanevId
AND TanuloErtekelesMondatbank.TOROLT = 'F'
END
GO

View file

@ -0,0 +1,46 @@
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
IF OBJECT_ID('[dbo].[sp_GetTanuloErtekelesMondatbankExportData]') IS NOT NULL
BEGIN
DROP PROCEDURE [dbo].[sp_GetTanuloErtekelesMondatbankExportData]
END
GO
-- =============================================
-- Description: <Előszedjük az értékelés mondatbank exporthoz az adatokat>
-- =============================================
CREATE PROCEDURE [dbo].[sp_GetTanuloErtekelesMondatbankExportData]
@pIntezmenyId INT
,@pTanevId INT
,@pTanuloErtekelesTipusId INT = NULL
,@pEvfolyamTipusId INT = NULL
,@pTantargyId INT = NULL
,@pTipusId INT
AS
BEGIN
-- SET NOCOUNT ON added to prevent extra result sets from interfering with SELECT statements.
SET NOCOUNT ON;
SELECT
TanuloErtekelesMondatbank.C_ROVIDNEV RovidNev
,TanuloErtekelesMondatbank.C_SZOVEG Szoveg
FROM
T_ERTEKELESMONDATBANK_OSSZES TanuloErtekelesMondatbank
WHERE
(@pTanuloErtekelesTipusId IS NULL OR TanuloErtekelesMondatbank.C_ERTEKELESTIPUSA = @pTanuloErtekelesTipusId)
AND (@pEvfolyamTipusId IS NULL OR TanuloErtekelesMondatbank.C_EVFOLYAMTIPUSA = @pEvfolyamTipusId)
AND (@pTantargyId IS NULL OR TanuloErtekelesMondatbank.C_TANTARGYID = @pTantargyId)
AND ((TanuloErtekelesMondatbank.C_TIPUSID = @pTipusId) OR (@pTipusId = 7357 AND TanuloErtekelesMondatbank.C_TANTARGYID IS NULL))
AND TanuloErtekelesMondatbank.C_INTEZMENYID = @pIntezmenyId
AND TanuloErtekelesMondatbank.C_TANEVID = @pTanevId
AND TanuloErtekelesMondatbank.TOROLT = 'F'
END
GO

View file

@ -0,0 +1,102 @@
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
IF OBJECT_ID('[dbo].[sp_ImportTanuloErtekelesMondatbank]') IS NOT NULL
BEGIN
DROP PROCEDURE [dbo].[sp_ImportTanuloErtekelesMondatbank]
END
GO
-- =============================================
-- Description: <Beimportáljuk a tanuló értékelés mondatbankot>
-- =============================================
CREATE PROCEDURE [dbo].[sp_ImportTanuloErtekelesMondatbank]
@pIntezmenyId INT
,@pTanevId INT
,@pFelhasznaloId INT
,@pImportDataXml XML
,@pTanuloErtekelesTipusId INT = NULL
,@pEvfolyamTipusId INT = NULL
,@pTantargyId INT = NULL
,@pTipusId INT
AS
BEGIN
-- SET NOCOUNT ON added to prevent extra result sets from interfering with SELECT statements.
SET NOCOUNT ON;
DECLARE @tempImportData TABLE (
RovidNev NVARCHAR(3) NOT NULL
,Szoveg NVARCHAR(MAX) NULL
)
DECLARE @currentDateTime DATETIME
SET @currentDateTime = (SELECT GETDATE())
-- XML paraméter értelmezése
INSERT INTO
@tempImportData
SELECT
--Egyszerû import adatok
TanuloErtekelesMondatbankItem.value('(RovidNev)[1]', 'NVARCHAR(3)') RovidNev
,TanuloErtekelesMondatbankItem.value('(Szoveg)[1]', 'NVARCHAR(MAX)') Szoveg
FROM
@pImportDataXml.nodes('/TanuloErtekelesMondatbankImport/TanuloErtekelesMondatbank/TanuloErtekelesMondatbankItem') AS TanuloErtekelesMondatbank(TanuloErtekelesMondatbankItem)
BEGIN TRY
SET XACT_ABORT ON
BEGIN TRANSACTION
INSERT INTO T_ERTEKELESMONDATBANK_OSSZES (
--Egyszerû import adatok
C_ROVIDNEV
,C_SZOVEG
,C_ERTEKELESTIPUSA
,C_EVFOLYAMTIPUSA
,C_TANTARGYID
,C_TIPUSID
--Technikai adatok
,C_INTEZMENYID
,C_TANEVID
,TOROLT
,LASTCHANGED
,CREATED
,MODIFIER
,CREATOR)
SELECT
--Egyszerû import adatok
tempTable.RovidNev
,tempTable.Szoveg
,@pTanuloErtekelesTipusId
,@pEvfolyamTipusId
,@pTantargyId
,@pTipusId
--Technikai adatok
,@pIntezmenyId
,@pTanevId
,'F'
,@currentDateTime
,@currentDateTime
,@pFelhasznaloId
,@pFelhasznaloId
FROM
@tempImportData tempTable
COMMIT TRANSACTION
END TRY
BEGIN CATCH
IF @@TRANCOUNT > 0 AND XACT_STATE() <> 0
ROLLBACK TRANSACTION;
THROW
END CATCH
END
GO