diff --git a/EgwProxy.SqlDb.Test/SqlFromDebug/BackupDb.sql b/EgwProxy.SqlDb.Test/SqlFromDebug/BackupDb.sql new file mode 100644 index 00000000..f5b6e020 Binary files /dev/null and b/EgwProxy.SqlDb.Test/SqlFromDebug/BackupDb.sql differ diff --git a/EgwProxy.SqlDb.Test/SqlFromDebug/GetMachineEvList.sql b/EgwProxy.SqlDb.Test/SqlFromDebug/GetMachineEvList.sql new file mode 100644 index 00000000..ec9326c1 Binary files /dev/null and b/EgwProxy.SqlDb.Test/SqlFromDebug/GetMachineEvList.sql differ diff --git a/EgwProxy.SqlDb.Test/SqlFromDebug/GetMachineFluxLog.sql b/EgwProxy.SqlDb.Test/SqlFromDebug/GetMachineFluxLog.sql new file mode 100644 index 00000000..d4309047 Binary files /dev/null and b/EgwProxy.SqlDb.Test/SqlFromDebug/GetMachineFluxLog.sql differ diff --git a/EgwProxy.SqlDb.Test/SqlFromDebug/GetMachineSigLog.sql b/EgwProxy.SqlDb.Test/SqlFromDebug/GetMachineSigLog.sql new file mode 100644 index 00000000..c88cc5f7 Binary files /dev/null and b/EgwProxy.SqlDb.Test/SqlFromDebug/GetMachineSigLog.sql differ diff --git a/EgwProxy.SqlDb.Test/SqlFromDebug/MoonPro_IOB_ISF_Pama.sql b/EgwProxy.SqlDb.Test/SqlFromDebug/MoonPro_IOB_ISF_Pama.sql new file mode 100644 index 00000000..572cce02 --- /dev/null +++ b/EgwProxy.SqlDb.Test/SqlFromDebug/MoonPro_IOB_ISF_Pama.sql @@ -0,0 +1,129 @@ +/****** MoonPro_IOB-ISF_PAMA Script Date: 13/03/2023 19:03:53 ******/ + +-- creazione sinonimi +CREATE SYNONYM [dbo].[syn_ERP2M] FOR [P_HUB_PLD392].[dbo].[ERP2M] +CREATE SYNONYM [dbo].[syn_M2ERP_MACHINE_STATE] FOR [P_HUB_PLD392].[dbo].[M2ERP_MACHINE_STATE] +CREATE SYNONYM [dbo].[syn_M2ERP_PRODORDERS] FOR [P_HUB_PLD392].[dbo].[M2ERP_PRODORDERS] + +GO + +-- fix stored specifiche + +ALTER PROCEDURE [dbo].[SyncPodlToMachine] +AS +BEGIN + BEGIN tran + -- SET NOCOUNT ON added to prevent extra result sets from + -- interfering with SELECT statements. + SET NOCOUNT ON; + + -- Calcola i VECCHI PODL e scrive DELETE relativo + ;WITH cte2del AS + ( + SELECT pLast.* + FROM MesPODL_last pLast + LEFT OUTER JOIN MesPODL_req pReq ON pReq.IdxPromessa = pLast.IdxPromessa + WHERE pReq.IdxPromessa IS NULL + ) + INSERT INTO syn_ERP2M(Targa, MachineID, ProdOrder, MatCode, MatDescr, ToDoQty, PartPrograms, Cmd, [DateTime]) + SELECT 'PLD392' AS Targa + ,0 AS MachineID + ,'PODL' + dbo.f_padLeft(IdxPromessa, 8,'0') AS ProdOrder + ,CodArticolo AS MatCode + ,KeyRichiesta AS MatDescr + ,NumPezzi AS ToDoQty + ,Note AS PartPrograms + ,2 AS Cmd + ,GETDATE() AS [DateTime] + FROM cte2del; + + -- Calcola i NUOVI PODL e scrive ADD relativo + ;WITH cte2add AS + ( + SELECT pReq.* + FROM MesPODL_req pReq + LEFT OUTER JOIN MesPODL_last pLast ON pReq.IdxPromessa = pLast.IdxPromessa + WHERE pLast.IdxPromessa IS NULL + ) + INSERT INTO syn_ERP2M(Targa, MachineID, ProdOrder, MatCode, MatDescr, ToDoQty, PartPrograms, Cmd, [DateTime]) + SELECT 'PLD392' AS Targa + ,0 AS MachineID + ,'PODL' + dbo.f_padLeft(IdxPromessa, 8,'0') AS ProdOrder + ,CodArticolo AS MatCode + ,KeyRichiesta AS MatDescr + ,NumPezzi AS ToDoQty + ,Note AS PartPrograms + ,1 AS Cmd + ,GETDATE() AS [DateTime] + FROM cte2add; + + -- Calcola i PODL modificati e scrive update relativo + ;WITH cte2mod AS + ( + SELECT pReq.* + FROM MesPODL_req pReq + INNER JOIN MesPODL_last pLast ON pReq.IdxPromessa = pLast.IdxPromessa + WHERE pLast.KeyRichiesta <> pReq.KeyRichiesta + OR pLast.KeyBCode <> pReq.KeyBCode + OR pLast.NumPezzi <> pReq.NumPezzi + OR pLast.CodArticolo <> pReq.CodArticolo + OR pLast.Note <> pReq.Note + --OR pLast.IdxMacchina <> pReq.IdxMacchina + --OR pLast.CodGruppo <> pReq.CodGruppo + --OR pLast.Attivabile <> pReq.Attivabile + --OR pLast.DueDate <> pReq.DueDate + --OR pLast.Priorita <> pReq.Priorita + ) + INSERT INTO syn_ERP2M(Targa, MachineID, ProdOrder, MatCode, MatDescr, ToDoQty, PartPrograms, Cmd, [DateTime]) + SELECT 'PLD392' AS Targa + ,0 AS MachineID + ,'PODL' + dbo.f_padLeft(IdxPromessa, 8,'0') AS ProdOrder + ,CodArticolo AS MatCode + ,KeyRichiesta AS MatDescr + ,NumPezzi AS ToDoQty + ,Note AS PartPrograms + ,3 AS Cmd + ,GETDATE() AS [DateTime] + FROM cte2mod; + + -- svuoto ultima richiesta + TRUNCATE TABLE MesPODL_last + -- trasferimento records! + INSERT INTO MesPODL_last + (IdxPromessa + ,KeyRichiesta + ,KeyBCode + ,Attivabile + ,IdxODL + ,CodArticolo + ,CodGruppo + ,IdxMacchina + ,NumPezzi + ,TCAssegnato + ,DueDate + ,Priorita + ,PzPallet + ,Note + ,CodCli + ,InsertDate) + SELECT IdxPromessa + ,KeyRichiesta + ,KeyBCode + ,Attivabile + ,IdxODL + ,CodArticolo + ,CodGruppo + ,IdxMacchina + ,NumPezzi + ,TCAssegnato + ,DueDate + ,Priorita + ,PzPallet + ,Note + ,CodCli + ,InsertDate + FROM MesPODL_req + + COMMIT tran +END +GO diff --git a/EgwProxy.SqlDb.Test/SqlFromDebug/ResetPodlMes.sql b/EgwProxy.SqlDb.Test/SqlFromDebug/ResetPodlMes.sql new file mode 100644 index 00000000..dada7903 Binary files /dev/null and b/EgwProxy.SqlDb.Test/SqlFromDebug/ResetPodlMes.sql differ diff --git a/EgwProxy.SqlDb.Test/SqlFromDebug/SyncPodlToMachine.sql b/EgwProxy.SqlDb.Test/SqlFromDebug/SyncPodlToMachine.sql new file mode 100644 index 00000000..6ae2377c Binary files /dev/null and b/EgwProxy.SqlDb.Test/SqlFromDebug/SyncPodlToMachine.sql differ