- aggiornate classi core

- gestione sync in blocco
- salvataggio dati su tab Sync

EgtBEAMWALL.Core/BTLModel/BTLPartM.vb

@@ -587,7 +587,7 @@ Public Class BTLPartM
    Public ReadOnly Property nINPROD As Integer
       Get
          Dim INPROD As Integer = 0
-         EgtDuploCount(m_nPartId, INPROD)
+         EgtDuploInRawCount(m_nPartId, INPROD)
          Return INPROD
       End Get
    End Property

EgtBEAMWALL.Core/Constants/ConstColumns.vb

@@ -23,5 +23,6 @@
    Public Const COL_USAGE As String = "colUSAGE"
    Public Const COL_WASTE As String = "colWASTE"
    Public Const COL_ARCHIVED As String = "colARCHIVED"
+   Public Const COL_USEQTY As String = "colUSEQTY"
 
 End Module

EgtBEAMWALL.Core/Constants/ConstIni.vb

@@ -47,6 +47,7 @@ Public Module ConstIni
    Public Const K_FASTPRODUCE As String = "FastProduce"
    Public Const K_ADDPROJ As String = "AddProj"
    Public Const K_PROJECTMODE As String = "ProjectMode"
+   Public Const K_NETWAREHOUSE As String = "NetWarehouse"
 
    'Public Const S_LANGUAGES As String = "Languages"
    'Public Const K_LANGUAGE As String = "Language"
@@ -162,10 +163,15 @@ Public Module ConstIni
    Public Const S_WAREHOUSE As String = "Warehouse"
    Public Const K_TYPE As String = "Type"
    Public Const K_DEFAULTQUANTITY As String = "DefaultQuantity"
+   Public Const K_LASTSYNCHRONIZATION As String = "LastSynchronization"
+   Public Const K_USENETWAREHOUSE As String = "UseNetWarehouse"
 
    Public Const S_BACKUPANDRESTORE As String = "Backup&Restore"
    Public Const K_EXTERNALBACKUPACTIVE As String = "ExternalBackupActive"
    Public Const K_EXTERNALFILEPATH As String = "ExternalFilePath"
    Public Const K_REMINDERFREQUENCY As String = "ReminderFrequency"
 
+   Public Const S_SPECIAL As String = "Special"
+   Public Const K_SPECIALENABLE As String = "SpecialEnable"
+
 End Module

EgtBEAMWALL.Core/EgtBEAMWALL.Core.vbproj

@@ -116,6 +116,7 @@
       <DependentUpon>NewOpenProjectFileDialogV.xaml</DependentUpon>
     </Compile>
     <Compile Include="NewOpenProjectFileDialog\NewOpenProjectFileDialogVM.vb" />
+    <Compile Include="ProjectFileVM\ProdItem.vb" />
     <Compile Include="Utility\DimensionsIniFile.vb" />
     <Compile Include="Utility\Enum.vb" />
     <Compile Include="MachGroupPanel\MyMachGroupPanelVM.vb" />
@@ -145,6 +146,7 @@
     <Compile Include="Lib\MachGroupPanelM.vb" />
     <Compile Include="MachGroupModel\MyMachGroupPanelM.vb" />
     <Compile Include="Utility\ManageWindow.vb" />
+    <Compile Include="Utility\RawPart.vb" />
     <Compile Include="Utility\MyMachine.vb" />
     <Compile Include="OpenProjectFileDialog\OpenProjectFileDialogV.xaml.vb">
       <DependentUpon>OpenProjectFileDialogV.xaml</DependentUpon>
@@ -157,6 +159,7 @@
     <Compile Include="ProjectManager\ProjectFileVM.vb" />
     <Compile Include="ProjectManager\ProjFileVM.vb" />
     <Compile Include="ProjectFileVM\ProjFileM.vb" />
+    <Compile Include="Utility\Material.vb" />
     <Compile Include="Utility\SectionXMaterial.vb" />
     <Compile Include="Utility\BTLIniFile.vb" />
     <Compile Include="Utility\CoreMap.vb" />

EgtBEAMWALL.Core/My Project/AssemblyInfo.vb

@@ -35,5 +35,5 @@ Imports System.Runtime.InteropServices
 ' by using the '*' as shown below:
 ' <Assembly: AssemblyVersion("1.0.*")>
 
-<Assembly: AssemblyVersion("2.5.7.1")>
-<Assembly: AssemblyFileVersion("2.5.7.1")>
+<Assembly: AssemblyVersion("2.5.12.2")>
+<Assembly: AssemblyFileVersion("2.5.12.2")>

EgtBEAMWALL.Core/NewOpenProjectFileDialog/NewOpenProjectFileDialogVM.vb

@@ -32,6 +32,7 @@ Public MustInherit Class NewOpenProjectFileDialogVM
       LAST3MONTHS = 1
       LAST6MONTHS = 2
       PERIOD = 3
+      ALWAYS = 4
    End Enum
 
    Public Enum RowQuantities As Integer
@@ -189,7 +190,7 @@ Public MustInherit Class NewOpenProjectFileDialogVM
    End Property
 
    Private m_DayTypeList As New List(Of String)({EgtMsg(62532), EgtMsg(62533), EgtMsg(62534), EgtMsg(62531)})
-   Public ReadOnly Property DayTypeList As List(Of String)
+   Public Overridable ReadOnly Property DayTypeList As List(Of String)
       Get
          Return m_DayTypeList
       End Get
@@ -209,13 +210,16 @@ Public MustInherit Class NewOpenProjectFileDialogVM
             Select Case PrevSelDayType
                Case DayTypes.LASTMONTH
                   m_dtEndDate = DateTime.Today + TimeSpan.FromDays(1)
-                  m_dtStartDate = m_dtEndDate - TimeSpan.FromDays(31)
+                  m_dtStartDate = m_dtEndDate - TimeSpan.FromDays(30.5)
                Case DayTypes.LAST3MONTHS
                   m_dtEndDate = DateTime.Today + TimeSpan.FromDays(1)
-                  m_dtStartDate = m_dtEndDate - TimeSpan.FromDays(31 * 3)
+                  m_dtStartDate = m_dtEndDate - TimeSpan.FromDays(30.5 * 3)
                Case DayTypes.LAST6MONTHS
                   m_dtEndDate = DateTime.Today + TimeSpan.FromDays(1)
-                  m_dtStartDate = m_dtEndDate - TimeSpan.FromDays(31 * 6)
+                  m_dtStartDate = m_dtEndDate - TimeSpan.FromDays(30.5 * 6)
+               Case DayTypes.ALWAYS
+                  m_dtEndDate = DateTime.Today + TimeSpan.FromDays(1)
+                  m_dtStartDate = New DateTime(2020, 1, 1)
             End Select
             NotifyPropertyChanged(NameOf(dtStartDate))
             NotifyPropertyChanged(NameOf(dtEndDate))
@@ -386,8 +390,10 @@ Public MustInherit Class NewOpenProjectFileDialogVM
       Set(value As Boolean)
          m_bViewArchived = value
          WriteMainPrivateProfileString(S_OPENFILEDIALOG, K_VIEWARCHIVED, If(bViewArchived, 1, 0))
-         m_colArchived_Name.Visible = value
-         RefreshProjectList()
+         If Not IsNothing( m_colArchived_Name) Then
+             m_colArchived_Name.Visible = value
+             RefreshProjectList()
+         End If
       End Set
    End Property
 
@@ -554,13 +560,13 @@ Public MustInherit Class NewOpenProjectFileDialogVM
       Select Case m_SelDayType
          Case DayTypes.LASTMONTH
             m_dtEndDate = DateTime.Today + TimeSpan.FromDays(1)
-            m_dtStartDate = m_dtEndDate - TimeSpan.FromDays(31)
+            m_dtStartDate = m_dtEndDate - TimeSpan.FromDays(30.5)
          Case DayTypes.LAST3MONTHS
             m_dtEndDate = DateTime.Today + TimeSpan.FromDays(1)
-            m_dtStartDate = m_dtEndDate - TimeSpan.FromDays(31 * 3)
+            m_dtStartDate = m_dtEndDate - TimeSpan.FromDays(30.5 * 3)
          Case DayTypes.LAST6MONTHS
             m_dtEndDate = DateTime.Today + TimeSpan.FromDays(1)
-            m_dtStartDate = m_dtEndDate - TimeSpan.FromDays(31 * 6)
+            m_dtStartDate = m_dtEndDate - TimeSpan.FromDays(30.5 * 6)
          Case DayTypes.PERIOD
             Dim sStartDate As String = "0"
             Dim lStartDate As Long = 0
@@ -773,94 +779,3 @@ Public MustInherit Class NewOpenProjectFileDialogVM
 
 End Class
 
-Public Class ProdItem
-   Inherits VMBase
-
-   Public Shared m_delIsModifiedSetUp As Action(Of Boolean)
-
-   Protected m_ProdFileVM As ProdFileVM
-   Public ReadOnly Property ProdFileVM As ProdFileVM
-      Get
-         Return m_ProdFileVM
-      End Get
-   End Property
-
-   Private m_ProjFileList As New List(Of ProjectFileVM)
-   Public ReadOnly Property ProjFileList As List(Of ProjectFileVM)
-      Get
-         Return m_ProjFileList
-      End Get
-   End Property
-
-   Public ReadOnly Property sProdId As String
-      Get
-         Return If(Not IsNothing(m_ProdFileVM), m_ProdFileVM.sProdId, "")
-      End Get
-   End Property
-
-   Public Overridable Property sName As String
-      Get
-         Return If(Not IsNothing(m_ProdFileVM), m_ProdFileVM.sName, "")
-      End Get
-      Set(value As String)
-         If Not IsNothing(m_ProdFileVM) Then
-            m_ProdFileVM.sName = value
-         End If
-      End Set
-   End Property
-
-   Public ReadOnly Property dtCreateDate As Date
-      Get
-         Return If(Not IsNothing(m_ProdFileVM), {m_ProdFileVM.dtCreateDate, m_ProjFileList.Min(Function(x) x.dtCreateDate)}.Min(), m_ProjFileList.Min(Function(x) x.dtCreateDate))
-      End Get
-   End Property
-   Public ReadOnly Property sCreateDate As String
-      Get
-         Return dtCreateDate.ToString()
-      End Get
-   End Property
-
-   Public ReadOnly Property sMachine As String
-      Get
-         If Not IsNothing(m_ProdFileVM) Then
-            Return m_ProdFileVM.sMachine
-         ElseIf Not IsNothing(m_ProjFileList(0)) Then
-            Return m_ProjFileList(0).sMachine
-         Else Return ""
-         End If
-      End Get
-   End Property
-
-   Public ReadOnly Property bIsArchived As Boolean
-      Get
-         If Not IsNothing(m_ProdFileVM) Then
-            Return m_ProdFileVM.bIsArchived
-         ElseIf Not IsNothing(m_ProjFileList(0)) Then
-            Return m_ProjFileList(0).bIsArchived
-         Else
-            Return True
-         End If
-      End Get
-   End Property
-
-   Public ReadOnly Property Archived_Visibility As Visibility
-      Get
-         Return If(bIsArchived, Visibility.Visible, Visibility.Collapsed)
-      End Get
-   End Property
-
-   Sub New(ProdFileVM As ProdFileVM, ProjFileVM As ProjFileVM)
-      m_ProdFileVM = ProdFileVM
-      m_ProjFileList.Add(ProjFileVM)
-   End Sub
-
-   Sub New(ProjFileVM As ProjFileVM)
-      m_ProjFileList = New List(Of ProjectFileVM)({ProjFileVM})
-   End Sub
-
-   Sub New(ProdFileVM As ProjectFileVM, ProjFileVMList As List(Of ProjectFileVM))
-      m_ProdFileVM = ProdFileVM
-      m_ProjFileList = ProjFileVMList
-   End Sub
-
-End Class

EgtBEAMWALL.Core/OpenProjectFileDialog/OpenProjectFileDialogVM.vb

@@ -42,6 +42,8 @@ Public MustInherit Class OpenProjectFileDialogVM
 
    Friend Event m_CloseWindow(bDialogResult As Boolean)
 
+   Protected m_GoToProd As Boolean = False
+
    Protected m_ProjectColumns As New ObservableCollection(Of EgtDataGridColumn)
    Public Property ProjectColumns As ObservableCollection(Of EgtDataGridColumn)
       Get
@@ -167,7 +169,7 @@ Public MustInherit Class OpenProjectFileDialogVM
             Select Case PrevSelDayType
                Case DayTypes.LASTMONTH
                   m_dtStartDate = DateTime.Today + TimeSpan.FromDays(1)
-                  m_dtEndDate = m_dtStartDate - TimeSpan.FromDays(31)
+                  m_dtEndDate = m_dtStartDate - TimeSpan.FromDays(30.5)
                Case DayTypes.LAST3MONTHS
 
                Case DayTypes.LAST6MONTHS
@@ -413,13 +415,13 @@ Public MustInherit Class OpenProjectFileDialogVM
       Select Case m_SelDayType
          Case DayTypes.LASTMONTH
             m_dtEndDate = DateTime.Today + TimeSpan.FromDays(1)
-            m_dtStartDate = m_dtEndDate - TimeSpan.FromDays(31)
+            m_dtStartDate = m_dtEndDate - TimeSpan.FromDays(30.5)
          Case DayTypes.LAST3MONTHS
             m_dtEndDate = DateTime.Today + TimeSpan.FromDays(1)
-            m_dtStartDate = m_dtEndDate - TimeSpan.FromDays(31 * 3)
+            m_dtStartDate = m_dtEndDate - TimeSpan.FromDays(30.5 * 3)
          Case DayTypes.LAST6MONTHS
             m_dtEndDate = DateTime.Today + TimeSpan.FromDays(1)
-            m_dtStartDate = m_dtEndDate - TimeSpan.FromDays(31 * 6)
+            m_dtStartDate = m_dtEndDate - TimeSpan.FromDays(30.5 * 6)
          Case DayTypes.PERIOD
             Dim sStartDate As String = "0"
             Dim lStartDate As Long = 0
@@ -438,7 +440,7 @@ Public MustInherit Class OpenProjectFileDialogVM
 #Region "METHODS"
 
    Public MustOverride Function Init(ProjectType As ProjectType, Optional CurrProjectList As List(Of ProjectFileVM) = Nothing, Optional GoToProd As Boolean = False) As Boolean?
-   Public Overridable Sub RefreshProjectList(Optional GoToProd As Boolean = False)
+   Public Overridable Sub RefreshProjectList()
    End Sub
 
    Protected Sub LoadColumns(ProjectType As ProjectType)

EgtBEAMWALL.Core/ProjectFileVM/ProdFileM.vb

@@ -14,6 +14,13 @@ Public Class ProdFileM
       m_nProjIdList = value
    End Sub
 
+   Protected m_ProjMList As List(Of ProjFileM)
+   Public ReadOnly Property ProjMList As List(Of ProjFileM)
+      Get
+         Return m_ProjMList
+      End Get
+   End Property
+
    Protected m_sName As String
    Public Property sName As String
       Get
@@ -34,6 +41,16 @@ Public Class ProdFileM
       End Set
    End Property
 
+   Protected m_nProjCloudId As Integer
+   Public Property nProjCloudId As Integer
+      Get
+         Return m_nProjCloudId
+      End Get
+      Set(value As Integer)
+         m_nProjCloudId = value
+      End Set
+   End Property
+
 #Region "CONSTRUCTORS"
 
    Protected Sub New()
@@ -44,7 +61,7 @@ Public Class ProdFileM
    End Function
 
    Public Shared Function CreateProdFileM(nProdId As Integer, nProjIdList As List(Of Integer), dtCreateProjDate As DateTime, sName As String, nType As BWType,
-                                          sMachine As String, sLockedBy As String, dtLock As DateTime, bIsActive As Boolean, bIsProduced As Boolean, bIsArchived As Boolean) As ProdFileM
+                                          sMachine As String, sLockedBy As String, dtLock As DateTime, bIsActive As Boolean, bIsProduced As Boolean, bIsArchived As Boolean, Optional nProjCloudId As Integer = 0) As ProdFileM
       Dim NewProjectFileM As New ProdFileM
       NewProjectFileM.m_nProdId = nProdId
       NewProjectFileM.m_nProjIdList = nProjIdList
@@ -57,6 +74,25 @@ Public Class ProdFileM
       NewProjectFileM.m_bIsActive = bIsActive
       NewProjectFileM.m_bIsProduced = bIsProduced
       NewProjectFileM.m_bIsArchived = bIsArchived
+      NewProjectFileM.m_nProjCloudId = nProjCloudId
+      Return NewProjectFileM
+   End Function
+
+   Public Shared Function CreateProdFileM(nProdId As Integer, nProjIdList As List(Of Integer), dtCreateProjDate As DateTime, sName As String, nType As BWType,
+                                          sMachine As String, sLockedBy As String, dtLock As DateTime, bIsActive As Boolean, bIsProduced As Boolean, bIsArchived As Boolean, ProjMList As List(Of ProjFileM)) As ProdFileM
+      Dim NewProjectFileM As New ProdFileM
+      NewProjectFileM.m_nProdId = nProdId
+      NewProjectFileM.m_nProjIdList = nProjIdList
+      NewProjectFileM.m_dtCreateDate = dtCreateProjDate
+      NewProjectFileM.m_sName = sName
+      NewProjectFileM.m_nType = nType
+      NewProjectFileM.m_sMachine = sMachine
+      NewProjectFileM.m_sLockedBy = sLockedBy
+      NewProjectFileM.m_dtLock = dtLock
+      NewProjectFileM.m_bIsActive = bIsActive
+      NewProjectFileM.m_bIsProduced = bIsProduced
+      NewProjectFileM.m_bIsArchived = bIsArchived
+      NewProjectFileM.m_ProjMList = ProjMList
       Return NewProjectFileM
    End Function
 

EgtBEAMWALL.Core/ProjectFileVM/ProdItem.vb

@@ -0,0 +1,116 @@
+
+Imports EgtWPFLib5
+Imports System.Windows
+
+Public Class ProdItem
+    Inherits VMBase
+
+    Public Shared m_delIsModifiedSetUp As Action(Of Boolean)
+
+    Protected m_ProdFileVM As ProdFileVM
+    Public ReadOnly Property ProdFileVM As ProdFileVM
+        Get
+            Return m_ProdFileVM
+        End Get
+    End Property
+
+    Private m_ProjFileList As New List(Of ProjectFileVM)
+    Public ReadOnly Property ProjFileList As List(Of ProjectFileVM)
+        Get
+            Return m_ProjFileList
+        End Get
+    End Property
+
+    Public ReadOnly Property sProdId As String
+        Get
+            Return If(Not IsNothing(m_ProdFileVM), m_ProdFileVM.sProdId, "")
+        End Get
+    End Property
+
+    Public Overridable Property sName As String
+        Get
+            Return If(Not IsNothing(m_ProdFileVM), m_ProdFileVM.sName, "")
+        End Get
+        Set(value As String)
+            If Not IsNothing(m_ProdFileVM) Then
+                m_ProdFileVM.sName = value
+            End If
+        End Set
+    End Property
+
+    Public ReadOnly Property dtCreateDate As Date
+        Get
+            Return If(Not IsNothing(m_ProdFileVM), {m_ProdFileVM.dtCreateDate, m_ProjFileList.Min(Function(x) x.dtCreateDate)}.Min(), m_ProjFileList.Min(Function(x) x.dtCreateDate))
+        End Get
+    End Property
+    Public ReadOnly Property sCreateDate As String
+        Get
+            Return dtCreateDate.ToString()
+        End Get
+    End Property
+
+    Public ReadOnly Property sMachine As String
+        Get
+            If Not IsNothing(m_ProdFileVM) Then
+                Return m_ProdFileVM.sMachine
+            ElseIf Not IsNothing(m_ProjFileList(0)) Then
+                Return m_ProjFileList(0).sMachine
+            Else Return ""
+            End If
+        End Get
+    End Property
+
+    Public ReadOnly Property bIsArchived As Boolean
+        Get
+            If Not IsNothing(m_ProdFileVM) Then
+                Return m_ProdFileVM.bIsArchived
+            ElseIf Not IsNothing(m_ProjFileList(0)) Then
+                Return m_ProjFileList(0).bIsArchived
+            Else
+                Return True
+            End If
+        End Get
+    End Property
+
+    Public ReadOnly Property Archived_Visibility As Visibility
+        Get
+            Return If(bIsArchived, Visibility.Visible, Visibility.Collapsed)
+        End Get
+    End Property
+
+    Sub New(ProdFileVM As ProdFileVM, ProjFileVM As ProjFileVM)
+        m_ProdFileVM = ProdFileVM
+        m_ProjFileList.Add(ProjFileVM)
+    End Sub
+
+    Sub New(ProjFileVM As ProjFileVM)
+        m_ProjFileList = New List(Of ProjectFileVM)({ProjFileVM})
+    End Sub
+
+    Sub New(ProdFileVM As ProjectFileVM, ProjFileVMList As List(Of ProjectFileVM))
+        m_ProdFileVM = ProdFileVM
+        m_ProjFileList = ProjFileVMList
+    End Sub
+
+
+   Public Shared Function CreateProdItem(nProdId As Integer, nProjIdList As List(Of Integer), dtCreateProjDate As DateTime, sName As String, nType As BWType,
+                                           sMachine As String, sLockedBy As String, dtLock As DateTime, bIsActive As Boolean, bIsProduced As Boolean, bIsArchived As Boolean, ProjMList As List(Of ProjFileM)) As ProdItem
+
+
+      Dim NewProdFileM = ProdFileM.CreateProdFileM(nProdId, nProjIdList, dtCreateProjDate, sName, nType, sMachine, sLockedBy, dtLock, bIsActive, bIsProduced, bIsArchived)
+      Dim NewProdFileVM = New ProdFileVM(NewProdFileM)
+      Dim NewProjFileVM As IEnumerable(Of ProjectFileVM)
+      NewProjFileVM = ProjMList.Select(Of ProjFileVM)(Function(j) New ProjFileVM(j)).ToList
+      Dim NewProdItem = New ProdItem(NewProdFileVM, NewProjFileVM.ToList)
+
+      Return NewProdItem
+   End Function
+
+   Public Shared Function CreateProdItem(ProjFileM As ProjFileM) As ProdItem
+
+      Dim NewProdItem = New ProdItem(New ProjFileVM(ProjFileM))
+
+      Return NewProdItem
+   End Function
+
+End Class

EgtBEAMWALL.Core/ProjectFileVM/ProjFileM.vb

@@ -29,25 +29,35 @@ Public Class ProjFileM
     End Property
 
     Protected m_sDescription As String = String.Empty
-    Public Property sDescription As String
-        Get
-            Return m_sDescription
-        End Get
-        Set(value As String)
-            m_sDescription = value
-        End Set
-    End Property
+   Public Property sDescription As String
+      Get
+         Return m_sDescription
+      End Get
+      Set(value As String)
+         m_sDescription = value
+      End Set
+   End Property
+
+   Protected m_nProjCloudId As Integer
+   Public Property nProjCloudId As Integer
+      Get
+         Return m_nProjCloudId
+      End Get
+      Set(value As Integer)
+         m_nProjCloudId = value
+      End Set
+   End Property
 
 #Region "CONSTRUCTORS"
 
-    Protected Sub New()
+   Protected Sub New()
    End Sub
 
    Public Shared Function CreateNewProjFileM() As ProjFileM
       Return New ProjFileM
    End Function
 
-   Public Shared Function CreateProjFileM(nProjId As Integer, nProdId As Integer, dtCreateProjDate As DateTime, dtExportDate As DateTime, sListName As String, sBTLFileName As String, sDescription As String, IsNew As Boolean, IsLocked As Boolean, nType As BWType, sMachine As String, bIsActive As Boolean, bIsArchived As Boolean) As ProjFileM
+   Public Shared Function CreateProjFileM(nProjId As Integer, nProdId As Integer, dtCreateProjDate As DateTime, dtExportDate As DateTime, sListName As String, sBTLFileName As String, sDescription As String, IsNew As Boolean, IsLocked As Boolean, nType As BWType, sMachine As String, bIsActive As Boolean, bIsArchived As Boolean, Optional nProjCloudId As Integer = 0) As ProjFileM
       Dim NewProjectFileM As New ProjFileM
       NewProjectFileM.m_nProjId = nProjId
       NewProjectFileM.m_nProdId = nProdId
@@ -62,6 +72,7 @@ Public Class ProjFileM
       NewProjectFileM.m_sMachine = sMachine
       NewProjectFileM.m_bIsActive = bIsActive
       NewProjectFileM.m_bIsArchived = bIsArchived
+      NewProjectFileM.m_nProjCloudId = nProjCloudId
       Return NewProjectFileM
    End Function
 

EgtBEAMWALL.Core/Utility/MachLog.vb

@@ -87,7 +87,6 @@
 
    Public ReadOnly Property sPROD As String
       Get
-
          Return m_VarValue
       End Get
    End Property

EgtBEAMWALL.Core/Utility/Material.vb

@@ -0,0 +1,90 @@
+Imports System.Windows
+Imports EgtUILib
+Imports EgtWPFLib5
+
+Public Class MaterialM
+
+   Protected m_nId As Integer
+   Public ReadOnly Property nId As Integer
+      Get
+         Return m_nId
+      End Get
+   End Property
+   Public Sub SetId(nId As Integer)
+      m_nId = nId
+   End Sub
+
+   Protected m_sMaterial As String
+   Public ReadOnly Property sMaterial As String
+      Get
+         Return m_sMaterial
+      End Get
+   End Property
+
+   Protected m_sWarehouseMaterial As String
+   Public ReadOnly Property sWarehouseMaterial As String
+      Get
+         Return m_sWarehouseMaterial
+      End Get
+   End Property
+
+   Protected m_dW As Double = 0
+   Public ReadOnly Property dW As Double
+      Get
+         Return m_dW
+      End Get
+   End Property
+
+   Protected m_dH As Double = 0
+   Public ReadOnly Property dH As Double
+      Get
+         Return m_dH
+      End Get
+   End Property
+
+   Protected m_dL As Double = 0
+   Public ReadOnly Property dL As Double
+      Get
+         Return m_dL
+
+      End Get
+   End Property
+
+   Shared Operator =(ByVal S1 As MaterialM, ByVal S2 As MaterialM) As Boolean
+      If IsNothing(S1) OrElse IsNothing(S2) Then Return False
+      Return (Math.Abs(S1.m_dH - S2.m_dH) < 100 * EPS_SMALL AndAlso
+              Math.Abs(S1.m_dW - S2.m_dW) < 100 * EPS_SMALL AndAlso
+              Math.Abs(S1.m_dL - S2.m_dL) < 100 * EPS_SMALL AndAlso
+              S1.m_sWarehouseMaterial = S2.m_sWarehouseMaterial)
+   End Operator
+
+   Shared Operator <>(ByVal S1 As MaterialM, ByVal S2 As MaterialM) As Boolean
+      Return Not S1 = S2
+   End Operator
+
+   Public Overrides Function Equals(ByVal obj As Object) As Boolean
+      If TypeOf obj Is MaterialM Then
+         Return Me = DirectCast(obj, MaterialM) '(m_dH = obj.dH AndAlso m_dW = obj.dW AndAlso m_dL = obj.dL AndAlso m_Material.Any(Function(x) DirectCast(obj.sMaterial, List(Of String)).Any(Function(y) y = x)))
+      End If
+      Return False
+   End Function
+
+   Sub New(dW As Double, dH As Double, dL As Double, sMaterial As String, sWarehouseMaterial As String)
+      m_dW = dW
+      m_dH = dH
+      m_dL = dL
+      m_sMaterial = sMaterial
+      m_sWarehouseMaterial = sWarehouseMaterial
+   End Sub
+
+   Sub New(nId As Integer, dW As Double, dH As Double, dL As Double, sMaterial As String, sWarehouseMaterial As String)
+      m_nId = nId
+      m_dW = dW
+      m_dH = dH
+      m_dL = dL
+      m_sMaterial = sMaterial
+      m_sWarehouseMaterial = sWarehouseMaterial
+   End Sub
+
+End Class
+

EgtBEAMWALL.Core/Utility/RawPart.vb

@@ -0,0 +1,107 @@
+Imports EgtWPFLib5
+
+Public Class RawPartM
+   Inherits VMBase
+
+   Protected m_nId As Integer
+   Public ReadOnly Property nId As Integer
+      Get
+         Return m_nId
+      End Get
+   End Property
+   Public Sub SetId(nId As Integer)
+      m_nId = nId
+   End Sub
+
+   Private m_bActive As Boolean
+   Public Property bActive As Boolean
+      Get
+         Return m_bActive
+      End Get
+      Set(value As Boolean)
+         m_bActive = value
+      End Set
+   End Property
+
+   Private m_Material As MaterialM
+   Public Property Material As MaterialM
+      Get
+         Return m_Material
+      End Get
+      Set(value As MaterialM)
+         m_Material = value
+      End Set
+   End Property
+
+   Private m_dW As Double
+   Public Property dW As Double
+      Get
+         Return m_dW
+      End Get
+      Set(value As Double)
+         m_dW = value
+      End Set
+   End Property
+
+   Private m_dL As Double
+   Public Property dL As Double
+      Get
+         Return m_dL
+      End Get
+      Set(value As Double)
+         m_dL = value
+      End Set
+   End Property
+
+   Private m_nQuantity As Integer
+   Public Property nQuantity As Integer
+      Get
+         Return m_nQuantity
+      End Get
+      Set(value As Integer)
+         m_nQuantity = value
+      End Set
+   End Property
+   Private m_bUseQuantity As Boolean
+   Public Property bUseQuantity As Boolean
+      Get
+         Return m_bUseQuantity
+      End Get
+      Set(value As Boolean)
+         m_bUseQuantity = value
+      End Set
+   End Property
+
+   Sub New(SxM As MaterialM, W As Double, L As Double, Qty As Integer, Active As Boolean)
+      m_Material = SxM
+      m_dW = W
+      m_dL = L
+      m_nQuantity = Qty
+      m_bActive = Active
+   End Sub
+
+   Sub New(nId As Integer, SxM As MaterialM, W As Double, L As Double, Qty As Integer, bUseQty As Boolean, Active As Boolean)
+      m_nId = nId
+      m_Material = SxM
+      m_dW = W
+      m_dL = L
+      m_nQuantity = Qty
+      m_bUseQuantity = bUseQty
+      m_bActive = Active
+   End Sub
+
+   Public Sub Update(RawPart As RawPartM)
+      m_Material = RawPart.m_Material
+      m_dW = RawPart.dW
+      m_dL = RawPart.dL
+      m_nQuantity = RawPart.m_nQuantity
+      m_bUseQuantity = RawPart.m_bUseQuantity
+      m_bActive = RawPart.m_bActive
+   End Sub
+
+   Public Function Copy() As RawPartM
+      Return New RawPartM(m_nId, m_Material, m_dW, m_dL, m_nQuantity, bUseQuantity, bActive)
+   End Function
+
+End Class
+

EgtBEAMWALL.Core/Utility/SectionXMaterial.vb

@@ -15,10 +15,15 @@ Public Class SectionXMaterial
       m_nType = nType
    End Sub
 
-   Protected m_Material As List(Of String)
-   Public ReadOnly Property sMaterial As List(Of String)
+   Public ReadOnly Property sMaterial As String
       Get
-         Return m_Material
+         Return m_MaterialM.sMaterial
+      End Get
+   End Property
+
+   Public ReadOnly Property sWarehouseMaterial As String
+      Get
+         Return m_MaterialM.sWarehouseMaterial
       End Get
    End Property
 
@@ -42,50 +47,59 @@ Public Class SectionXMaterial
       End Set
    End Property
 
-   Protected m_dW As Double = 0
+   Protected m_MaterialM As MaterialM
+   Public ReadOnly Property MaterialM As MaterialM
+      Get
+         Return m_MaterialM
+      End Get
+   End Property
+
    Public ReadOnly Property dW As Double
       Get
-         Return m_dW
+         Return m_MaterialM.dW
       End Get
    End Property
 
-   Protected m_dH As Double = 0
    Public ReadOnly Property dH As Double
       Get
-         Return m_dH
+         Return m_MaterialM.dH
       End Get
    End Property
 
-   Protected m_dL As Double = 0
    Public ReadOnly Property dL As Double
       Get
-         Return m_dL
+         Return m_MaterialM.dL
       End Get
    End Property
 
    Public ReadOnly Property sSectionXMaterial As String
       Get
-         Dim sAlias As String = String.Empty
-         For Each sMatItem In sMaterial
-            sAlias &= sMatItem & ";"
-         Next
-         sAlias = sAlias.TrimEnd(";")
          If Me = Empty Then
             Return ""
          ElseIf m_nType = MachineType.BEAM Then
-            Return LenToString(m_dW, 3) & " x " & LenToString(m_dH, 3) & " " & sAlias
+            Return LenToString(m_MaterialM.dW, 3) & " x " & LenToString(m_MaterialM.dH, 3) & " " & If(GetMainPrivateProfileInt(S_WAREHOUSE, K_SHOWWAREHOUSEMATERIAL, 0) = 1, sWarehouseMaterial, sMaterial)
          ElseIf m_nType = MachineType.WALL Then
-            Return LenToString(m_dH, 3) & " " & sAlias
+            Return LenToString(m_MaterialM.dH, 3) & " " & If(GetMainPrivateProfileInt(S_WAREHOUSE, K_SHOWWAREHOUSEMATERIAL, 0) = 1, sWarehouseMaterial, sMaterial)
+         Else Return ""
+         End If
+      End Get
+   End Property
+
+   Public ReadOnly Property sWarehouseSectionXMaterial As String
+      Get
+         If Me = Empty Then
+            Return ""
+         ElseIf m_nType = MachineType.BEAM Then
+            Return LenToString(m_MaterialM.dW, 3) & " x " & LenToString(m_MaterialM.dH, 3) & " " & sWarehouseMaterial
+         ElseIf m_nType = MachineType.WALL Then
+            Return LenToString(m_MaterialM.dH, 3) & " " & sWarehouseMaterial
          Else Return ""
          End If
       End Get
    End Property
 
    Shared Operator =(ByVal S1 As SectionXMaterial, ByVal S2 As SectionXMaterial) As Boolean
-      Return (Math.Abs( S1.m_dH - S2.m_dH) < 100 * EPS_SMALL AndAlso
-              Math.Abs( S1.m_dW - S2.m_dW) < 100 * EPS_SMALL AndAlso
-              Math.Abs( S1.m_dL - S2.m_dL) < 100 * EPS_SMALL AndAlso
-              S1.m_Material.Any(Function(x) S2.m_Material.Any(Function(y) y = x)))
+      Return S1.m_MaterialM = S2.m_MaterialM
    End Operator
 
    Shared Operator <>(ByVal S1 As SectionXMaterial, ByVal S2 As SectionXMaterial) As Boolean
@@ -99,25 +113,21 @@ Public Class SectionXMaterial
       Return False
    End Function
 
-   Sub New(dW As Double, dH As Double, dL As Double, sMaterial As String)
+   Sub New(dW As Double, dH As Double, dL As Double, sMaterial As String, sWarehouseMaterial As String)
       If m_nType = BWType.BEAM Then
-         m_dW = dW
-         m_dH = dH
+         m_MaterialM = New MaterialM(dW, dH, 0, sMaterial, sWarehouseMaterial)
       ElseIf m_nType = BWType.WALL Then
