Pulizia e sistemazioni varie errori e warning x case sbagliato in codice SQL
This commit is contained in:
Samuele Locatelli
@@ -1081,7 +1081,7 @@ create PROCEDURE stp_ContaCelle4Blocchi
|
||||
)
|
||||
AS
|
||||
|
||||
SET @TotCelle = (SELECT SUM(NumX * NumY * numz) AS Totale
|
||||
SET @TotCelle = (SELECT SUM(NumX * NumY * NumZ) AS Totale
|
||||
FROM Blocchi
|
||||
WHERE (CodCS = @CodCS) AND (CodMag = @CodMag))
|
||||
|
||||
@@ -1186,7 +1186,7 @@ create PROCEDURE stp_ContaDeltaCelleBlocco
|
||||
AS
|
||||
-- calcolo quanto richiesto dai blocchi
|
||||
DECLARE @NumInBlocco INT
|
||||
SET @NumInBlocco = (SELECT SUM(NumX * NumY * numz) AS Totale
|
||||
SET @NumInBlocco = (SELECT SUM(NumX * NumY * NumZ) AS Totale
|
||||
FROM Blocchi
|
||||
WHERE IdxBlocco = @IdxBlocco)
|
||||
|
||||
|
||||
@@ -24,18 +24,18 @@ AS
|
||||
SELECT
|
||||
ElencoCartellini.UDC, ElencoCartellini.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.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,
|
||||
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, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia
|
||||
ISNULL(RilPro.AnagOperatori.Nome, N'') AS nome, ISNULL(AnagStatiProdotto.DescStato, N'') AS DescStato,
|
||||
ISNULL(RilPro.AnagImballi.DescImballo, N'') AS DescImballo, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia
|
||||
FROM
|
||||
RilPro.AnagParticolari
|
||||
LEFT OUTER JOIN
|
||||
|
||||
@@ -709,7 +709,7 @@ DECLARE @temp AS INT
|
||||
DECLARE @ora AS DATETIME
|
||||
|
||||
|
||||
SET @CodTipoLista = (SELECT CodTipoLista FROM TipoListaPrelievo WHERE idxPosizione = @idxPosizione)
|
||||
SET @CodTipoLista = (SELECT CodTipoLista FROM TipoListaPrelievo WHERE IdxPosizione = @IdxPosizione)
|
||||
|
||||
------------------------------------------------------------------------------------------------------
|
||||
-- codice lista di prelievo KAAMM00000 - K = start char, AA = anno, MM = mese, 00000 = progressivo
|
||||
|
||||
@@ -8,7 +8,7 @@ DECLARE @IdxCella AS INT
|
||||
SET @IdxCella= (SELECT IdxCella FROM Celle c INNER JOIN Blocchi b ON c.IdxBlocco=b.IdxBlocco WHERE CodMag='84')
|
||||
|
||||
insert into PosizioneUdcCorrente
|
||||
select ec.UDC, @IdxCella as idxCella, 'MA' as codCS, GETDATE() as datarif
|
||||
select ec.UDC, @IdxCella as idxCella, 'MA' as CodCS, GETDATE() as datarif
|
||||
from ElencoCartellini ec
|
||||
left outer join PosizioneUdcCorrente puc on ec.UDC= puc.UDC
|
||||
where puc.IdxCella is null and IdxPosizione=84
|
||||
@@ -17,7 +17,7 @@ where puc.IdxCella is null and IdxPosizione=84
|
||||
SET @IdxCella= (SELECT IdxCella FROM Celle c INNER JOIN Blocchi b ON c.IdxBlocco=b.IdxBlocco WHERE CodMag='54')
|
||||
|
||||
insert into PosizioneUdcCorrente
|
||||
select ec.UDC, @IdxCella as idxCella, 'MA' as codCS, GETDATE() as datarif
|
||||
select ec.UDC, @IdxCella as idxCella, 'MA' as CodCS, GETDATE() as datarif
|
||||
from ElencoCartellini ec
|
||||
left outer join PosizioneUdcCorrente puc on ec.UDC= puc.UDC
|
||||
where puc.IdxCella is null and IdxPosizione=54
|
||||
@@ -26,7 +26,7 @@ where puc.IdxCella is null and IdxPosizione=54
|
||||
SET @IdxCella= (SELECT IdxCella FROM Celle c INNER JOIN Blocchi b ON c.IdxBlocco=b.IdxBlocco WHERE CodMag='56')
|
||||
|
||||
insert into PosizioneUdcCorrente
|
||||
select ec.UDC, @IdxCella as idxCella, 'MA' as codCS, GETDATE() as datarif
|
||||
select ec.UDC, @IdxCella as idxCella, 'MA' as CodCS, GETDATE() as datarif
|
||||
from ElencoCartellini ec
|
||||
left outer join PosizioneUdcCorrente puc on ec.UDC= puc.UDC
|
||||
where puc.IdxCella is null and IdxPosizione=56
|
||||
@@ -35,7 +35,7 @@ where puc.IdxCella is null and IdxPosizione=56
|
||||
SET @IdxCella= (SELECT IdxCella FROM Celle c INNER JOIN Blocchi b ON c.IdxBlocco=b.IdxBlocco WHERE CodMag='80')
|
||||
|
||||
insert into PosizioneUdcCorrente
|
||||
select ec.UDC, @IdxCella as idxCella, 'MA' as codCS, GETDATE() as datarif
|
||||
select ec.UDC, @IdxCella as idxCella, 'MA' as CodCS, GETDATE() as datarif
|
||||
from ElencoCartellini ec
|
||||
left outer join PosizioneUdcCorrente puc on ec.UDC= puc.UDC
|
||||
where puc.IdxCella is null and IdxPosizione=80
|
||||
@@ -44,7 +44,7 @@ where puc.IdxCella is null and IdxPosizione=80
|
||||
SET @IdxCella= (SELECT IdxCella FROM Celle c INNER JOIN Blocchi b ON c.IdxBlocco=b.IdxBlocco WHERE CodMag='80')
|
||||
|
||||
insert into PosizioneUdcCorrente
|
||||
select ec.UDC, @IdxCella as idxCella, 'MA' as codCS, GETDATE() as datarif
|
||||
select ec.UDC, @IdxCella as idxCella, 'MA' as CodCS, GETDATE() as datarif
|
||||
from ElencoCartellini ec
|
||||
left outer join PosizioneUdcCorrente puc on ec.UDC= puc.UDC
|
||||
where puc.IdxCella is null and IdxPosizione=0
|
||||
|
||||
@@ -96,43 +96,43 @@ go
|
||||
****************************************/
|
||||
create PROCEDURE BatchQueue.stp_batch_RapQual_S01
|
||||
(
|
||||
@minNumRapQual INT
|
||||
@minNumRapQual INT
|
||||
)
|
||||
AS
|
||||
-- BOZZA DA COMPLETARE A CURA MAZZUCCONI!!!
|
||||
-- BOZZA DA COMPLETARE A CURA MAZZUCCONI!!!
|
||||
|
||||
DECLARE @SQL AS NVARCHAR(1000)
|
||||
DECLARE @SQL AS NVARCHAR(1000)
|
||||
|
||||
-- svuoto tab raw attuale
|
||||
/*
|
||||
DELETE FROM RawData.XOGIX00F
|
||||
*/
|
||||
-- svuoto tab raw attuale
|
||||
/*
|
||||
DELETE FROM RawData.XOGIX00F
|
||||
*/
|
||||
|
||||
|
||||
-- INSERISCO DA AS400
|
||||
/*
|
||||
INSERT INTO RawData.XOGIX00F
|
||||
(
|
||||
SET @SQL =
|
||||
N'SELECT
|
||||
XRPQLN
|
||||
,XRPQLD
|
||||
,XNRETI
|
||||
,XCDFOR
|
||||
,XCDTER
|
||||
,XCDPAR
|
||||
,XDTPRO
|
||||
,XTRPRO
|
||||
,XQTPRO
|
||||
,XDESMT
|
||||
,XMATSC
|
||||
,XBENQL
|
||||
FROM OPENQUERY( P65220DC, ''SELECT * FROM MAZZT_DTV3.XOGIX00F WHERE XRPQLN >= '
|
||||
SET @SQL = @SQL + @minNumRapQual + ''' )'
|
||||
-- INSERISCO DA AS400
|
||||
/*
|
||||
INSERT INTO RawData.XOGIX00F
|
||||
(
|
||||
SET @SQL =
|
||||
N'SELECT
|
||||
XRPQLN
|
||||
,XRPQLD
|
||||
,XNRETI
|
||||
,XCDFOR
|
||||
,XCDTER
|
||||
,XCDPAR
|
||||
,XDTPRO
|
||||
,XTRPRO
|
||||
,XQTPRO
|
||||
,XDESMT
|
||||
,XMATSC
|
||||
,XBENQL
|
||||
FROM OPENQUERY( P65220DC, ''SELECT * FROM MAZZT_DTV3.XOGIX00F WHERE XRPQLN >= '
|
||||
SET @SQL = @SQL + @minNumRapQual + ''' )'
|
||||
|
||||
EXEC sp_executesql @SQL
|
||||
)
|
||||
*/
|
||||
EXEC dbo.sp_executesql @SQL
|
||||
)
|
||||
*/
|
||||
|
||||
RETURN
|
||||
go
|
||||
@@ -148,47 +148,47 @@ go
|
||||
****************************************/
|
||||
create PROCEDURE BatchQueue.stp_batch_RapQual_S02
|
||||
AS
|
||||
-- eseguo UPSERT x tutti i dati disponibili in tab Raw...
|
||||
|
||||
-- se il dato esiste faccio UPDATE!!!
|
||||
UPDATE RilPro.RapQual
|
||||
SET CodFor = u.XCDFOR,
|
||||
DestTerz = u.XCDTER,
|
||||
CodLega = u.XCDPAR,
|
||||
-- eseguo UPSERT x tutti i dati disponibili in tab Raw...
|
||||
|
||||
-- se il dato esiste faccio UPDATE!!!
|
||||
UPDATE RilPro.RapQual
|
||||
SET CodFor = u.XCDFOR,
|
||||
DestTerz = u.XCDTER,
|
||||
CodLega = u.XCDPAR,
|
||||
DataPrelFus = u.XDTPRO,
|
||||
TurnoPrelFus= u.XTRPRO,
|
||||
Qta = u.XQTPRO,
|
||||
DestLega = u.XDESMT,
|
||||
LegaScaric = u.XMATSC,
|
||||
BenesQual = u.XBENQL
|
||||
FROM RilPro.RapQual rq
|
||||
INNER JOIN RawData.XOGIX00F u ON u.XNRETI = rq.ProgUDC; -- AND u.XRPQLN = rq.nRapQual AND u.XRPQLD = rq.DataRapQual; -- se XNRETI è univoco ...
|
||||
|
||||
|
||||
-- creo tab temporanea x i dati inesistenti..
|
||||
WITH cteInsert AS
|
||||
(SELECT x.*
|
||||
FROM RawData.XOGIX00F x LEFT OUTER JOIN RilPro.RapQual rq
|
||||
ON x.XNRETI = rq.ProgUDC -- AND u.XRPQLN = rq.nRapQual AND u.XRPQLD = rq.DataRapQual; -- se XNRETI è univoco ...
|
||||
WHERE rq.ProgUDC IS NULL )
|
||||
|
||||
-- se il dato non c'è faccio INSERT!!!
|
||||
INSERT INTO RilPro.RapQual(nRapQual, DataRapQual, ProgUDC, CodFor, DestTerz, CodLega, DataPrelFus, TurnoPrelFus, Qta, DestLega, LegaScaric, BenesQual)
|
||||
SELECT XRPQLN AS nRapQual,
|
||||
XRPQLD AS DataRapQual,
|
||||
XNRETI AS ProgUDC,
|
||||
XCDFOR AS CodFor,
|
||||
XCDTER AS DestTerz,
|
||||
XCDPAR AS CodLega,
|
||||
XDTPRO AS DataPrelFus,
|
||||
XTRPRO AS TurnoPrelFus,
|
||||
XQTPRO AS Qta,
|
||||
XDESMT AS DestLega,
|
||||
XMATSC AS LegaScaric,
|
||||
XBENQL AS BenesQual
|
||||
FROM cteInsert
|
||||
|
||||
|
||||
FROM RilPro.RapQual rq
|
||||
INNER JOIN RawData.XOGIX00F u ON u.XNRETI = rq.ProgUDC; -- AND u.XRPQLN = rq.nRapQual AND u.XRPQLD = rq.DataRapQual; -- se XNRETI è univoco ...
|
||||
|
||||
|
||||
-- creo tab temporanea x i dati inesistenti..
|
||||
WITH cteInsert AS
|
||||
(SELECT x.*
|
||||
FROM RawData.XOGIX00F x LEFT OUTER JOIN RilPro.RapQual rq
|
||||
ON x.XNRETI = rq.ProgUDC -- AND u.XRPQLN = rq.nRapQual AND u.XRPQLD = rq.DataRapQual; -- se XNRETI è univoco ...
|
||||
WHERE rq.ProgUDC IS NULL )
|
||||
|
||||
-- se il dato non c'è faccio INSERT!!!
|
||||
INSERT INTO RilPro.RapQual(nRapQual, DataRapQual, ProgUDC, CodFor, DestTerz, CodLega, DataPrelFus, TurnoPrelFus, Qta, DestLega, LegaScaric, BenesQual)
|
||||
SELECT XRPQLN AS nRapQual,
|
||||
XRPQLD AS DataRapQual,
|
||||
XNRETI AS ProgUDC,
|
||||
XCDFOR AS CodFor,
|
||||
XCDTER AS DestTerz,
|
||||
XCDPAR AS CodLega,
|
||||
XDTPRO AS DataPrelFus,
|
||||
XTRPRO AS TurnoPrelFus,
|
||||
XQTPRO AS Qta,
|
||||
XDESMT AS DestLega,
|
||||
XMATSC AS LegaScaric,
|
||||
XBENQL AS BenesQual
|
||||
FROM cteInsert
|
||||
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
@@ -221,21 +221,21 @@ go
|
||||
****************************************/
|
||||
create FUNCTION componiUdc
|
||||
(
|
||||
@CodCS NVARCHAR(2),
|
||||
@Flusso NVARCHAR(2),
|
||||
@Anno NVARCHAR(2),
|
||||
@numUdc INT
|
||||
@CodCS NVARCHAR(2),
|
||||
@Flusso NVARCHAR(2),
|
||||
@Anno NVARCHAR(2),
|
||||
@numUdc INT
|
||||
)
|
||||
RETURNS NVARCHAR(13)
|
||||
AS
|
||||
BEGIN
|
||||
|
||||
DECLARE @answ AS NVARCHAR(50)
|
||||
|
||||
SET @answ = 'U' + @CodCS + @Flusso + @Anno + dbo.f_padLeft(CAST(@numUdc AS VARCHAR(6)), 6, '0')
|
||||
|
||||
RETURN @answ
|
||||
END
|
||||
BEGIN
|
||||
|
||||
DECLARE @answ AS NVARCHAR(50)
|
||||
|
||||
SET @answ = 'U' + @CodCS + @Flusso + @Anno + dbo.f_padLeft(CAST(@numUdc AS VARCHAR(6)), 6, '0')
|
||||
|
||||
RETURN @answ
|
||||
END
|
||||
go
|
||||
|
||||
commit
|
||||
@@ -262,27 +262,27 @@ go
|
||||
****************************************/
|
||||
create FUNCTION getUdcComp
|
||||
(
|
||||
@fullUDC NVARCHAR(50),
|
||||
@maxLen INTEGER
|
||||
@fullUDC NVARCHAR(50),
|
||||
@maxLen INTEGER
|
||||
)
|
||||
RETURNS NVARCHAR(20)
|
||||
AS
|
||||
BEGIN
|
||||
-- calcolo lunghezza originale
|
||||
DECLARE @fullLen AS INT
|
||||
SET @fullLen = LEN(@fullUDC)
|
||||
BEGIN
|
||||
-- calcolo lunghezza originale
|
||||
DECLARE @fullLen AS INT
|
||||
SET @fullLen = LEN(@fullUDC)
|
||||
|
||||
-- dichiaro stringa out (max 20 char)
|
||||
DECLARE @answ NVARCHAR(20)
|
||||
|
||||
-- recupero parte finale (ultimi @maxLen caratteri...)
|
||||
|
||||
|
||||
-- compongo codice
|
||||
SET @answ = 'U' + RIGHT(LEFT(@fullUDC, 7), 2) + RIGHT(@fullUDC,@maxLen-3) -- tolgo 3 char: U + anno...
|
||||
-- dichiaro stringa out (max 20 char)
|
||||
DECLARE @answ NVARCHAR(20)
|
||||
|
||||
-- recupero parte finale (ultimi @maxLen caratteri...)
|
||||
|
||||
|
||||
-- compongo codice
|
||||
SET @answ = 'U' + RIGHT(LEFT(@fullUDC, 7), 2) + RIGHT(@fullUDC,@maxLen-3) -- tolgo 3 char: U + anno...
|
||||
|
||||
RETURN @answ
|
||||
END
|
||||
RETURN @answ
|
||||
END
|
||||
go
|
||||
|
||||
commit
|
||||
@@ -313,19 +313,19 @@ go
|
||||
****************************************/
|
||||
create PROCEDURE stp_rappQualAssociaUdc
|
||||
(
|
||||
@ProgUDC NVARCHAR(10),
|
||||
@UDC NVARCHAR(13)
|
||||
@ProgUDC NVARCHAR(10),
|
||||
@UDC NVARCHAR(13)
|
||||
)
|
||||
AS
|
||||
UPDATE RilPro.RapQual
|
||||
SET UDC = @UDC
|
||||
WHERE (ProgUDC = @ProgUDC) AND (UDC IS NULL)
|
||||
|
||||
-- restituisce la riga aggiornata
|
||||
SELECT *
|
||||
FROM RilPro.RapQual
|
||||
WHERE ProgUDC = @ProgUDC
|
||||
|
||||
UPDATE RilPro.RapQual
|
||||
SET UDC = @UDC
|
||||
WHERE (ProgUDC = @ProgUDC) AND (UDC IS NULL)
|
||||
|
||||
-- restituisce la riga aggiornata
|
||||
SELECT *
|
||||
FROM RilPro.RapQual
|
||||
WHERE ProgUDC = @ProgUDC
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
@@ -340,14 +340,14 @@ go
|
||||
****************************************/
|
||||
create PROCEDURE stp_rappQualGetByNumRapQual
|
||||
(
|
||||
@nRapQual INT
|
||||
@nRapQual INT
|
||||
)
|
||||
AS
|
||||
-- restituisce le righe richieste
|
||||
SELECT *
|
||||
FROM RilPro.RapQual
|
||||
WHERE (nRapQual = @nRapQual) AND (UDC IS NULL)
|
||||
|
||||
-- restituisce le righe richieste
|
||||
SELECT *
|
||||
FROM RilPro.RapQual
|
||||
WHERE (nRapQual = @nRapQual) AND (UDC IS NULL)
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
@@ -379,14 +379,14 @@ go
|
||||
****************************************/
|
||||
alter PROCEDURE stp_UDC_insNew
|
||||
(
|
||||
@CodCS VARCHAR(2),
|
||||
@Flusso VARCHAR(2),
|
||||
@Anno VARCHAR(2),
|
||||
@Tara FLOAT,
|
||||
@CodImballo AS VARCHAR(50),
|
||||
@CodTipoDichiaraz CHAR(1),
|
||||
@CodOperatore AS VARCHAR(50),
|
||||
@CodEvento VARCHAR(10)
|
||||
@CodCS VARCHAR(2),
|
||||
@Flusso VARCHAR(2),
|
||||
@Anno VARCHAR(2),
|
||||
@Tara FLOAT,
|
||||
@CodImballo AS VARCHAR(50),
|
||||
@CodTipoDichiaraz CHAR(1),
|
||||
@CodOperatore AS VARCHAR(50),
|
||||
@CodEvento VARCHAR(10)
|
||||
)
|
||||
AS
|
||||
|
||||
@@ -395,63 +395,63 @@ DECLARE @UDC AS VARCHAR(20)
|
||||
DECLARE @numFlu AS INT
|
||||
DECLARE @numUdc AS INT
|
||||
DECLARE @nextUdc AS INT
|
||||
|
||||
|
||||
------------------------------------------------------------------------------------------------------
|
||||
-- Flusso
|
||||
------------------------------------------------------------------------------------------------------
|
||||
-- controllo se esiste il flusso (bilancia)...
|
||||
SET @numFlu = (
|
||||
SELECT count(*)
|
||||
FROM AnagBilance
|
||||
WHERE CodBilancia = @Flusso
|
||||
SELECT count(*)
|
||||
FROM AnagBilance
|
||||
WHERE CodBilancia = @Flusso
|
||||
)
|
||||
-- ...sennò lo creo...
|
||||
IF(@numFlu = 0)
|
||||
BEGIN
|
||||
-- se c'è inserisco in tab
|
||||
INSERT INTO AnagBilance(CodBilancia, DescrImpianto, CodCS)
|
||||
VALUES (@Flusso, @Flusso, @CodCS)
|
||||
END
|
||||
BEGIN
|
||||
-- se c'è inserisco in tab
|
||||
INSERT INTO AnagBilance(CodBilancia, DescrImpianto, CodCS)
|
||||
VALUES (@Flusso, @Flusso, @CodCS)
|
||||
END
|
||||
------------------------------------------------------------------------------------------------------
|
||||
|
||||
|
||||
|
||||
------------------------------------------------------------------------------------------------------
|
||||
-- UDC
|
||||
------------------------------------------------------------------------------------------------------
|
||||
-- controllo se ci sia già un UDC per company / flusso anno
|
||||
BEGIN TRAN
|
||||
-- cerco nella tab contatori UDC l'ultimo valido
|
||||
SET @numUdc = (
|
||||
SELECT count(*)
|
||||
FROM ContatoriUdc
|
||||
WHERE CodCS = @CodCS
|
||||
AND Flusso = @Flusso
|
||||
AND Anno = @Anno
|
||||
)
|
||||
-- controllo se record c'è...
|
||||
IF(@numUdc > 0)
|
||||
BEGIN
|
||||
-- se c'è incremento di 1 in tab
|
||||
UPDATE ContatoriUdc
|
||||
SET LastIdx = LastIdx + 1
|
||||
WHERE CodCS = @CodCS
|
||||
AND Flusso = @Flusso
|
||||
AND Anno = @Anno
|
||||
END
|
||||
ELSE
|
||||
BEGIN
|
||||
-- lo creo!
|
||||
INSERT INTO ContatoriUdc(CodCS, Flusso, Anno, LastIdx)
|
||||
VALUES (@CodCS, @Flusso, @Anno, 1)
|
||||
END
|
||||
-- aggiorno numero UDC
|
||||
SET @numUdc = (
|
||||
SELECT LastIdx
|
||||
FROM ContatoriUdc
|
||||
WHERE CodCS = @CodCS
|
||||
AND Flusso = @Flusso
|
||||
AND Anno = @Anno
|
||||
)
|
||||
-- cerco nella tab contatori UDC l'ultimo valido
|
||||
SET @numUdc = (
|
||||
SELECT count(*)
|
||||
FROM ContatoriUdc
|
||||
WHERE CodCS = @CodCS
|
||||
AND Flusso = @Flusso
|
||||
AND Anno = @Anno
|
||||
)
|
||||
-- controllo se record c'è...
|
||||
IF(@numUdc > 0)
|
||||
BEGIN
|
||||
-- se c'è incremento di 1 in tab
|
||||
UPDATE ContatoriUdc
|
||||
SET LastIdx = LastIdx + 1
|
||||
WHERE CodCS = @CodCS
|
||||
AND Flusso = @Flusso
|
||||
AND Anno = @Anno
|
||||
END
|
||||
ELSE
|
||||
BEGIN
|
||||
-- lo creo!
|
||||
INSERT INTO ContatoriUdc(CodCS, Flusso, Anno, LastIdx)
|
||||
VALUES (@CodCS, @Flusso, @Anno, 1)
|
||||
END
|
||||
-- aggiorno numero UDC
|
||||
SET @numUdc = (
|
||||
SELECT LastIdx
|
||||
FROM ContatoriUdc
|
||||
WHERE CodCS = @CodCS
|
||||
AND Flusso = @Flusso
|
||||
AND Anno = @Anno
|
||||
)
|
||||
COMMIT TRAN
|
||||
------------------------------------------------------------------------------------------------------
|
||||
|
||||
@@ -461,7 +461,7 @@ COMMIT TRAN
|
||||
-- ottengo il nuovo codice UDC completo
|
||||
--SET @UDC = 'U' + @CodCS + @Flusso + @Anno + dbo.f_padLeft(CAST(@numUdc AS VARCHAR(6)), 6, '0')
|
||||
SET @UDC = dbo.componiUdc(@CodCS, @Flusso, @Anno, @numUdc)
|
||||
|
||||
|
||||
-- inserisco un nuovo record
|
||||
INSERT INTO ElencoCartellini(CodCS, UDC, Tara, IdxPosizione, Qta, CodImballo, CreateDate, ModDate)
|
||||
VALUES (@CodCS, @UDC, @Tara, 0, 0, @CodImballo, GETDATE(), GETDATE())
|
||||
@@ -489,28 +489,28 @@ go
|
||||
****************************************/
|
||||
alter PROCEDURE stp_UDC_insNewFull
|
||||
(
|
||||
@CodCS VARCHAR(2),
|
||||
@Flusso VARCHAR(2),
|
||||
@Anno VARCHAR(2),
|
||||
@CodCliente VARCHAR(6),
|
||||
@Particolare VARCHAR(15),
|
||||
@CodImpianto AS VARCHAR(50),
|
||||
@CodStampo VARCHAR(8),
|
||||
@Esponente VARCHAR(6),
|
||||
@Figura VARCHAR(4),
|
||||
@DataFus DATETIME,
|
||||
@TurnoFus INT,
|
||||
@CodImballo VARCHAR(15),
|
||||
@CodSoggetto VARCHAR(17),
|
||||
@Tara FLOAT,
|
||||
@IdxPosizione INT,
|
||||
@CodTipoDichiaraz CHAR(1),
|
||||
@CodEvento VARCHAR(10),
|
||||
@Qta DECIMAL(10,2),
|
||||
@PesoTot FLOAT,
|
||||
@PesoCad FLOAT,
|
||||
@CodStato VARCHAR(50),
|
||||
@UDC_parent VARCHAR(20)
|
||||
@CodCS VARCHAR(2),
|
||||
@Flusso VARCHAR(2),
|
||||
@Anno VARCHAR(2),
|
||||
@CodCliente VARCHAR(6),
|
||||
@Particolare VARCHAR(15),
|
||||
@CodImpianto AS VARCHAR(50),
|
||||
@CodStampo VARCHAR(8),
|
||||
@Esponente VARCHAR(6),
|
||||
@Figura VARCHAR(4),
|
||||
@DataFus DATETIME,
|
||||
@TurnoFus INT,
|
||||
@CodImballo VARCHAR(15),
|
||||
@CodSoggetto VARCHAR(17),
|
||||
@Tara FLOAT,
|
||||
@IdxPosizione INT,
|
||||
@CodTipoDichiaraz CHAR(1),
|
||||
@CodEvento VARCHAR(10),
|
||||
@Qta DECIMAL(10,2),
|
||||
@PesoTot FLOAT,
|
||||
@PesoCad FLOAT,
|
||||
@CodStato VARCHAR(50),
|
||||
@UDC_parent VARCHAR(20)
|
||||
)
|
||||
AS
|
||||
|
||||
@@ -530,44 +530,44 @@ DECLARE @nextUdc AS INT
|
||||
------------------------------------------------------------------------------------------------------
|
||||
-- cerco la ragione sociale...
|
||||
SET @RagSociale = (
|
||||
SELECT ISNULL(RagSociale, 'ND') AS RagSociale
|
||||
FROM RilPro.AnagClienti
|
||||
WHERE (CodCliente = @CodCliente)
|
||||
SELECT ISNULL(RagSociale, 'ND') AS RagSociale
|
||||
FROM RilPro.AnagClienti
|
||||
WHERE (CodCliente = @CodCliente)
|
||||
)
|
||||
|
||||
-- Cerco descrizione del particolare...
|
||||
SET @DescParticolare = (
|
||||
SELECT ISNULL(DescParticolare, 'ND') AS DescParticolare
|
||||
FROM RilPro.AnagParticolari
|
||||
WHERE (Particolare = @Particolare)
|
||||
SELECT ISNULL(DescParticolare, 'ND') AS DescParticolare
|
||||
FROM RilPro.AnagParticolari
|
||||
WHERE (Particolare = @Particolare)
|
||||
)
|
||||
|
||||
-- cerco codice disegno grezzo
|
||||
SET @DisegnoGrezzo = (
|
||||
SELECT ISNULL(DisegnoGrezzo, 'ND') AS DescParticolare
|
||||
FROM RilPro.AnagParticolari
|
||||
WHERE (Particolare = @Particolare)
|
||||
SELECT ISNULL(DisegnoGrezzo, 'ND') AS DescParticolare
|
||||
FROM RilPro.AnagParticolari
|
||||
WHERE (Particolare = @Particolare)
|
||||
)
|
||||
|
||||
-- cerco descrizione Impianto
|
||||
SET @DescImpianto = (
|
||||
SELECT ISNULL(DescImpianto, 'ND') AS DescImpianto
|
||||
FROM AnagImpianti
|
||||
WHERE (CodImpianto = @CodImpianto)
|
||||
SELECT ISNULL(DescImpianto, 'ND') AS DescImpianto
|
||||
FROM AnagImpianti
|
||||
WHERE (CodImpianto = @CodImpianto)
|
||||
)
|
||||
|
||||
|
||||
|
||||
-- Calcolo contatore intero successivo x il contenitore...
|
||||
SET @NumCont = (
|
||||
SELECT ISNULL(MAX(NumCont), 0) + 1 AS NumCont
|
||||
FROM ElencoCartellini
|
||||
WHERE (Particolare = @Particolare)
|
||||
AND (DataFus = @DataFus)
|
||||
AND (TurnoFus = @TurnoFus)
|
||||
AND (CodImpianto = @CodImpianto)
|
||||
AND (CodStampo = @CodStampo)
|
||||
AND (Figura = @Figura)
|
||||
SELECT ISNULL(MAX(NumCont), 0) + 1 AS NumCont
|
||||
FROM ElencoCartellini
|
||||
WHERE (Particolare = @Particolare)
|
||||
AND (DataFus = @DataFus)
|
||||
AND (TurnoFus = @TurnoFus)
|
||||
AND (CodImpianto = @CodImpianto)
|
||||
AND (CodStampo = @CodStampo)
|
||||
AND (Figura = @Figura)
|
||||
)
|
||||
|
||||
|
||||
@@ -578,57 +578,57 @@ SET @NumCont = (
|
||||
------------------------------------------------------------------------------------------------------
|
||||
-- controllo se esiste il flusso (bilancia)...
|
||||
SET @numFlu = (
|
||||
SELECT count(*)
|
||||
FROM AnagBilance
|
||||
WHERE CodBilancia = @Flusso
|
||||
SELECT count(*)
|
||||
FROM AnagBilance
|
||||
WHERE CodBilancia = @Flusso
|
||||
)
|
||||
-- ...sennò lo creo...
|
||||
IF(@numFlu = 0)
|
||||
BEGIN
|
||||
-- se c'è inserisco in tab
|
||||
INSERT INTO AnagBilance(CodBilancia, DescrImpianto, CodCS)
|
||||
VALUES (@Flusso, @Flusso, @CodCS)
|
||||
END
|
||||
BEGIN
|
||||
-- se c'è inserisco in tab
|
||||
INSERT INTO AnagBilance(CodBilancia, DescrImpianto, CodCS)
|
||||
VALUES (@Flusso, @Flusso, @CodCS)
|
||||
END
|
||||
------------------------------------------------------------------------------------------------------
|
||||
|
||||
|
||||
|
||||
------------------------------------------------------------------------------------------------------
|
||||
-- UDC
|
||||
------------------------------------------------------------------------------------------------------
|
||||
-- controllo se ci sia già un UDC per company / flusso anno
|
||||
BEGIN TRAN
|
||||
-- cerco nella tab contatori UDC l'ultimo valido
|
||||
SET @numUdc = (
|
||||
SELECT count(*)
|
||||
FROM ContatoriUdc
|
||||
WHERE CodCS = @CodCS
|
||||
AND Flusso = @Flusso
|
||||
AND Anno = @Anno
|
||||
)
|
||||
-- controllo se record c'è...
|
||||
IF(@numUdc > 0)
|
||||
BEGIN
|
||||
-- se c'è incremento di 1 in tab
|
||||
UPDATE ContatoriUdc
|
||||
SET LastIdx = LastIdx + 1
|
||||
WHERE CodCS = @CodCS
|
||||
AND Flusso = @Flusso
|
||||
AND Anno = @Anno
|
||||
END
|
||||
ELSE
|
||||
BEGIN
|
||||
-- lo creo!
|
||||
INSERT INTO ContatoriUdc(CodCS, Flusso, Anno, LastIdx)
|
||||
VALUES (@CodCS, @Flusso, @Anno, 1)
|
||||
END
|
||||
-- aggiorno numero UDC
|
||||
SET @numUdc = (
|
||||
SELECT LastIdx
|
||||
FROM ContatoriUdc
|
||||
WHERE CodCS = @CodCS
|
||||
AND Flusso = @Flusso
|
||||
AND Anno = @Anno
|
||||
)
|
||||
-- cerco nella tab contatori UDC l'ultimo valido
|
||||
SET @numUdc = (
|
||||
SELECT count(*)
|
||||
FROM ContatoriUdc
|
||||
WHERE CodCS = @CodCS
|
||||
AND Flusso = @Flusso
|
||||
AND Anno = @Anno
|
||||
)
|
||||
-- controllo se record c'è...
|
||||
IF(@numUdc > 0)
|
||||
BEGIN
|
||||
-- se c'è incremento di 1 in tab
|
||||
UPDATE ContatoriUdc
|
||||
SET LastIdx = LastIdx + 1
|
||||
WHERE CodCS = @CodCS
|
||||
AND Flusso = @Flusso
|
||||
AND Anno = @Anno
|
||||
END
|
||||
ELSE
|
||||
BEGIN
|
||||
-- lo creo!
|
||||
INSERT INTO ContatoriUdc(CodCS, Flusso, Anno, LastIdx)
|
||||
VALUES (@CodCS, @Flusso, @Anno, 1)
|
||||
END
|
||||
-- aggiorno numero UDC
|
||||
SET @numUdc = (
|
||||
SELECT LastIdx
|
||||
FROM ContatoriUdc
|
||||
WHERE CodCS = @CodCS
|
||||
AND Flusso = @Flusso
|
||||
AND Anno = @Anno
|
||||
)
|
||||
COMMIT TRAN
|
||||
------------------------------------------------------------------------------------------------------
|
||||
|
||||
@@ -636,18 +636,18 @@ COMMIT TRAN
|
||||
-- Ciclo principale x inserimento nuovo record
|
||||
------------------------------------------------------------------------------------------------------
|
||||
BEGIN TRAN
|
||||
-- ottengo il nuovo codice UDC completo
|
||||
--SET @UDC = 'U' + @CodCS + @Flusso + @Anno + dbo.f_padLeft(CAST(@numUdc AS VARCHAR(6)), 6, '0')
|
||||
SET @UDC = dbo.componiUdc(@CodCS, @Flusso, @Anno, @numUdc)
|
||||
-- ottengo il nuovo codice UDC completo
|
||||
--SET @UDC = 'U' + @CodCS + @Flusso + @Anno + dbo.f_padLeft(CAST(@numUdc AS VARCHAR(6)), 6, '0')
|
||||
SET @UDC = dbo.componiUdc(@CodCS, @Flusso, @Anno, @numUdc)
|
||||
|
||||
|
||||
-- inserisco un nuovo record
|
||||
INSERT INTO ElencoCartellini(UDC, CodCS, CodCliente, RagSociale, Particolare, DescParticolare, DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura, DataFus, TurnoFus, CodImballo, CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad, CreateDate, ModDate)
|
||||
VALUES (@UDC, @CodCS, @CodCliente, @RagSociale, @Particolare, @DescParticolare, @DisegnoGrezzo, @Esponente, @CodImpianto, @DescImpianto, @CodStampo, @Figura, @DataFus, @TurnoFus, @CodImballo, @CodSoggetto, @NumCont, @Tara, @Qta, @CodStato, @IdxPosizione, @PesoTot, @PesoCad, GETDATE(), GETDATE())
|
||||
|
||||
-- inserisco un nuovo record
|
||||
INSERT INTO ElencoCartellini(UDC, CodCS, CodCliente, RagSociale, Particolare, DescParticolare, DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura, DataFus, TurnoFus, CodImballo, CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad, CreateDate, ModDate)
|
||||
VALUES (@UDC, @CodCS, @CodCliente, @RagSociale, @Particolare, @DescParticolare, @DisegnoGrezzo, @Esponente, @CodImpianto, @DescImpianto, @CodStampo, @Figura, @DataFus, @TurnoFus, @CodImballo, @CodSoggetto, @NumCont, @Tara, @Qta, @CodStato, @IdxPosizione, @PesoTot, @PesoCad, GETDATE(), GETDATE())
|
||||
|
||||
-- inserisco relazione aprent-child tra UDC vecchio (tara) e nuovo (pesa)
|
||||
INSERT INTO RelazUDC(UDC_parent, UDC_child)
|
||||
VALUES (@UDC_parent, @UDC)
|
||||
-- inserisco relazione aprent-child tra UDC vecchio (tara) e nuovo (pesa)
|
||||
INSERT INTO RelazUDC(UDC_parent, UDC_child)
|
||||
VALUES (@UDC_parent, @UDC)
|
||||
COMMIT TRAN
|
||||
------------------------------------------------------------------------------------------------------
|
||||
|
||||
|
||||
@@ -285,7 +285,7 @@ commit
|
||||
go
|
||||
|
||||
|
||||
-- fix dei codSoggetto
|
||||
-- fix dei CodSoggetto
|
||||
|
||||
set xact_abort on
|
||||
go
|
||||
|
||||
@@ -20,25 +20,25 @@ go
|
||||
****************************************/
|
||||
create PROCEDURE BatchQueue.stp_consumaMP
|
||||
(
|
||||
@XRPQLN INT, --è il num rap qualità
|
||||
@XNRETI NVARCHAR(10), -- è il numRapQual
|
||||
@XDTPRO INT, -- data 8 cifre aaaammgg
|
||||
@XTRPRO NVARCHAR(5) -- turno
|
||||
@XRPQLN INT, --è il num rap qualità
|
||||
@XNRETI NVARCHAR(10), -- è il numRapQual
|
||||
@XDTPRO INT, -- data 8 cifre aaaammgg
|
||||
@XTRPRO NVARCHAR(5) -- turno
|
||||
)
|
||||
AS
|
||||
-- BOZZA DA COMPLETARE A CURA MAZZUCCONI!!!
|
||||
-- BOZZA DA COMPLETARE A CURA MAZZUCCONI!!!
|
||||
|
||||
DECLARE @SQL AS NVARCHAR(1000)
|
||||
DECLARE @SQL AS NVARCHAR(1000)
|
||||
|
||||
-- Faccio chiamata su AS400
|
||||
|
||||
SET @SQL = N' OPENQUERY( P65220DC, ''UPDATE MAZZT_DTV3.XOGIX00F'
|
||||
SET @SQL = @SQL + 'SET XDTPRO = ' + @XDTPRO + ', XTRPRO = ' + @XTRPRO
|
||||
SET @SQL = @SQL + ', XDESMT = ''F01'', XMATSC=''S'' '
|
||||
SET @SQL = @SQL + 'WHERE XRPQLN =' + @XRPQLN + ' AND XNRETI = ' + @XNRETI + ''' )'
|
||||
-- Faccio chiamata su AS400
|
||||
|
||||
SET @SQL = N' OPENQUERY( P65220DC, ''UPDATE MAZZT_DTV3.XOGIX00F'
|
||||
SET @SQL = @SQL + 'SET XDTPRO = ' + @XDTPRO + ', XTRPRO = ' + @XTRPRO
|
||||
SET @SQL = @SQL + ', XDESMT = ''F01'', XMATSC=''S'' '
|
||||
SET @SQL = @SQL + 'WHERE XRPQLN =' + @XRPQLN + ' AND XNRETI = ' + @XNRETI + ''' )'
|
||||
|
||||
EXEC sp_executesql @SQL
|
||||
|
||||
EXEC dbo.sp_executesql @SQL
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
@@ -53,8 +53,8 @@ go
|
||||
****************************************/
|
||||
alter PROCEDURE stp_annullaUDC
|
||||
(
|
||||
@UDC VARCHAR(20),
|
||||
@CodSoggetto VARCHAR(17)
|
||||
@UDC VARCHAR(20),
|
||||
@CodSoggetto VARCHAR(17)
|
||||
)
|
||||
AS
|
||||
|
||||
@@ -65,22 +65,22 @@ SET @CodEvento = 'UDC_ANN'
|
||||
SET @CodTipoDichiaraz = 'U'
|
||||
|
||||
BEGIN TRAN
|
||||
-- registro in StoricoCartellini
|
||||
INSERT INTO StoricoCartellini(DataEv, CodEvento, CodTipoDichiaraz, UDC, CodCS,CodCliente, RagSociale, Particolare, DescParticolare,
|
||||
DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura, DataFus, TurnoFus, CodImballo, CodSoggetto,
|
||||
NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad)
|
||||
SELECT GETDATE() AS DataEv, @CodEvento AS CodEvento, @CodTipoDichiaraz AS CodTipoDichiaraz, UDC, CodCS,
|
||||
CodCliente, RagSociale, Particolare, DescParticolare, DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura,
|
||||
DataFus, TurnoFus, CodImballo, @CodSoggetto AS CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad
|
||||
FROM ElencoCartellini
|
||||
WHERE (UDC = @UDC)
|
||||
-- registro in StoricoCartellini
|
||||
INSERT INTO StoricoCartellini(DataEv, CodEvento, CodTipoDichiaraz, UDC, CodCS,CodCliente, RagSociale, Particolare, DescParticolare,
|
||||
DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura, DataFus, TurnoFus, CodImballo, CodSoggetto,
|
||||
NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad)
|
||||
SELECT GETDATE() AS DataEv, @CodEvento AS CodEvento, @CodTipoDichiaraz AS CodTipoDichiaraz, UDC, CodCS,
|
||||
CodCliente, RagSociale, Particolare, DescParticolare, DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura,
|
||||
DataFus, TurnoFus, CodImballo, @CodSoggetto AS CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad
|
||||
FROM ElencoCartellini
|
||||
WHERE (UDC = @UDC)
|
||||
|
||||
-- faccio update
|
||||
UPDATE ElencoCartellini
|
||||
SET IdxPosizione = 0
|
||||
WHERE UDC = @UDC
|
||||
|
||||
|
||||
-- faccio update
|
||||
UPDATE ElencoCartellini
|
||||
SET IdxPosizione = 0
|
||||
WHERE UDC = @UDC
|
||||
|
||||
|
||||
COMMIT TRAN
|
||||
|
||||
RETURN
|
||||
@@ -109,13 +109,13 @@ go
|
||||
****************************************/
|
||||
alter PROCEDURE stp_getUdcDetailFullCode
|
||||
(
|
||||
@UDC VARCHAR(50),
|
||||
@CodCS VARCHAR(2)
|
||||
@UDC VARCHAR(50),
|
||||
@CodCS VARCHAR(2)
|
||||
)
|
||||
AS
|
||||
|
||||
SELECT ElencoCartellini.UDC, 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.DescParticolare, N'') AS DescParticolare, ISNULL(ElencoCartellini.DisegnoGrezzo, N'') AS DisegnoGrezzo,
|
||||
ISNULL(ElencoCartellini.Esponente, N'') AS Esponente, ISNULL(ElencoCartellini.DescImpianto, N'') AS DescImpianto,
|
||||
ISNULL(ElencoCartellini.DataFus, N'') AS DataFus, ISNULL(ElencoCartellini.TurnoFus, 0) AS TurnoFus, ElencoCartellini.CodImballo,
|
||||
ElencoCartellini.Qta, ISNULL(AnagStatiProdotto.DescStato, N'') AS DescStato, ElencoCartellini.ModDate,
|
||||
@@ -147,30 +147,30 @@ go
|
||||
****************************************/
|
||||
alter PROCEDURE stp_getUdcDetailLikeSearch
|
||||
(
|
||||
@searchVal VARCHAR(50),
|
||||
@CodCS VARCHAR(2)
|
||||
@searchVal VARCHAR(50),
|
||||
@CodCS VARCHAR(2)
|
||||
)
|
||||
AS
|
||||
|
||||
SELECT ElencoCartellini.UDC, 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.DescParticolare, N'') AS DescParticolare, ISNULL(ElencoCartellini.DisegnoGrezzo, N'') AS DisegnoGrezzo,
|
||||
ISNULL(ElencoCartellini.Esponente, N'') AS Esponente, ISNULL(ElencoCartellini.DescImpianto, N'') AS DescImpianto,
|
||||
ISNULL(ElencoCartellini.DataFus, N'') AS DataFus, ISNULL(ElencoCartellini.TurnoFus, 0) AS TurnoFus, ElencoCartellini.CodImballo,
|
||||
ElencoCartellini.Qta, ISNULL(AnagStatiProdotto.DescStato, N'') AS DescStato, ElencoCartellini.ModDate,
|
||||
ISNULL(Blocchi.CodMag, N'') AS CodMag, ISNULL(Blocchi.CodBlocco, N'') AS CodBlocco, ISNULL(Celle.CodCella, N'') AS CodCella,
|
||||
ISNULL(dbo.Celle.IdxCella, 0) AS IdxCella, ISNULL(Celle.X, 0) AS X, ISNULL(Celle.Y, 0) AS Y, ISNULL(Celle.Z, 0) AS Z, ElencoCartellini.IdxPosizione
|
||||
ISNULL(dbo.Celle.IdxCella, 0) AS IdxCella, ISNULL(Celle.X, 0) AS X, ISNULL(Celle.Y, 0) AS Y, ISNULL(Celle.Z, 0) AS Z, ElencoCartellini.IdxPosizione
|
||||
FROM AnagStatiProdotto RIGHT OUTER JOIN ElencoCartellini
|
||||
ON AnagStatiProdotto.CodStato = ElencoCartellini.CodStato AND AnagStatiProdotto.CodStato = ElencoCartellini.CodStato
|
||||
LEFT OUTER JOIN Celle INNER JOIN PosizioneUdcCorrente
|
||||
ON Celle.IdxCella = PosizioneUdcCorrente.IdxCella AND Celle.IdxCella = PosizioneUdcCorrente.IdxCella AND
|
||||
ON AnagStatiProdotto.CodStato = ElencoCartellini.CodStato AND AnagStatiProdotto.CodStato = ElencoCartellini.CodStato
|
||||
LEFT OUTER JOIN Celle INNER JOIN PosizioneUdcCorrente
|
||||
ON Celle.IdxCella = PosizioneUdcCorrente.IdxCella AND Celle.IdxCella = PosizioneUdcCorrente.IdxCella AND
|
||||
Celle.IdxCella = PosizioneUdcCorrente.IdxCella INNER JOIN
|
||||
Blocchi ON Celle.IdxBlocco = Blocchi.IdxBlocco INNER JOIN
|
||||
AnagMag ON Blocchi.CodMag = AnagMag.CodMag AND Blocchi.CodCS = AnagMag.CodCS AND Blocchi.CodMag = AnagMag.CodMag AND
|
||||
Blocchi.CodCS = AnagMag.CodCS AND Blocchi.CodMag = AnagMag.CodMag AND Blocchi.CodCS = AnagMag.CodCS ON
|
||||
ElencoCartellini.UDC = PosizioneUdcCorrente.UDC
|
||||
WHERE (ElencoCartellini.CodCS = @CodCS) AND
|
||||
((ElencoCartellini.UDC like '%'+ @searchVal+'%') OR (ElencoCartellini.Particolare like '%'+ @searchVal+'%') OR
|
||||
(ElencoCartellini.RagSociale like '%'+ @searchVal+'%'))
|
||||
((ElencoCartellini.UDC like '%'+ @searchVal+'%') OR (ElencoCartellini.Particolare like '%'+ @searchVal+'%') OR
|
||||
(ElencoCartellini.RagSociale like '%'+ @searchVal+'%'))
|
||||
|
||||
RETURN
|
||||
go
|
||||
@@ -199,14 +199,14 @@ go
|
||||
****************************************/
|
||||
alter PROCEDURE stp_rappQualGetByNumRapQual
|
||||
(
|
||||
@nRapQual INT
|
||||
@nRapQual INT
|
||||
)
|
||||
AS
|
||||
-- restituisce le righe richieste
|
||||
SELECT *
|
||||
FROM RilPro.RapQual
|
||||
WHERE (nRapQual = @nRapQual)-- AND (UDC IS NULL)
|
||||
|
||||
-- restituisce le righe richieste
|
||||
SELECT *
|
||||
FROM RilPro.RapQual
|
||||
WHERE (nRapQual = @nRapQual)-- AND (UDC IS NULL)
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
@@ -221,8 +221,8 @@ go
|
||||
****************************************/
|
||||
alter PROCEDURE stp_sbloccaUdc
|
||||
(
|
||||
@UDC VARCHAR(20),
|
||||
@CodSoggetto VARCHAR(17)
|
||||
@UDC VARCHAR(20),
|
||||
@CodSoggetto VARCHAR(17)
|
||||
)
|
||||
AS
|
||||
|
||||
@@ -233,21 +233,21 @@ SET @CodEvento = 'UDC_SBL'
|
||||
SET @CodTipoDichiaraz = 'U'
|
||||
|
||||
BEGIN TRAN
|
||||
-- registro in StoricoCartellini
|
||||
INSERT INTO StoricoCartellini(DataEv, CodEvento, CodTipoDichiaraz, UDC, CodCS,CodCliente, RagSociale, Particolare, DescParticolare,
|
||||
DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura, DataFus, TurnoFus, CodImballo, CodSoggetto,
|
||||
NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad)
|
||||
SELECT GETDATE() AS DataEv, @CodEvento AS CodEvento, @CodTipoDichiaraz AS CodTipoDichiaraz, UDC, CodCS,
|
||||
CodCliente, RagSociale, Particolare, DescParticolare, DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura,
|
||||
DataFus, TurnoFus, CodImballo, @CodSoggetto AS CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad
|
||||
FROM ElencoCartellini
|
||||
WHERE (UDC = @UDC)
|
||||
|
||||
-- faccio update
|
||||
UPDATE ElencoCartellini
|
||||
SET ModDate = GETDATE()
|
||||
WHERE UDC = @UDC
|
||||
|
||||
-- registro in StoricoCartellini
|
||||
INSERT INTO StoricoCartellini(DataEv, CodEvento, CodTipoDichiaraz, UDC, CodCS,CodCliente, RagSociale, Particolare, DescParticolare,
|
||||
DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura, DataFus, TurnoFus, CodImballo, CodSoggetto,
|
||||
NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad)
|
||||
SELECT GETDATE() AS DataEv, @CodEvento AS CodEvento, @CodTipoDichiaraz AS CodTipoDichiaraz, UDC, CodCS,
|
||||
CodCliente, RagSociale, Particolare, DescParticolare, DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura,
|
||||
DataFus, TurnoFus, CodImballo, @CodSoggetto AS CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad
|
||||
FROM ElencoCartellini
|
||||
WHERE (UDC = @UDC)
|
||||
|
||||
-- faccio update
|
||||
UPDATE ElencoCartellini
|
||||
SET ModDate = GETDATE()
|
||||
WHERE UDC = @UDC
|
||||
|
||||
COMMIT TRAN
|
||||
|
||||
RETURN
|
||||
@@ -264,32 +264,32 @@ go
|
||||
****************************************/
|
||||
alter PROCEDURE stp_scaricaUdc
|
||||
(
|
||||
@UDC VARCHAR(50),
|
||||
@IdxCellaFrom INT,
|
||||
@IdxPosizione INT
|
||||
@UDC VARCHAR(50),
|
||||
@IdxCellaFrom INT,
|
||||
@IdxPosizione INT
|
||||
)
|
||||
AS
|
||||
|
||||
BEGIN TRAN
|
||||
/*
|
||||
-- inizio mettendo in storico la posizione attuale dell'UDC (SE esiste)
|
||||
INSERT INTO PosizioneUdcStorico(UDC, IdxCella, CodCS, DataInizio, DataFine)
|
||||
(
|
||||
SELECT UDC, IdxCella, CodCS, DataRif as DataInizio, GETDATE() as DataFine
|
||||
FROM PosizioneUdcCorrente
|
||||
WHERE UDC = @UDC AND IdxCella = @IdxCellaFrom
|
||||
)
|
||||
*/
|
||||
-- libero la posizione attuale dell'UDC (se c'è...)
|
||||
DELETE
|
||||
FROM PosizioneUdcCorrente
|
||||
WHERE UDC = @UDC AND IdxCella = @IdxCellaFrom
|
||||
|
||||
-- aggiorno l'UDC come posizione finale...
|
||||
UPDATE ElencoCartellini
|
||||
SET IdxPosizione = @IdxPosizione
|
||||
WHERE UDC = @UDC
|
||||
|
||||
/*
|
||||
-- inizio mettendo in storico la posizione attuale dell'UDC (SE esiste)
|
||||
INSERT INTO PosizioneUdcStorico(UDC, IdxCella, CodCS, DataInizio, DataFine)
|
||||
(
|
||||
SELECT UDC, IdxCella, CodCS, DataRif as DataInizio, GETDATE() as DataFine
|
||||
FROM PosizioneUdcCorrente
|
||||
WHERE UDC = @UDC AND IdxCella = @IdxCellaFrom
|
||||
)
|
||||
*/
|
||||
-- libero la posizione attuale dell'UDC (se c'è...)
|
||||
DELETE
|
||||
FROM PosizioneUdcCorrente
|
||||
WHERE UDC = @UDC AND IdxCella = @IdxCellaFrom
|
||||
|
||||
-- aggiorno l'UDC come posizione finale...
|
||||
UPDATE ElencoCartellini
|
||||
SET IdxPosizione = @IdxPosizione
|
||||
WHERE UDC = @UDC
|
||||
|
||||
COMMIT TRAN
|
||||
|
||||
RETURN
|
||||
@@ -319,13 +319,13 @@ go
|
||||
****************************************/
|
||||
alter PROCEDURE stp_UDC_insNew
|
||||
(
|
||||
@CodCS VARCHAR(2),
|
||||
@Flusso VARCHAR(2),
|
||||
@Anno VARCHAR(2),
|
||||
@Tara FLOAT,
|
||||
@CodImballo AS VARCHAR(50),
|
||||
@CodTipoDichiaraz CHAR(1),
|
||||
@CodSoggetto VARCHAR(17)
|
||||
@CodCS VARCHAR(2),
|
||||
@Flusso VARCHAR(2),
|
||||
@Anno VARCHAR(2),
|
||||
@Tara FLOAT,
|
||||
@CodImballo AS VARCHAR(50),
|
||||
@CodTipoDichiaraz CHAR(1),
|
||||
@CodSoggetto VARCHAR(17)
|
||||
)
|
||||
AS
|
||||
|
||||
@@ -334,63 +334,63 @@ DECLARE @UDC AS VARCHAR(20)
|
||||
DECLARE @numFlu AS INT
|
||||
DECLARE @numUdc AS INT
|
||||
DECLARE @nextUdc AS INT
|
||||
|
||||
|
||||
------------------------------------------------------------------------------------------------------
|
||||
-- Flusso
|
||||
------------------------------------------------------------------------------------------------------
|
||||
-- controllo se esiste il flusso (bilancia)...
|
||||
SET @numFlu = (
|
||||
SELECT count(*)
|
||||
FROM AnagBilance
|
||||
WHERE CodBilancia = @Flusso
|
||||
SELECT count(*)
|
||||
FROM AnagBilance
|
||||
WHERE CodBilancia = @Flusso
|
||||
)
|
||||
-- ...sennò lo creo...
|
||||
IF(@numFlu = 0)
|
||||
BEGIN
|
||||
-- se c'è inserisco in tab
|
||||
INSERT INTO AnagBilance(CodBilancia, DescrImpianto, CodCS)
|
||||
VALUES (@Flusso, @Flusso, @CodCS)
|
||||
END
|
||||
BEGIN
|
||||
-- se c'è inserisco in tab
|
||||
INSERT INTO AnagBilance(CodBilancia, DescrImpianto, CodCS)
|
||||
VALUES (@Flusso, @Flusso, @CodCS)
|
||||
END
|
||||
------------------------------------------------------------------------------------------------------
|
||||
|
||||
|
||||
|
||||
------------------------------------------------------------------------------------------------------
|
||||
-- UDC
|
||||
------------------------------------------------------------------------------------------------------
|
||||
-- controllo se ci sia già un UDC per company / flusso anno
|
||||
BEGIN TRAN
|
||||
-- cerco nella tab contatori UDC l'ultimo valido
|
||||
SET @numUdc = (
|
||||
SELECT count(*)
|
||||
FROM ContatoriUdc
|
||||
WHERE CodCS = @CodCS
|
||||
AND Flusso = @Flusso
|
||||
AND Anno = @Anno
|
||||
)
|
||||
-- controllo se record c'è...
|
||||
IF(@numUdc > 0)
|
||||
BEGIN
|
||||
-- se c'è incremento di 1 in tab
|
||||
UPDATE ContatoriUdc
|
||||
SET LastIdx = LastIdx + 1
|
||||
WHERE CodCS = @CodCS
|
||||
AND Flusso = @Flusso
|
||||
AND Anno = @Anno
|
||||
END
|
||||
ELSE
|
||||
BEGIN
|
||||
-- lo creo!
|
||||
INSERT INTO ContatoriUdc(CodCS, Flusso, Anno, LastIdx)
|
||||
VALUES (@CodCS, @Flusso, @Anno, 1)
|
||||
END
|
||||
-- aggiorno numero UDC
|
||||
SET @numUdc = (
|
||||
SELECT LastIdx
|
||||
FROM ContatoriUdc
|
||||
WHERE CodCS = @CodCS
|
||||
AND Flusso = @Flusso
|
||||
AND Anno = @Anno
|
||||
)
|
||||
-- cerco nella tab contatori UDC l'ultimo valido
|
||||
SET @numUdc = (
|
||||
SELECT count(*)
|
||||
FROM ContatoriUdc
|
||||
WHERE CodCS = @CodCS
|
||||
AND Flusso = @Flusso
|
||||
AND Anno = @Anno
|
||||
)
|
||||
-- controllo se record c'è...
|
||||
IF(@numUdc > 0)
|
||||
BEGIN
|
||||
-- se c'è incremento di 1 in tab
|
||||
UPDATE ContatoriUdc
|
||||
SET LastIdx = LastIdx + 1
|
||||
WHERE CodCS = @CodCS
|
||||
AND Flusso = @Flusso
|
||||
AND Anno = @Anno
|
||||
END
|
||||
ELSE
|
||||
BEGIN
|
||||
-- lo creo!
|
||||
INSERT INTO ContatoriUdc(CodCS, Flusso, Anno, LastIdx)
|
||||
VALUES (@CodCS, @Flusso, @Anno, 1)
|
||||
END
|
||||
-- aggiorno numero UDC
|
||||
SET @numUdc = (
|
||||
SELECT LastIdx
|
||||
FROM ContatoriUdc
|
||||
WHERE CodCS = @CodCS
|
||||
AND Flusso = @Flusso
|
||||
AND Anno = @Anno
|
||||
)
|
||||
COMMIT TRAN
|
||||
------------------------------------------------------------------------------------------------------
|
||||
|
||||
@@ -400,7 +400,7 @@ COMMIT TRAN
|
||||
-- ottengo il nuovo codice UDC completo
|
||||
--SET @UDC = 'U' + @CodCS + @Flusso + @Anno + dbo.f_padLeft(CAST(@numUdc AS VARCHAR(6)), 6, '0')
|
||||
SET @UDC = dbo.componiUdc(@CodCS, @Flusso, @Anno, @numUdc)
|
||||
|
||||
|
||||
-- inserisco un nuovo record
|
||||
INSERT INTO ElencoCartellini(CodCS, UDC, Tara, IdxPosizione, Qta, CodImballo, CreateDate, ModDate)
|
||||
VALUES (@CodCS, @UDC, @Tara, 0, 0, @CodImballo, GETDATE(), GETDATE())
|
||||
@@ -428,29 +428,29 @@ go
|
||||
****************************************/
|
||||
alter PROCEDURE stp_UDC_insNewFull
|
||||
(
|
||||
@CodCS VARCHAR(2),
|
||||
@Flusso VARCHAR(2),
|
||||
@Anno VARCHAR(2),
|
||||
@CodCliente VARCHAR(6),
|
||||
@Particolare VARCHAR(15),
|
||||
@CodImpianto AS VARCHAR(50),
|
||||
@CodStampo VARCHAR(8),
|
||||
@Esponente VARCHAR(6),
|
||||
@Figura VARCHAR(4),
|
||||
@DataFus DATETIME,
|
||||
@TurnoFus INT,
|
||||
@CodImballo VARCHAR(15),
|
||||
@CodSoggetto VARCHAR(17),
|
||||
@Tara FLOAT,
|
||||
@IdxPosizione INT,
|
||||
@CodTipoDichiaraz CHAR(1),
|
||||
@CodEvento VARCHAR(10),
|
||||
@Qta DECIMAL(10,2),
|
||||
@PesoTot FLOAT,
|
||||
@PesoCad FLOAT,
|
||||
@CodStato VARCHAR(50),
|
||||
@UDC_parent VARCHAR(20),
|
||||
@DoDeleteUdcParent BIT
|
||||
@CodCS VARCHAR(2),
|
||||
@Flusso VARCHAR(2),
|
||||
@Anno VARCHAR(2),
|
||||
@CodCliente VARCHAR(6),
|
||||
@Particolare VARCHAR(15),
|
||||
@CodImpianto AS VARCHAR(50),
|
||||
@CodStampo VARCHAR(8),
|
||||
@Esponente VARCHAR(6),
|
||||
@Figura VARCHAR(4),
|
||||
@DataFus DATETIME,
|
||||
@TurnoFus INT,
|
||||
@CodImballo VARCHAR(15),
|
||||
@CodSoggetto VARCHAR(17),
|
||||
@Tara FLOAT,
|
||||
@IdxPosizione INT,
|
||||
@CodTipoDichiaraz CHAR(1),
|
||||
@CodEvento VARCHAR(10),
|
||||
@Qta DECIMAL(10,2),
|
||||
@PesoTot FLOAT,
|
||||
@PesoCad FLOAT,
|
||||
@CodStato VARCHAR(50),
|
||||
@UDC_parent VARCHAR(20),
|
||||
@DoDeleteUdcParent BIT
|
||||
)
|
||||
AS
|
||||
|
||||
@@ -471,44 +471,44 @@ DECLARE @IdxCella AS INT
|
||||
------------------------------------------------------------------------------------------------------
|
||||
-- cerco la ragione sociale...
|
||||
SET @RagSociale = (
|
||||
SELECT ISNULL(RagSociale, 'ND') AS RagSociale
|
||||
FROM RilPro.AnagClienti
|
||||
WHERE (CodCliente = @CodCliente)
|
||||
SELECT ISNULL(RagSociale, 'ND') AS RagSociale
|
||||
FROM RilPro.AnagClienti
|
||||
WHERE (CodCliente = @CodCliente)
|
||||
)
|
||||
|
||||
-- Cerco descrizione del particolare...
|
||||
SET @DescParticolare = (
|
||||
SELECT ISNULL(DescParticolare, 'ND') AS DescParticolare
|
||||
FROM RilPro.AnagParticolari
|
||||
WHERE (Particolare = @Particolare)
|
||||
SELECT ISNULL(DescParticolare, 'ND') AS DescParticolare
|
||||
FROM RilPro.AnagParticolari
|
||||
WHERE (Particolare = @Particolare)
|
||||
)
|
||||
|
||||
-- cerco codice disegno grezzo
|
||||
SET @DisegnoGrezzo = (
|
||||
SELECT ISNULL(DisegnoGrezzo, 'ND') AS DescParticolare
|
||||
FROM RilPro.AnagParticolari
|
||||
WHERE (Particolare = @Particolare)
|
||||
SELECT ISNULL(DisegnoGrezzo, 'ND') AS DescParticolare
|
||||
FROM RilPro.AnagParticolari
|
||||
WHERE (Particolare = @Particolare)
|
||||
)
|
||||
|
||||
-- cerco descrizione Impianto
|
||||
SET @DescImpianto = (
|
||||
SELECT ISNULL(DescImpianto, 'ND') AS DescImpianto
|
||||
FROM AnagImpianti
|
||||
WHERE (CodImpianto = @CodImpianto)
|
||||
SELECT ISNULL(DescImpianto, 'ND') AS DescImpianto
|
||||
FROM AnagImpianti
|
||||
WHERE (CodImpianto = @CodImpianto)
|
||||
)
|
||||
|
||||
|
||||
|
||||
-- Calcolo contatore intero successivo x il contenitore...
|
||||
SET @NumCont = (
|
||||
SELECT ISNULL(MAX(NumCont), 0) + 1 AS NumCont
|
||||
FROM ElencoCartellini
|
||||
WHERE (Particolare = @Particolare)
|
||||
AND (DataFus = @DataFus)
|
||||
AND (TurnoFus = @TurnoFus)
|
||||
AND (CodImpianto = @CodImpianto)
|
||||
AND (CodStampo = @CodStampo)
|
||||
AND (Figura = @Figura)
|
||||
SELECT ISNULL(MAX(NumCont), 0) + 1 AS NumCont
|
||||
FROM ElencoCartellini
|
||||
WHERE (Particolare = @Particolare)
|
||||
AND (DataFus = @DataFus)
|
||||
AND (TurnoFus = @TurnoFus)
|
||||
AND (CodImpianto = @CodImpianto)
|
||||
AND (CodStampo = @CodStampo)
|
||||
AND (Figura = @Figura)
|
||||
)
|
||||
|
||||
|
||||
@@ -519,57 +519,57 @@ SET @NumCont = (
|
||||
------------------------------------------------------------------------------------------------------
|
||||
-- controllo se esiste il flusso (bilancia)...
|
||||
SET @numFlu = (
|
||||
SELECT count(*)
|
||||
FROM AnagBilance
|
||||
WHERE CodBilancia = @Flusso
|
||||
SELECT count(*)
|
||||
FROM AnagBilance
|
||||
WHERE CodBilancia = @Flusso
|
||||
)
|
||||
-- ...sennò lo creo...
|
||||
IF(@numFlu = 0)
|
||||
BEGIN
|
||||
-- se c'è inserisco in tab
|
||||
INSERT INTO AnagBilance(CodBilancia, DescrImpianto, CodCS)
|
||||
VALUES (@Flusso, @Flusso, @CodCS)
|
||||
END
|
||||
BEGIN
|
||||
-- se c'è inserisco in tab
|
||||
INSERT INTO AnagBilance(CodBilancia, DescrImpianto, CodCS)
|
||||
VALUES (@Flusso, @Flusso, @CodCS)
|
||||
END
|
||||
------------------------------------------------------------------------------------------------------
|
||||
|
||||
|
||||
|
||||
------------------------------------------------------------------------------------------------------
|
||||
-- UDC
|
||||
------------------------------------------------------------------------------------------------------
|
||||
-- controllo se ci sia già un UDC per company / flusso anno
|
||||
BEGIN TRAN
|
||||
-- cerco nella tab contatori UDC l'ultimo valido
|
||||
SET @numUdc = (
|
||||
SELECT count(*)
|
||||
FROM ContatoriUdc
|
||||
WHERE CodCS = @CodCS
|
||||
AND Flusso = @Flusso
|
||||
AND Anno = @Anno
|
||||
)
|
||||
-- controllo se record c'è...
|
||||
IF(@numUdc > 0)
|
||||
BEGIN
|
||||
-- se c'è incremento di 1 in tab
|
||||
UPDATE ContatoriUdc
|
||||
SET LastIdx = LastIdx + 1
|
||||
WHERE CodCS = @CodCS
|
||||
AND Flusso = @Flusso
|
||||
AND Anno = @Anno
|
||||
END
|
||||
ELSE
|
||||
BEGIN
|
||||
-- lo creo!
|
||||
INSERT INTO ContatoriUdc(CodCS, Flusso, Anno, LastIdx)
|
||||
VALUES (@CodCS, @Flusso, @Anno, 1)
|
||||
END
|
||||
-- aggiorno numero UDC
|
||||
SET @numUdc = (
|
||||
SELECT LastIdx
|
||||
FROM ContatoriUdc
|
||||
WHERE CodCS = @CodCS
|
||||
AND Flusso = @Flusso
|
||||
AND Anno = @Anno
|
||||
)
|
||||
-- cerco nella tab contatori UDC l'ultimo valido
|
||||
SET @numUdc = (
|
||||
SELECT count(*)
|
||||
FROM ContatoriUdc
|
||||
WHERE CodCS = @CodCS
|
||||
AND Flusso = @Flusso
|
||||
AND Anno = @Anno
|
||||
)
|
||||
-- controllo se record c'è...
|
||||
IF(@numUdc > 0)
|
||||
BEGIN
|
||||
-- se c'è incremento di 1 in tab
|
||||
UPDATE ContatoriUdc
|
||||
SET LastIdx = LastIdx + 1
|
||||
WHERE CodCS = @CodCS
|
||||
AND Flusso = @Flusso
|
||||
AND Anno = @Anno
|
||||
END
|
||||
ELSE
|
||||
BEGIN
|
||||
-- lo creo!
|
||||
INSERT INTO ContatoriUdc(CodCS, Flusso, Anno, LastIdx)
|
||||
VALUES (@CodCS, @Flusso, @Anno, 1)
|
||||
END
|
||||
-- aggiorno numero UDC
|
||||
SET @numUdc = (
|
||||
SELECT LastIdx
|
||||
FROM ContatoriUdc
|
||||
WHERE CodCS = @CodCS
|
||||
AND Flusso = @Flusso
|
||||
AND Anno = @Anno
|
||||
)
|
||||
COMMIT TRAN
|
||||
------------------------------------------------------------------------------------------------------
|
||||
|
||||
@@ -577,18 +577,18 @@ COMMIT TRAN
|
||||
-- Ciclo principale x inserimento nuovo record
|
||||
------------------------------------------------------------------------------------------------------
|
||||
BEGIN TRAN
|
||||
-- ottengo il nuovo codice UDC completo
|
||||
--SET @UDC = 'U' + @CodCS + @Flusso + @Anno + dbo.f_padLeft(CAST(@numUdc AS VARCHAR(6)), 6, '0')
|
||||
SET @UDC = dbo.componiUdc(@CodCS, @Flusso, @Anno, @numUdc)
|
||||
-- ottengo il nuovo codice UDC completo
|
||||
--SET @UDC = 'U' + @CodCS + @Flusso + @Anno + dbo.f_padLeft(CAST(@numUdc AS VARCHAR(6)), 6, '0')
|
||||
SET @UDC = dbo.componiUdc(@CodCS, @Flusso, @Anno, @numUdc)
|
||||
|
||||
|
||||
-- inserisco un nuovo record
|
||||
INSERT INTO ElencoCartellini(UDC, CodCS, CodCliente, RagSociale, Particolare, DescParticolare, DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura, DataFus, TurnoFus, CodImballo, CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad, CreateDate, ModDate)
|
||||
VALUES (@UDC, @CodCS, @CodCliente, @RagSociale, @Particolare, @DescParticolare, @DisegnoGrezzo, @Esponente, @CodImpianto, @DescImpianto, @CodStampo, @Figura, @DataFus, @TurnoFus, @CodImballo, @CodSoggetto, @NumCont, @Tara, @Qta, @CodStato, @IdxPosizione, @PesoTot, @PesoCad, GETDATE(), GETDATE())
|
||||
|
||||
-- inserisco un nuovo record
|
||||
INSERT INTO ElencoCartellini(UDC, CodCS, CodCliente, RagSociale, Particolare, DescParticolare, DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura, DataFus, TurnoFus, CodImballo, CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad, CreateDate, ModDate)
|
||||
VALUES (@UDC, @CodCS, @CodCliente, @RagSociale, @Particolare, @DescParticolare, @DisegnoGrezzo, @Esponente, @CodImpianto, @DescImpianto, @CodStampo, @Figura, @DataFus, @TurnoFus, @CodImballo, @CodSoggetto, @NumCont, @Tara, @Qta, @CodStato, @IdxPosizione, @PesoTot, @PesoCad, GETDATE(), GETDATE())
|
||||
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa)
|
||||
INSERT INTO RelazUDC(UDC_parent, UDC_child)
|
||||
VALUES (@UDC_parent, @UDC)
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa)
|
||||
INSERT INTO RelazUDC(UDC_parent, UDC_child)
|
||||
VALUES (@UDC_parent, @UDC)
|
||||
COMMIT TRAN
|
||||
|
||||
------------------------------------------------------------------------------------------------------
|
||||
@@ -596,21 +596,21 @@ COMMIT TRAN
|
||||
------------------------------------------------------------------------------------------------------
|
||||
-- Ciclo secondario x eventuale cancelalzione UDC tara parent e inserimento in posizione
|
||||
------------------------------------------------------------------------------------------------------
|
||||
-- se richiesto elimino l'UDC parent (tara)
|
||||
IF(@DoDeleteUdcParent = 1)
|
||||
BEGIN
|
||||
DELETE FROM ElencoCartellini WHERE UDC = @UDC_parent
|
||||
END
|
||||
|
||||
-- calcolo la prima cella della posizione indicata..
|
||||
SET @IdxCella = (
|
||||
SELECT TOP 1 c.IdxCella
|
||||
FROM Celle c INNER JOIN Blocchi b ON c.IdxBlocco=b.IdxBlocco
|
||||
WHERE b.CodMag = CAST(@IdxPosizione AS NVARCHAR(50))
|
||||
)
|
||||
-- inserisco il cartellino nella prima cella della posizione indicata..
|
||||
INSERT INTO PosizioneUdcCorrente
|
||||
VALUES (@UDC, @IdxCella, @CodCS, GETDATE())
|
||||
-- se richiesto elimino l'UDC parent (tara)
|
||||
IF(@DoDeleteUdcParent = 1)
|
||||
BEGIN
|
||||
DELETE FROM ElencoCartellini WHERE UDC = @UDC_parent
|
||||
END
|
||||
|
||||
-- calcolo la prima cella della posizione indicata..
|
||||
SET @IdxCella = (
|
||||
SELECT TOP 1 c.IdxCella
|
||||
FROM Celle c INNER JOIN Blocchi b ON c.IdxBlocco=b.IdxBlocco
|
||||
WHERE b.CodMag = CAST(@IdxPosizione AS NVARCHAR(50))
|
||||
)
|
||||
-- inserisco il cartellino nella prima cella della posizione indicata..
|
||||
INSERT INTO PosizioneUdcCorrente
|
||||
VALUES (@UDC, @IdxCella, @CodCS, GETDATE())
|
||||
------------------------------------------------------------------------------------------------------
|
||||
|
||||
/*
|
||||
@@ -644,29 +644,29 @@ go
|
||||
****************************************/
|
||||
alter PROCEDURE stp_UDC_update
|
||||
(
|
||||
@UDC_edit VARCHAR(20),
|
||||
@CodCS VARCHAR(2),
|
||||
@Flusso VARCHAR(2),
|
||||
@Anno VARCHAR(2),
|
||||
@CodCliente VARCHAR(6),
|
||||
@Particolare VARCHAR(15),
|
||||
@CodImpianto AS VARCHAR(50),
|
||||
@CodStampo VARCHAR(8),
|
||||
@Esponente VARCHAR(6),
|
||||
@Figura VARCHAR(4),
|
||||
@DataFus DATETIME,
|
||||
@TurnoFus INT,
|
||||
@CodImballo VARCHAR(15),
|
||||
@CodSoggetto VARCHAR(17),
|
||||
@Tara FLOAT,
|
||||
@IdxPosizione INT,
|
||||
@CodTipoDichiaraz CHAR(1),
|
||||
@CodEvento VARCHAR(10),
|
||||
@Qta DECIMAL(10,2),
|
||||
@PesoTot FLOAT,
|
||||
@PesoCad FLOAT,
|
||||
@CodStato VARCHAR(50),
|
||||
@UDC_parent VARCHAR(20)
|
||||
@UDC_edit VARCHAR(20),
|
||||
@CodCS VARCHAR(2),
|
||||
@Flusso VARCHAR(2),
|
||||
@Anno VARCHAR(2),
|
||||
@CodCliente VARCHAR(6),
|
||||
@Particolare VARCHAR(15),
|
||||
@CodImpianto AS VARCHAR(50),
|
||||
@CodStampo VARCHAR(8),
|
||||
@Esponente VARCHAR(6),
|
||||
@Figura VARCHAR(4),
|
||||
@DataFus DATETIME,
|
||||
@TurnoFus INT,
|
||||
@CodImballo VARCHAR(15),
|
||||
@CodSoggetto VARCHAR(17),
|
||||
@Tara FLOAT,
|
||||
@IdxPosizione INT,
|
||||
@CodTipoDichiaraz CHAR(1),
|
||||
@CodEvento VARCHAR(10),
|
||||
@Qta DECIMAL(10,2),
|
||||
@PesoTot FLOAT,
|
||||
@PesoCad FLOAT,
|
||||
@CodStato VARCHAR(50),
|
||||
@UDC_parent VARCHAR(20)
|
||||
)
|
||||
AS
|
||||
|
||||
@@ -685,39 +685,39 @@ DECLARE @nextUdc AS INT
|
||||
------------------------------------------------------------------------------------------------------
|
||||
-- cerco la ragione sociale...
|
||||
SET @RagSociale = (
|
||||
SELECT ISNULL(RagSociale, 'ND') AS RagSociale
|
||||
FROM RilPro.AnagClienti
|
||||
WHERE (CodCliente = @CodCliente)
|
||||
SELECT ISNULL(RagSociale, 'ND') AS RagSociale
|
||||
FROM RilPro.AnagClienti
|
||||
WHERE (CodCliente = @CodCliente)
|
||||
)
|
||||
|
||||
-- Cerco descrizione del particolare...
|
||||
SET @DescParticolare = (
|
||||
SELECT ISNULL(DescParticolare, 'ND') AS DescParticolare
|
||||
FROM RilPro.AnagParticolari
|
||||
WHERE (Particolare = @Particolare)
|
||||
SELECT ISNULL(DescParticolare, 'ND') AS DescParticolare
|
||||
FROM RilPro.AnagParticolari
|
||||
WHERE (Particolare = @Particolare)
|
||||
)
|
||||
|
||||
-- cerco codice disegno grezzo
|
||||
SET @DisegnoGrezzo = (
|
||||
SELECT ISNULL(DisegnoGrezzo, 'ND') AS DescParticolare
|
||||
FROM RilPro.AnagParticolari
|
||||
WHERE (Particolare = @Particolare)
|
||||
SELECT ISNULL(DisegnoGrezzo, 'ND') AS DescParticolare
|
||||
FROM RilPro.AnagParticolari
|
||||
WHERE (Particolare = @Particolare)
|
||||
)
|
||||
|
||||
-- cerco descrizione Impianto
|
||||
SET @DescImpianto = (
|
||||
SELECT ISNULL(DescImpianto, 'ND') AS DescImpianto
|
||||
FROM AnagImpianti
|
||||
WHERE (CodImpianto = @CodImpianto)
|
||||
SELECT ISNULL(DescImpianto, 'ND') AS DescImpianto
|
||||
FROM AnagImpianti
|
||||
WHERE (CodImpianto = @CodImpianto)
|
||||
)
|
||||
|
||||
|
||||
|
||||
-- Calcolo contatore intero successivo x il contenitore...
|
||||
SET @NumCont = (
|
||||
SELECT NumCont
|
||||
FROM ElencoCartellini
|
||||
WHERE (UDC = @UDC_edit)
|
||||
SELECT NumCont
|
||||
FROM ElencoCartellini
|
||||
WHERE (UDC = @UDC_edit)
|
||||
)
|
||||
|
||||
|
||||
@@ -728,48 +728,48 @@ SET @NumCont = (
|
||||
------------------------------------------------------------------------------------------------------
|
||||
-- controllo se esiste il flusso (bilancia)...
|
||||
SET @numFlu = (
|
||||
SELECT count(*)
|
||||
FROM AnagBilance
|
||||
WHERE CodBilancia = @Flusso
|
||||
SELECT count(*)
|
||||
FROM AnagBilance
|
||||
WHERE CodBilancia = @Flusso
|
||||
)
|
||||
-- ...sennò lo creo...
|
||||
IF(@numFlu = 0)
|
||||
BEGIN
|
||||
-- se c'è inserisco in tab
|
||||
INSERT INTO AnagBilance(CodBilancia, DescrImpianto, CodCS)
|
||||
VALUES (@Flusso, @Flusso, @CodCS)
|
||||
END
|
||||
BEGIN
|
||||
-- se c'è inserisco in tab
|
||||
INSERT INTO AnagBilance(CodBilancia, DescrImpianto, CodCS)
|
||||
VALUES (@Flusso, @Flusso, @CodCS)
|
||||
END
|
||||
------------------------------------------------------------------------------------------------------
|
||||
|
||||
------------------------------------------------------------------------------------------------------
|
||||
-- Ciclo principale x edit record
|
||||
------------------------------------------------------------------------------------------------------
|
||||
BEGIN TRAN
|
||||
-- registro in StoricoCartellini
|
||||
INSERT INTO StoricoCartellini(DataEv, CodEvento, CodTipoDichiaraz, UDC, CodCS,CodCliente, RagSociale, Particolare, DescParticolare,
|
||||
DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura, DataFus, TurnoFus, CodImballo, CodSoggetto,
|
||||
NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad)
|
||||
SELECT GETDATE() AS DataEv, @CodEvento AS CodEvento, @CodTipoDichiaraz AS CodTipoDichiaraz, UDC, CodCS,
|
||||
CodCliente, RagSociale, Particolare, DescParticolare, DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura,
|
||||
DataFus, TurnoFus, CodImballo, @CodSoggetto AS CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad
|
||||
FROM ElencoCartellini
|
||||
WHERE (UDC = @UDC_edit)
|
||||
|
||||
-- elimino vecchio record parent/child
|
||||
DELETE FROM RelazUDC
|
||||
WHERE (UDC_child = @UDC_edit)
|
||||
|
||||
-- modifico il record
|
||||
UPDATE ElencoCartellini
|
||||
SET CodCS = @CodCS, CodCliente = @CodCliente, RagSociale = @RagSociale, Particolare = @Particolare, DescParticolare = @DescParticolare,
|
||||
DisegnoGrezzo = @DisegnoGrezzo, Esponente = @Esponente, CodImpianto = @CodImpianto, DescImpianto = @DescImpianto, CodStampo = @CodStampo,
|
||||
Figura = @Figura, DataFus = @DataFus, TurnoFus = @TurnoFus, CodImballo = @CodImballo, CodSoggetto = @CodSoggetto, NumCont = @NumCont,
|
||||
Tara = @Tara, Qta = @Qta, CodStato = @CodStato, IdxPosizione = @IdxPosizione, PesoTot = @PesoTot, PesoCad = @PesoCad, ModDate = GETDATE()
|
||||
WHERE UDC = @UDC_edit
|
||||
-- registro in StoricoCartellini
|
||||
INSERT INTO StoricoCartellini(DataEv, CodEvento, CodTipoDichiaraz, UDC, CodCS,CodCliente, RagSociale, Particolare, DescParticolare,
|
||||
DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura, DataFus, TurnoFus, CodImballo, CodSoggetto,
|
||||
NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad)
|
||||
SELECT GETDATE() AS DataEv, @CodEvento AS CodEvento, @CodTipoDichiaraz AS CodTipoDichiaraz, UDC, CodCS,
|
||||
CodCliente, RagSociale, Particolare, DescParticolare, DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura,
|
||||
DataFus, TurnoFus, CodImballo, @CodSoggetto AS CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad
|
||||
FROM ElencoCartellini
|
||||
WHERE (UDC = @UDC_edit)
|
||||
|
||||
-- elimino vecchio record parent/child
|
||||
DELETE FROM RelazUDC
|
||||
WHERE (UDC_child = @UDC_edit)
|
||||
|
||||
-- modifico il record
|
||||
UPDATE ElencoCartellini
|
||||
SET CodCS = @CodCS, CodCliente = @CodCliente, RagSociale = @RagSociale, Particolare = @Particolare, DescParticolare = @DescParticolare,
|
||||
DisegnoGrezzo = @DisegnoGrezzo, Esponente = @Esponente, CodImpianto = @CodImpianto, DescImpianto = @DescImpianto, CodStampo = @CodStampo,
|
||||
Figura = @Figura, DataFus = @DataFus, TurnoFus = @TurnoFus, CodImballo = @CodImballo, CodSoggetto = @CodSoggetto, NumCont = @NumCont,
|
||||
Tara = @Tara, Qta = @Qta, CodStato = @CodStato, IdxPosizione = @IdxPosizione, PesoTot = @PesoTot, PesoCad = @PesoCad, ModDate = GETDATE()
|
||||
WHERE UDC = @UDC_edit
|
||||
|
||||
-- inserisco relazione aprent-child tra UDC vecchio (tara) e nuovo (pesa)
|
||||
INSERT INTO RelazUDC(UDC_parent, UDC_child)
|
||||
VALUES (@UDC_parent, @UDC_edit)
|
||||
-- inserisco relazione aprent-child tra UDC vecchio (tara) e nuovo (pesa)
|
||||
INSERT INTO RelazUDC(UDC_parent, UDC_child)
|
||||
VALUES (@UDC_parent, @UDC_edit)
|
||||
COMMIT TRAN
|
||||
------------------------------------------------------------------------------------------------------
|
||||
|
||||
@@ -795,11 +795,11 @@ go
|
||||
****************************************/
|
||||
alter PROCEDURE stp_UDC_updateIdxPosizione
|
||||
(
|
||||
@UDC VARCHAR(20),
|
||||
@CodSoggetto VARCHAR(17),
|
||||
@CodTipoDichiaraz CHAR(1),
|
||||
@CodEvento VARCHAR(10),
|
||||
@IdxPosizione INT
|
||||
@UDC VARCHAR(20),
|
||||
@CodSoggetto VARCHAR(17),
|
||||
@CodTipoDichiaraz CHAR(1),
|
||||
@CodEvento VARCHAR(10),
|
||||
@IdxPosizione INT
|
||||
)
|
||||
AS
|
||||
|
||||
@@ -809,21 +809,21 @@ AS
|
||||
------------------------------------------------------------------------------------------------------
|
||||
BEGIN TRAN
|
||||
|
||||
-- registro in StoricoCartellini
|
||||
INSERT INTO StoricoCartellini(DataEv, CodEvento, CodTipoDichiaraz, UDC, CodCS,CodCliente, RagSociale, Particolare, DescParticolare,
|
||||
DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura, DataFus, TurnoFus, CodImballo, CodSoggetto,
|
||||
NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad)
|
||||
SELECT GETDATE() AS DataEv, @CodEvento AS CodEvento, @CodTipoDichiaraz AS CodTipoDichiaraz, UDC, CodCS,
|
||||
CodCliente, RagSociale, Particolare, DescParticolare, DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura,
|
||||
DataFus, TurnoFus, CodImballo, @CodSoggetto AS CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad
|
||||
FROM ElencoCartellini
|
||||
WHERE (UDC = @UDC)
|
||||
|
||||
-- modifico il record
|
||||
UPDATE ElencoCartellini
|
||||
SET IdxPosizione = @IdxPosizione, ModDate = GETDATE()
|
||||
WHERE UDC = @UDC
|
||||
|
||||
-- registro in StoricoCartellini
|
||||
INSERT INTO StoricoCartellini(DataEv, CodEvento, CodTipoDichiaraz, UDC, CodCS,CodCliente, RagSociale, Particolare, DescParticolare,
|
||||
DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura, DataFus, TurnoFus, CodImballo, CodSoggetto,
|
||||
NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad)
|
||||
SELECT GETDATE() AS DataEv, @CodEvento AS CodEvento, @CodTipoDichiaraz AS CodTipoDichiaraz, UDC, CodCS,
|
||||
CodCliente, RagSociale, Particolare, DescParticolare, DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura,
|
||||
DataFus, TurnoFus, CodImballo, @CodSoggetto AS CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad
|
||||
FROM ElencoCartellini
|
||||
WHERE (UDC = @UDC)
|
||||
|
||||
-- modifico il record
|
||||
UPDATE ElencoCartellini
|
||||
SET IdxPosizione = @IdxPosizione, ModDate = GETDATE()
|
||||
WHERE UDC = @UDC
|
||||
|
||||
COMMIT TRAN
|
||||
------------------------------------------------------------------------------------------------------
|
||||
|
||||
@@ -849,11 +849,11 @@ go
|
||||
****************************************/
|
||||
alter PROCEDURE stp_UDC_updateQty
|
||||
(
|
||||
@UDC VARCHAR(20),
|
||||
@CodSoggetto VARCHAR(17),
|
||||
@CodTipoDichiaraz CHAR(1),
|
||||
@CodEvento VARCHAR(10),
|
||||
@Qta DECIMAL(10,2)
|
||||
@UDC VARCHAR(20),
|
||||
@CodSoggetto VARCHAR(17),
|
||||
@CodTipoDichiaraz CHAR(1),
|
||||
@CodEvento VARCHAR(10),
|
||||
@Qta DECIMAL(10,2)
|
||||
)
|
||||
AS
|
||||
|
||||
@@ -863,21 +863,21 @@ AS
|
||||
------------------------------------------------------------------------------------------------------
|
||||
BEGIN TRAN
|
||||
|
||||
-- registro in StoricoCartellini
|
||||
INSERT INTO StoricoCartellini(DataEv, CodEvento, CodTipoDichiaraz, UDC, CodCS,CodCliente, RagSociale, Particolare, DescParticolare,
|
||||
DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura, DataFus, TurnoFus, CodImballo, CodSoggetto,
|
||||
NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad)
|
||||
SELECT GETDATE() AS DataEv, @CodEvento AS CodEvento, @CodTipoDichiaraz AS CodTipoDichiaraz, UDC, CodCS,
|
||||
CodCliente, RagSociale, Particolare, DescParticolare, DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura,
|
||||
DataFus, TurnoFus, CodImballo, @CodSoggetto AS CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad
|
||||
FROM ElencoCartellini
|
||||
WHERE (UDC = @UDC)
|
||||
|
||||
-- modifico il record
|
||||
UPDATE ElencoCartellini
|
||||
SET Qta = @Qta, ModDate = GETDATE()
|
||||
WHERE UDC = @UDC
|
||||
|
||||
-- registro in StoricoCartellini
|
||||
INSERT INTO StoricoCartellini(DataEv, CodEvento, CodTipoDichiaraz, UDC, CodCS,CodCliente, RagSociale, Particolare, DescParticolare,
|
||||
DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura, DataFus, TurnoFus, CodImballo, CodSoggetto,
|
||||
NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad)
|
||||
SELECT GETDATE() AS DataEv, @CodEvento AS CodEvento, @CodTipoDichiaraz AS CodTipoDichiaraz, UDC, CodCS,
|
||||
CodCliente, RagSociale, Particolare, DescParticolare, DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura,
|
||||
DataFus, TurnoFus, CodImballo, @CodSoggetto AS CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad
|
||||
FROM ElencoCartellini
|
||||
WHERE (UDC = @UDC)
|
||||
|
||||
-- modifico il record
|
||||
UPDATE ElencoCartellini
|
||||
SET Qta = @Qta, ModDate = GETDATE()
|
||||
WHERE UDC = @UDC
|
||||
|
||||
COMMIT TRAN
|
||||
------------------------------------------------------------------------------------------------------
|
||||
|
||||
|
||||
@@ -20,13 +20,13 @@ go
|
||||
****************************************/
|
||||
create FUNCTION dateToAsFormat
|
||||
(
|
||||
@data DATETIME
|
||||
@data DATETIME
|
||||
)
|
||||
RETURNS NVARCHAR(8)
|
||||
AS
|
||||
BEGIN
|
||||
RETURN CONVERT(NVARCHAR(8), @data, 112)
|
||||
END
|
||||
BEGIN
|
||||
RETURN CONVERT(NVARCHAR(8), @data, 112)
|
||||
END
|
||||
go
|
||||
|
||||
commit
|
||||
@@ -256,46 +256,46 @@ go
|
||||
****************************************/
|
||||
alter PROCEDURE BatchQueue.stp_batch_RapQual_S01
|
||||
(
|
||||
@minData DATETIME
|
||||
@minData DATETIME
|
||||
)
|
||||
AS
|
||||
-- BOZZA DA COMPLETARE A CURA MAZZUCCONI!!!
|
||||
-- BOZZA DA COMPLETARE A CURA MAZZUCCONI!!!
|
||||
|
||||
DECLARE @SQL AS NVARCHAR(1000)
|
||||
DECLARE @dataAs400 AS VARCHAR(8)
|
||||
|
||||
SET @dataAs400 = (SELECT dbo.dateToAsFormat(@minData))
|
||||
DECLARE @SQL AS NVARCHAR(1000)
|
||||
DECLARE @dataAs400 AS VARCHAR(8)
|
||||
|
||||
SET @dataAs400 = (SELECT dbo.dateToAsFormat(@minData))
|
||||
|
||||
-- svuoto tab raw attuale
|
||||
/*
|
||||
DELETE FROM RawData.XOGIX00F
|
||||
*/
|
||||
-- svuoto tab raw attuale
|
||||
/*
|
||||
DELETE FROM RawData.XOGIX00F
|
||||
*/
|
||||
|
||||
|
||||
-- INSERISCO DA AS400
|
||||
/*
|
||||
INSERT INTO RawData.XOGIX00F
|
||||
(
|
||||
SET @SQL =
|
||||
N'SELECT
|
||||
XRPQLN
|
||||
,XRPQLD
|
||||
,XNRETI
|
||||
,XCDFOR
|
||||
,XCDTER
|
||||
,XCDPAR
|
||||
,XDTPRO
|
||||
,XTRPRO
|
||||
,XQTPRO
|
||||
,XDESMT
|
||||
,XMATSC
|
||||
,XBENQL
|
||||
FROM OPENQUERY( P65220DC, ''SELECT * FROM MAZZT_DTV3.XOGIX00F WHERE XRPQLD >= '
|
||||
SET @SQL = @SQL + @dataAs400 + ''' )'
|
||||
-- INSERISCO DA AS400
|
||||
/*
|
||||
INSERT INTO RawData.XOGIX00F
|
||||
(
|
||||
SET @SQL =
|
||||
N'SELECT
|
||||
XRPQLN
|
||||
,XRPQLD
|
||||
,XNRETI
|
||||
,XCDFOR
|
||||
,XCDTER
|
||||
,XCDPAR
|
||||
,XDTPRO
|
||||
,XTRPRO
|
||||
,XQTPRO
|
||||
,XDESMT
|
||||
,XMATSC
|
||||
,XBENQL
|
||||
FROM OPENQUERY( P65220DC, ''SELECT * FROM MAZZT_DTV3.XOGIX00F WHERE XRPQLD >= '
|
||||
SET @SQL = @SQL + @dataAs400 + ''' )'
|
||||
|
||||
EXEC sp_executesql @SQL
|
||||
)
|
||||
*/
|
||||
EXEC dbo.sp_executesql @SQL
|
||||
)
|
||||
*/
|
||||
|
||||
RETURN
|
||||
go
|
||||
@@ -323,15 +323,15 @@ go
|
||||
****************************************/
|
||||
create PROCEDURE stp_rappQualSuntoGetByDataRange
|
||||
(
|
||||
@dataFrom DATETIME,
|
||||
@dataTo DATETIME
|
||||
@dataFrom DATETIME,
|
||||
@dataTo DATETIME
|
||||
)
|
||||
AS
|
||||
-- restituisce le righe richieste
|
||||
SELECT *
|
||||
FROM v_RapQualSunto
|
||||
WHERE (DataRapQual > dbo.dateToAsFormat(@dataFrom)) AND (DataRapQual < dbo.dateToAsFormat(@dataTo))
|
||||
ORDER BY nRapQual
|
||||
-- restituisce le righe richieste
|
||||
SELECT *
|
||||
FROM v_RapQualSunto
|
||||
WHERE (DataRapQual > dbo.dateToAsFormat(@dataFrom)) AND (DataRapQual < dbo.dateToAsFormat(@dataTo))
|
||||
ORDER BY nRapQual
|
||||
RETURN
|
||||
go
|
||||
|
||||
@@ -346,13 +346,13 @@ go
|
||||
****************************************/
|
||||
create PROCEDURE stp_rappQualSuntoGetByNumRap
|
||||
(
|
||||
@nRapQual NVARCHAR(20)
|
||||
@nRapQual NVARCHAR(20)
|
||||
)
|
||||
AS
|
||||
-- restituisce le righe richieste
|
||||
SELECT *
|
||||
FROM v_RapQualSunto
|
||||
WHERE (nRapQual = @nRapQual)
|
||||
-- restituisce le righe richieste
|
||||
SELECT *
|
||||
FROM v_RapQualSunto
|
||||
WHERE (nRapQual = @nRapQual)
|
||||
RETURN
|
||||
go
|
||||
|
||||
@@ -367,56 +367,56 @@ go
|
||||
****************************************/
|
||||
alter PROCEDURE stp_spostaUdc
|
||||
(
|
||||
@CodCS VARCHAR(2),
|
||||
@UDC VARCHAR(50),
|
||||
@IdxCellaTo INT
|
||||
@CodCS VARCHAR(2),
|
||||
@UDC VARCHAR(50),
|
||||
@IdxCellaTo INT
|
||||
)
|
||||
AS
|
||||
|
||||
BEGIN TRAN
|
||||
|
||||
-- DICHIARAZIONI iniziali variabili
|
||||
DECLARE @IdxCellaFrom INT
|
||||
DECLARE @capienza INT
|
||||
DECLARE @numUdc INT
|
||||
|
||||
-- controllo cella di partenza
|
||||
SET @IdxCellaFrom = (SELECT IdxCella FROM PosizioneUdcCorrente WHERE UDC = @UDC)
|
||||
-- controllo se la cella di dest vada indicata come piena
|
||||
SET @capienza = (
|
||||
SELECT tc.Capienza
|
||||
FROM TipoCella TC INNER JOIN Celle c ON TC.IdxTipoCella=c.IdxTipoCella
|
||||
WHERE c.IdxCella = @IdxCellaFrom
|
||||
)
|
||||
SET @numUdc = (SELECT COUNT(*) FROM PosizioneUdcCorrente WHERE IdxCella = @IdxCellaFrom)
|
||||
-- se capienza raggiunta aggiorno...
|
||||
IF(@numUdc -1 < @capienza)
|
||||
BEGIN
|
||||
EXEC stp_celle_updPiena @IdxCellaFrom, 0
|
||||
END
|
||||
|
||||
-- cancello posizione occupata
|
||||
DELETE
|
||||
FROM PosizioneUdcCorrente
|
||||
WHERE UDC = @UDC
|
||||
|
||||
-- creo una nuova posizione per l'UDC
|
||||
INSERT INTO PosizioneUdcCorrente(UDC, IdxCella, CodCS, DataRif)
|
||||
VALUES(@UDC, @IdxCellaTo, @CodCS, GETDATE())
|
||||
|
||||
-- controllo se la cella di dest vada indicata come piena
|
||||
SET @capienza = (
|
||||
SELECT tc.Capienza
|
||||
FROM TipoCella TC INNER JOIN Celle c ON TC.IdxTipoCella=c.IdxTipoCella
|
||||
WHERE c.IdxCella = @IdxCellaTo
|
||||
)
|
||||
SET @numUdc = (SELECT COUNT(*) FROM PosizioneUdcCorrente WHERE IdxCella = @IdxCellaTo)
|
||||
-- se capienza raggiunta aggiorno...
|
||||
IF(@numUdc >= @capienza)
|
||||
BEGIN
|
||||
EXEC stp_celle_updPiena @IdxCellaTo, 1
|
||||
END
|
||||
|
||||
|
||||
-- DICHIARAZIONI iniziali variabili
|
||||
DECLARE @IdxCellaFrom INT
|
||||
DECLARE @capienza INT
|
||||
DECLARE @numUdc INT
|
||||
|
||||
-- controllo cella di partenza
|
||||
SET @IdxCellaFrom = (SELECT IdxCella FROM PosizioneUdcCorrente WHERE UDC = @UDC)
|
||||
-- controllo se la cella di dest vada indicata come piena
|
||||
SET @capienza = (
|
||||
SELECT tc.Capienza
|
||||
FROM TipoCella TC INNER JOIN Celle c ON TC.IdxTipoCella=c.IdxTipoCella
|
||||
WHERE c.IdxCella = @IdxCellaFrom
|
||||
)
|
||||
SET @numUdc = (SELECT COUNT(*) FROM PosizioneUdcCorrente WHERE IdxCella = @IdxCellaFrom)
|
||||
-- se capienza raggiunta aggiorno...
|
||||
IF(@numUdc -1 < @capienza)
|
||||
BEGIN
|
||||
EXEC stp_celle_updPiena @IdxCellaFrom, 0
|
||||
END
|
||||
|
||||
-- cancello posizione occupata
|
||||
DELETE
|
||||
FROM PosizioneUdcCorrente
|
||||
WHERE UDC = @UDC
|
||||
|
||||
-- creo una nuova posizione per l'UDC
|
||||
INSERT INTO PosizioneUdcCorrente(UDC, IdxCella, CodCS, DataRif)
|
||||
VALUES(@UDC, @IdxCellaTo, @CodCS, GETDATE())
|
||||
|
||||
-- controllo se la cella di dest vada indicata come piena
|
||||
SET @capienza = (
|
||||
SELECT tc.Capienza
|
||||
FROM TipoCella TC INNER JOIN Celle c ON TC.IdxTipoCella=c.IdxTipoCella
|
||||
WHERE c.IdxCella = @IdxCellaTo
|
||||
)
|
||||
SET @numUdc = (SELECT COUNT(*) FROM PosizioneUdcCorrente WHERE IdxCella = @IdxCellaTo)
|
||||
-- se capienza raggiunta aggiorno...
|
||||
IF(@numUdc >= @capienza)
|
||||
BEGIN
|
||||
EXEC stp_celle_updPiena @IdxCellaTo, 1
|
||||
END
|
||||
|
||||
COMMIT TRAN
|
||||
|
||||
RETURN
|
||||
|
||||
@@ -264,7 +264,7 @@ AS
|
||||
FROM OPENQUERY( P65220DC, ''SELECT * FROM MAZZT_DTV3.XOGIX00F WHERE XRPQLD >= '
|
||||
SET @SQL = @SQL + @dataAs400 + ''' )'
|
||||
|
||||
EXEC sp_executesql @SQL
|
||||
EXEC dbo.sp_executesql @SQL
|
||||
)
|
||||
*/
|
||||
|
||||
|
||||
@@ -82,17 +82,17 @@ go
|
||||
****************************************/
|
||||
create PROCEDURE stp_rappQualConsumabili
|
||||
(
|
||||
@dataFrom DATETIME,
|
||||
@dataTo DATETIME
|
||||
@dataFrom DATETIME,
|
||||
@dataTo DATETIME
|
||||
)
|
||||
|
||||
AS
|
||||
-- restituisce le righe richieste
|
||||
SELECT *
|
||||
FROM RilPro.RapQual
|
||||
WHERE ((DataPrelFus IS NULL) OR (DataPrelFus = 0)) AND -- condizione sul NON aver fatto ancora il prelievo
|
||||
((DataRapQual > dbo.dateToAsFormat(@dataFrom)) AND (DataRapQual < dbo.dateToAsFormat(@dataTo))) -- cond data RQ
|
||||
|
||||
-- restituisce le righe richieste
|
||||
SELECT *
|
||||
FROM RilPro.RapQual
|
||||
WHERE ((DataPrelFus IS NULL) OR (DataPrelFus = 0)) AND -- condizione sul NON aver fatto ancora il prelievo
|
||||
((DataRapQual > dbo.dateToAsFormat(@dataFrom)) AND (DataRapQual < dbo.dateToAsFormat(@dataTo))) -- cond data RQ
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
@@ -107,15 +107,15 @@ go
|
||||
****************************************/
|
||||
create PROCEDURE stp_rappQualSuntoGetByDataRange
|
||||
(
|
||||
@dataFrom DATETIME,
|
||||
@dataTo DATETIME
|
||||
@dataFrom DATETIME,
|
||||
@dataTo DATETIME
|
||||
)
|
||||
AS
|
||||
-- restituisce le righe richieste
|
||||
SELECT *
|
||||
FROM v_RapQualSunto
|
||||
WHERE (DataRapQual > dbo.dateToAsFormat(@dataFrom)) AND (DataRapQual < dbo.dateToAsFormat(@dataTo))
|
||||
ORDER BY nRapQual
|
||||
-- restituisce le righe richieste
|
||||
SELECT *
|
||||
FROM v_RapQualSunto
|
||||
WHERE (DataRapQual > dbo.dateToAsFormat(@dataFrom)) AND (DataRapQual < dbo.dateToAsFormat(@dataTo))
|
||||
ORDER BY nRapQual
|
||||
RETURN
|
||||
go
|
||||
|
||||
@@ -130,13 +130,13 @@ go
|
||||
****************************************/
|
||||
create PROCEDURE stp_rappQualSuntoGetByNumRap
|
||||
(
|
||||
@nRapQual NVARCHAR(20)
|
||||
@nRapQual NVARCHAR(20)
|
||||
)
|
||||
AS
|
||||
-- restituisce le righe richieste
|
||||
SELECT *
|
||||
FROM v_RapQualSunto
|
||||
WHERE (nRapQual = @nRapQual)
|
||||
-- restituisce le righe richieste
|
||||
SELECT *
|
||||
FROM v_RapQualSunto
|
||||
WHERE (nRapQual = @nRapQual)
|
||||
RETURN
|
||||
go
|
||||
|
||||
@@ -164,56 +164,56 @@ go
|
||||
****************************************/
|
||||
alter PROCEDURE stp_spostaUdc
|
||||
(
|
||||
@CodCS VARCHAR(2),
|
||||
@UDC VARCHAR(50),
|
||||
@IdxCellaTo INT
|
||||
@CodCS VARCHAR(2),
|
||||
@UDC VARCHAR(50),
|
||||
@IdxCellaTo INT
|
||||
)
|
||||
AS
|
||||
|
||||
BEGIN TRAN
|
||||
|
||||
-- DICHIARAZIONI iniziali variabili
|
||||
DECLARE @IdxCellaFrom INT
|
||||
DECLARE @capienza INT
|
||||
DECLARE @numUdc INT
|
||||
|
||||
-- controllo cella di partenza
|
||||
SET @IdxCellaFrom = (SELECT IdxCella FROM PosizioneUdcCorrente WHERE UDC = @UDC)
|
||||
-- controllo se la cella di dest vada indicata come piena
|
||||
SET @capienza = (
|
||||
SELECT tc.Capienza
|
||||
FROM TipoCella TC INNER JOIN Celle c ON TC.IdxTipoCella=c.IdxTipoCella
|
||||
WHERE c.IdxCella = @IdxCellaFrom
|
||||
)
|
||||
SET @numUdc = (SELECT COUNT(*) FROM PosizioneUdcCorrente WHERE IdxCella = @IdxCellaFrom)
|
||||
-- se capienza raggiunta aggiorno...
|
||||
IF(@numUdc -1 < @capienza)
|
||||
BEGIN
|
||||
EXEC stp_celle_updPiena @IdxCellaFrom, 0
|
||||
END
|
||||
|
||||
-- cancello posizione occupata
|
||||
DELETE
|
||||
FROM PosizioneUdcCorrente
|
||||
WHERE UDC = @UDC
|
||||
|
||||
-- creo una nuova posizione per l'UDC
|
||||
INSERT INTO PosizioneUdcCorrente(UDC, IdxCella, CodCS, DataRif)
|
||||
VALUES(@UDC, @IdxCellaTo, @CodCS, GETDATE())
|
||||
|
||||
-- controllo se la cella di dest vada indicata come piena
|
||||
SET @capienza = (
|
||||
SELECT tc.Capienza
|
||||
FROM TipoCella TC INNER JOIN Celle c ON TC.IdxTipoCella=c.IdxTipoCella
|
||||
WHERE c.IdxCella = @IdxCellaTo
|
||||
)
|
||||
SET @numUdc = (SELECT COUNT(*) FROM PosizioneUdcCorrente WHERE IdxCella = @IdxCellaTo)
|
||||
-- se capienza raggiunta aggiorno...
|
||||
IF(@numUdc >= @capienza)
|
||||
BEGIN
|
||||
EXEC stp_celle_updPiena @IdxCellaTo, 1
|
||||
END
|
||||
|
||||
|
||||
-- DICHIARAZIONI iniziali variabili
|
||||
DECLARE @IdxCellaFrom INT
|
||||
DECLARE @capienza INT
|
||||
DECLARE @numUdc INT
|
||||
|
||||
-- controllo cella di partenza
|
||||
SET @IdxCellaFrom = (SELECT IdxCella FROM PosizioneUdcCorrente WHERE UDC = @UDC)
|
||||
-- controllo se la cella di dest vada indicata come piena
|
||||
SET @capienza = (
|
||||
SELECT tc.Capienza
|
||||
FROM TipoCella TC INNER JOIN Celle c ON TC.IdxTipoCella=c.IdxTipoCella
|
||||
WHERE c.IdxCella = @IdxCellaFrom
|
||||
)
|
||||
SET @numUdc = (SELECT COUNT(*) FROM PosizioneUdcCorrente WHERE IdxCella = @IdxCellaFrom)
|
||||
-- se capienza raggiunta aggiorno...
|
||||
IF(@numUdc -1 < @capienza)
|
||||
BEGIN
|
||||
EXEC stp_celle_updPiena @IdxCellaFrom, 0
|
||||
END
|
||||
|
||||
-- cancello posizione occupata
|
||||
DELETE
|
||||
FROM PosizioneUdcCorrente
|
||||
WHERE UDC = @UDC
|
||||
|
||||
-- creo una nuova posizione per l'UDC
|
||||
INSERT INTO PosizioneUdcCorrente(UDC, IdxCella, CodCS, DataRif)
|
||||
VALUES(@UDC, @IdxCellaTo, @CodCS, GETDATE())
|
||||
|
||||
-- controllo se la cella di dest vada indicata come piena
|
||||
SET @capienza = (
|
||||
SELECT tc.Capienza
|
||||
FROM TipoCella TC INNER JOIN Celle c ON TC.IdxTipoCella=c.IdxTipoCella
|
||||
WHERE c.IdxCella = @IdxCellaTo
|
||||
)
|
||||
SET @numUdc = (SELECT COUNT(*) FROM PosizioneUdcCorrente WHERE IdxCella = @IdxCellaTo)
|
||||
-- se capienza raggiunta aggiorno...
|
||||
IF(@numUdc >= @capienza)
|
||||
BEGIN
|
||||
EXEC stp_celle_updPiena @IdxCellaTo, 1
|
||||
END
|
||||
|
||||
COMMIT TRAN
|
||||
|
||||
RETURN
|
||||
@@ -242,46 +242,46 @@ go
|
||||
****************************************/
|
||||
alter PROCEDURE BatchQueue.stp_batch_RapQual_S01
|
||||
(
|
||||
@minData DATETIME
|
||||
@minData DATETIME
|
||||
)
|
||||
AS
|
||||
-- BOZZA DA COMPLETARE A CURA MAZZUCCONI!!!
|
||||
-- BOZZA DA COMPLETARE A CURA MAZZUCCONI!!!
|
||||
|
||||
DECLARE @SQL AS NVARCHAR(1000)
|
||||
DECLARE @dataAs400 AS VARCHAR(8)
|
||||
|
||||
SET @dataAs400 = (SELECT dbo.dateToAsFormat(@minData))
|
||||
DECLARE @SQL AS NVARCHAR(1000)
|
||||
DECLARE @dataAs400 AS VARCHAR(8)
|
||||
|
||||
SET @dataAs400 = (SELECT dbo.dateToAsFormat(@minData))
|
||||
|
||||
-- svuoto tab raw attuale
|
||||
/*
|
||||
DELETE FROM RawData.XOGIX00F
|
||||
*/
|
||||
-- svuoto tab raw attuale
|
||||
/*
|
||||
DELETE FROM RawData.XOGIX00F
|
||||
*/
|
||||
|
||||
|
||||
-- INSERISCO DA AS400
|
||||
/*
|
||||
INSERT INTO RawData.XOGIX00F
|
||||
(
|
||||
SET @SQL =
|
||||
N'SELECT
|
||||
XRPQLN
|
||||
,XRPQLD
|
||||
,XNRETI
|
||||
,XCDFOR
|
||||
,XCDTER
|
||||
,XCDPAR
|
||||
,XDTPRO
|
||||
,XTRPRO
|
||||
,XQTPRO
|
||||
,XDESMT
|
||||
,XMATSC
|
||||
,XBENQL
|
||||
FROM OPENQUERY( P65220DC, ''SELECT * FROM MAZZT_DTV3.XOGIX00F WHERE XRPQLD >= '
|
||||
SET @SQL = @SQL + @dataAs400 + ''' )'
|
||||
-- INSERISCO DA AS400
|
||||
/*
|
||||
INSERT INTO RawData.XOGIX00F
|
||||
(
|
||||
SET @SQL =
|
||||
N'SELECT
|
||||
XRPQLN
|
||||
,XRPQLD
|
||||
,XNRETI
|
||||
,XCDFOR
|
||||
,XCDTER
|
||||
,XCDPAR
|
||||
,XDTPRO
|
||||
,XTRPRO
|
||||
,XQTPRO
|
||||
,XDESMT
|
||||
,XMATSC
|
||||
,XBENQL
|
||||
FROM OPENQUERY( P65220DC, ''SELECT * FROM MAZZT_DTV3.XOGIX00F WHERE XRPQLD >= '
|
||||
SET @SQL = @SQL + @dataAs400 + ''' )'
|
||||
|
||||
EXEC sp_executesql @SQL
|
||||
)
|
||||
*/
|
||||
EXEC dbo.sp_executesql @SQL
|
||||
)
|
||||
*/
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
@@ -45,7 +45,7 @@ AS
|
||||
SET @SQL = @SQL + ', XDESMT = ''' + @XDESMT +''', XMATSC=''S'' , XCDTER = ''' + @XCDTER + ''' '
|
||||
SET @SQL = @SQL + 'WHERE XRPQLN =' + @XRPQLN + ' AND XNRETI = ' + @XNRETI + ''' )'
|
||||
|
||||
EXEC sp_executesql @SQL
|
||||
EXEC dbo.sp_executesql @SQL
|
||||
|
||||
RETURN
|
||||
go
|
||||
@@ -108,7 +108,7 @@ AS
|
||||
print '%' + LTRIM(RTRIM(@SqlCode)) + '%'
|
||||
|
||||
-- chiamo la stored ed eseguo invio
|
||||
--EXEC sp_executesql @SqlCode -- decommentare se va bene...
|
||||
--EXEC dbo.sp_executesql @SqlCode -- decommentare se va bene...
|
||||
FETCH NEXT FROM UdcMpList INTO @UDC
|
||||
END
|
||||
END
|
||||
@@ -177,7 +177,7 @@ AS
|
||||
print '%' + LTRIM(RTRIM(@SqlCode)) + '%'
|
||||
|
||||
-- chiamo la stored ed eseguo invio
|
||||
--EXEC sp_executesql @SqlCode -- decommentare se va bene...
|
||||
--EXEC dbo.sp_executesql @SqlCode -- decommentare se va bene...
|
||||
FETCH NEXT FROM UdcMpList INTO @UDC
|
||||
END
|
||||
END
|
||||
|
||||
@@ -7,7 +7,7 @@ go
|
||||
create index i_dataFus on ElencoCartellini(DataFus)
|
||||
go
|
||||
|
||||
create index i_idxPosizione on ElencoCartellini(IdxPosizione)
|
||||
create index i_IdxPosizione on ElencoCartellini(IdxPosizione)
|
||||
go
|
||||
|
||||
commit
|
||||
@@ -34,40 +34,40 @@ go
|
||||
****************************************/
|
||||
alter PROCEDURE stp_ArtiInProd_ByImpData
|
||||
(
|
||||
@CodImpianto VARCHAR(50),
|
||||
@DataRif DATETIME
|
||||
@CodImpianto VARCHAR(50),
|
||||
@DataRif DATETIME
|
||||
)
|
||||
AS
|
||||
|
||||
-- iniziamo definendo le varie viste accessorie
|
||||
WITH cteUltStampo AS
|
||||
(SELECT CodStampo, InizioValidita, ProgFigure, FineValidita, NumCommessa, NumFigure, CodCliente, CodArticolo, Particolare
|
||||
FROM RilPro.StampoArticolo AS A
|
||||
(SELECT CodStampo, InizioValidita, ProgFigure, FineValidita, NumCommessa, NumFigure, CodCliente, CodArticolo, Particolare
|
||||
FROM RilPro.StampoArticolo AS A
|
||||
WHERE (@DataRif >= InizioValidita AND @DataRif <= ISNULL(FineValidita, DATEADD(year, 2, GETDATE()))) ),
|
||||
cteEspAttivi AS
|
||||
(SELECT s.CodStampo, s.Esponente, s.EspAttivo, s.DataInserim, s.DataValidita
|
||||
FROM RilPro.StampoEsponente AS s INNER JOIN
|
||||
cteEspAttivi AS
|
||||
(SELECT s.CodStampo, s.Esponente, s.EspAttivo, s.DataInserim, s.DataValidita
|
||||
FROM RilPro.StampoEsponente AS s INNER JOIN
|
||||
(SELECT CodStampo, MAX(DataValidita) AS DataValidita
|
||||
FROM RilPro.StampoEsponente
|
||||
FROM RilPro.StampoEsponente
|
||||
WHERE (DataValidita <= @DataRif) AND (EspAttivo = 'S')
|
||||
GROUP BY CodStampo) AS s2 ON s.CodStampo = s2.CodStampo AND s.DataValidita = s2.DataValidita),
|
||||
cteLineeAttive AS
|
||||
(SELECT CodImpianto, CodStampo, NumStampate, CONVERT(DATETIME, DataInizio) AS DataInizio, DataFine, TurnoInizio, TurnoFine
|
||||
FROM RilPro.LineaStampi
|
||||
WHERE (@DataRif BETWEEN DataInizio AND ISNULL(DataFine, DATEADD(year, 2, GETDATE())))
|
||||
AND CodImpianto = @CodImpianto)
|
||||
|
||||
cteLineeAttive AS
|
||||
(SELECT CodImpianto, CodStampo, NumStampate, CONVERT(DATETIME, DataInizio) AS DataInizio, DataFine, TurnoInizio, TurnoFine
|
||||
FROM RilPro.LineaStampi
|
||||
WHERE (@DataRif BETWEEN DataInizio AND ISNULL(DataFine, DATEADD(year, 2, GETDATE())))
|
||||
AND CodImpianto = @CodImpianto)
|
||||
|
||||
-- faccio la select principale
|
||||
SELECT l.CodImpianto, l.CodStampo, l.NumStampate, l.DataInizio, l.TurnoInizio, g.InizioValidita, g.FineValidita, g.NumFigure,
|
||||
dbo.f_padLeft(CAST(g.CodCliente AS varchar(50)), 5, '0') AS CodCliente, ISNULL(cl.RagSociale,'-') AS RagSociale, CAST(g.CodArticolo AS varchar(50)) AS CodArticolo,
|
||||
g.Particolare, pa.DescParticolare, pa.DisegnoGrezzo, pa.CodFamiglia, fa.DescFamiglia, fi.Figura, es.Esponente
|
||||
FROM cteLineeAttive AS l INNER JOIN cteUltStampo AS g ON l.CodStampo = g.CodStampo LEFT OUTER JOIN
|
||||
RilPro.StampoFigure AS fi ON l.CodStampo = fi.CodStampo LEFT OUTER JOIN
|
||||
cteEspAttivi AS es ON g.CodStampo = es.CodStampo LEFT OUTER JOIN
|
||||
RilPro.AnagParticolari AS pa ON g.Particolare = pa.Particolare LEFT OUTER JOIN
|
||||
RilPro.AnagFamiglie AS fa ON pa.CodFamiglia = fa.CodFamiglia LEFT OUTER JOIN
|
||||
RilPro.AnagClienti AS cl ON g.CodCliente = cl.CodCliente
|
||||
ORDER BY l.CodImpianto
|
||||
FROM cteLineeAttive AS l INNER JOIN cteUltStampo AS g ON l.CodStampo = g.CodStampo LEFT OUTER JOIN
|
||||
RilPro.StampoFigure AS fi ON l.CodStampo = fi.CodStampo LEFT OUTER JOIN
|
||||
cteEspAttivi AS es ON g.CodStampo = es.CodStampo LEFT OUTER JOIN
|
||||
RilPro.AnagParticolari AS pa ON g.Particolare = pa.Particolare LEFT OUTER JOIN
|
||||
RilPro.AnagFamiglie AS fa ON pa.CodFamiglia = fa.CodFamiglia LEFT OUTER JOIN
|
||||
RilPro.AnagClienti AS cl ON g.CodCliente = cl.CodCliente
|
||||
ORDER BY l.CodImpianto
|
||||
|
||||
RETURN
|
||||
go
|
||||
@@ -96,62 +96,62 @@ go
|
||||
************************************/
|
||||
alter PROCEDURE stp_UDC_delibera
|
||||
(
|
||||
@CodTipoDelibera NVARCHAR(50),
|
||||
@UDC NVARCHAR(50),
|
||||
@CodSoggetto NVARCHAR(17),
|
||||
@CodCS VARCHAR(2)
|
||||
@CodTipoDelibera NVARCHAR(50),
|
||||
@UDC NVARCHAR(50),
|
||||
@CodSoggetto NVARCHAR(17),
|
||||
@CodCS VARCHAR(2)
|
||||
)
|
||||
|
||||
AS
|
||||
|
||||
BEGIN TRAN
|
||||
DECLARE @IdxPosizioneTo AS INT
|
||||
DECLARE @IdxPosizioneFrom AS INT
|
||||
DECLARE @IdxPosizionePre AS NVARCHAR(50)
|
||||
DECLARE @IdxCellaPre AS INT
|
||||
DECLARE @IdxCellaTo AS INT
|
||||
DECLARE @IdxPosizioneTo AS INT
|
||||
DECLARE @IdxPosizioneFrom AS INT
|
||||
DECLARE @IdxPosizionePre AS NVARCHAR(50)
|
||||
DECLARE @IdxCellaPre AS INT
|
||||
DECLARE @IdxCellaTo AS INT
|
||||
|
||||
-- ricavo cella ATTUALE
|
||||
SET @IdxCellaPre = (SELECT IdxCella FROM PosizioneUdcCorrente WHERE UDC = @UDC)
|
||||
|
||||
-- ricavo posizione ATTUALE
|
||||
SET @IdxPosizionePre = (SELECT TOP 1 b.CodMag FROM Celle c INNER JOIN Blocchi b ON c.IdxBlocco=b.IdxBlocco WHERE c.IdxCella = @IdxCellaPre)
|
||||
-- ricavo cella ATTUALE
|
||||
SET @IdxCellaPre = (SELECT IdxCella FROM PosizioneUdcCorrente WHERE UDC = @UDC)
|
||||
|
||||
-- ricavo posizione ATTUALE
|
||||
SET @IdxPosizionePre = (SELECT TOP 1 b.CodMag FROM Celle c INNER JOIN Blocchi b ON c.IdxBlocco=b.IdxBlocco WHERE c.IdxCella = @IdxCellaPre)
|
||||
|
||||
|
||||
-- registro delibera
|
||||
INSERT INTO DELIBERE
|
||||
VALUES (@CodTipoDelibera, @UDC, GETDATE(), @CodSoggetto)
|
||||
|
||||
-- registro delibera
|
||||
INSERT INTO DELIBERE
|
||||
VALUES (@CodTipoDelibera, @UDC, GETDATE(), @CodSoggetto)
|
||||
|
||||
-- ricavo nuova posizione
|
||||
SET @IdxPosizioneTo = (SELECT tt.IdxPosizioneTo
|
||||
FROM TabTranPosizEventi tt INNER JOIN AnagTipoDelibere atd ON tt.CodEvento = atd.CodEvento
|
||||
WHERE (atd.CodTipoDelibera = @CodTipoDelibera))
|
||||
|
||||
-- ricavo posizione TEORICA VECCHIA
|
||||
SET @IdxPosizioneFrom = (SELECT tt.IdxPosizione
|
||||
FROM TabTranPosizEventi tt INNER JOIN AnagTipoDelibere atd ON tt.CodEvento = atd.CodEvento
|
||||
WHERE (atd.CodTipoDelibera = @CodTipoDelibera))
|
||||
-- ricavo nuova posizione
|
||||
SET @IdxPosizioneTo = (SELECT tt.IdxPosizioneTo
|
||||
FROM TabTranPosizEventi tt INNER JOIN AnagTipoDelibere atd ON tt.CodEvento = atd.CodEvento
|
||||
WHERE (atd.CodTipoDelibera = @CodTipoDelibera))
|
||||
|
||||
-- ricavo posizione TEORICA VECCHIA
|
||||
SET @IdxPosizioneFrom = (SELECT tt.IdxPosizione
|
||||
FROM TabTranPosizEventi tt INNER JOIN AnagTipoDelibere atd ON tt.CodEvento = atd.CodEvento
|
||||
WHERE (atd.CodTipoDelibera = @CodTipoDelibera))
|
||||
|
||||
-- calcolo la prima cella della nuova posizione...
|
||||
SET @IdxCellaTo = (
|
||||
SELECT TOP 1 IdxCella FROM Celle
|
||||
WHERE IdxBlocco = (
|
||||
SELECT IdxBlocco FROM Blocchi
|
||||
WHERE CodMag=CAST(@IdxPosizioneTo AS NVARCHAR(50)))
|
||||
)
|
||||
|
||||
-- faccio update posizione
|
||||
UPDATE ElencoCartellini
|
||||
SET IdxPosizione = @IdxPosizioneTo
|
||||
WHERE UDC = @UDC
|
||||
-- calcolo la prima cella della nuova posizione...
|
||||
SET @IdxCellaTo = (
|
||||
SELECT TOP 1 IdxCella FROM Celle
|
||||
WHERE IdxBlocco = (
|
||||
SELECT IdxBlocco FROM Blocchi
|
||||
WHERE CodMag=CAST(@IdxPosizioneTo AS NVARCHAR(50)))
|
||||
)
|
||||
|
||||
-- faccio update posizione
|
||||
UPDATE ElencoCartellini
|
||||
SET IdxPosizione = @IdxPosizioneTo
|
||||
WHERE UDC = @UDC
|
||||
|
||||
-- controllo posizioni act e from teorica: SE e SOLO SE corrispondono faccio spostamento...
|
||||
IF(CAST(@IdxPosizioneFrom AS NVARCHAR(50)) = @IdxPosizionePre)
|
||||
BEGIN
|
||||
-- ora cambio anche la posizione corrente dell'UDC (e tramite trigger storicizza...)
|
||||
EXEC stp_spostaUdc @CodCS, @UDC, @IdxCellaTo
|
||||
END
|
||||
|
||||
-- controllo posizioni act e from teorica: SE e SOLO SE corrispondono faccio spostamento...
|
||||
IF(CAST(@IdxPosizioneFrom AS NVARCHAR(50)) = @IdxPosizionePre)
|
||||
BEGIN
|
||||
-- ora cambio anche la posizione corrente dell'UDC (e tramite trigger storicizza...)
|
||||
EXEC stp_spostaUdc @CodCS, @UDC, @IdxCellaTo
|
||||
END
|
||||
|
||||
COMMIT TRAN
|
||||
|
||||
|
||||
@@ -170,17 +170,17 @@ go
|
||||
create PROCEDURE stp_UDC_getByFlussoDate
|
||||
(
|
||||
|
||||
@CodCS NVARCHAR(2),
|
||||
@Flusso NVARCHAR(2),
|
||||
@DataFrom DATETIME,
|
||||
@DataTo DATETIME
|
||||
@CodCS NVARCHAR(2),
|
||||
@Flusso NVARCHAR(2),
|
||||
@DataFrom DATETIME,
|
||||
@DataTo DATETIME
|
||||
)
|
||||
AS
|
||||
|
||||
SELECT *
|
||||
FROM ElencoCartellini
|
||||
WHERE (UDC LIKE 'U' + @CodCS + @Flusso + '%')
|
||||
AND (DataFus >= @DataFrom) AND (DataFus <= @DataTo)
|
||||
AND (DataFus >= @DataFrom) AND (DataFus <= @DataTo)
|
||||
ORDER BY UDC DESC
|
||||
|
||||
RETURN
|
||||
@@ -197,27 +197,27 @@ go
|
||||
****************************************/
|
||||
create PROCEDURE stp_UDC_getLast_ByDataTurnoLineaParticolare
|
||||
(
|
||||
@CodCS VARCHAR(2),
|
||||
@Particolare VARCHAR(15),
|
||||
@CodImpianto AS VARCHAR(50),
|
||||
@DataFus DATETIME,
|
||||
@TurnoFus INT
|
||||
@CodCS VARCHAR(2),
|
||||
@Particolare VARCHAR(15),
|
||||
@CodImpianto AS VARCHAR(50),
|
||||
@DataFus DATETIME,
|
||||
@TurnoFus INT
|
||||
)
|
||||
AS
|
||||
|
||||
-- carico l'elenco dei dati "attivi" x il filtraggio richiesto
|
||||
WITH cte_contAttivi AS(
|
||||
SELECT CodCS, Particolare, Esponente, CodImpianto,CodStampo, Figura, DataFus, TurnoFus, MAX(NumCont) AS NumCont
|
||||
FROM ElencoCartellini
|
||||
GROUP BY CodCS, Particolare, Esponente, CodImpianto, CodStampo, Figura, DataFus, TurnoFus
|
||||
HAVING (CodImpianto = @CodImpianto) AND (DataFus = @DataFus) AND (TurnoFus= @TurnoFus) AND (Particolare= @Particolare) AND CodCs = @CodCS
|
||||
SELECT CodCS, Particolare, Esponente, CodImpianto,CodStampo, Figura, DataFus, TurnoFus, MAX(NumCont) AS NumCont
|
||||
FROM ElencoCartellini
|
||||
GROUP BY CodCS, Particolare, Esponente, CodImpianto, CodStampo, Figura, DataFus, TurnoFus
|
||||
HAVING (CodImpianto = @CodImpianto) AND (DataFus = @DataFus) AND (TurnoFus= @TurnoFus) AND (Particolare= @Particolare) AND CodCS = @CodCS
|
||||
)
|
||||
|
||||
-- traduco in tab estesa UDC
|
||||
SELECT ec.* FROM ElencoCartellini ec INNER JOIN cte_contAttivi ca
|
||||
ON ec.Particolare = ca.Particolare AND ec.Esponente=ca.Esponente AND ec.CodImpianto=ca.CodImpianto
|
||||
AND ec.CodStampo=ca.CodStampo AND ec.Figura=ca.Figura AND ec.DataFus=ca.DataFus AND ec.TurnoFus=ca.TurnoFus
|
||||
AND ec.NumCont=ca.NumCont AND ec.CodCs=ca.CodCs
|
||||
-- traduco in tab estesa UDC
|
||||
SELECT ec.* FROM ElencoCartellini ec INNER JOIN cte_contAttivi ca
|
||||
ON ec.Particolare = ca.Particolare AND ec.Esponente=ca.Esponente AND ec.CodImpianto=ca.CodImpianto
|
||||
AND ec.CodStampo=ca.CodStampo AND ec.Figura=ca.Figura AND ec.DataFus=ca.DataFus AND ec.TurnoFus=ca.TurnoFus
|
||||
AND ec.NumCont=ca.NumCont AND ec.CodCS=ca.CodCS
|
||||
|
||||
RETURN
|
||||
go
|
||||
@@ -545,27 +545,27 @@ go
|
||||
****************************************/
|
||||
alter PROCEDURE BatchQueue.stp_consumaMP
|
||||
(
|
||||
@XRPQLN INT, --è il num rap qualità
|
||||
@XNRETI NVARCHAR(10), -- è il numUdc prog
|
||||
@XDTPRO INT, -- data 8 cifre aaaammgg
|
||||
@XTRPRO NVARCHAR(5), -- turno
|
||||
@XDESMT NVARCHAR(3), -- destinatario int/terzista
|
||||
@XCDTER NVARCHAR(6) -- cod terzista
|
||||
@XRPQLN INT, --è il num rap qualità
|
||||
@XNRETI NVARCHAR(10), -- è il numUdc prog
|
||||
@XDTPRO INT, -- data 8 cifre aaaammgg
|
||||
@XTRPRO NVARCHAR(5), -- turno
|
||||
@XDESMT NVARCHAR(3), -- destinatario int/terzista
|
||||
@XCDTER NVARCHAR(6) -- cod terzista
|
||||
)
|
||||
AS
|
||||
-- BOZZA DA VERIFICARE E COMPLETARE A CURA MAZZUCCONI!!!
|
||||
-- BOZZA DA VERIFICARE E COMPLETARE A CURA MAZZUCCONI!!!
|
||||
|
||||
DECLARE @SQL AS NVARCHAR(1000)
|
||||
DECLARE @SQL AS NVARCHAR(1000)
|
||||
|
||||
-- Faccio chiamata su AS400
|
||||
|
||||
SET @SQL = N' OPENQUERY( P65220DC, ''UPDATE MAZZT_DTV3.XOGIX00F'
|
||||
SET @SQL = @SQL + 'SET XDTPRO = ' + CAST(@XDTPRO AS NVARCHAR(8)) + ', XTRPRO = ' + @XTRPRO
|
||||
SET @SQL = @SQL + ', XDESMT = ''' + @XDESMT +''', XMATSC=''S'' , XCDTER = ''' + @XCDTER + ''' '
|
||||
SET @SQL = @SQL + 'WHERE XRPQLN =' + CAST(@XRPQLN AS NVARCHAR(20)) + ' AND XNRETI = ' + @XNRETI + ''' )'
|
||||
-- Faccio chiamata su AS400
|
||||
|
||||
SET @SQL = N' OPENQUERY( P65220DC, ''UPDATE MAZZT_DTV3.XOGIX00F'
|
||||
SET @SQL = @SQL + 'SET XDTPRO = ' + CAST(@XDTPRO AS NVARCHAR(8)) + ', XTRPRO = ' + @XTRPRO
|
||||
SET @SQL = @SQL + ', XDESMT = ''' + @XDESMT +''', XMATSC=''S'' , XCDTER = ''' + @XCDTER + ''' '
|
||||
SET @SQL = @SQL + 'WHERE XRPQLN =' + CAST(@XRPQLN AS NVARCHAR(20)) + ' AND XNRETI = ' + @XNRETI + ''' )'
|
||||
|
||||
EXEC sp_executesql @SQL
|
||||
|
||||
EXEC dbo.sp_executesql @SQL
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
@@ -593,66 +593,66 @@ go
|
||||
****************************************/
|
||||
create PROCEDURE BatchQueue.stp_processaCodaMovimMag
|
||||
AS
|
||||
-- BOZZA DA VERIFICARE E COMPLETARE A CURA MAZZUCCONI!!!
|
||||
|
||||
-- campi x cursore e valorizzazione riga a riga
|
||||
DECLARE @IdxRiga INT
|
||||
DECLARE @CodStab CHAR(2)
|
||||
DECLARE @UDC NVARCHAR(15)
|
||||
DECLARE @Particolare NVARCHAR(15)
|
||||
DECLARE @CodImb NVARCHAR(15)
|
||||
DECLARE @Matr INT
|
||||
DECLARE @Tipo NVARCHAR(2)
|
||||
DECLARE @Dest NVARCHAR(10)
|
||||
DECLARE @Qta INT
|
||||
DECLARE @PesoNet NUMERIC(7,3)
|
||||
DECLARE @PesoLor NUMERIC(7,3)
|
||||
DECLARE @Stato CHAR(1)
|
||||
DECLARE @Data NVARCHAR(8)
|
||||
-- variabile x composizioen query
|
||||
DECLARE @SqlCode NVARCHAR(1000)
|
||||
-- faccio una query con un cursore x processare tutte le righe da inviare ad AS400..
|
||||
DECLARE RigaPackList CURSOR FOR
|
||||
SELECT IdxRiga FROM v_datiPackingList
|
||||
-- BOZZA DA VERIFICARE E COMPLETARE A CURA MAZZUCCONI!!!
|
||||
|
||||
-- campi x cursore e valorizzazione riga a riga
|
||||
DECLARE @IdxRiga INT
|
||||
DECLARE @CodStab CHAR(2)
|
||||
DECLARE @UDC NVARCHAR(15)
|
||||
DECLARE @Particolare NVARCHAR(15)
|
||||
DECLARE @CodImb NVARCHAR(15)
|
||||
DECLARE @Matr INT
|
||||
DECLARE @Tipo NVARCHAR(2)
|
||||
DECLARE @Dest NVARCHAR(10)
|
||||
DECLARE @Qta INT
|
||||
DECLARE @PesoNet NUMERIC(7,3)
|
||||
DECLARE @PesoLor NUMERIC(7,3)
|
||||
DECLARE @Stato CHAR(1)
|
||||
DECLARE @Data NVARCHAR(8)
|
||||
-- variabile x composizioen query
|
||||
DECLARE @SqlCode NVARCHAR(1000)
|
||||
-- faccio una query con un cursore x processare tutte le righe da inviare ad AS400..
|
||||
DECLARE RigaPackList CURSOR FOR
|
||||
SELECT IdxRiga FROM v_datiPackingList
|
||||
|
||||
-- setto il codice stabilimento da inviare ad AS... VERIFICARE!!!
|
||||
SET @CodStab = '05'
|
||||
-- setto il codice stabilimento da inviare ad AS... VERIFICARE!!!
|
||||
SET @CodStab = '05'
|
||||
|
||||
-- inizio cursore!
|
||||
OPEN RigaPackList
|
||||
FETCH NEXT FROM RigaPackList
|
||||
INTO @IdxRiga
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
-- controllo ci sia la riga
|
||||
IF (SELECT COUNT(IdxRiga) FROM v_datiPackingList WHERE IdxRiga = @IdxRiga) > 0
|
||||
BEGIN
|
||||
-- carico valori che mi servono
|
||||
SELECT @Particolare=pl.Particolare, @UDC=UDC, @CodImb=pl.CodImballo, @Matr = pl.matrUdc, @Tipo=pl.tipo, @Dest=pl.Destinatario,
|
||||
@Qta=ABS(pl.Qta), @PesoNet=pl.PesoNetto, @PesoLor=pl.PesoTot, @Stato=pl.Stato, @Data=dbo.dateToAsFormat(pl.data)
|
||||
FROM v_datiPackingList pl
|
||||
WHERE IdxRiga = @IdxRiga
|
||||
|
||||
-- compongo testo x exec
|
||||
SET @SqlCode = N'EXEC BatchQueue.stp_registraPackList ' + @CodStab + ' ' + @UDC + ' ' + @Particolare + ' ' + @CodImb + ' ' + CAST(@Matr AS NVARCHAR(8)) + ' ' + @Tipo + ' ' + @Dest + ' ' + CAST(@Qta AS NVARCHAR(8)) + ' ' + CAST(@PesoNet AS NVARCHAR(8)) + ' ' + CAST(@PesoLor AS NVARCHAR(8)) + ' ' + @Stato + ' ' + @Data
|
||||
-- lo mostro
|
||||
print '%' + LTRIM(RTRIM(@SqlCode)) + '%'
|
||||
|
||||
-- !!! TESTARE !!!
|
||||
/*
|
||||
-- chiamo la stored ed eseguo invio
|
||||
EXEC sp_executesql @SqlCode -- decommentare se va bene...
|
||||
|
||||
-- registro la data del movimento BATCH
|
||||
UPDATE AS400_BatchMovimenti SET DataBatch = GETDATE() WHERE IdxRiga = @IdxRiga
|
||||
*/
|
||||
|
||||
FETCH NEXT FROM RigaPackList INTO @IdxRiga
|
||||
END
|
||||
END
|
||||
CLOSE RigaPackList
|
||||
DEALLOCATE RigaPackList
|
||||
|
||||
-- inizio cursore!
|
||||
OPEN RigaPackList
|
||||
FETCH NEXT FROM RigaPackList
|
||||
INTO @IdxRiga
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
-- controllo ci sia la riga
|
||||
IF (SELECT COUNT(IdxRiga) FROM v_datiPackingList WHERE IdxRiga = @IdxRiga) > 0
|
||||
BEGIN
|
||||
-- carico valori che mi servono
|
||||
SELECT @Particolare=pl.Particolare, @UDC=UDC, @CodImb=pl.CodImballo, @Matr = pl.matrUdc, @Tipo=pl.tipo, @Dest=pl.Destinatario,
|
||||
@Qta=ABS(pl.Qta), @PesoNet=pl.PesoNetto, @PesoLor=pl.PesoTot, @Stato=pl.Stato, @Data=dbo.dateToAsFormat(pl.data)
|
||||
FROM v_datiPackingList pl
|
||||
WHERE IdxRiga = @IdxRiga
|
||||
|
||||
-- compongo testo x exec
|
||||
SET @SqlCode = N'EXEC BatchQueue.stp_registraPackList ' + @CodStab + ' ' + @UDC + ' ' + @Particolare + ' ' + @CodImb + ' ' + CAST(@Matr AS NVARCHAR(8)) + ' ' + @Tipo + ' ' + @Dest + ' ' + CAST(@Qta AS NVARCHAR(8)) + ' ' + CAST(@PesoNet AS NVARCHAR(8)) + ' ' + CAST(@PesoLor AS NVARCHAR(8)) + ' ' + @Stato + ' ' + @Data
|
||||
-- lo mostro
|
||||
print '%' + LTRIM(RTRIM(@SqlCode)) + '%'
|
||||
|
||||
-- !!! TESTARE !!!
|
||||
/*
|
||||
-- chiamo la stored ed eseguo invio
|
||||
EXEC dbo.sp_executesql @SqlCode -- decommentare se va bene...
|
||||
|
||||
-- registro la data del movimento BATCH
|
||||
UPDATE AS400_BatchMovimenti SET DataBatch = GETDATE() WHERE IdxRiga = @IdxRiga
|
||||
*/
|
||||
|
||||
FETCH NEXT FROM RigaPackList INTO @IdxRiga
|
||||
END
|
||||
END
|
||||
CLOSE RigaPackList
|
||||
DEALLOCATE RigaPackList
|
||||
|
||||
|
||||
RETURN
|
||||
go
|
||||
@@ -668,26 +668,26 @@ go
|
||||
****************************************/
|
||||
create PROCEDURE BatchQueue.stp_registraMovMag
|
||||
(
|
||||
@NOMUS NVARCHAR(50), -- è il nome utente
|
||||
@CDCAU NVARCHAR(2), -- è la causale del movimento
|
||||
@CDPAR NVARCHAR(15), -- codice particolare
|
||||
@CDMAG NVARCHAR(2), -- codice magazzino
|
||||
@QTMOV INT, -- quantità movimento
|
||||
@DAMOV NVARCHAR(8), -- data 8 cifre aaaammgg
|
||||
@RIFFO NVARCHAR(8) -- cod UDC compresso
|
||||
@NOMUS NVARCHAR(50), -- è il nome utente
|
||||
@CDCAU NVARCHAR(2), -- è la causale del movimento
|
||||
@CDPAR NVARCHAR(15), -- codice particolare
|
||||
@CDMAG NVARCHAR(2), -- codice magazzino
|
||||
@QTMOV INT, -- quantità movimento
|
||||
@DAMOV NVARCHAR(8), -- data 8 cifre aaaammgg
|
||||
@RIFFO NVARCHAR(8) -- cod UDC compresso
|
||||
)
|
||||
AS
|
||||
-- BOZZA DA VERIFICARE E COMPLETARE A CURA MAZZUCCONI!!!
|
||||
-- BOZZA DA VERIFICARE E COMPLETARE A CURA MAZZUCCONI!!!
|
||||
|
||||
DECLARE @SQL AS NVARCHAR(1000)
|
||||
DECLARE @SQL AS NVARCHAR(1000)
|
||||
|
||||
-- Faccio chiamata su AS400
|
||||
SET @SQL = N' OPENQUERY( P65220DC, ''INSERT INTO MAZZT_DTV3.MWMV200F VALUES '
|
||||
SET @SQL = @SQL + @NOMUS + ', ' + @CDCAU + ', ' + @CDPAR + ', ' + @CDMAG + ', '
|
||||
SET @SQL = @SQL + CAST(@QTMOV AS NVARCHAR(8)) + ', ' + @DAMOV + ', ' + @RIFFO + ''' )'
|
||||
-- Faccio chiamata su AS400
|
||||
SET @SQL = N' OPENQUERY( P65220DC, ''INSERT INTO MAZZT_DTV3.MWMV200F VALUES '
|
||||
SET @SQL = @SQL + @NOMUS + ', ' + @CDCAU + ', ' + @CDPAR + ', ' + @CDMAG + ', '
|
||||
SET @SQL = @SQL + CAST(@QTMOV AS NVARCHAR(8)) + ', ' + @DAMOV + ', ' + @RIFFO + ''' )'
|
||||
|
||||
EXEC sp_executesql @SQL
|
||||
|
||||
EXEC dbo.sp_executesql @SQL
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
@@ -702,33 +702,33 @@ go
|
||||
****************************************/
|
||||
create PROCEDURE BatchQueue.stp_registraPackList
|
||||
(
|
||||
@PLREPA NVARCHAR(2), -- è il codice reparto/stabilimento (05 pressofusione)
|
||||
@PLCART NVARCHAR(15), -- UDC
|
||||
@PLARTI NVARCHAR(15), -- cod articolo
|
||||
@PLCONT NVARCHAR(15), -- cod contenitore
|
||||
@PLMATR INT, -- matricola contenitore (solo cifre finali INT)
|
||||
@PLTPAN CHAR(2), -- tipo anagrafico CLiente / FOrnitore-terzista
|
||||
@PLCDAN NVARCHAR(6), -- cod terzista / cliente
|
||||
@PLQTA INT, -- quantità
|
||||
@PLPNET NUMERIC(7, 3), -- peso netto
|
||||
@PLPLOR NUMERIC(7, 3), -- peso lordo
|
||||
@PLSTAT CHAR(1), -- stato "P" predisposto per packing list, "B" bolla stampata
|
||||
@PLDTEN INT -- data entrata merce, data di carico dell'UDC 8 cifre aaaammgg
|
||||
@PLREPA NVARCHAR(2), -- è il codice reparto/stabilimento (05 pressofusione)
|
||||
@PLCART NVARCHAR(15), -- UDC
|
||||
@PLARTI NVARCHAR(15), -- cod articolo
|
||||
@PLCONT NVARCHAR(15), -- cod contenitore
|
||||
@PLMATR INT, -- matricola contenitore (solo cifre finali INT)
|
||||
@PLTPAN CHAR(2), -- tipo anagrafico CLiente / FOrnitore-terzista
|
||||
@PLCDAN NVARCHAR(6), -- cod terzista / cliente
|
||||
@PLQTA INT, -- quantità
|
||||
@PLPNET NUMERIC(7, 3), -- peso netto
|
||||
@PLPLOR NUMERIC(7, 3), -- peso lordo
|
||||
@PLSTAT CHAR(1), -- stato "P" predisposto per packing list, "B" bolla stampata
|
||||
@PLDTEN INT -- data entrata merce, data di carico dell'UDC 8 cifre aaaammgg
|
||||
)
|
||||
AS
|
||||
-- BOZZA DA VERIFICARE E COMPLETARE A CURA MAZZUCCONI!!!
|
||||
-- BOZZA DA VERIFICARE E COMPLETARE A CURA MAZZUCCONI!!!
|
||||
|
||||
DECLARE @SQL AS NVARCHAR(1000)
|
||||
DECLARE @SQL AS NVARCHAR(1000)
|
||||
|
||||
-- Faccio chiamata su AS400
|
||||
SET @SQL = N' OPENQUERY( P65220DC, ''INSERT INTO MAZZT_DTV3.PACKL00F VALUES '
|
||||
SET @SQL = @SQL + @PLREPA + ', ' + @PLCART + ', ' + @PLARTI + ', ' + @PLCONT + ', '
|
||||
SET @SQL = @SQL + CAST(@PLMATR AS NVARCHAR(5)) + ', ' + @PLTPAN + ', ' + @PLCDAN + ', ' + CAST(@PLQTA AS NVARCHAR(10)) + ', '
|
||||
SET @SQL = @SQL + CAST(@PLPNET AS NVARCHAR(10)) + ', ' + CAST(@PLPLOR AS NVARCHAR(10)) + ', ' + @PLSTAT + ', '
|
||||
SET @SQL = @SQL + CAST(@PLDTEN AS NVARCHAR(8)) + ''' )'
|
||||
-- Faccio chiamata su AS400
|
||||
SET @SQL = N' OPENQUERY( P65220DC, ''INSERT INTO MAZZT_DTV3.PACKL00F VALUES '
|
||||
SET @SQL = @SQL + @PLREPA + ', ' + @PLCART + ', ' + @PLARTI + ', ' + @PLCONT + ', '
|
||||
SET @SQL = @SQL + CAST(@PLMATR AS NVARCHAR(5)) + ', ' + @PLTPAN + ', ' + @PLCDAN + ', ' + CAST(@PLQTA AS NVARCHAR(10)) + ', '
|
||||
SET @SQL = @SQL + CAST(@PLPNET AS NVARCHAR(10)) + ', ' + CAST(@PLPLOR AS NVARCHAR(10)) + ', ' + @PLSTAT + ', '
|
||||
SET @SQL = @SQL + CAST(@PLDTEN AS NVARCHAR(8)) + ''' )'
|
||||
|
||||
EXEC sp_executesql @SQL
|
||||
|
||||
EXEC dbo.sp_executesql @SQL
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
@@ -756,28 +756,28 @@ go
|
||||
****************************************/
|
||||
alter PROCEDURE stp_magazzinoOverviewByMag_maxCelle
|
||||
(
|
||||
@CodCS VARCHAR(2),
|
||||
@CodMag VARCHAR(50)
|
||||
@CodCS VARCHAR(2),
|
||||
@CodMag VARCHAR(50)
|
||||
)
|
||||
AS
|
||||
|
||||
|
||||
WITH cte_celle AS(
|
||||
SELECT b.CodBlocco, c.IdxTipoCella, COUNT(c.IdxCella) * t.Capienza AS numCelle
|
||||
FROM Celle AS c INNER JOIN
|
||||
Blocchi AS b ON c.IdxBlocco = b.IdxBlocco INNER JOIN
|
||||
TipoCella AS t ON c.IdxTipoCella = t.IdxTipoCella
|
||||
WHERE (b.CodCS = @CodCS) AND (b.CodMag = @CodMag)
|
||||
GROUP BY b.CodBlocco, c.IdxTipoCella, t.Capienza
|
||||
SELECT b.CodBlocco, c.IdxTipoCella, COUNT(c.IdxCella) * t.Capienza AS numCelle
|
||||
FROM Celle AS c INNER JOIN
|
||||
Blocchi AS b ON c.IdxBlocco = b.IdxBlocco INNER JOIN
|
||||
TipoCella AS t ON c.IdxTipoCella = t.IdxTipoCella
|
||||
WHERE (b.CodCS = @CodCS) AND (b.CodMag = @CodMag)
|
||||
GROUP BY b.CodBlocco, c.IdxTipoCella, t.Capienza
|
||||
)
|
||||
|
||||
|
||||
SELECT TOP (1) AnagMag.CodCS, AnagMag.CodMag, AnagMag.DescMag, b.IdxBlocco, b.CodBlocco,
|
||||
ISNULL(c.numCelle,ISNULL(b.NumX * b.NumY * b.NumZ,1)) AS TotCelle,
|
||||
0 AS CelleAttive, 0 AS CelleOccupate, 0 AS CelleLibere, GETDATE() AS Oldest, GETDATE() AS Newest
|
||||
FROM AnagMag INNER JOIN Blocchi b ON AnagMag.CodMag = b.CodMag AND AnagMag.CodCS = b.CodCS INNER JOIN cte_celle c ON c.CodBlocco = b.CodBlocco
|
||||
WHERE (AnagMag.CodCS = @CodCS) AND AnagMag.CodMag = @CodMag
|
||||
ORDER BY TotCelle DESC
|
||||
SELECT TOP (1) AnagMag.CodCS, AnagMag.CodMag, AnagMag.DescMag, b.IdxBlocco, b.CodBlocco,
|
||||
ISNULL(c.numCelle,ISNULL(b.NumX * b.NumY * b.NumZ,1)) AS TotCelle,
|
||||
0 AS CelleAttive, 0 AS CelleOccupate, 0 AS CelleLibere, GETDATE() AS Oldest, GETDATE() AS Newest
|
||||
FROM AnagMag INNER JOIN Blocchi b ON AnagMag.CodMag = b.CodMag AND AnagMag.CodCS = b.CodCS INNER JOIN cte_celle c ON c.CodBlocco = b.CodBlocco
|
||||
WHERE (AnagMag.CodCS = @CodCS) AND AnagMag.CodMag = @CodMag
|
||||
ORDER BY TotCelle DESC
|
||||
RETURN
|
||||
go
|
||||
|
||||
@@ -792,26 +792,26 @@ go
|
||||
****************************************/
|
||||
alter PROCEDURE stp_magazzinoOverview_maxCelle
|
||||
(
|
||||
@CodCS VARCHAR(2)
|
||||
@CodCS VARCHAR(2)
|
||||
)
|
||||
AS
|
||||
|
||||
WITH cte_celle AS(
|
||||
SELECT b.CodBlocco, c.IdxTipoCella, COUNT(c.IdxCella) * t.Capienza AS numCelle
|
||||
FROM Celle AS c INNER JOIN
|
||||
Blocchi AS b ON c.IdxBlocco = b.IdxBlocco INNER JOIN
|
||||
TipoCella AS t ON c.IdxTipoCella = t.IdxTipoCella
|
||||
WHERE (b.CodCS = @CodCS)
|
||||
GROUP BY b.CodBlocco, c.IdxTipoCella, t.Capienza
|
||||
SELECT b.CodBlocco, c.IdxTipoCella, COUNT(c.IdxCella) * t.Capienza AS numCelle
|
||||
FROM Celle AS c INNER JOIN
|
||||
Blocchi AS b ON c.IdxBlocco = b.IdxBlocco INNER JOIN
|
||||
TipoCella AS t ON c.IdxTipoCella = t.IdxTipoCella
|
||||
WHERE (b.CodCS = @CodCS)
|
||||
GROUP BY b.CodBlocco, c.IdxTipoCella, t.Capienza
|
||||
)
|
||||
|
||||
|
||||
SELECT TOP (1) AnagMag.CodCS, AnagMag.CodMag, AnagMag.DescMag, b.IdxBlocco, b.CodBlocco,
|
||||
ISNULL(c.numCelle,ISNULL(b.NumX * b.NumY * b.NumZ,1)) AS TotCelle,
|
||||
0 AS CelleAttive, 0 AS CelleOccupate, 0 AS CelleLibere, GETDATE() AS Oldest, GETDATE() AS Newest
|
||||
FROM AnagMag INNER JOIN Blocchi b ON AnagMag.CodMag = b.CodMag AND AnagMag.CodCS = b.CodCS INNER JOIN cte_celle c ON c.CodBlocco = b.CodBlocco
|
||||
WHERE (AnagMag.CodCS = @CodCS)
|
||||
ORDER BY TotCelle DESC
|
||||
SELECT TOP (1) AnagMag.CodCS, AnagMag.CodMag, AnagMag.DescMag, b.IdxBlocco, b.CodBlocco,
|
||||
ISNULL(c.numCelle,ISNULL(b.NumX * b.NumY * b.NumZ,1)) AS TotCelle,
|
||||
0 AS CelleAttive, 0 AS CelleOccupate, 0 AS CelleLibere, GETDATE() AS Oldest, GETDATE() AS Newest
|
||||
FROM AnagMag INNER JOIN Blocchi b ON AnagMag.CodMag = b.CodMag AND AnagMag.CodCS = b.CodCS INNER JOIN cte_celle c ON c.CodBlocco = b.CodBlocco
|
||||
WHERE (AnagMag.CodCS = @CodCS)
|
||||
ORDER BY TotCelle DESC
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
@@ -191,12 +191,12 @@ go
|
||||
****************************************/
|
||||
alter PROCEDURE BatchQueue.stp_batch_RapQual_S01
|
||||
(
|
||||
@minData DATETIME
|
||||
@minData DATETIME
|
||||
)
|
||||
AS
|
||||
SET NOCOUNT ON;
|
||||
|
||||
-- BOZZA DA TESTARE A CURA MAZZUCCONI!!!
|
||||
SET NOCOUNT ON;
|
||||
|
||||
-- BOZZA DA TESTARE A CURA MAZZUCCONI!!!
|
||||
/*
|
||||
XRPQLN AS nRapQual
|
||||
XRPQLD AS DataRapQual
|
||||
@@ -214,56 +214,56 @@ AS
|
||||
WHERE XRPQLN <> 0 -- Se il n. rapporto di qualità è zero non sono cartellini materia prima
|
||||
|
||||
*/
|
||||
|
||||
DECLARE @SQL AS NVARCHAR(4000);
|
||||
|
||||
DECLARE @SQL AS NVARCHAR(4000);
|
||||
DECLARE @SqlOK AS INT;
|
||||
|
||||
DECLARE @dataAs400 AS VARCHAR(8)
|
||||
|
||||
SET @dataAs400 = (SELECT dbo.dateToAsFormat(@minData))
|
||||
DECLARE @dataAs400 AS VARCHAR(8)
|
||||
|
||||
SET @dataAs400 = (SELECT dbo.dateToAsFormat(@minData))
|
||||
|
||||
BEGIN TRY
|
||||
|
||||
-- svuoto tab raw attuale
|
||||
DELETE FROM RawData.XOGIX00F
|
||||
BEGIN TRY
|
||||
|
||||
-- svuoto tab raw attuale
|
||||
DELETE FROM RawData.XOGIX00F
|
||||
|
||||
-- CREO L'ISTRUZIONE SQL DI INSERT PARAMETRICA
|
||||
SET @SQL =
|
||||
N'INSERT INTO RawData.XOGIX00F
|
||||
SELECT XRPQLN
|
||||
,XRPQLD
|
||||
,XNRETI
|
||||
,XCDFOR
|
||||
,XCDTER
|
||||
,XCDPAR
|
||||
,XDTPRO
|
||||
,XTRPRO
|
||||
,XQTPRO
|
||||
,XDESMT
|
||||
,XMATSC
|
||||
,XBENQL
|
||||
FROM OPENQUERY( P65220DC, ''SELECT * FROM MAZZT_DTV3.XOGIX00F WHERE XRPQLN <> 0 AND XRPQLD >= '
|
||||
|
||||
SET @SQL = @SQL + @dataAs400 + ' '' ) '
|
||||
|
||||
-- SELECT @SQL
|
||||
-- CREO L'ISTRUZIONE SQL DI INSERT PARAMETRICA
|
||||
SET @SQL =
|
||||
N'INSERT INTO RawData.XOGIX00F
|
||||
SELECT XRPQLN
|
||||
,XRPQLD
|
||||
,XNRETI
|
||||
,XCDFOR
|
||||
,XCDTER
|
||||
,XCDPAR
|
||||
,XDTPRO
|
||||
,XTRPRO
|
||||
,XQTPRO
|
||||
,XDESMT
|
||||
,XMATSC
|
||||
,XBENQL
|
||||
FROM OPENQUERY( P65220DC, ''SELECT * FROM MAZZT_DTV3.XOGIX00F WHERE XRPQLN <> 0 AND XRPQLD >= '
|
||||
|
||||
SET @SQL = @SQL + @dataAs400 + ' '' ) '
|
||||
|
||||
-- SELECT @SQL
|
||||
|
||||
-- Eseguo il comando T-SQL verso AS400 e testo se OK
|
||||
SET @SqlOK = 0;
|
||||
SET @SqlOK = 0;
|
||||
|
||||
-- EXEC @SqlOK = sp_executesql @SQL se faccio così non mi valorizza la variabile se da errore
|
||||
EXEC sp_executesql @SQL;
|
||||
|
||||
END TRY
|
||||
EXEC dbo.sp_executesql @SQL;
|
||||
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
-- PRINT ERROR_NUMBER()
|
||||
SET @SqlOK = ERROR_NUMBER();
|
||||
-- PRINT ERROR_NUMBER()
|
||||
SET @SqlOK = ERROR_NUMBER();
|
||||
|
||||
END CATCH
|
||||
|
||||
-- Memorizzo il comando per verifica T-SQL e l'esito del comando se 0 è OK
|
||||
INSERT INTO RawData.AS400_Comandi
|
||||
SELECT GETDATE(), 'stp_consumaMP', @SQL, @SqlOK;
|
||||
INSERT INTO RawData.AS400_Comandi
|
||||
SELECT GETDATE(), 'stp_consumaMP', @SQL, @SqlOK;
|
||||
|
||||
-- è possibile sollevare un RAISERROR ??? come si comporta poi il programma?
|
||||
|
||||
@@ -298,64 +298,64 @@ go
|
||||
****************************************/
|
||||
alter PROCEDURE BatchQueue.stp_consumaMP
|
||||
(
|
||||
@XRPQLN INT, -- è il num rap qualità
|
||||
@XNRETI NVARCHAR(10), -- è il numUdc prog AS400
|
||||
@XDTPRO INT, -- data 8 cifre aaaammgg Data Prelievo Fusione
|
||||
@XTRPRO NVARCHAR(5), -- turno prelievo ( solo se interno )
|
||||
@XDESMT NVARCHAR(3), -- destinatario int/terzista ( F01 / T01 )
|
||||
@XCDTER NVARCHAR(6) -- cod terzista ( Anagrafico Depositi )
|
||||
@XRPQLN INT, -- è il num rap qualità
|
||||
@XNRETI NVARCHAR(10), -- è il numUdc prog AS400
|
||||
@XDTPRO INT, -- data 8 cifre aaaammgg Data Prelievo Fusione
|
||||
@XTRPRO NVARCHAR(5), -- turno prelievo ( solo se interno )
|
||||
@XDESMT NVARCHAR(3), -- destinatario int/terzista ( F01 / T01 )
|
||||
@XCDTER NVARCHAR(6) -- cod terzista ( Anagrafico Depositi )
|
||||
)
|
||||
AS
|
||||
-- BOZZA DA VERIFICARE E COMPLETARE A CURA MAZZUCCONI!!!
|
||||
-- BOZZA DA VERIFICARE E COMPLETARE A CURA MAZZUCCONI!!!
|
||||
-- L'UPDATE FUNZIONA VERSO AS400 DI TEST MAZZT_DTV3 effetiva MAZZ_DATV3
|
||||
|
||||
/* PER TESTARE
|
||||
|
||||
DECLARE @XRPQLN INT, -- è il num rap qualità
|
||||
/* PER TESTARE
|
||||
|
||||
DECLARE @XRPQLN INT, -- è il num rap qualità
|
||||
@XNRETI NVARCHAR(10), -- è il numUdc prog
|
||||
@XDTPRO INT, -- data 8 cifre aaaammgg
|
||||
@XTRPRO NVARCHAR(5), -- turno
|
||||
@XDESMT NVARCHAR(3), -- destinatario int/terzista
|
||||
@XCDTER NVARCHAR(6) -- cod terzista
|
||||
|
||||
SET @XRPQLN = 905793 -- è il num rap qualità
|
||||
SET @XNRETI = 'U100548151' -- è il numUdc prog
|
||||
SET @XDTPRO = 20100723 -- data 8 cifre aaaammgg
|
||||
SET @XTRPRO = 'S' -- turno
|
||||
SET @XDESMT = 'F01' -- destinatario int/terzista
|
||||
SET @XCDTER = '' -- cod terzista
|
||||
*/
|
||||
SET @XRPQLN = 905793 -- è il num rap qualità
|
||||
SET @XNRETI = 'U100548151' -- è il numUdc prog
|
||||
SET @XDTPRO = 20100723 -- data 8 cifre aaaammgg
|
||||
SET @XTRPRO = 'S' -- turno
|
||||
SET @XDESMT = 'F01' -- destinatario int/terzista
|
||||
SET @XCDTER = '' -- cod terzista
|
||||
*/
|
||||
|
||||
DECLARE @SQL AS NVARCHAR(4000);
|
||||
DECLARE @SQL AS NVARCHAR(4000);
|
||||
DECLARE @SqlOK AS INT;
|
||||
|
||||
BEGIN TRY
|
||||
|
||||
-- TEST per generare errore
|
||||
-- SET @XDTPRO = 99999920100723 -- data 8 cifre aaaammgg
|
||||
|
||||
-- Creo l'istruzione SQL e faccio chiamata su AS400
|
||||
-- Forse è meglio controllare prima se già aggiornato e preso in carico da ACG???
|
||||
|
||||
SET @SQL = N'UPDATE OPENQUERY( P65220DC, ''SELECT * FROM MAZZT_DTV3.XOGIX00F '
|
||||
|
||||
SET @SQL = @SQL + 'WHERE XRPQLN = ' + CAST(@XRPQLN AS NVARCHAR(20)) -- Numero Rapporto Qualita
|
||||
SET @SQL = @SQL + ' AND XNRETI = ''''' + @XNRETI + ''''''' ) ' -- Numero UDC AS400
|
||||
-- TEST per generare errore
|
||||
-- SET @XDTPRO = 99999920100723 -- data 8 cifre aaaammgg
|
||||
|
||||
-- Creo l'istruzione SQL e faccio chiamata su AS400
|
||||
-- Forse è meglio controllare prima se già aggiornato e preso in carico da ACG???
|
||||
|
||||
SET @SQL = N'UPDATE OPENQUERY( P65220DC, ''SELECT * FROM MAZZT_DTV3.XOGIX00F '
|
||||
|
||||
SET @SQL = @SQL + 'WHERE XRPQLN = ' + CAST(@XRPQLN AS NVARCHAR(20)) -- Numero Rapporto Qualita
|
||||
SET @SQL = @SQL + ' AND XNRETI = ''''' + @XNRETI + ''''''' ) ' -- Numero UDC AS400
|
||||
|
||||
SET @SQL = @SQL + 'SET XDTPRO = ' + CAST(@XDTPRO AS NVARCHAR(8))
|
||||
SET @SQL = @SQL + ', XTRPRO = ''' + @XTRPRO + ''''
|
||||
SET @SQL = @SQL + ', XDESMT = ''' + @XDESMT + ''''
|
||||
SET @SQL = @SQL + 'SET XDTPRO = ' + CAST(@XDTPRO AS NVARCHAR(8))
|
||||
SET @SQL = @SQL + ', XTRPRO = ''' + @XTRPRO + ''''
|
||||
SET @SQL = @SQL + ', XDESMT = ''' + @XDESMT + ''''
|
||||
SET @SQL = @SQL + ', XMATSC = ''S''' -- Flag Lega Scaricata
|
||||
SET @SQL = @SQL + ', XCDTER = ''' + @XCDTER + '''';
|
||||
|
||||
-- SELECT @SQL
|
||||
SET @SQL = @SQL + ', XCDTER = ''' + @XCDTER + '''';
|
||||
|
||||
-- SELECT @SQL
|
||||
|
||||
-- Eseguo il comando T-SQL verso AS400 e testo se OK
|
||||
SET @SqlOK = 0;
|
||||
SET @SqlOK = 0;
|
||||
|
||||
-- EXEC @SqlOK = sp_executesql @SQL se faccio così non mi valorizza la variabile se da errore
|
||||
EXEC sp_executesql @SQL;
|
||||
END TRY
|
||||
EXEC dbo.sp_executesql @SQL;
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
-- PRINT ERROR_NUMBER()
|
||||
SET @SqlOK = ERROR_NUMBER();
|
||||
@@ -370,8 +370,8 @@ AS
|
||||
END CATCH
|
||||
|
||||
-- Memorizzo il comando per verifica T-SQL e l'esito del comando se 0 è OK
|
||||
INSERT INTO RawData.AS400_Comandi
|
||||
SELECT GETDATE(), 'stp_consumaMP', @SQL, @SqlOK;
|
||||
INSERT INTO RawData.AS400_Comandi
|
||||
SELECT GETDATE(), 'stp_consumaMP', @SQL, @SqlOK;
|
||||
|
||||
-- è possibile sollevare un RAISERROR ??? come si comporta poi il programma?
|
||||
|
||||
@@ -383,7 +383,7 @@ AS
|
||||
|
||||
-- MANCA IL TEST SE HO AGGIORNATO EFFETTIVAMENTE o MENO
|
||||
|
||||
/*
|
||||
/*
|
||||
SELECT XRPQLN, XNRETI , XDTPRO, XTRPRO, XDESMT, XMATSC, XCDTER
|
||||
FROM OPENQUERY( P65220DC, 'SELECT * FROM MAZZT_DTV3.XOGIX00F WHERE XRPQLN = 905793 AND XNRETI = ''U100548151'' ')
|
||||
|
||||
@@ -424,58 +424,58 @@ go
|
||||
alter PROCEDURE BatchQueue.stp_processaCodaMovimMag
|
||||
AS
|
||||
|
||||
-- BOZZA DA VERIFICARE E COMPLETARE A CURA MAZZUCCONI!!!
|
||||
-- campi variabili "globali"
|
||||
DECLARE @IdxBatch INT
|
||||
DECLARE @CodSoggetto NVARCHAR(17)
|
||||
DECLARE @CodMovCarico CHAR(2)
|
||||
DECLARE @CodMovScarico CHAR(2)
|
||||
-- campi x cursore e valorizzazione riga a riga
|
||||
DECLARE @Particolare NVARCHAR(15)
|
||||
DECLARE @Causale NVARCHAR(2)
|
||||
DECLARE @CodMag NVARCHAR(50)
|
||||
DECLARE @Qta INT
|
||||
DECLARE @Data NVARCHAR(8)
|
||||
DECLARE @RIFFO NVARCHAR(8)
|
||||
|
||||
-- faccio una query con un cursore x processare tutte le righe da inviare ad AS400..
|
||||
DECLARE RigaMovMag CURSOR FOR
|
||||
SELECT IdxBatch FROM AS400_BatchMovimenti WHERE DataBatch IS NULL
|
||||
-- BOZZA DA VERIFICARE E COMPLETARE A CURA MAZZUCCONI!!!
|
||||
-- campi variabili "globali"
|
||||
DECLARE @IdxBatch INT
|
||||
DECLARE @CodSoggetto NVARCHAR(17)
|
||||
DECLARE @CodMovCarico CHAR(2)
|
||||
DECLARE @CodMovScarico CHAR(2)
|
||||
-- campi x cursore e valorizzazione riga a riga
|
||||
DECLARE @Particolare NVARCHAR(15)
|
||||
DECLARE @Causale NVARCHAR(2)
|
||||
DECLARE @CodMag NVARCHAR(50)
|
||||
DECLARE @Qta INT
|
||||
DECLARE @Data NVARCHAR(8)
|
||||
DECLARE @RIFFO NVARCHAR(8)
|
||||
|
||||
-- faccio una query con un cursore x processare tutte le righe da inviare ad AS400..
|
||||
DECLARE RigaMovMag CURSOR FOR
|
||||
SELECT IdxBatch FROM AS400_BatchMovimenti WHERE DataBatch IS NULL
|
||||
|
||||
-- setto il codice soggetto da inviare ad AS... VERIFICARE!!!
|
||||
SET @CodSoggetto = 'O0000000000099999'
|
||||
-- setto il codice soggetto da inviare ad AS... VERIFICARE!!!
|
||||
SET @CodSoggetto = 'O0000000000099999'
|
||||
|
||||
-- carico i 2 valori di default di carico e scarico da AS400
|
||||
SET @CodMovCarico = (SELECT CauCarico FROM RilPro.AnagCausaliMag)
|
||||
SET @CodMovScarico = (SELECT CauScarico FROM RilPro.AnagCausaliMag)
|
||||
-- carico i 2 valori di default di carico e scarico da AS400
|
||||
SET @CodMovCarico = (SELECT CauCarico FROM RilPro.AnagCausaliMag)
|
||||
SET @CodMovScarico = (SELECT CauScarico FROM RilPro.AnagCausaliMag)
|
||||
|
||||
-- inizio cursore!
|
||||
OPEN RigaMovMag
|
||||
FETCH NEXT FROM RigaMovMag
|
||||
INTO @IdxBatch
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
-- controllo ci sia la riga
|
||||
IF (SELECT COUNT(IdxBatch) FROM AS400_BatchMovimenti WHERE IdxBatch = @IdxBatch) > 0
|
||||
BEGIN
|
||||
-- carico valori che mi servono
|
||||
SELECT @Particolare=bm.Particolare, @Causale=CASE WHEN bm.Quantita>0 THEN @CodMovCarico ELSE @CodMovScarico END,
|
||||
@CodMag=bm.CodMagAS, @Qta = ABS(bm.Quantita), @Data=dbo.dateToAsFormat(GETDATE()), @RIFFO=dbo.getUdcComp(bm.UDC,8)
|
||||
FROM AS400_BatchMovimenti bm
|
||||
WHERE IdxBatch = @IdxBatch
|
||||
|
||||
-- Eseguo la stored che registra il Packing List ???
|
||||
Execute BatchQueue.stp_registraMovMag @CodSoggetto, @Causale, @Particolare, @CodMag, @Qta, @Data, @RIFFO
|
||||
-- inizio cursore!
|
||||
OPEN RigaMovMag
|
||||
FETCH NEXT FROM RigaMovMag
|
||||
INTO @IdxBatch
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
-- controllo ci sia la riga
|
||||
IF (SELECT COUNT(IdxBatch) FROM AS400_BatchMovimenti WHERE IdxBatch = @IdxBatch) > 0
|
||||
BEGIN
|
||||
-- carico valori che mi servono
|
||||
SELECT @Particolare=bm.Particolare, @Causale=CASE WHEN bm.Quantita>0 THEN @CodMovCarico ELSE @CodMovScarico END,
|
||||
@CodMag=bm.CodMagAS, @Qta = ABS(bm.Quantita), @Data=dbo.dateToAsFormat(GETDATE()), @RIFFO=dbo.getUdcComp(bm.UDC,8)
|
||||
FROM AS400_BatchMovimenti bm
|
||||
WHERE IdxBatch = @IdxBatch
|
||||
|
||||
-- Eseguo la stored che registra il Packing List ???
|
||||
Execute BatchQueue.stp_registraMovMag @CodSoggetto, @Causale, @Particolare, @CodMag, @Qta, @Data, @RIFFO
|
||||
|
||||
-- registro la data del movimento BATCH
|
||||
UPDATE AS400_BatchMovimenti SET DataBatch = GETDATE() WHERE IdxBatch = @IdxBatch
|
||||
|
||||
FETCH NEXT FROM RigaMovMag INTO @IdxBatch
|
||||
END
|
||||
END
|
||||
CLOSE RigaMovMag
|
||||
DEALLOCATE RigaMovMag
|
||||
|
||||
-- registro la data del movimento BATCH
|
||||
UPDATE AS400_BatchMovimenti SET DataBatch = GETDATE() WHERE IdxBatch = @IdxBatch
|
||||
|
||||
FETCH NEXT FROM RigaMovMag INTO @IdxBatch
|
||||
END
|
||||
END
|
||||
CLOSE RigaMovMag
|
||||
DEALLOCATE RigaMovMag
|
||||
|
||||
|
||||
RETURN
|
||||
go
|
||||
@@ -504,69 +504,69 @@ go
|
||||
create PROCEDURE BatchQueue.stp_processaCodaMovimPackList
|
||||
AS
|
||||
|
||||
-- BOZZA DA VERIFICARE E COMPLETARE A CURA MAZZUCCONI!!!
|
||||
|
||||
-- campi x cursore e valorizzazione riga a riga
|
||||
DECLARE @IdxRiga INT
|
||||
DECLARE @CodLista NVARCHAR(12)
|
||||
DECLARE @CodListaPre NVARCHAR(12)
|
||||
DECLARE @CodStab CHAR(2)
|
||||
DECLARE @UDC NVARCHAR(15)
|
||||
DECLARE @Particolare NVARCHAR(15)
|
||||
DECLARE @CodImb NVARCHAR(15)
|
||||
DECLARE @Matr INT
|
||||
DECLARE @Tipo NVARCHAR(2)
|
||||
DECLARE @Dest NVARCHAR(10)
|
||||
DECLARE @Qta INT
|
||||
DECLARE @PesoNet NUMERIC(7,3)
|
||||
DECLARE @PesoLor NUMERIC(7,3)
|
||||
DECLARE @Stato CHAR(1)
|
||||
DECLARE @Data NVARCHAR(8)
|
||||
|
||||
-- faccio una query con un cursore x processare tutte le righe da inviare ad AS400..
|
||||
DECLARE RigaPackList CURSOR FOR
|
||||
SELECT IdxRiga FROM v_datiPackingList ORDER BY CodLista
|
||||
-- BOZZA DA VERIFICARE E COMPLETARE A CURA MAZZUCCONI!!!
|
||||
|
||||
-- campi x cursore e valorizzazione riga a riga
|
||||
DECLARE @IdxRiga INT
|
||||
DECLARE @CodLista NVARCHAR(12)
|
||||
DECLARE @CodListaPre NVARCHAR(12)
|
||||
DECLARE @CodStab CHAR(2)
|
||||
DECLARE @UDC NVARCHAR(15)
|
||||
DECLARE @Particolare NVARCHAR(15)
|
||||
DECLARE @CodImb NVARCHAR(15)
|
||||
DECLARE @Matr INT
|
||||
DECLARE @Tipo NVARCHAR(2)
|
||||
DECLARE @Dest NVARCHAR(10)
|
||||
DECLARE @Qta INT
|
||||
DECLARE @PesoNet NUMERIC(7,3)
|
||||
DECLARE @PesoLor NUMERIC(7,3)
|
||||
DECLARE @Stato CHAR(1)
|
||||
DECLARE @Data NVARCHAR(8)
|
||||
|
||||
-- faccio una query con un cursore x processare tutte le righe da inviare ad AS400..
|
||||
DECLARE RigaPackList CURSOR FOR
|
||||
SELECT IdxRiga FROM v_datiPackingList ORDER BY CodLista
|
||||
|
||||
-- setto il codice stabilimento da inviare ad AS... VERIFICARE!!!
|
||||
SET @CodStab = '05';
|
||||
-- setto il codice stabilimento da inviare ad AS... VERIFICARE!!!
|
||||
SET @CodStab = '05';
|
||||
|
||||
-- imposto prima codListaPre a vuoto...
|
||||
SET @CodListaPre = '';
|
||||
-- inizio cursore!
|
||||
OPEN RigaPackList
|
||||
FETCH NEXT FROM RigaPackList
|
||||
INTO @IdxRiga
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
-- controllo ci sia la riga
|
||||
IF (SELECT COUNT(IdxRiga) FROM v_datiPackingList WHERE IdxRiga = @IdxRiga) > 0
|
||||
BEGIN
|
||||
-- carico valori che mi servono
|
||||
SELECT @Particolare=pl.Particolare, @UDC=UDC, @CodImb=pl.CodImballo, @Matr = pl.matrUdc, @Tipo=pl.tipo, @Dest=pl.Destinatario,
|
||||
@Qta=ABS(pl.Qta), @PesoNet=pl.PesoNetto, @PesoLor=pl.PesoTot, @Stato=pl.Stato, @Data=dbo.dateToAsFormat(pl.data),
|
||||
@CodLista=pl.CodLista
|
||||
FROM v_datiPackingList pl
|
||||
WHERE IdxRiga = @IdxRiga
|
||||
|
||||
-- Eseguo la stored che registra il Packing List ???
|
||||
Execute BatchQueue.stp_registraPackList @CodStab, @UDC, @Particolare , @CodImb , @Matr , @Tipo , @Dest , @Qta , @PesoNet , @PesoLor , @Stato , @Data
|
||||
|
||||
FETCH NEXT FROM RigaPackList INTO @IdxRiga
|
||||
|
||||
-- controllo: se la lissta precedente è diversa dall'attuale la indico come scaricata (precedente)
|
||||
IF(@CodListaPre <> @CodLista)
|
||||
BEGIN
|
||||
UPDATE ElencoListePrelievo_AS SET DataBatch = GETDATE() WHERE CodLista = @CodListaPre
|
||||
-- cambio il cod pre da confrontare
|
||||
SET @CodListaPre = @CodLista
|
||||
END
|
||||
END
|
||||
-- registro la data del movimento BATCH dell'ultima lista processata
|
||||
UPDATE ElencoListePrelievo_AS SET DataBatch = GETDATE() WHERE CodLista = @CodLista
|
||||
|
||||
END
|
||||
CLOSE RigaPackList
|
||||
DEALLOCATE RigaPackList
|
||||
-- imposto prima codListaPre a vuoto...
|
||||
SET @CodListaPre = '';
|
||||
-- inizio cursore!
|
||||
OPEN RigaPackList
|
||||
FETCH NEXT FROM RigaPackList
|
||||
INTO @IdxRiga
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
-- controllo ci sia la riga
|
||||
IF (SELECT COUNT(IdxRiga) FROM v_datiPackingList WHERE IdxRiga = @IdxRiga) > 0
|
||||
BEGIN
|
||||
-- carico valori che mi servono
|
||||
SELECT @Particolare=pl.Particolare, @UDC=UDC, @CodImb=pl.CodImballo, @Matr = pl.matrUdc, @Tipo=pl.tipo, @Dest=pl.Destinatario,
|
||||
@Qta=ABS(pl.Qta), @PesoNet=pl.PesoNetto, @PesoLor=pl.PesoTot, @Stato=pl.Stato, @Data=dbo.dateToAsFormat(pl.data),
|
||||
@CodLista=pl.CodLista
|
||||
FROM v_datiPackingList pl
|
||||
WHERE IdxRiga = @IdxRiga
|
||||
|
||||
-- Eseguo la stored che registra il Packing List ???
|
||||
Execute BatchQueue.stp_registraPackList @CodStab, @UDC, @Particolare , @CodImb , @Matr , @Tipo , @Dest , @Qta , @PesoNet , @PesoLor , @Stato , @Data
|
||||
|
||||
FETCH NEXT FROM RigaPackList INTO @IdxRiga
|
||||
|
||||
-- controllo: se la lissta precedente è diversa dall'attuale la indico come scaricata (precedente)
|
||||
IF(@CodListaPre <> @CodLista)
|
||||
BEGIN
|
||||
UPDATE ElencoListePrelievo_AS SET DataBatch = GETDATE() WHERE CodLista = @CodListaPre
|
||||
-- cambio il cod pre da confrontare
|
||||
SET @CodListaPre = @CodLista
|
||||
END
|
||||
END
|
||||
-- registro la data del movimento BATCH dell'ultima lista processata
|
||||
UPDATE ElencoListePrelievo_AS SET DataBatch = GETDATE() WHERE CodLista = @CodLista
|
||||
|
||||
END
|
||||
CLOSE RigaPackList
|
||||
DEALLOCATE RigaPackList
|
||||
|
||||
RETURN
|
||||
go
|
||||
@@ -595,16 +595,16 @@ go
|
||||
****************************************/
|
||||
alter PROCEDURE BatchQueue.stp_registraMovMag
|
||||
(
|
||||
@NOMUS NVARCHAR(50), -- è il nome utente
|
||||
@CDCAU NVARCHAR(2), -- è la causale del movimento
|
||||
@CDPAR NVARCHAR(15), -- codice particolare
|
||||
@CDMAG NVARCHAR(2), -- codice magazzino
|
||||
@QTMOV NUMERIC(9,2), -- quantità movimento
|
||||
@DAMOV NVARCHAR(8), -- data 8 cifre aaaammgg Data Movimento
|
||||
@RIFFO NVARCHAR(8) -- cod UDC compresso
|
||||
@NOMUS NVARCHAR(50), -- è il nome utente
|
||||
@CDCAU NVARCHAR(2), -- è la causale del movimento
|
||||
@CDPAR NVARCHAR(15), -- codice particolare
|
||||
@CDMAG NVARCHAR(2), -- codice magazzino
|
||||
@QTMOV NUMERIC(9,2), -- quantità movimento
|
||||
@DAMOV NVARCHAR(8), -- data 8 cifre aaaammgg Data Movimento
|
||||
@RIFFO NVARCHAR(8) -- cod UDC compresso
|
||||
)
|
||||
AS
|
||||
|
||||
|
||||
-- QUESTA FUNZIONA!!! DA VERIFICARE I DATI PASSATI VISTO CHE ATTUALMENTE NON FUNZIONA
|
||||
-- LA STORED CHE LA RICHIAMA-POPOLA ?
|
||||
|
||||
@@ -613,12 +613,12 @@ AS
|
||||
|
||||
/* -- Variabili per test senza Stored
|
||||
DECLARE @NOMUS NVARCHAR(50), -- è il nome utente
|
||||
@CDCAU NVARCHAR(2), -- è la causale del movimento
|
||||
@CDPAR NVARCHAR(15), -- codice particolare
|
||||
@CDMAG NVARCHAR(2), -- codice magazzino
|
||||
@QTMOV NUMERIC(9,2), -- quantità movimento ATTENZIONE QUESTA E' SBAGLIATA SULLA STORED
|
||||
@DAMOV NVARCHAR(8), -- data 8 cifre aaaammgg
|
||||
@RIFFO NVARCHAR(8) -- cod UDC compresso
|
||||
@CDCAU NVARCHAR(2), -- è la causale del movimento
|
||||
@CDPAR NVARCHAR(15), -- codice particolare
|
||||
@CDMAG NVARCHAR(2), -- codice magazzino
|
||||
@QTMOV NUMERIC(9,2), -- quantità movimento ATTENZIONE QUESTA E' SBAGLIATA SULLA STORED
|
||||
@DAMOV NVARCHAR(8), -- data 8 cifre aaaammgg
|
||||
@RIFFO NVARCHAR(8) -- cod UDC compresso
|
||||
|
||||
-- SETTO LE VARIABILI DI PROVA PER TEST
|
||||
SET @NOMUS = N'PIPPO'
|
||||
@@ -686,35 +686,35 @@ go
|
||||
****************************************/
|
||||
alter PROCEDURE BatchQueue.stp_registraPackList
|
||||
(
|
||||
@PLREPA NVARCHAR(2), -- è il codice reparto/stabilimento (05 pressofusione)
|
||||
@PLCART NVARCHAR(15), -- UDC
|
||||
@PLARTI NVARCHAR(15), -- cod articolo
|
||||
@PLCONT NVARCHAR(15), -- cod contenitore
|
||||
@PLMATR INT, -- matricola contenitore (solo cifre finali INT)
|
||||
@PLTPAN CHAR(2), -- tipo anagrafico CLiente / FOrnitore-terzista
|
||||
@PLCDAN NVARCHAR(6), -- cod terzista / cliente
|
||||
@PLQTA INT, -- quantità
|
||||
@PLPNET NUMERIC(7, 3), -- peso netto
|
||||
@PLPLOR NUMERIC(7, 3), -- peso lordo
|
||||
@PLSTAT CHAR(1), -- stato "P" predisposto per packing list, "B" bolla stampata
|
||||
@PLDTEN INT -- data entrata merce, data di carico dell'UDC 8 cifre aaaammgg
|
||||
@PLREPA NVARCHAR(2), -- è il codice reparto/stabilimento (05 pressofusione)
|
||||
@PLCART NVARCHAR(15), -- UDC
|
||||
@PLARTI NVARCHAR(15), -- cod articolo
|
||||
@PLCONT NVARCHAR(15), -- cod contenitore
|
||||
@PLMATR INT, -- matricola contenitore (solo cifre finali INT)
|
||||
@PLTPAN CHAR(2), -- tipo anagrafico CLiente / FOrnitore-terzista
|
||||
@PLCDAN NVARCHAR(6), -- cod terzista / cliente
|
||||
@PLQTA INT, -- quantità
|
||||
@PLPNET NUMERIC(7, 3), -- peso netto
|
||||
@PLPLOR NUMERIC(7, 3), -- peso lordo
|
||||
@PLSTAT CHAR(1), -- stato "P" predisposto per packing list, "B" bolla stampata
|
||||
@PLDTEN INT -- data entrata merce, data di carico dell'UDC 8 cifre aaaammgg
|
||||
)
|
||||
AS
|
||||
-- BOZZA DA VERIFICARE E COMPLETARE A CURA MAZZUCCONI!!!
|
||||
-- BOZZA DA VERIFICARE E COMPLETARE A CURA MAZZUCCONI!!!
|
||||
|
||||
--DECLARE @SQL AS NVARCHAR(4000);
|
||||
DECLARE @SqlOK AS INT;
|
||||
--DECLARE @SQL AS NVARCHAR(4000);
|
||||
DECLARE @SqlOK AS INT;
|
||||
|
||||
-- inizio a dire che è andata bene e salvo in tab comandi
|
||||
SET @SqlOk = 1;
|
||||
|
||||
-- Memorizzo il comando per verifica T-SQL
|
||||
-- Memorizzo il comando per verifica T-SQL
|
||||
INSERT INTO RawData.AS400_Comandi
|
||||
SELECT GETDATE(), 'stp_registraPackList',
|
||||
'INSERT INTO MAZZT_DTV3.PACKL00F parametri :'
|
||||
+ @PLREPA + ', ' + @PLCART + ', ' + @PLARTI + ', ' + @PLCONT + ', ' + CAST(@PLMATR AS NVARCHAR(5)) + ', ' + @PLTPAN + ', ' + @PLCDAN + ', ' + CAST(@PLQTA AS NVARCHAR(10)) + ', ' + CAST(@PLPNET AS NVARCHAR(10)) + ', ' + CAST(@PLPLOR AS NVARCHAR(10)) + ', ' + @PLSTAT + ', ' + CAST(@PLDTEN AS NVARCHAR(8)) , @SqlOk
|
||||
|
||||
/*
|
||||
/*
|
||||
INSERT INTO
|
||||
OPENQUERY( P65220DC,
|
||||
'
|
||||
@@ -724,18 +724,18 @@ AS
|
||||
VALUES ( @PLREPA , @PLCART , @PLARTI , @PLCONT , CAST(@PLMATR AS NVARCHAR(5)) , @PLTPAN , @PLCDAN , CAST(@PLQTA AS NVARCHAR(10)) , CAST(@PLPNET AS NVARCHAR(10)) , CAST(@PLPLOR AS NVARCHAR(10)) , @PLSTAT , CAST(@PLDTEN AS NVARCHAR(8)) )
|
||||
*/
|
||||
|
||||
|
||||
|
||||
/*
|
||||
-- preparo chiamata su AS400
|
||||
SET @SQL = N' OPENQUERY( P65220DC, ''INSERT INTO MAZZT_DTV3.PACKL00F VALUES '
|
||||
SET @SQL = @SQL + @PLREPA + ', ' + @PLCART + ', ' + @PLARTI + ', ' + @PLCONT + ', '
|
||||
SET @SQL = @SQL + CAST(@PLMATR AS NVARCHAR(5)) + ', ' + @PLTPAN + ', ' + @PLCDAN + ', ' + CAST(@PLQTA AS NVARCHAR(10)) + ', '
|
||||
SET @SQL = @SQL + CAST(@PLPNET AS NVARCHAR(10)) + ', ' + CAST(@PLPLOR AS NVARCHAR(10)) + ', ' + @PLSTAT + ', '
|
||||
SET @SQL = @SQL + CAST(@PLDTEN AS NVARCHAR(8)) + ''' )'
|
||||
|
||||
EXEC sp_executesql @SQL
|
||||
*/
|
||||
|
||||
SET @SQL = N' OPENQUERY( P65220DC, ''INSERT INTO MAZZT_DTV3.PACKL00F VALUES '
|
||||
SET @SQL = @SQL + @PLREPA + ', ' + @PLCART + ', ' + @PLARTI + ', ' + @PLCONT + ', '
|
||||
SET @SQL = @SQL + CAST(@PLMATR AS NVARCHAR(5)) + ', ' + @PLTPAN + ', ' + @PLCDAN + ', ' + CAST(@PLQTA AS NVARCHAR(10)) + ', '
|
||||
SET @SQL = @SQL + CAST(@PLPNET AS NVARCHAR(10)) + ', ' + CAST(@PLPLOR AS NVARCHAR(10)) + ', ' + @PLSTAT + ', '
|
||||
SET @SQL = @SQL + CAST(@PLDTEN AS NVARCHAR(8)) + ''' )'
|
||||
|
||||
EXEC dbo.sp_executesql @SQL
|
||||
*/
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
|
||||
@@ -151,7 +151,7 @@ AS
|
||||
DECLARE @CodEvento VARCHAR(10)
|
||||
DECLARE @CodTipoDichiaraz VARCHAR(1)
|
||||
DECLARE @IdxCella INT
|
||||
DECLARE @CodCs NVARCHAR(2)
|
||||
DECLARE @CodCS NVARCHAR(2)
|
||||
|
||||
SET @CodEvento = 'UDC_RIA'
|
||||
SET @CodTipoDichiaraz = 'U'
|
||||
@@ -170,9 +170,9 @@ BEGIN TRAN
|
||||
|
||||
-- imposto posizione CELLA corrente x l'udc nella prima libera
|
||||
SET @IdxCella = (SELECT c.IdxCella FROM Celle c inner join Blocchi b ON c.IdxBlocco=b.IdxBlocco INNER JOIN ElencoCartellini e ON b.CodMag = CAST(e.IdxPosizione AS NVARCHAR(50)) WHERE e.UDC = @UDC)
|
||||
SET @CodCs = (SELECT CodCs FROM ElencoCartellini WHERE UDC = @UDC)
|
||||
SET @CodCS = (SELECT CodCS FROM ElencoCartellini WHERE UDC = @UDC)
|
||||
INSERT INTO PosizioneUdcCorrente
|
||||
VALUES(@Udc, @IdxCella, @CodCs, GETDATE())
|
||||
VALUES(@Udc, @IdxCella, @CodCS, GETDATE())
|
||||
|
||||
|
||||
COMMIT TRAN
|
||||
|
||||
@@ -18,15 +18,15 @@ go
|
||||
****************************************/
|
||||
create PROCEDURE stp_ComAs_lastComandoByStored
|
||||
(
|
||||
@Stored NVARCHAR(100)
|
||||
@Stored NVARCHAR(100)
|
||||
)
|
||||
AS
|
||||
-- restituisce le righe richieste
|
||||
SELECT TOP 1 *
|
||||
FROM RawData.AS400_Comandi
|
||||
WHERE (Stored = @Stored) AND Test = 0
|
||||
ORDER BY DataEsecuzione DESC
|
||||
|
||||
-- restituisce le righe richieste
|
||||
SELECT TOP 1 *
|
||||
FROM RawData.AS400_Comandi
|
||||
WHERE (Stored = @Stored) AND Test = 0
|
||||
ORDER BY DataEsecuzione DESC
|
||||
|
||||
RETURN
|
||||
go
|
||||
|
||||
@@ -151,7 +151,7 @@ AS
|
||||
|
||||
SET @SQL = @SQL + ''' )';
|
||||
|
||||
EXEC sp_executesql @SQL
|
||||
EXEC dbo.sp_executesql @SQL
|
||||
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
|
||||
@@ -94,7 +94,7 @@ AS
|
||||
|
||||
-- prendo ultimo UDC creato x il particolare
|
||||
SELECT TOP 1 * FROM ElencoCartellini
|
||||
WHERE (Particolare= @Particolare) AND CodCs = @CodCS
|
||||
WHERE (Particolare= @Particolare) AND CodCS = @CodCS
|
||||
ORDER BY CreateDate DESC
|
||||
|
||||
RETURN
|
||||
|
||||
@@ -181,7 +181,7 @@ BEGIN TRAN
|
||||
INSERT INTO ElencoCartellini(UDC, CodCS, CodCliente, RagSociale, Particolare, DescParticolare, DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura, DataFus, TurnoFus, CodImballo, CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad, CreateDate, ModDate, Note)
|
||||
VALUES (@UDC, @CodCS, @CodCliente, @RagSociale, @Particolare, @DescParticolare, @DisegnoGrezzo, @Esponente, @CodImpianto, @DescImpianto, @CodStampo, @Figura, @DataFus, @TurnoFus, @CodImballo, @CodSoggetto, @NumCont, @Tara, @Qta, @CodStato, @IdxPosizione, @PesoTot, @PesoCad, GETDATE(), GETDATE(), @Note)
|
||||
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_Parent valido
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_parent valido
|
||||
IF((NOT @UDC_parent IS NULL) AND (NOT @UDC_parent = ''))
|
||||
BEGIN
|
||||
INSERT INTO RelazUDC(UDC_parent, UDC_child)
|
||||
@@ -567,7 +567,7 @@ BEGIN TRAN
|
||||
INSERT INTO ElencoCartellini(UDC, CodCS, CodCliente, RagSociale, Particolare, DescParticolare, DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura, DataFus, TurnoFus, CodImballo, CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad, CreateDate, ModDate, Note)
|
||||
VALUES (@UDC, @CodCS, @CodCliente, @RagSociale, @Particolare, @DescParticolare, @DisegnoGrezzo, @Esponente, @CodImpianto, @DescImpianto, @CodStampo, @Figura, @DataFus, @TurnoFus, @CodImballo, @CodSoggetto, @NumCont, @Tara, @Qta, @CodStato, @IdxPosizione, @PesoTot, @PesoCad, GETDATE(), GETDATE(), @Note)
|
||||
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_Parent valido
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_parent valido
|
||||
IF((NOT @UDC_parent IS NULL) AND (NOT @UDC_parent = ''))
|
||||
BEGIN
|
||||
INSERT INTO RelazUDC(UDC_parent, UDC_child)
|
||||
|
||||
@@ -24,18 +24,18 @@ AS
|
||||
SELECT
|
||||
ElencoCartellini.UDC, ElencoCartellini.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.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,
|
||||
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, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(RilPro.AnagOperatori.Nome, N'') AS nome, ISNULL(AnagStatiProdotto.DescStato, N'') AS DescStato,
|
||||
ISNULL(RilPro.AnagImballi.DescImballo, N'') AS DescImballo, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(ElencoCartellini.Note, N'') AS Note
|
||||
FROM
|
||||
RilPro.AnagParticolari
|
||||
@@ -85,7 +85,7 @@ AS
|
||||
DECLARE @tmp NVARCHAR(500)
|
||||
DECLARE @NoteTratt NVARCHAR(500)
|
||||
SET @tmp = ''
|
||||
SELECT @tmp = @tmp + UDC_PARENT + ' - ' from RelazUDC WHERE UDC_child = @UDC
|
||||
SELECT @tmp = @tmp + UDC_parent + ' - ' from RelazUDC WHERE UDC_child = @UDC
|
||||
|
||||
SET @NoteTratt = (SELECT SUBSTRING(@tmp, 0, LEN(@tmp)))
|
||||
|
||||
@@ -93,18 +93,18 @@ AS
|
||||
SELECT
|
||||
ElencoCartellini.UDC, ElencoCartellini.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.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,
|
||||
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, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(RilPro.AnagOperatori.Nome, N'') AS nome, ISNULL(AnagStatiProdotto.DescStato, N'') AS DescStato,
|
||||
ISNULL(RilPro.AnagImballi.DescImballo, N'') AS DescImballo, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(ElencoCartellini.Note, N'') AS Note, @NoteTratt AS NoteTratt
|
||||
FROM
|
||||
RilPro.AnagParticolari
|
||||
@@ -153,7 +153,7 @@ AS
|
||||
DECLARE @tmp NVARCHAR(500)
|
||||
DECLARE @NoteTratt NVARCHAR(500)
|
||||
SET @tmp = ''
|
||||
SELECT @tmp = @tmp + UDC_PARENT + ' - ' from RelazUDC WHERE UDC_child = @UDC
|
||||
SELECT @tmp = @tmp + UDC_parent + ' - ' from RelazUDC WHERE UDC_child = @UDC
|
||||
|
||||
SET @NoteTratt = (SELECT SUBSTRING(@tmp, 0, LEN(@tmp)))
|
||||
|
||||
@@ -161,18 +161,18 @@ AS
|
||||
SELECT
|
||||
ElencoCartellini.UDC, ElencoCartellini.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.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,
|
||||
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, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(RilPro.AnagOperatori.Nome, N'') AS nome, ISNULL(AnagStatiProdotto.DescStato, N'') AS DescStato,
|
||||
ISNULL(RilPro.AnagImballi.DescImballo, N'') AS DescImballo, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(ElencoCartellini.Note, N'') AS Note, @NoteTratt AS NoteTratt
|
||||
FROM
|
||||
RilPro.AnagParticolari
|
||||
@@ -266,7 +266,7 @@ AS
|
||||
DECLARE @tmp NVARCHAR(500)
|
||||
DECLARE @NoteTratt NVARCHAR(500)
|
||||
SET @tmp = ''
|
||||
SELECT @tmp = @tmp + UDC_PARENT + ' - ' from RelazUDC WHERE UDC_child = @UDC
|
||||
SELECT @tmp = @tmp + UDC_parent + ' - ' from RelazUDC WHERE UDC_child = @UDC
|
||||
|
||||
SET @NoteTratt = (SELECT SUBSTRING(@tmp, 0, LEN(@tmp)))
|
||||
|
||||
@@ -274,18 +274,18 @@ AS
|
||||
SELECT
|
||||
ElencoCartellini.UDC, ElencoCartellini.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.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,
|
||||
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, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(RilPro.AnagOperatori.Nome, N'') AS nome, ISNULL(AnagStatiProdotto.DescStato, N'') AS DescStato,
|
||||
ISNULL(RilPro.AnagImballi.DescImballo, N'') AS DescImballo, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(ElencoCartellini.Note, N'') AS Note, @NoteTratt AS NoteTratt
|
||||
FROM
|
||||
RilPro.AnagParticolari
|
||||
@@ -345,7 +345,7 @@ AS
|
||||
DECLARE @tmp NVARCHAR(500)
|
||||
DECLARE @NoteTratt NVARCHAR(500)
|
||||
SET @tmp = ''
|
||||
SELECT @tmp = @tmp + UDC_PARENT + ' - ' from RelazUDC WHERE UDC_child = @UDC
|
||||
SELECT @tmp = @tmp + UDC_parent + ' - ' from RelazUDC WHERE UDC_child = @UDC
|
||||
|
||||
SET @NoteTratt = (SELECT SUBSTRING(@tmp, 0, LEN(@tmp)))
|
||||
|
||||
@@ -353,18 +353,18 @@ AS
|
||||
SELECT
|
||||
ElencoCartellini.UDC, ElencoCartellini.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.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,
|
||||
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, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(RilPro.AnagOperatori.Nome, N'') AS nome, ISNULL(AnagStatiProdotto.DescStato, N'') AS DescStato,
|
||||
ISNULL(RilPro.AnagImballi.DescImballo, N'') AS DescImballo, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(ElencoCartellini.Note, N'') AS Note, @NoteTratt AS NoteTratt
|
||||
FROM
|
||||
RilPro.AnagParticolari
|
||||
|
||||
@@ -153,7 +153,7 @@ AS
|
||||
DECLARE @tmp NVARCHAR(500)
|
||||
DECLARE @NoteTratt NVARCHAR(500)
|
||||
SET @tmp = ''
|
||||
SELECT TOP 10 @tmp = @tmp + RIGHT(UDC_PARENT,8) + ' - ' from RelazUDC WHERE UDC_child = @UDC
|
||||
SELECT TOP 10 @tmp = @tmp + RIGHT(UDC_parent,8) + ' - ' from RelazUDC WHERE UDC_child = @UDC
|
||||
|
||||
SET @NoteTratt = (SELECT SUBSTRING(@tmp, 0, LEN(@tmp)))
|
||||
|
||||
@@ -161,18 +161,18 @@ AS
|
||||
SELECT
|
||||
ISNULL(ElencoCartellini.UDC, N'0000') 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.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,
|
||||
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, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(RilPro.AnagOperatori.Nome, N'') AS nome, ISNULL(AnagStatiProdotto.DescStato, N'') AS DescStato,
|
||||
ISNULL(RilPro.AnagImballi.DescImballo, N'') AS DescImballo, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(ElencoCartellini.Note, N'') AS Note, ISNULL(@NoteTratt, N'') AS NoteTratt
|
||||
FROM
|
||||
RilPro.AnagParticolari
|
||||
@@ -236,7 +236,7 @@ AS
|
||||
DECLARE @tmp NVARCHAR(500)
|
||||
DECLARE @NoteTratt NVARCHAR(500)
|
||||
SET @tmp = ''
|
||||
SELECT TOP 10 @tmp = @tmp + RIGHT(UDC_PARENT,8) + ' - ' from RelazUDC WHERE UDC_child = @UDC
|
||||
SELECT TOP 10 @tmp = @tmp + RIGHT(UDC_parent,8) + ' - ' from RelazUDC WHERE UDC_child = @UDC
|
||||
|
||||
SET @NoteTratt = (SELECT SUBSTRING(@tmp, 0, LEN(@tmp)))
|
||||
|
||||
@@ -244,18 +244,18 @@ AS
|
||||
SELECT
|
||||
ElencoCartellini.UDC, ElencoCartellini.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.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,
|
||||
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, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(RilPro.AnagOperatori.Nome, N'') AS nome, ISNULL(AnagStatiProdotto.DescStato, N'') AS DescStato,
|
||||
ISNULL(RilPro.AnagImballi.DescImballo, N'') AS DescImballo, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(ElencoCartellini.Note, N'') AS Note, @NoteTratt AS NoteTratt
|
||||
FROM
|
||||
RilPro.AnagParticolari
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
@@ -27,7 +27,7 @@ AS
|
||||
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
|
||||
SELECT TOP 10 @tmp = @tmp + RTRIM(UDC_parent) + ' - ' from RelazUDC WHERE UDC_child = @UDC
|
||||
|
||||
SET @NoteTratt = (SELECT SUBSTRING(@tmp, 0, LEN(@tmp)))
|
||||
|
||||
@@ -37,30 +37,30 @@ AS
|
||||
,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.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.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.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
|
||||
,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(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
|
||||
|
||||
@@ -333,7 +333,7 @@ BEGIN TRAN
|
||||
INSERT INTO ElencoCartellini(UDC, CodCS, CodCliente, RagSociale, Particolare, DescParticolare, DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura, DataFus, TurnoFus, CodImballo, CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad, CreateDate, ModDate, Note)
|
||||
VALUES (@UDC, @CodCS, @CodCliente, @RagSociale, @Particolare, @DescParticolare, @DisegnoGrezzo, @Esponente, @CodImpianto, @DescImpianto, @CodStampo, @Figura, @DataFus, @TurnoFus, @CodImballo, @CodSoggetto, @NumCont, @Tara, @Qta, @CodStato, @IdxPosizione, @PesoTot, @PesoCad, GETDATE(), GETDATE(), @Note)
|
||||
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_Parent valido
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_parent valido
|
||||
IF((NOT @UDC_parent IS NULL) AND (NOT @UDC_parent = ''))
|
||||
BEGIN
|
||||
INSERT INTO RelazUDC(UDC_parent, UDC_child)
|
||||
@@ -441,18 +441,18 @@ AS
|
||||
SELECT
|
||||
ElencoCartellini.UDC, ElencoCartellini.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.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,
|
||||
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, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(RilPro.AnagOperatori.Nome, N'') AS nome, ISNULL(AnagStatiProdotto.DescStato, N'') AS DescStato,
|
||||
ISNULL(RilPro.AnagImballi.DescImballo, N'') AS DescImballo, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(ElencoCartellini.Note, N'') AS Note
|
||||
FROM
|
||||
RilPro.AnagParticolari
|
||||
@@ -553,18 +553,18 @@ AS
|
||||
SELECT
|
||||
ElencoCartellini.UDC, ElencoCartellini.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.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,
|
||||
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, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(RilPro.AnagOperatori.Nome, N'') AS nome, ISNULL(AnagStatiProdotto.DescStato, N'') AS DescStato,
|
||||
ISNULL(RilPro.AnagImballi.DescImballo, N'') AS DescImballo, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(ElencoCartellini.Note, N'') AS Note, @NoteTratt AS NoteTratt
|
||||
FROM
|
||||
RilPro.AnagParticolari
|
||||
@@ -815,7 +815,7 @@ AS
|
||||
DECLARE @tmp NVARCHAR(500)
|
||||
DECLARE @NoteTratt NVARCHAR(500)
|
||||
SET @tmp = ''
|
||||
SELECT TOP 10 @tmp = @tmp + RIGHT(UDC_PARENT,8) + ' - ' from RelazUDC WHERE UDC_child = @UDC
|
||||
SELECT TOP 10 @tmp = @tmp + RIGHT(UDC_parent,8) + ' - ' from RelazUDC WHERE UDC_child = @UDC
|
||||
|
||||
SET @NoteTratt = (SELECT SUBSTRING(@tmp, 0, LEN(@tmp)))
|
||||
|
||||
@@ -823,18 +823,18 @@ AS
|
||||
SELECT
|
||||
ElencoCartellini.UDC, ElencoCartellini.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.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,
|
||||
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, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(RilPro.AnagOperatori.Nome, N'') AS nome, ISNULL(AnagStatiProdotto.DescStato, N'') AS DescStato,
|
||||
ISNULL(RilPro.AnagImballi.DescImballo, N'') AS DescImballo, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(ElencoCartellini.Note, N'') AS Note, @NoteTratt AS NoteTratt
|
||||
FROM
|
||||
RilPro.AnagParticolari
|
||||
@@ -884,7 +884,7 @@ AS
|
||||
DECLARE @tmp NVARCHAR(500)
|
||||
DECLARE @NoteTratt NVARCHAR(500)
|
||||
SET @tmp = ''
|
||||
SELECT TOP 10 @tmp = @tmp + RIGHT(UDC_PARENT,8) + ' - ' from RelazUDC WHERE UDC_child = @UDC
|
||||
SELECT TOP 10 @tmp = @tmp + RIGHT(UDC_parent,8) + ' - ' from RelazUDC WHERE UDC_child = @UDC
|
||||
|
||||
SET @NoteTratt = (SELECT SUBSTRING(@tmp, 0, LEN(@tmp)))
|
||||
|
||||
@@ -892,18 +892,18 @@ AS
|
||||
SELECT
|
||||
ISNULL(ElencoCartellini.UDC, N'0000') 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.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,
|
||||
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, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(RilPro.AnagOperatori.Nome, N'') AS nome, ISNULL(AnagStatiProdotto.DescStato, N'') AS DescStato,
|
||||
ISNULL(RilPro.AnagImballi.DescImballo, N'') AS DescImballo, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(ElencoCartellini.Note, N'') AS Note, ISNULL(@NoteTratt, N'') AS NoteTratt
|
||||
FROM
|
||||
RilPro.AnagParticolari
|
||||
@@ -1089,7 +1089,7 @@ BEGIN TRAN
|
||||
INSERT INTO ElencoCartellini(UDC, CodCS, CodCliente, RagSociale, Particolare, DescParticolare, DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura, DataFus, TurnoFus, CodImballo, CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad, CreateDate, ModDate, Note)
|
||||
VALUES (@UDC, @CodCS, @CodCliente, @RagSociale, @Particolare, @DescParticolare, @DisegnoGrezzo, @Esponente, @CodImpianto, @DescImpianto, @CodStampo, @Figura, @DataFus, @TurnoFus, @CodImballo, @CodSoggetto, @NumCont, @Tara, @Qta, @CodStato, @IdxPosizione, @PesoTot, @PesoCad, GETDATE(), GETDATE(), @Note)
|
||||
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_Parent valido
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_parent valido
|
||||
IF((NOT @UDC_parent IS NULL) AND (NOT @UDC_parent = ''))
|
||||
BEGIN
|
||||
INSERT INTO RelazUDC(UDC_parent, UDC_child)
|
||||
|
||||
@@ -414,18 +414,18 @@ AS
|
||||
SELECT
|
||||
ElencoCartellini.UDC, ElencoCartellini.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.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,
|
||||
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, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(RilPro.AnagOperatori.Nome, N'') AS nome, ISNULL(AnagStatiProdotto.DescStato, N'') AS DescStato,
|
||||
ISNULL(RilPro.AnagImballi.DescImballo, N'') AS DescImballo, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(ElencoCartellini.Note, N'') AS Note, @NoteTratt AS NoteTratt
|
||||
FROM
|
||||
RilPro.AnagParticolari
|
||||
@@ -603,7 +603,7 @@ AS
|
||||
DECLARE @CodEvento VARCHAR(10)
|
||||
DECLARE @CodTipoDichiaraz VARCHAR(1)
|
||||
DECLARE @IdxCella INT
|
||||
DECLARE @CodCs NVARCHAR(2)
|
||||
DECLARE @CodCS NVARCHAR(2)
|
||||
|
||||
SET @CodEvento = 'UDC_RIA'
|
||||
SET @CodTipoDichiaraz = 'U'
|
||||
@@ -622,9 +622,9 @@ BEGIN TRAN
|
||||
|
||||
-- imposto posizione CELLA corrente x l'udc nella prima libera
|
||||
SET @IdxCella = (SELECT c.IdxCella FROM Celle c inner join Blocchi b ON c.IdxBlocco=b.IdxBlocco INNER JOIN ElencoCartellini e ON b.CodMag = CAST(e.IdxPosizione AS NVARCHAR(50)) WHERE e.UDC = @UDC)
|
||||
SET @CodCs = (SELECT CodCs FROM ElencoCartellini WHERE UDC = @UDC)
|
||||
SET @CodCS = (SELECT CodCS FROM ElencoCartellini WHERE UDC = @UDC)
|
||||
INSERT INTO PosizioneUdcCorrente
|
||||
VALUES(@Udc, @IdxCella, @CodCs, GETDATE())
|
||||
VALUES(@Udc, @IdxCella, @CodCS, GETDATE())
|
||||
|
||||
|
||||
COMMIT TRAN
|
||||
@@ -1052,7 +1052,7 @@ AS
|
||||
|
||||
-- prendo ultimo UDC creato x il particolare
|
||||
SELECT TOP 1 * FROM ElencoCartellini
|
||||
WHERE (Particolare= @Particolare) AND CodCs = @CodCS
|
||||
WHERE (Particolare= @Particolare) AND CodCS = @CodCS
|
||||
ORDER BY CreateDate DESC
|
||||
|
||||
RETURN
|
||||
|
||||
+48
-48
@@ -408,18 +408,18 @@ AS
|
||||
SELECT
|
||||
ElencoCartellini.UDC, ElencoCartellini.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.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,
|
||||
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, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(RilPro.AnagOperatori.Nome, N'') AS nome, ISNULL(AnagStatiProdotto.DescStato, N'') AS DescStato,
|
||||
ISNULL(RilPro.AnagImballi.DescImballo, N'') AS DescImballo, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(ElencoCartellini.Note, N'') AS Note, @NoteTratt AS NoteTratt
|
||||
FROM
|
||||
RilPro.AnagParticolari
|
||||
@@ -520,7 +520,7 @@ AS
|
||||
DECLARE @tmp NVARCHAR(500)
|
||||
DECLARE @NoteTratt NVARCHAR(500)
|
||||
SET @tmp = ''
|
||||
SELECT TOP 10 @tmp = @tmp + RIGHT(UDC_PARENT,8) + ' - ' from RelazUDC WHERE UDC_child = @UDC
|
||||
SELECT TOP 10 @tmp = @tmp + RIGHT(UDC_parent,8) + ' - ' from RelazUDC WHERE UDC_child = @UDC
|
||||
|
||||
SET @NoteTratt = (SELECT SUBSTRING(@tmp, 0, LEN(@tmp)))
|
||||
|
||||
@@ -528,18 +528,18 @@ AS
|
||||
SELECT
|
||||
ElencoCartellini.UDC, ElencoCartellini.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.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,
|
||||
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, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(RilPro.AnagOperatori.Nome, N'') AS nome, ISNULL(AnagStatiProdotto.DescStato, N'') AS DescStato,
|
||||
ISNULL(RilPro.AnagImballi.DescImballo, N'') AS DescImballo, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(ElencoCartellini.Note, N'') AS Note, @NoteTratt AS NoteTratt
|
||||
FROM
|
||||
RilPro.AnagParticolari
|
||||
@@ -595,7 +595,7 @@ AS
|
||||
DECLARE @tmp NVARCHAR(500)
|
||||
DECLARE @NoteTratt NVARCHAR(500)
|
||||
SET @tmp = ''
|
||||
SELECT TOP 10 @tmp = @tmp + RIGHT(UDC_PARENT,8) + ' - ' from RelazUDC WHERE UDC_child = @UDC
|
||||
SELECT TOP 10 @tmp = @tmp + RIGHT(UDC_parent,8) + ' - ' from RelazUDC WHERE UDC_child = @UDC
|
||||
|
||||
SET @NoteTratt = (SELECT SUBSTRING(@tmp, 0, LEN(@tmp)))
|
||||
|
||||
@@ -603,18 +603,18 @@ AS
|
||||
SELECT
|
||||
ISNULL(ElencoCartellini.UDC, N'0000') 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.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,
|
||||
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, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(RilPro.AnagOperatori.Nome, N'') AS nome, ISNULL(AnagStatiProdotto.DescStato, N'') AS DescStato,
|
||||
ISNULL(RilPro.AnagImballi.DescImballo, N'') AS DescImballo, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(ElencoCartellini.Note, N'') AS Note, ISNULL(@NoteTratt, N'') AS NoteTratt
|
||||
FROM
|
||||
RilPro.AnagParticolari
|
||||
@@ -833,18 +833,18 @@ AS
|
||||
SELECT
|
||||
ElencoCartellini.UDC, ElencoCartellini.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.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,
|
||||
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, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(RilPro.AnagOperatori.Nome, N'') AS nome, ISNULL(AnagStatiProdotto.DescStato, N'') AS DescStato,
|
||||
ISNULL(RilPro.AnagImballi.DescImballo, N'') AS DescImballo, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(ElencoCartellini.Note, N'') AS Note
|
||||
FROM
|
||||
RilPro.AnagParticolari
|
||||
@@ -1057,7 +1057,7 @@ AS
|
||||
|
||||
-- prendo ultimo UDC creato x il particolare
|
||||
SELECT TOP 1 * FROM ElencoCartellini
|
||||
WHERE (Particolare= @Particolare) AND CodCs = @CodCS
|
||||
WHERE (Particolare= @Particolare) AND CodCS = @CodCS
|
||||
ORDER BY CreateDate DESC
|
||||
|
||||
RETURN
|
||||
@@ -2134,7 +2134,7 @@ BEGIN TRAN
|
||||
INSERT INTO ElencoCartellini(UDC, CodCS, CodCliente, RagSociale, Particolare, DescParticolare, DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura, DataFus, TurnoFus, CodImballo, CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad, CreateDate, ModDate, Note)
|
||||
VALUES (@UDC, @CodCS, @CodCliente, @RagSociale, @Particolare, @DescParticolare, @DisegnoGrezzo, @Esponente, @CodImpianto, @DescImpianto, @CodStampo, @Figura, @DataFus, @TurnoFus, @CodImballo, @CodSoggetto, @NumCont, @Tara, @Qta, @CodStato, @IdxPosizione, @PesoTot, @PesoCad, GETDATE(), GETDATE(), @Note)
|
||||
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_Parent valido
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_parent valido
|
||||
IF((NOT @UDC_parent IS NULL) AND (NOT @UDC_parent = ''))
|
||||
BEGIN
|
||||
INSERT INTO RelazUDC(UDC_parent, UDC_child)
|
||||
@@ -2351,7 +2351,7 @@ BEGIN TRAN
|
||||
INSERT INTO ElencoCartellini(UDC, CodCS, CodCliente, RagSociale, Particolare, DescParticolare, DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura, DataFus, TurnoFus, CodImballo, CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad, CreateDate, ModDate, Note)
|
||||
VALUES (@UDC, @CodCS, @CodCliente, @RagSociale, @Particolare, @DescParticolare, @DisegnoGrezzo, @Esponente, @CodImpianto, @DescImpianto, @CodStampo, @Figura, @DataFus, @TurnoFus, @CodImballo, @CodSoggetto, @NumCont, @Tara, @Qta, @CodStato, @IdxPosizione, @PesoTot, @PesoCad, GETDATE(), GETDATE(), @Note)
|
||||
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_Parent valido
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_parent valido
|
||||
IF((NOT @UDC_parent IS NULL) AND (NOT @UDC_parent = ''))
|
||||
BEGIN
|
||||
INSERT INTO RelazUDC(UDC_parent, UDC_child)
|
||||
@@ -2692,7 +2692,7 @@ AS
|
||||
DECLARE @CodEvento VARCHAR(10)
|
||||
DECLARE @CodTipoDichiaraz VARCHAR(1)
|
||||
DECLARE @IdxCella INT
|
||||
DECLARE @CodCs NVARCHAR(2)
|
||||
DECLARE @CodCS NVARCHAR(2)
|
||||
|
||||
SET @CodEvento = 'UDC_RIA'
|
||||
SET @CodTipoDichiaraz = 'U'
|
||||
@@ -2711,9 +2711,9 @@ BEGIN TRAN
|
||||
|
||||
-- imposto posizione CELLA corrente x l'udc nella prima libera
|
||||
SET @IdxCella = (SELECT c.IdxCella FROM Celle c inner join Blocchi b ON c.IdxBlocco=b.IdxBlocco INNER JOIN ElencoCartellini e ON b.CodMag = CAST(e.IdxPosizione AS NVARCHAR(50)) WHERE e.UDC = @UDC)
|
||||
SET @CodCs = (SELECT CodCs FROM ElencoCartellini WHERE UDC = @UDC)
|
||||
SET @CodCS = (SELECT CodCS FROM ElencoCartellini WHERE UDC = @UDC)
|
||||
INSERT INTO PosizioneUdcCorrente
|
||||
VALUES(@Udc, @IdxCella, @CodCs, GETDATE())
|
||||
VALUES(@Udc, @IdxCella, @CodCS, GETDATE())
|
||||
|
||||
|
||||
COMMIT TRAN
|
||||
|
||||
@@ -142,9 +142,9 @@ BEGIN
|
||||
BEGIN
|
||||
-- controllo che CI SIA il particolare (altrimenti non eseguo)
|
||||
IF(@partOk = 1)
|
||||
-- Prendo la idxposizione e qta precedente
|
||||
-- Prendo la IdxPosizione e qta precedente
|
||||
SELECT @qtaOld = Qta , @IdxPosFrom = IdxPosizione FROM deleted WHERE UDC = @currUdc
|
||||
-- Prendo la idxposizione e qta nuova
|
||||
-- Prendo la IdxPosizione e qta nuova
|
||||
SELECT @qta = Qta , @IdxPosTo = IdxPosizione FROM inserted WHERE UDC = @currUdc
|
||||
|
||||
-- se c'è stata modifica di quantità inizio a rettificare quella
|
||||
|
||||
@@ -153,9 +153,9 @@ BEGIN
|
||||
BEGIN
|
||||
-- controllo che CI SIA il particolare (altrimenti non eseguo)
|
||||
IF(@partOk = 1)
|
||||
-- Prendo la idxposizione e qta precedente
|
||||
-- Prendo la IdxPosizione e qta precedente
|
||||
SELECT @qtaOld = Qta , @IdxPosFrom = IdxPosizione FROM deleted WHERE UDC = @currUdc
|
||||
-- Prendo la idxposizione e qta nuova
|
||||
-- Prendo la IdxPosizione e qta nuova
|
||||
SELECT @qta = Qta , @IdxPosTo = IdxPosizione FROM inserted WHERE UDC = @currUdc
|
||||
|
||||
-- se c'è stata modifica di quantità inizio a rettificare quella
|
||||
|
||||
@@ -245,8 +245,8 @@ BEGIN
|
||||
*
|
||||
* regola1: si fanno registrazioni solo se varia ALMENO UNO tra
|
||||
* - quantità
|
||||
* - idxPosizione
|
||||
* - codStato
|
||||
* - IdxPosizione
|
||||
* - CodStato
|
||||
*
|
||||
* regola 2:
|
||||
* - Particolare deve essere valorizzato ALMENO a '' (blank)
|
||||
@@ -642,8 +642,8 @@ BEGIN
|
||||
*
|
||||
* regola1: si fanno registrazioni solo se varia ALMENO UNO tra
|
||||
* - quantità
|
||||
* - idxPosizione
|
||||
* - codStato
|
||||
* - IdxPosizione
|
||||
* - CodStato
|
||||
*
|
||||
* regola 2:
|
||||
* - Particolare deve essere valorizzato ALMENO a '' (blank)
|
||||
@@ -916,7 +916,7 @@ BEGIN TRAN
|
||||
INSERT INTO ElencoCartellini(UDC, CodCS, CodCliente, RagSociale, Particolare, DescParticolare, DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura, DataFus, TurnoFus, CodImballo, CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad, CreateDate, ModDate, Note, CodEvento)
|
||||
VALUES (@UDC, @CodCS, @CodCliente, @RagSociale, @Particolare, @DescParticolare, @DisegnoGrezzo, @Esponente, @CodImpianto, @DescImpianto, @CodStampo, @Figura, @DataFus, @TurnoFus, @CodImballo, @CodSoggetto, @NumCont, @Tara, @Qta, @CodStato, @IdxPosizione, @PesoTot, @PesoCad, GETDATE(), GETDATE(), @Note, @CodEvento)
|
||||
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_Parent valido
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_parent valido
|
||||
IF((NOT @UDC_parent IS NULL) AND (NOT @UDC_parent = ''))
|
||||
BEGIN
|
||||
INSERT INTO RelazUDC(UDC_parent, UDC_child)
|
||||
@@ -1097,7 +1097,7 @@ CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad, Creat
|
||||
|
||||
@Note, @CodEvento)
|
||||
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_Parent valido
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_parent valido
|
||||
IF((NOT @UDC_parent IS NULL) AND (NOT @UDC_parent = ''))
|
||||
BEGIN
|
||||
INSERT INTO RelazUDC(UDC_parent, UDC_child)
|
||||
|
||||
@@ -434,8 +434,8 @@ BEGIN
|
||||
*
|
||||
* regola1: si fanno registrazioni solo se varia ALMENO UNO tra
|
||||
* - quantità
|
||||
* - idxPosizione
|
||||
* - codStato
|
||||
* - IdxPosizione
|
||||
* - CodStato
|
||||
*
|
||||
* regola 2:
|
||||
* - Particolare deve essere valorizzato ALMENO a '' (blank)
|
||||
|
||||
@@ -281,7 +281,7 @@ AS
|
||||
DECLARE @CodEvento VARCHAR(10)
|
||||
DECLARE @CodTipoDichiaraz VARCHAR(1)
|
||||
DECLARE @IdxCella INT
|
||||
DECLARE @CodCs NVARCHAR(2)
|
||||
DECLARE @CodCS NVARCHAR(2)
|
||||
|
||||
SET @CodEvento = 'UDC_RIA'
|
||||
SET @CodTipoDichiaraz = 'U'
|
||||
@@ -303,9 +303,9 @@ BEGIN TRAN
|
||||
|
||||
-- imposto posizione CELLA corrente x l'udc nella prima libera
|
||||
SET @IdxCella = (SELECT c.IdxCella FROM Celle c inner join Blocchi b ON c.IdxBlocco=b.IdxBlocco INNER JOIN ElencoCartellini e ON b.CodMag = CAST(e.IdxPosizione AS NVARCHAR(50)) WHERE e.UDC = @UDC)
|
||||
SET @CodCs = (SELECT CodCs FROM ElencoCartellini WHERE UDC = @UDC)
|
||||
SET @CodCS = (SELECT CodCS FROM ElencoCartellini WHERE UDC = @UDC)
|
||||
INSERT INTO PosizioneUdcCorrente
|
||||
VALUES(@Udc, @IdxCella, @CodCs, GETDATE())
|
||||
VALUES(@Udc, @IdxCella, @CodCS, GETDATE())
|
||||
|
||||
|
||||
COMMIT TRAN
|
||||
|
||||
@@ -25,10 +25,10 @@ go
|
||||
begin transaction;
|
||||
go
|
||||
|
||||
drop index i_idxPosizione on ElencoCartellini;
|
||||
drop index i_IdxPosizione on ElencoCartellini;
|
||||
go
|
||||
|
||||
create index i_idxPosizione on ElencoCartellini(IdxPosizione,CodCS)
|
||||
create index i_IdxPosizione on ElencoCartellini(IdxPosizione,CodCS)
|
||||
include(Particolare);
|
||||
go
|
||||
|
||||
|
||||
@@ -60,10 +60,10 @@ go
|
||||
begin transaction;
|
||||
go
|
||||
|
||||
drop index i_idxPosizione on ElencoCartellini;
|
||||
drop index i_IdxPosizione on ElencoCartellini;
|
||||
go
|
||||
|
||||
create index i_idxPosizione on ElencoCartellini(IdxPosizione,CodCS)
|
||||
create index i_IdxPosizione on ElencoCartellini(IdxPosizione,CodCS)
|
||||
include(Particolare);
|
||||
go
|
||||
|
||||
@@ -333,7 +333,7 @@ BEGIN
|
||||
IF ( SELECT COUNT(*) FROM inserted ) = 0
|
||||
SET @FlaStoricizza = 1 ;
|
||||
|
||||
-- devo EVITARE di salvare se c'è solo modifica del codSoggetto...
|
||||
-- devo EVITARE di salvare se c'è solo modifica del CodSoggetto...
|
||||
IF( UPDATE(UDC) OR UPDATE(IdxCella) OR UPDATE(CodCS) OR UPDATE(DataRif) )
|
||||
SET @FlaStoricizza = 1;
|
||||
|
||||
|
||||
@@ -569,18 +569,18 @@ AS
|
||||
SELECT
|
||||
ElencoCartellini.UDC, ElencoCartellini.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.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,
|
||||
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, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(RilPro.AnagOperatori.Nome, N'') AS nome, ISNULL(AnagStatiProdotto.DescStato, N'') AS DescStato,
|
||||
ISNULL(RilPro.AnagImballi.DescImballo, N'') AS DescImballo, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(ElencoCartellini.Note, N'') AS Note, @NoteTratt AS NoteTratt
|
||||
FROM
|
||||
RilPro.AnagParticolari
|
||||
@@ -643,7 +643,7 @@ AS
|
||||
DECLARE @CodEvento VARCHAR(10)
|
||||
DECLARE @CodTipoDichiaraz VARCHAR(1)
|
||||
DECLARE @IdxCella INT
|
||||
DECLARE @CodCs NVARCHAR(2)
|
||||
DECLARE @CodCS NVARCHAR(2)
|
||||
|
||||
SET @UDC = UPPER(@UDC) -- metto ad Upper nel caso venga passato in minuscolo ( es. da terminalino )
|
||||
|
||||
@@ -667,9 +667,9 @@ BEGIN TRAN
|
||||
|
||||
-- imposto posizione CELLA corrente x l'udc nella prima libera
|
||||
SET @IdxCella = (SELECT c.IdxCella FROM Celle c inner join Blocchi b ON c.IdxBlocco=b.IdxBlocco INNER JOIN ElencoCartellini e ON b.CodMag = CAST(e.IdxPosizione AS NVARCHAR(50)) WHERE e.UDC = @UDC)
|
||||
SET @CodCs = (SELECT CodCs FROM ElencoCartellini WHERE UDC = @UDC)
|
||||
SET @CodCS = (SELECT CodCS FROM ElencoCartellini WHERE UDC = @UDC)
|
||||
INSERT INTO PosizioneUdcCorrente(UDC, IdxCella, CodCS, DataRif, CodSoggetto)
|
||||
VALUES(@Udc, @IdxCella, @CodCs, GETDATE(), @CodSoggetto)
|
||||
VALUES(@Udc, @IdxCella, @CodCS, GETDATE(), @CodSoggetto)
|
||||
|
||||
|
||||
COMMIT TRAN
|
||||
@@ -1446,7 +1446,7 @@ BEGIN TRAN
|
||||
INSERT INTO ElencoCartellini(UDC, CodCS, CodCliente, RagSociale, Particolare, DescParticolare, DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura, DataFus, TurnoFus, CodImballo, CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad, CreateDate, ModDate, Note, CodEvento)
|
||||
VALUES (@UDC, @CodCS, @CodCliente, @RagSociale, @Particolare, @DescParticolare, @DisegnoGrezzo, @Esponente, @CodImpianto, @DescImpianto, @CodStampo, @Figura, @DataFus, @TurnoFus, @CodImballo, @CodSoggetto, @NumCont, @Tara, @Qta, @CodStato, @IdxPosizione, @PesoTot, @PesoCad, GETDATE(), GETDATE(), @Note, @CodEvento)
|
||||
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_Parent valido
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_parent valido
|
||||
IF((NOT @UDC_parent IS NULL) AND (NOT @UDC_parent = ''))
|
||||
BEGIN
|
||||
INSERT INTO RelazUDC(UDC_parent, UDC_child)
|
||||
@@ -1520,7 +1520,7 @@ COMMIT TRAN
|
||||
|
||||
-- inserisco il cartellino nella prima cella della posizione indicata...
|
||||
INSERT INTO PosizioneUdcCorrente(UDC, IdxCella, CodCS, DataRif, CodSoggetto)
|
||||
VALUES(@Udc, @IdxCella, @CodCs, GETDATE(), @CodSoggetto)
|
||||
VALUES(@Udc, @IdxCella, @CodCS, GETDATE(), @CodSoggetto)
|
||||
------------------------------------------------------------------------------------------------------
|
||||
|
||||
|
||||
@@ -1674,7 +1674,7 @@ CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad, Creat
|
||||
|
||||
@Note, @CodEvento)
|
||||
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_Parent valido
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_parent valido
|
||||
IF((NOT @UDC_parent IS NULL) AND (NOT @UDC_parent = ''))
|
||||
BEGIN
|
||||
INSERT INTO RelazUDC(UDC_parent, UDC_child)
|
||||
@@ -1747,7 +1747,7 @@ COMMIT TRAN
|
||||
|
||||
-- inserisco il cartellino nella prima cella della posizione indicata..
|
||||
INSERT INTO PosizioneUdcCorrente(UDC, IdxCella, CodCS, DataRif, CodSoggetto)
|
||||
VALUES(@Udc, @IdxCella, @CodCs, GETDATE(), @CodSoggetto)
|
||||
VALUES(@Udc, @IdxCella, @CodCS, GETDATE(), @CodSoggetto)
|
||||
------------------------------------------------------------------------------------------------------
|
||||
|
||||
------------------------------------------------------------------------------------------------------
|
||||
|
||||
@@ -83,7 +83,7 @@ BEGIN
|
||||
-- interfering with SELECT statements.
|
||||
SET NOCOUNT ON;
|
||||
|
||||
-- devo EVITARE di salvare se c'è solo modifica del codSoggetto...
|
||||
-- devo EVITARE di salvare se c'è solo modifica del CodSoggetto...
|
||||
IF( UPDATE(UDC) OR UPDATE(IdxCella) OR UPDATE(CodCS) OR UPDATE(DataRif) )
|
||||
BEGIN
|
||||
-- metto in storico la posizione attuale dell'UDC (SE esiste) CANCELLATO
|
||||
@@ -128,7 +128,7 @@ AS
|
||||
DECLARE @CodEvento VARCHAR(10)
|
||||
DECLARE @CodTipoDichiaraz VARCHAR(1)
|
||||
DECLARE @IdxCella INT
|
||||
DECLARE @CodCs NVARCHAR(2)
|
||||
DECLARE @CodCS NVARCHAR(2)
|
||||
|
||||
SET @UDC = UPPER(@UDC) -- metto ad Upper nel caso venga passato in minuscolo ( es. da terminalino )
|
||||
|
||||
@@ -152,9 +152,9 @@ BEGIN TRAN
|
||||
|
||||
-- imposto posizione CELLA corrente x l'udc nella prima libera
|
||||
SET @IdxCella = (SELECT c.IdxCella FROM Celle c inner join Blocchi b ON c.IdxBlocco=b.IdxBlocco INNER JOIN ElencoCartellini e ON b.CodMag = CAST(e.IdxPosizione AS NVARCHAR(50)) WHERE e.UDC = @UDC)
|
||||
SET @CodCs = (SELECT CodCs FROM ElencoCartellini WHERE UDC = @UDC)
|
||||
SET @CodCS = (SELECT CodCS FROM ElencoCartellini WHERE UDC = @UDC)
|
||||
INSERT INTO PosizioneUdcCorrente(UDC, IdxCella, CodCS, DataRif, CodSoggetto)
|
||||
VALUES(@Udc, @IdxCella, @CodCs, GETDATE(), @CodSoggetto)
|
||||
VALUES(@Udc, @IdxCella, @CodCS, GETDATE(), @CodSoggetto)
|
||||
|
||||
|
||||
COMMIT TRAN
|
||||
@@ -539,7 +539,7 @@ BEGIN TRAN
|
||||
INSERT INTO ElencoCartellini(UDC, CodCS, CodCliente, RagSociale, Particolare, DescParticolare, DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura, DataFus, TurnoFus, CodImballo, CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad, CreateDate, ModDate, Note, CodEvento)
|
||||
VALUES (@UDC, @CodCS, @CodCliente, @RagSociale, @Particolare, @DescParticolare, @DisegnoGrezzo, @Esponente, @CodImpianto, @DescImpianto, @CodStampo, @Figura, @DataFus, @TurnoFus, @CodImballo, @CodSoggetto, @NumCont, @Tara, @Qta, @CodStato, @IdxPosizione, @PesoTot, @PesoCad, GETDATE(), GETDATE(), @Note, @CodEvento)
|
||||
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_Parent valido
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_parent valido
|
||||
IF((NOT @UDC_parent IS NULL) AND (NOT @UDC_parent = ''))
|
||||
BEGIN
|
||||
INSERT INTO RelazUDC(UDC_parent, UDC_child)
|
||||
@@ -566,7 +566,7 @@ COMMIT TRAN
|
||||
)
|
||||
-- inserisco il cartellino nella prima cella della posizione indicata...
|
||||
INSERT INTO PosizioneUdcCorrente(UDC, IdxCella, CodCS, DataRif, CodSoggetto)
|
||||
VALUES(@Udc, @IdxCella, @CodCs, GETDATE(), @CodSoggetto)
|
||||
VALUES(@Udc, @IdxCella, @CodCS, GETDATE(), @CodSoggetto)
|
||||
------------------------------------------------------------------------------------------------------
|
||||
|
||||
|
||||
@@ -720,7 +720,7 @@ CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad, Creat
|
||||
|
||||
@Note, @CodEvento)
|
||||
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_Parent valido
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_parent valido
|
||||
IF((NOT @UDC_parent IS NULL) AND (NOT @UDC_parent = ''))
|
||||
BEGIN
|
||||
INSERT INTO RelazUDC(UDC_parent, UDC_child)
|
||||
@@ -749,7 +749,7 @@ c.IdxBlocco=b.IdxBlocco
|
||||
)
|
||||
-- inserisco il cartellino nella prima cella della posizione indicata..
|
||||
INSERT INTO PosizioneUdcCorrente(UDC, IdxCella, CodCS, DataRif, CodSoggetto)
|
||||
VALUES(@Udc, @IdxCella, @CodCs, GETDATE(), @CodSoggetto)
|
||||
VALUES(@Udc, @IdxCella, @CodCS, GETDATE(), @CodSoggetto)
|
||||
------------------------------------------------------------------------------------------------------
|
||||
|
||||
------------------------------------------------------------------------------------------------------
|
||||
|
||||
@@ -290,7 +290,7 @@ BEGIN
|
||||
IF ( SELECT COUNT(*) FROM inserted ) = 0
|
||||
SET @FlaStoricizza = 1 ;
|
||||
|
||||
-- devo EVITARE di salvare se c'è solo modifica del codSoggetto...
|
||||
-- devo EVITARE di salvare se c'è solo modifica del CodSoggetto...
|
||||
IF( UPDATE(UDC) OR UPDATE(IdxCella) OR UPDATE(CodCS) OR UPDATE(DataRif) )
|
||||
SET @FlaStoricizza = 1;
|
||||
|
||||
|
||||
@@ -33,7 +33,7 @@ begin transaction
|
||||
go
|
||||
|
||||
UPDATE AnagPosizioni
|
||||
set idxposizione=3
|
||||
set IdxPosizione=3
|
||||
WHERE IdxPosizione=7
|
||||
go
|
||||
|
||||
@@ -248,7 +248,7 @@ BEGIN TRAN
|
||||
INSERT INTO ElencoCartellini(UDC, CodCS, CodCliente, RagSociale, Particolare, DescParticolare, DisegnoGrezzo, Esponente, CodImpianto, DescImpianto, CodStampo, Figura, DataFus, TurnoFus, CodImballo, CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad, CreateDate, ModDate, Note, CodEvento)
|
||||
VALUES (@UDC, @CodCS, @CodCliente, @RagSociale, @Particolare, @DescParticolare, @DisegnoGrezzo, @Esponente, @CodImpianto, @DescImpianto, @CodStampo, @Figura, @DataFus, @TurnoFus, @CodImballo, @CodSoggetto, @NumCont, @Tara, @Qta, @CodStato, @IdxPosizione, @PesoTot, @PesoCad, GETDATE(), GETDATE(), @Note, @CodEvento)
|
||||
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_Parent valido
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_parent valido
|
||||
IF((NOT @UDC_parent IS NULL) AND (NOT @UDC_parent = ''))
|
||||
BEGIN
|
||||
INSERT INTO RelazUDC(UDC_parent, UDC_child)
|
||||
@@ -322,7 +322,7 @@ COMMIT TRAN
|
||||
|
||||
-- inserisco il cartellino nella prima cella della posizione indicata...
|
||||
INSERT INTO PosizioneUdcCorrente(UDC, IdxCella, CodCS, DataRif, CodSoggetto)
|
||||
VALUES(@Udc, @IdxCella, @CodCs, GETDATE(), @CodSoggetto)
|
||||
VALUES(@Udc, @IdxCella, @CodCS, GETDATE(), @CodSoggetto)
|
||||
------------------------------------------------------------------------------------------------------
|
||||
|
||||
|
||||
@@ -476,7 +476,7 @@ CodSoggetto, NumCont, Tara, Qta, CodStato, IdxPosizione, PesoTot, PesoCad, Creat
|
||||
|
||||
@Note, @CodEvento)
|
||||
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_Parent valido
|
||||
-- inserisco relazione parent-child tra UDC vecchio (tara) e nuovo (pesa) SSE UDC_parent valido
|
||||
IF((NOT @UDC_parent IS NULL) AND (NOT @UDC_parent = ''))
|
||||
BEGIN
|
||||
INSERT INTO RelazUDC(UDC_parent, UDC_child)
|
||||
@@ -549,7 +549,7 @@ COMMIT TRAN
|
||||
|
||||
-- inserisco il cartellino nella prima cella della posizione indicata..
|
||||
INSERT INTO PosizioneUdcCorrente(UDC, IdxCella, CodCS, DataRif, CodSoggetto)
|
||||
VALUES(@Udc, @IdxCella, @CodCs, GETDATE(), @CodSoggetto)
|
||||
VALUES(@Udc, @IdxCella, @CodCS, GETDATE(), @CodSoggetto)
|
||||
------------------------------------------------------------------------------------------------------
|
||||
|
||||
------------------------------------------------------------------------------------------------------
|
||||
|
||||
@@ -156,18 +156,18 @@ AS
|
||||
SELECT
|
||||
ElencoCartellini.UDC, ElencoCartellini.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.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,
|
||||
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, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(RilPro.AnagOperatori.Nome, N'') AS nome, ISNULL(AnagStatiProdotto.DescStato, N'') AS DescStato,
|
||||
ISNULL(RilPro.AnagImballi.DescImballo, N'') AS DescImballo, RilPro.AnagParticolari.CodFamiglia, RilPro.AnagFamiglie.DescFamiglia,
|
||||
ISNULL(ElencoCartellini.Note, N'') AS Note, @NoteTratt AS NoteTratt
|
||||
FROM
|
||||
RilPro.AnagParticolari
|
||||
|
||||
@@ -65,7 +65,7 @@ CREATE TABLE [RawData].[tmp_rg_xx_BORI202J]
|
||||
|
||||
-- Add a new column to the table BORI202J
|
||||
ALTER TABLE RawData.BORI202J
|
||||
ADD ECLAQP NCHAR(1) NOT NULL DEFAULT ''
|
||||
ADD ECLAQP NCHAR(1) NOT NULL DEFAULT ''
|
||||
,EPNETT NUMERIC(7,3) NOT NULL DEFAULT 0
|
||||
,FCDI01 NVARCHAR(35) NOT NULL DEFAULT ''
|
||||
,OCDODM VARCHAR(15) NOT NULL DEFAULT ''
|
||||
@@ -274,7 +274,7 @@ ALTER PROCEDURE [dbo].[stp_BORI_caricaDatiBolla]
|
||||
)
|
||||
AS
|
||||
|
||||
SET NOCOUNT ON;
|
||||
SET NOCOUNT ON;
|
||||
|
||||
--DECLARE @RaggrMagazz AS NVARCHAR(2) = N'TK'
|
||||
--DECLARE @GruppoBolle AS NVARCHAR(1) = N'0'
|
||||
@@ -370,9 +370,9 @@ AS
|
||||
|
||||
SET @SQL = @SQL + ''' )';
|
||||
|
||||
EXEC sp_executesql @SQL
|
||||
EXEC dbo.sp_executesql @SQL
|
||||
|
||||
END TRY
|
||||
END TRY
|
||||
BEGIN CATCH
|
||||
-- PRINT ERROR_NUMBER()
|
||||
SET @SqlOK = ERROR_NUMBER();
|
||||
|
||||
@@ -338,7 +338,7 @@ IF(@particolare = '' OR @particolare='*' OR @particolare IS NULL)
|
||||
TipoCella.Capienza * Blocchi.NumX * Blocchi.NumY * Blocchi.NumZ AS TotCelle,
|
||||
TipoCella.Capienza * COUNT( DISTINCT ( CASE WHEN Celle.Attiva = 1 THEN Celle.IdxCella
|
||||
ELSE NULL END ) ) AS CelleAttive,
|
||||
COUNT( PosizioneUdcCorrente.UDC )AS CelleOccupate,
|
||||
COUNT( PosizioneUdcCorrente.UDC) AS CelleOccupate,
|
||||
-- COUNT( CASE WHEN Celle.Attiva = 1 THEN PosizioneUdcCorrente.UDC ELSE NULL END ) AS CelleAttiveOccupate,
|
||||
-- CelleLibere = CelleAttive - CelleOccupate ( solo se attive )
|
||||
( TipoCella.Capienza * COUNT( DISTINCT ( CASE WHEN Celle.Attiva = 1
|
||||
|
||||
@@ -114,7 +114,7 @@ DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'chkShowMtzPrev'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'chkShowOnlyMacchFerma'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'clonaSchedaAn'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'COD_FUNZIONE'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'codImpianto'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'CodImpianto'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'codMacchina'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'CodMappa'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'Cognome'
|
||||
@@ -408,7 +408,7 @@ DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'chkShowOnlyMacchFerma
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'Ciclo'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'clonaSchedaAn'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'COD_FUNZIONE'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'codImpianto'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'CodImpianto'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'codMacchina'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'CodMappa'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'codProgetto'
|
||||
|
||||
@@ -47,7 +47,7 @@ DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'chkShowMtzPrev'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'chkShowOnlyMacchFerma'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'clonaSchedaAn'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'COD_FUNZIONE'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'codImpianto'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'CodImpianto'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'codMacchina'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'CodMappa'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'Cognome'
|
||||
@@ -321,7 +321,7 @@ DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'chkShowOnlyMacchFerma
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'Ciclo'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'clonaSchedaAn'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'COD_FUNZIONE'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'codImpianto'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'CodImpianto'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'codMacchina'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'CodMappa'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'codProgetto'
|
||||
|
||||
@@ -46,7 +46,7 @@ DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'chkShowMtzPrev'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'chkShowOnlyMacchFerma'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'clonaSchedaAn'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'COD_FUNZIONE'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'codImpianto'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'CodImpianto'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'codMacchina'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'CodMappa'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'EN' and Lemma=N'Cognome'
|
||||
@@ -320,7 +320,7 @@ DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'chkShowOnlyMacchFerma
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'Ciclo'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'clonaSchedaAn'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'COD_FUNZIONE'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'codImpianto'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'CodImpianto'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'codMacchina'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'CodMappa'
|
||||
DELETE FROM dbo.Vocabolario WHERE Lingua=N'IT' and Lemma=N'codProgetto'
|
||||
|
||||
Reference in New Issue
Block a user