Files
Samuele E. Locatelli bdd7b413e8 Riaggiunto GMW_data
2016-11-22 17:58:00 +01:00

341 lines
6.6 KiB
Transact-SQL

-- stati prodotto...
alter table AnagStatiProdotto add
CodGruppo nvarchar(50)
go
set xact_abort on
go
begin transaction
go
INSERT INTO dbo.AnagStatiProdotto
VALUES (N'Anim', N'Anima (interna)', N'Finito')
INSERT INTO dbo.AnagStatiProdotto
VALUES (N'AnimExt', N'Anima (esterna)', N'Finito')
go
commit transaction
go
set xact_abort on
go
begin transaction
go
UPDATE dbo.AnagStatiProdotto SET
CodGruppo=N'Wip'
WHERE CodStato=N'DaSmat'
UPDATE dbo.AnagStatiProdotto SET
CodGruppo=N'Wip'
WHERE CodStato=N'DaTran'
UPDATE dbo.AnagStatiProdotto SET
CodGruppo=N'Finito'
WHERE CodStato=N'Fin'
UPDATE dbo.AnagStatiProdotto SET
CodGruppo=N'Mp'
WHERE CodStato=N'MP'
UPDATE dbo.AnagStatiProdotto SET
CodGruppo=N'Mp'
WHERE CodStato=N'MP-NA'
UPDATE dbo.AnagStatiProdotto SET
CodGruppo=N'Wip'
WHERE CodStato=N'Sabb'
UPDATE dbo.AnagStatiProdotto SET
CodGruppo=N'Wip'
WHERE CodStato=N'Tran'
UPDATE dbo.AnagStatiProdotto SET
CodGruppo=N'Wip'
WHERE CodStato=N'Wip'
go
commit transaction
go
-- relazioni UDC
set xact_abort on
go
begin transaction
go
alter table RelazUDC add
dataMod datetime constraint DF_RelazUDC_dataMod default (getdate())
go
commit
go
update RelazUDC
set dataMod ='2012-01-01'
where ISNULL(dataMod,'2012-01-01') = '2012-01-01'
GO
-- blocchi
set xact_abort on
go
begin transaction
go
alter table Blocchi drop
constraint i_CodBlocco ,
constraint FK_Blocchi_AnagMag
go
exec sp_rename 'PK_Blocchi', 'tmp__PK_Blocchi', 'OBJECT'
go
exec sp_rename 'Blocchi', 'tmp__Blocchi_1', 'OBJECT'
go
create table Blocchi(
IdxBlocco int not null constraint PK_Blocchi primary key,
CodMag nvarchar(50),
CodCS nchar(2),
CodBlocco nvarchar(3) not null constraint i_CodBlocco unique,
DescBlocco nvarchar(50),
NumX int,
NumY int,
NumZ int
)
go
alter table Blocchi add
constraint FK_Blocchi_AnagMag foreign key(CodMag,CodCS) references AnagMag(CodMag,CodCS) on update cascade
go
exec sp_addextendedproperty 'MS_Description', 'numero elementi X (colonne)', 'SCHEMA', 'dbo', 'TABLE', 'Blocchi', 'COLUMN', 'NumX'
go
exec sp_addextendedproperty 'MS_Description', 'numero elementi Y (livelli/ripiani)', 'SCHEMA', 'dbo', 'TABLE', 'Blocchi', 'COLUMN', 'NumY'
go
exec sp_addextendedproperty 'MS_Description', 'numero elementi Z (profondita)', 'SCHEMA', 'dbo', 'TABLE', 'Blocchi', 'COLUMN', 'NumZ'
go
insert into Blocchi(IdxBlocco,CodMag,CodCS,CodBlocco,DescBlocco,NumX,NumY,NumZ) select IdxBlocco,CodMag,CodCS,CodBlocco,DescBlocco,NumX,NumY,NumZ from tmp__Blocchi_1
go
drop table tmp__Blocchi_1
go
commit
go
set xact_abort on
go
begin transaction
go
INSERT INTO dbo.AnagMag
VALUES (N'0', N'00', N'Non definito', 0)
go
commit transaction
go
set xact_abort on
go
begin transaction
go
INSERT INTO dbo.Blocchi
VALUES (0, N'0', N'00', N'000', N'Non definito', 1, 1, 1)
go
commit transaction
go
-- update transizioni...
alter table TabTranPosizEventi add
constraint FK_TabTranPosizEventi_Blocchi foreign key(IdxBloccoTo) references Blocchi(IdxBlocco) on update cascade
go
-- update celle...
set xact_abort on
go
begin transaction
go
alter table Celle drop
constraint FK_Celle_TipoCella
go
alter table Celle add
constraint FK_Celle_Blocchi foreign key(IdxBlocco) references Blocchi(IdxBlocco) on update cascade
go
alter table Celle add
constraint FK_Celle_TipoCella foreign key(IdxTipoCella) references TipoCella(IdxTipoCella)
go
commit
go
-- update insert blocchi!
set xact_abort on
go
begin transaction
go
set ANSI_NULLS on
go
/***************************************
* STORED stp_Blocchi_Insert
*
* crea nuovo record blocchi magazzino
*
* Steamware, S.E.L.
* mod: 2012.05.21
*
****************************************/
alter PROCEDURE stp_Blocchi_Insert
(
@CodMag NVARCHAR(50),
@CodCS NVARCHAR(2),
@CodBlocco NVARCHAR(3),
@DescBlocco NVARCHAR(50),
@NumX INT,
@NumY INT,
@NumZ INT
)
AS
BEGIN TRAN
-- inizio calcolando il primo blocco libero x chiave (non è + autoincrement)...
DECLARE @idxBlocco INT
SET @idxBlocco = ( SELECT ISNULL(MAX(idxBlocco),0)+1 AS nextIdxBlocco FROM Blocchi )
INSERT INTO Blocchi (idxBlocco, CodMag, CodCS, CodBlocco, DescBlocco, NumX, NumY, NumZ)
VALUES (@idxBlocco, @CodMag, @CodCS, @CodBlocco, @DescBlocco, @NumX, @NumY, @NumZ)
COMMIT TRAN
RETURN
go
commit
go
-- ============= AGGIUNTE =============
ALTER TABLE [dbo].[Soggetti2Utente] ADD CONSTRAINT [CK_CodSoggetto_Unique] UNIQUE NONCLUSTERED
(
[CodSoggetto] ASC
)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
GO
/****** Object: StoredProcedure [dbo].[stp_prtCartMatPrimaByUDC] Script Date: 05/22/2012 16:52:47 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- =================================================================================================
-- =================================================================================================
/***************************************
* STORED stp_prtCartMatPrimaByUDC
*
* ottiene il record del Cartellino Materia Prima dato l'UDC richiesto x la stampa
*
****************************************/
ALTER PROCEDURE [dbo].[stp_prtCartMatPrimaByUDC]
(
@UDC VARCHAR(50)
)
AS
SELECT
RQ.nRapQual,
RQ.DataRapQual,
RQ.ProgUDC,
RQ.CodFor,
RQ.DestTerz,
ec.Particolare AS CodLega,
RQ.DataPrelFus,
RQ.TurnoPrelFus,
ec.Qta,
RQ.DestLega,
RQ.LegaScaric,
RQ.BenesQual,
ec.UDC,
Fo.DescFornitore,
Fo.DescFornitore2,
Le.CodLega AS CodLega2,
Le.DescLega,
Le.DescLega2,
ISNULL(ec.Note,'') AS Note
FROM ElencoCartellini ec
LEFT JOIN RilPro.RapQual AS RQ
ON ec.UDC = RQ.UDC
LEFT JOIN RilPro.AnagFornitori AS Fo
ON RQ.CodFor = Fo.CodFornitore
LEFT JOIN RilPro.AnagLeghe Le
ON RQ.CodLega = 'L' + Le.CodLega
WHERE ec.UDC = RTRIM(@UDC) -- 'UB31000000001'
RETURN
GO
-- registro versione...
INSERT INTO [dbo].[LogUpdateDb] ([Versione],[Data]) VALUES(437, GETDATE())
GO
-- ====================================
INSERT [RilPro].[AnagOperatori]
VALUES ( 'O9900000000000004', 'MA' , '0000003' , '000020' , 'Fonderie Mario Mazzucconi','0000000210', 'Ambivere', 'Rottoli' , 'Giancarlo')
INSERT dbo.Soggetti2Utente
VALUES ('O9900000000000004','Giancarlo','STEAMWAREWIN')
INSERT [RilPro].[AnagOperatori]
VALUES ( 'O9900000000000005', 'MA' , '0000003' , '000020' , 'Fonderie Mario Mazzucconi','0000000210', 'Ambivere', 'Administrator' , 'Administrator')
INSERT dbo.Soggetti2Utente
VALUES ('O9900000000000005','Administrator','STEAMWAREWIN')