-         m_dH = dH
+         m_MaterialM = New MaterialM(0, dH, 0, sMaterial, sWarehouseMaterial)
       Else
-         m_dW = dW
-         m_dH = dH
-         m_dL = dL
+         m_MaterialM = New MaterialM(dW, dH, dL, sMaterial, sWarehouseMaterial)
       End If
-      m_Material = New List(Of String)
-      Dim sMaterialArray() As String = Split(sMaterial, ";")
-      For Each sMatItem In sMaterialArray
-         m_Material.Add(sMatItem)
-      Next
    End Sub
 
-   Public Shared Empty As New SectionXMaterial(-1, -1, -1, "")
+   Sub New(MaterialM As MaterialM)
+      m_MaterialM = MaterialM
+   End Sub
+
+   Public Shared Empty As New SectionXMaterial(-1, -1, -1, "", "")
 
 #Region "Import BTL <-> Warehouse"
 
@@ -195,22 +205,14 @@ Public Class SectionXMaterial
       End Get
    End Property
 
-   Sub New(dW As Double, dH As Double, dL As Double, sMaterial As String, nQuantity As Integer)
+   Sub New(dW As Double, dH As Double, dL As Double, sMaterial As String, nQuantity As Integer, sWarehouseMaterial As String)
       If m_nType = BWType.BEAM Then
-         m_dW = dW
-         m_dH = dH
+         m_MaterialM = New MaterialM(dW, dH, 0, sMaterial, sWarehouseMaterial)
       ElseIf m_nType = BWType.WALL Then
-         m_dH = dH
+         m_MaterialM = New MaterialM(0, dH, 0, sMaterial, sWarehouseMaterial)
       Else
-         m_dW = dW
-         m_dH = dH
-         m_dL = dL
+         m_MaterialM = New MaterialM(dW, dH, dL, sMaterial, sWarehouseMaterial)
       End If
-      m_Material = New List(Of String)
-      Dim sMaterialArray() As String = Split(sMaterial, ";")
-      For Each sMatItem In sMaterialArray
-         m_Material.Add(sMatItem)
-      Next
       m_nQuantity = nQuantity
    End Sub
 

EgtBEAMWALL.DataLayer/App.config

@@ -13,7 +13,7 @@
       </providers>
    </entityFramework>
    <connectionStrings>
-      <add name="DefaultConnection" connectionString="server=localhost;port=3306;User Id=steamware;password=Egalware_24068!;Persist Security Info=True;database=EgtBwDb_000470;SslMode=none" providerName="MySql.Data.MySqlClient" />
+      <add name="DefaultConnection" connectionString="server=localhost;port=3306;User Id=steamware;password=steamware_password;Persist Security Info=True;database=EgtBwDb_000470;SslMode=none" providerName="MySql.Data.MySqlClient" />
    </connectionStrings>
    <runtime>
       <assemblyBinding xmlns="urn:schemas-microsoft-com:asm.v1">
@@ -31,7 +31,7 @@
          </dependentAssembly>
          <dependentAssembly>
             <assemblyIdentity name="K4os.Compression.LZ4.Streams" publicKeyToken="2186fa9121ef231d" culture="neutral" />
-            <bindingRedirect oldVersion="0.0.0.0-1.3.5.0" newVersion="1.3.5.0" />
+            <bindingRedirect oldVersion="0.0.0.0-1.3.6.0" newVersion="1.3.6.0" />
          </dependentAssembly>
          <dependentAssembly>
             <assemblyIdentity name="BouncyCastle.Crypto" publicKeyToken="0e99375e54769942" culture="neutral" />
@@ -41,6 +41,18 @@
             <assemblyIdentity name="System.Memory" publicKeyToken="cc7b13ffcd2ddd51" culture="neutral" />
             <bindingRedirect oldVersion="0.0.0.0-4.0.1.2" newVersion="4.0.1.2" />
          </dependentAssembly>
+         <dependentAssembly>
+            <assemblyIdentity name="System.IO.Pipelines" publicKeyToken="cc7b13ffcd2ddd51" culture="neutral" />
+            <bindingRedirect oldVersion="0.0.0.0-6.0.0.3" newVersion="6.0.0.3" />
+         </dependentAssembly>
+         <dependentAssembly>
+            <assemblyIdentity name="K4os.Compression.LZ4" publicKeyToken="2186fa9121ef231d" culture="neutral" />
+            <bindingRedirect oldVersion="0.0.0.0-1.2.5.0" newVersion="1.2.5.0" />
+         </dependentAssembly>
+         <dependentAssembly>
+            <assemblyIdentity name="K4os.Hash.xxHash" publicKeyToken="32cd54395057cec3" culture="neutral" />
+            <bindingRedirect oldVersion="0.0.0.0-1.0.8.0" newVersion="1.0.8.0" />
+         </dependentAssembly>
       </assemblyBinding>
    </runtime>
    <startup>

EgtBEAMWALL.DataLayer/Controllers/AliasController.cs

@@ -0,0 +1,247 @@
+using EgtBEAMWALL.DataLayer.DatabaseModels;
+using EgwProxy.MagMan.DTO;
+using NLog;
+using System;
+using System.Collections.Generic;
+using System.Linq;
+
+namespace EgtBEAMWALL.DataLayer.Controllers
+{
+    /// <summary>
+    /// Gestione Alias su DB (es: materiali da BTL e su DB)
+    /// </summary>
+    public class AliasController : IDisposable
+    {
+        #region Public Constructors
+
+        public AliasController()
+        {
+        }
+
+        #endregion Public Constructors
+
+#if false
+        /// <summary>
+        /// Conversion of DB model class to base class
+        /// </summary>
+        /// <param name="coreMat"></param>
+        /// <returns></returns>
+        public static Core.AliasM ConvToCore(AliasModel dbRec)
+        {
+            Core.AliasM answ = new Core.AliasM(dbRec.ValueOriginal, dbRec.ValueAlias);
+            return answ;
+        }
+#endif
+
+        #region Public Methods
+
+        /// <summary>
+        /// Helper conversione a DTO
+        /// </summary>
+        /// <param name="currRec"></param>
+        /// <returns></returns>
+        public static AliasDTO ConvToDto(AliasModel currRec)
+        {
+            AliasDTO answ = new AliasDTO()
+            {
+                ValOrig = currRec.ValueOriginal,
+                ValAlias = currRec.ValueAlias
+            };
+            return answ;
+        }
+
+        /// <summary>
+        /// Helper conversione da DTO
+        /// </summary>
+        /// <param name="currRec"></param>
+        /// <param name="family"></param>
+        /// <returns></returns>
+        public static AliasModel ConvToModel(AliasDTO currRec, string family)
+        {
+            AliasModel answ = new AliasModel()
+            {
+                Family = family,
+                ValueOriginal = currRec.ValOrig,
+                ValueAlias = currRec.ValAlias
+            };
+            return answ;
+        }
+
+        /// <summary>
+        /// Delete by key
+        /// </summary>
+        /// <param name="Family"></param>
+        /// <param name="ValueOriginal"></param>
+        /// <returns></returns>
+        public bool DeleteByKey(string Family, string ValueOriginal)
+        {
+            bool done = false;
+            using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
+            {
+                var items2del = localDbCtx
+                                    .AliasList
+                                    .Where(x => x.Family == Family && x.ValueOriginal == ValueOriginal);
+                try
+                {
+                    // Add to database
+                    localDbCtx.AliasList.RemoveRange(items2del);
+                    // Commit changes
+                    localDbCtx.SaveChanges();
+                    done = true;
+                }
+                catch (Exception exc)
+                {
+                    Log.Error($"EXCEPTION on Alias.DeleteByKey: {Environment.NewLine}{exc}");
+                }
+            }
+            return done;
+        }
+
+        public void Dispose()
+        {
+        }
+
+        /// <summary>
+        /// Get record by Key
+        /// </summary>
+        /// <param name="MatId"></param>
+        /// <returns></returns>
+        public AliasModel FindByDbId(string ValueOriginal)
+        {
+            using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
+            {
+                string Family = "MatCode";
+                return localDbCtx
+                        .AliasList
+                        .Where(x => x.Family == Family && x.ValueOriginal.ToLower() == ValueOriginal.ToLower())
+                        .SingleOrDefault();
+            }
+        }
+        /// <summary>
+        /// Get record by Key
+        /// </summary>
+        /// <param name="MatId"></param>
+        /// <returns></returns>
+        public AliasModel FindByDbId(string ValueOriginal, string Family)
+        {
+            using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
+            {
+                return localDbCtx
+                        .AliasList
+                        .Where(x => x.Family == Family && x.ValueOriginal.ToLower() == ValueOriginal.ToLower())
+                        .SingleOrDefault();
+            }
+        }
+
+        /// <summary>
+        /// Elenco Alias x famiglia
+        /// </summary>
+        /// <param name="Family">se "" restituisce tutti</param>
+        /// <returns></returns>
+        public List<AliasModel> GetFilt(string Family)
+        {
+            // retrieve
+            using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
+            {
+                return localDbCtx
+                        .AliasList
+                        .Where(x => x.Family == Family)
+                        .OrderBy(x => x.ValueOriginal)
+                        .ToList();
+            }
+        }
+
+        /// <summary>
+        /// Update or insert Alias record
+        /// </summary>
+        /// <param name="updItem"></param>
+        /// <returns></returns>
+        public bool Upsert(AliasModel updItem)
+        {
+            bool fatto = false;
+            using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
+            {
+                try
+                {
+                    var item2update = localDbCtx
+                                        .AliasList
+                                        .Where(x => x.Family == updItem.Family && x.ValueOriginal == updItem.ValueOriginal)
+                                        .SingleOrDefault();
+
+                    if (item2update != null)
+                    {
+                        // update, vers 1...
+                        localDbCtx.Entry(item2update).CurrentValues.SetValues(updItem);
+                    }
+                    else
+                    {
+                        localDbCtx.AliasList.Add(updItem);
+                    }
+                    // Commit changes
+                    localDbCtx.SaveChanges();
+                    fatto = true;
+                }
+                catch (Exception exc)
+                {
+                    Log.Error($"EXCEPTION on Alias.Upsert: {Environment.NewLine}{exc}");
+                }
+            }
+            return fatto;
+        }
+
+        /// <summary>
+        /// Update or insert Alias record list
+        /// </summary>
+        /// <param name="updList"></param>
+        /// <returns></returns>
+        public bool UpsertList(List<AliasModel> updList)
+        {
+            bool fatto = false;
+            using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
+            {
+                try
+                {
+                    foreach (var updItem in updList)
+                    {
+
+                        var item2update = localDbCtx
+                                            .AliasList
+                                            .Where(x => x.Family == updItem.Family && x.ValueOriginal.ToLower() == updItem.ValueOriginal.ToLower())
+                                            .SingleOrDefault();
+
+                        if (item2update != null)
+                        {
+                            if (item2update.ValueAlias.ToLower() != updItem.ValueAlias.ToLower())
+                            {
+                                localDbCtx.Entry(item2update).CurrentValues.SetValues(updItem);
+                            }
+                        }
+                        else
+                        {
+                            localDbCtx.AliasList.Add(updItem);
+                        }
+                    }
+                    // Commit changes
+                    localDbCtx.SaveChanges();
+                    fatto = true;
+                }
+                catch (Exception exc)
+                {
+                    Log.Error($"EXCEPTION on Alias.UpsertList: {Environment.NewLine}{exc}");
+                }
+            }
+            return fatto;
+        }
+
+        #endregion Public Methods
+
+        #region Private Fields
+
+        /// <summary>
+        /// Istanza logger
+        /// </summary>
+        private Logger Log = LogManager.GetCurrentClassLogger();
+
+        #endregion Private Fields
+    }
+}

EgtBEAMWALL.DataLayer/Controllers/MagmanSyncController.cs

@@ -0,0 +1,233 @@
+using EgtBEAMWALL.DataLayer.DatabaseModels;
+using EgwProxy.MagMan.DTO;
+using NLog;
+using System;
+using System.Collections.Generic;
+using System.Linq;
+
+namespace EgtBEAMWALL.DataLayer.Controllers
+{
+    /// <summary>
+    /// Gestione MagmanSync su DB (registrazione operazioni di sync con MagMan online)
+    /// </summary>
+    public class MagmanSyncController : IDisposable
+    {
+        #region Public Constructors
+
+        public MagmanSyncController()
+        {
+        }
+
+        #endregion Public Constructors
+
+        #region Public Methods
+
+        /// <summary>
+        /// Purge dei record inviati oltre periodo di giorni indicato
+        /// </summary>
+        /// <param name="NumDayMax">Num gg max da mantenere in registro</param>
+        /// <returns></returns>
+        public bool DeleteOlder(int NumDayMax)
+        {
+            bool done = false;
+            using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
+            {
+                DateTime adesso = DateTime.Now;
+                var items2del = localDbCtx
+                                    .SyncList
+                                    .Where(x => x.DtExe != null && adesso.Subtract(x.DtReq).TotalDays > NumDayMax);
+                try
+                {
+                    // Add to database
+                    localDbCtx.SyncList.RemoveRange(items2del);
+                    // Commit changes
+                    localDbCtx.SaveChanges();
+                    done = true;
+                }
+                catch (Exception exc)
+                {
+                    Log.Error($"EXCEPTION on Alias.DeleteOlder | NumDayMax: {NumDayMax}{Environment.NewLine}{exc}");
+                }
+            }
+            return done;
+        }
+
+        public void Dispose()
+        {
+        }
+
+        /// <summary>
+        /// Lista record filtrati
+        /// </summary>
+        /// <param name="SyncType">Tipo di record richiesti, se "" = tutti</param>
+        /// <param name="DtMax">Data-Ora limite per recupero ordinato DESC</param>
+        /// <param name="NumMax">num max di record da restituire</param>
+        /// <returns></returns>
+        public List<MagmanSyncModel> GetFilt(string SyncType, DateTime DtMax, int NumMax)
+        {
+            List<MagmanSyncModel> dbResult = new List<MagmanSyncModel>();
+            using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
+            {
+                dbResult = localDbCtx
+                        .SyncList
+                        .Where(x => (string.IsNullOrEmpty(SyncType) || x.SyncType == SyncType) && x.DtReq <= DtMax)
+                        .OrderByDescending(x => x.DtReq)
+                        .Take(NumMax)
+                        .ToList();
+            }
+            return dbResult;
+        }
+
+        /// <summary>
+        /// Insert record MagmanSync
+        /// </summary>
+        /// <param name="newRec"></param>
+        /// <returns>ID record inserito</returns>
+        public int Insert(MagmanSyncModel newRec)
+        {
+            int newId = 0;
+            using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
+            {
+                try
+                {
+                   // inserisco record 
+                   localDbCtx.SyncList.Add(newRec);
+                    
+                    // Commit changes
+                    localDbCtx.SaveChanges();
+                    newId = newRec.SyncId;
+                }
+                catch (Exception exc)
+                {
+                    Log.Error($"EXCEPTION on MagmanSync.Insert: {Environment.NewLine}{exc}");
+                }
+            }
+            return newId;
+        }
+
+        /// <summary>
+        /// Update con indicazione DtExt di completamento
+        /// </summary>
+        /// <param name="SyncId">ID record</param>
+        /// <param name="DtExe">Data-Ora exe</param>
+        /// <returns></returns>
+        public bool SetCompleted(int SyncId, DateTime DtExe)
+        {
+            bool fatto = false;
+            using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
+            {
+                try
+                {
+                    var item2update = localDbCtx
+                                        .SyncList
+                                        .Where(x => x.SyncId == SyncId)
+                                        .SingleOrDefault();
+
+                    if (item2update != null)
+                    {
+                        // update
+                        item2update.DtExe = DtExe;
+                        localDbCtx.Entry(item2update).State = System.Data.Entity.EntityState.Modified;
+                    }
+                    // Commit changes
+                    localDbCtx.SaveChanges();
+                    fatto = true;
+                }
+                catch (Exception exc)
+                {
+                    Log.Error($"EXCEPTION on MagmanSync.SetCompleted: {Environment.NewLine}{exc}");
+                }
+            }
+            return fatto;
+        }
+
+        /// <summary>
+        /// Update or insert record MagmanSync
+        /// </summary>
+        /// <param name="updItem"></param>
+        /// <returns></returns>
+        public bool Upsert(MagmanSyncModel updItem)
+        {
+            bool fatto = false;
+            using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
+            {
+                try
+                {
+                    var item2update = localDbCtx
+                                        .SyncList
+                                        .Where(x => x.SyncId == updItem.SyncId)
+                                        .SingleOrDefault();
+
+                    if (item2update != null)
+                    {
+                        // update, vers 1...
+                        localDbCtx.Entry(item2update).CurrentValues.SetValues(updItem);
+                    }
+                    else
+                    {
+                        localDbCtx.SyncList.Add(updItem);
+                    }
+                    // Commit changes
+                    localDbCtx.SaveChanges();
+                    fatto = true;
+                }
+                catch (Exception exc)
+                {
+                    Log.Error($"EXCEPTION on MagmanSync.Upsert: {Environment.NewLine}{exc}");
+                }
+            }
+            return fatto;
+        }
+
+        /// <summary>
+        /// Update or insert Alias record list
+        /// </summary>
+        /// <param name="updList"></param>
+        /// <returns></returns>
+        public bool UpsertList(List<MagmanSyncModel> updList)
+        {
+            bool fatto = false;
+            using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
+            {
+                try
+                {
+                    foreach (var updItem in updList)
+                    {
+                        var item2update = localDbCtx
+                                            .SyncList
+                                            .Where(x => x.SyncId == updItem.SyncId)
+                                            .SingleOrDefault();
+
+                        if (item2update != null)
+                        {
+                            localDbCtx.Entry(item2update).CurrentValues.SetValues(updItem);
+                        }
+                        else
+                        {
+                            localDbCtx.SyncList.Add(updItem);
+                        }
+                    }
+                    // Commit changes
+                    localDbCtx.SaveChanges();
+                    fatto = true;
+                }
+                catch (Exception exc)
+                {
+                    Log.Error($"EXCEPTION on MagmanSync.UpsertList: {Environment.NewLine}{exc}");
+                }
+            }
+            return fatto;
+        }
+
+        #endregion Public Methods
+
+        #region Private Fields
+
+        /// <summary>
+        /// Istanza logger
+        /// </summary>
+        private Logger Log = LogManager.GetCurrentClassLogger();
+
+        #endregion Private Fields
+    }
+}

EgtBEAMWALL.DataLayer/Controllers/MaterialsController.cs

@@ -0,0 +1,454 @@
+using EgtBEAMWALL.DataLayer.DatabaseModels;
+using EgwProxy.MagMan.DTO;
+using NLog;
+using System;
+using System.Collections.Generic;
+using System.Linq;
+using static EgtBEAMWALL.DataLayer.Controllers.MaterialsController.SearchResult;
+
+namespace EgtBEAMWALL.DataLayer.Controllers
+{
+    /// <summary>
+    /// Gestione Materiali su DB (= magazzino locale)
+    /// </summary>
+    public class MaterialsController : IDisposable
+    {
+        #region Public Constructors
+
+        public MaterialsController()
+        {
+        }
+
+        #endregion Public Constructors
+
+        #region Public Methods
+
+        /// <summary>
+        /// Conversion of DB model class to base class
+        /// </summary>
+        /// <param name="coreMat"></param>
+        /// <returns></returns>
+        public static Core.MaterialM ConvToCore(MaterialModel dbRec)
+        {
+            Core.MaterialM answ = new Core.MaterialM(dbRec.MatId, (double)dbRec.WMm, (double)dbRec.HMm, (double)dbRec.LMm, dbRec.MatCode);
+            return answ;
+        }
+
+        /// <summary>
+        /// Helper conversione a DTO
+        /// </summary>
+        /// <param name="currRec"></param>
+        /// <returns></returns>
+        public static MaterialDTO ConvToDto(MaterialModel currRec)
+        {
+            MaterialDTO answ = new MaterialDTO()
+            {
+                MatCloudId = currRec.MatCloudId,
+                MatLocalId = currRec.MatId,
+                MatCode = currRec.MatCode,
+                MatDesc = currRec.MatDesc,
+                HMm = currRec.HMm,
+                LMm = currRec.LMm,
+                WMm = currRec.WMm
+            };
+            return answ;
+        }
+
+        /// <summary>
+        /// Helper conversione da DTO
+        /// </summary>
+        /// <param name="currRec"></param>
+        /// <returns></returns>
+        public static MaterialModel ConvToModel(MaterialDTO currRec)
+        {
+            MaterialModel answ = new MaterialModel()
+            {
+                MatCloudId = currRec.MatCloudId,
+                MatId = currRec.MatLocalId,
+                MatCode = currRec.MatCode,
+                MatDesc = currRec.MatDesc,
+                HMm = currRec.HMm,
+                LMm = currRec.LMm,
+                WMm = currRec.WMm
+            };
+            return answ;
+        }
+
+        /// <summary>
+        /// Conversion of base class to DB model class
+        /// </summary>
+        /// <param name="coreRec"></param>
+        /// <returns></returns>
+        public static MaterialModel ConvToModel(Core.MaterialM coreRec)
+        {
+            MaterialModel answ = new MaterialModel();
+            if (coreRec != null)
+            {
+                answ = new MaterialModel()
+                {
+                    MatId = coreRec.nId,
+                    MatCode = coreRec.sMaterial,
+                    HMm = (decimal)coreRec.dH,
+                    LMm = (decimal)coreRec.dL,
+                    WMm = (decimal)coreRec.dW,
+                };
+            }
+            return answ;
+        }
+
+        /// <summary>
+        /// Delete by key
+        /// </summary>
+        /// <param name="MatId"></param>
+        /// <returns></returns>
+        public bool DeleteByKey(int MatId)
+        {
+            bool done = false;
+            using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
+            {
+                var items2del = localDbCtx
+                                    .MaterialsList
+                                    .Where(x => x.MatId == MatId);
+                try
+                {
+                    // Add to database
+                    localDbCtx.MaterialsList.RemoveRange(items2del);
+                    // Commit changes
+                    localDbCtx.SaveChanges();
+                    done = true;
+                }
+                catch (Exception exc)
+                {
+                    Log.Error($"EXCEPTION on Materials.DeleteByKey: {Environment.NewLine}{exc}");
+                }
+            }
+            return done;
+        }
+
+        public void Dispose()
+        {
+        }
+
+        /// <summary>
+        /// Get record by Key
+        /// </summary>
+        /// <param name="MatId"></param>
+        /// <returns></returns>
+        public Core.MaterialM FindByDbId(int MatId)
+        {
+            Core.MaterialM result = new Core.MaterialM(0, 0, 0, "NONE");
+            var rawData = FindByDbIdModel(MatId);
+            if (rawData != null)
+            {
+                result = ConvToCore(rawData);
+            }
+            return result;
+        }
+
+        /// <summary>
+        /// Get record by Key in formato Model
+        /// </summary>
+        /// <param name="MatId"></param>
+        /// <returns></returns>
+        public MaterialModel FindByDbIdModel(int MatId)
+        {
+            MaterialModel result = new MaterialModel();
+            using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
+            {
+                result = localDbCtx
+                                .MaterialsList
+                                .Where(x => x.MatId == MatId)
+                                .SingleOrDefault();
+            }
+            return result;
+        }
+
+        /// <summary>
+        /// Get Material (filtro x MatId) in formato Core
+        /// </summary>
+        /// <param name="MatCode">se "" restituisce tutti</param>
+        /// <returns></returns>
+        public List<Core.MaterialM> GetFilt(string MatCode)
+        {
+            // recupero e converto
+            List<Core.MaterialM> result = new List<Core.MaterialM>();
+            var rawData = GetFiltModel(MatCode);
+            if (rawData != null)
+            {
+                result = rawData.Select(x => ConvToCore(x)).ToList();
+            }
+            return result;
+        }
+
+        /// <summary>
+        /// Get Material (filtro x MatId) in formato Model
+        /// </summary>
+        /// <param name="MatCode">se "" restituisce tutti</param>
+        /// <returns></returns>
+        public List<MaterialModel> GetFiltModel(string MatCode)
+        {
+            List<MaterialModel> result = new List<MaterialModel>();
+            // retrieve
+            using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
+            {
+                result = localDbCtx
+                                .MaterialsList
+                                .Where(x => string.IsNullOrEmpty(MatCode) || x.MatCode == MatCode)
+                                .OrderBy(x => x.MatDesc)
+                                .ToList();
+            }
+            return result;
+        }
+
+        /// <summary>
+        /// Insert Material record from CoreM if missing or return existing (for Id)
+        /// </summary>
+        /// <param name="coreItem"></param>
+        /// <returns>MatId (existing or new)</returns>
+        public int Insert(Core.MaterialM coreItem)
+        {
+            int newIdx = 0;
+            // converto
+            MaterialModel updItem = ConvToModel(coreItem);
+            newIdx = Insert(updItem);
+            return newIdx;
+        }
+
+        /// <summary>
+        /// Insert Material record
+        /// </summary>
+        /// <param name="updItem"></param>
+        /// <returns>MatId (existing or new)</returns>
+        public int Insert(MaterialModel updItem)
+        {
+            int newIdx = 0;
+            using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
+            {
+                try
+                {
+                    var item2update = localDbCtx
+                                        .MaterialsList
+                                        .Where(x => (updItem.MatId > 0 && x.MatId == updItem.MatId)
+                                                 || (updItem.MatCloudId > 0 && x.MatCloudId == updItem.MatCloudId)
+                                                 || (x.MatCode == updItem.MatCode && x.WMm == updItem.WMm && x.HMm == updItem.HMm && x.LMm == updItem.LMm))
+                                        .SingleOrDefault();
+
+                    if (item2update != null)
+                    {
+                        newIdx = item2update.MatId;
+                    }
+                    else
+                    {
+                        localDbCtx.MaterialsList.Add(updItem);
+                        // Commit changes
+                        localDbCtx.SaveChanges();
+                        newIdx = updItem.MatId;
+                    }
+                }
+                catch (Exception exc)
+                {
+                    Log.Error($"EXCEPTION on Materials.Insert: {Environment.NewLine}{exc}");
+                }
+            }
+            return newIdx;
+        }
+
+        /// <summary>
+        /// Restituisce il primo materiale (se esiste) per MatCode (diretto o tramite Alias)
+        /// </summary>
+        /// <param name="MatCode">Non accetta ""</param>
+        /// <returns></returns>
+        public SearchResult SearchFilt(string MatCode)
+        {
+            // init valori esito ricerca + risultato
+            TypeFound esito = string.IsNullOrEmpty(MatCode) ? TypeFound.MISSING_CODE : TypeFound.NOT_FOUND;
+            List<Core.MaterialM> result = new List<Core.MaterialM>();
+            // solo se ho una VERA ricerca x MatCode
+            if (!string.IsNullOrEmpty(MatCode))
+            {
+                // cerco nei materiali
+                var rawData = GetFiltModel(MatCode);
+                if (rawData != null && rawData.Count > 0)
+                {
+                    // ...e converto
+                    result = rawData.Select(x => ConvToCore(x)).ToList();
+                    esito = TypeFound.MATERIAL;
+                }
+                else
+                {
+                    // cerco negli alias...
+                    using (AliasController aliasDbContr = new AliasController())
+                    {
+                        var aliasRec = aliasDbContr.FindByDbId(MatCode);
+                        if (aliasRec != null)
+                        {
+                            rawData = GetFiltModel(aliasRec.ValueAlias);
+                            if (rawData != null && rawData.Count > 0)
+                            {
+                                // ...e converto
+                                result = rawData.Select(x => ConvToCore(x)).ToList();
+                                esito = TypeFound.ALIAS;
+                            }
+                        }
+                    }
+                }
+            }
+            // compongo risposta!
+            SearchResult answ = new SearchResult()
+            {
+                Tipo = esito,
+                Result = result
+            };
+            return answ;
+        }
+
+        /// <summary>
+        /// Update Material record from CoreM
+        /// </summary>
+        /// <param name="coreItem"></param>
+        /// <returns>Returns 0 if not found</returns>
+        public int Update(Core.MaterialM coreItem)
+        {
+            int newIdx = 0;
+            // converto
+            MaterialModel updItem = ConvToModel(coreItem);
+            newIdx = Update(updItem);
+            return newIdx;
+        }
+
+        /// <summary>
+        /// Update Material record
+        /// </summary>
+        /// <param name="updItem"></param>
+        /// <returns>Returns 0 if not found</returns>
+        public int Update(MaterialModel updItem)
+        {
+            int newIdx = 0;
+            using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
+            {
+                try
+                {
+                    var item2update = localDbCtx
+                                        .MaterialsList
+                                        .Where(x => (updItem.MatId > 0 && x.MatId == updItem.MatId)
+                                                 || (updItem.MatCloudId > 0 && x.MatCloudId == updItem.MatCloudId)
+                                                 || (x.MatCode == updItem.MatCode && x.WMm == updItem.WMm && x.HMm == updItem.HMm && x.LMm == updItem.LMm))
+                                        .SingleOrDefault();
+
+                    if (item2update != null)
+                    {
+                        //// update, vers 1...
+                        //localDbCtx.Entry(item2update).CurrentValues.SetValues(updItem);
+                        item2update.MatCloudId = updItem.MatCloudId;
+                        item2update.MatDesc = updItem.MatDesc;
+                        localDbCtx.Entry(item2update).State = System.Data.Entity.EntityState.Modified;
+                        // Commit changes
+                        localDbCtx.SaveChanges();
+                        newIdx = item2update.MatId;
+                    }
+                }
+                catch (Exception exc)
+                {
+                    Log.Error($"EXCEPTION on Materials.Update: {Environment.NewLine}{exc}");
+                }
+            }
+            return newIdx;
+        }
+
+        /// <summary>
+        /// Upsert Material record
+        /// </summary>
+        /// <param name="updItem"></param>
+        /// <returns>MatId (existing or new)</returns>
+        public int Upsert(MaterialModel updItem)
+        {
+            int newIdx = 0;
+            using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
+            {
+                try
+                {
+                    var item2update = localDbCtx
+                                        .MaterialsList
+                                        .Where(x => (updItem.MatId > 0 && x.MatId == updItem.MatId)
+                                                 || (updItem.MatCloudId > 0 && x.MatCloudId == updItem.MatCloudId)
+                                                 || (x.MatCode == updItem.MatCode && x.WMm == updItem.WMm && x.HMm == updItem.HMm && x.LMm == updItem.LMm))
+                                        .SingleOrDefault();
+
+                    if (item2update != null)
+                    {
+                        //// update, vers 1...
+                        //localDbCtx.Entry(item2update).CurrentValues.SetValues(updItem);
+                        item2update.MatCloudId = updItem.MatCloudId;
+                        item2update.MatDesc = updItem.MatDesc;
+                        localDbCtx.Entry(item2update).State = System.Data.Entity.EntityState.Modified;
+                        // Commit changes
+                        localDbCtx.SaveChanges();
+                        newIdx = item2update.MatId;
+                    }
+                    else
+                    {
+                        localDbCtx.MaterialsList.Add(updItem);
+                        // Commit changes
+                        localDbCtx.SaveChanges();
+                        newIdx = updItem.MatId;
+                    }
+                }
+                catch (Exception exc)
+                {
+                    Log.Error($"EXCEPTION on Materials.Insert: {Environment.NewLine}{exc}");
+                }
+            }
+            return newIdx;
+        }
+
+        #endregion Public Methods
+
+        #region Public Classes
+
+        /// <summary>
+        /// Risultato ricerca materiali
+        /// </summary>
+        public class SearchResult
+        {
+            #region Public Enums
+
+            /// <summary>
+            /// Enum del risultato della ricerca materiali
+            /// </summary>
+            public enum TypeFound
+            {
+                MISSING_CODE = 0,
+                NOT_FOUND,
+                ALIAS,
+                MATERIAL
+            }
+
+            #endregion Public Enums
+
+            #region Public Properties
+
+            /// <summary>
+            /// Materiali trovati
+            /// </summary>
+            public List<Core.MaterialM> Result { get; set; } = new List<Core.MaterialM>();
+
+            /// <summary>
+            /// Tipologia oggetto trovato
+            /// </summary>
+            public TypeFound Tipo { get; set; } = TypeFound.MISSING_CODE;
+
+            #endregion Public Properties
+        }
+
+        #endregion Public Classes
+
+        #region Private Fields
+
+        /// <summary>
+        /// Istanza logger
+        /// </summary>
+        private NLog.Logger Log = LogManager.GetCurrentClassLogger();
+
+        #endregion Private Fields
+    }
+}

EgtBEAMWALL.DataLayer/Controllers/ProdController.cs

@@ -1,7 +1,9 @@
 using EgtBEAMWALL.DataLayer.DatabaseModels;
+using EgwProxy.MagMan.DTO;
 using NLog;
 using System;
 using System.Collections.Generic;
+using System.Data.Entity;
 using System.Linq;
 using static EgtBEAMWALL.Core.ConstBeam;
 
@@ -57,6 +59,75 @@ namespace EgtBEAMWALL.DataLayer.Controllers
             return done;
         }
 
+        /// <summary>
+        /// Helper conversione a ProjectDTO
+        /// </summary>
+        /// <param name="currRec">record in formato ProdModel</param>
+        /// <returns></returns>
+        public static ProjectDTO ConvToDto(ProdModel currRec)
+        {
+            // ho valori mancanti che saranno calcolati dal cloud e valori messi a zero di default
+            ProjectDTO answ = new ProjectDTO()
+            {
+                ProjCloudId = currRec.ProjCloudId,
+                ProjLocalId = currRec.ProdDbId,
+                ProjExtId = currRec.ProdId,
+                // è calcolato sul cloud, da token --> machine ID
+                MachineCloudId = 0,
+                // è calcolato sul cloud, da token --> KeyNum
+                KeyNum = 0,
+                // disponibile solo su PROJ
+                BTLFileName = "",
+                PType = (EgwProxy.MagMan.BWType)currRec.PType,
+                Machine = currRec.Machine,
+                ProjDescription = currRec.Description,
+                DtCreated = currRec.DtCreated,
+                DtLastAction = DateTime.MinValue,
+                DtSchedule = DateTime.MinValue,
+                DtStartProd = DateTime.MinValue,
+                // disponibile solo su PROJ
+                ListName = "",
+                ProcTimeEst = 0,
+                ProcTimeReal = 0,
+                IsActive = currRec.IsActive,
+                IsArchived = currRec.IsArchived
+            };
+            return answ;
+        }
+        /// <summary>
+        /// Helper conversione modelli verso Core.ProdItem
+        /// </summary>
+        /// <param name="currProd"></param>
+        /// <returns></returns>
+        public Core.ProdItem ConvToCore(ProdModel currProd)
+        {
+            Core.ProdItem answ = Core.ProdItem.CreateProdItem(currProd.ProdId, ProjIdByProd(currProd.ProdId), currProd.DtCreated, currProd.Description, currProd.PType, currProd.Machine, currProd.LockedBy, currProd.LockDate, currProd.IsActive, currProd.IsProduced, currProd.IsArchived, currProd.ProjListNav.Select(j => Core.ProjFileM.CreateProjFileM(j.ProjId, currProd.ProdId, j.DtCreated, j.DtExported, j.ListName, j.BTLFileName, j.ProjDescription, j.IsNew, j.Locked, j.PType, j.Machine, j.IsActive, j.IsActive, j.ProjCloudId)).ToList());
+            return answ;
+        }
+
+        /// <summary>
+        /// Helper conversione modelli verso Core.ProdItem
+        /// </summary>
+        /// <param name="currProd"></param>
+        /// <returns></returns>
+        public Core.ProdItem ConvToCore(ProjModel currProj)
+        {
+            Core.ProdItem answ = Core.ProdItem.CreateProdItem(Core.ProjFileM.CreateProjFileM(currProj.ProjId, 0, currProj.DtCreated, currProj.DtExported, currProj.ListName, currProj.BTLFileName, currProj.ProjDescription, currProj.IsNew, currProj.Locked, currProj.PType, currProj.Machine, currProj.IsActive, currProj.IsActive, currProj.ProjCloudId));
+            return answ;
+        }
+
+        /// <summary>
+        /// Helper conversione modelli
+        /// </summary>
+        /// <param name="currProd"></param>
+        /// <returns></returns>
+        public Core.ProdFileM ConvToCoreFile(ProdModel currProd)
+        {
+            Core.ProdFileM answ = Core.ProdFileM.CreateProdFileM(currProd.ProdId, ProjIdByProd(currProd.ProdId), currProd.DtCreated, currProd.Description, currProd.PType, currProd.Machine, currProd.LockedBy, currProd.LockDate, currProd.IsActive, currProd.IsProduced, currProd.IsArchived, currProd.ProjCloudId);
+            //Core.ProdFileM answ = Core.ProdFileM.CreateProdFileM(currProd.ProdId, ProjIdByProd(currProd.ProdId), currProd.DtCreated, currProd.Description, currProd.PType, currProd.Machine, currProd.LockedBy, currProd.LockDate, currProd.IsActive, currProd.IsProduced, currProd.IsArchived, currProd.ProjListNav.Select(j => Core.ProjFileM.CreateProjFileM(j.ProdId, currProd.ProdId, j.DtCreated, j.DtExported, j.ListName, j.BTLFileName, j.ProjDescription, j.IsNew, j.Locked, j.PType, j.Machine, j.IsActive, j.IsActive)).ToList());
+            return answ;
+        }
+
         /// <summary>
         /// Delete Prod(+proj...) logically / on DB by ProdId
         /// </summary>
