spostamento XPS_data
This commit is contained in:
Samuele Locatelli
@@ -0,0 +1,81 @@
|
||||
set xact_abort on
|
||||
go
|
||||
|
||||
begin transaction
|
||||
go
|
||||
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'EN', N'#', N'#')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'EN', N'AccessFail', N'Accesso fallito')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'EN', N'btnCommit', N'Commit')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'EN', N'ForzaUtente', N'Forza Utente')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'EN', N'hlMenu', N'END barcode input')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'EN', N'lblDominio', N'Dominio')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'EN', N'lblPwd', N'Password')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'EN', N'lblUser', N'Username')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'EN', N'LogOut', N'LogOut')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'EN', N'MostraLogStati', N'Mostra Log Stati')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'EN', N'Riga', N'Riga')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'EN', N'setStatoObjXps', N'Reimposta Stato')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'EN', N'UsrNotAuth', N'Utente non autorizzato')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'EN', N'waiting', N'...waiting...')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'IT', N'#', N'#')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'IT', N'AccessFail', N'Accesso fallito')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'IT', N'btnCommit', N'Invio')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'IT', N'ForzaUtente', N'Forza Utente')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'IT', N'hlMenu', N'END barcode input')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'IT', N'lblDominio', N'Dominio')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'IT', N'lblPwd', N'Password')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'IT', N'lblUser', N'Username')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'IT', N'LogOut', N'LogOut')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'IT', N'MostraLogStati', N'Mostra Log Stati')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'IT', N'Riga', N'Riga')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'IT', N'setStatoObjXps', N'Reimposta Stato')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'IT', N'UsrNotAuth', N'Utente non autorizzato')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'IT', N'waiting', N'...in attesa...')
|
||||
go
|
||||
|
||||
commit transaction
|
||||
go
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
create table LogUpdateDb(
|
||||
Versione int not null constraint PK_LogUpdateDb primary key,
|
||||
Data datetime
|
||||
);
|
||||
go
|
||||
|
||||
|
||||
-- registro versione...
|
||||
INSERT INTO [dbo].[LogUpdateDb] ([Versione],[Data]) VALUES(130, GETDATE())
|
||||
GO
|
||||
@@ -0,0 +1,29 @@
|
||||
set xact_abort on
|
||||
go
|
||||
|
||||
begin transaction
|
||||
go
|
||||
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'EN', N'tabPnlCompletate', N'Completate (da spedire)')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'EN', N'tabPnlProxScadenze', N'Scadenze')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'EN', N'tabPnlScadute', N'Commesse scadute')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'IT', N'tabPnlCompletate', N'Completate (da spedire)')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'IT', N'tabPnlProxScadenze', N'Scadenze')
|
||||
INSERT INTO dbo.Vocabolario
|
||||
VALUES (N'IT', N'tabPnlScadute', N'Commesse scadute')
|
||||
go
|
||||
|
||||
commit transaction
|
||||
go
|
||||
|
||||
|
||||
|
||||
|
||||
-- registro versione...
|
||||
INSERT INTO [dbo].[LogUpdateDb] ([Versione],[Data]) VALUES(134, GETDATE())
|
||||
GO
|
||||
@@ -0,0 +1,60 @@
|
||||
set xact_abort on;
|
||||
go
|
||||
|
||||
begin transaction;
|
||||
go
|
||||
|
||||
set ANSI_NULLS on;
|
||||
go
|
||||
|
||||
/*************************************
|
||||
* STORED PROCEDURE stp_insNewLemma
|
||||
*
|
||||
* elimina record anagrafica classe prodotto
|
||||
*
|
||||
* mod : 14/05/2012
|
||||
* aut : S.E. Locatelli
|
||||
**************************************/
|
||||
create PROCEDURE stp_insNewLemma
|
||||
(
|
||||
@lemma NVARCHAR(50),
|
||||
@traduzione NVARCHAR(500)
|
||||
)
|
||||
AS
|
||||
|
||||
-- elimino se c'era già...
|
||||
DELETE
|
||||
FROM Vocabolario
|
||||
WHERE lemma = @lemma
|
||||
|
||||
-- inserisco x tutte le lingue attive...
|
||||
INSERT INTO Vocabolario
|
||||
SELECT lingua, @lemma, @traduzione
|
||||
FROM Lingue
|
||||
|
||||
SELECT *
|
||||
FROM Vocabolario
|
||||
WHERE lemma = @lemma
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
commit;
|
||||
go
|
||||
|
||||
|
||||
|
||||
exec stp_insNewLemma 'lblEmailNotifica', 'Notifica e-mail quando pronto'
|
||||
exec stp_insNewLemma 'sendMail', 'invia e-mail'
|
||||
exec stp_insNewLemma 'emailReq', 'segnalazione richiesta!'
|
||||
exec stp_insNewLemma 'emailSent', 'inviata'exec stp_insNewLemma 'emailSubject', 'Merce pronta per il ritiro'
|
||||
exec stp_insNewLemma 'emailBody', 'Attenzione, la merce relativa al DDT {0} del {1}, ({2}, peso {3} kg) è pronta per il ritiro presso EQUA s.p.a di Pedrengo'
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
-- registro versione...
|
||||
INSERT INTO [dbo].[LogUpdateDb] ([Versione],[Data]) VALUES(150, GETDATE())
|
||||
GO
|
||||
@@ -0,0 +1,434 @@
|
||||
set xact_abort on;
|
||||
go
|
||||
|
||||
begin transaction;
|
||||
go
|
||||
|
||||
alter table AnagStati add
|
||||
PrioritaStato int;
|
||||
go
|
||||
|
||||
set ANSI_NULLS on;
|
||||
go
|
||||
|
||||
alter VIEW v_selStati
|
||||
AS
|
||||
SELECT CodStato AS value, DescrStato AS label, FamStato AS conditio, PrioritaStato
|
||||
FROM dbo.AnagStati
|
||||
go
|
||||
|
||||
exec sp_updateextendedproperty 'MS_DiagramPane1', '[0E232FF0-B466-11cf-A24F-00AA00A3EFFF, 1.00]
|
||||
Begin DesignProperties =
|
||||
Begin PaneConfigurations =
|
||||
Begin PaneConfiguration = 0
|
||||
NumPanes = 4
|
||||
Configuration = "(H (1[41] 4[20] 2[7] 3) )"
|
||||
End
|
||||
Begin PaneConfiguration = 1
|
||||
NumPanes = 3
|
||||
Configuration = "(H (1 [50] 4 [25] 3))"
|
||||
End
|
||||
Begin PaneConfiguration = 2
|
||||
NumPanes = 3
|
||||
Configuration = "(H (1 [50] 2 [25] 3))"
|
||||
End
|
||||
Begin PaneConfiguration = 3
|
||||
NumPanes = 3
|
||||
Configuration = "(H (4 [30] 2 [40] 3))"
|
||||
End
|
||||
Begin PaneConfiguration = 4
|
||||
NumPanes = 2
|
||||
Configuration = "(H (1 [56] 3))"
|
||||
End
|
||||
Begin PaneConfiguration = 5
|
||||
NumPanes = 2
|
||||
Configuration = "(H (2 [66] 3))"
|
||||
End
|
||||
Begin PaneConfiguration = 6
|
||||
NumPanes = 2
|
||||
Configuration = "(H (4 [50] 3))"
|
||||
End
|
||||
Begin PaneConfiguration = 7
|
||||
NumPanes = 1
|
||||
Configuration = "(V (3))"
|
||||
End
|
||||
Begin PaneConfiguration = 8
|
||||
NumPanes = 3
|
||||
Configuration = "(H (1[56] 4[18] 2) )"
|
||||
End
|
||||
Begin PaneConfiguration = 9
|
||||
NumPanes = 2
|
||||
Configuration = "(H (1 [75] 4))"
|
||||
End
|
||||
Begin PaneConfiguration = 10
|
||||
NumPanes = 2
|
||||
Configuration = "(H (1[66] 2) )"
|
||||
End
|
||||
Begin PaneConfiguration = 11
|
||||
NumPanes = 2
|
||||
Configuration = "(H (4 [60] 2))"
|
||||
End
|
||||
Begin PaneConfiguration = 12
|
||||
NumPanes = 1
|
||||
Configuration = "(H (1) )"
|
||||
End
|
||||
Begin PaneConfiguration = 13
|
||||
NumPanes = 1
|
||||
Configuration = "(V (4))"
|
||||
End
|
||||
Begin PaneConfiguration = 14
|
||||
NumPanes = 1
|
||||
Configuration = "(V (2))"
|
||||
End
|
||||
ActivePaneConfig = 0
|
||||
End
|
||||
Begin DiagramPane =
|
||||
Begin Origin =
|
||||
Top = 0
|
||||
Left = 0
|
||||
End
|
||||
Begin Tables =
|
||||
Begin Table = "AnagStati"
|
||||
Begin Extent =
|
||||
Top = 6
|
||||
Left = 38
|
||||
Bottom = 260
|
||||
Right = 189
|
||||
End
|
||||
DisplayFlags = 280
|
||||
TopColumn = 0
|
||||
End
|
||||
End
|
||||
End
|
||||
Begin SQLPane =
|
||||
End
|
||||
Begin DataPane =
|
||||
Begin ParameterDefaults = ""
|
||||
End
|
||||
Begin ColumnWidths = 9
|
||||
Width = 284
|
||||
Width = 1500
|
||||
Width = 1500
|
||||
Width = 1500
|
||||
Width = 1500
|
||||
Width = 1500
|
||||
Width = 1500
|
||||
Width = 1500
|
||||
Width = 1500
|
||||
End
|
||||
End
|
||||
Begin CriteriaPane =
|
||||
Begin ColumnWidths = 11
|
||||
Column = 1440
|
||||
Alias = 900
|
||||
Table = 1170
|
||||
Output = 720
|
||||
Append = 1400
|
||||
NewValue = 1170
|
||||
SortType = 1350
|
||||
SortOrder = 1410
|
||||
GroupBy = 1350
|
||||
Filter = 1350
|
||||
Or = 1350
|
||||
Or = 1350
|
||||
Or = 1350
|
||||
End
|
||||
End
|
||||
End
|
||||
', 'SCHEMA', 'dbo', 'VIEW', 'v_selStati';
|
||||
go
|
||||
|
||||
commit;
|
||||
go
|
||||
|
||||
|
||||
set xact_abort on
|
||||
go
|
||||
|
||||
begin transaction
|
||||
go
|
||||
|
||||
UPDATE dbo.AnagStati SET
|
||||
PrioritaStato=99
|
||||
WHERE CodStato=N'*'
|
||||
UPDATE dbo.AnagStati SET
|
||||
PrioritaStato=1
|
||||
WHERE CodStato=N'01'
|
||||
UPDATE dbo.AnagStati SET
|
||||
PrioritaStato=2
|
||||
WHERE CodStato=N'02'
|
||||
UPDATE dbo.AnagStati SET
|
||||
PrioritaStato=3
|
||||
WHERE CodStato=N'03'
|
||||
UPDATE dbo.AnagStati SET
|
||||
PrioritaStato=4
|
||||
WHERE CodStato=N'04'
|
||||
UPDATE dbo.AnagStati SET
|
||||
PrioritaStato=5
|
||||
WHERE CodStato=N'05'
|
||||
UPDATE dbo.AnagStati SET
|
||||
PrioritaStato=6
|
||||
WHERE CodStato=N'06'
|
||||
UPDATE dbo.AnagStati SET
|
||||
PrioritaStato=7
|
||||
WHERE CodStato=N'07'
|
||||
go
|
||||
|
||||
commit transaction
|
||||
go
|
||||
|
||||
|
||||
set xact_abort on;
|
||||
go
|
||||
|
||||
begin transaction;
|
||||
go
|
||||
|
||||
set ANSI_NULLS on;
|
||||
go
|
||||
|
||||
alter VIEW v_commesse
|
||||
AS
|
||||
SELECT TOP (100) PERCENT dbo.IstObj.IdxObj AS Cod, AnagStati_1.DescrStato AS Stato, ISNULL(dbo.AnagClienti.CodCliente, N'-') AS CodCliente,
|
||||
ISNULL(dbo.AnagClienti.RagioneSociale, N'-') AS Cliente, ISNULL(dbo.IstObj.Note, N'-') AS descrizione, dbo.IstObj.Nome AS DDT, dbo.IstObj.DataRif AS DataDDT,
|
||||
dbo.IstObj.DataCreaz AS DataArrivo, dbo.IstObj.Posizione, ISNULL(dbo.v_ULP_DDT.TotQta, 0) AS Qta, ISNULL(dbo.v_ULP_DDT.TotPeso, 0) AS Peso,
|
||||
ISNULL(dbo.v_righeDDT.NumRighe, 0) AS Righe, ISNULL(dbo.v_ULP_DDT.NumRighe, 0) AS Colli, dbo.v_ULP_DDT.DueDate AS DataPrevista,
|
||||
dbo.IstObj.ExtKey AS Ciclo, dbo.IstObj.CodStato, dbo.AnagStati.DescrStato AS minStato, AnagStati_2.DescrStato AS maxStato,
|
||||
dbo.v_ULP_DDT.minStato AS minCodStato, dbo.v_ULP_DDT.maxStato AS maxCodStato
|
||||
FROM dbo.AnagStati INNER JOIN
|
||||
dbo.v_ULP_DDT ON dbo.AnagStati.CodStato = dbo.v_ULP_DDT.minStato INNER JOIN
|
||||
dbo.AnagStati AS AnagStati_2 ON dbo.v_ULP_DDT.maxStato = AnagStati_2.CodStato RIGHT OUTER JOIN
|
||||
dbo.IstObj LEFT OUTER JOIN
|
||||
dbo.AnagClienti ON dbo.IstObj.CodCliente = dbo.AnagClienti.CodCliente LEFT OUTER JOIN
|
||||
dbo.AnagStati AS AnagStati_1 ON dbo.IstObj.CodStato = AnagStati_1.CodStato LEFT OUTER JOIN
|
||||
dbo.v_righeDDT ON dbo.IstObj.IdxObj = dbo.v_righeDDT.IdxObjMamma ON dbo.v_ULP_DDT.IdxObjMamma = dbo.IstObj.IdxObj
|
||||
WHERE (dbo.IstObj.IdxObjMamma IS NULL) AND (dbo.IstObj.Livello = 1)
|
||||
ORDER BY DataArrivo DESC
|
||||
go
|
||||
|
||||
commit;
|
||||
go
|
||||
|
||||
|
||||
set xact_abort on;
|
||||
go
|
||||
|
||||
begin transaction;
|
||||
go
|
||||
|
||||
set ANSI_NULLS on;
|
||||
go
|
||||
|
||||
alter VIEW v_selClienti
|
||||
AS
|
||||
SELECT TOP (100) PERCENT CodCliente AS value, CodCliente + ' - ' + RagioneSociale AS label
|
||||
FROM dbo.AnagClienti
|
||||
ORDER BY label
|
||||
go
|
||||
|
||||
exec sp_updateextendedproperty 'MS_DiagramPane1', '[0E232FF0-B466-11cf-A24F-00AA00A3EFFF, 1.00]
|
||||
Begin DesignProperties =
|
||||
Begin PaneConfigurations =
|
||||
Begin PaneConfiguration = 0
|
||||
NumPanes = 4
|
||||
Configuration = "(H (1[40] 4[20] 2[20] 3) )"
|
||||
End
|
||||
Begin PaneConfiguration = 1
|
||||
NumPanes = 3
|
||||
Configuration = "(H (1 [50] 4 [25] 3))"
|
||||
End
|
||||
Begin PaneConfiguration = 2
|
||||
NumPanes = 3
|
||||
Configuration = "(H (1 [50] 2 [25] 3))"
|
||||
End
|
||||
Begin PaneConfiguration = 3
|
||||
NumPanes = 3
|
||||
Configuration = "(H (4 [30] 2 [40] 3))"
|
||||
End
|
||||
Begin PaneConfiguration = 4
|
||||
NumPanes = 2
|
||||
Configuration = "(H (1 [56] 3))"
|
||||
End
|
||||
Begin PaneConfiguration = 5
|
||||
NumPanes = 2
|
||||
Configuration = "(H (2 [66] 3))"
|
||||
End
|
||||
Begin PaneConfiguration = 6
|
||||
NumPanes = 2
|
||||
Configuration = "(H (4 [50] 3))"
|
||||
End
|
||||
Begin PaneConfiguration = 7
|
||||
NumPanes = 1
|
||||
Configuration = "(V (3))"
|
||||
End
|
||||
Begin PaneConfiguration = 8
|
||||
NumPanes = 3
|
||||
Configuration = "(H (1[56] 4[18] 2) )"
|
||||
End
|
||||
Begin PaneConfiguration = 9
|
||||
NumPanes = 2
|
||||
Configuration = "(H (1 [75] 4))"
|
||||
End
|
||||
Begin PaneConfiguration = 10
|
||||
NumPanes = 2
|
||||
Configuration = "(H (1[66] 2) )"
|
||||
End
|
||||
Begin PaneConfiguration = 11
|
||||
NumPanes = 2
|
||||
Configuration = "(H (4 [60] 2))"
|
||||
End
|
||||
Begin PaneConfiguration = 12
|
||||
NumPanes = 1
|
||||
Configuration = "(H (1) )"
|
||||
End
|
||||
Begin PaneConfiguration = 13
|
||||
NumPanes = 1
|
||||
Configuration = "(V (4))"
|
||||
End
|
||||
Begin PaneConfiguration = 14
|
||||
NumPanes = 1
|
||||
Configuration = "(V (2))"
|
||||
End
|
||||
ActivePaneConfig = 0
|
||||
End
|
||||
Begin DiagramPane =
|
||||
Begin Origin =
|
||||
Top = 0
|
||||
Left = 0
|
||||
End
|
||||
Begin Tables =
|
||||
Begin Table = "AnagClienti"
|
||||
Begin Extent =
|
||||
Top = 6
|
||||
Left = 38
|
||||
Bottom = 114
|
||||
Right = 190
|
||||
End
|
||||
DisplayFlags = 280
|
||||
TopColumn = 0
|
||||
End
|
||||
End
|
||||
End
|
||||
Begin SQLPane =
|
||||
End
|
||||
Begin DataPane =
|
||||
Begin ParameterDefaults = ""
|
||||
End
|
||||
Begin ColumnWidths = 9
|
||||
Width = 284
|
||||
Width = 1500
|
||||
Width = 1500
|
||||
Width = 1500
|
||||
Width = 1500
|
||||
Width = 1500
|
||||
Width = 1500
|
||||
Width = 1500
|
||||
Width = 1500
|
||||
End
|
||||
End
|
||||
Begin CriteriaPane =
|
||||
Begin ColumnWidths = 11
|
||||
Column = 1440
|
||||
Alias = 900
|
||||
Table = 1170
|
||||
Output = 720
|
||||
Append = 1400
|
||||
NewValue = 1170
|
||||
SortType = 1350
|
||||
SortOrder = 1410
|
||||
GroupBy = 1350
|
||||
Filter = 1350
|
||||
Or = 1350
|
||||
Or = 1350
|
||||
Or = 1350
|
||||
End
|
||||
End
|
||||
End
|
||||
', 'SCHEMA', 'dbo', 'VIEW', 'v_selClienti';
|
||||
go
|
||||
|
||||
commit;
|
||||
go
|
||||
|
||||
|
||||
set xact_abort on;
|
||||
go
|
||||
|
||||
begin transaction;
|
||||
go
|
||||
|
||||
set ANSI_NULLS on;
|
||||
go
|
||||
|
||||
/***************************************
|
||||
* STORED stp_IstObjUpdateMag
|
||||
*
|
||||
* gestione update dati commessa a livello magazzino
|
||||
*
|
||||
* Steamware, S.E.L.
|
||||
* mod: 2012.02.03
|
||||
*
|
||||
****************************************/
|
||||
create PROCEDURE stp_IstObjUpdateMag
|
||||
(
|
||||
@Original_Cod NVARCHAR(50),
|
||||
@CodCliente NVARCHAR(50),
|
||||
@Ciclo NVARCHAR(50), -- ExtKey
|
||||
@DataDDT DATETIME, -- DataRif
|
||||
@DDT NVARCHAR(50), -- nome
|
||||
@UserName NVARCHAR(50), -- UserMod
|
||||
@Descrizione NVARCHAR(50) -- Note
|
||||
|
||||
)
|
||||
AS
|
||||
|
||||
UPDATE IstObj
|
||||
SET CodCliente = @CodCliente,
|
||||
ExtKey = @Ciclo,
|
||||
DataRif = @DataDDT,
|
||||
Nome = @DDT,
|
||||
UserMod = @UserName,
|
||||
DataMod = GETDATE(),
|
||||
Note = @Descrizione
|
||||
WHERE (IdxObj = @Original_Cod)
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
/***************************************
|
||||
* STORED stp_selStatiMinMax
|
||||
*
|
||||
* cerca stati x priorità minima e max
|
||||
*
|
||||
* Steamware, S.E.L.
|
||||
* mod: 2012.02.03
|
||||
*
|
||||
****************************************/
|
||||
create PROCEDURE stp_selStatiMinMax
|
||||
(
|
||||
@PrioritaStatoMin INT,
|
||||
@PrioritaStatoMax INT
|
||||
)
|
||||
AS
|
||||
|
||||
SELECT value, label, PrioritaStato as conditio
|
||||
FROM v_selStati
|
||||
WHERE (PrioritaStato Between @PrioritaStatoMin AND @PrioritaStatoMax)
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
commit;
|
||||
go
|
||||
|
||||
|
||||
create table LogUpdateDb(
|
||||
Versione int not null constraint PK_LogUpdateDb primary key,
|
||||
Data datetime
|
||||
);
|
||||
go
|
||||
|
||||
|
||||
-- registro versione...
|
||||
INSERT INTO [dbo].[LogUpdateDb] ([Versione],[Data]) VALUES(130, GETDATE())
|
||||
GO
|
||||
@@ -0,0 +1,72 @@
|
||||
set xact_abort on
|
||||
go
|
||||
|
||||
begin transaction
|
||||
go
|
||||
|
||||
update LogStatoIstObj set CodStato = N'' where CodStato is null
|
||||
go
|
||||
|
||||
alter table LogStatoIstObj alter column
|
||||
CodStato nvarchar(50) not null
|
||||
go
|
||||
|
||||
exec sp_rename 'PK_LogStatoIstObj', 'PK_LogStatoIstObj_1', 'object'
|
||||
go
|
||||
|
||||
alter table LogStatoIstObj drop
|
||||
constraint FK_LogStatoIstObj_IstObj
|
||||
go
|
||||
|
||||
alter table LogStatoIstObj add
|
||||
constraint FK_LogStatoIstObj_IstObj foreign key(IdxObj) references IstObj(IdxObj) on update cascade on delete cascade
|
||||
go
|
||||
|
||||
commit
|
||||
go
|
||||
|
||||
|
||||
set xact_abort on
|
||||
go
|
||||
|
||||
begin transaction
|
||||
go
|
||||
|
||||
set ANSI_NULLS on
|
||||
go
|
||||
|
||||
/***********************************
|
||||
* STORED PROCEDURE sp_delRow
|
||||
* elimina un set di dati a partire dalla riga di una commessa
|
||||
*
|
||||
* modif.: S.E.L.
|
||||
* il: 2008.10.23
|
||||
**************************************/
|
||||
alter PROCEDURE sp_delRow
|
||||
(
|
||||
@Original_Cod VARCHAR(50)
|
||||
)
|
||||
AS
|
||||
|
||||
BEGIN TRAN
|
||||
|
||||
-- cancello ULP child
|
||||
DELETE FROM IstObj
|
||||
WHERE (IdxObjMamma = @Original_Cod)
|
||||
|
||||
-- cancello riga...
|
||||
DELETE FROM IstObj
|
||||
WHERE (IdxObj = @Original_Cod)
|
||||
|
||||
COMMIT TRAN
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
commit
|
||||
go
|
||||
|
||||
|
||||
-- registro versione...
|
||||
INSERT INTO [dbo].[LogUpdateDb] ([Versione],[Data]) VALUES(131, GETDATE())
|
||||
GO
|
||||
@@ -0,0 +1,95 @@
|
||||
set xact_abort on;
|
||||
go
|
||||
|
||||
begin transaction;
|
||||
go
|
||||
|
||||
set ANSI_NULLS on;
|
||||
go
|
||||
|
||||
/*************************************
|
||||
* STORED PROCEDURE sp_delRow
|
||||
* elimina un set di dati a partire dalla riga di una commessa
|
||||
*
|
||||
* modif.: S.E.L.
|
||||
* il: 2008.10.23
|
||||
**************************************/
|
||||
alter PROCEDURE sp_delRow
|
||||
(
|
||||
@Original_Cod VARCHAR(50)
|
||||
)
|
||||
AS
|
||||
|
||||
BEGIN TRAN
|
||||
|
||||
-- cancello ULP child
|
||||
DELETE FROM IstObj
|
||||
WHERE (IdxObjMamma = @Original_Cod)
|
||||
|
||||
-- cancello riga...
|
||||
DELETE FROM IstObj
|
||||
WHERE (IdxObj = @Original_Cod)
|
||||
|
||||
COMMIT TRAN
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
/*************************************
|
||||
* STORED PROCEDURE sp_schedaIdent
|
||||
* restituisce i dati x stampare 1 scheda di identificazione
|
||||
*
|
||||
* modif.: S.E.L.
|
||||
* il: 2012.02.13
|
||||
**************************************/
|
||||
alter PROCEDURE sp_schedaIdent
|
||||
(
|
||||
@IdxObj VARCHAR(50)
|
||||
)
|
||||
AS
|
||||
|
||||
SELECT Cod AS IdxObj, CodCliente + ' - ' + Cliente AS Cliente, DDT, DataDDT AS DDT_del, DataArrivo, descrizione AS CodProdotto, DataPrevista AS ConsegnaPrevista, Peso,
|
||||
CASE CodCli WHEN 'Fosf' THEN 'X' ELSE ' ' END AS FosfManganese, CASE CodCli WHEN 'Brun' THEN 'X' ELSE ' ' END AS Brunitura,
|
||||
CASE CodCli WHEN 'Fosf_Tefl' THEN 'X' ELSE ' ' END AS FosfTeflon, CASE CodCli WHEN 'Sabb' THEN 'X' ELSE ' ' END AS Sabbiatura, ' ' AS F1, ' ' AS F2,
|
||||
' ' AS FosfZinco, ' ' AS Teflon, ' ' AS FosfPreVern, ' ' AS PzRoto, ' ' AS Zinchlorex, ' ' AS PeekVicote, CodCli
|
||||
FROM v_ULP
|
||||
WHERE (Cod = @IdxObj)
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
commit;
|
||||
go
|
||||
|
||||
set xact_abort on;
|
||||
go
|
||||
|
||||
begin transaction;
|
||||
go
|
||||
|
||||
set ANSI_NULLS on;
|
||||
go
|
||||
|
||||
ALTER PROCEDURE dbo.sp_rec4Day
|
||||
(
|
||||
@dayCod VARCHAR(6)
|
||||
)
|
||||
AS
|
||||
|
||||
|
||||
|
||||
--SELECT COUNT(IdxObj) AS rec4Day -- vecchia versione errata con cancellazione...
|
||||
SELECT ISNULL(MAX(CAST(right(left(idxobj, 8), 2) as INT)),0) as rec4day
|
||||
FROM IstObj
|
||||
WHERE (IdxObj LIKE @dayCod + N'%') AND (livello=1)
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
commit;
|
||||
go
|
||||
|
||||
|
||||
-- registro versione...
|
||||
INSERT INTO [dbo].[LogUpdateDb] ([Versione],[Data]) VALUES(132, GETDATE())
|
||||
GO
|
||||
@@ -0,0 +1,80 @@
|
||||
set xact_abort on
|
||||
go
|
||||
|
||||
begin transaction
|
||||
go
|
||||
|
||||
UPDATE dbo.AnagLav SET
|
||||
DescrLav=N'Teflonatura'
|
||||
WHERE IdxLav=N'Fosf_Tefl'
|
||||
UPDATE dbo.AnagLav SET
|
||||
DescrLav=N'Sabbiatura'
|
||||
WHERE IdxLav=N'Sabb'
|
||||
go
|
||||
|
||||
commit transaction
|
||||
go
|
||||
|
||||
set xact_abort on;
|
||||
go
|
||||
|
||||
begin transaction;
|
||||
go
|
||||
|
||||
alter table LogStatoIstObj alter column
|
||||
CodStato nvarchar(50);
|
||||
go
|
||||
|
||||
exec sp_rename 'PK_LogStatoIstObj_1', 'PK_LogStatoIstObj', 'object';
|
||||
go
|
||||
|
||||
alter table LogStatoIstObj drop
|
||||
constraint FK_LogStatoIstObj_IstObj ;
|
||||
go
|
||||
|
||||
alter table LogStatoIstObj add
|
||||
constraint FK_LogStatoIstObj_IstObj foreign key(IdxObj) references IstObj(IdxObj) on update cascade;
|
||||
go
|
||||
|
||||
set ANSI_NULLS on;
|
||||
go
|
||||
|
||||
alter TRIGGER trgStateUpd
|
||||
ON IstObj
|
||||
FOR UPDATE
|
||||
AS
|
||||
IF UPDATE (CodStato)
|
||||
|
||||
DECLARE @dataMod DATETIME
|
||||
|
||||
SET @dataMod = GETDATE()
|
||||
|
||||
/* verifico che non sia già esistente il record (esempio cambio stato multiplo...) */
|
||||
SELECT l.IdxObj
|
||||
FROM LogStatoIstObj AS l INNER JOIN
|
||||
inserted AS i ON l.IdxObj = i.IdxObj AND l.CodStato = i.CodStato
|
||||
if(@@ROWCOUNT = 0)
|
||||
begin
|
||||
INSERT INTO LogStatoIstObj
|
||||
(IdxObj, DataOra, Username, CodStato)
|
||||
SELECT DISTINCT i.IdxObj, @dataMod, i.UserMod, i.CodStato
|
||||
FROM inserted AS i
|
||||
end
|
||||
else
|
||||
begin
|
||||
UPDATE LogStatoIstObj
|
||||
SET DataOra = @dataMod
|
||||
FROM LogStatoIstObj AS l INNER JOIN inserted AS i ON l.IdxObj = i.IdxObj AND l.CodStato = i.CodStato
|
||||
end
|
||||
go
|
||||
|
||||
commit;
|
||||
go
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
-- registro versione...
|
||||
INSERT INTO [dbo].[LogUpdateDb] ([Versione],[Data]) VALUES(133, GETDATE())
|
||||
GO
|
||||
@@ -0,0 +1,88 @@
|
||||
set xact_abort on;
|
||||
go
|
||||
|
||||
begin transaction;
|
||||
go
|
||||
|
||||
set ANSI_NULLS on;
|
||||
go
|
||||
|
||||
/*************************************
|
||||
* STORED PROCEDURE sp_delRow
|
||||
* elimina un set di dati a partire dalla riga di una commessa
|
||||
*
|
||||
* modif.: S.E.L.
|
||||
* il: 2008.10.23
|
||||
**************************************/
|
||||
alter PROCEDURE sp_delRow
|
||||
(
|
||||
@Original_Cod VARCHAR(50)
|
||||
)
|
||||
AS
|
||||
|
||||
BEGIN TRAN
|
||||
|
||||
-- cancello log stati...
|
||||
DELETE FROM LogStatoIstObj
|
||||
WHERE (IdxObj = @Original_Cod)
|
||||
|
||||
-- cancello ULP child
|
||||
DELETE FROM IstObj
|
||||
WHERE (IdxObjMamma = @Original_Cod)
|
||||
|
||||
-- cancello riga...
|
||||
DELETE FROM IstObj
|
||||
WHERE (IdxObj = @Original_Cod)
|
||||
|
||||
COMMIT TRAN
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
commit;
|
||||
go
|
||||
|
||||
|
||||
set xact_abort on;
|
||||
go
|
||||
|
||||
begin transaction;
|
||||
go
|
||||
|
||||
set ANSI_NULLS on;
|
||||
go
|
||||
|
||||
/*************************************
|
||||
* STORED PROCEDURE sp_delObj
|
||||
* elimina un set di dati di una commessa
|
||||
*
|
||||
* modif.: S.E.L.
|
||||
* il: 2008.10.23
|
||||
**************************************/
|
||||
alter PROCEDURE sp_delObj
|
||||
(
|
||||
@Original_Cod VARCHAR(50)
|
||||
)
|
||||
AS
|
||||
|
||||
-- cancello log stati...
|
||||
DELETE FROM LogStatoIstObj
|
||||
WHERE (IdxObj LIKE REPLACE(@Original_Cod,'D','%'))
|
||||
|
||||
-- cancello il resto!
|
||||
DELETE FROM IstObj
|
||||
WHERE (IdxObj LIKE REPLACE(@Original_Cod,'D','%'))
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
commit;
|
||||
go
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
-- registro versione...
|
||||
INSERT INTO [dbo].[LogUpdateDb] ([Versione],[Data]) VALUES(134, GETDATE())
|
||||
GO
|
||||
@@ -0,0 +1,39 @@
|
||||
set xact_abort on;
|
||||
go
|
||||
|
||||
begin transaction;
|
||||
go
|
||||
|
||||
set ANSI_NULLS on;
|
||||
go
|
||||
|
||||
/***************************************
|
||||
* STORED stp_dateProxScadenze
|
||||
*
|
||||
* ottiene elenco date x prossime scadenze
|
||||
*
|
||||
* Steamware, S.E.L.
|
||||
* mod: 2012.05.07
|
||||
*
|
||||
****************************************/
|
||||
create PROCEDURE stp_dateProxScadenze
|
||||
(
|
||||
@dataMin DATETIME
|
||||
)
|
||||
AS
|
||||
SELECT *
|
||||
FROM v_dateEsecuzione
|
||||
WHERE (Data >= CAST(@dataMin AS datetime))
|
||||
ORDER BY Data
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
commit;
|
||||
go
|
||||
|
||||
|
||||
|
||||
-- registro versione...
|
||||
INSERT INTO [dbo].[LogUpdateDb] ([Versione],[Data]) VALUES(135, GETDATE())
|
||||
GO
|
||||
@@ -0,0 +1,27 @@
|
||||
|
||||
USE [Equa_XPS]
|
||||
GO
|
||||
CREATE NONCLUSTERED INDEX [i_LivelloIdxObjMamma]
|
||||
ON [dbo].[IstObj] ([Livello],[IdxObjMamma])
|
||||
|
||||
GO
|
||||
|
||||
|
||||
USE [Equa_XPS]
|
||||
GO
|
||||
CREATE NONCLUSTERED INDEX [i_idxObjLivelloIdxMamma]
|
||||
ON [dbo].[IstObj] ([Livello],[IdxObjMamma])
|
||||
|
||||
|
||||
|
||||
USE [Equa_XPS_prod]
|
||||
GO
|
||||
CREATE NONCLUSTERED INDEX [i_idxMamma]
|
||||
ON [dbo].[IstObj] ([IdxObjMamma])
|
||||
|
||||
|
||||
|
||||
|
||||
-- registro versione...
|
||||
INSERT INTO [dbo].[LogUpdateDb] ([Versione],[Data]) VALUES(140, GETDATE())
|
||||
GO
|
||||
@@ -0,0 +1,523 @@
|
||||
set xact_abort on;
|
||||
go
|
||||
|
||||
begin transaction;
|
||||
go
|
||||
|
||||
set ANSI_NULLS on;
|
||||
go
|
||||
|
||||
/*************************************
|
||||
* STORED PROCEDURE sp_schedaIdent
|
||||
* restituisce i dati x stampare 1 scheda di identificazione
|
||||
*
|
||||
* modif.: S.E.L.
|
||||
* il: 2012.02.13
|
||||
**************************************/
|
||||
alter PROCEDURE sp_schedaIdent
|
||||
(
|
||||
@IdxObj VARCHAR(50)
|
||||
)
|
||||
AS
|
||||
|
||||
SELECT Cod AS IdxObj, CodCliente, Cliente, DDT, DataDDT AS DDT_del, DataArrivo, descrizione AS CodProdotto, DataPrevista AS ConsegnaPrevista, Peso,
|
||||
CASE CodCli WHEN 'Fosf' THEN 'X' ELSE ' ' END AS FosfManganese, CASE CodCli WHEN 'Brun' THEN 'X' ELSE ' ' END AS Brunitura,
|
||||
CASE CodCli WHEN 'Fosf_Tefl' THEN 'X' ELSE ' ' END AS FosfTeflon, CASE CodCli WHEN 'Sabb' THEN 'X' ELSE ' ' END AS Sabbiatura, ' ' AS F1, ' ' AS F2,
|
||||
' ' AS FosfZinco, ' ' AS Teflon, ' ' AS FosfPreVern, ' ' AS PzRoto, ' ' AS Zinchlorex, ' ' AS PeekVicote, CodCli
|
||||
FROM v_ULP
|
||||
WHERE (Cod = @IdxObj)
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
commit;
|
||||
go
|
||||
|
||||
set xact_abort on;
|
||||
go
|
||||
|
||||
begin transaction;
|
||||
go
|
||||
|
||||
set ANSI_NULLS on;
|
||||
go
|
||||
|
||||
/*---------------------------------------------------------
|
||||
* TRIGGER controllo aggiornamento extKey
|
||||
*
|
||||
* - in caso di cambio extKey (ciclo lavorazione), SE è Obj master,
|
||||
* aggiorna a cascata i child
|
||||
---------------------------------------------------------*/
|
||||
|
||||
create TRIGGER trg_extKeyUpd
|
||||
ON IstObj
|
||||
FOR UPDATE
|
||||
|
||||
AS
|
||||
IF UPDATE (ExtKey)
|
||||
|
||||
DECLARE @isMasterObj BIT
|
||||
SET @isMasterObj = ( SELECT CASE WHEN SUBSTRING(IdxObj, LEN(idxobj),1) = 'D' THEN 1 ELSE 0 END FROM inserted )
|
||||
|
||||
-- verifico se sia un obj master (=finisce x "D")
|
||||
IF(@isMasterObj = 1)
|
||||
BEGIN
|
||||
DECLARE @IdxObj NVARCHAR(50)
|
||||
DECLARE @ExtKey NVARCHAR(50)
|
||||
|
||||
SELECT @IdxObj = IdxObj, @ExtKey = ExtKey FROM inserted
|
||||
|
||||
-- aggiorno child!
|
||||
UPDATE IstObj
|
||||
SET ExtKey = @ExtKey
|
||||
WHERE IdxObj LIKE REPLACE(@IdxObj,'D','')+'%' AND IdxObj <> @IdxObj
|
||||
|
||||
END
|
||||
go
|
||||
|
||||
commit;
|
||||
go
|
||||
|
||||
|
||||
set xact_abort on;
|
||||
go
|
||||
|
||||
begin transaction;
|
||||
go
|
||||
|
||||
set ANSI_NULLS on;
|
||||
go
|
||||
|
||||
/*---------------------------------------------------------
|
||||
* TRIGGER controllo aggiornamento extKey
|
||||
*
|
||||
* - in caso di cambio extKey (ciclo lavorazione), SE è Obj master,
|
||||
* aggiorna a cascata i child
|
||||
---------------------------------------------------------*/
|
||||
|
||||
alter TRIGGER trg_extKeyUpd
|
||||
ON IstObj
|
||||
FOR UPDATE
|
||||
|
||||
AS
|
||||
IF UPDATE (ExtKey)
|
||||
|
||||
DECLARE @isMasterObj BIT
|
||||
SET @isMasterObj = ( SELECT CASE WHEN SUBSTRING(IdxObj, LEN(idxobj),1) = 'D' THEN 1 ELSE 0 END FROM inserted )
|
||||
|
||||
-- verifico se sia un obj master (=finisce x "D")
|
||||
IF(@isMasterObj = 1)
|
||||
BEGIN
|
||||
DECLARE @IdxObj NVARCHAR(50)
|
||||
DECLARE @ExtKey NVARCHAR(50)
|
||||
DECLARE @dataMod DATETIME
|
||||
|
||||
-- calcolo valori
|
||||
SET @dataMod = GETDATE()
|
||||
SELECT @IdxObj = IdxObj, @ExtKey = ExtKey FROM inserted
|
||||
|
||||
-- aggiorno child!
|
||||
UPDATE IstObj
|
||||
SET ExtKey = @ExtKey,
|
||||
dataMod = @dataMod
|
||||
WHERE IdxObj LIKE REPLACE(@IdxObj,'D','')+'%' AND IdxObj <> @IdxObj
|
||||
|
||||
END
|
||||
go
|
||||
|
||||
commit;
|
||||
go
|
||||
|
||||
|
||||
set xact_abort on;
|
||||
go
|
||||
|
||||
begin transaction;
|
||||
go
|
||||
|
||||
alter table IstObj add
|
||||
emailReq bit constraint DF_IstObj_emailReq default ((0)),
|
||||
emailSent datetime;
|
||||
go
|
||||
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
commit;
|
||||
go
|
||||
|
||||
|
||||
set xact_abort on;
|
||||
go
|
||||
|
||||
begin transaction;
|
||||
go
|
||||
|
||||
set ANSI_NULLS on;
|
||||
go
|
||||
|
||||
/*---------------------------------------------------------
|
||||
* TRIGGER controllo aggiornamento extKey
|
||||
*
|
||||
* - in caso di cambio extKey (ciclo lavorazione), SE è Obj master,
|
||||
* aggiorna a cascata i child
|
||||
---------------------------------------------------------*/
|
||||
alter TRIGGER trg_extKeyUpd
|
||||
ON IstObj
|
||||
FOR UPDATE
|
||||
|
||||
AS
|
||||
IF UPDATE (ExtKey)
|
||||
|
||||
UPDATE child
|
||||
SET ExtKey = mother.ExtKey,
|
||||
dataMod = mother.dataMod
|
||||
FROM inserted AS mother INNER JOIN IstObj as child ON mother.IdxObj = child.IdxObjMamma
|
||||
WHERE mother.IdxObjMamma IS NULL
|
||||
go
|
||||
|
||||
commit;
|
||||
go
|
||||
|
||||
|
||||
--- update emailReq a zero x esistenti...
|
||||
update IstObj
|
||||
set emailReq = 0
|
||||
where emailReq is null
|
||||
|
||||
|
||||
set xact_abort on;
|
||||
go
|
||||
|
||||
begin transaction;
|
||||
go
|
||||
|
||||
set ANSI_NULLS on;
|
||||
go
|
||||
|
||||
/*************************************
|
||||
* STORED PROCEDURE sp_creaSetObj
|
||||
* crea un set iniziale di valori da tracciare x la commessa
|
||||
*
|
||||
* modif.: S.E.L.
|
||||
* il: 2008.10.17
|
||||
**************************************/
|
||||
alter PROCEDURE sp_creaSetObj
|
||||
(
|
||||
@IdxObj VARCHAR(50),
|
||||
@CodSet VARCHAR(50),
|
||||
@CodCliente VARCHAR(50),
|
||||
@NumDDT VARCHAR(50),
|
||||
@dataDDT as DATETIME,
|
||||
@Nome VARCHAR(50),
|
||||
@UserName VARCHAR(50),
|
||||
@note VARCHAR(50),
|
||||
@emailReq BIT
|
||||
)
|
||||
AS
|
||||
|
||||
DECLARE @livello VARCHAR(50)
|
||||
DECLARE @IdxObjMamma VARCHAR(50)
|
||||
DECLARE @numRow INT
|
||||
DECLARE @adesso DATETIME
|
||||
DECLARE @depth INT
|
||||
|
||||
BEGIN tran
|
||||
|
||||
/* creazione oggetti in qta minima */
|
||||
|
||||
SET @adesso = GETDATE()
|
||||
SET @depth = 1
|
||||
-- parto da obj top #.
|
||||
SET @livello = '#.'
|
||||
INSERT INTO IstObj(IdxObj, Livello,ExtKey , DataRif, Rev,CodObj, Posizione,Nome ,UserCreaz,DataCreaz,UserMod,DataMod,CodStato,Note,CodCliente,emailReq)
|
||||
SELECT @IdxObj + Object2Set.CodObj AS idx, @depth, @Nome, @dataDDT, 0, Object2Set.CodObj, 1, @NumDDT AS nome,
|
||||
@UserName AS userCreaz, @adesso AS Expr6, @UserName AS userMod, @adesso AS Expr8, V_statoStartFam.CodStato,@note,@CodCliente, @emailReq
|
||||
FROM AnagFamStati INNER JOIN
|
||||
AnagObj ON AnagFamStati.FamStato = AnagObj.FamStato INNER JOIN
|
||||
Object2Set ON AnagObj.CodObj = Object2Set.CodObj INNER JOIN
|
||||
V_statoStartFam ON AnagFamStati.FamStato = V_statoStartFam.FamStato
|
||||
WHERE (Object2Set.Posizione = @livello)
|
||||
-- salvo idx mamma...
|
||||
SET @IdxObjMamma = (SELECT IdxObj FROM IstObj WHERE DataCreaz=@adesso AND Livello=@depth)
|
||||
-- ora creo gli obj dei livelli successivi... aggiungo "#." al livello e conto se ce ne solo con ciclo while...
|
||||
SET @livello = @livello + '#.'
|
||||
SET @numRow = (SELECT count(IdxSet)
|
||||
FROM Object2Set
|
||||
WHERE (Posizione = @livello))
|
||||
WHILE(@numRow > 0)
|
||||
BEGIN
|
||||
SET @depth = @depth +1
|
||||
-- inserisco valori child
|
||||
INSERT INTO IstObj(IdxObj, Livello, ExtKey, DataRif, Rev,CodObj, Posizione, Nome,UserCreaz,DataCreaz,UserMod,DataMod,CodStato,Note,CodCliente, IdxObjMamma, emailReq)
|
||||
SELECT @IdxObj + Object2Set.CodObj +'01' AS idx, @depth, @Nome, @dataDDT, 0, Object2Set.CodObj, 1, @NumDDT ,
|
||||
@UserName AS Expr5, @adesso, @UserName AS Expr7, @adesso AS Expr8, v_statoStartFam.CodStato,@note,@CodCliente, @IdxObjMamma, @emailReq
|
||||
FROM AnagFamStati INNER JOIN
|
||||
AnagObj ON AnagFamStati.FamStato = AnagObj.FamStato INNER JOIN
|
||||
Object2Set ON AnagObj.CodObj = Object2Set.CodObj INNER JOIN
|
||||
v_statoStartFam ON AnagFamStati.FamStato = v_statoStartFam.FamStato
|
||||
WHERE (Object2Set.Posizione = @livello)
|
||||
-- salvo idx mamma...
|
||||
SET @IdxObjMamma = (SELECT IdxObj FROM IstObj WHERE DataCreaz=@adesso AND Livello=@depth)
|
||||
-- aggiorno conteggio...
|
||||
SET @livello = @livello + '#.'
|
||||
SET @numRow = (SELECT count(IdxSet)
|
||||
FROM Object2Set
|
||||
WHERE (Posizione = @livello))
|
||||
END
|
||||
|
||||
/* creazione fasi std per ogni oggetto creato */
|
||||
|
||||
|
||||
COMMIT tran
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
commit;
|
||||
go
|
||||
|
||||
|
||||
set xact_abort on;
|
||||
go
|
||||
|
||||
begin transaction;
|
||||
go
|
||||
|
||||
alter table AnagClienti add
|
||||
email nvarchar(500) constraint DF_AnagClienti_email default ('');
|
||||
go
|
||||
|
||||
update AnagClienti set email=('');
|
||||
go
|
||||
|
||||
commit;
|
||||
go
|
||||
|
||||
|
||||
set xact_abort on;
|
||||
go
|
||||
|
||||
begin transaction;
|
||||
go
|
||||
|
||||
alter table IstObj drop
|
||||
constraint FK_IstObj_AnagClienti ;
|
||||
go
|
||||
|
||||
alter table AnagClienti drop
|
||||
constraint DF_AnagClienti_email ;
|
||||
go
|
||||
|
||||
exec sp_rename 'PK_AnagClienti', 'tmp__PK_AnagClienti', 'OBJECT';
|
||||
go
|
||||
|
||||
exec sp_rename 'AnagClienti', 'tmp__AnagClienti_0', 'OBJECT';
|
||||
go
|
||||
|
||||
create table AnagClienti(
|
||||
CodCliente nvarchar(50) not null constraint PK_AnagClienti primary key,
|
||||
RagioneSociale nvarchar(50),
|
||||
piva nvarchar(20),
|
||||
email nvarchar(500) constraint DF_AnagClienti_email default (''),
|
||||
indirizzo nvarchar(50),
|
||||
cap nvarchar(5),
|
||||
localita nvarchar(50),
|
||||
provincia nvarchar(5)
|
||||
);
|
||||
go
|
||||
|
||||
insert into AnagClienti(CodCliente,RagioneSociale,email) select CodCliente,RagioneSociale,email from tmp__AnagClienti_0;
|
||||
go
|
||||
|
||||
drop table tmp__AnagClienti_0;
|
||||
go
|
||||
|
||||
alter table IstObj add
|
||||
constraint FK_IstObj_AnagClienti foreign key(CodCliente) references AnagClienti(CodCliente);
|
||||
go
|
||||
|
||||
commit;
|
||||
go
|
||||
|
||||
|
||||
set xact_abort on;
|
||||
go
|
||||
|
||||
begin transaction;
|
||||
go
|
||||
|
||||
set ANSI_NULLS on;
|
||||
go
|
||||
|
||||
/***************************************
|
||||
* STORED stp_AnagCliUpdate
|
||||
*
|
||||
* aggiorna dati anagrafica clienti
|
||||
*
|
||||
* Steamware, S.E.L.
|
||||
* mod: 2012.07.12
|
||||
*
|
||||
****************************************/
|
||||
create PROCEDURE stp_AnagCliUpdate
|
||||
(
|
||||
@Original_CodCliente NVARCHAR(50),
|
||||
@RagioneSociale NVARCHAR(50),
|
||||
@piva NVARCHAR(20),
|
||||
@email NVARCHAR(500),
|
||||
@indirizzo NVARCHAR(50),
|
||||
@cap NVARCHAR(5),
|
||||
@localita NVARCHAR(50),
|
||||
@provincia NVARCHAR(5)
|
||||
)
|
||||
AS
|
||||
|
||||
UPDATE dbo.AnagClienti
|
||||
SET RagioneSociale = @RagioneSociale,
|
||||
piva = @piva,
|
||||
email = @email,
|
||||
indirizzo = @indirizzo,
|
||||
cap = @cap,
|
||||
localita = @localita,
|
||||
provincia = @provincia
|
||||
WHERE (CodCliente = @Original_CodCliente)
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
commit;
|
||||
go
|
||||
|
||||
set xact_abort on
|
||||
go
|
||||
|
||||
begin transaction
|
||||
go
|
||||
|
||||
INSERT INTO dbo.Eventi
|
||||
VALUES (N'07', N'BC', N'Invio email', N'act')
|
||||
go
|
||||
|
||||
commit transaction
|
||||
go
|
||||
|
||||
|
||||
set xact_abort on
|
||||
go
|
||||
|
||||
begin transaction
|
||||
go
|
||||
|
||||
INSERT INTO dbo.TraEv2Stati
|
||||
VALUES (N'E_BC', N'BC', N'05', N'07', N'*', N'07', N'sendMail', N'Invia Email')
|
||||
go
|
||||
|
||||
commit transaction
|
||||
go
|
||||
|
||||
|
||||
set xact_abort on;
|
||||
go
|
||||
|
||||
begin transaction;
|
||||
go
|
||||
|
||||
set ANSI_NULLS on;
|
||||
go
|
||||
|
||||
/***************************************
|
||||
* STORED stp_AnagCliGetByKey
|
||||
*
|
||||
* ottiene record anagrafica clienti da chiave
|
||||
*
|
||||
* Steamware, S.E.L.
|
||||
* mod: 2012.07.12
|
||||
*
|
||||
****************************************/
|
||||
create PROCEDURE stp_AnagCliGetByKey
|
||||
(
|
||||
@CodCliente NVARCHAR(50)
|
||||
)
|
||||
AS
|
||||
|
||||
SELECT *
|
||||
FROM AnagClienti
|
||||
WHERE CodCliente = @CodCliente
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
commit;
|
||||
go
|
||||
|
||||
|
||||
set xact_abort on;
|
||||
go
|
||||
|
||||
begin transaction;
|
||||
go
|
||||
|
||||
set ANSI_NULLS on;
|
||||
go
|
||||
|
||||
/***************************************
|
||||
* STORED stp_IstObj_updateEmailSent
|
||||
*
|
||||
* aggiorna email sent con data/ora correnti
|
||||
*
|
||||
* Steamware, S.E.L.
|
||||
* mod: 2011.10.27
|
||||
*
|
||||
****************************************/
|
||||
create PROCEDURE stp_IstObj_updateEmailSent
|
||||
(
|
||||
@IdxObj NVARCHAR(50)
|
||||
)
|
||||
AS
|
||||
|
||||
UPDATE IstObj
|
||||
SET emailsent = GETDATE()
|
||||
WHERE IdxObj = @IdxObj
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
commit;
|
||||
go
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
-- update email a Vuota!
|
||||
update AnagClienti set email=''
|
||||
where email is null
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
-- registro versione...
|
||||
INSERT INTO [dbo].[LogUpdateDb] ([Versione],[Data]) VALUES(150, GETDATE())
|
||||
GO
|
||||
@@ -0,0 +1,56 @@
|
||||
set xact_abort on;
|
||||
go
|
||||
|
||||
begin transaction;
|
||||
go
|
||||
|
||||
set ANSI_NULLS on;
|
||||
go
|
||||
|
||||
/*************************************
|
||||
* STORED PROCEDURE sp_schedaIdent
|
||||
* restituisce i dati x stampare 1 scheda di identificazione
|
||||
*
|
||||
* modif.: S.E.L.
|
||||
* il: 2012.02.13
|
||||
**************************************/
|
||||
alter PROCEDURE sp_schedaIdent
|
||||
(
|
||||
@IdxObj VARCHAR(50)
|
||||
)
|
||||
AS
|
||||
|
||||
SELECT Cod AS IdxObj, CodCliente, Cliente, DDT, DataDDT AS DDT_del, DataArrivo, descrizione AS CodProdotto, DataPrevista AS ConsegnaPrevista, Peso, Qta,
|
||||
CASE CodCli WHEN 'Fosf' THEN 'X' ELSE ' ' END AS FosfManganese, CASE CodCli WHEN 'Brun' THEN 'X' ELSE ' ' END AS Brunitura,
|
||||
CASE CodCli WHEN 'Fosf_Tefl' THEN 'X' ELSE ' ' END AS FosfTeflon, CASE CodCli WHEN 'Sabb' THEN 'X' ELSE ' ' END AS Sabbiatura, ' ' AS F1, ' ' AS F2,
|
||||
' ' AS FosfZinco, ' ' AS Teflon, ' ' AS FosfPreVern, ' ' AS PzRoto, ' ' AS Zinchlorex, ' ' AS PeekVicote, CodCli
|
||||
FROM v_ULP
|
||||
WHERE (Cod = @IdxObj)
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
commit;
|
||||
go
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
-- registro versione...
|
||||
INSERT INTO [dbo].[LogUpdateDb] ([Versione],[Data]) VALUES(151, GETDATE())
|
||||
GO
|
||||
@@ -0,0 +1,59 @@
|
||||
set xact_abort on;
|
||||
go
|
||||
|
||||
begin transaction;
|
||||
go
|
||||
|
||||
set ANSI_NULLS on;
|
||||
go
|
||||
|
||||
/***************************************
|
||||
* STORED stp_CaricaAnagCliSwing
|
||||
*
|
||||
* aggiorna dati anagrafica clienti ricaricando da swing
|
||||
*
|
||||
* Steamware, S.E.L.
|
||||
* mod: 2013.06.06
|
||||
*
|
||||
****************************************/
|
||||
create PROCEDURE stp_CaricaAnagCliSwing
|
||||
(
|
||||
@esito NVARCHAR(2500) OUTPUT
|
||||
)
|
||||
AS
|
||||
|
||||
-- dichiarazione variabili
|
||||
DECLARE @newClienti INT = 0,
|
||||
@oldClienti INT = 0,
|
||||
@numEmail INT = 0
|
||||
|
||||
-- inziamo: carica i dati dei clienti...
|
||||
|
||||
-- indico quanti record nuovi
|
||||
SET @esito += 'Caricati ' + CAST(@newClienti AS NVARCHAR(5)) + ' nuovi clienti<br>'
|
||||
|
||||
|
||||
-- indico quanti record aggiornati
|
||||
SET @esito += 'Aggiornati ' + CAST(@oldClienti AS NVARCHAR(5)) + ' clienti esistenti<br>'
|
||||
|
||||
|
||||
-- carico dati email
|
||||
|
||||
-- indico quanti record email
|
||||
SET @esito += 'Aggiornati ' + CAST(@numEmail AS NVARCHAR(5)) + ' indirizzi email<br>'
|
||||
|
||||
SET @esito += '<br>Completato!'
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
commit;
|
||||
go
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
-- registro versione...
|
||||
INSERT INTO [dbo].[LogUpdateDb] ([Versione],[Data]) VALUES(175, GETDATE())
|
||||
GO
|
||||
Reference in New Issue
Block a user