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

200 lines
7.0 KiB
Transact-SQL

set xact_abort on;
go
begin transaction;
go
set ANSI_NULLS on;
go
/***************************************
* STORED stp_prtCartLiquidi_F18ByUDC
*
* ottiene il record del Cartellino Liquidi dato l'UDC richiesto x la stampa
*
* Steamware, S.E.L.
* mod: 2011.12.19
*
****************************************/
alter PROCEDURE stp_prtCartLiquidi_F18ByUDC
(
@UDC NVARCHAR(50)
)
AS
-- estraggo gli UDC parent di quello passato ( x max 10 ) per poi stamparlo nel campo
-- NoteTratt che era utilizzato per stampare i trattamenti nel artellino F10
DECLARE @tmp NVARCHAR(500)
DECLARE @NoteTratt NVARCHAR(500) -- usato per memorizzare gli UDC F10 parent associati
SET @tmp = ''
SELECT TOP 10 @tmp = @tmp + RTRIM(UDC_parent) + ' - ' from RelazUDC WHERE UDC_child = @UDC
SET @NoteTratt = (SELECT SUBSTRING(@tmp, 0, LEN(@tmp)))
-- ora seleziono i dati veri e propri
SELECT ISNULL(ElencoCartellini.UDC, N'') AS UDC
,ISNULL(ElencoCartellini.CodCS, N'') AS CodCS
,ISNULL(ElencoCartellini.CodCliente, N'') AS codcliente
,ISNULL(ElencoCartellini.RagSociale, N'') AS ragsociale
,ISNULL(ElencoCartellini.Particolare, N'') AS particolare
,ISNULL(ElencoCartellini.DescParticolare, N'') AS DescParticolare
,ISNULL(ElencoCartellini.DisegnoGrezzo, N'') AS DisegnoGrezzo
,ISNULL(ElencoCartellini.Esponente, N'') AS esponente
,ISNULL(ElencoCartellini.CodImpianto, N'') AS CodImpianto
,ISNULL(ElencoCartellini.DescImpianto, N'') AS DescImpianto
,ISNULL(ElencoCartellini.CodStampo, N'') AS codstampo
,ISNULL(ElencoCartellini.Figura, N'') AS figura
,ISNULL(ElencoCartellini.DataFus, N'') AS datafus
,ISNULL(ElencoCartellini.TurnoFus, N'') AS turnofus
,ISNULL(ElencoCartellini.CodImballo, N'') AS CodImballo
,ISNULL(ElencoCartellini.CodSoggetto, N'') AS CodSoggetto
,ISNULL(ElencoCartellini.NumCont, N'') AS NumCont
,ISNULL(ElencoCartellini.Tara, N'') AS tara
,ISNULL(ElencoCartellini.Qta, N'') AS qta
,ISNULL(ElencoCartellini.CodStato, N'') AS CodStato
,ISNULL(ElencoCartellini.IdxPosizione, N'') AS IdxPosizione
,ISNULL(ElencoCartellini.PesoTot, N'') AS PesoTot
,ISNULL(ElencoCartellini.PesoCad, N'') AS PesoCad
,ElencoCartellini.CreateDate
,ElencoCartellini.ModDate
,ISNULL(RilPro.AnagOperatori.Cognome, N'') AS cognome
,ISNULL(RilPro.AnagOperatori.Nome, N'') AS nome
,ISNULL(AnagStatiProdotto.DescStato, N'') AS DescStato
,ISNULL(RilPro.AnagImballi.DescImballo, N'') AS DescImballo
,ISNULL(RilPro.AnagParticolari.CodFamiglia, N'') AS CodFamiglia
,ISNULL(RilPro.AnagFamiglie.DescFamiglia, N'') AS DescFamiglia
,ISNULL(ElencoCartellini.Note, N'') AS Note
,ISNULL(@NoteTratt, N'') AS NoteTratt
FROM RilPro.AnagParticolari
LEFT OUTER JOIN
RilPro.AnagFamiglie
ON
RilPro.AnagParticolari.CodFamiglia = RilPro.AnagFamiglie.CodFamiglia
RIGHT OUTER JOIN
ElencoCartellini
ON
RilPro.AnagParticolari.Particolare = ElencoCartellini.Particolare
LEFT OUTER JOIN
AnagStatiProdotto
ON
ElencoCartellini.CodStato = AnagStatiProdotto.CodStato
LEFT OUTER JOIN
RilPro.AnagOperatori
ON
ElencoCartellini.CodSoggetto = RilPro.AnagOperatori.CodSoggetto
LEFT OUTER JOIN
RilPro.AnagImballi
ON
ElencoCartellini.CodImballo = RilPro.AnagImballi.CodImballo
WHERE
(ElencoCartellini.UDC = @UDC)
RETURN
go
commit;
go
set xact_abort on;
go
begin transaction;
go
set ANSI_NULLS on;
go
/***************************************
* STORED stp_ParticolariOverview
*
* elenco di overview sullo stato dei magazzini (dettaglio a "maglie larghe")
*
* Steamware, S.E.L.
* mod: 2012.05.18
*
****************************************/
alter PROCEDURE stp_magazzinoOverview
(
@CodCS VARCHAR(2),
@particolare NVARCHAR(15) = ''
)
AS
-- IN PRIMIS: controllo se particolare sia null metto ''...
SET @particolare = ( SELECT ISNULL(@particolare, '') )
-- controllo se particolare vuoto o '*' mostro tutto...
IF(@particolare = '' OR @particolare='*')
BEGIN
SELECT AnagMag.CodCS, AnagMag.CodMag, AnagMag.DescMag, Blocchi.IdxBlocco, Blocchi.CodBlocco, Blocchi.DescBlocco,
TipoCella.Capienza * Blocchi.NumX * Blocchi.NumY * Blocchi.NumZ AS TotCelle,
TipoCella.Capienza * COUNT(DISTINCT Celle.IdxCella) AS CelleAttive,
COUNT(PosizioneUdcCorrente.UDC) AS CelleOccupate,
TipoCella.Capienza * COUNT(DISTINCT Celle.IdxCella) - COUNT(PosizioneUdcCorrente.UDC) AS CelleLibere,
ISNULL(MIN(PosizioneUdcCorrente.DataRif), GETDATE()) AS Oldest, ISNULL(MAX(PosizioneUdcCorrente.DataRif), GETDATE()) AS Newest
FROM TipoCella INNER JOIN
AnagMag INNER JOIN
Blocchi ON AnagMag.CodMag = Blocchi.CodMag AND AnagMag.CodCS = Blocchi.CodCS ON TipoCella.CodMag = AnagMag.CodMag AND
TipoCella.CodCS = AnagMag.CodCS LEFT OUTER JOIN
Celle ON TipoCella.IdxTipoCella = Celle.IdxTipoCella AND Blocchi.IdxBlocco = Celle.IdxBlocco LEFT OUTER JOIN
PosizioneUdcCorrente ON Celle.IdxCella = PosizioneUdcCorrente.IdxCella
WHERE (Celle.Attiva = 1) AND (AnagMag.CodCS = @CodCS) AND (ISNULL(AnagMag.Nascosto, 0) = 0)
GROUP BY AnagMag.CodCS, AnagMag.CodMag, AnagMag.DescMag, Blocchi.IdxBlocco, Blocchi.CodBlocco, Blocchi.DescBlocco,
Blocchi.NumX, Blocchi.NumY, Blocchi.NumZ,
TipoCella.Capienza
ORDER BY AnagMag.CodMag, Blocchi.CodBlocco
END
ELSE
BEGIN
SELECT AnagMag.CodCS, AnagMag.CodMag, AnagMag.DescMag, Blocchi.IdxBlocco, Blocchi.CodBlocco, Blocchi.DescBlocco,
TipoCella.Capienza * Blocchi.NumX * Blocchi.NumY * Blocchi.NumZ AS TotCelle,
TipoCella.Capienza * COUNT(DISTINCT Celle.IdxCella) AS CelleAttive,
COUNT(PosizioneUdcCorrente.UDC) AS CelleOccupate,
TipoCella.Capienza * COUNT(DISTINCT Celle.IdxCella) - COUNT(PosizioneUdcCorrente.UDC) AS CelleLibere,
ISNULL(MIN(PosizioneUdcCorrente.DataRif), GETDATE()) AS Oldest, ISNULL(MAX(PosizioneUdcCorrente.DataRif), GETDATE()) AS Newest
FROM TipoCella INNER JOIN
AnagMag INNER JOIN
Blocchi ON AnagMag.CodMag = Blocchi.CodMag AND AnagMag.CodCS = Blocchi.CodCS ON TipoCella.CodMag = AnagMag.CodMag AND
TipoCella.CodCS = AnagMag.CodCS LEFT OUTER JOIN
Celle ON TipoCella.IdxTipoCella = Celle.IdxTipoCella AND Blocchi.IdxBlocco = Celle.IdxBlocco LEFT OUTER JOIN
PosizioneUdcCorrente ON Celle.IdxCella = PosizioneUdcCorrente.IdxCella
INNER JOIN ElencoCartellini ec ON PosizioneUdcCorrente.UDC = ec.UDC
WHERE (Celle.Attiva = 1) AND (AnagMag.CodCS = @CodCS) AND (ISNULL(AnagMag.Nascosto, 0) = 0) AND ec.particolare = @particolare
GROUP BY AnagMag.CodCS, AnagMag.CodMag, AnagMag.DescMag, Blocchi.IdxBlocco, Blocchi.CodBlocco, Blocchi.DescBlocco,
Blocchi.NumX, Blocchi.NumY, Blocchi.NumZ,
TipoCella.Capienza
ORDER BY AnagMag.CodMag, Blocchi.CodBlocco
END
RETURN
go
commit;
go
set xact_abort on;
go
begin transaction;
go
drop procedure stp_annullaUDC;
go
drop procedure stp_UDC_insNew;
go
commit;
go
-- registro versione...
INSERT INTO [dbo].[LogUpdateDb] ([Versione],[Data]) VALUES(435, GETDATE())
GO