@@ -202,17 +273,17 @@ namespace EgtBEAMWALL.DataLayer.Controllers
             {
                 return null;
             }
-            return Core.ProdFileM.CreateProdFileM(currProd.ProdId, ProjIdByProd(ProdId), currProd.DtCreated, currProd.Description, currProd.PType, currProd.Machine, currProd.LockedBy, currProd.LockDate, currProd.IsActive, currProd.IsProduced, currProd.IsArchived);
+            return Core.ProdFileM.CreateProdFileM(currProd.ProdId, ProjIdByProd(ProdId), currProd.DtCreated, currProd.Description, currProd.PType, currProd.Machine, currProd.LockedBy, currProd.LockDate, currProd.IsActive, currProd.IsProduced, currProd.IsArchived, currProd.ProjCloudId);
         }
 
         /// <summary>
         /// Elenco prod
         /// </summary>
-        /// <param name="numRecord">Num max record da recuperare</param>
+        /// <param name="NumRecord">Num max record da recuperare</param>
         /// <param name="OnlyActive">Solo con ALMENO 1 PROJ attivo (senza cancellazione logica)</param>
         /// <param name="ShowArchived">Se true: mostra anche archiviati (default li nasconde)</param>
         /// <returns></returns>
-        public List<Core.ProdFileM> GetLastDesc(int numRecord, bool OnlyActive, bool ShowArchived = false)
+        public List<Core.ProdFileM> GetLastDesc(int NumRecord, bool OnlyActive, bool ShowArchived = false)
         {
             List<Core.ProdFileM> result = new List<Core.ProdFileM>();
             //List<ProdModel> dbResult = GetLastDbModelDesc(numRecord);
@@ -220,9 +291,9 @@ namespace EgtBEAMWALL.DataLayer.Controllers
             using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
             {
                 // se numRecord = 0 --> passo tutti
-                if (numRecord == 0)
+                if (NumRecord == 0)
                 {
-                    numRecord = localDbCtx.ProdList.Count();
+                    NumRecord = localDbCtx.ProdList.Count();
                 }
                 // retrieve
                 dbResult = localDbCtx
@@ -235,25 +306,25 @@ namespace EgtBEAMWALL.DataLayer.Controllers
                         (p, e) => p)
                     .Distinct()
                     .OrderByDescending(x => x.ProdId)
-                    .Take(numRecord)
+                    .Take(NumRecord)
                     .ToList();
             }
 
             // conversione
-            result = dbResult.Select(x => Core.ProdFileM.CreateProdFileM(x.ProdId, ProjIdByProd(x.ProdId), x.DtCreated, x.Description, x.PType, x.Machine, x.LockedBy, x.LockDate, x.IsActive, x.IsProduced, x.IsArchived)).ToList();
+            result = dbResult.Select(x => Core.ProdFileM.CreateProdFileM(x.ProdId, ProjIdByProd(x.ProdId), x.DtCreated, x.Description, x.PType, x.Machine, x.LockedBy, x.LockDate, x.IsActive, x.IsProduced, x.IsArchived, x.ProjCloudId)).ToList();
             return result;
         }
 
         /// <summary>
         /// Elenco prod
         /// </summary>
-        /// <param name="dtStart">Inizio periodo estrazione</param>
-        /// <param name="dtEnd">Fine periodo estrazione</param>
-        /// <param name="numRecord">Num max record da recuperare</param>
+        /// <param name="DtStart">Inizio periodo estrazione</param>
+        /// <param name="DtEnd">Fine periodo estrazione</param>
+        /// <param name="NumRecord">Num max record da recuperare</param>
         /// <param name="OnlyActive">Solo con ALMENO 1 PROJ attivo (senza cancellazione logica)</param>
         /// <param name="ShowArchived">Se true: mostra anche archiviati (default li nasconde)</param>
         /// <returns></returns>
-        public List<Core.ProdFileM> GetLastDesc(DateTime dtStart, DateTime dtEnd, int numRecord, bool OnlyActive, bool ShowArchived = false)
+        public List<Core.ProdFileM> GetLastDesc(DateTime DtStart, DateTime DtEnd, int NumRecord, bool OnlyActive, bool ShowArchived = false)
         {
             List<Core.ProdFileM> result = new List<Core.ProdFileM>();
             //List<ProdModel> dbResult = GetLastDbModelDesc(numRecord);
@@ -261,14 +332,14 @@ namespace EgtBEAMWALL.DataLayer.Controllers
             using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
             {
                 // se numRecord = 0 --> passo tutti
-                if (numRecord == 0)
+                if (NumRecord == 0)
                 {
-                    numRecord = localDbCtx.ProdList.Count();
+                    NumRecord = localDbCtx.ProdList.Count();
                 }
                 // retrieve
                 dbResult = localDbCtx
                     .ProdList
-                    .Where(x => x.DtCreated >= dtStart && x.DtCreated <= dtEnd && (!x.IsArchived || ShowArchived))
+                    .Where(x => x.DtCreated >= DtStart && x.DtCreated <= DtEnd && (!x.IsArchived || ShowArchived))
                     // condizione join sui PROJ
                     .Join(localDbCtx.ProjList.Where(x => x.IsActive || !OnlyActive),
                         p => p.ProdDbId,
@@ -276,12 +347,189 @@ namespace EgtBEAMWALL.DataLayer.Controllers
                         (p, e) => p)
                     .Distinct()
                     .OrderByDescending(x => x.ProdId)
-                    .Take(numRecord)
+                    .Take(NumRecord)
                     .ToList();
             }
 
             // conversione
-            result = dbResult.Select(x => Core.ProdFileM.CreateProdFileM(x.ProdId, ProjIdByProd(x.ProdId), x.DtCreated, x.Description, x.PType, x.Machine, x.LockedBy, x.LockDate, x.IsActive, x.IsProduced, x.IsArchived)).ToList();
+            result = dbResult.Select(x => Core.ProdFileM.CreateProdFileM(x.ProdId, ProjIdByProd(x.ProdId), x.DtCreated, x.Description, x.PType, x.Machine, x.LockedBy, x.LockDate, x.IsActive, x.IsProduced, x.IsArchived, x.ProjCloudId)).ToList();
+            return result;
+        }
+
+        /// <summary>
+        /// Elenco prod
+        /// </summary>
+        /// <param name="NumRecord">Num max record da recuperare</param>
+        /// <param name="OnlyActive">Solo con ALMENO 1 PROJ attivo (senza cancellazione logica)</param>
+        /// <param name="ShowArchived">Se true: mostra anche archiviati (default li nasconde)</param>
+        /// <returns></returns>
+        public List<Core.ProdItem> GetLastDescFull(int NumRecord, bool OnlyActive, bool ShowArchived = false)
+        {
+            List<Core.ProdItem> result = new List<Core.ProdItem>();
+            // elenco prod completi
+            List<ProdModel> dbResultProd = new List<ProdModel>();
+            // elenco proj "orfani"
+            List<ProjModel> dbResultProj = new List<ProjModel>();
+            using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
+            {
+                // se numRecord = 0 --> passo tutti
+                if (NumRecord == 0)
+                {
+                    NumRecord = localDbCtx.ProdList.Count();
+                }
+                // recupero PROD + proj relativi
+                dbResultProd = localDbCtx
+                            .ProdList
+                            .Where(x => (!x.IsArchived || ShowArchived))
+                            //.Include(j => j.)
+                            // condizione join sui PROJ
+                            .Join(localDbCtx.ProjList.Where(x => x.IsActive || !OnlyActive),
+                                p => p.ProdDbId,
+                                e => e.ProdDbId,
+                                (p, e) => p)
+                            .Distinct()
+                            .Include(j => j.ProjListNav)
+                            .OrderByDescending(x => x.ProdId)
+                            .Take(NumRecord)
+                            .ToList();
+
+                // recupero i proj "orfani"
+                dbResultProj = localDbCtx
+                            .ProjList
+                            .Where(x => (x.IsActive || !OnlyActive) && x.Prod == null)
+                            .OrderByDescending(x => x.ProjId)
+                            .Take(NumRecord)
+                            .ToList();
+            }
+
+            // conversione
+            result = dbResultProd.Select(x => ConvToCore(x)).ToList();
+            var resProj = dbResultProj.Select(x => ConvToCore(x)).ToList();
+            // sommo i risultati
+            result.AddRange(resProj);
+            return result;
+        }
+
+        /// <summary>
+        /// Elenco prod
+        /// </summary>
+        /// <param name="DtStart">Inizio periodo estrazione</param>
+        /// <param name="DtEnd">Fine periodo estrazione</param>
+        /// <param name="NumRecord">Num max record da recuperare</param>
+        /// <param name="OnlyActive">Solo con ALMENO 1 PROJ attivo (senza cancellazione logica)</param>
+        /// <param name="ShowArchived">Se true: mostra anche archiviati (default li nasconde)</param>
+        /// <returns></returns>
+        public List<Core.ProdItem> GetLastDescFull(DateTime DtStart, DateTime DtEnd, int NumRecord, bool OnlyActive, bool ShowArchived = false)
+        {
+            List<Core.ProdItem> result = new List<Core.ProdItem>();
+            // elenco prod completi
+            List<ProdModel> dbResultProd = new List<ProdModel>();
+            // elenco proj "orfani"
+            List<ProjModel> dbResultProj = new List<ProjModel>();
+            using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
+            {
+                // se numRecord = 0 --> passo tutti
+                if (NumRecord == 0)
+                {
+                    NumRecord = localDbCtx.ProdList.Count();
+                }
+                // retrieve
+                dbResultProd = localDbCtx
+                            .ProdList
+                            .Where(x => x.DtCreated >= DtStart && x.DtCreated <= DtEnd && (!x.IsArchived || ShowArchived))
+                            // condizione join sui PROJ
+                            .Join(localDbCtx.ProjList.Where(x => x.IsActive || !OnlyActive),
+                                p => p.ProdDbId,
+                                e => e.ProdDbId,
+                                (p, e) => p)
+                            .Distinct()
+                            .Include(j => j.ProjListNav)
+                            .OrderByDescending(x => x.ProdId)
+                            .Take(NumRecord)
+                            .ToList();
+
+                // recupero i proj "orfani"
+                dbResultProj = localDbCtx
+                            .ProjList
+                            .Where(x => (x.IsActive || !OnlyActive) && x.Prod == null && (x.DtCreated >= DtStart && x.DtCreated <= DtEnd))
+                            .OrderByDescending(x => x.ProjId)
+                            .Take(NumRecord)
+                            .ToList();
+            }
+            // conversione
+            result = dbResultProd.Select(x => ConvToCore(x)).ToList();
+            var resProj = dbResultProj.Select(x => ConvToCore(x)).ToList();
+            // sommo i risultati
+            result.AddRange(resProj);
+            return result;
+        }
+
+        /// <summary>
+        /// Elenco prod
+        /// </summary>
+        /// <param name="DtStart">Inizio periodo estrazione</param>
+        /// <param name="DtEnd">Fine periodo estrazione</param>
+        /// <param name="DtIsCreation">Ture: usa data creazione / False: usa data export</param>
+        /// <param name="NumRecord">Num max record da recuperare</param>
+        /// <param name="OnlyActive">Solo con ALMENO 1 PROJ attivo (senza cancellazione logica)</param>
+        /// <param name="Machine">Nome Macchina (default vuoto = non usato)</param>
+        /// <param name="BtlFileName">Nome file BTL (default vuoto = non usato)</param>
+        /// <param name="ListName">Nome List (default vuoto = non usato)</param>
+        /// <param name="ShowArchived">Se true: mostra anche archiviati (default li nasconde)</param>
+        /// <returns></returns>
+        public List<Core.ProdItem> GetLastDescFull(DateTime DtStart, DateTime DtEnd, bool DtIsCreation, int NumRecord, bool OnlyActive, string Machine = "", string BtlFileName = "", string ListName = "", bool ShowArchived = false)
+        {
+            List<Core.ProdItem> result = new List<Core.ProdItem>();
+            List<ProdModel> dbResultProd = new List<ProdModel>();
+            // elenco proj "orfani"
+            List<ProjModel> dbResultProj = new List<ProjModel>();
+            using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
+            {
+                // se numRecord = 0 --> passo tutti
+                if (NumRecord == 0)
+                {
+                    NumRecord = localDbCtx.ProdList.Count();
+                }
+                // retrieve
+                dbResultProd = localDbCtx
+                            .ProdList
+                            .Where(x => (!x.IsArchived || ShowArchived))
+                            // condizione join sui PROJ
+                            .Join(localDbCtx.ProjList.Where(x =>
+                                    (x.IsActive || !OnlyActive)
+                                    && (string.IsNullOrEmpty(Machine) || x.Machine.ToLower().Contains(Machine.ToLower()))
+                                    && (string.IsNullOrEmpty(BtlFileName) || x.BTLFileName.ToLower().Contains(BtlFileName.ToLower()))
+                                    && (string.IsNullOrEmpty(ListName) || x.ListName.ToLower().Contains(ListName.ToLower()))
+                                    && ((DtIsCreation && (x.DtCreated >= DtStart && x.DtCreated <= DtEnd)) || (!DtIsCreation && (x.DtExported >= DtStart && x.DtExported <= DtEnd)))
+                                    ),
+                                p => p.ProdDbId,
+                                e => e.ProdDbId,
+                                (p, e) => p)
+                            .Distinct()
+                            .Include(j => j.ProjListNav)
+                            .OrderByDescending(x => x.ProdId)
+                            .Take(NumRecord)
+                            .ToList();
+
+                // recupero i proj "orfani"
+                dbResultProj = localDbCtx
+                            .ProjList
+                            .Where(x =>
+                            (x.IsActive || !OnlyActive)
+                            && x.Prod == null
+                            && (string.IsNullOrEmpty(Machine) || x.Machine.ToLower().Contains(Machine.ToLower()))
+                            && (string.IsNullOrEmpty(BtlFileName) || x.BTLFileName.ToLower().Contains(BtlFileName.ToLower()))
+                            && (string.IsNullOrEmpty(ListName) || x.ListName.ToLower().Contains(ListName.ToLower()))
+                            && ((DtIsCreation && (x.DtCreated >= DtStart && x.DtCreated <= DtEnd)) || (!DtIsCreation && (x.DtExported >= DtStart && x.DtExported <= DtEnd))))
+                            .OrderByDescending(x => x.ProjId)
+                            .Take(NumRecord)
+                            .ToList();
+            }
+            // conversione
+            result = dbResultProd.Select(x => ConvToCore(x)).ToList();
+            var resProj = dbResultProj.Select(x => ConvToCore(x)).ToList();
+            // sommo i risultati
+            result.AddRange(resProj);
             return result;
         }
 
@@ -538,6 +786,64 @@ namespace EgtBEAMWALL.DataLayer.Controllers
             return fatto;
         }
 
+        /// <summary>
+        /// Update record su DB x ProjectCloudId
+        /// </summary>
+        /// <param name="ProdId"></param>
+        /// <param name="Description"></param>
+        /// <returns></returns>
+        public Core.ProdFileM UpdateCloudId(int ProdId, int ProjCloudId)
+        {
+            // cerco specifico Proj
+            ProdModel currData;
+            using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
+            {
+                currData = localDbCtx
+                               .ProdList
+                               .Where(x => x.ProdId == ProdId)
+                               .SingleOrDefault();
+                if (currData != null)
+                {
+                    try
+                    {
+                        // aggiorno valore BTL
+                        currData.ProjCloudId = ProjCloudId;
+
+                        // salvo record PROD
+                        localDbCtx.SaveChanges();
+
+                        // cerco se ci siano prod colelgati ed aggiorno pure loro...
+                        var projList = localDbCtx
+                                        .ProjList
+                                        .Where(x => x.ProdDbId == currData.ProdDbId)
+                                        .ToList();
+                        if (projList != null)
+                        {
+                            foreach (var item in projList)
+                            {
+                                item.ProjCloudId = ProjCloudId;
+                            }
+                            // salvo modifihce ai PROJ
+                            localDbCtx.SaveChanges();
+                        }
+                    }
+                    catch (Exception exc)
+                    {
+                        string errMessage = $"EXCEPTION on Prod.UpdateCloudId:{Environment.NewLine}{exc}";
+                        Console.WriteLine(errMessage);
+                        Log.Error(errMessage);
+                    }
+                }
+                else
+                {
+                    string errMessage = $"ERROR on Prod.UpdateCloudId: req item was not found | ProdId {ProdId} | ProjCloudId {ProjCloudId}";
+                    Console.WriteLine(errMessage);
+                    Log.Error(errMessage);
+                }
+            }
+            return ConvToCoreFile(currData);
+        }
+
         /// <summary>
         /// Update record su DB x Description
         /// </summary>
@@ -807,7 +1113,7 @@ namespace EgtBEAMWALL.DataLayer.Controllers
                     Log.Error(errMessage);
                 }
             }
-            return coreConv(currData);
+            return ConvToCoreFile(currData);
         }
 
         /// <summary>
@@ -829,7 +1135,7 @@ namespace EgtBEAMWALL.DataLayer.Controllers
                             .SingleOrDefault();
                     if (currData != null)
                     {
-                        // aggiorno valore BTL
+                        // aggiorno valore tipo
                         currData.PType = PType;
 
                         // Commit changes
@@ -849,7 +1155,7 @@ namespace EgtBEAMWALL.DataLayer.Controllers
                     Log.Error(errMessage);
                 }
             }
-            return coreConv(currData);
+            return ConvToCoreFile(currData);
         }
 
         /// <summary> Return User Code/Key that Locks by ProdId (proj & prod) </summary> <param
@@ -902,17 +1208,6 @@ namespace EgtBEAMWALL.DataLayer.Controllers
 
         #region Protected Methods
 
-        /// <summary>
-        /// Helper conversione modelli
-        /// </summary>
-        /// <param name="currProd"></param>
-        /// <returns></returns>
-        protected Core.ProdFileM coreConv(ProdModel currProd)
-        {
-            Core.ProdFileM answ = Core.ProdFileM.CreateProdFileM(currProd.ProdId, ProjIdByProd(currProd.ProdId), currProd.DtCreated, currProd.Description, currProd.PType, currProd.Machine, currProd.LockedBy, currProd.LockDate, currProd.IsActive, currProd.IsProduced, currProd.IsArchived);
-            return answ;
-        }
-
         protected List<int> ProjIdByProd(int ProdId)
         {
             var ProjCtr = new ProjController();

EgtBEAMWALL.DataLayer/Controllers/ProjController.cs

@@ -1,4 +1,5 @@
 using EgtBEAMWALL.DataLayer.DatabaseModels;
+using EgwProxy.MagMan.DTO;
 using NLog;
 using System;
 using System.Collections.Generic;
@@ -19,6 +20,72 @@ namespace EgtBEAMWALL.DataLayer.Controllers
 
         #region Public Methods
 
+        /// <summary>
+        /// Helper conversione a ProjectDTO
+        /// </summary>
+        /// <param name="currRec">record in formato ProjModel</param>
+        /// <returns></returns>
+        public static ProjectDTO ConvToDto(ProjModel currRec)
+        {
+            // ho valori mancanti che saranno calcolati dal cloud e valori messi a zero di default
+            ProjectDTO answ = new ProjectDTO()
+            {
+                ProjCloudId = currRec.ProjCloudId,
+                ProjLocalId = currRec.ProjDbId,
+                ProjExtId = currRec.ProjId,
+                // è calcolato sul cloud, da token --> machine ID
+                MachineCloudId = 0,
+                // è calcolato sul cloud, da token --> KeyNum
+                KeyNum = 0,
+                BTLFileName = currRec.BTLFileName,
+                PType = (EgwProxy.MagMan.BWType)currRec.PType,
+                Machine = currRec.Machine,
+                ProjDescription = currRec.ProjDescription,
+                DtCreated = currRec.DtCreated,
+                DtLastAction = DateTime.MinValue,
+                DtSchedule = DateTime.MinValue,
+                DtStartProd = DateTime.MinValue,
+                ListName = currRec.ListName,
+                ProcTimeEst = 0,
+                ProcTimeReal = 0,
+                IsActive = currRec.IsActive,
+                IsArchived = currRec.IsArchived
+            };
+            return answ;
+        }
+
+        /// <summary>
+        /// Helper conversione a ProjModel
+        /// </summary>
+        /// <param name="currRec"></param>
+        /// <param name="isActive"></param>
+        /// <returns></returns>
+        public static ProjModel ConvToModel(ProjectDTO currRec, bool isActive)
+        {
+            ProjModel answ = new ProjModel()
+            {
+                ProjCloudId = currRec.ProjCloudId,
+                ProjDbId = currRec.ProjLocalId,
+                ProjId = currRec.ProjExtId,
+                //MachineID = currRec.MachineCloudId,
+                //KeyNum = currRec.KeyNum,
+                BTLFileName = currRec.BTLFileName,
+                PType = (BWType)currRec.PType,
+                Machine = currRec.Machine,
+                ProjDescription = currRec.ProjDescription,
+                DtCreated = currRec.DtCreated,
+                //DtLastAction = currRec.DtLastAction,
+                //DtSchedule = currRec.DtSchedule,
+                //DtStartProd = currRec.DtStartProd,
+                ListName = currRec.ListName,
+                //ProcTimeEst = currRec.ProcTimeEst,
+                //ProcTimeReal = currRec.ProcTimeReal,
+                IsActive = currRec.IsActive,
+                IsArchived = currRec.IsArchived
+            };
+            return answ;
+        }
+
         /// <summary>
         /// Search for already imported BTL from FileName (only)
         /// =0 : NOT found &gt;0 : ProjId (already present) for overwrite
@@ -33,6 +100,8 @@ namespace EgtBEAMWALL.DataLayer.Controllers
                 var dbResult = localDbCtx
                        .ProjList
                        .Where(x => x.BTLFileName == BTLFileName)
+                       //valutare se usare solo attivi...
+                       //.Where(x => x.BTLFileName == BTLFileName && x.IsActive == true)
                        .FirstOrDefault();
 
                 //se avesse trovato-- > riporto id...
@@ -44,6 +113,21 @@ namespace EgtBEAMWALL.DataLayer.Controllers
             return answ;
         }
 
+        /// <summary>
+        /// Helper conversione modelli
+        /// </summary>
+        /// <param name="currRec">record in formato ProjModel</param>
+        /// <returns></returns>
+        public Core.ProjFileM ConvToCore(ProjModel currRec)
+        {
+            Core.ProjFileM answ = null;
+            if (currRec != null)
+            {
+                answ = Core.ProjFileM.CreateProjFileM(currRec.ProjId, ProdIdByProdDbId(currRec.ProdDbId), currRec.DtCreated, currRec.DtExported, currRec.ListName, currRec.BTLFileName, currRec.ProjDescription, currRec.IsNew, currRec.Locked, currRec.PType, currRec.Machine, currRec.IsActive, currRec.IsArchived, currRec.ProjCloudId);
+            }
+            return answ;
+        }
+
         /// <summary>
         /// Delete Proj logically / on DB by ProjId
         /// </summary>
@@ -196,7 +280,7 @@ namespace EgtBEAMWALL.DataLayer.Controllers
         /// <returns></returns>
         public Core.ProjFileM FindByProjIdConv(int ProjId)
         {
-            return coreConv(FindByProjId(ProjId));
+            return ConvToCore(FindByProjId(ProjId));
         }
 
         /// <summary>
@@ -234,7 +318,7 @@ namespace EgtBEAMWALL.DataLayer.Controllers
                     .OrderBy(x => x.ProdDbId)
                     .ToList();
                 // conversione
-                answ = dbRes.Select(x => coreConv(x)).ToList();
+                answ = dbRes.Select(x => ConvToCore(x)).ToList();
             }
             return answ;
         }
@@ -274,7 +358,7 @@ namespace EgtBEAMWALL.DataLayer.Controllers
                             .OrderByDescending(x => x.ProdDbId)
                             .ToList();
                 // conversione
-                answ = dbRes.Select(x => coreConv(x)).ToList();
+                answ = dbRes.Select(x => ConvToCore(x)).ToList();
             }
             return answ;
         }
@@ -327,7 +411,7 @@ namespace EgtBEAMWALL.DataLayer.Controllers
                                 .Take(numRecord)
                                 .ToList();
                 // conversione
-                answ = dbRes.Select(x => coreConv(x)).ToList();
+                answ = dbRes.Select(x => ConvToCore(x)).ToList();
             }
             return answ;
         }
@@ -358,7 +442,7 @@ namespace EgtBEAMWALL.DataLayer.Controllers
                                 .Take(numRecord)
                                 .ToList();
                 // conversione
-                answ = dbRes.Select(x => coreConv(x)).ToList();
+                answ = dbRes.Select(x => ConvToCore(x)).ToList();
             }
             return answ;
         }
@@ -391,7 +475,7 @@ namespace EgtBEAMWALL.DataLayer.Controllers
                                 .Take(numRecord)
                                 .ToList();
                 // conversione
-                answ = dbRes.Select(x => coreConv(x)).ToList();
+                answ = dbRes.Select(x => ConvToCore(x)).ToList();
             }
             return answ;
         }
@@ -497,7 +581,7 @@ namespace EgtBEAMWALL.DataLayer.Controllers
                 // salvataggio
                 localDbCtx.SaveChanges();
             }
-            return coreConv(currProj);
+            return ConvToCore(currProj);
         }
 
         /// <summary>
@@ -527,7 +611,7 @@ namespace EgtBEAMWALL.DataLayer.Controllers
                 currProj.IsNew = false;
                 localDbCtx.SaveChanges();
             }
-            return coreConv(currProj);
+            return ConvToCore(currProj);
         }
 
         /// <summary>
@@ -581,7 +665,7 @@ namespace EgtBEAMWALL.DataLayer.Controllers
         /// Update record su DB x elenco BTLParts
         /// </summary>
         /// <param name="ProjId"></param>
-        /// <param name="newBTLFileName"></param>
+        /// <param name="BtlPartList"></param>
         /// <returns></returns>
         public ProjModel UpdateBtlParts(int ProjId, List<Core.BTLPartM> BtlPartList)
         {
@@ -710,7 +794,7 @@ namespace EgtBEAMWALL.DataLayer.Controllers
                 }
             }
 
-            return coreConv(currData);
+            return ConvToCore(currData);
         }
 
         /// <summary>
@@ -801,7 +885,7 @@ namespace EgtBEAMWALL.DataLayer.Controllers
                 }
             }
 
-            return coreConv(currData);
+            return ConvToCore(currData);
         }
 
         /// <summary>
@@ -843,7 +927,7 @@ namespace EgtBEAMWALL.DataLayer.Controllers
                     Log.Error(errMessage);
                 }
             }
-            return coreConv(currData);
+            return ConvToCore(currData);
         }
 
         /// <summary>
@@ -886,28 +970,13 @@ namespace EgtBEAMWALL.DataLayer.Controllers
                     Log.Error(errMessage);
                 }
             }
-            return coreConv(currData);
+            return ConvToCore(currData);
         }
 
         #endregion Public Methods
 
         #region Protected Methods
 
-        /// <summary>
-        /// Helper conversione modelli
-        /// </summary>
-        /// <param name="currProj"></param>
-        /// <returns></returns>
-        protected Core.ProjFileM coreConv(ProjModel currProj)
-        {
-            Core.ProjFileM answ = null;
-            if (currProj != null)
-            {
-                answ = Core.ProjFileM.CreateProjFileM(currProj.ProjId, ProdIdByProdDbId(currProj.ProdDbId), currProj.DtCreated, currProj.DtExported, currProj.ListName, currProj.BTLFileName, currProj.ProjDescription, currProj.IsNew, currProj.Locked, currProj.PType, currProj.Machine, currProj.IsActive, currProj.IsArchived);
-            }
-            return answ;
-        }
-
         /// <summary>
         /// Get LAST paginated data from DB (DESC ordered)
         /// </summary>

EgtBEAMWALL.DataLayer/Controllers/RawItemsController.cs

