Update vari x bugfix segnalati

git-svn-id: https://keyhammer.ath.cx/svn/GMW/trunk@314 365432ac-a1b5-4ffd-bb28-6d3099d32164
2010-11-12 17:51:27 +00:00
parent fbf7e5e6af
commit ceeb997b57
28 changed files with 266 additions and 22 deletions
@@ -21,7 +21,7 @@
                </ItemTemplate>
            </asp:DataList>
            <asp:ObjectDataSource id="ods_lingueApp" runat="server" OldValuesParameterFormatString="Original_{0}"
-                SelectMethod="GetLingue" TypeName="selDataVoc">
+                SelectMethod="GetLingue" TypeName="GMW_data.selDataVoc">
            </asp:ObjectDataSource>
        </td>
    </tr>
@@ -63,7 +63,7 @@
                            </Columns>
                        </asp:GridView>
                        <asp:Label ID="lblNumRec" runat="server" CssClass="txtMini" />&nbsp;&nbsp;
-                        <asp:ObjectDataSource ID="ods" runat="server" SelectMethod="getSelUdcByPart" TypeName="selData"
+                        <asp:ObjectDataSource ID="ods" runat="server" SelectMethod="getSelUdcByPart" TypeName="GMW_data.selData"
                            FilterExpression=" (label LIKE '%{0}%') " 
                            OldValuesParameterFormatString="original_{0}">
                            <FilterParameters>
@@ -71,7 +71,7 @@
                <AlternatingRowStyle CssClass="ctrAltRowStyle"></AlternatingRowStyle>
            </asp:GridView>
            <asp:Label ID="lblNumRec" runat="server" CssClass="txtMini" />
-            <asp:ObjectDataSource ID="ods" runat="server" SelectMethod="getVocabolario" TypeName="selDataVoc"
+            <asp:ObjectDataSource ID="ods" runat="server" SelectMethod="getVocabolario" TypeName="GMW_data.selDataVoc"
                UpdateMethod="updateLemmaVoc" DeleteMethod="deleteLemmaVoc" OldValuesParameterFormatString="Original_{0}"
                FilterExpression="Traduzione LIKE '%{0}%' OR Lemma LIKE '%{0}%' " 
                OnUpdated="ods_Updated">
@@ -85,6 +85,7 @@
      <DependentUpon>Settings.settings</DependentUpon>
    </Compile>
    <Compile Include="reportPrinter.cs" />
+    <Compile Include="selData.cs" />
    <Compile Include="selDataVoc.cs" />
    <Compile Include="StateMachine.cs" />
    <Compile Include="TermClass.cs" />
@@ -929,6 +929,9 @@ namespace GMW_data
             *  (quindi da codCella --> IdxCella --> spostamento
             *  indico la lista come completata = 1 (true)
             * */
+            // setup eventuali valori x rettifica
+            DS_magazzino.ElencoCartelliniRow rigaUdc;
+            bool fatto = false;

            esitoOperazione answ = esitoOperazione.errore;
            int trovate = 0;
@@ -976,9 +979,30 @@ namespace GMW_data
                            idxPosizUdcCorr = taElencoCartellini.getDetailsUdcByUdc(UDC)[0].IdxPosizione;
                            idxPosizUdcDest = StateMachine.SM.getIdxPostizioneTo(CodEvento, idxPosizUdcCorr);
                            // sposto UDC
-                            scaricaUDC(UDC, idxCellaFrom, idxPosizUdcDest);
+                            fatto = scaricaUDC(UDC, idxCellaFrom, idxPosizUdcDest);
                            // dopo aver scaricato UDC sistemo eventuali Righe di Prelievo x lo stesso pending...
                            magazzino.taRigheListePrelievo.stp_RLP_sbloccaNonPrelevate(CodLista, UDC);
+#if false
+                            // in caso di prelievo WIP da OVAS...
+                            if (codTipoListaAttuale == "01-PreFus")
+                            {
+                                // e SE specificato nel web.config...
+                                if (memLayer.ML.confReadBool("Cosumo84PostDelibera"))
+                                {
+                                    // prendo i dati PRIMA che scarichi l'UDC... e con qta negativa xché qui devo "rimetterlo a posto"...
+                                    rigaUdc = taElencoCartellini.getDetailsUdcByUdc(UDC)[0];
+                                    string Particolare = rigaUdc.Particolare;
+                                    int IdxPosizione = rigaUdc.IdxPosizione;
+                                    decimal Quantita = -rigaUdc.Qta;
+                                    // calcolo l'eventuale rettifica x AS
+                                    if (fatto)
+                                    {
+                                        // devo fare un movimento di compensazioen su mag 84 x non scaricare subito la quantità che ho appena messo in AS400...
+                                        DataProxy.obj.taCartellini.stp_rettMovAs400(Particolare, UDC, IdxPosizione.ToString(), Quantita);
+                                    }
+                                }
+                            } 
+#endif
                        }
                        // segna come scaricata la lista prelievo
                        taElencoListePrelievo.updateStato(CodSoggetto, CodLista, (int)statoLista.scaricata);
