spostamento XPS_data

2017-01-31 14:34:55 +01:00
parent f5ae99144a
commit 5d99b976a3
71 changed files with 52936 additions and 56818 deletions
@@ -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