@@ -0,0 +1,352 @@
+using EgtBEAMWALL.DataLayer.DatabaseModels;
+using EgwProxy.MagMan.DTO;
+using NLog;
+using System;
+using System.Collections.Generic;
+using System.Data.Entity;
+using System.Linq;
+
+namespace EgtBEAMWALL.DataLayer.Controllers
+{
+    /// <summary>
+    /// Gestione RawItem (barre) su DB (= magazzino locale)
+    /// </summary>
+    public class RawItemsController : IDisposable
+    {
+        #region Public Constructors
+
+        public RawItemsController()
+        {
+        }
+
+        #endregion Public Constructors
+
+        #region Public Methods
+
+        /// <summary>
+        /// Helper conversion da DB model class a base class (VB)
+        /// </summary>
+        /// <param name="dbRec"></param>
+        /// <returns></returns>
+        public static Core.RawPartM ConvToCore(RawItemModel dbRec)
+        {
+            // converto in primis il materiale relativo
+            Core.MaterialM matRec = MaterialsController.ConvToCore(dbRec.MaterialNav);
+            Core.RawPartM answ = new Core.RawPartM(dbRec.RawItemId, matRec, (double)dbRec.WMm, (double)dbRec.LMm, dbRec.QtyAvail, dbRec.UseQty, dbRec.IsActive);
+            return answ;
+        }
+
+        /// <summary>
+        /// Helper conversione a ItemDTO
+        /// </summary>
+        /// <param name="currRec"></param>
+        /// <returns></returns>
+        public static ItemDTO ConvToItemDto(RawItemModel currRec)
+        {
+            ItemDTO answ = new ItemDTO()
+            {
+                MatCloudId = currRec.MaterialNav != null ? currRec.MaterialNav.MatCloudId : 0,
+                MatLocalId = currRec.MatId,
+                RawItemCloudId = currRec.RawItemCloudId,
+                RawItemLocalId = currRec.RawItemId,
+                IsRemn = currRec.IsRemn,
+                QtyAvail = currRec.QtyAvail,
+                HMm = currRec.HMm,
+                LMm = currRec.LMm,
+                WMm = currRec.WMm,
+                Note = currRec.Note
+            };
+            return answ;
+        }
+
+        /// <summary>
+        /// Helper conversione da ItemDTO
+        /// </summary>
+        /// <param name="currRec"></param>
+        /// <param name="isActive"></param>
+        /// <returns></returns>
+        public static RawItemModel ConvToModel(ItemDTO currRec, bool isActive)
+        {
+            RawItemModel answ = new RawItemModel()
+            {
+                RawItemCloudId = currRec.RawItemCloudId,
+                RawItemId = currRec.RawItemLocalId,
+                QtyAvail = currRec.QtyAvail,
+                HMm = currRec.HMm,
+                LMm = currRec.LMm,
+                WMm = currRec.WMm,
+                MatId = currRec.MatLocalId,
+                IsRemn = currRec.IsRemn,
+                IsActive = isActive,
+                UseQty = true,
+                Note = currRec.Note
+            };
+            return answ;
+        }
+
+        /// <summary>
+        /// Helper conversione da ResourceExpDTO
+        /// </summary>
+        /// <param name="currRec"></param>
+        /// <param name="matLocalId"></param>
+        /// <returns></returns>
+        public static RawItemModel ConvToModel(ResourceExpDTO currRec, int matLocalId)
+        {
+            RawItemModel answ = new RawItemModel()
+            {
+                RawItemCloudId = currRec.RawItemCloudId,
+                RawItemId = currRec.RawItemLocalId,
+                QtyAvail = currRec.Qty,
+                HMm = currRec.HMm,
+                LMm = currRec.LMm,
+                WMm = currRec.WMm,
+                MatId = matLocalId,
+                IsRemn = currRec.IsRemn,
+                IsActive = currRec.IsActive,
+                UseQty = true,
+                Note = currRec.Note
+            };
+            return answ;
+        }
+
+        /// <summary>
+        /// Conversion of base class to DB model class
+        /// </summary>
+        /// <param name="coreRec"></param>
+        /// <returns></returns>
+        public static RawItemModel ConvToModel(Core.RawPartM coreRec)
+        {
+            RawItemModel answ = new RawItemModel();
+            if (coreRec != null)
+            {
+                answ = new RawItemModel()
+                {
+                    RawItemId = coreRec.nId,
+                    MatId = coreRec.Material.nId,
+                    HMm = (decimal)coreRec.Material.dH,
+                    LMm = (decimal)coreRec.dL,
+                    WMm = coreRec.dW > 0 ? (decimal)coreRec.dW : (decimal)coreRec.Material.dW,
+                    IsActive = coreRec.bActive,
+                    UseQty = coreRec.bUseQuantity,
+                    QtyAvail = coreRec.nQuantity
+                };
+            }
+            return answ;
+        }
+
+        /// <summary>
+        /// Helper conversione a ResourceDTO
+        /// </summary>
+        /// <param name="currRec"></param>
+        /// <returns></returns>
+        public static ResourceDTO ConvToResDto(RawItemModel currRec)
+        {
+            ResourceDTO answ = new ResourceDTO()
+            {
+                RawItemCloudId = currRec.RawItemCloudId,
+                RawItemLocalId = currRec.RawItemId,
+                Qty = currRec.QtyAvail
+            };
+            return answ;
+        }
+
+        ///// <summary>
+        ///// Helper conversione a ResourceDTO con garanzia valori Qty negativi
+        ///// </summary>
+        ///// <param name="currRec"></param>
+        ///// <returns></returns>
+        //public static ResourceDTO ConvToResDtoNeg(RawItemModel currRec)
+        //{
+        //    ResourceDTO answ = new ResourceDTO()
+        //    {
+        //        RawItemCloudId = currRec.RawItemCloudId,
+        //        RawItemLocalId = currRec.RawItemId,
+        //        Qty = -Math.Abs(currRec.QtyAvail)
+        //    };
+        //    return answ;
+        //}
+
+        /// <summary>
+        /// Delete by key
+        /// </summary>
+        /// <param name="RawItemId"></param>
+        /// <returns></returns>
+        public bool DeleteByKey(int RawItemId)
+        {
+            bool done = false;
+            using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
+            {
+                var items2del = localDbCtx
+                                    .RawItemList
+                                    .Where(x => x.RawItemId == RawItemId);
+                try
+                {
+                    // Add to database
+                    localDbCtx.RawItemList.RemoveRange(items2del);
+                    // Commit changes
+                    localDbCtx.SaveChanges();
+                    done = true;
+                }
+                catch (Exception exc)
+                {
+                    Log.Error($"EXCEPTION on RawItems.DeleteByKey: {Environment.NewLine}{exc}");
+                }
+            }
+            return done;
+        }
+
+        public void Dispose()
+        {
+        }
+
+        /// <summary>
+        /// Get record by Key / Core
+        /// </summary>
+        /// <param name="RawItemId"></param>
+        /// <returns></returns>
+        public Core.RawPartM FindByDbId(int RawItemId)
+        {
+            var rawdata = FindByDbIdModel(RawItemId);
+            var result = ConvToCore(rawdata);
+            return result;
+        }
+
+        /// <summary>
+        /// Get record by Key / Db Model
+        /// </summary>
+        /// <param name="RawItemId"></param>
+        /// <returns></returns>
+        public RawItemModel FindByDbIdModel(int RawItemId)
+        {
+            using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
+            {
+                return localDbCtx
+                        .RawItemList
+                        .Where(x => x.RawItemId == RawItemId)
+                        .Include(m => m.MaterialNav)
+                        .SingleOrDefault();
+            }
+        }
+
+        /// <summary>
+        /// Get Material (filtro x MatId) / Core
+        /// </summary>
+        /// <param name="MatId">0 = tutti</param>
+        /// <returns></returns>
+        public List<Core.RawPartM> GetFilt(int MatId)
+        {
+            var rawList = GetFiltModel(MatId);
+            var result = rawList.Select(x => ConvToCore(x)).ToList();
+            return result;
+        }
+
+        /// <summary>
+        /// Get Material (filtro x MatId)
+        /// </summary>
+        /// <param name="MatId">0 = tutti</param>
+        /// <returns></returns>
+        public List<RawItemModel> GetFiltModel(int MatId)
+        {
+            // retrieve
+            using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
+            {
+                return localDbCtx
+                        .RawItemList
+                        .Include(j => j.MaterialNav)
+                        .Where(x => MatId == 0 || x.MatId == MatId)
+                        .OrderBy(x => x.LMm)
+                        .ThenBy(x => x.WMm)
+                        .ToList();
+            }
+        }
+
+        /// <summary>
+        /// Update or insert RawItem record
+        /// </summary>
+        /// <param name="updItem">Recorda da registrare</param>
+        /// <param name="changeUseQty">Indica se, in caso di modifica, vada aggiornato UseQty</param>
+        /// <param name="changeQtyAvail">Indica se, in caso di modifica, vada aggiornato QtyAvail</param>
+        /// <returns></returns>
+        public int Upsert(RawItemModel updItem, bool changeUseQty, bool changeQtyAvail)
+        {
+            int newIdx = 0;
+            using (DatabaseContext localDbCtx = new DatabaseContext(DbConfig.CONNECTION_STRING))
+            {
+                try
+                {
+                    var item2update = localDbCtx
+                                        .RawItemList
+                                        .Where(x => (updItem.RawItemId > 0 && x.RawItemId == updItem.RawItemId)
+                                                 || (x.MatId == updItem.MatId && x.WMm == updItem.WMm && x.HMm == updItem.HMm && x.LMm == updItem.LMm))
+                                        .SingleOrDefault();
+
+                    if (item2update != null)
+                    {
+                        //// update, vers 1...
+                        //localDbCtx.Entry(item2update).CurrentValues.SetValues(updItem);\
+                        item2update.RawItemCloudId = updItem.RawItemCloudId;
+                        item2update.HMm = updItem.HMm;
+                        item2update.LMm = updItem.LMm;
+                        item2update.WMm = updItem.WMm;
+                        item2update.IsActive = updItem.IsActive;
+                        item2update.IsRemn = updItem.IsRemn;
+                        if (changeUseQty)
+                        {
+                            item2update.UseQty = updItem.UseQty;
+                        }
+                        if (changeQtyAvail)
+                        {
+                            item2update.QtyAvail = updItem.QtyAvail;
+                            item2update.LastSync = DateTime.Now; 
+                        }
+                        localDbCtx.Entry(item2update).State = EntityState.Modified;
+                    }
+                    else
+                    {
+                        localDbCtx.RawItemList.Add(updItem);
+                    }
+                    // Commit changes
+                    localDbCtx.SaveChanges();
+                    if (item2update != null)
+                    {
+                        newIdx = item2update.RawItemId;
+                    }
+                    else
+                    {
+                        newIdx = updItem.RawItemId;
+                    }
+                }
+                catch (Exception exc)
+                {
+                    Log.Error($"EXCEPTION on RawItems.Upsert: {Environment.NewLine}{exc}");
+                }
+            }
+            return newIdx;
+        }
+
+        /// <summary>
+        /// Update or insert RawItem record from CoreM
+        /// </summary>
+        /// <param name="coreItem"></param>
+        /// <returns></returns>
+        public int Upsert(Core.RawPartM coreItem)
+        {
+            int newIdx = 0;
+            // converto
+            RawItemModel updItem = ConvToModel(coreItem);
+            newIdx = Upsert(updItem, true, true);
+            return newIdx;
+        }
+
+        #endregion Public Methods
+
+        #region Private Fields
+
+        /// <summary>
+        /// Istanza logger
+        /// </summary>
+        private NLog.Logger Log = LogManager.GetCurrentClassLogger();
+
+        #endregion Private Fields
+    }
+}

EgtBEAMWALL.DataLayer/DatabaseContext.cs

@@ -80,6 +80,26 @@ namespace EgtBEAMWALL.DataLayer
         /// </summary>
         public DbSet<StatusMapModel> StatusMapList { get; set; }
 
+        /// <summary>
+        /// Wharehouse materials management
+        /// </summary>
+        public DbSet<MaterialModel> MaterialsList { get; set; }
+
+        /// <summary>
+        /// Wharehouse items management
+        /// </summary>
+        public DbSet<RawItemModel> RawItemList { get; set; }
+
+        /// <summary>
+        /// Alias management
+        /// </summary>
+        public DbSet<AliasModel> AliasList { get; set; }
+
+        /// <summary>
+        /// Alias management
+        /// </summary>
+        public DbSet<MagmanSyncModel> SyncList { get; set; }
+
         #endregion Public Properties
 
         #region Public Methods

EgtBEAMWALL.DataLayer/DatabaseModels/AliasModel.cs

@@ -0,0 +1,34 @@
+using System;
+using System.Collections.Generic;
+using System.ComponentModel.DataAnnotations.Schema;
+using System.ComponentModel.DataAnnotations;
+using System.Linq;
+using System.Text;
+using System.Threading.Tasks;
+
+namespace EgtBEAMWALL.DataLayer.DatabaseModels
+{
+    // <Auto-Generated>
+    // This is here so CodeMaid doesn't reorganize this document
+    // </Auto-Generated>
+    [Table("AliasList")]
+    public class AliasModel
+    {
+        /// <summary>
+        /// Famiglia di sinonimi
+        /// </summary>
+        [Column("Family", Order = 1), Key]
+        public string Family { get; set; } = "";
+
+        /// <summary>
+        /// Codice originale (da trasformare)
+        /// </summary>
+        [Column("ValueOriginal", Order = 2), Key]
+        public string ValueOriginal { get; set; } = "";
+
+        /// <summary>
+        /// Codice Alias in cui viene convertito
+        /// </summary>
+        public string ValueAlias { get; set; } = "";
+    }
+}

EgtBEAMWALL.DataLayer/DatabaseModels/MagmanSyncModel.cs

@@ -0,0 +1,58 @@
+using System;
+using System.Collections.Generic;
+using System.ComponentModel.DataAnnotations.Schema;
+using System.ComponentModel.DataAnnotations;
+using System.Linq;
+using System.Text;
+using System.Threading.Tasks;
+
+namespace EgtBEAMWALL.DataLayer.DatabaseModels
+{
+    // <Auto-Generated>
+    // This is here so CodeMaid doesn't reorganize this document
+    // </Auto-Generated>
+    [Table("MagmanSync")]
+    public partial class MagmanSyncModel
+    {
+        /// <summary>
+        /// Primary Key AUTO
+        /// </summary>
+        [Key, DatabaseGenerated(DatabaseGeneratedOption.Identity)]
+        public int SyncId { get; set; }
+
+        /// <summary>
+        /// Tipologia Sync
+        /// </summary>
+        public string SyncType { get; set; } = "";
+
+        /// <summary>
+        /// Id riferimento remoto cloud x invio (es ProjCloudId)
+        /// </summary>
+        public int CloudId { get; set; } = 0;
+
+        /// <summary>
+        /// DataOra inserimento richiesta
+        /// </summary>
+        public DateTime DtReq { get; set; } = DateTime.Now;
+
+        /// <summary>
+        /// DataOra esecuzione richiesta
+        /// </summary>
+        public DateTime? DtExe { get; set; } = null;
+
+        /// <summary>
+        /// Payload trasmesso/da trasmettere (serializzato)
+        /// </summary>
+        public string Payload { get; set; } = "";
+
+        /// <summary>
+        /// Record inviato se DtExe != null && >= dtReq
+        /// </summary>
+        [NotMapped]
+        public bool Sent
+        {
+            get => DtExe != null && DtExe > DtReq;
+        }
+
+    }
+}

EgtBEAMWALL.DataLayer/DatabaseModels/MaterialModel.cs

@@ -0,0 +1,119 @@
+using System;
+using System.Collections.Generic;
+using System.ComponentModel.DataAnnotations.Schema;
+using System.ComponentModel.DataAnnotations;
+using System.Linq;
+using System.Text;
+using System.Threading.Tasks;
+
+namespace EgtBEAMWALL.DataLayer.DatabaseModels
+{
+    // <Auto-Generated>
+    // This is here so CodeMaid doesn't reorganize this document
+    // </Auto-Generated>
+    [Table("MaterialsList")]
+    public partial class MaterialModel
+    {
+        /// <summary>
+        /// Init classe
+        /// </summary>
+        public MaterialModel()
+        {
+            RawItemList = new HashSet<RawItemModel>();
+        }
+
+        /// <summary>
+        /// Primary Key AUTO
+        /// </summary>
+        [Key, DatabaseGenerated(DatabaseGeneratedOption.Identity)]
+        public int MatId { get; set; }
+
+        /// <summary>
+        /// Codice materiale (Identificativo DB esterno del magazzino in sync)
+        /// </summary>
+        public int MatCloudId { get; set; } = 0;
+
+        /// <summary>
+        /// Codice Materiale
+        /// </summary>
+        public string MatCode { get; set; } = "";
+
+        /// <summary>
+        /// Descrizione Materiale
+        /// </summary>
+        public string MatDesc { get; set; } = "";
+
+        /// <summary>
+        /// Lenght/Lunghezza in mm
+        /// </summary>
+        public decimal LMm { get; set; } = 0;
+        /// <summary>
+        /// Width/Larghezza in mm
+        /// </summary>
+        public decimal WMm { get; set; } = 0;
+        /// <summary>
+        /// Height (Thikness/Spessore) in mm
+        /// </summary>
+        public decimal HMm { get; set; } = 0;
+
+        /// <summary>
+        /// ID dell'ultimo articolo (variante) usato per il materiale
+        /// </summary>
+        public int RawItemIdLast { get; set; } = 0;
+
+#if false
+        /// <summary>
+        /// Lenght/Lunghezza in inch
+        /// </summary>
+        [NotMapped]
+        public decimal LIn
+        {
+            get => Math.Round(LMm / (decimal)25.4, 3);
+        }
+        /// <summary>
+        /// Width/Larghezza in inch
+        /// </summary>
+        [NotMapped]
+        public decimal WIn
+        {
+            get => Math.Round(WMm / (decimal)25.4, 3);
+        }
+        /// <summary>
+        /// Height/Altezza (Thikness/Spessore) in inch
+        /// </summary>
+        [NotMapped]
+        public decimal HIn
+        {
+            get => Math.Round(HMm / (decimal)25.4, 3);
+        }
+
+        /// <summary>
+        /// Codice materiale x QR/Datamatrix
+        /// </summary>
+        [NotMapped]
+        public string MatDtmx
+        {
+            get => $"MT{MatExtId:00000000}";
+        } 
+#endif
+        /// <summary>
+        /// Verifica che sia Beam, quando L == 0
+        /// </summary>
+        [NotMapped]
+        public bool IsBeam
+        {
+            get => (LMm == 0 && (HMm > 0 && WMm > 0));
+        }
+
+        /// <summary>
+        /// Verifica che sia Wall, quando W/L == 0
+        /// </summary>
+        [NotMapped]
+        public bool IsWall
+        {
+            get => (LMm == 0 && WMm == 0);
+        }
+
+        public virtual ICollection<RawItemModel> RawItemList { get; set; }
+    }
+}

EgtBEAMWALL.DataLayer/DatabaseModels/ProdModel.cs

@@ -1,7 +1,5 @@
 using System;
 using System.Collections.Generic;
-using System.Linq;
-using System.Text;
 using System.ComponentModel.DataAnnotations;
 using System.ComponentModel.DataAnnotations.Schema;
 using static EgtBEAMWALL.Core.ConstBeam;
@@ -19,6 +17,11 @@ namespace EgtBEAMWALL.DataLayer.DatabaseModels
     {
         #region Public Properties
 
+        public ProdModel()
+        {
+            ProjListNav = new HashSet<ProjModel>();
+        }
+
         /// <summary>
         /// Chiave univoca DB
         /// </summary>
@@ -54,6 +57,11 @@ namespace EgtBEAMWALL.DataLayer.DatabaseModels
         [Index]
         public int ProdId { get; set; }
 
+        /// <summary>
+        /// Codice Proj per sync info (Identificativo DB esterno del magazzino in sync)
+        /// </summary>
+        public int ProjCloudId { get; set; } = 0;
+
         /// <summary>
         /// Tipologia del progetto (Travi, Pareti, ...)
         /// </summary>
@@ -98,6 +106,11 @@ namespace EgtBEAMWALL.DataLayer.DatabaseModels
         [Column("IsArchived")]
         public bool IsArchived { get; set; } = false;
 
+        /// <summary>
+        /// Collezione oggetti Proj associati (almeno 1 by design)
+        /// </summary>
+        public virtual ICollection<ProjModel> ProjListNav { get; set; }
+
         #endregion Public Properties
     }
 }

EgtBEAMWALL.DataLayer/DatabaseModels/ProjModel.cs

@@ -65,6 +65,11 @@ namespace EgtBEAMWALL.DataLayer.DatabaseModels
         [Index]
         public int ProjId { get; set; }
 
+        /// <summary>
+        /// Codice Proj per sync info (Identificativo DB esterno del magazzino in sync)
+        /// </summary>
+        public int ProjCloudId { get; set; } = 0;
+
         /// <summary>
         /// Tipologia del progetto (Travi, Pareti, ...)
         /// </summary>

EgtBEAMWALL.DataLayer/DatabaseModels/RawItemModel.cs

@@ -0,0 +1,124 @@
+using System;
+using System.Collections.Generic;
+using System.ComponentModel.DataAnnotations.Schema;
+using System.ComponentModel.DataAnnotations;
+using System.Linq;
+using System.Text;
+using System.Threading.Tasks;
+
+namespace EgtBEAMWALL.DataLayer.DatabaseModels
+{
+    // <Auto-Generated>
+    // This is here so CodeMaid doesn't reorganize this document
+    // </Auto-Generated>
+    //[Index(nameof(Installazione), nameof(Active), nameof(DiskStatus))]
+    [Table("RawItemList")]
+    public partial class RawItemModel
+    {
+        /// <summary>
+        /// Primary Key AUTO
+        /// </summary>
+        [Key, DatabaseGenerated(DatabaseGeneratedOption.Identity)]
+        public int RawItemId { get; set; }
+
+        /// <summary>
+        /// Codice RawMat univoco e in sync (Identificativo DB esterno del magazzino in sync)
+        /// </summary>
+        public int RawItemCloudId { get; set; } = 0;
+
+        /// <summary>
+        /// ForeignKey Materiale
+        /// </summary>
+        public int MatId { get; set; } = 0;
+
+        /// <summary>
+        /// Qty available on wharehouse
+        /// </summary>
+        public int QtyAvail { get; set; } = 0;
+
+        /// <summary>
+        /// Active/  = can be used
+        /// </summary>
+        public bool IsActive { get; set; } = false;
+
+        /// <summary>
+        /// Remnant
+        /// </summary>
+        public bool IsRemn { get; set; } = false;
+
+        /// <summary>
+        /// Item's Lenght
+        /// </summary>
+        public decimal LMm { get; set; } = 0;
+
+        /// <summary>
+        /// Item's Width
+        /// </summary>
+        public decimal WMm { get; set; } = 0;
+
+        /// <summary>
+        /// Item's Height (Thikness/Spessore) in mm
+        /// </summary>
+        public decimal HMm { get; set; } = 0;
+
+        /// <summary>
+        /// Note (optional)
+        /// </summary>
+        public string Note { get; set; } = "";
+
+        /// <summary>
+        /// Indica se debba usare qty effettiva o indefinita (x nesting/schedulazione a capacita illimitata)
+        /// </summary>
+        public bool UseQty { get; set; } = false;
+
+        /// <summary>
+        /// DataOra ultimo aggiornamento dal cloud dei dati (in particolare giacenza)
+        /// </summary>
+        public DateTime LastSync { get; set; } = DateTime.Now; 
+
+#if false
+        [NotMapped]
+        public decimal LIn
+        {
+            get => Math.Round(LMm / (decimal)25.4, 3);
+        }
+        [NotMapped]
+        public decimal WIn
+        {
+            get => Math.Round(WMm / (decimal)25.4, 3);
+        }
+        [NotMapped]
+        public decimal HIn
+        {
+            get => Math.Round(HMm / (decimal)25.4, 3);
+        }
+
+        [NotMapped]
+        public decimal Area
+        {
+            get => LMm * WMm;
+        } 
+
+        [NotMapped]
+        public string ItemDtmx
+        {
+            get
+            {
+                string answ = $"MT99999999-{LMm * 1000:00000000}";
+                if (MaterialNav != null)
+                {
+                    answ = $"MT{MaterialNav.MatExtId:00000000}-{LMm * 1000:00000000}";
+                }
+                return answ;
+            }
+        }
+#endif
+
+        /// <summary>
+        /// Navigation property to Material
+        /// </summary>
+        [ForeignKey("MatId")]
+        public virtual MaterialModel MaterialNav { get; set; }
+
+    }
+}

EgtBEAMWALL.DataLayer/DbConfig.cs

@@ -33,9 +33,9 @@ namespace EgtBEAMWALL.DataLayer
         public static string ADMIN_CONNECTION_STRING { get; set; } = "";
 
         /// <summary>
-        /// DB Connection string, per effettuare migration riportare valore connessione admin cablato (server=localhost;port=3306;database=EgtBwDb_000102;)
+        /// DB Connection string, per effettuare migration riportare valore connessione admin cablato (server=localhost;port=3306;database=EgtBwDb_000102;uid=root;pwd=Egalware_24068!;)
         /// </summary>
-        public static string CONNECTION_STRING { get; set; } = "";
+        public static string CONNECTION_STRING { get; set; } = "server=localhost;port=3306;database=EgtBwDb_000470;uid=root;pwd=Egalware_24068!";
 
         #endregion Public Properties
 

EgtBEAMWALL.DataLayer/EgtBEAMWALL.DataLayer.csproj

@@ -46,6 +46,9 @@
     <Reference Include="EgtWPFLib5">
       <HintPath>..\ExtLibs\EgtWPFLib5.dll</HintPath>
     </Reference>
+    <Reference Include="EgwProxy.MagMan, Version=1.0.0.0, Culture=neutral, processorArchitecture=MSIL">
+      <HintPath>..\packages\EgwProxy.MagMan.1.0.2402.2912\lib\EgwProxy.MagMan.dll</HintPath>
+    </Reference>
     <Reference Include="EntityFramework, Version=6.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089, processorArchitecture=MSIL">
       <HintPath>..\packages\EntityFramework.6.4.4\lib\net45\EntityFramework.dll</HintPath>
     </Reference>
@@ -55,15 +58,18 @@
     <Reference Include="Google.Protobuf, Version=3.21.9.0, Culture=neutral, PublicKeyToken=a7d26565bac4d604, processorArchitecture=MSIL">
       <HintPath>..\packages\Google.Protobuf.3.21.9\lib\net45\Google.Protobuf.dll</HintPath>
     </Reference>
-    <Reference Include="K4os.Compression.LZ4, Version=1.3.5.0, Culture=neutral, PublicKeyToken=2186fa9121ef231d, processorArchitecture=MSIL">
-      <HintPath>..\packages\K4os.Compression.LZ4.1.3.5\lib\net462\K4os.Compression.LZ4.dll</HintPath>
+    <Reference Include="K4os.Compression.LZ4, Version=1.3.6.0, Culture=neutral, PublicKeyToken=2186fa9121ef231d, processorArchitecture=MSIL">
+      <HintPath>..\packages\K4os.Compression.LZ4.1.3.6\lib\net462\K4os.Compression.LZ4.dll</HintPath>
     </Reference>
-    <Reference Include="K4os.Compression.LZ4.Streams, Version=1.3.5.0, Culture=neutral, PublicKeyToken=2186fa9121ef231d, processorArchitecture=MSIL">
-      <HintPath>..\packages\K4os.Compression.LZ4.Streams.1.3.5\lib\net462\K4os.Compression.LZ4.Streams.dll</HintPath>
+    <Reference Include="K4os.Compression.LZ4.Streams, Version=1.3.6.0, Culture=neutral, PublicKeyToken=2186fa9121ef231d, processorArchitecture=MSIL">
+      <HintPath>..\packages\K4os.Compression.LZ4.Streams.1.3.6\lib\net462\K4os.Compression.LZ4.Streams.dll</HintPath>
     </Reference>
     <Reference Include="K4os.Hash.xxHash, Version=1.0.8.0, Culture=neutral, PublicKeyToken=32cd54395057cec3, processorArchitecture=MSIL">
       <HintPath>..\packages\K4os.Hash.xxHash.1.0.8\lib\net462\K4os.Hash.xxHash.dll</HintPath>
     </Reference>
+    <Reference Include="Microsoft.Bcl.AsyncInterfaces, Version=7.0.0.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
+      <HintPath>..\packages\Microsoft.Bcl.AsyncInterfaces.7.0.0\lib\net462\Microsoft.Bcl.AsyncInterfaces.dll</HintPath>
+    </Reference>
     <Reference Include="MySql.Data, Version=8.0.21.0, Culture=neutral, PublicKeyToken=c5687fc88969c44d, processorArchitecture=MSIL">
       <HintPath>..\packages\MySql.Data.8.0.21\lib\net452\MySql.Data.dll</HintPath>
     </Reference>
@@ -79,6 +85,9 @@
     <Reference Include="Renci.SshNet, Version=2016.1.0.0, Culture=neutral, PublicKeyToken=1cee9f8bde3db106, processorArchitecture=MSIL">
       <HintPath>..\packages\SSH.NET.2016.1.0\lib\net40\Renci.SshNet.dll</HintPath>
     </Reference>
+    <Reference Include="RestSharp, Version=110.2.0.0, Culture=neutral, PublicKeyToken=598062e77f915f75, processorArchitecture=MSIL">
+      <HintPath>..\packages\RestSharp.110.2.0\lib\net471\RestSharp.dll</HintPath>
+    </Reference>
     <Reference Include="System" />
     <Reference Include="System.Buffers, Version=4.0.3.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
       <HintPath>..\packages\System.Buffers.4.5.1\lib\net461\System.Buffers.dll</HintPath>
@@ -91,13 +100,14 @@
     <Reference Include="System.Drawing" />
     <Reference Include="System.Drawing.Design" />
     <Reference Include="System.IO.Compression" />
-    <Reference Include="System.IO.Pipelines, Version=5.0.0.2, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
-      <HintPath>..\packages\System.IO.Pipelines.5.0.2\lib\net461\System.IO.Pipelines.dll</HintPath>
+    <Reference Include="System.IO.Pipelines, Version=6.0.0.3, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.IO.Pipelines.6.0.3\lib\net461\System.IO.Pipelines.dll</HintPath>
     </Reference>
     <Reference Include="System.Management" />
     <Reference Include="System.Memory, Version=4.0.1.2, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
       <HintPath>..\packages\System.Memory.4.5.5\lib\net461\System.Memory.dll</HintPath>
     </Reference>
+    <Reference Include="System.Net.Http" />
     <Reference Include="System.Numerics" />
     <Reference Include="System.Numerics.Vectors, Version=4.1.4.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL">
       <HintPath>..\packages\System.Numerics.Vectors.4.5.0\lib\net46\System.Numerics.Vectors.dll</HintPath>
@@ -108,10 +118,20 @@
     <Reference Include="System.Security" />
     <Reference Include="System.ServiceModel" />
     <Reference Include="System.ServiceProcess" />
+    <Reference Include="System.Text.Encodings.Web, Version=7.0.0.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.Text.Encodings.Web.7.0.0\lib\net462\System.Text.Encodings.Web.dll</HintPath>
+    </Reference>
+    <Reference Include="System.Text.Json, Version=7.0.0.2, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.Text.Json.7.0.2\lib\net462\System.Text.Json.dll</HintPath>
+    </Reference>
     <Reference Include="System.Threading.Tasks.Extensions, Version=4.2.0.1, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
       <HintPath>..\packages\System.Threading.Tasks.Extensions.4.5.4\lib\net461\System.Threading.Tasks.Extensions.dll</HintPath>
     </Reference>
     <Reference Include="System.Transactions" />
+    <Reference Include="System.ValueTuple, Version=4.0.3.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.ValueTuple.4.5.0\lib\net47\System.ValueTuple.dll</HintPath>
+    </Reference>
+    <Reference Include="System.Web" />
     <Reference Include="System.Xml.Linq" />
     <Reference Include="System.Data.DataSetExtensions" />
     <Reference Include="Microsoft.CSharp" />
@@ -126,6 +146,15 @@
   </ItemGroup>
   <ItemGroup>
     <Compile Include="AdminContext.cs" />
+    <Compile Include="Controllers\MagmanSyncController.cs" />
+    <Compile Include="Controllers\MagmanController.cs" />
+    <Compile Include="Controllers\AliasController.cs" />
+    <Compile Include="Controllers\RawItemsController.cs" />
+    <Compile Include="Controllers\MaterialsController.cs" />
+    <Compile Include="DatabaseModels\AliasModel.cs" />
+    <Compile Include="DatabaseModels\MagmanSyncModel.cs" />
+    <Compile Include="DatabaseModels\MaterialModel.cs" />
+    <Compile Include="DatabaseModels\RawItemModel.cs" />
     <Compile Include="DatabaseModels\UserPrivModel.cs" />
     <Compile Include="DbConfig.cs" />
     <Compile Include="Controllers\LogMachineController.cs" />
@@ -187,6 +216,34 @@
     <Compile Include="Migrations\202308250853396_AddProjArchivedField.designer.cs">
       <DependentUpon>202308250853396_AddProjArchivedField.cs</DependentUpon>
     </Compile>
+    <Compile Include="Migrations\202401181534084_AddAliasMaterialRawItemsModel.cs" />
+    <Compile Include="Migrations\202401181534084_AddAliasMaterialRawItemsModel.designer.cs">
+      <DependentUpon>202401181534084_AddAliasMaterialRawItemsModel.cs</DependentUpon>
+    </Compile>
+    <Compile Include="Migrations\202401291722150_FixMatItemCloudId.cs" />
+    <Compile Include="Migrations\202401291722150_FixMatItemCloudId.designer.cs">
+      <DependentUpon>202401291722150_FixMatItemCloudId.cs</DependentUpon>
+    </Compile>
+    <Compile Include="Migrations\202401310830146_FixItemRemn.cs" />
+    <Compile Include="Migrations\202401310830146_FixItemRemn.designer.cs">
+      <DependentUpon>202401310830146_FixItemRemn.cs</DependentUpon>
+    </Compile>
+    <Compile Include="Migrations\202402141003461_RawItemAddUseQty.cs" />
+    <Compile Include="Migrations\202402141003461_RawItemAddUseQty.designer.cs">
+      <DependentUpon>202402141003461_RawItemAddUseQty.cs</DependentUpon>
+    </Compile>
+    <Compile Include="Migrations\202402290716188_AddProjCloudId.cs" />
+    <Compile Include="Migrations\202402290716188_AddProjCloudId.Designer.cs">
+      <DependentUpon>202402290716188_AddProjCloudId.cs</DependentUpon>
+    </Compile>
+    <Compile Include="Migrations\202403120645357_RawItemAddLastSync.cs" />
+    <Compile Include="Migrations\202403120645357_RawItemAddLastSync.Designer.cs">
+      <DependentUpon>202403120645357_RawItemAddLastSync.cs</DependentUpon>
+    </Compile>
+    <Compile Include="Migrations\202403120803297_AddMagmanSyncTab.cs" />
+    <Compile Include="Migrations\202403120803297_AddMagmanSyncTab.Designer.cs">
+      <DependentUpon>202403120803297_AddMagmanSyncTab.cs</DependentUpon>
+    </Compile>
     <Compile Include="Migrations\Configuration.cs" />
     <Compile Include="Properties\AssemblyInfo.cs" />
     <Compile Include="Utils.cs" />
@@ -235,6 +292,27 @@
     <EmbeddedResource Include="Migrations\202308250853396_AddProjArchivedField.resx">
       <DependentUpon>202308250853396_AddProjArchivedField.cs</DependentUpon>
     </EmbeddedResource>
+    <EmbeddedResource Include="Migrations\202401181534084_AddAliasMaterialRawItemsModel.resx">
+      <DependentUpon>202401181534084_AddAliasMaterialRawItemsModel.cs</DependentUpon>
+    </EmbeddedResource>
+    <EmbeddedResource Include="Migrations\202401291722150_FixMatItemCloudId.resx">
+      <DependentUpon>202401291722150_FixMatItemCloudId.cs</DependentUpon>
+    </EmbeddedResource>
+    <EmbeddedResource Include="Migrations\202401310830146_FixItemRemn.resx">
+      <DependentUpon>202401310830146_FixItemRemn.cs</DependentUpon>
+    </EmbeddedResource>
+    <EmbeddedResource Include="Migrations\202402141003461_RawItemAddUseQty.resx">
+      <DependentUpon>202402141003461_RawItemAddUseQty.cs</DependentUpon>
+    </EmbeddedResource>
+    <EmbeddedResource Include="Migrations\202402290716188_AddProjCloudId.resx">
+      <DependentUpon>202402290716188_AddProjCloudId.cs</DependentUpon>
+    </EmbeddedResource>
+    <EmbeddedResource Include="Migrations\202403120645357_RawItemAddLastSync.resx">
+      <DependentUpon>202403120645357_RawItemAddLastSync.cs</DependentUpon>
+    </EmbeddedResource>
+    <EmbeddedResource Include="Migrations\202403120803297_AddMagmanSyncTab.resx">
+      <DependentUpon>202403120803297_AddMagmanSyncTab.cs</DependentUpon>
+    </EmbeddedResource>
   </ItemGroup>
   <Import Project="$(MSBuildToolsPath)\Microsoft.CSharp.targets" />
   <PropertyGroup>

EgtBEAMWALL.DataLayer/Migrations/202401181534084_AddAliasMaterialRawItemsModel.Designer.cs

@@ -0,0 +1,29 @@
+// <auto-generated />
+namespace EgtBEAMWALL.DataLayer.Migrations
+{
+    using System.CodeDom.Compiler;
+    using System.Data.Entity.Migrations;
+    using System.Data.Entity.Migrations.Infrastructure;
+    using System.Resources;
+    
+    [GeneratedCode("EntityFramework.Migrations", "6.4.4")]
+    public sealed partial class AddAliasMaterialRawItemsModel : IMigrationMetadata
+    {
+        private readonly ResourceManager Resources = new ResourceManager(typeof(AddAliasMaterialRawItemsModel));
+        
+        string IMigrationMetadata.Id
+        {
+            get { return "202401181534084_AddAliasMaterialRawItemsModel"; }
+        }
+        
+        string IMigrationMetadata.Source
+        {
+            get { return null; }
+        }
+        
+        string IMigrationMetadata.Target
+        {
+            get { return Resources.GetString("Target"); }
+        }
+    }
+}

EgtBEAMWALL.DataLayer/Migrations/202401181534084_AddAliasMaterialRawItemsModel.cs

@@ -0,0 +1,63 @@
+namespace EgtBEAMWALL.DataLayer.Migrations
+{
+    using System;
+    using System.Data.Entity.Migrations;
+    
+    public partial class AddAliasMaterialRawItemsModel : DbMigration
+    {
+        public override void Up()
+        {
+            CreateTable(
+                "dbo.AliasList",
+                c => new
+                    {
+                        Family = c.String(nullable: false, maxLength: 128, storeType: "nvarchar"),
+                        ValueOriginal = c.String(nullable: false, maxLength: 128, storeType: "nvarchar"),
+                        ValueAlias = c.String(unicode: false),
+                    })
+                .PrimaryKey(t => new { t.Family, t.ValueOriginal });
+            
+            CreateTable(
+                "dbo.MaterialsList",
+                c => new
+                    {
+                        MatId = c.Int(nullable: false, identity: true),
+                        MatExtId = c.Int(nullable: false),
+                        MatCode = c.String(unicode: false),
+                        MatDesc = c.String(unicode: false),
+                        LMm = c.Decimal(nullable: false, precision: 18, scale: 2),
+                        WMm = c.Decimal(nullable: false, precision: 18, scale: 2),
+                        HMm = c.Decimal(nullable: false, precision: 18, scale: 2),
+                        RawItemIdLast = c.Int(nullable: false),
+                    })
+                .PrimaryKey(t => t.MatId);
+            
+            CreateTable(
+                "dbo.RawItemList",
+                c => new
+                    {
+                        RawItemId = c.Int(nullable: false, identity: true),
+                        MatId = c.Int(nullable: false),
+                        QtyAvail = c.Int(nullable: false),
+                        IsActive = c.Boolean(nullable: false),
+                        LMm = c.Decimal(nullable: false, precision: 18, scale: 2),
+                        WMm = c.Decimal(nullable: false, precision: 18, scale: 2),
+                        HMm = c.Decimal(nullable: false, precision: 18, scale: 2),
+                        Note = c.String(unicode: false),
+                    })
+                .PrimaryKey(t => t.RawItemId)
+                .ForeignKey("dbo.MaterialsList", t => t.MatId, cascadeDelete: true)
+                .Index(t => t.MatId);
+            
+        }
+        
+        public override void Down()
+        {
+            DropForeignKey("dbo.RawItemList", "MatId", "dbo.MaterialsList");
+            DropIndex("dbo.RawItemList", new[] { "MatId" });
+            DropTable("dbo.RawItemList");
+            DropTable("dbo.MaterialsList");
+            DropTable("dbo.AliasList");
+        }
+    }
+}