@@ -1,3 +1,201 @@
+set xact_abort on
+go
+
+begin transaction
+go
+
+set ANSI_NULLS on
+go
+
+/***************************************
+* STORED stp_UDC_getByTipoDelibera
+*
+* elenco cartellini che possono essere oggetto della delibera indicata
+*
+* Steamware, S.E.L.
+* mod: 2010.07.29
+*
+****************************************/
+alter PROCEDURE stp_UDC_getByTipoDelibera
+(
+	@CodTipoDelibera NVARCHAR(50),
+	@DataFrom DATETIME,
+	@DataTo DATETIME
+)
+AS
+
+SELECT		*
+FROM        ElencoCartellini
+WHERE       IdxPosizione IN (
+			SELECT		TabTranPosizEventi.IdxPosizione
+			FROM        TabTranPosizEventi INNER JOIN AnagTipoEvento ON TabTranPosizEventi.CodEvento = AnagTipoEvento.CodEvento 
+						INNER JOIN AnagTipoDelibere ON AnagTipoEvento.CodEvento = AnagTipoDelibere.CodEvento
+			WHERE		(AnagTipoDelibere.CodTipoDelibera = @CodTipoDelibera)
+			) -- vincolo su posizioni accettabili
+			AND DataFus BETWEEN @DataFrom AND @DataTo -- vincolo data
+			AND UDC NOT IN ( SELECT DISTINCT UDC FROM PosizioneUdcCorrente)
+ORDER BY	UDC DESC
+
+RETURN
+go
+
+/***************************************
+* STORED stp_UDC_update
+*
+* aggiorna un cartellino dato il suo codice UDC e tutti i parametri da aggiornare
+*
+* Steamware, S.E.L.
+* mod: 2010.04.30
+*
+****************************************/
+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)
+)
+AS
+
+-- DECLARE iniziali
+DECLARE @RagSociale AS VARCHAR(35)
+DECLARE @DescParticolare AS VARCHAR(30)
+DECLARE @DescImpianto AS VARCHAR(50)
+DECLARE @DisegnoGrezzo AS VARCHAR(30)
+DECLARE @NumCont AS INT
+DECLARE @numFlu AS INT
+DECLARE @numUdc AS INT
+DECLARE @nextUdc AS INT
+
+------------------------------------------------------------------------------------------------------
+-- Caricamento Dati da anagrafica
+------------------------------------------------------------------------------------------------------
+-- cerco la ragione sociale...
+SET @RagSociale = (
+	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)
+)
+
+-- cerco codice disegno grezzo
+SET @DisegnoGrezzo = (
+	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)
+)
+
+
+
+-- Calcolo contatore intero successivo x il contenitore...
+SET @NumCont = (
+	SELECT      NumCont
+	FROM        ElencoCartellini
+	WHERE       (UDC = @UDC_edit)	
+)
+
+
+------------------------------------------------------------------------------------------------------
+
+------------------------------------------------------------------------------------------------------
+-- Flusso
+------------------------------------------------------------------------------------------------------
+-- controllo se esiste il flusso (bilancia)...
+SET @numFlu = (
+	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
+------------------------------------------------------------------------------------------------------
+
+------------------------------------------------------------------------------------------------------
+-- 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
+
+	-- 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
+------------------------------------------------------------------------------------------------------
+
+------------------------------------------------------------------------------------------------------
+-- restituisco la tab dati con l'udc appena inserito
+------------------------------------------------------------------------------------------------------
+SELECT * 
+FROM ElencoCartellini
+WHERE  UDC = @UDC_edit
+------------------------------------------------------------------------------------------------------
+
+RETURN
+go
+
+commit
+go
+
+



@@ -0,0 +1,38 @@
+using System;
+using System.Collections.Generic;
+using System.Linq;
+using System.Text;
+using SteamWare;
+
+
+namespace GMW_data
+{
+    public class selData
+    {
+        /// <summary>
+        /// classe accesso tabelle selettori
+        /// </summary>
+        public selData()
+        {
+        }
+
+        /// <summary>
+        /// tabella elenco UDC papabili x lista prelievo (da conditio = codice particolare...)
+        /// </summary>
+        /// <param name="conditio"></param>
+        /// <returns></returns>
+        public GMW_data.DS_Utility.v_selUdcByPartDataTable getSelUdcByPart()
+        {
+            string conditio = "";
+            // cerco da rete se c'è la condizione di filtraggio...
+            try
+            {
+                conditio = SteamWare.memLayer.ML.StringSessionObj("UdcByPart_conditio");
+            }
+            catch
+            { }
+            return GMW_data.utils.obj.taUdcByPart.getByConditio(conditio);
+        }
+
+    }
+}
@@ -34,24 +34,7 @@ public class selDataVoc
        return SteamWare.DataWrap.DW.taLingue.GetData();
    }

-     /// <summary>
-     /// tabella elenco UDC papabili x lista prelievo (da conditio = codice particolare...)
-     /// </summary>
-     /// <param name="conditio"></param>
-     /// <returns></returns>
-    public GMW_data.DS_Utility.v_selUdcByPartDataTable getSelUdcByPart()
-    {
-        string conditio = "";
-        // cerco da rete se c'è la condizione di filtraggio...
-        try
-        {
-            conditio = SteamWare.memLayer.ML.StringSessionObj("UdcByPart_conditio");
-        }
-        catch
-        { }
-        return GMW_data.utils.obj.taUdcByPart.getByConditio(conditio);
-    }
-
+    
    /// <summary>
    /// faccio update del lemma indicato...
    /// </summary>