Files
ETS/ETS_Data/SQL/ETS_PROJ/ETS_PROJ_2110.sql
T
2021-10-15 17:27:37 +02:00

84 lines
2.1 KiB
Transact-SQL

-- modifiche 2021.10 x gestione assegnazione gruppi, ordinamento, visualizzazione gruppi in Bazaar
USE [ETS_PROJ]
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- modifica tab Dip2ATR
alter TABLE [dbo].[Dip2ATR]
ADD [GrpOrder] [int] NOT NULL DEFAULT 1
GO
-- fix ordinamento dipendenti in gruppi
update Dip2ATR
set GrpOrder = RIGHT(Gruppo,2)
GO
-- rimozione ordinamento dal gruppi ( riduzione a VERI gruppi)
update Dip2ATR
set gruppo = REPLACE(gruppo, RIGHT(Gruppo,3),'')
GO
-- tab gruppi
CREATE TABLE [dbo].[AnagGruppi](
[Gruppo] [nvarchar](50) NOT NULL,
[Descrizione] [nvarchar](250) NOT NULL,
[OrdGruppo] [int] NOT NULL,
[Visibile] [bit] NOT NULL,
CONSTRAINT [PK_AnagGruppi] PRIMARY KEY CLUSTERED
(
[Gruppo] ASC
)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON, FILLFACTOR = 100) ON [PRIMARY]
) ON [PRIMARY]
GO
ALTER TABLE [dbo].[AnagGruppi] ADD CONSTRAINT [DF_AnagGruppi_Gruppo] DEFAULT ('') FOR [Gruppo]
GO
ALTER TABLE [dbo].[AnagGruppi] ADD CONSTRAINT [DF_AnagGruppi_Descrizione] DEFAULT ('-') FOR [Descrizione]
GO
ALTER TABLE [dbo].[AnagGruppi] ADD CONSTRAINT [DF_AnagGruppi_OrdGruppo] DEFAULT ((1)) FOR [OrdGruppo]
GO
ALTER TABLE [dbo].[AnagGruppi] ADD CONSTRAINT [DF_AnagGruppi_Visibile] DEFAULT ((1)) FOR [Visibile]
GO
-- popolamento tab gruppi già ordinati
insert into AnagGruppi
select distinct REPLACE(gruppo, LEFT(gruppo,3),'') as gruppo, gruppo as descrizione, left(gruppo, 2) as OrdGruppo, 1 as visibile from dip2atr
GO
-- sistemo gruppi sugli utenti
UPDATE Dip2ATR
SET Gruppo = REPLACE(gruppo, LEFT(gruppo,3),'')
GO
-- sistemo le stored collegate
/**********************************************************
* STORED stp_D2ATR_getBazOrd
*
* recupera elenco dipendenti abilitati a bazaar ordinati x i gruppi validi
*
* mod: S.E.L. 2013.09.04 - release
* mod: S.E.L. 2021.10.15 revisione sistema gruppi ed ordinamento
*
**********************************************************/
ALTER PROCEDURE [dbo].[stp_D2ATR_getBazOrd]
AS
SELECT D2A.*
FROM Dip2ATR D2A
INNER JOIN AnagGruppi AG ON D2A.Gruppo = AG.Gruppo
ORDER BY AG.OrdGruppo, D2A.GrpOrder
RETURN
GO