EgtBEAMWALL.DataLayer/Migrations/202401291722150_FixMatItemCloudId.Designer.cs

@@ -0,0 +1,29 @@
+// <auto-generated />
+namespace EgtBEAMWALL.DataLayer.Migrations
+{
+    using System.CodeDom.Compiler;
+    using System.Data.Entity.Migrations;
+    using System.Data.Entity.Migrations.Infrastructure;
+    using System.Resources;
+    
+    [GeneratedCode("EntityFramework.Migrations", "6.4.4")]
+    public sealed partial class FixMatItemCloudId : IMigrationMetadata
+    {
+        private readonly ResourceManager Resources = new ResourceManager(typeof(FixMatItemCloudId));
+        
+        string IMigrationMetadata.Id
+        {
+            get { return "202401291722150_FixMatItemCloudId"; }
+        }
+        
+        string IMigrationMetadata.Source
+        {
+            get { return null; }
+        }
+        
+        string IMigrationMetadata.Target
+        {
+            get { return Resources.GetString("Target"); }
+        }
+    }
+}

EgtBEAMWALL.DataLayer/Migrations/202401291722150_FixMatItemCloudId.cs

@@ -0,0 +1,22 @@
+namespace EgtBEAMWALL.DataLayer.Migrations
+{
+    using System;
+    using System.Data.Entity.Migrations;
+    
+    public partial class FixMatItemCloudId : DbMigration
+    {
+        public override void Up()
+        {
+            AddColumn("dbo.MaterialsList", "MatCloudId", c => c.Int(nullable: false));
+            AddColumn("dbo.RawItemList", "RawItemCloudId", c => c.Int(nullable: false));
+            DropColumn("dbo.MaterialsList", "MatExtId");
+        }
+        
+        public override void Down()
+        {
+            AddColumn("dbo.MaterialsList", "MatExtId", c => c.Int(nullable: false));
+            DropColumn("dbo.RawItemList", "RawItemCloudId");
+            DropColumn("dbo.MaterialsList", "MatCloudId");
+        }
+    }
+}

EgtBEAMWALL.DataLayer/Migrations/202401310830146_FixItemRemn.Designer.cs

@@ -0,0 +1,29 @@
+// <auto-generated />
+namespace EgtBEAMWALL.DataLayer.Migrations
+{
+    using System.CodeDom.Compiler;
+    using System.Data.Entity.Migrations;
+    using System.Data.Entity.Migrations.Infrastructure;
+    using System.Resources;
+    
+    [GeneratedCode("EntityFramework.Migrations", "6.4.4")]
+    public sealed partial class FixItemRemn : IMigrationMetadata
+    {
+        private readonly ResourceManager Resources = new ResourceManager(typeof(FixItemRemn));
+        
+        string IMigrationMetadata.Id
+        {
+            get { return "202401310830146_FixItemRemn"; }
+        }
+        
+        string IMigrationMetadata.Source
+        {
+            get { return null; }
+        }
+        
+        string IMigrationMetadata.Target
+        {
+            get { return Resources.GetString("Target"); }
+        }
+    }
+}

EgtBEAMWALL.DataLayer/Migrations/202401310830146_FixItemRemn.cs

@@ -0,0 +1,18 @@
+namespace EgtBEAMWALL.DataLayer.Migrations
+{
+    using System;
+    using System.Data.Entity.Migrations;
+    
+    public partial class FixItemRemn : DbMigration
+    {
+        public override void Up()
+        {
+            AddColumn("dbo.RawItemList", "IsRemn", c => c.Boolean(nullable: false));
+        }
+        
+        public override void Down()
+        {
+            DropColumn("dbo.RawItemList", "IsRemn");
+        }
+    }
+}

EgtBEAMWALL.DataLayer/Migrations/202402141003461_RawItemAddUseQty.Designer.cs

@@ -0,0 +1,29 @@
+// <auto-generated />
+namespace EgtBEAMWALL.DataLayer.Migrations
+{
+    using System.CodeDom.Compiler;
+    using System.Data.Entity.Migrations;
+    using System.Data.Entity.Migrations.Infrastructure;
+    using System.Resources;
+    
+    [GeneratedCode("EntityFramework.Migrations", "6.4.4")]
+    public sealed partial class RawItemAddUseQty : IMigrationMetadata
+    {
+        private readonly ResourceManager Resources = new ResourceManager(typeof(RawItemAddUseQty));
+        
+        string IMigrationMetadata.Id
+        {
+            get { return "202402141003461_RawItemAddUseQty"; }
+        }
+        
+        string IMigrationMetadata.Source
+        {
+            get { return null; }
+        }
+        
+        string IMigrationMetadata.Target
+        {
+            get { return Resources.GetString("Target"); }
+        }
+    }
+}

EgtBEAMWALL.DataLayer/Migrations/202402141003461_RawItemAddUseQty.cs

@@ -0,0 +1,18 @@
+namespace EgtBEAMWALL.DataLayer.Migrations
+{
+    using System;
+    using System.Data.Entity.Migrations;
+    
+    public partial class RawItemAddUseQty : DbMigration
+    {
+        public override void Up()
+        {
+            AddColumn("dbo.RawItemList", "UseQty", c => c.Boolean(nullable: false));
+        }
+        
+        public override void Down()
+        {
+            DropColumn("dbo.RawItemList", "UseQty");
+        }
+    }
+}

EgtBEAMWALL.DataLayer/Migrations/202402290716188_AddProjCloudId.Designer.cs

@@ -0,0 +1,29 @@
+// <auto-generated />
+namespace EgtBEAMWALL.DataLayer.Migrations
+{
+    using System.CodeDom.Compiler;
+    using System.Data.Entity.Migrations;
+    using System.Data.Entity.Migrations.Infrastructure;
+    using System.Resources;
+    
+    [GeneratedCode("EntityFramework.Migrations", "6.4.4")]
+    public sealed partial class AddProjCloudId : IMigrationMetadata
+    {
+        private readonly ResourceManager Resources = new ResourceManager(typeof(AddProjCloudId));
+        
+        string IMigrationMetadata.Id
+        {
+            get { return "202402290716188_AddProjCloudId"; }
+        }
+        
+        string IMigrationMetadata.Source
+        {
+            get { return null; }
+        }
+        
+        string IMigrationMetadata.Target
+        {
+            get { return Resources.GetString("Target"); }
+        }
+    }
+}

EgtBEAMWALL.DataLayer/Migrations/202402290716188_AddProjCloudId.cs

@@ -0,0 +1,20 @@
+namespace EgtBEAMWALL.DataLayer.Migrations
+{
+    using System;
+    using System.Data.Entity.Migrations;
+    
+    public partial class AddProjCloudId : DbMigration
+    {
+        public override void Up()
+        {
+            AddColumn("dbo.ProjList", "ProjCloudId", c => c.Int(nullable: false));
+            AddColumn("dbo.ProdList", "ProjCloudId", c => c.Int(nullable: false));
+        }
+        
+        public override void Down()
+        {
+            DropColumn("dbo.ProdList", "ProjCloudId");
+            DropColumn("dbo.ProjList", "ProjCloudId");
+        }
+    }
+}

EgtBEAMWALL.DataLayer/Migrations/202403120645357_RawItemAddLastSync.Designer.cs

@@ -0,0 +1,29 @@
+// <auto-generated />
+namespace EgtBEAMWALL.DataLayer.Migrations
+{
+    using System.CodeDom.Compiler;
+    using System.Data.Entity.Migrations;
+    using System.Data.Entity.Migrations.Infrastructure;
+    using System.Resources;
+    
+    [GeneratedCode("EntityFramework.Migrations", "6.4.4")]
+    public sealed partial class RawItemAddLastSync : IMigrationMetadata
+    {
+        private readonly ResourceManager Resources = new ResourceManager(typeof(RawItemAddLastSync));
+        
+        string IMigrationMetadata.Id
+        {
+            get { return "202403120645357_RawItemAddLastSync"; }
+        }
+        
+        string IMigrationMetadata.Source
+        {
+            get { return null; }
+        }
+        
+        string IMigrationMetadata.Target
+        {
+            get { return Resources.GetString("Target"); }
+        }
+    }
+}

EgtBEAMWALL.DataLayer/Migrations/202403120645357_RawItemAddLastSync.cs

@@ -0,0 +1,18 @@
+namespace EgtBEAMWALL.DataLayer.Migrations
+{
+    using System;
+    using System.Data.Entity.Migrations;
+    
+    public partial class RawItemAddLastSync : DbMigration
+    {
+        public override void Up()
+        {
+            AddColumn("dbo.RawItemList", "LastSync", c => c.DateTime(nullable: false, precision: 0));
+        }
+        
+        public override void Down()
+        {
+            DropColumn("dbo.RawItemList", "LastSync");
+        }
+    }
+}

EgtBEAMWALL.DataLayer/Migrations/202403120803297_AddMagmanSyncTab.Designer.cs

@@ -0,0 +1,29 @@
+// <auto-generated />
+namespace EgtBEAMWALL.DataLayer.Migrations
+{
+    using System.CodeDom.Compiler;
+    using System.Data.Entity.Migrations;
+    using System.Data.Entity.Migrations.Infrastructure;
+    using System.Resources;
+    
+    [GeneratedCode("EntityFramework.Migrations", "6.4.4")]
+    public sealed partial class AddMagmanSyncTab : IMigrationMetadata
+    {
+        private readonly ResourceManager Resources = new ResourceManager(typeof(AddMagmanSyncTab));
+        
+        string IMigrationMetadata.Id
+        {
+            get { return "202403120803297_AddMagmanSyncTab"; }
+        }
+        
+        string IMigrationMetadata.Source
+        {
+            get { return null; }
+        }
+        
+        string IMigrationMetadata.Target
+        {
+            get { return Resources.GetString("Target"); }
+        }
+    }
+}

EgtBEAMWALL.DataLayer/Migrations/202403120803297_AddMagmanSyncTab.cs

@@ -0,0 +1,30 @@
+namespace EgtBEAMWALL.DataLayer.Migrations
+{
+    using System;
+    using System.Data.Entity.Migrations;
+    
+    public partial class AddMagmanSyncTab : DbMigration
+    {
+        public override void Up()
+        {
+            CreateTable(
+                "dbo.MagmanSync",
+                c => new
+                    {
+                        SyncId = c.Int(nullable: false, identity: true),
+                        SyncType = c.String(unicode: false),
+                        CloudId = c.Int(nullable: false),
+                        DtReq = c.DateTime(nullable: false, precision: 0),
+                        DtExe = c.DateTime(precision: 0),
+                        Payload = c.String(unicode: false),
+                    })
+                .PrimaryKey(t => t.SyncId);
+            
+        }
+        
+        public override void Down()
+        {
+            DropTable("dbo.MagmanSync");
+        }
+    }
+}

EgtBEAMWALL.DataLayer/Properties/AssemblyInfo.cs

@@ -32,5 +32,5 @@ using System.Runtime.InteropServices;
 // You can specify all the values or you can default the Build and Revision Numbers
 // by using the '*' as shown below:
 // [assembly: AssemblyVersion("1.0.*")]
-[assembly: AssemblyVersion("2.5.7.1")]
-[assembly: AssemblyFileVersion("2.5.7.1")]
+[assembly: AssemblyVersion("2.5.12.2")]
+[assembly: AssemblyFileVersion("2.5.12.2")]

EgtBEAMWALL.DataLayer/packages.config

@@ -2,21 +2,27 @@
 <packages>
   <package id="BouncyCastle" version="1.8.5" targetFramework="net472" />
   <package id="DotNetZip" version="1.16.0" targetFramework="net472" />
+  <package id="EgwProxy.MagMan" version="1.0.2402.2912" targetFramework="net472" />
   <package id="EntityFramework" version="6.4.4" targetFramework="net452" />
   <package id="Google.Protobuf" version="3.21.9" targetFramework="net472" />
-  <package id="K4os.Compression.LZ4" version="1.3.5" targetFramework="net472" />
-  <package id="K4os.Compression.LZ4.Streams" version="1.3.5" targetFramework="net472" />
+  <package id="K4os.Compression.LZ4" version="1.3.6" targetFramework="net472" />
+  <package id="K4os.Compression.LZ4.Streams" version="1.3.6" targetFramework="net472" />
   <package id="K4os.Hash.xxHash" version="1.0.8" targetFramework="net472" />
+  <package id="Microsoft.Bcl.AsyncInterfaces" version="7.0.0" targetFramework="net472" />
   <package id="MySql.Data" version="8.0.21" targetFramework="net472" />
   <package id="MySql.Data.EntityFramework" version="8.0.21" targetFramework="net472" />
   <package id="Newtonsoft.Json" version="13.0.1" targetFramework="net452" />
   <package id="NLog" version="5.0.1" targetFramework="net472" />
   <package id="Portable.BouncyCastle" version="1.9.0" targetFramework="net472" />
+  <package id="RestSharp" version="110.2.0" targetFramework="net472" />
   <package id="SSH.NET" version="2016.1.0" targetFramework="net472" />
   <package id="System.Buffers" version="4.5.1" targetFramework="net472" />
-  <package id="System.IO.Pipelines" version="5.0.2" targetFramework="net472" />
+  <package id="System.IO.Pipelines" version="6.0.3" targetFramework="net472" />
   <package id="System.Memory" version="4.5.5" targetFramework="net472" />
   <package id="System.Numerics.Vectors" version="4.5.0" targetFramework="net472" />
   <package id="System.Runtime.CompilerServices.Unsafe" version="6.0.0" targetFramework="net472" />
+  <package id="System.Text.Encodings.Web" version="7.0.0" targetFramework="net472" />
+  <package id="System.Text.Json" version="7.0.2" targetFramework="net472" />
   <package id="System.Threading.Tasks.Extensions" version="4.5.4" targetFramework="net472" />
+  <package id="System.ValueTuple" version="4.5.0" targetFramework="net472" />
 </packages>

EgtBEAMWALL.Supervisor/ItemParamList/RawPartListV.xaml.vb

@@ -219,6 +219,7 @@ Friend Class MyComparer
                Return 0
             End If
       End Select
+      Return 0
    End Function
 
 End Class

EgtBEAMWALL.Supervisor/LeftPanel/LeftPanelVM.vb

@@ -437,6 +437,10 @@ Public Class LeftPanelVM
                                                          New OPState("Reset", OPStates.End),
                                                          New OPState("Unspecified", OPStates.Unspecified)
          }
+         Case Else
+            m_OPStateList = New List(Of OPState) From {
+                                                         New OPState("Unspecified", OPStates.Unspecified)
+         }
       End Select
       ' seleziono in partenza unspecified
       Dim UnspecifiedState As OPState = m_OPStateList.FirstOrDefault(Function(x) x.Id = OPStates.Unspecified)

EgtBEAMWALL.Supervisor/MachGroupPanel/MyMachGroupVM.vb

@@ -317,6 +317,7 @@ Public Class MyMachGroupVM
          ' segno pezzo da produrre
          MachGroup.m_bToBeProduced = True
          MachGroup.NotifyPropertyChanged(NameOf(MachGroup.Production_Background))
+         Map.refSupervisorMachGroupPanelVM.MachGroupVMList_View.Refresh()
 
          ' sposto MachGroup in lista come ultimo dei pronti da produrre
          Dim OldIndex As Integer = Map.refProjectVM.SupervisorMachGroupPanelVM.MachGroupVMList.IndexOf(MachGroup)

EgtBEAMWALL.Supervisor/MainWindow/MainWindowM.vb

@@ -248,8 +248,8 @@ Public Class MainWindowM
          EgtSetLockId( sLockId)
       End If
       ' Recupero livello e opzioni della chiave
-      Dim bKey As Boolean = EgtGetKeyLevel(5327, 2506, 1, m_nKeyLevel) And
-                            EgtGetKeyOptions(5327, 2506, 1, m_nKeyOptions)
+      Dim bKey As Boolean = EgtGetKeyLevel(5327, 2512, 1, m_nKeyLevel) And
+                            EgtGetKeyOptions(5327, 2512, 1, m_nKeyOptions)
       ' Inizializzazione generale di EgtInterface
       m_nDebug = GetMainPrivateProfileInt(S_GENERAL, K_DEBUG, 0)
       m_sLogFile = m_sTempDir & "\" & SUPGENLOG_FILE_NAME.Replace("#", m_nInstance.ToString())

EgtBEAMWALL.Supervisor/My Project/AssemblyInfo.vb

@@ -70,5 +70,5 @@ Imports System.Windows
 ' by using the '*' as shown below:
 ' <Assembly: AssemblyVersion("1.0.*")>
 
-<Assembly: AssemblyVersion("2.5.7.1")>
-<Assembly: AssemblyFileVersion("2.5.7.1")>
+<Assembly: AssemblyVersion("2.5.12.2")>
+<Assembly: AssemblyFileVersion("2.5.12.2")>

EgtBEAMWALL.Supervisor/OpenProjectFileDialog/OpenProjectFileDialogVM.vb

@@ -11,13 +11,14 @@ Public Class OpenProjectFileDialogVM
 
    Public Overrides Function Init(ProjectType As ProjectType, Optional CurrProjectList As List(Of ProjectFileVM) = Nothing, Optional GoToProd As Boolean = False) As Boolean?
       m_ProjectType = ProjectType
+      m_GoToProd = GoToProd
       ' carico colonne
       LoadColumns(m_ProjectType)
       NotifyPropertyChanged(NameOf(FilterTypeList))
       m_SelFilterType = m_FilterTypeList(0)
       ' carico lista progetti
       If IsNothing(CurrProjectList) OrElse CurrProjectList.Count = 0 Then
-         RefreshProjectList(GoToProd)
+         RefreshProjectList()
       Else
          m_ProjectList = New ObservableCollection(Of ProjectFileVM)(CurrProjectList)
          NotifyPropertyChanged(NameOf(ProjectList))
@@ -26,7 +27,7 @@ Public Class OpenProjectFileDialogVM
       m_ProjectList_View.Filter = AddressOf ProjectFilter
    End Function
 
-   Public Overrides Sub RefreshProjectList(Optional GoToProd As Boolean = False)
+   Public Overrides Sub RefreshProjectList()
       m_ProjectList.Clear()
       ' calcolo periodo e righe
       Dim dtStart As DateTime
@@ -43,13 +44,13 @@ Public Class OpenProjectFileDialogVM
       Select Case m_SelDayType
          Case DayTypes.LASTMONTH
             dtEnd = DateTime.Today + TimeSpan.FromDays(1)
-            dtStart = dtEnd - TimeSpan.FromDays(31)
+            dtStart = dtEnd - TimeSpan.FromDays(30.5)
          Case DayTypes.LAST3MONTHS
             dtEnd = DateTime.Today + TimeSpan.FromDays(1)
-            dtStart = dtEnd - TimeSpan.FromDays(31 * 3)
+            dtStart = dtEnd - TimeSpan.FromDays(30.5 * 3)
          Case DayTypes.LAST6MONTHS
             dtEnd = DateTime.Today + TimeSpan.FromDays(1)
-            dtStart = dtEnd - TimeSpan.FromDays(31 * 6)
+            dtStart = dtEnd - TimeSpan.FromDays(30.5 * 6)
          Case DayTypes.PERIOD
             dtStart = dtStartDate + TimeSpan.FromDays(1)
             dtEnd = dtEndDate

EgtBEAMWALL.ViewerOptimizer/BTLViewModel/BTLPartVM.vb

@@ -93,10 +93,14 @@ Public Class BTLPartVM
                   Dim LSTValues() As String = sSwapItem.Split(","c)
                   If Not IsNothing(LSTValues(LSTValues.Count - 1)) AndAlso Integer.TryParse(LSTValues(LSTValues.Count - 1), nSwapItem) AndAlso nSwapItem > 0 Then
                      Dim nMachgroupId As Integer = EgtGetParent(EgtGetParent(EgtGetParent(nSwapItem)))
-                     Dim MachGroupModel = DbControllers.m_MachGroupController.FindByMachGroupId(Map.refProjManagerVM.CurrProj.nProdId, nMachgroupId)
-                     If MachGroupModel.State > ItemState.ND Then
-                        bDuploInProduction = True
-                        Exit For
+                     If nMachgroupId = GDB_ID.NULL Then
+                        EgtOutLog("Trovato Duplo Ghost")
+                     Else
+                        Dim MachGroupModel = DbControllers.m_MachGroupController.FindByMachGroupId(Map.refProjManagerVM.CurrProj.nProdId, nMachgroupId)
+                        If MachGroupModel.State > ItemState.ND Then
+                           bDuploInProduction = True
+                           Exit For
+                        End If
                      End If
                   End If
                Next
@@ -448,26 +452,21 @@ Public Class BTLPartVM
                   OldSection = Map.refProjectVM.BTLStructureVM.SectionList.FirstOrDefault(Function(x) x = Section)
                End If
                m_BTLPartM.sMATERIAL = value
-               ' aggiorno sezione
-               If bOtherSection Then
-                  ' se sezione nuova non presente
-                  If Not Map.refProjectVM.BTLStructureVM.SectionList.Contains(Section) Then
-                     ' creo nuova sezione
-                     Map.refProjectVM.BTLStructureVM.SectionList.Add(Section)
-                  End If
-               Else
-                  ' se sezione nuova gia' presente
-                  If Map.refProjectVM.BTLStructureVM.SectionList.Contains(Section) Then
-                     ' cancello sezione vecchia
-                     Map.refProjectVM.BTLStructureVM.SectionList.Remove(OldSection)
-                  Else
-                     ' altrimenti la modifico
-                     If Not IsNothing(OldSection) Then
-                        OldSection.sMaterial.Clear()
-                        OldSection.sMaterial.Add(sMATERIAL)
-                     End If
+               ' se sezione nuova non presente
+               If Not Map.refProjectVM.BTLStructureVM.SectionList.Contains(Section) Then
+                  ' creo nuova sezione
+                  Dim nMaterialId As Integer = DbControllers.m_MaterialsController.Insert(Section.MaterialM)
+                  Dim NewSection = Section
+                  Map.refProjectVM.BTLStructureVM.SectionList.Add(NewSection)
+                  If nMaterialId <> 0 Then
+                     NewSection.MaterialM.SetId(nMaterialId)
                   End If
                End If
+               ' se sezione vecchia non utilizzata da altri pezzi
+               If Not bOtherSection Then
+                  ' cancello sezione vecchia
+                  Map.refProjectVM.BTLStructureVM.SectionList.Remove(OldSection)
+               End If
             End If
             NotifyPropertyChanged(NameOf(sMATERIAL))
          End If
@@ -1996,7 +1995,7 @@ Public Class BTLPartVM
       ' se progetto travi e sezione precedente diversa da vuota (tutti i pezzi)
       If bUpdateSection AndAlso Map.refProjectVM.BTLStructureVM.nPROJTYPE = BWType.BEAM AndAlso CurrSection <> SectionXMaterial.Empty Then
          ' se esiste, imposto sezione inversa
-         Dim InverseSection As SectionXMaterial = Map.refProjectVM.BTLStructureVM.SectionList.FirstOrDefault(Function(x) x.dH = CurrSection.dW AndAlso x.dW = CurrSection.dH AndAlso x.sMaterial(0) = CurrSection.sMaterial(0))
+         Dim InverseSection As SectionXMaterial = Map.refProjectVM.BTLStructureVM.SectionList.FirstOrDefault(Function(x) x.dH = CurrSection.dW AndAlso x.dW = CurrSection.dH AndAlso x.sMaterial = CurrSection.sMaterial)
          If Not IsNothing(InverseSection) Then Map.refProjectVM.BTLStructureVM.SetSelSection(InverseSection)
       End If
    End Sub
@@ -2027,7 +2026,7 @@ Public Class BTLPartVM
       ' se progetto travi e sezione precedente diversa da vuota (tutti i pezzi)
       If bUpdateSection AndAlso Map.refProjectVM.BTLStructureVM.nPROJTYPE = BWType.BEAM AndAlso CurrSection <> SectionXMaterial.Empty Then
          ' se esiste, imposto sezione inversa
-         Dim InverseSection As SectionXMaterial = Map.refProjectVM.BTLStructureVM.SectionList.FirstOrDefault(Function(x) x.dH = CurrSection.dW AndAlso x.dW = CurrSection.dH AndAlso x.sMaterial(0) = CurrSection.sMaterial(0))
+         Dim InverseSection As SectionXMaterial = Map.refProjectVM.BTLStructureVM.SectionList.FirstOrDefault(Function(x) x.dH = CurrSection.dW AndAlso x.dW = CurrSection.dH AndAlso x.sMaterial = CurrSection.sMaterial)
          If Not IsNothing(InverseSection) Then Map.refProjectVM.BTLStructureVM.SetSelSection(InverseSection)
       End If
    End Sub

EgtBEAMWALL.ViewerOptimizer/BTLViewModel/BTLStructureVM.vb

@@ -398,7 +398,8 @@ Public Class BTLStructureVM
          End If
       End If
 
-      SelBTLParts.AddToList(SelBTLPart)
+      If Not IsNothing(SelBTLPart) Then SelBTLParts.AddToList(SelBTLPart)
+
       If bByOptim Then
          m_bOnlySelectItem = False
       End If
@@ -997,7 +998,12 @@ Public Class BTLStructureVM
       For Each BTLPartVM As BTLPartVM In m_BTLPartVMList
          ' verifico sezione, gruppo e sottogruppo per inserirli nei filtri
          If Not SectionList.Contains(BTLPartVM.Section) Then
-            SectionList.Add(BTLPartVM.Section)
+            Dim nMaterialId As Integer = DbControllers.m_MaterialsController.Insert(BTLPartVM.Section.MaterialM)
+            Dim NewSection = BTLPartVM.Section
+            Map.refProjectVM.BTLStructureVM.SectionList.Add(NewSection)
+            If nMaterialId <> 0 Then
+               NewSection.MaterialM.SetId(nMaterialId)
+            End If
          End If
          If Not GroupList.Contains(BTLPartVM.sGROUP) Then
             GroupList.Add(BTLPartVM.sGROUP)

EgtBEAMWALL.ViewerOptimizer/CALCPanel/CalcPanelV.xaml

@@ -47,6 +47,7 @@
            Visibility="{Binding ChooseMachineBtn_Visibility}">
       <Image Source="/Resources/CALCPanel/ChooseMachine.png" Stretch="Uniform"/>
    </Button>
+
    <Grid Margin="0,0,5,0" Visibility="{Binding ChooseMachine_Visibility}">
         <Grid.ColumnDefinitions>
             <ColumnDefinition Width="Auto"/>

EgtBEAMWALL.ViewerOptimizer/EgtBEAMWALL.ViewerOptimizer.vbproj

@@ -152,6 +152,9 @@
       <SpecificVersion>False</SpecificVersion>
       <HintPath>..\ExtLibs\EgtWPFLib5.dll</HintPath>
     </Reference>
+    <Reference Include="EgwProxy.MagMan, Version=1.0.0.0, Culture=neutral, processorArchitecture=MSIL">
+      <HintPath>..\packages\EgwProxy.MagMan.1.0.2402.619\lib\EgwProxy.MagMan.dll</HintPath>
+    </Reference>
     <Reference Include="EntityFramework, Version=6.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089, processorArchitecture=MSIL">
       <HintPath>..\packages\EntityFramework.6.4.4\lib\net45\EntityFramework.dll</HintPath>
     </Reference>
@@ -170,6 +173,9 @@
     <Reference Include="K4os.Hash.xxHash, Version=1.0.8.0, Culture=neutral, PublicKeyToken=32cd54395057cec3, processorArchitecture=MSIL">
       <HintPath>..\packages\K4os.Hash.xxHash.1.0.8\lib\net462\K4os.Hash.xxHash.dll</HintPath>
     </Reference>
+    <Reference Include="Microsoft.Bcl.AsyncInterfaces, Version=7.0.0.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
+      <HintPath>..\packages\Microsoft.Bcl.AsyncInterfaces.7.0.0\lib\net462\Microsoft.Bcl.AsyncInterfaces.dll</HintPath>
+    </Reference>
     <Reference Include="Microsoft.CSharp" />
     <Reference Include="MigraDoc.DocumentObjectModel-wpf, Version=1.50.5147.0, Culture=neutral, PublicKeyToken=f94615aa0424f9eb, processorArchitecture=MSIL">
       <HintPath>..\packages\PDFsharp-MigraDoc-wpf.1.50.5147\lib\net30\MigraDoc.DocumentObjectModel-wpf.dll</HintPath>
@@ -186,6 +192,9 @@
     <Reference Include="MySql.Data.EntityFramework, Version=8.0.21.0, Culture=neutral, PublicKeyToken=c5687fc88969c44d, processorArchitecture=MSIL">
       <HintPath>..\packages\MySql.Data.EntityFramework.8.0.21\lib\net452\MySql.Data.EntityFramework.dll</HintPath>
     </Reference>
+    <Reference Include="Newtonsoft.Json, Version=13.0.0.0, Culture=neutral, PublicKeyToken=30ad4fe6b2a6aeed, processorArchitecture=MSIL">
+      <HintPath>..\packages\Newtonsoft.Json.13.0.1\lib\net45\Newtonsoft.Json.dll</HintPath>
+    </Reference>
     <Reference Include="NLog, Version=5.0.0.0, Culture=neutral, PublicKeyToken=5120e14c03d0593c, processorArchitecture=MSIL">
       <HintPath>..\packages\NLog.5.0.1\lib\net46\NLog.dll</HintPath>
     </Reference>
@@ -198,6 +207,9 @@
     <Reference Include="Renci.SshNet, Version=2016.1.0.0, Culture=neutral, PublicKeyToken=1cee9f8bde3db106, processorArchitecture=MSIL">
       <HintPath>..\packages\SSH.NET.2016.1.0\lib\net40\Renci.SshNet.dll</HintPath>
     </Reference>
+    <Reference Include="RestSharp, Version=110.2.0.0, Culture=neutral, PublicKeyToken=598062e77f915f75, processorArchitecture=MSIL">
+      <HintPath>..\packages\RestSharp.110.2.0\lib\net471\RestSharp.dll</HintPath>
+    </Reference>
     <Reference Include="System.Buffers, Version=4.0.3.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
       <HintPath>..\packages\System.Buffers.4.5.1\lib\net461\System.Buffers.dll</HintPath>
     </Reference>
@@ -216,6 +228,7 @@
     <Reference Include="System.Memory, Version=4.0.1.2, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
       <HintPath>..\packages\System.Memory.4.5.5\lib\net461\System.Memory.dll</HintPath>
     </Reference>
+    <Reference Include="System.Net.Http" />
     <Reference Include="System.Numerics" />
     <Reference Include="System.Numerics.Vectors, Version=4.1.4.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL">
       <HintPath>..\packages\System.Numerics.Vectors.4.5.0\lib\net46\System.Numerics.Vectors.dll</HintPath>
@@ -224,10 +237,20 @@
       <HintPath>..\packages\System.Runtime.CompilerServices.Unsafe.6.0.0\lib\net461\System.Runtime.CompilerServices.Unsafe.dll</HintPath>
     </Reference>
     <Reference Include="System.Security" />
+    <Reference Include="System.Text.Encodings.Web, Version=7.0.0.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.Text.Encodings.Web.7.0.0\lib\net462\System.Text.Encodings.Web.dll</HintPath>
+    </Reference>
+    <Reference Include="System.Text.Json, Version=7.0.0.2, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.Text.Json.7.0.2\lib\net462\System.Text.Json.dll</HintPath>
+    </Reference>
     <Reference Include="System.Threading.Tasks.Extensions, Version=4.2.0.1, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
       <HintPath>..\packages\System.Threading.Tasks.Extensions.4.5.4\lib\net461\System.Threading.Tasks.Extensions.dll</HintPath>
     </Reference>
     <Reference Include="System.Transactions" />
+    <Reference Include="System.ValueTuple, Version=4.0.3.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
+      <HintPath>..\packages\System.ValueTuple.4.5.0\lib\net47\System.ValueTuple.dll</HintPath>
+    </Reference>
+    <Reference Include="System.Web" />
     <Reference Include="System.Windows.Forms" />
     <Reference Include="System.Xml.Linq" />
     <Reference Include="System.Data.DataSetExtensions" />
@@ -338,6 +361,10 @@
       <DependentUpon>SetUpV.xaml</DependentUpon>
     </Compile>
     <Compile Include="SetUp\SetUpVM.vb" />
+    <Compile Include="SpecialPanel\SpecialPanelV.xaml.vb">
+      <DependentUpon>SpecialPanelV.xaml</DependentUpon>
+    </Compile>
+    <Compile Include="SpecialPanel\SpecialPanelVM.vb" />
     <Compile Include="StatisticsTimePanel\StatisticsTimePanelV.xaml.vb">
       <DependentUpon>StatisticsTimePanelV.xaml</DependentUpon>
     </Compile>
@@ -544,6 +571,10 @@
       <Generator>MSBuild:Compile</Generator>
       <SubType>Designer</SubType>
     </Page>
+    <Page Include="SpecialPanel\SpecialPanelV.xaml">
+      <SubType>Designer</SubType>
+      <Generator>XamlIntelliSenseFileGenerator</Generator>
+    </Page>
     <Page Include="StatisticsTimePanel\StatisticsTimePanelV.xaml">
       <Generator>MSBuild:Compile</Generator>
       <SubType>Designer</SubType>

EgtBEAMWALL.ViewerOptimizer/LeftPanel/LeftPanelVM.vb

@@ -1031,7 +1031,12 @@ Public Class LeftPanelVM
             Map.refProjectVM.BTLStructureVM.SetSelBTLPart(NewPartVM, False, True)
             ' verifico se aggiungere sezione alla lista
             If Not Map.refProjectVM.BTLStructureVM.SectionList.Contains(NewPartVM.Section) Then
-               Map.refProjectVM.BTLStructureVM.SectionList.Add(NewPartVM.Section)
+               Dim nMaterialId As Integer = DbControllers.m_MaterialsController.Insert(NewPartVM.Section.MaterialM)
+               Dim NewSection = NewPartVM.Section
+               Map.refProjectVM.BTLStructureVM.SectionList.Add(NewSection)
+               If nMaterialId <> 0 Then
+                  NewSection.MaterialM.SetId(nMaterialId)
+               End If
             End If
          End If
       End If
@@ -1184,7 +1189,7 @@ Public Class LeftPanelVM
       ' se progetto travi e sezione precedente diversa da vuota (tutti i pezzi)
       If Map.refProjectVM.BTLStructureVM.nPROJTYPE = BWType.BEAM AndAlso CurrSection <> SectionXMaterial.Empty Then
          ' se esiste, imposto sezione inversa
-         Dim InverseSection As SectionXMaterial = Map.refProjectVM.BTLStructureVM.SectionList.FirstOrDefault(Function(x) x.dH = CurrSection.dW AndAlso x.dW = CurrSection.dH AndAlso x.sMaterial(0) = CurrSection.sMaterial(0))
+         Dim InverseSection As SectionXMaterial = Map.refProjectVM.BTLStructureVM.SectionList.FirstOrDefault(Function(x) x.dH = CurrSection.dW AndAlso x.dW = CurrSection.dH AndAlso x.sMaterial = CurrSection.sMaterial)
          If Not IsNothing(InverseSection) Then Map.refProjectVM.BTLStructureVM.SetSelSection(InverseSection)
       End If
       EgtDraw()
@@ -1228,7 +1233,7 @@ Public Class LeftPanelVM
       ' se progetto travi e sezione precedente diversa da vuota (tutti i pezzi)
       If Map.refProjectVM.BTLStructureVM.nPROJTYPE = BWType.BEAM AndAlso CurrSection <> SectionXMaterial.Empty Then
          ' se esiste, imposto sezione inversa
-         Dim InverseSection As SectionXMaterial = Map.refProjectVM.BTLStructureVM.SectionList.FirstOrDefault(Function(x) x.dH = CurrSection.dW AndAlso x.dW = CurrSection.dH AndAlso x.sMaterial(0) = CurrSection.sMaterial(0))
+         Dim InverseSection As SectionXMaterial = Map.refProjectVM.BTLStructureVM.SectionList.FirstOrDefault(Function(x) x.dH = CurrSection.dW AndAlso x.dW = CurrSection.dH AndAlso x.sMaterial = CurrSection.sMaterial)
          If Not IsNothing(InverseSection) Then Map.refProjectVM.BTLStructureVM.SetSelSection(InverseSection)
       End If
       EgtDraw()

EgtBEAMWALL.ViewerOptimizer/MachGroupPanel/MyMachGroupPanelVM.vb

@@ -172,13 +172,17 @@ Public Class MyMachGroupPanelVM
                   ' elimino pezzo copia
                   EgtRemovePartFromRawPart(nDuploId)
                   EgtErase(nDuploId)
-                  '' recupero gruppo di lavorazione e trave dell'interfaccia
+                  ' recupero gruppo di lavorazione e trave dell'interfaccia
                   Dim BeamMachGroup As MyMachGroupVM = MachGroupVMList.FirstOrDefault(Function(x) x.Id = nMachGroupId)
                   If Not IsNothing(BeamMachGroup) Then
                      Dim Beam As PartVM = BeamMachGroup.PartVMList.FirstOrDefault(Function(x) x.nPartId = nDuploId)
                      EgtSetCurrMachGroup(BeamMachGroup.Id)
                      Beam.DeletePart()
                   End If
+                  ' reset necessario per poter ottenere nMachGroupId corretto
+                  EgtResetCurrMachGroup()
+                  ' aggiorno dati utilizzo barra
+                  BeamMachGroup.UpdateUsage()
                Next
                ' aggiorno quantita' in prod
                Dim BTLPart As BTLPartVM = CALCPanelVM.GetBTLPartVMFromBTLPartId(nPartId)

EgtBEAMWALL.ViewerOptimizer/MainWindow/MainWindowM.vb

@@ -157,6 +157,13 @@ Public Class MainWindowM
       End Get
    End Property
 
+   Private m_bSpecialPanel As Boolean = False
+   Friend ReadOnly Property bSpecialPanel As Boolean
+      Get
+         Return m_bSpecialPanel
+      End Get
+   End Property
+
 #End Region    ' FIELDS
 
 #Region "CONSTRUCTOR"
@@ -235,8 +242,8 @@ Public Class MainWindowM
          EgtSetLockId( sLockId)
       End If
       ' Recupero livello e opzioni della chiave
-      Dim bKey As Boolean = EgtGetKeyLevel(5327, 2506, 1, m_nKeyLevel) And
-                            EgtGetKeyOptions(5327, 2506, 1, m_nKeyOptions)
+      Dim bKey As Boolean = EgtGetKeyLevel(5327, 2512, 1, m_nKeyLevel) And
+                            EgtGetKeyOptions(5327, 2512, 1, m_nKeyOptions)
       ' Inizializzazione generale di EgtInterface
       m_nDebug = GetMainPrivateProfileInt(S_GENERAL, K_DEBUG, 0)
       m_sLogFile = m_sTempDir & "\" & VWOPTGENLOG_FILE_NAME.Replace("#", m_nInstance.ToString())
@@ -278,6 +285,8 @@ Public Class MainWindowM
       EgtSetUiUnits(GetMainPrivateProfileInt(S_SCENE, K_MMUNITS, 1) <> 0)
       ' Leggo e imposto livello utilizzatore
       m_nUserLevel = Math.Min(m_nKeyLevel, GetMainPrivateProfileInt(S_GENERAL, K_USERLEVEL, 1))
+      ' Recupero flag SpecialPanel
+      m_bSpecialPanel = GetMainPrivateProfileInt(S_SPECIAL, K_SPECIALENABLE, 0) = 1
       ' Imposto dir font Nfe e font default
       Dim sNfeDir As String = String.Empty
       GetMainPrivateProfileString(S_GEOMDB, K_NFEFONTDIR, "", sNfeDir)

EgtBEAMWALL.ViewerOptimizer/MainWindow/MainWindowVM.vb

@@ -4,8 +4,10 @@ Imports EgtBEAMWALL.Core.ConstGen
 Imports EgtBEAMWALL.Core.ConstIni
 Imports EgtUILib
 Imports EgtWPFLib5
+Imports System.Collections.ObjectModel
 Imports System.IO
 Imports System.Threading
+Imports System.Windows.Media.Media3D
 Imports System.Windows.Threading
 
 Public Class MainWindowVM
@@ -13,6 +15,7 @@ Public Class MainWindowVM
 
    Private m_SupervisorCommThread As Thread
    Private m_Supervisor_Timer As New DispatcherTimer
+   Private m_MaterialSyncroThread As Thread
 
    ' Riferimento al Model della MainWindow
    Private m_MainWindowM As MainWindowM
@@ -171,7 +174,141 @@ Public Class MainWindowVM
       ' avvio thread di gestione della macchina che avvia la connessione
       m_SupervisorCommThread.Start()
 
-      ' verifico se richiedere di fare backup
+      ' verifico se devo copiare file warehouse in Db
+      Dim sWarehousePath As String = Map.refMainWindowVM.MainWindowM.sWarehouseDir & "\" & WH_MEDIUM_INI_FILE_NAME
+      If File.Exists(sWarehousePath) Then
+         Dim bOk As Boolean = False
+         ' leggo materiali da file
+         Dim MaterialList As New List(Of IdMaterial)
+         Dim SectXMatList As New List(Of SectionXMaterial)
+         Dim nSectXMatIndex As Integer = 1
+         Dim sSxMValue As String = ""
+         While EgtUILib.GetPrivateProfileString(S_BEAM_LIST, nSectXMatIndex, String.Empty, sSxMValue, sWarehousePath)
+            Dim sSectXMatValues() As String = sSxMValue.Split(","c)
+            ' creo parametro
+            Dim dW As Double = 0
+            Dim dH As Double = 0
+            StringToLenAdv(sSectXMatValues(0), dW)
+            StringToLenAdv(sSectXMatValues(1), dH)
+            Dim NewMaterial As New MaterialM(dW, dH, 0, sSectXMatValues(2))
+            NewMaterial.SetId(DbControllers.m_MaterialsController.Insert(NewMaterial))
+            MaterialList.Add(New IdMaterial(nSectXMatIndex, NewMaterial))
+            nSectXMatIndex += 1
+         End While
+         Dim ParamIndex As Integer = 1
+         Dim sValue As String = String.Empty
+         ' leggo grezzi da file
+         While EgtUILib.GetPrivateProfileString(S_BEAM, "L" & ParamIndex, String.Empty, sValue, sWarehousePath)
+            Dim sParamValues() As String = sValue.Split(","c)
+            ' verifico numero minimo di parametri
+            If sParamValues.Count >= 2 Then
+               ' cancello spazi
+               For Index = 0 To sParamValues.Count - 1
+                  sParamValues(Index) = sParamValues(Index).Trim()
+               Next
+               Dim RawPartIdMaterial As IdMaterial = MaterialList.FirstOrDefault(Function(x) x.nIndex = sParamValues(0))
+               ' creo parametro
+               Dim dL As Double = 0
+               Dim nQty As Integer = 0
+               Dim nActive As Integer = 1
+               StringToLenAdv(sParamValues(1), dL)
+               If sParamValues.Count >= 3 Then Integer.TryParse(sParamValues(2), nQty)
+               If sParamValues.Count >= 4 Then Integer.TryParse(sParamValues(3), nActive)
+               DbControllers.m_RawItemsController.Upsert(New RawPartM(RawPartIdMaterial.Material, 0, dL, nQty, nActive > 0))
+            End If
+            ParamIndex += 1
+         End While
+         ' ricavo SectionXMaterial tramite Wall_List
+         MaterialList.Clear()
+         nSectXMatIndex = 1
+         sSxMValue = ""
+         While EgtUILib.GetPrivateProfileString(S_WALL_LIST, nSectXMatIndex, String.Empty, sSxMValue, sWarehousePath)
+            Dim sSectXMatValues() As String = sSxMValue.Split(","c)
+            ' creo parametro
+            Dim dH As Double = 0
+            StringToLenAdv(sSectXMatValues(0), dH)
+            Dim NewMaterial As New MaterialM(0, dH, 0, sSectXMatValues(1))
+            NewMaterial.SetId(DbControllers.m_MaterialsController.Insert(NewMaterial))
+            MaterialList.Add(New IdMaterial(nSectXMatIndex, NewMaterial))
+            nSectXMatIndex += 1
+         End While
+         ParamIndex = 1
+         While EgtUILib.GetPrivateProfileString(S_WALL, "S" & ParamIndex, String.Empty, sValue, sWarehousePath)
+            Dim sParamValues() As String = sValue.Split(","c)
+            ' verifico numero minimo di parametri
+            If sParamValues.Count >= 3 Then
+               ' cancello spazi
+               For Index = 0 To sParamValues.Count - 1
+                  sParamValues(Index) = sParamValues(Index).Trim()
+               Next
+               Dim RawPartIdMaterial As IdMaterial = MaterialList.FirstOrDefault(Function(x) x.nIndex = sParamValues(0))
+               ' creo parametro
+               Dim dW As Double = 0
+               Dim dL As Double = 0
+               Dim nQty As Integer = 0
+               Dim nActive As Integer = 1
+               StringToLenAdv(sParamValues(1), dW)
+               StringToLenAdv(sParamValues(2), dL)
+               If sParamValues.Count >= 4 Then Integer.TryParse(sParamValues(3), nQty)
+               If sParamValues.Count >= 5 Then Integer.TryParse(sParamValues(4), nActive)
+               DbControllers.m_RawItemsController.Upsert(New RawPartM(RawPartIdMaterial.Material, dW, dL, nQty, nActive > 0))
+            End If
+            ParamIndex += 1
+         End While
+
+         'If bOk Then
+         '   File.Move(sWarehousePath, Path.ChangeExtension(sWarehousePath, ".old.ini"))
+         'End If
+      End If
+
+
+      m_MaterialSyncroThread = New Thread(Sub()
+                                             ' sincronizzo magazzino con versione online
+                                             'DbControllers.m_MagmanController.ResourcesForceSyncAll()
+                                             'Dim nIndex As Integer = 0
+                                             'Dim nMaterialOk As DataLayer.Controllers.MagmanController.SyncResult = DataLayer.Controllers.MagmanController.SyncResult.ERR_ND
+                                             'While nMaterialOk <> DataLayer.Controllers.MagmanController.SyncResult.ALL_OK And nIndex < 5
+                                             '   nMaterialOk = DbControllers.m_MagmanController.ResourcesForceSyncAll()
+                                             '   nIndex += 1
+                                             'End While
+                                             'Dim nRawOk As DataLayer.Controllers.MagmanController.SyncResult = DataLayer.Controllers.MagmanController.SyncResult.ERR_ND
+                                             'While nRawOk <> DataLayer.Controllers.MagmanController.SyncResult.ERR_Res2SendEmpty And nIndex < 5
+                                             '   nRawOk = DbControllers.m_MagmanController.ResourcesSync(New List(Of Integer)({19}))
+                                             '   nIndex += 1
+                                             'End While
+                                             'Dim nMaterialOk = DbControllers.m_MagmanController.ResourcesForceSyncAll()
+
+                                             'Dim bCurrMaterialOK As DataLayer.Controllers.MagmanController.SyncResult = DbControllers.m_MagmanController.ResourcesSync(New List(Of Integer)({19}))
+                                             'Dim nIndex As Integer = 0
+                                             'Dim bMaterialOk As Boolean = False
+                                             'While Not bMaterialOk And nIndex < 5
+                                             '   bMaterialOk = DbControllers.m_MagmanController.MaterialsSyncro()
+                                             '   nIndex += 1
+                                             'End While
+                                             'If bMaterialOk Then
+                                             '   'nIndex = 0
+                                             '   'Dim bRawPartOk As Boolean = False
+                                             '   'While Not bRawPartOk And nIndex < 5
+                                             '   '   Dim MaterialList As List(Of MaterialM) = DbControllers.m_MaterialsController.GetFilt("")
+                                             '   '   For Each Material In MaterialList
+                                             '   '      Dim bCurrMaterialOK As Boolean = DbControllers.m_MagmanController.ResourcesSync(New List(Of Integer)({Material.nId}))
+                                             '   '      If Not bCurrMaterialOK Then
+                                             '   '         bRawPartOk = False
+                                             '   '         Exit For
+                                             '   '      End If
+                                             '   '   Next
+                                             '   '   nIndex += 1
+                                             '   'End While
+                                             'End If
+                                          End Sub)
+      m_MaterialSyncroThread.SetApartmentState(ApartmentState.STA)
+      ' avvio thread di gestione della macchina che avvia la connessione
+      m_MaterialSyncroThread.Start()
+
+      ' sincronizzo magazzino con versione online
+      'DbControllers.m_MagmanController.MaterialsSyncro()
+
+      ' ' verifico se richiedere di fare backup
       If Map.refConfigurationPageVM.SelReminder.Id <> 0 Then
          Dim sBackupFolder As String = Map.refMainWindowVM.MainWindowM.sDataDir & "\Backup"
          Dim nYear As Integer = 0
@@ -389,3 +526,26 @@ Public Class MainWindowVM
 #End Region    ' COMMANDS
 
 End Class
+
+Public Class IdMaterial
+
+   Private m_nIndex As Integer
+   Public ReadOnly Property nIndex As Integer
+      Get
+         Return m_nIndex
+      End Get
+   End Property
+
+   Private m_Material As MaterialM
+   Public ReadOnly Property Material As MaterialM
+      Get
+         Return m_Material
+      End Get
+   End Property
+
+   Sub New(nIndex As Integer, Material As MaterialM)
+      m_nIndex = nIndex
+      m_Material = Material
+   End Sub
+
+End Class

EgtBEAMWALL.ViewerOptimizer/My Project/AssemblyInfo.vb

@@ -70,5 +70,5 @@ Imports System.Windows
 ' by using the '*' as shown below:
 ' <Assembly: AssemblyVersion("1.0.*")>
 
-<Assembly: AssemblyVersion("2.5.7.1")>
-<Assembly: AssemblyFileVersion("2.5.7.1")>
+<Assembly: AssemblyVersion("2.5.12.2")>
+<Assembly: AssemblyFileVersion("2.5.12.2")>

EgtBEAMWALL.ViewerOptimizer/NestingRunningWnd/NestingRunningWndVM.vb

@@ -275,7 +275,7 @@ Public Class NestingRunningWndVM
             Dim nIndex As Integer = 1
             ' aggiungo le sezioni con diverse lunghezze in base al warehouse
             If Map.refProjectVM.BTLStructureVM.nPROJTYPE = MachineType.BEAM Then
-               ' leggo start offset 
+               ' leggo start offset
                dStartOffset = WarehouseHelper.GetStartOffset()
                ' leggo lunghezza barra e quantity
                WarehouseHelper.GetDimensionsAndQuantityForList(Map.refProjectVM.BTLStructureVM.nPROJTYPE, m_SectionProgressList)
@@ -302,6 +302,37 @@ Public Class NestingRunningWndVM
                                                      Select x.BTLPartM).ToList()
          SectionProgress.SetSectionPartList(SectionPartList)
       Next
+      ' se magazzino di rete attivo e non impostato per utilizzo diretto
+      If GetMainPrivateProfileInt(S_GENERAL, K_NETWAREHOUSE, 0) = 1 Then
+         If Map.refOptimizePanelVM.UseNetWarehouse_IsChecked Then
+            ' modifico quantita' per grezzi considerando quelli gia' presenti nel progetto
+            For Each SectionProgress In m_SectionProgressList
+               For Each Raw In SectionProgress.SParamList
+                  Dim nProjectRawCnt As Integer = 0
+                  For Each MachGroup As MyMachGroupVM In Map.refMachGroupPanelVM.MachGroupVMList
+                     If MachGroup.Section = Raw.SectXMat AndAlso MachGroup.dL = Raw.dL Then
+                        nProjectRawCnt += 1
+                     End If
+                  Next
+                  Raw.nQuantity = Math.Max(Raw.nQuantity - nProjectRawCnt, 0)
+               Next
+            Next
+         Else
+            ' modifico quantita' per grezzi con flag quantita' infinita
+            For Each SectionProgress In m_SectionProgressList
+               For Each Raw In SectionProgress.SParamList
+                  If Raw.bUseQuantity Then Raw.nQuantity = SectionProgress.SectionPartList.Sum(Function(x) x.m_nCNT)
+               Next
+            Next
+         End If
+      Else
+         ' modifico quantita' per grezzi con flag quantita' infinita
+         For Each SectionProgress In m_SectionProgressList
+            For Each Raw In SectionProgress.SParamList
+               If Raw.bUseQuantity Then Raw.nQuantity = SectionProgress.SectionPartList.Count
+            Next
+         Next
+      End If
       ' avvio timer avanzamento nesting
       m_CurrState = SectionProgress.NestStates.NULL
       m_TotTime = 0

EgtBEAMWALL.ViewerOptimizer/NewOpenProjectFileDialog/NewOpenProjectFileDialogVM.vb

@@ -8,6 +8,16 @@ Imports EgtWPFLib5
 Public Class NewOpenProjectFileDialogVM
    Inherits Core.NewOpenProjectFileDialogVM
 
+   Public Overrides ReadOnly Property DayTypeList As List(Of String)
+      Get
+         Dim CurrDayTypeList As New List(Of String)({EgtMsg(62532), EgtMsg(62533), EgtMsg(62534), EgtMsg(62531)})
+         If Map.refMainWindowVM.MainWindowM.nUserLevel > 5 Then
+            CurrDayTypeList.Add("Always")
+         End If
+         Return CurrDayTypeList
+      End Get
+   End Property
+
 #Region "METHODS"
 
    Public Overrides Function Init(ProjectType As ProjectType, Optional CurrProjectList As List(Of ProjectFileVM) = Nothing, Optional GoToProd As Boolean = False) As Boolean?
@@ -44,24 +54,27 @@ Public Class NewOpenProjectFileDialogVM
       Select Case m_SelDayType
          Case DayTypes.LASTMONTH
             dtEnd = DateTime.Today + TimeSpan.FromDays(1)
-            dtStart = dtEnd - TimeSpan.FromDays(31)
+            dtStart = dtEnd - TimeSpan.FromDays(30.5)
          Case DayTypes.LAST3MONTHS
             dtEnd = DateTime.Today + TimeSpan.FromDays(1)
-            dtStart = dtEnd - TimeSpan.FromDays(31 * 3)
+            dtStart = dtEnd - TimeSpan.FromDays(30.5 * 3)
          Case DayTypes.LAST6MONTHS
             dtEnd = DateTime.Today + TimeSpan.FromDays(1)
-            dtStart = dtEnd - TimeSpan.FromDays(31 * 6)
+            dtStart = dtEnd - TimeSpan.FromDays(30.5 * 6)
          Case DayTypes.PERIOD
-            dtStart = dtStartDate + TimeSpan.FromDays(1)
-            dtEnd = dtEndDate
+            dtEnd = dtEndDate + TimeSpan.FromDays(1)
+            dtStart = dtStartDate
+         Case DayTypes.ALWAYS
+            dtEnd = DateTime.Today + TimeSpan.FromDays(1)
+            dtStart = New DateTime(2020, 1, 1)
       End Select
       ' leggo da db
       If m_ProjectType = ProjectType.PROJ Then
          Dim DbProjList As New List(Of ProjFileM)
          If m_SelBTLDateType = BTLDateTypes.CREATEDATE Then
-            DbProjList = DbControllers.m_ProjController.GetLastDesc(dtStart, dtEnd, nRowQuantity, True, bViewArchived)
+            DbProjList = DbControllers.m_ProjController.GetLastDesc(dtStart, dtEnd, nRowQuantity * 3, True, bViewArchived)
          Else
-            DbProjList = DbControllers.m_ProjController.GetLastByExpDesc(dtStart, dtEnd, nRowQuantity, True, bViewArchived)
+            DbProjList = DbControllers.m_ProjController.GetLastByExpDesc(dtStart, dtEnd, nRowQuantity * 3, True, bViewArchived)
          End If
          For Each Project In DbProjList
             If IsNothing(Project.nProjId) OrElse Project.nProjId = 0 Then Continue For

EgtBEAMWALL.ViewerOptimizer/OpenProjectFileDialog/OpenProjectFileDialogVM.vb

@@ -12,6 +12,7 @@ Public Class OpenProjectFileDialogVM
 
    Public Overrides Function Init(ProjectType As ProjectType, Optional CurrProjectList As List(Of ProjectFileVM) = Nothing, Optional GoToProd As Boolean = False) As Boolean?
       m_ProjectType = ProjectType
+      m_GoToProd = GoToProd
       ' carico colonne
       LoadColumns(ProjectType)
       NotifyPropertyChanged(NameOf(FilterTypeList))
@@ -19,7 +20,7 @@ Public Class OpenProjectFileDialogVM
       ' carico lista progetti
       If IsNothing(CurrProjectList) OrElse CurrProjectList.Count = 0 Then
          SetFixedProjectList(False)
-         RefreshProjectList(GoToProd)
+         RefreshProjectList()
       Else
          SetFixedProjectList(True)
          m_ProjectList = New ObservableCollection(Of ProjectFileVM)(CurrProjectList)
@@ -29,7 +30,7 @@ Public Class OpenProjectFileDialogVM
       m_ProjectList_View.Filter = AddressOf ProjectFilter
    End Function
 
-   Public Overrides Sub RefreshProjectList(Optional GoToProd As Boolean = False)
+   Public Overrides Sub RefreshProjectList()
       m_ProjectList.Clear()
       ' calcolo periodo e righe
       Dim dtStart As DateTime
@@ -46,16 +47,16 @@ Public Class OpenProjectFileDialogVM
       Select Case m_SelDayType
          Case DayTypes.LASTMONTH
             dtEnd = DateTime.Today + TimeSpan.FromDays(1)
-            dtStart = dtEnd - TimeSpan.FromDays(31)
+            dtStart = dtEnd - TimeSpan.FromDays(30.5)
          Case DayTypes.LAST3MONTHS
             dtEnd = DateTime.Today + TimeSpan.FromDays(1)
-            dtStart = dtEnd - TimeSpan.FromDays(31 * 3)
+            dtStart = dtEnd - TimeSpan.FromDays(30.5 * 3)
          Case DayTypes.LAST6MONTHS
             dtEnd = DateTime.Today + TimeSpan.FromDays(1)
-            dtStart = dtEnd - TimeSpan.FromDays(31 * 6)
+            dtStart = dtEnd - TimeSpan.FromDays(30.5 * 6)
          Case DayTypes.PERIOD
-            dtStart = dtStartDate + TimeSpan.FromDays(1)
-            dtEnd = dtEndDate
+            dtEnd = dtEndDate + TimeSpan.FromDays(1)
+            dtStart = dtStartDate
       End Select
       ' leggo da db
       If m_ProjectType = ProjectType.PROJ Then
@@ -66,30 +67,15 @@ Public Class OpenProjectFileDialogVM
          Else
             DbProjectList = DbControllers.m_ProjController.GetLastByExpDesc(dtStart, dtEnd, nRowQuantity, False)
          End If
-         For Each Project In DbProjectList
-            ' recupero path per verificare esista
-            If IsNothing(Project.nProjId) OrElse Project.nProjId = 0 Then Continue For
-            Dim sPath As String = Map.refMainWindowVM.MainWindowM.sProjsDir & "\" & Project.nProjId.ToString("0000") & "\" & Project.nProjId.ToString("0000") & ".nge"
-            If File.Exists(sPath) Then
-               m_ProjectList.Add(New ProjFileVM(Project))
-            Else
-               ' CheckMe impostata come cancellazione FISICA dal DB...
-               DbControllers.m_ProjController.DeleteProj(Project.nProjId, False)
-               EgtOutLog("Found project on Db without the folder and erased it! Proj number " & Project.nProjId.ToString("0000"))
-            End If
-         Next
-      ElseIf m_ProjectType = ProjectType.PROD Then
-         Dim DbProjectList As New List(Of ProdFileM)
-         DbProjectList = DbControllers.m_ProdController.GetLastDesc(dtStart, dtEnd, nRowQuantity, True)
-         If GoToProd Then
+         If m_GoToProd Then
             For Each Project In DbProjectList
                ' recupero path per verificare esista
                If IsNothing(Project.nProdId) OrElse Project.nProdId = 0 Then Continue For
-               Dim sPath As String = Map.refMainWindowVM.MainWindowM.sProdsDir & "\" & Project.nProdId.ToString("0000") & "\" & Project.nProdId.ToString("0000") & ".nge"
+               Dim sPath As String = Map.refMainWindowVM.MainWindowM.sProjsDir & "\" & Project.nProjId.ToString("0000") & "\" & Project.nProjId.ToString("0000") & ".nge"
                If Project.sMachine = Map.refProjManagerVM.CurrProj.sMachine AndAlso
                   Project.nType = Map.refProjManagerVM.CurrProj.nType Then
                   If File.Exists(sPath) Then
-                     m_ProjectList.Add(New ProdFileVM(Project))
+                     m_ProjectList.Add(New ProjFileVM(Project))
                   Else
                      DbControllers.m_ProdController.DeleteProd(Project.nProdId, True)
                      EgtOutLog("Found project on Db without the folder and erased it! Prod number " & Project.nProdId.ToString("0000"))
@@ -99,16 +85,31 @@ Public Class OpenProjectFileDialogVM
          Else
             For Each Project In DbProjectList
                ' recupero path per verificare esista
-               If IsNothing(Project.nProdId) OrElse Project.nProdId = 0 Then Continue For
-               Dim sPath As String = Map.refMainWindowVM.MainWindowM.sProdsDir & "\" & Project.nProdId.ToString("0000") & "\" & Project.nProdId.ToString("0000") & ".nge"
+               If IsNothing(Project.nProjId) OrElse Project.nProjId = 0 Then Continue For
+               Dim sPath As String = Map.refMainWindowVM.MainWindowM.sProjsDir & "\" & Project.nProjId.ToString("0000") & "\" & Project.nProjId.ToString("0000") & ".nge"
                If File.Exists(sPath) Then
-                  m_ProjectList.Add(New ProdFileVM(Project))
+                  m_ProjectList.Add(New ProjFileVM(Project))
                Else
-                  DbControllers.m_ProdController.DeleteProd(Project.nProdId, True)
-                  EgtOutLog("Found project on Db without the folder and erased it! Prod number " & Project.nProdId.ToString("0000"))
+                  ' CheckMe impostata come cancellazione FISICA dal DB...
+                  DbControllers.m_ProjController.DeleteProj(Project.nProjId, False)
+                  EgtOutLog("Found project on Db without the folder and erased it! Proj number " & Project.nProjId.ToString("0000"))
                End If
             Next
          End If
+      ElseIf m_ProjectType = ProjectType.PROD Then
+         Dim DbProjectList As New List(Of ProdFileM)
+         DbProjectList = DbControllers.m_ProdController.GetLastDesc(dtStart, dtEnd, nRowQuantity, True)
+         For Each Project In DbProjectList
+            ' recupero path per verificare esista
+            If IsNothing(Project.nProdId) OrElse Project.nProdId = 0 Then Continue For
+            Dim sPath As String = Map.refMainWindowVM.MainWindowM.sProdsDir & "\" & Project.nProdId.ToString("0000") & "\" & Project.nProdId.ToString("0000") & ".nge"
+            If File.Exists(sPath) Then
+               m_ProjectList.Add(New ProdFileVM(Project))
+            Else
+               DbControllers.m_ProdController.DeleteProd(Project.nProdId, True)
+               EgtOutLog("Found project on Db without the folder and erased it! Prod number " & Project.nProdId.ToString("0000"))
+            End If
+         Next
       End If
    End Sub
 

EgtBEAMWALL.ViewerOptimizer/OptimizePanel/OptimizePanelV.xaml

@@ -70,7 +70,15 @@
       <Image Source="/Resources/OptimizePanel/UnlockRotation.png" Stretch="Uniform"/>
    </Button>
 
+   <ToggleButton ToolTip="{Binding UseNetWarehouse_ToolTip}"
+                 IsChecked="{Binding UseNetWarehouse_IsChecked}"
+                 Style="{StaticResource ToolBar_ToggleButton}"
+                 Visibility="{Binding UseNetWarehouse_Visibility}">
+      <Image Source="/Resources/OptimizePanel/Warehouse.png" Stretch="Uniform"/>
+   </ToggleButton>
+
    <Button ToolTip="{Binding Warehouse_ToolTip}"
+           IsEnabled="{Binding Warehouse_IsEnabled}"
            Style="{StaticResource ToolBar_Button}"
            Command="{Binding Warehouse_Command}"
            Visibility="{Binding MachiningPage_Visibility}">

EgtBEAMWALL.ViewerOptimizer/OptimizePanel/OptimizePanelVM.vb

@@ -136,6 +136,29 @@ Public Class OptimizePanelVM
       End Get
    End Property
 
+   Public Property UseNetWarehouse_IsChecked As Boolean
+      Get
+         Return GetMainPrivateProfileInt(S_WAREHOUSE, K_USENETWAREHOUSE, 0) = 1
+      End Get
+      Set(value As Boolean)
+         WriteMainPrivateProfileString(S_WAREHOUSE, K_USENETWAREHOUSE, If(value, 1, 0))
+         NotifyPropertyChanged(NameOf(Warehouse_IsEnabled))
+      End Set
+   End Property
+
+   Private m_UseNetWarehouse_Visibility As Visibility
+   Public ReadOnly Property UseNetWarehouse_Visibility As Visibility
+      Get
+         Return If(GetMainPrivateProfileInt(S_GENERAL, K_NETWAREHOUSE, 0) = 1 AndAlso Map.refMainMenuVM.SelPage = Pages.MACHINING, Visibility.Visible, Visibility.Collapsed)
+      End Get
+   End Property
+
+   Public ReadOnly Property Warehouse_IsEnabled As Boolean
+      Get
+         Return If(GetMainPrivateProfileInt(S_GENERAL, K_NETWAREHOUSE, 0) = 1, Not UseNetWarehouse_IsChecked, True)
+      End Get
+   End Property
+
 #Region "Messages"
 
    Public ReadOnly Property LongDrillArea_Msg As String
@@ -180,6 +203,15 @@ Public Class OptimizePanelVM
       End Get
    End Property
 
+   Public ReadOnly Property UseNetWarehouse_ToolTip As String
+      Get
+         Dim sLastSynchronization As String = ""
+         GetMainPrivateProfileString(S_GENERAL, K_LASTSYNCHRONIZATION, "", sLastSynchronization)
+         Return "Use net warehouse" & Environment.NewLine &
+                String.Format("Last successfull synchronization done on {0}", sLastSynchronization)
+      End Get
+   End Property
+
 #End Region    ' Messages
 
    ' Definizione comandi
@@ -403,6 +435,27 @@ Public Class OptimizePanelVM
    Friend Sub Optimize()
       If IsNothing(m_SelPartType) OrElse IsNothing(m_SelOriginType) Then Return
       If IsNothing(Map.refProjectVM.BTLStructureVM) OrElse IsNothing(Map.refProjectVM.BTLStructureVM.BTLPartVMList) OrElse Map.refProjectVM.BTLStructureVM.BTLPartVMList.Count = 0 Then Return
+      ' se magazzino in rete
+      If GetMainPrivateProfileInt(S_GENERAL, K_NETWAREHOUSE, 0) = 1 And UseNetWarehouse_IsChecked Then
+         ' sincronizzo magazzino locale con rete
+         Dim ProjectMatIdList As List(Of Integer) = (From SectionXMat In Map.refProjectVM.BTLStructureVM.SectionList
+                                                     Where SectionXMat <> SectionXMaterial.Empty
+                                                     Select SectionXMat.MaterialM.nId).ToList()
+
+         Dim SyncResult As DataLayer.Controllers.MagmanController.SyncResult = DbControllers.m_MagmanController.ResourcesSync(ProjectMatIdList)
+         If SyncResult = DataLayer.Controllers.MagmanController.SyncResult.ALL_OK OrElse
+            SyncResult = DataLayer.Controllers.MagmanController.SyncResult.ERR_MergeMatEmpty OrElse
+            SyncResult = DataLayer.Controllers.MagmanController.SyncResult.ERR_CloudMatEmpty OrElse
+            SyncResult = DataLayer.Controllers.MagmanController.SyncResult.ERR_Res2SendEmpty Then
+            WriteMainPrivateProfileString(S_GENERAL, K_LASTSYNCHRONIZATION, DateTime.Now.ToString())
+            NotifyPropertyChanged(NameOf(UseNetWarehouse_ToolTip))
+         Else
+            Dim sLastSynchronization As String = ""
+            GetMainPrivateProfileString(S_GENERAL, K_LASTSYNCHRONIZATION, "", sLastSynchronization)
+            MessageBox.Show("Net Warehouse Synchronization failed! Last successfull synchronization done on " & sLastSynchronization, "Error", MessageBoxButton.OK, MessageBoxImage.Error)
+            Return
+         End If
+      End If
       ' se nessun grezzo, rendo tutti i pezzi visibili
       If Map.refProjectVM.MachGroupPanelVM.MachGroupVMList.Count = 0 Then
          Map.refProjectVM.BTLStructureVM.ShowAll(False)

EgtBEAMWALL.ViewerOptimizer/ProjManager/ProjManagerVM.vb

@@ -1091,7 +1091,12 @@ Public Class ProjManagerVM
                Dim AddedBTLPart As BTLPartVM = Map.refProjectVM.BTLStructureVM.BTLPartVMList.FirstOrDefault(Function(x) x.BTLPartM Is NewPart)
                ' verifico se aggiungere sezione alla lista
                If Not Map.refProjectVM.BTLStructureVM.SectionList.Contains(AddedBTLPart.Section) Then
-                  Map.refProjectVM.BTLStructureVM.SectionList.Add(AddedBTLPart.Section)
+                  Dim nMaterialId As Integer = DbControllers.m_MaterialsController.Insert(AddedBTLPart.Section.MaterialM)
+                  Dim NewSection = AddedBTLPart.Section
+                  Map.refProjectVM.BTLStructureVM.SectionList.Add(NewSection)
+                  If nMaterialId <> 0 Then
+                     NewSection.MaterialM.SetId(nMaterialId)
+                  End If
                End If
                nNewPartId = EgtGetNextPart(nNewPartId)
             End While
@@ -1307,7 +1312,12 @@ Public Class ProjManagerVM
                   End If
                   ' verifico se aggiungere sezione alla lista
                   If Not Map.refProjectVM.BTLStructureVM.SectionList.Contains(AddedBTLPart.Section) Then
-                     Map.refProjectVM.BTLStructureVM.SectionList.Add(AddedBTLPart.Section)
+                     Dim nMaterialId As Integer = DbControllers.m_MaterialsController.Insert(AddedBTLPart.Section.MaterialM)
+                     Dim NewSection = AddedBTLPart.Section
+                     Map.refProjectVM.BTLStructureVM.SectionList.Add(NewSection)
+                     If nMaterialId <> 0 Then
+                        NewSection.MaterialM.SetId(nMaterialId)
+                     End If
                   End If
                   nAddedPartId = EgtGetNextPart(nAddedPartId)
                End While

EgtBEAMWALL.ViewerOptimizer/Project/ProjectV.xaml

@@ -52,6 +52,8 @@
             <EgtBEAMWALL:ViewPanelV DataContext="{StaticResource ViewPanelVM}"/>
             <EgtBEAMWALL:InstrumentPanelV DataContext="{StaticResource InstrumentPanelVM}"/>
             <EgtBEAMWALL:CalcPanelV DataContext="{StaticResource CALCPanelVM}"/>
+            <EgtBEAMWALL:SpecialPanelV DataContext="{StaticResource SpecialPanelVM}"
+                                       Visibility="{Binding DataContext.SpecialPanel_Visibility, RelativeSource={RelativeSource AncestorType={x:Type EgtBEAMWALL:ProjectV}}}"/>
             <EgtBEAMWALL:FreeContourManagerV DataContext="{StaticResource FreeContourManagerVM}"
                                              Visibility="{Binding DataContext.FreeContourManager_Visibility, RelativeSource={RelativeSource AncestorType={x:Type EgtBEAMWALL:ProjectV}}}"/>
          </WrapPanel>

EgtBEAMWALL.ViewerOptimizer/Project/ProjectVM.vb

@@ -3,6 +3,7 @@ Imports EgtBEAMWALL.Core
 Imports EgtWPFLib5
 Imports EgtUILib
 Imports System.Collections.ObjectModel
+Imports EgtBEAMWALL.DataLayer.Controllers
 
 Public Class ProjectVM
    Inherits VMBase
@@ -11,6 +12,12 @@ Public Class ProjectVM
 
    Private m_Calc_Timer As New DispatcherTimer
 
+   Friend Event OnPreControllerExec(sFilePath As String)
+   Friend Event OnPostControllerExec()
+
+   ' Flag per non salvare Script appena eseguito in elenco MruScript
+   Private m_bScriptInMru As Boolean = True
+
    Private Property m_GridDims As New ObservableCollection(Of GridDimension)
    Public Property GridDims As ObservableCollection(Of GridDimension)
       Get
@@ -168,6 +175,7 @@ Public Class ProjectVM
       Map.refOptimizePanelVM.NotifyPropertyChanged(NameOf(Map.refOptimizePanelVM.ViewPage_Visibility))
       Map.refOptimizePanelVM.NotifyPropertyChanged(NameOf(Map.refOptimizePanelVM.MachiningPage_Visibility))
       Map.refOptimizePanelVM.NotifyPropertyChanged(NameOf(Map.refOptimizePanelVM.NestingOption_Visibility))
+      Map.refOptimizePanelVM.NotifyPropertyChanged(NameOf(Map.refOptimizePanelVM.UseNetWarehouse_Visibility))
    End Sub
 
    Friend Sub NotifyCalcPanel_Visibility()
@@ -189,6 +197,13 @@ Public Class ProjectVM
       NotifyPropertyChanged("FreeContourManager_Visibility")
    End Sub
 
+   Public ReadOnly Property SpecialPanel_Visibility As Visibility
+      Get
+         Return If(Map.refMainWindowVM.MainWindowM.bSpecialPanel AndAlso Map.refMainWindowVM.MainWindowM.nUserLevel > 5, Visibility.Visible, Visibility.Collapsed)
+      End Get
+   End Property
+
+
    Friend Sub NotifyAllPanelVisibility()
       NotifyPropertyChanged("LeftPanel_Visibility")
       NotifyPropertyChanged("TopPanel_Visibility")

EgtBEAMWALL.ViewerOptimizer/ProjectFileVM/ProdFileVM.vb

@@ -1,6 +1,7 @@
 Imports System.IO
 Imports EgtBEAMWALL.Core
 Imports EgtUILib
+Imports EgtWPFLib5
 
 Public Class ProdFileVM
    Inherits Core.ProdFileVM
@@ -155,7 +156,7 @@ Public Class ProdFileVM
                   End Try
                   Map.refProdManagerVM.m_MruFiles.Remove(CurrProject.sProdPath)
                   Map.refProdManagerVM.NotifyPropertyChanged(NameOf(Map.refProdManagerVM.MruFileNames))
-                  DbControllers.m_ProdController.DeleteProd(CurrProject.nProdId, True)
+                  DbControllers.m_ProdController.DeleteProd(CurrProject.nProdId, False)
                   If CurrProject.nProdId = Map.refProjManagerVM.CurrProj.nProdId Then
                      ' reset prod in path proj
                      Map.refProjManagerVM.UpdateCurrProj()

EgtBEAMWALL.ViewerOptimizer/SceneHost/MySceneHostVM.vb

@@ -59,6 +59,8 @@ Public Class MySceneHostVM
          PostInitializeScene()
          ' Imposto stato gestione mouse diretto della scena a nessuno
          MainScene.SetStatusNull()
+         ' Imposto focus pulsante su false 
+         MainScene.SetFocusOnMove(False)
          ' Recupero e imposto handle finestra principale
          Dim hMainWnd As IntPtr = New WindowInteropHelper(Application.Current.MainWindow).Handle
          EgtSetMainWindowHandle(hMainWnd)

EgtBEAMWALL.ViewerOptimizer/SpecialPanel/SpecialPanelV.xaml

@@ -0,0 +1,24 @@
+<EgtFloating:EgtFloatingPanel x:Class="SpecialPanelV"
+                              xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
+                              xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
+                              xmlns:EgtFloating="clr-namespace:EgtWPFLib5.EgtFloating;assembly=EgtWPFLib5"
+                              IsTopDockable="True" IsBottomDockable="False" IsLeftDockable="False"
+                              IsRightDockable="False" Style="{StaticResource ToolBar_EgtFloatingPanel}">
+
+   <ItemsControl ItemsSource="{Binding ButtonList}">
+      <ItemsControl.ItemsPanel>
+         <ItemsPanelTemplate>
+            <StackPanel Orientation="Horizontal"/>
+         </ItemsPanelTemplate>
+      </ItemsControl.ItemsPanel>
+      <ItemsControl.ItemTemplate>
+         <DataTemplate>
+            <Button ToolTip="{Binding ToolTip}" Command="{Binding LuaExecCommand}" Style="{StaticResource DrawPanelButton}" 
+                    Visibility="{Binding Btn_Visibility}" IsEnabled="{Binding Btn_IsEnabled}">
+               <Image Source="{Binding ImagePath}"/>
+            </Button>
+         </DataTemplate>
+      </ItemsControl.ItemTemplate>
+   </ItemsControl>
+   
+</EgtFloating:EgtFloatingPanel>

EgtBEAMWALL.ViewerOptimizer/SpecialPanel/SpecialPanelV.xaml.vb

@@ -0,0 +1,3 @@
+Public Class SpecialPanelV
+
+End Class

EgtBEAMWALL.ViewerOptimizer/SpecialPanel/SpecialPanelVM.vb

@@ -0,0 +1,202 @@
+Imports System.IO
+Imports EgtUILib
+Imports EgtWPFLib5
+Imports EgtBEAMWALL.Core
+
+Public Class SpecialPanelVM
+
+   Private m_ButtonList As New List(Of ButtonItem)
+   Public ReadOnly Property ButtonList As List(Of ButtonItem)
+      Get
+         Return m_ButtonList
+      End Get
+   End Property
+
+   Sub New()
+      ' Creo riferimento a questa classe in Map
+      Map.SetRefSpecialPanelVM(Me)
+      ' se attivo, inizializzo i bottoni leggendoli da file ini
+      If Map.refMainWindowVM.MainWindowM.bSpecialPanel Then
+         Dim BtnIndex As Integer = 1
+         Dim CurrBtn As ButtonItem = Nothing
+         While GetPrivateProfileButton(S_SPECIAL, K_BUTTON & BtnIndex, "", CurrBtn)
+            m_ButtonList.Add(CurrBtn)
+            BtnIndex += 1
+         End While
+      End If
+   End Sub
+
+#Region "METHODS"
+
+   Public Function SetSpecialPanelButtonsVisibility(IsMachMode As Boolean) As Boolean
+      Dim bSpecialPanel_Visible As Boolean = False
+      For Each BtnItem In m_ButtonList
+         ' verifico il valore di nDrawMachOrBoth del bottone e IsMachMode per rendere visibile o meno il bottone in ButtonList
+         Select Case BtnItem.nDrawMachOrBoth
+            Case 0 ' bottone nascosto
+               BtnItem.m_Btn_Visibility = Visibility.Collapsed
+            Case 1 ' bottone visibile solo in Draw
+               BtnItem.m_Btn_Visibility = If(Not IsMachMode, Visibility.Visible, Visibility.Collapsed)
+            Case 2 ' bottone visibile solo in Machining
+               BtnItem.m_Btn_Visibility = If(IsMachMode, Visibility.Visible, Visibility.Collapsed)
+            Case 3 ' bottone visibile sia in Draw che in Machining
+               BtnItem.m_Btn_Visibility = Visibility.Visible
+         End Select
+         ' se anche uno solo è visibile anche lo SpecialPanel dovrà esserlo
+         If BtnItem.Btn_Visibility = Visibility.Visible Then bSpecialPanel_Visible = True
+         'BtnItem.OnPropertyChanged(NameOf(BtnItem.Btn_Visibility))
+         BtnItem.NotifyPropertyChanged(NameOf(BtnItem.Btn_Visibility))
+      Next
+      Return bSpecialPanel_Visible
+   End Function
+
+   Friend Sub SpecialPanelIsEnabled(SpecialPanelBtn_IsEnabled As Boolean)
+      For Each BtnItem In m_ButtonList
+         BtnItem.m_Btn_IsEnabled = SpecialPanelBtn_IsEnabled
+         'BtnItem.OnPropertyChanged(NameOf(BtnItem.Btn_IsEnabled))
+         BtnItem.NotifyPropertyChanged(NameOf(BtnItem.Btn_IsEnabled))
+      Next
+   End Sub
+
+   Public Function GetPrivateProfileButton(sSection As String, sKey As String, sBaseDir As String, ByRef ReadButtonItem As ButtonItem) As Boolean
+      ReadButtonItem = Nothing
+      Dim sVal As String = String.Empty
+      GetMainPrivateProfileString(sSection, sKey, "", sVal)
+      If String.IsNullOrWhiteSpace(sVal) Then Return False
+      Dim sItems() As String = sVal.Split(","c)
+      If sItems.Count() >= 1 Then
+         Dim sLuaPath As String = sItems(0)
+         Dim sImagePath As String = If(sItems.Count() >= 2, sItems(1), "")
+         Dim sToolTip As String = If(sItems.Count() >= 3, sItems(2), "")
+         Dim sDrawMachOrBoth As String = If(sItems.Count() >= 4 AndAlso Not String.IsNullOrWhiteSpace(sItems(3)), sItems(3), "1")
+         If Not String.IsNullOrWhiteSpace(sBaseDir) And Not String.IsNullOrWhiteSpace(sLuaPath) Then
+            If sLuaPath.Contains(".lua") Then sLuaPath = sBaseDir & "\" & sLuaPath
+            If Not String.IsNullOrWhiteSpace(sImagePath) Then sImagePath = sBaseDir & "\" & sImagePath
+         End If
+         ReadButtonItem = New ButtonItem(sSection, sLuaPath, sImagePath, sToolTip, sDrawMachOrBoth)
+         Return True
+      End If
+      Return False
+   End Function
+
+#End Region    ' Methods
+
+End Class
+
+Public Class ButtonItem
+   Inherits VMBase
+
+   Friend Shared WithEvents m_ProjectVM As ProjectVM
+   Private Shared m_sCurrBarName As String
+
+   Private m_sBarName As String
+   Private m_sImagePath As String
+   Public ReadOnly Property ImagePath As String
+      Get
+         Return m_sImagePath
+      End Get
+   End Property
+   Private m_sLuaCmdPath As String
+   Private m_sToolTip As String
+   Public ReadOnly Property ToolTip As String
+      Get
+         Return m_sToolTip
+      End Get
+   End Property
+   Private m_nDrawMachOrBoth As Integer
+   Public ReadOnly Property nDrawMachOrBoth As Integer
+      Get
+         Return m_nDrawMachOrBoth
+      End Get
+   End Property
+   Friend m_Btn_Visibility As Visibility
+   Public ReadOnly Property Btn_Visibility As Visibility
+      Get
+         Return m_Btn_Visibility
+      End Get
+   End Property
+
+   Friend m_Btn_IsEnabled As Boolean = True
+   Public ReadOnly Property Btn_IsEnabled As Boolean
+      Get
+         Return m_Btn_IsEnabled
+      End Get
+   End Property
+
+   ' Definizione comandi
+   Private m_cmdLuaExec As ICommand
+
+   Sub New( sBarName As String, sLuaCmdPath As String, sImagePath As String, sToolTip As String, sDrawMachOrBoth As String)
+      m_sBarName = sBarName
+      If File.Exists(sImagePath) Then
+         ' per lasciare libere le immagini le copio (potrebbe fallire perchè bloccate da altro eseguibile)
+         Dim sNewPath As String = Path.Combine(Map.refMainWindowVM.MainWindowM.sResourcesRoot, sBarName & "_" & Path.GetFileName(sImagePath))
+         Try
+            File.Copy( sImagePath, sNewPath, True)
+         Catch ex As Exception
+         End Try
+         m_sImagePath = sNewPath
+      Else
+         m_sImagePath = Map.refMainWindowVM.MainWindowM.sResourcesRoot & "\" & sImagePath
+      End If
+      m_sLuaCmdPath = sLuaCmdPath
+      m_sToolTip = sToolTip
+      If Not Integer.TryParse(sDrawMachOrBoth, m_nDrawMachOrBoth) Then m_nDrawMachOrBoth = 0
+   End Sub
+
+#Region "COMMANDS"
+
+#Region "LuaExecCommand"
+
+   ''' <summary>
+   ''' Returns a command that do New.
+   ''' </summary>
+   Public ReadOnly Property LuaExecCommand As ICommand
+      Get
+         If m_cmdLuaExec Is Nothing Then
+            m_cmdLuaExec = New Command(AddressOf LuaExec)
+         End If
+         Return m_cmdLuaExec
+      End Get
+   End Property
+
+   ''' <summary>
+   ''' Execute the New.  This method is invoked by the NewCommand.
+   ''' </summary>
+   Public Sub LuaExec(ByVal param As Object)
+      If String.IsNullOrWhiteSpace(m_sLuaCmdPath) Then Return
+      If Not File.Exists(m_sLuaCmdPath) Then Return
+      If Not Path.GetExtension(m_sLuaCmdPath).ToLower = ".lua" Then Return
+      ' Abilito eventi se comando lua termina con Beam\Process.lua
+      m_sCurrBarName = m_sBarName
+      Dim bRaiseEvent As Boolean = ( m_sBarName = "Beam"  OrElse m_sBarName = "Wall")
+      ' eseguo file Lua
+      EgtBEAMWALL.ViewerOptimizer.LuaExec.ExecScript(m_sLuaCmdPath, bRaiseEvent)
+      m_sCurrBarName = Nothing
+   End Sub
+
+   'Private Shared Sub OnPreControllerExec(sFilePath As String) Handles m_ProjectVM.OnPreControllerExec
+   '   If m_sCurrBarName = "Beam" Then
+   '      EgtLuaCreateGlobTable("BEAM")
+   '      EgtLuaSetGlobStringVar("BEAM.BASEDIR", IniFile.m_sBeamDirPath)
+   '      If EgtGetUserLevel() >= 9 AndAlso GetPrivateProfileInt(S_LUA, K_BWSIM, 0) = 1 then EgtLuaSetGlobBoolVar("BEAM.BW", true)
+   '   ElseIf m_sCurrBarName = "Wall" Then
+   '      EgtLuaCreateGlobTable("WALL")
+   '      EgtLuaSetGlobStringVar("WALL.BASEDIR", IniFile.m_sWallDirPath)
+   '      If EgtGetUserLevel() >= 9 AndAlso GetPrivateProfileInt(S_LUA, K_BWSIM, 0) = 1 then EgtLuaSetGlobBoolVar("WALL.BW", true)
+   '   End If
+   'End Sub
+
+   'Private Shared Sub OnPostControllerExec() Handles m_ProjectVM.OnPostControllerExec
+   '   If m_sCurrBarName = "Beam" Then
+   '      EgtLuaResetGlobVar("BEAM")
+   '   ElseIf m_sCurrBarName = "Wall" Then
+   '      EgtLuaResetGlobVar("WALL")
+   '   End If
+   'End Sub
+
+#End Region ' LuaExecCommand
+
+#End Region    ' Commands
+
+End Class

EgtBEAMWALL.ViewerOptimizer/Statistics/StatisticsVM.vb

@@ -298,7 +298,7 @@ Public Class StatisticsVM
       Select Case Map.refProdManagerVM.CurrProd.nType
          Case BWType.BEAM
             For Each MachGroup As MyMachGroupVM In Map.refProjectVM.MachGroupPanelVM.MachGroupVMList
-               Dim RawPart As SParam = m_RawPartList.FirstOrDefault(Function(x) x.SectXMat.dW = MachGroup.dW AndAlso x.SectXMat.dH = MachGroup.dH AndAlso x.dL = MachGroup.dL AndAlso x.SectXMat.sMaterial.Any(Function(y) MachGroup.Section.sMaterial.Any(Function(z) z = y)))
+               Dim RawPart As SParam = m_RawPartList.FirstOrDefault(Function(x) x.SectXMat.dW = MachGroup.dW AndAlso x.SectXMat.dH = MachGroup.dH AndAlso x.dL = MachGroup.dL AndAlso x.SectXMat.sMaterial = MachGroup.Section.sMaterial)
                If Not IsNothing(RawPart) Then
                   RawPart.nQuantity += 1
                Else
@@ -307,7 +307,7 @@ Public Class StatisticsVM
             Next
          Case BWType.WALL
             For Each MachGroup As MyMachGroupVM In Map.refProjectVM.MachGroupPanelVM.MachGroupVMList
-               Dim RawPart As SParam = m_RawPartList.FirstOrDefault(Function(x) x.dW = MachGroup.dW AndAlso x.SectXMat.dH = MachGroup.dH AndAlso x.dL = MachGroup.dL AndAlso x.SectXMat.sMaterial.Any(Function(y) MachGroup.Section.sMaterial.Any(Function(z) z = y)))
+               Dim RawPart As SParam = m_RawPartList.FirstOrDefault(Function(x) x.dW = MachGroup.dW AndAlso x.SectXMat.dH = MachGroup.dH AndAlso x.dL = MachGroup.dL AndAlso x.SectXMat.sMaterial = MachGroup.Section.sMaterial)
                If Not IsNothing(RawPart) Then
                   RawPart.nQuantity += 1
                Else

EgtBEAMWALL.ViewerOptimizer/Utility/DbControllers.vb

@@ -18,6 +18,9 @@ Public Module DbControllers
    Public m_MachGroupController As DataLayer.Controllers.MachGroupController
    Public m_StatusMapController As DataLayer.Controllers.StatusMapController
    Public m_PartController As DataLayer.Controllers.PartController
+   Public m_MaterialsController As DataLayer.Controllers.MaterialsController
+   Public m_RawItemsController As DataLayer.Controllers.RawItemsController
+   Public m_MagmanController As DataLayer.Controllers.MagmanController
 
    Sub Init()
    End Sub
@@ -95,6 +98,9 @@ Public Module DbControllers
       m_MachGroupController = New DataLayer.Controllers.MachGroupController
       m_StatusMapController = New DataLayer.Controllers.StatusMapController
       m_PartController = New DataLayer.Controllers.PartController
+      m_MaterialsController = New DataLayer.Controllers.MaterialsController
+      m_RawItemsController = New DataLayer.Controllers.RawItemsController
+      m_MagmanController = New DataLayer.Controllers.MagmanController("magman.egalware.com", "22fa4426-6670-41ad-ac2b-d7b5c3dfe849")
    End Sub
 
 End Module

EgtBEAMWALL.ViewerOptimizer/Utility/Dictionary.xaml

@@ -51,6 +51,7 @@
    <OmagOFFICE:MachiningTabVM x:Key="MachiningTabVM"/>
    <OmagOFFICE:SimulTabVM x:Key="SimulTabVM"/>-->
    <EgtBEAMWALL:MyMachGroupPanelVM x:Key="MachGroupPanelVM"/>
+   <EgtBEAMWALL:SpecialPanelVM x:Key="SpecialPanelVM"/>
 
    <!--Colori predefiniti-->
    <SolidColorBrush x:Key="Omag_Blue" Color="#FF095CA8" />
@@ -310,6 +311,13 @@
       </Style.Triggers>
    </Style>
 
+
+   <Style x:Key="DrawPanelButton" TargetType="{x:Type Button}" BasedOn="{StaticResource {x:Type Button}}">
+      <Setter Property="Height" Value="30"/>
+      <Setter Property="Width" Value="30"/>
+   </Style>
+
+
    <!-- ______________________________________________________________________________________________________________________________________________ -->
 
    <!-- TextBlock -->

EgtBEAMWALL.ViewerOptimizer/Utility/LuaExec.vb

@@ -1,4 +1,5 @@
 Imports EgtBEAMWALL.Core
+Imports EgtBEAMWALL.DataLayer.Controllers
 Imports EgtUILib
 Imports EgtWPFLib5
 
@@ -203,4 +204,17 @@ Module LuaExec
       Return bOk
    End Function
 
+   ' Special Panel
+   Friend Sub ExecScript(sFilePath As String, Optional bRaiseEvent As Boolean = False)
+      EgtLuaExecFile(sFilePath)
+
+      'Dim bMachiningMode As Boolean = EgtGetCurrMachGroup() <> GDB_ID.NULL
+      'If Not bMachiningMode And EgtGetCurrLayer() = GDB_ID.NULL Then
+      '   Dim nCurrPart As Integer = EgtGetCurrPart()
+      '   If nCurrPart = GDB_ID.NULL Or Not EgtSetCurrPartLayer(nCurrPart, EgtGetFirstLayer(nCurrPart, True)) Then
+      '      EgtResetCurrPartLayer()
+      '   End If
+      'End If
+   End Sub
+
 End Module

EgtBEAMWALL.ViewerOptimizer/Utility/Map.vb

@@ -34,6 +34,7 @@ Module Map
    Private m_refFeatureManagerVM As FeatureManagerVM
    Private m_refAddSectionXMaterialWndVM As AddSectionXMaterialWndVM
    Private m_refStatisticsTimePanelVM As StatisticsTimePanelVM
+   Private m_refSpecialPanelVM As SpecialPanelVM
    'Private m_refOpenProjectFileDialogVM As OpenProjectFileDialogVM
    'Private m_refRawPartTabVM As RawPartTabVM
    'Private m_refNestingTabVM As NestingTabVM
@@ -241,6 +242,12 @@ Module Map
       End Get
    End Property
 
+   Public ReadOnly Property refSpecialPanelVM As SpecialPanelVM
+      Get
+         Return m_refSpecialPanelVM
+      End Get
+   End Property
+
    'Public ReadOnly Property refOpenProjectFileDialogVM As OpenProjectFileDialogVM
    '   Get
    '      Return m_refOpenProjectFileDialogVM
@@ -453,6 +460,12 @@ Module Map
       Return Not IsNothing(m_refStatisticsTimePanelVM)
    End Function
 
+   Friend Function SetRefSpecialPanelVM(SpecialPanelVM As SpecialPanelVM) As Boolean
+      m_refSpecialPanelVM = SpecialPanelVM
+      Return Not IsNothing(m_refSpecialPanelVM)
+   End Function
+
+
    'Friend Function SetRefOpenProjectFileDialogVM(OpenProjectFileDialogVM As OpenProjectFileDialogVM) As Boolean
    '   m_refOpenProjectFileDialogVM = OpenProjectFileDialogVM
    '   Return Not IsNothing(m_refOpenProjectFileDialogVM)
@@ -526,7 +539,7 @@ Module Map
              Not IsNothing(m_refStatisticsVM) AndAlso Not IsNothing(m_refPParameterListVM) AndAlso
              Not IsNothing(m_refQParameterListVM) AndAlso Not IsNothing(m_refFeatureManagerVM) AndAlso
              Not IsNothing(m_refAddSectionXMaterialWndVM) AndAlso Not IsNothing(m_refStatisticsTimePanelVM) AndAlso
-             LibMap.EndInit()
+             Not IsNothing(m_refSpecialPanelVM) AndAlso LibMap.EndInit()
    End Function
 
 #End Region    ' Init

EgtBEAMWALL.ViewerOptimizer/Utility/SectionXMaterialToBeAdded.vb

@@ -7,7 +7,7 @@ Public Class SectionXMaterialToBeAdded
    Inherits SectionXMaterial
 
    Sub New(SectXMat As SectionXMaterial)
-      MyBase.New(SectXMat.dW, SectXMat.dH, SectXMat.dL, SectXMat.sMaterial(0))
+      MyBase.New(SectXMat.dW, SectXMat.dH, SectXMat.dL, SectXMat.sMaterial)
    End Sub
 
    Private m_Alias_IsChecked As Boolean

EgtBEAMWALL.ViewerOptimizer/WarehouseWnd/WarehouseHelper.vb

@@ -150,48 +150,54 @@ Module WarehouseHelper
    Public Function GetDimensionsAndQuantityForList(Type As BWType, ByRef SectionList As List(Of SectionProgress)) As Boolean
       Dim nIndex As Integer = 1
       Dim sSection As String = ""
-      While GenInterface.GetPrivateProfileString(If(Type = BWType.BEAM, WRH_BEAM, WRH_WALL), If(Type = BWType.BEAM, WRH_L, WRH_S) & nIndex, "", sSection, GetWarehouseIniPath()) > 0
-         If String.IsNullOrWhiteSpace(sSection) Then Continue While
-         Dim sSectionValues() As String = sSection.Split(","c)
-         Dim dW As Double = 0
-         Dim dL As Double = 0
-         Dim nQty As Integer = 0
-         Dim nActive As Integer = 0
-         Dim sSectionData As String = ""
-         GetPrivateProfileString(If(Type = BWType.BEAM, S_BEAM_LIST, S_WALL_LIST), sSectionValues(0), "", sSectionData, GetWarehouseIniPath())
-         Dim SectionData() As String = sSectionData.Split(","c)
-         Select Case Type
-            Case BWType.BEAM
-               Dim dSectionW As Double = 0 : StringToDoubleAdv( SectionData(0), dSectionW)
-               Dim dSectionH As Double = 0 : StringToDoubleAdv( SectionData(1), dSectionH)
-               For Each SectionProgress In SectionList
-                  If Math.Abs( SectionProgress.Section.dW - dSectionW) < 0.1 AndAlso
-                     Math.Abs( SectionProgress.Section.dH - dSectionH) < 0.1 AndAlso SectionProgress.Section.sMaterial.Contains(SectionData(2)) Then
-                     If Not StringToDoubleAdv(sSectionValues(1), dL) Then Continue While
-                     If Not Integer.TryParse(sSectionValues(2), nQty) Then Continue While
-                     If sSectionValues.Count >= 4 AndAlso Integer.TryParse(sSectionValues(3), nActive) Then
-                        If nActive > 0 Then SectionProgress.SParamList.Add(New SParam(SectionProgress.Section, dL, nQty, nActive > 0))
-                     Else
-                        SectionProgress.SParamList.Add(New SParam(SectionProgress.Section, dL, nQty, True))
-                        nIndex += 1
-                        Continue While
-                     End If
-                  End If
-               Next
-            Case BWType.WALL
-               Dim dSectionH As Double = 0 : StringToDoubleAdv( SectionData(0), dSectionH)
-               For Each SectionProgress In SectionList
-                  If Math.Abs( SectionProgress.Section.dH - dSectionH) < 0.1 AndAlso SectionProgress.Section.sMaterial.Contains(SectionData(1)) Then
-                     If Not StringToDoubleAdv(sSectionValues(1), dW) Then Continue While
-                     If Not StringToDoubleAdv(sSectionValues(2), dL) Then Continue While
-                     If Not Integer.TryParse(sSectionValues(3), nQty) Then Continue While
-                     If Not Integer.TryParse(sSectionValues(4), nActive) Then Continue While
-                     If nActive > 0 Then SectionProgress.SParamList.Add(New SParam(SectionProgress.Section, dW, dL, nQty, nActive > 0))
-                  End If
-               Next
-         End Select
-         nIndex += 1
-      End While
+      For Each SectionProgress In SectionList
+         Dim RawPartList As List(Of RawPartM) = DbControllers.m_RawItemsController.GetFilt(SectionProgress.Section.MaterialM.nId)
+         For Each RawPart In RawPartList
+            SectionProgress.SParamList.Add(New SParam(RawPart))
+         Next
+      Next
+      'While GenInterface.GetPrivateProfileString(If(Type = BWType.BEAM, WRH_BEAM, WRH_WALL), If(Type = BWType.BEAM, WRH_L, WRH_S) & nIndex, "", sSection, GetWarehouseIniPath()) > 0
+      '   If String.IsNullOrWhiteSpace(sSection) Then Continue While
+      '   Dim sSectionValues() As String = sSection.Split(","c)
+      '   Dim dW As Double = 0
+      '   Dim dL As Double = 0
+      '   Dim nQty As Integer = 0
+      '   Dim nActive As Integer = 0
+      '   Dim sSectionData As String = ""
+      '   GetPrivateProfileString(If(Type = BWType.BEAM, S_BEAM_LIST, S_WALL_LIST), sSectionValues(0), "", sSectionData, GetWarehouseIniPath())
+      '   Dim SectionData() As String = sSectionData.Split(","c)
+      '   Select Case Type
+      '      Case BWType.BEAM
+      '         Dim dSectionW As Double = 0 : StringToDoubleAdv( SectionData(0), dSectionW)
+      '         Dim dSectionH As Double = 0 : StringToDoubleAdv( SectionData(1), dSectionH)
+      '         For Each SectionProgress In SectionList
+      '            If Math.Abs(SectionProgress.Section.dW - dSectionW) < 0.1 AndAlso
+      '               Math.Abs(SectionProgress.Section.dH - dSectionH) < 0.1 AndAlso SectionProgress.Section.sMaterial = SectionData(2) Then
+      '               If Not StringToDoubleAdv(sSectionValues(1), dL) Then Continue While
+      '               If Not Integer.TryParse(sSectionValues(2), nQty) Then Continue While
+      '               If sSectionValues.Count >= 4 AndAlso Integer.TryParse(sSectionValues(3), nActive) Then
+      '                  If nActive > 0 Then SectionProgress.SParamList.Add(New SParam(SectionProgress.Section, dL, nQty, nActive > 0))
+      '               Else
+      '                  SectionProgress.SParamList.Add(New SParam(SectionProgress.Section, dL, nQty, True))
+      '                  nIndex += 1
+      '                  Continue While
+      '               End If
+      '            End If
+      '         Next
+      '      Case BWType.WALL
+      '         Dim dSectionH As Double = 0 : StringToDoubleAdv( SectionData(0), dSectionH)
+      '         For Each SectionProgress In SectionList
+      '            If Math.Abs(SectionProgress.Section.dH - dSectionH) < 0.1 AndAlso SectionProgress.Section.sMaterial = SectionData(1) Then
+      '               If Not StringToDoubleAdv(sSectionValues(1), dW) Then Continue While
+      '               If Not StringToDoubleAdv(sSectionValues(2), dL) Then Continue While
+      '               If Not Integer.TryParse(sSectionValues(3), nQty) Then Continue While
+      '               If Not Integer.TryParse(sSectionValues(4), nActive) Then Continue While
+      '               If nActive > 0 Then SectionProgress.SParamList.Add(New SParam(SectionProgress.Section, dW, dL, nQty, nActive > 0))
+      '            End If
+      '         Next
+      '   End Select
+      '   nIndex += 1
+      'End While
       Return True
    End Function
 
@@ -263,7 +269,7 @@ Module WarehouseHelper
             Dim sMaterial As String = sSectXMatValues(2)
             StringToLenAdv(sSectXMatValues(0), dW)
             StringToLenAdv(sSectXMatValues(1), dH)
-            If SectXMat.dW = dW AndAlso SectXMat.dH = dH AndAlso SectXMat.sMaterial(0) = sMaterial Then
+            If SectXMat.dW = dW AndAlso SectXMat.dH = dH AndAlso SectXMat.sMaterial = sMaterial Then
                If sSectXMatValues.Length <= 3 Then Return Nothing
                Dim sValue As String = ""
                If EgtUILib.GetPrivateProfileString(S_BEAM, "L" & sSectXMatValues(3), String.Empty, sValue, sWarehousePath) Then
@@ -294,7 +300,7 @@ Module WarehouseHelper
             Dim dH As Double = 0
             Dim sMaterial As String = sSectXMatValues(1)
             StringToLenAdv(sSectXMatValues(0), dH)
-            If SectXMat.dH = dH AndAlso SectXMat.sMaterial(0) = sMaterial Then
+            If SectXMat.dH = dH AndAlso SectXMat.sMaterial = sMaterial Then
                If sSectXMatValues.Length <= 2 Then Return Nothing
                Dim sValue As String = ""
                If EgtUILib.GetPrivateProfileString(S_WALL, "S" & sSectXMatValues(2), String.Empty, sValue, sWarehousePath) Then
@@ -337,7 +343,7 @@ Module WarehouseHelper
             Dim sMaterial As String = sSectXMatValues(2)
             StringToLenAdv(sSectXMatValues(0), dW)
             StringToLenAdv(sSectXMatValues(1), dH)
-            If SectXMat.dW = dW AndAlso SectXMat.dH = dH AndAlso SectXMat.sMaterial(0) = sMaterial Then
+            If SectXMat.dW = dW AndAlso SectXMat.dH = dH AndAlso SectXMat.sMaterial = sMaterial Then
                ' recupero indice di SParam
                Dim SParamIndex As Integer = 1
                Dim sValue As String = ""
@@ -379,7 +385,7 @@ Module WarehouseHelper
             Dim dH As Double = 0
             Dim sMaterial As String = sSectXMatValues(1)
             StringToLenAdv(sSectXMatValues(0), dH)
-            If SectXMat.dH = dH AndAlso SectXMat.sMaterial(0) = sMaterial Then
+            If SectXMat.dH = dH AndAlso SectXMat.sMaterial = sMaterial Then
                ' recupero indice di SParam
                Dim SParamIndex As Integer = 1
                Dim sValue As String = ""
@@ -429,7 +435,7 @@ Module WarehouseHelper
                Dim sMaterial As String = sSectionValues(2)
                StringToLenAdv(sSectionValues(0), dW)
                StringToLenAdv(sSectionValues(1), dH)
-               If Section.dW = dW AndAlso Section.dH = dH AndAlso Section.sMaterial(0) = sMaterial Then
+               If Section.dW = dW AndAlso Section.dH = dH AndAlso Section.sMaterial = sMaterial Then
                   ' se l'ho trovato esco dal while, il SectXMatIndex è l'indice che cercavamo
                   Return nIndex
                End If
@@ -437,7 +443,7 @@ Module WarehouseHelper
                Dim dH As Double = 0
                Dim sMaterial As String = sSectionValues(1)
                StringToLenAdv(sSectionValues(0), dH)
-               If Section.dH = dH AndAlso Section.sMaterial(0) = sMaterial Then
+               If Section.dH = dH AndAlso Section.sMaterial = sMaterial Then
                   ' se l'ho trovato esco dal while, il SectXMatIndex è l'indice che cercavamo
                   Return nIndex
                End If

EgtBEAMWALL.ViewerOptimizer/WarehouseWnd/WarehouseWndV.xaml

@@ -24,6 +24,7 @@
          <ColumnDefinition Width="1*"/>
       </Grid.ColumnDefinitions>
       <Grid.RowDefinitions>
+         <RowDefinition Height="Auto"/>
          <RowDefinition Height="Auto"/>
          <RowDefinition Height="1*"/>
          <RowDefinition Height="Auto"/>
@@ -31,7 +32,7 @@
          <RowDefinition Height="Auto"/>
       </Grid.RowDefinitions>
 
-      <Grid >
+      <Grid>
          <Grid.ColumnDefinitions>
             <ColumnDefinition Width="1*"/>
             <ColumnDefinition Width="2*"/>
@@ -174,7 +175,12 @@
 
       </Grid>
 
-      <GroupBox Header="{Binding SParams_Msg}" Grid.Row="1" Grid.Column="0" Margin="0,0,0,5" Visibility="{Binding Basic_Visibility}">
+      <Button Grid.Row="1"
+              Content="Update Warehouse Quantity"
+              Command="{Binding UpdateNetQuantity_Command}"
+              ToolTip="{Binding UpdateNetQuantity_ToolTip}"/>
+      
+      <GroupBox Header="{Binding SParams_Msg}" Grid.Row="2" Grid.Column="0" Margin="0,0,0,5" Visibility="{Binding Basic_Visibility}">
          <ListBox ItemsSource="{Binding SParamList}" 
                   SelectedItem="{Binding SelSParam}"
                   DisplayMemberPath="sValue"
@@ -182,7 +188,7 @@
                   MinHeight="40"/>
       </GroupBox>
 
-      <GroupBox Header="{Binding SParams_Msg}" Grid.Row="1" Grid.Column="0" Margin="0,0,0,5" Visibility="{Binding Medium_Visibility}">
+      <GroupBox Header="{Binding SParams_Msg}" Grid.Row="2" Grid.Column="0" Margin="0,0,0,5" Visibility="{Binding Medium_Visibility}">
          <Grid>
             <Grid.RowDefinitions>
                <RowDefinition Height="Auto"/>
@@ -265,19 +271,33 @@
                      </DataGridTextColumn.HeaderTemplate>
                   </DataGridTextColumn>
                   <!-- Quantity -->
-                  <DataGridTextColumn x:Key="colQTY" Binding="{Binding nQuantity}">
+                  <DataGridTextColumn x:Key="colQTY" Binding="{Binding sQuantity}">
                      <DataGridTextColumn.HeaderTemplate>
                         <DataTemplate>
                            <TextBlock Text="{Binding Path=DataContext.Quantity_Msg,RelativeSource={RelativeSource AncestorType={x:Type EgtBEAMWALL:WarehouseWndV}}}"/>
                         </DataTemplate>
                      </DataGridTextColumn.HeaderTemplate>
                   </DataGridTextColumn>
+                  <!-- Use Quantity -->
+                  <DataGridTemplateColumn x:Key="colUSEQTY" >
+                     <DataGridTemplateColumn.CellTemplate>
+                        <DataTemplate>
+                           <CheckBox IsChecked="{Binding bUseQuantity, UpdateSourceTrigger=PropertyChanged}"
+                                     VerticalAlignment="Center"/>
+                        </DataTemplate>
+                     </DataGridTemplateColumn.CellTemplate>
+                     <DataGridTemplateColumn.HeaderTemplate>
+                        <DataTemplate>
+                           <TextBlock Text="∞"/>
+                        </DataTemplate>
+                     </DataGridTemplateColumn.HeaderTemplate>
+                  </DataGridTemplateColumn>
                </DataGrid.Resources>
             </EgtBEAMWALLCORE:EgtDataGrid>
          </Grid>
       </GroupBox>
 
-      <Grid Grid.Row="2" Margin="0,0,0,5" Visibility="{Binding AddRemoveBtns_Visibility}">
+      <Grid Grid.Row="3" Margin="0,0,0,5" Visibility="{Binding AddRemoveBtns_Visibility}">
          <Grid.ColumnDefinitions>
             <ColumnDefinition Width="1*"/>
             <ColumnDefinition Width="1*"/>
@@ -306,7 +326,7 @@
          </Button>
       </Grid>
 
-      <GroupBox Header="{Binding NewParam_Msg}" Margin="0,0,0,5"  Grid.Row="3" Visibility="{Binding NewBeamParam_Visibility}">
+      <GroupBox Header="{Binding NewParam_Msg}" Margin="0,0,0,5"  Grid.Row="4" Visibility="{Binding NewBeamParam_Visibility}">
          <Grid>
             <Grid.RowDefinitions>
                <RowDefinition Height="1*"/>
@@ -343,7 +363,7 @@
          </Grid>
       </GroupBox>
 
-      <GroupBox Header="{Binding NewParam_Msg}" Margin="0,0,0,5" Grid.Row="3" Visibility="{Binding NewWallParam_Visibility}">
+      <GroupBox Header="{Binding NewParam_Msg}" Margin="0,0,0,5" Grid.Row="4" Visibility="{Binding NewWallParam_Visibility}">
          <Grid >
             <Grid.RowDefinitions>
                <RowDefinition Height="1*"/>
@@ -390,7 +410,7 @@
          </Grid>
       </GroupBox>
 
-      <Grid Grid.Row="4"
+      <Grid Grid.Row="5"
             Margin="0,0,0,5">
          <Grid.ColumnDefinitions>
             <ColumnDefinition Width="1*"/>

EgtBEAMWALL.ViewerOptimizer/WarehouseWnd/WarehouseWndVM.vb

@@ -1,7 +1,6 @@
 Imports EgtWPFLib5
 Imports EgtUILib
 Imports System.Collections.ObjectModel
-Imports System.Windows.Forms
 Imports EgtBEAMWALL.Core
 
 Public Class WarehouseWndVM
@@ -153,6 +152,15 @@ Public Class WarehouseWndVM
       End Get
    End Property
 
+   Public ReadOnly Property UpdateNetQuantity_ToolTip As String
+      Get
+         Dim sLastSynchronization As String = ""
+         GetMainPrivateProfileString(S_GENERAL, K_LASTSYNCHRONIZATION, "", sLastSynchronization)
+         Return "Use net warehouse" & Environment.NewLine &
+                String.Format("Last successfull synchronization done on {0}", sLastSynchronization)
+      End Get
+   End Property
+
 #End Region    ' Messages
 
 #Region "FIELDS & PROPERTIES"
@@ -429,6 +437,7 @@ Public Class WarehouseWndVM
    Private m_cmdRemoveMediumParam As ICommand
    Private m_cmdAddWhWallParam As ICommand
    Private m_cmdRemoveWhWallParam As ICommand
+   Private m_cmdUpdateNetQuantity As ICommand
 
 #End Region    ' FIELDS & PROPERTIES
 
@@ -515,27 +524,29 @@ Public Class WarehouseWndVM
                EgtUILib.GetPrivateProfileString(S_BEAM, K_OFFSET, String.Empty, sValue, sWarehousePath)
                StringToLenAdv(sValue, dOffset)
 
-               SParamList = New ObservableCollection(Of SParam)
-               SectionXMaterialList = New ObservableCollection(Of SectionXMaterial)(GetSectionXMaterialsFromWarehouse())
-               While EgtUILib.GetPrivateProfileString(S_BEAM, "L" & ParamIndex, String.Empty, sValue, sWarehousePath)
-                  Dim SParam = GetSParamFromWarehouse(ParamIndex)
-                  If Not IsNothing(SParam) Then
-                     SParamList.Add(SParam)
-                  End If
-                  ParamIndex += 1
-               End While
+               'SParamList = New ObservableCollection(Of SParam)
+               'SectionXMaterialList = New ObservableCollection(Of SectionXMaterial)(GetSectionXMaterialsFromWarehouse())
+               'While EgtUILib.GetPrivateProfileString(S_BEAM, "L" & ParamIndex, String.Empty, sValue, sWarehousePath)
+               '   Dim SParam = GetSParamFromWarehouse(ParamIndex)
+               '   If Not IsNothing(SParam) Then
+               '      SParamList.Add(SParam)
+               '   End If
+               '   ParamIndex += 1
+               'End While
 
-               ' per ogni SParam seleziono il SectionXMaterial corrispondente dalla lista della Warehouse
-               For Each SParam In SParamList
-                  Dim i As Integer = 0
-                  For Each SectXMat In SectionXMaterialList
-                     If SectXMat.sSectionXMaterial = SParam.SectXMat.sSectionXMaterial Then
-                        SParam.nSelSectionXMaterial = i
-                     End If
-                     i += 1
-                  Next
-               Next
+               '' per ogni SParam seleziono il SectionXMaterial corrispondente dalla lista della Warehouse
+               'For Each SParam In SParamList
+               '   Dim i As Integer = 0
+               '   For Each SectXMat In SectionXMaterialList   
+               '      If SectXMat.sSectionXMaterial = SParam.SectXMat.sSectionXMaterial Then
+               '         SParam.nSelSectionXMaterial = i
+               '      End If
+               '      i += 1
+               '   Next
+               'Next
 
+               SectionXMaterialList = New ObservableCollection(Of SectionXMaterial)(DbControllers.m_MaterialsController.GetFilt("").Select(Of SectionXMaterial)(Function(x) New SectionXMaterial(x)).ToList())
+               SParamList = New ObservableCollection(Of SParam)(DbControllers.m_RawItemsController.GetFilt(0).Select(Of SParam)(Function(x) New SParam(x)).ToList())
             ElseIf Map.refProjectVM.BTLStructureVM.nPROJTYPE = MachineType.WALL Then
                Kerf_Visibility = Visibility.Visible
                Offset_Visibility = Visibility.Collapsed
@@ -550,27 +561,29 @@ Public Class WarehouseWndVM
                   ParamIndex += 1
                End While
 
-               SParamList = New ObservableCollection(Of SParam)
-               SectionXMaterialList = New ObservableCollection(Of SectionXMaterial)(GetSectionXMaterialsFromWarehouse())
-               ParamIndex = 1
-               While EgtUILib.GetPrivateProfileString(S_WALL, "S" & ParamIndex, String.Empty, sValue, sWarehousePath)
-                  Dim SParamItem As SParam = GetSParamFromWarehouse(ParamIndex)
-                  If Not IsNothing(SParamItem) Then
-                     SParamList.Add(SParamItem)
-                  End If
-                  ParamIndex += 1
-               End While
+               'SParamList = New ObservableCollection(Of SParam)
+               'SectionXMaterialList = New ObservableCollection(Of SectionXMaterial)(GetSectionXMaterialsFromWarehouse())
+               'ParamIndex = 1
+               'While EgtUILib.GetPrivateProfileString(S_WALL, "S" & ParamIndex, String.Empty, sValue, sWarehousePath)
+               '   Dim SParamItem As SParam = GetSParamFromWarehouse(ParamIndex)
+               '   If Not IsNothing(SParamItem) Then
+               '      SParamList.Add(SParamItem)
+               '   End If
+               '   ParamIndex += 1
+               'End While
 
-               ' per ogni SParam seleziono il SectionXMaterial corrispondente dalla lista della Warehouse
-               For Each SParam In SParamList
-                  Dim i As Integer = 0
-                  For Each SectXMat In SectionXMaterialList
-                     If SectXMat.sSectionXMaterial = SParam.SectXMat.sSectionXMaterial Then
-                        SParam.nSelSectionXMaterial = i
-                     End If
-                     i += 1
-                  Next
-               Next
+               '' per ogni SParam seleziono il SectionXMaterial corrispondente dalla lista della Warehouse
+               'For Each SParam In SParamList
+               '   Dim i As Integer = 0
+               '   For Each SectXMat In SectionXMaterialList
+               '      If SectXMat.sSectionXMaterial = SParam.SectXMat.sSectionXMaterial Then
+               '         SParam.nSelSectionXMaterial = i
+               '      End If
+               '      i += 1
+               '   Next
+               'Next
+               SectionXMaterialList = New ObservableCollection(Of SectionXMaterial)(DbControllers.m_MaterialsController.GetFilt("").Select(Of SectionXMaterial)(Function(x) New SectionXMaterial(x)).ToList())
+               SParamList = New ObservableCollection(Of SParam)(DbControllers.m_RawItemsController.GetFilt(0).Select(Of SParam)(Function(x) New SParam(x)).ToList())
 
             End If
 
@@ -682,40 +695,41 @@ Public Class WarehouseWndVM
                WritePrivateProfileString(S_BEAM, K_OFFSET, LenToString(dOffset, 3), sWarehousePath)
                ParamIndex = 1
                For Each SPItem In SParamList
-                  Dim sL As String = String.Empty
-                  sL = LenToString(SParamList(ParamIndex - 1).dL, 3)
+                  'Dim sL As String = String.Empty
+                  'sL = LenToString(SParamList(ParamIndex - 1).dL, 3)
 
 
-                  ' ricavo l'indice del SecionXMaterial dalla Beam_List
-                  Dim SectXMatIndex As Integer = GetSectIndexFromSection(MachineType.BEAM, SParamList(ParamIndex - 1).SectXMat)
-                  'Dim sSxMValue As String = ""
-                  'While EgtUILib.GetPrivateProfileString(S_BEAM_LIST, SectXMatIndex, String.Empty, sSxMValue, sWarehousePath)
-                  '   Dim sSectXMatValues() As String = sSxMValue.Split(","c)
-                  '   ' creo parametro
-                  '   Dim dW As Double = 0
-                  '   Dim dH As Double = 0
-                  '   Dim sMaterial As String = sSectXMatValues(2)
-                  '   StringToLenAdv(sSectXMatValues(0), dW)
-                  '   StringToLenAdv(sSectXMatValues(1), dH)
-                  '   If SParamList(ParamIndex - 1).SectXMat.dW = dW AndAlso SParamList(ParamIndex - 1).SectXMat.dH = dH AndAlso SParamList(ParamIndex - 1).SectXMat.sMaterial(0) = sMaterial Then
-                  '      ' se l'ho trovato esco dal while, il SectXMatIndex è l'indice che cercavamo
-                  '      Exit While
-                  '   End If
-                  '   SectXMatIndex += 1
-                  'End While
-                  If SectXMatIndex > 0 Then
-                     WritePrivateProfileString(S_BEAM, K_L & ParamIndex,
-                                            SectXMatIndex & "," & sL & "," & SParamList(ParamIndex - 1).nQuantity & "," & If(SParamList(ParamIndex - 1).bActive, 1, 0),
-                                            sWarehousePath)
-                     ParamIndex += 1
-                  Else
-                     EgtOutLog("Error in material creation, section not found!")
-                  End If
-               Next
-               ' Se ci sono parametri da rimuovere li rimuovo
-               For Index = ParamIndex To ParamIndex + m_RemovedParamsCount
-                  WritePrivateProfileString(S_BEAM, K_L & Index, Nothing, sWarehousePath)
+                  '' ricavo l'indice del SecionXMaterial dalla Beam_List
+                  'Dim SectXMatIndex As Integer = GetSectIndexFromSection(MachineType.BEAM, SParamList(ParamIndex - 1).SectXMat)
+                  ''Dim sSxMValue As String = ""
+                  ''While EgtUILib.GetPrivateProfileString(S_BEAM_LIST, SectXMatIndex, String.Empty, sSxMValue, sWarehousePath)
+                  ''   Dim sSectXMatValues() As String = sSxMValue.Split(","c)
+                  ''   ' creo parametro
+                  ''   Dim dW As Double = 0
+                  ''   Dim dH As Double = 0
+                  ''   Dim sMaterial As String = sSectXMatValues(2)
+                  ''   StringToLenAdv(sSectXMatValues(0), dW)
+                  ''   StringToLenAdv(sSectXMatValues(1), dH)
+                  ''   If SParamList(ParamIndex - 1).SectXMat.dW = dW AndAlso SParamList(ParamIndex - 1).SectXMat.dH = dH AndAlso SParamList(ParamIndex - 1).SectXMat.sMaterial(0) = sMaterial Then
+                  ''      ' se l'ho trovato esco dal while, il SectXMatIndex è l'indice che cercavamo
+                  ''      Exit While
+                  ''   End If
+                  ''   SectXMatIndex += 1
+                  ''End While
+                  'If SectXMatIndex > 0 Then
+                  '   WritePrivateProfileString(S_BEAM, K_L & ParamIndex,
+                  '                          SectXMatIndex & "," & sL & "," & SParamList(ParamIndex - 1).nQuantity & "," & If(SParamList(ParamIndex - 1).bActive, 1, 0),
+                  '                          sWarehousePath)
+                  '   ParamIndex += 1
+                  'Else
+                  '   EgtOutLog("Error in material creation, section not found!")
+                  'End If
+                  DbControllers.m_RawItemsController.Upsert(SPItem.RawPart)
                Next
+               '' Se ci sono parametri da rimuovere li rimuovo
+               'For Index = ParamIndex To ParamIndex + m_RemovedParamsCount
+               '   WritePrivateProfileString(S_BEAM, K_L & Index, Nothing, sWarehousePath)
+               'Next
             ElseIf Map.refProjectVM.BTLStructureVM.nPROJTYPE = MachineType.WALL Then
                ' Verifico che i valori siano tutti > 0
                If dKerf < 0 OrElse dOffset < 0 Then
@@ -924,7 +938,7 @@ Public Class WarehouseWndVM
    Public Sub RemoveParam()
       If Not IsNothing(SelSParam) Then
          If SelSParam.Equals(SelCurrentS) Then
-            If MessageBox.Show(RemoveCurrent_Msg, Attention_Msg, MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes Then
+            If MessageBox.Show(RemoveCurrent_Msg, Attention_Msg, MessageBoxButton.YesNo, MessageBoxImage.Question) = MessageBoxResult.Yes Then
                SParamList.Remove(SelSParam)
                m_RemovedParamsCount += 1
                If SParamList.Count > 0 Then
@@ -1034,6 +1048,45 @@ Public Class WarehouseWndVM
 
 #End Region ' RemoveWhWallParam
 
+#Region "UpdateNetQuantity"
+
+   Public ReadOnly Property UpdateNetQuantity_Command As ICommand
+      Get
+         If m_cmdUpdateNetQuantity Is Nothing Then
+            m_cmdUpdateNetQuantity = New Command(AddressOf UpdateNetQuantity)
+         End If
+         Return m_cmdUpdateNetQuantity
+      End Get
+   End Property
+
+   Public Sub UpdateNetQuantity()
+      Dim ProjectMatIdList As List(Of Integer) = (From SectionXMat In Map.refProjectVM.BTLStructureVM.SectionList
+                                                  Where SectionXMat <> SectionXMaterial.Empty
+                                                  Select SectionXMat.MaterialM.nId).ToList()
+
+      Dim SyncResult As DataLayer.Controllers.MagmanController.SyncResult = DbControllers.m_MagmanController.ResourcesSync(ProjectMatIdList)
+      If SyncResult = DataLayer.Controllers.MagmanController.SyncResult.ALL_OK OrElse
+            SyncResult = DataLayer.Controllers.MagmanController.SyncResult.ERR_MergeMatEmpty OrElse
+            SyncResult = DataLayer.Controllers.MagmanController.SyncResult.ERR_CloudMatEmpty OrElse
+            SyncResult = DataLayer.Controllers.MagmanController.SyncResult.ERR_Res2SendEmpty Then
+         WriteMainPrivateProfileString(S_GENERAL, K_LASTSYNCHRONIZATION, DateTime.Now.ToString())
+         Map.refOptimizePanelVM.NotifyPropertyChanged(NameOf(Map.refOptimizePanelVM.UseNetWarehouse_ToolTip))
+         NotifyPropertyChanged(NameOf(UpdateNetQuantity_ToolTip))
+      Else
+         Dim sLastSynchronization As String = ""
+         GetMainPrivateProfileString(S_GENERAL, K_LASTSYNCHRONIZATION, "", sLastSynchronization)
+         MessageBox.Show("Net Warehouse Synchronization failed! Last successfull synchronization done on " & sLastSynchronization, "Error", MessageBoxButton.OK, MessageBoxImage.Error)
+      End If
+      ' aggiorno elementi in lista
+      For Each SParam In m_SParamList
+         If ProjectMatIdList.Contains(SParam.RawPart.Material.nId) Then
+            SParam.UpdateRawPart()
+         End If
+      Next
+   End Sub
+
+#End Region ' RemoveWhWallParam
+
 #End Region    ' COMMANDS
 
 #Region "METHODS"
@@ -1048,7 +1101,11 @@ Public Class WarehouseWndVM
       End If
       ' aggiorno la visibilità delle colonne
       For Each col In SParamColumns
-         col.ColumnVisibility = If(col.Visible, Visibility.Visible, Visibility.Collapsed)
+         If col.Name = COL_USEQTY Then
+            col.ColumnVisibility = If(GetMainPrivateProfileInt(S_GENERAL, K_NETWAREHOUSE, 0) = 1, Visibility.Visible, Visibility.Collapsed)
+         Else
+            col.ColumnVisibility = If(col.Visible, Visibility.Visible, Visibility.Collapsed)
+         End If
       Next
    End Sub
 
@@ -1104,7 +1161,7 @@ Public Class WarehouseWndVM
             Dim dH As Double = 0
             StringToLenAdv(sSectXMatValues(0), dW)
             StringToLenAdv(sSectXMatValues(1), dH)
-            If Not SectXMatList.Any(Function(x) x.dW = dW AndAlso x.dH = dH AndAlso x.sMaterial(0) = sSectXMatValues(2)) Then
+            If Not SectXMatList.Any(Function(x) x.dW = dW AndAlso x.dH = dH AndAlso x.sMaterial = sSectXMatValues(2)) Then
                SectXMatList.Add(New SectionXMaterial(dW, dH, 0, sSectXMatValues(2)))
             End If
             sSectXMatIndex += 1
@@ -1118,7 +1175,7 @@ Public Class WarehouseWndVM
             ' creo parametro
             Dim dH As Double = 0
             StringToLenAdv(sSectXMatValues(0), dH)
-            If Not SectXMatList.Any(Function(x) x.dH = dH AndAlso x.sMaterial(0) = sSectXMatValues(1)) Then
+            If Not SectXMatList.Any(Function(x) x.dH = dH AndAlso x.sMaterial = sSectXMatValues(1)) Then
                SectXMatList.Add(New SectionXMaterial(0, dH, 0, sSectXMatValues(1)))
             End If
             sSectXMatIndex += 1
@@ -1134,35 +1191,37 @@ Public Class WarehouseWndVM
       Dim sWarehousePath As String = Map.refMainWindowVM.MainWindowM.sWarehouseDir & "\" & WH_MEDIUM_INI_FILE_NAME
 
       If Map.refProjectVM.BTLStructureVM.nPROJTYPE = MachineType.BEAM Then
-         ' ricavo SectionXMaterial tramite Beam_List
-         While EgtUILib.GetPrivateProfileString(S_BEAM_LIST, sSectXMatIndex, String.Empty, sSxMValue, sWarehousePath) > 0
-            ' verifico se uguale
-            Dim sSectXMatValues() As String = sSxMValue.Split(","c)
-            ' creo parametro
-            Dim dW As Double = 0
-            Dim dH As Double = 0
-            StringToLenAdv(sSectXMatValues(0), dW)
-            StringToLenAdv(sSectXMatValues(1), dH)
-            Dim ReadSection As New SectionXMaterial(dW, dH, 0, sSectXMatValues(2))
-            If ReadSection = SectionXMaterial Then Return False
-            sSectXMatIndex += 1
-         End While
-         WritePrivateProfileString(S_BEAM_LIST, sSectXMatIndex, LenToString(SectionXMaterial.dW, 3) & "," &
-                                                                LenToString(SectionXMaterial.dH, 3) & "," &
-                                                                SectionXMaterial.sMaterial(0), sWarehousePath)
+         '' ricavo SectionXMaterial tramite Beam_List
+         'While EgtUILib.GetPrivateProfileString(S_BEAM_LIST, sSectXMatIndex, String.Empty, sSxMValue, sWarehousePath) > 0
+         '   ' verifico se uguale
+         '   Dim sSectXMatValues() As String = sSxMValue.Split(","c)
+         '   ' creo parametro
+         '   Dim dW As Double = 0
+         '   Dim dH As Double = 0
+         '   StringToLenAdv(sSectXMatValues(0), dW)
+         '   StringToLenAdv(sSectXMatValues(1), dH)
+         '   Dim ReadSection As New SectionXMaterial(dW, dH, 0, sSectXMatValues(2))
+         '   If ReadSection = SectionXMaterial Then Return False
+         '   sSectXMatIndex += 1
+         'End While
+         'WritePrivateProfileString(S_BEAM_LIST, sSectXMatIndex, LenToString(SectionXMaterial.dW, 3) & "," &
+         '                                                       LenToString(SectionXMaterial.dH, 3) & "," &
+         '                                                       SectionXMaterial.sMaterial, sWarehousePath)
+         DbControllers.m_MaterialsController.Insert(SectionXMaterial.MaterialM)
       ElseIf Map.refProjectVM.BTLStructureVM.nPROJTYPE = MachineType.WALL Then
-         ' ricavo SectionXMaterial tramite Wall_List
-         While EgtUILib.GetPrivateProfileString(S_WALL_LIST, sSectXMatIndex, String.Empty, sSxMValue, sWarehousePath)
-            Dim sSectXMatValues() As String = sSxMValue.Split(","c)
-            ' creo parametro
-            Dim dH As Double = 0
-            StringToLenAdv(sSectXMatValues(0), dH)
-            Dim ReadSection As New SectionXMaterial(0, dH, 0, sSectXMatValues(1))
-            If ReadSection = SectionXMaterial Then Return False
-            sSectXMatIndex += 1
-         End While
-         WritePrivateProfileString(S_WALL_LIST, sSectXMatIndex, LenToString(SectionXMaterial.dH, 3) & "," &
-                                                                SectionXMaterial.sMaterial(0), sWarehousePath)
+         '' ricavo SectionXMaterial tramite Wall_List
+         'While EgtUILib.GetPrivateProfileString(S_WALL_LIST, sSectXMatIndex, String.Empty, sSxMValue, sWarehousePath)
+         '   Dim sSectXMatValues() As String = sSxMValue.Split(","c)
+         '   ' creo parametro
+         '   Dim dH As Double = 0
+         '   StringToLenAdv(sSectXMatValues(0), dH)
+         '   Dim ReadSection As New SectionXMaterial(0, dH, 0, sSectXMatValues(1))
+         '   If ReadSection = SectionXMaterial Then Return False
+         '   sSectXMatIndex += 1
+         'End While
+         'WritePrivateProfileString(S_WALL_LIST, sSectXMatIndex, LenToString(SectionXMaterial.dH, 3) & "," &
+         '                                                       SectionXMaterial.sMaterial, sWarehousePath)
+         DbControllers.m_MaterialsController.Insert(SectionXMaterial.MaterialM)
       End If
       Return True
    End Function
@@ -1307,6 +1366,13 @@ Public Class SParam
    Inherits VMBase
    Implements IComparable
 
+   Private m_RawPart As RawPartM
+   Public ReadOnly Property RawPart As RawPartM
+      Get
+         Return m_RawPart
+      End Get
+   End Property
+
    Public ReadOnly Property W_Msg As String
       Get
          Return EgtMsg(61759)
@@ -1325,13 +1391,12 @@ Public Class SParam
       End Get
    End Property
 
-   Private m_bActive As Boolean
    Public Property bActive As Boolean
       Get
-         Return m_bActive
+         Return m_RawPart.bActive
       End Get
       Set(value As Boolean)
-         m_bActive = value
+         m_RawPart.bActive = value
       End Set
    End Property
 
@@ -1342,36 +1407,55 @@ Public Class SParam
       End Get
       Set(value As SectionXMaterial)
          m_SectXMat = value
+         If Not IsNothing(m_SectXMat) AndAlso Not IsNothing(m_SectXMat.MaterialM) Then
+            m_RawPart.Material = m_SectXMat.MaterialM
+         End If
       End Set
    End Property
 
-   Private m_dW As Double
    Public Property dW As Double
       Get
-         Return m_dW
+         Return m_RawPart.dW
       End Get
       Set(value As Double)
-         m_dW = value
+         m_RawPart.dW = value
       End Set
    End Property
 
-   Private m_dL As Double
    Public Property dL As Double
       Get
-         Return m_dL
+         Return m_RawPart.dL
       End Get
       Set(value As Double)
-         m_dL = value
+         m_RawPart.dL = value
       End Set
    End Property
 
-   Private m_nQuantity As Integer
    Public Property nQuantity As Integer
       Get
-         Return m_nQuantity
+         Return m_RawPart.nQuantity
       End Get
       Set(value As Integer)
-         m_nQuantity = value
+         m_RawPart.nQuantity = value
+      End Set
+   End Property
+
+   Public Property sQuantity As String
+      Get
+         Return If(GetMainPrivateProfileInt(S_GENERAL, K_NETWAREHOUSE, 0) = 1 And bUseQuantity, "---", m_RawPart.nQuantity)
+      End Get
+      Set(value As String)
+         m_RawPart.nQuantity = value
+      End Set
+   End Property
+
+   Public Property bUseQuantity As Boolean
+      Get
+         Return m_RawPart.bUseQuantity
+      End Get
+      Set(value As Boolean)
+         m_RawPart.bUseQuantity = value
+         NotifyPropertyChanged(NameOf(sQuantity))
       End Set
    End Property
 
@@ -1496,36 +1580,37 @@ Public Class SParam
 
    Public ReadOnly Property sMaterial As String
       Get
-         Return If(IsNothing(SectXMat), "", SectXMat.sMaterial(0))
+         Return If(IsNothing(SectXMat), "", SectXMat.sMaterial)
       End Get
    End Property
 
 #End Region    ' For Statistics
 
    Sub New(W As Double, L As Double)
-      m_dW = W
-      m_dL = L
+      m_RawPart = New RawPartM(Nothing, W, L, 0, False)
    End Sub
 
    Sub New(L As Double)
-      m_dL = L
+      m_RawPart = New RawPartM(Nothing, 0, L, 0, False)
    End Sub
 
    Sub New(SxM As SectionXMaterial, W As Double, L As Double, Qty As Integer, Active As Boolean)
+      m_RawPart = New RawPartM(If(Not IsNothing(SxM), SxM.MaterialM, Nothing), W, L, Qty, Active)
       m_SectXMat = SxM
-      m_dW = W
-      m_dL = L
-      m_nQuantity = Qty
-      m_bActive = Active
       MediumW_Visibility = Visibility.Visible
       Quantity_Visibility = Visibility.Visible
    End Sub
 
    Sub New(SxM As SectionXMaterial, L As Double, Qty As Integer, Active As Boolean)
+      m_RawPart = New RawPartM(If(Not IsNothing(SxM), SxM.MaterialM, Nothing), 0, L, Qty, Active)
       m_SectXMat = SxM
-      m_dL = L
-      m_nQuantity = Qty
-      m_bActive = Active
+      Quantity_Visibility = Visibility.Visible
+   End Sub
+
+   Sub New(RawPartM As RawPartM)
+      m_RawPart = RawPartM
+      m_SectXMat = New SectionXMaterial(RawPart.Material)
+      ' m_SectXMat = Map.refWarehouseWndVM.SectionXMaterialList.FirstOrDefault(Function(x) x.MaterialM = RawPart.Material)
       Quantity_Visibility = Visibility.Visible
    End Sub
 
@@ -1550,6 +1635,17 @@ Public Class SParam
       End Get
    End Property
 
+   Friend Sub UpdateRawPart()
+      Dim UpdatedRawPart As RawPartM = DbControllers.m_RawItemsController.FindByDbId(RawPart.nId)
+      m_RawPart.Update(UpdatedRawPart)
+      NotifyPropertyChanged(NameOf(dW))
+      NotifyPropertyChanged(NameOf(dL))
+      NotifyPropertyChanged(NameOf(sQuantity))
+      NotifyPropertyChanged(NameOf(bUseQuantity))
+      NotifyPropertyChanged(NameOf(bActive))
+   End Sub
+
+
 End Class
 
 Public Class WhWallParam

EgtBEAMWALL.ViewerOptimizer/packages.config

@@ -2,21 +2,28 @@
 <packages>
   <package id="BouncyCastle" version="1.8.5" targetFramework="net472" />
   <package id="DotNetZip" version="1.16.0" targetFramework="net472" />
+  <package id="EgwProxy.MagMan" version="1.0.2402.619" targetFramework="net472" />
   <package id="EntityFramework" version="6.4.4" targetFramework="net452" />
   <package id="Google.Protobuf" version="3.21.9" targetFramework="net472" />
   <package id="K4os.Compression.LZ4" version="1.3.5" targetFramework="net472" />
   <package id="K4os.Compression.LZ4.Streams" version="1.3.5" targetFramework="net472" />
   <package id="K4os.Hash.xxHash" version="1.0.8" targetFramework="net472" />
+  <package id="Microsoft.Bcl.AsyncInterfaces" version="7.0.0" targetFramework="net472" />
   <package id="MySql.Data" version="8.0.21" targetFramework="net472" />
   <package id="MySql.Data.EntityFramework" version="8.0.21" targetFramework="net472" />
+  <package id="Newtonsoft.Json" version="13.0.1" targetFramework="net472" />
   <package id="NLog" version="5.0.1" targetFramework="net472" />
   <package id="PDFsharp-MigraDoc-wpf" version="1.50.5147" targetFramework="net472" />
   <package id="Portable.BouncyCastle" version="1.9.0" targetFramework="net472" />
+  <package id="RestSharp" version="110.2.0" targetFramework="net472" />
   <package id="SSH.NET" version="2016.1.0" targetFramework="net472" />
   <package id="System.Buffers" version="4.5.1" targetFramework="net472" />
   <package id="System.IO.Pipelines" version="5.0.2" targetFramework="net472" />
   <package id="System.Memory" version="4.5.5" targetFramework="net472" />
   <package id="System.Numerics.Vectors" version="4.5.0" targetFramework="net472" />
   <package id="System.Runtime.CompilerServices.Unsafe" version="6.0.0" targetFramework="net472" />
+  <package id="System.Text.Encodings.Web" version="7.0.0" targetFramework="net472" />
+  <package id="System.Text.Json" version="7.0.2" targetFramework="net472" />
   <package id="System.Threading.Tasks.Extensions" version="4.5.4" targetFramework="net472" />
+  <package id="System.ValueTuple" version="4.5.0" targetFramework="net472" />
 </packages>