diff --git a/EgtBEAMWALL.ViewerOptimizer/BTLViewModel/BTLStructureVM.vb b/EgtBEAMWALL.ViewerOptimizer/BTLViewModel/BTLStructureVM.vb
index 1c5b8521..ebd5416d 100644
--- a/EgtBEAMWALL.ViewerOptimizer/BTLViewModel/BTLStructureVM.vb
+++ b/EgtBEAMWALL.ViewerOptimizer/BTLViewModel/BTLStructureVM.vb
@@ -84,7 +84,8 @@ Public Class BTLStructureVM
Select Case m_SelectionType
Case SelectionTypes.SELECT_
' imposto modalita' proj su vista feature
- Map.refProjectVM.SelProdProj = ProdProj.PROJ
+ 'Map.refProjectVM.SelProdProj = ProdProj.PROJ
+ Map.refProdProjManagerVM.SelProdProj = ProdProj.PROJ
' rendo enable bottone parameters
Map.refLeftPanelVM.SetParametersIsEnabled(True)
' verifico reset mark su tutti i pezzi
@@ -92,10 +93,12 @@ Public Class BTLStructureVM
EgtResetMark(BTLPart.nPartId)
Next
' mostro barra di gestione pezzo
- Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProjectVM.PartManager_Visibility))
+ 'Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProjectVM.PartManager_Visibility))
+ Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProdProjManagerVM.PartManager_Visibility))
Case SelectionTypes.HIGHLIGHT
' imposto modalita' nulla su vista feature
- Map.refProjectVM.SelProdProj = ProdProj.NULL
+ 'Map.refProjectVM.SelProdProj = ProdProj.NULL
+ Map.refProdProjManagerVM.SelProdProj = ProdProj.NULL
' rendo disable bottone parameters
Map.refLeftPanelVM.SetParametersIsEnabled(False)
If m_PrevSelectionType = SelectionTypes.SELECT_ Then
@@ -111,7 +114,8 @@ Public Class BTLStructureVM
' se attivata opzione, li assemblo
Map.refProjectVM.BTLStructureVM.ShowBuilding(If(Map.refMainMenuVM.SelPage = Pages.VIEW OrElse Map.refMainMenuVM.SelPage = Pages.ONLYPRODPAGE, Map.refShowBeamPanelVM.ShowBuilding_IsChecked, False), False)
' nascondo barra di gestione pezzo
- Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProjectVM.PartManager_Visibility))
+ 'Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProjectVM.PartManager_Visibility))
+ Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProdProjManagerVM.PartManager_Visibility))
End Select
' aggiornamento grafica
'Map.refLeftPanelVM.PartShowAllChanged()
@@ -120,7 +124,8 @@ Public Class BTLStructureVM
'Map.refLeftPanelVM.FeatureSelectionChanged()
If Not IsNothing(Map.refFeatureListManagerVM) Then Map.refFeatureListManagerVM.FeatureSelectionChanged()
Map.refCALCPanelVM.SetIsEnabledForSelPart()
- Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProjectVM.PartManager_Visibility))
+ 'Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProjectVM.PartManager_Visibility))
+ Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProdProjManagerVM.PartManager_Visibility))
End Sub
Private m_SelBTLParts As New PartsObservableCollection(Of BTLPartVM)
@@ -480,7 +485,8 @@ Public Class BTLStructureVM
' seleziono pagina BottomPanel
Map.refBottomPanelVM.SetSelPartFeatureTab(BottomPanelVM.PartFeatureTab.PART)
' mostro barra di gestione pezzo
- Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProjectVM.PartManager_Visibility))
+ 'Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProjectVM.PartManager_Visibility))
+ Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProdProjManagerVM.PartManager_Visibility))
' deseleziono le feature
If Not IsNothing(m_SelBTLPart.SelBTLFeatureVM) Then SelBTLPart.SelBTLFeatureVM = Nothing
' aggiorno stato selezionato tutto
@@ -524,7 +530,8 @@ Public Class BTLStructureVM
' seleziono pagina BottomPanel
Map.refBottomPanelVM.SetSelPartFeatureTab(BottomPanelVM.PartFeatureTab.PART)
' mostro barra di gestione pezzo
- Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProjectVM.PartManager_Visibility))
+ 'Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProjectVM.PartManager_Visibility))
+ Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProdProjManagerVM.PartManager_Visibility))
' deseleziono le feature
If Not IsNothing(m_SelBTLPart.SelBTLFeatureVM) Then SelBTLPart.SelBTLFeatureVM = Nothing
' aggiorno stato selezionato tutto
diff --git a/EgtBEAMWALL.ViewerOptimizer/EgtBEAMWALL.ViewerOptimizer.vbproj b/EgtBEAMWALL.ViewerOptimizer/EgtBEAMWALL.ViewerOptimizer.vbproj
index d59e35cc..c0a8744d 100644
--- a/EgtBEAMWALL.ViewerOptimizer/EgtBEAMWALL.ViewerOptimizer.vbproj
+++ b/EgtBEAMWALL.ViewerOptimizer/EgtBEAMWALL.ViewerOptimizer.vbproj
@@ -271,6 +271,18 @@
FeatureListManagerV.xaml
+
+ PartInRawPartManagerWndV.xaml
+
+
+ RawPartManagerWndV.xaml
+
+
+ ProdWndV.xaml
+
+
+ ProjWndV.xaml
+
OnlyProdFeatureListV.xaml
@@ -366,6 +378,10 @@
PartParametersWndV.xaml
+
+ ProdProjManagerV.xaml
+
+
ProjectTypeWndV.xaml
@@ -402,6 +418,7 @@
+
@@ -529,6 +546,22 @@
Designer
MSBuild:Compile
+
+ Designer
+ MSBuild:Compile
+
+
+ Designer
+ MSBuild:Compile
+
+
+ Designer
+ MSBuild:Compile
+
+
+ Designer
+ MSBuild:Compile
+
MSBuild:Compile
Designer
@@ -629,6 +662,10 @@
Designer
MSBuild:Compile
+
+ Designer
+ MSBuild:Compile
+
MSBuild:Compile
Designer
diff --git a/EgtBEAMWALL.ViewerOptimizer/FreeContourManager/FreeContourManagerVM.vb b/EgtBEAMWALL.ViewerOptimizer/FreeContourManager/FreeContourManagerVM.vb
index d5172fcb..1b72b0ab 100644
--- a/EgtBEAMWALL.ViewerOptimizer/FreeContourManager/FreeContourManagerVM.vb
+++ b/EgtBEAMWALL.ViewerOptimizer/FreeContourManager/FreeContourManagerVM.vb
@@ -321,7 +321,8 @@ Public Class FreeContourManagerVM
nSideAngTextLayer = GDB_ID.NULL
SideAngValues.Clear()
' nascondo PartManager
- Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProjectVM.PartManager_Visibility))
+ 'Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProjectVM.PartManager_Visibility))
+ Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProdProjManagerVM.PartManager_Visibility))
' verifico se solido attivo
m_bPrevShowSolid = Map.refShowBeamPanelVM.ShowSolid_IsChecked
If m_bPrevShowSolid Then Map.refProjectVM.BTLStructureVM.ShowSolid(GDB_ID.NULL, False, False)
@@ -437,7 +438,8 @@ Public Class FreeContourManagerVM
' attivo bottoni save e cancel
SelFeature.RefreshFCMBtnVisibility()
' nascondo Part Manager
- Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProjectVM.PartManager_Visibility))
+ 'Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProjectVM.PartManager_Visibility))
+ Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProdProjManagerVM.PartManager_Visibility))
' attivo pannello
Map.refProjectVM.SetFreeContourManager_Visibility(True)
EgtDraw()
@@ -537,7 +539,8 @@ Public Class FreeContourManagerVM
nSelFeatureId = GDB_ID.NULL
nProcessingLayerId = GDB_ID.NULL
' riattivo Part Manager
- Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProjectVM.PartManager_Visibility))
+ 'Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProjectVM.PartManager_Visibility))
+ Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProdProjManagerVM.PartManager_Visibility))
' disattivo modifiche su scena
Map.refSceneHostVM.MainScene.SetStatusNull()
If m_bPrevShowSolid Then Map.refProjectVM.BTLStructureVM.ShowSolid(GDB_ID.NULL, True, False)
@@ -557,7 +560,8 @@ Public Class FreeContourManagerVM
Core.ViewPanelVM.BWSetView(If(Core.ViewPanelVM.Type = BWType.BEAM, VT.ISO_SW, VT.TOP), False)
EgtZoom(ZM.ALL)
' rimetto PartManager
- Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProjectVM.PartManager_Visibility))
+ 'Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProjectVM.PartManager_Visibility))
+ Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProdProjManagerVM.PartManager_Visibility))
End Sub
' funzione lanciata su fine creazione percorso
diff --git a/EgtBEAMWALL.ViewerOptimizer/ItemParamList/BTLPartListV.xaml.vb b/EgtBEAMWALL.ViewerOptimizer/ItemParamList/BTLPartListV.xaml.vb
index 51f1ad96..805258d5 100644
--- a/EgtBEAMWALL.ViewerOptimizer/ItemParamList/BTLPartListV.xaml.vb
+++ b/EgtBEAMWALL.ViewerOptimizer/ItemParamList/BTLPartListV.xaml.vb
@@ -47,7 +47,8 @@ Public Class BTLPartListV
e.Handled = True
ElseIf e.ChangedButton = m_HighlightBtn Then
Map.refProjectVM.BTLStructureVM.SetSelectionType(BTLStructureVM.SelectionTypes.HIGHLIGHT)
- Map.refProjectVM.SelProdProj = ProdProj.NULL
+ 'Map.refProjectVM.SelProdProj = ProdProj.NULL
+ Map.refProdProjManagerVM.SelProdProj = ProdProj.NULL
End If
' imposto tipo di grid selezionata
If Map.refMainMenuVM.SelPage = Pages.ONLYPRODPAGE Then Map.refProjectVM.SetLastSelGridType(ProjectVM.GridSelTypes.PARTLIST)
diff --git a/EgtBEAMWALL.ViewerOptimizer/ItemParamList/OnlyProdFeatureListV.xaml b/EgtBEAMWALL.ViewerOptimizer/ItemParamList/OnlyProdFeatureListV.xaml
index 58996db6..a85ef74c 100644
--- a/EgtBEAMWALL.ViewerOptimizer/ItemParamList/OnlyProdFeatureListV.xaml
+++ b/EgtBEAMWALL.ViewerOptimizer/ItemParamList/OnlyProdFeatureListV.xaml
@@ -4,10 +4,8 @@
xmlns:EgtBEAMWALL="clr-namespace:EgtBEAMWALL.ViewerOptimizer"
xmlns:EgtBEAMWALLCORE="clr-namespace:EgtBEAMWALL.Core;assembly=EgtBEAMWALL.Core">
-
-
-
@@ -75,7 +63,7 @@
-
+
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
+
-
-
-
-
-
-
-
-
-
+
+
-
+
-
diff --git a/EgtBEAMWALL.ViewerOptimizer/PartInRawPartManager/PartInRawPartManagerWndV.xaml b/EgtBEAMWALL.ViewerOptimizer/PartInRawPartManager/PartInRawPartManagerWndV.xaml
new file mode 100644
index 00000000..dfb4b5ad
--- /dev/null
+++ b/EgtBEAMWALL.ViewerOptimizer/PartInRawPartManager/PartInRawPartManagerWndV.xaml
@@ -0,0 +1,17 @@
+
+
+
+
+
+
+
+
+
+
+
diff --git a/EgtBEAMWALL.ViewerOptimizer/PartInRawPartManager/PartInRawPartManagerWndV.xaml.vb b/EgtBEAMWALL.ViewerOptimizer/PartInRawPartManager/PartInRawPartManagerWndV.xaml.vb
new file mode 100644
index 00000000..04aa079e
--- /dev/null
+++ b/EgtBEAMWALL.ViewerOptimizer/PartInRawPartManager/PartInRawPartManagerWndV.xaml.vb
@@ -0,0 +1,3 @@
+Public Class PartInRawPartManagerWndV
+
+End Class
diff --git a/EgtBEAMWALL.ViewerOptimizer/ProdProjManager/ProdProjManagerV.xaml b/EgtBEAMWALL.ViewerOptimizer/ProdProjManager/ProdProjManagerV.xaml
new file mode 100644
index 00000000..bdfa52bf
--- /dev/null
+++ b/EgtBEAMWALL.ViewerOptimizer/ProdProjManager/ProdProjManagerV.xaml
@@ -0,0 +1,26 @@
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
diff --git a/EgtBEAMWALL.ViewerOptimizer/ProdProjManager/ProdProjManagerV.xaml.vb b/EgtBEAMWALL.ViewerOptimizer/ProdProjManager/ProdProjManagerV.xaml.vb
new file mode 100644
index 00000000..816dd5c5
--- /dev/null
+++ b/EgtBEAMWALL.ViewerOptimizer/ProdProjManager/ProdProjManagerV.xaml.vb
@@ -0,0 +1,3 @@
+Public Class ProdProjManagerV
+
+End Class
diff --git a/EgtBEAMWALL.ViewerOptimizer/ProdProjManager/ProdProjManagerVM.vb b/EgtBEAMWALL.ViewerOptimizer/ProdProjManager/ProdProjManagerVM.vb
new file mode 100644
index 00000000..d9302a9a
--- /dev/null
+++ b/EgtBEAMWALL.ViewerOptimizer/ProdProjManager/ProdProjManagerVM.vb
@@ -0,0 +1,43 @@
+Imports EgtBEAMWALL.Core.ConstGen
+Imports EgtWPFLib5
+
+Public Class ProdProjManagerVM
+ Inherits VMBase
+
+#Region "FIELD & PROPERTIES"
+
+ ' Selezione Tab Prod / Proj
+ Private m_SelProdProj As ProdProj
+ Public Property SelProdProj As Integer
+ Get
+ Return m_SelProdProj
+ End Get
+ Set(value As Integer)
+ m_SelProdProj = value
+ NotifyPropertyChanged(NameOf(SelProdProj))
+ End Set
+ End Property
+
+ Public ReadOnly Property PartManager_Visibility As Visibility
+ Get
+ Return If((Map.refMainMenuVM.SelPage = Pages.VIEW OrElse Map.refMainMenuVM.SelPage = Pages.ONLYPRODPAGE) AndAlso Not IsNothing(Map.refProjectVM.BTLStructureVM) AndAlso Map.refProjectVM.BTLStructureVM.SelectionType = BTLStructureVM.SelectionTypes.SELECT_ AndAlso Not Map.refFreeContourManagerVM.bIsActive, Visibility.Visible, Visibility.Collapsed)
+ End Get
+ End Property
+
+ Public ReadOnly Property FreeContourManager_Visibility As Visibility
+ Get
+ Return Map.refProjectVM.FreeContourManager_Visibility
+ End Get
+ End Property
+
+#End Region ' Fields & Properties
+
+#Region "CONSTRUCTOR"
+
+ Sub New()
+ Map.SetRefProdProjManagerVM(Me)
+ End Sub
+
+#End Region ' Constructor
+
+End Class
diff --git a/EgtBEAMWALL.ViewerOptimizer/Project/ProjectVM.vb b/EgtBEAMWALL.ViewerOptimizer/Project/ProjectVM.vb
index cb7b508c..55325131 100644
--- a/EgtBEAMWALL.ViewerOptimizer/Project/ProjectVM.vb
+++ b/EgtBEAMWALL.ViewerOptimizer/Project/ProjectVM.vb
@@ -11,18 +11,6 @@ Public Class ProjectVM
Private m_Calc_Timer As New DispatcherTimer
- ' Selezione Tab Prod / Proj
- Private m_SelProdProj As ProdProj
- Public Property SelProdProj As Integer
- Get
- Return m_SelProdProj
- End Get
- Set(value As Integer)
- m_SelProdProj = value
- NotifyPropertyChanged(NameOf(SelProdProj))
- End Set
- End Property
-
Private Property m_GridDims As New ObservableCollection(Of GridDimension)
Public Property GridDims As ObservableCollection(Of GridDimension)
Get
@@ -103,12 +91,12 @@ Public Class ProjectVM
m_BottomPanel_Visibility = IsVisible
End Sub
- Private m_PartManager_Visibility As Boolean = True
- Public ReadOnly Property PartManager_Visibility As Visibility
- Get
- Return If((Map.refMainMenuVM.SelPage = Pages.VIEW OrElse Map.refMainMenuVM.SelPage = Pages.ONLYPRODPAGE) AndAlso Not IsNothing(Map.refProjectVM.BTLStructureVM) AndAlso Map.refProjectVM.BTLStructureVM.SelectionType = BTLStructureVM.SelectionTypes.SELECT_ AndAlso Not Map.refFreeContourManagerVM.bIsActive, Visibility.Visible, Visibility.Collapsed)
- End Get
- End Property
+ 'Private m_PartManager_Visibility As Boolean = True
+ 'Public ReadOnly Property PartManager_Visibility As Visibility
+ ' Get
+ ' Return If((Map.refMainMenuVM.SelPage = Pages.VIEW OrElse Map.refMainMenuVM.SelPage = Pages.ONLYPRODPAGE) AndAlso Not IsNothing(Map.refProjectVM.BTLStructureVM) AndAlso Map.refProjectVM.BTLStructureVM.SelectionType = BTLStructureVM.SelectionTypes.SELECT_ AndAlso Not Map.refFreeContourManagerVM.bIsActive, Visibility.Visible, Visibility.Collapsed)
+ ' End Get
+ 'End Property
Private m_FeatureManager_Visibility As Boolean = True
Public Property FeatureManager_Visibility As Visibility
@@ -200,7 +188,7 @@ Public Class ProjectVM
End Property
Friend Sub SetFreeContourManager_Visibility(IsVisible As Boolean)
m_FreeContourManager_Visibility = IsVisible
- NotifyPropertyChanged("FreeContourManager_Visibility")
+ NotifyPropertyChanged(NameOf(FreeContourManager_Visibility))
End Sub
' OnlyProdProject
@@ -448,7 +436,7 @@ Public Class ProjectVM
NotifyPropertyChanged(NameOf(LeftPanel_Visibility))
NotifyPropertyChanged(NameOf(TopPanel_Visibility))
NotifyPropertyChanged(NameOf(BottomPanel_Visibility))
- NotifyPropertyChanged(NameOf(PartManager_Visibility))
+ NotifyPropertyChanged(NameOf(Map.refProdProjManagerVM.PartManager_Visibility))
NotifyPropertyChanged(NameOf(FeatureManager_Visibility))
NotifyPropertyChanged(NameOf(ShowBeamPanel_Visibility))
NotifyPropertyChanged(NameOf(ProjManager_Visibility))
diff --git a/EgtBEAMWALL.ViewerOptimizer/RawPartManager/RawPartManagerWndV.xaml b/EgtBEAMWALL.ViewerOptimizer/RawPartManager/RawPartManagerWndV.xaml
new file mode 100644
index 00000000..1d0e9418
--- /dev/null
+++ b/EgtBEAMWALL.ViewerOptimizer/RawPartManager/RawPartManagerWndV.xaml
@@ -0,0 +1,17 @@
+
+
+
+
+
+
+
+
+
+
+
+
diff --git a/EgtBEAMWALL.ViewerOptimizer/RawPartManager/RawPartManagerWndV.xaml.vb b/EgtBEAMWALL.ViewerOptimizer/RawPartManager/RawPartManagerWndV.xaml.vb
new file mode 100644
index 00000000..f35aa6e4
--- /dev/null
+++ b/EgtBEAMWALL.ViewerOptimizer/RawPartManager/RawPartManagerWndV.xaml.vb
@@ -0,0 +1,3 @@
+Public Class RawPartManagerWndV
+
+End Class
diff --git a/EgtBEAMWALL.ViewerOptimizer/ShowBeamPanel/ShowBeamPanelVM.vb b/EgtBEAMWALL.ViewerOptimizer/ShowBeamPanel/ShowBeamPanelVM.vb
index ffe190bb..ae479427 100644
--- a/EgtBEAMWALL.ViewerOptimizer/ShowBeamPanel/ShowBeamPanelVM.vb
+++ b/EgtBEAMWALL.ViewerOptimizer/ShowBeamPanel/ShowBeamPanelVM.vb
@@ -177,7 +177,8 @@ Public Class ShowBeamPanelVM
End If
' nascondo barra del pezzo
Map.refProjectVM.BTLStructureVM.SetSelectionType(BTLStructureVM.SelectionTypes.NULL)
- Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProjectVM.PartManager_Visibility))
+ 'Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProjectVM.PartManager_Visibility))
+ Map.refProjectVM.NotifyPropertyChanged(NameOf(Map.refProdProjManagerVM.PartManager_Visibility))
' mostro in parte bassa dati BTL
If Not IsNothing(Map.refBottomPanelVM) Then Map.refBottomPanelVM.SetSelPartFeatureTab(BottomPanelVM.PartFeatureTab.STRUCTURE_)
' mostro tutti i pezzi
diff --git a/EgtBEAMWALL.ViewerOptimizer/Statistics/PDFHelper.vb b/EgtBEAMWALL.ViewerOptimizer/Statistics/PDFHelper.vb
index 3fe43b3b..8b234ca2 100644
--- a/EgtBEAMWALL.ViewerOptimizer/Statistics/PDFHelper.vb
+++ b/EgtBEAMWALL.ViewerOptimizer/Statistics/PDFHelper.vb
@@ -140,6 +140,7 @@ Module PDFHelper
Case ListTypes.MACHGROUP
Itemlist = Map.refProjectVM.MachGroupPanelVM.MachGroupVMList
Case ListTypes.RAWPART
+ If Map.refMainMenuVM.SelPage = Pages.ONLYPRODPAGE Then Map.refStatisticsVM.LoadRawPart()
Itemlist = Map.refStatisticsVM.RawPartList
End Select
'If m_ActivePage = Pages.VIEW Then
diff --git a/EgtBEAMWALL.ViewerOptimizer/TabWnd/ProdWndV.xaml b/EgtBEAMWALL.ViewerOptimizer/TabWnd/ProdWndV.xaml
new file mode 100644
index 00000000..5b4fedab
--- /dev/null
+++ b/EgtBEAMWALL.ViewerOptimizer/TabWnd/ProdWndV.xaml
@@ -0,0 +1,52 @@
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
diff --git a/EgtBEAMWALL.ViewerOptimizer/TabWnd/ProdWndV.xaml.vb b/EgtBEAMWALL.ViewerOptimizer/TabWnd/ProdWndV.xaml.vb
new file mode 100644
index 00000000..2711a28b
--- /dev/null
+++ b/EgtBEAMWALL.ViewerOptimizer/TabWnd/ProdWndV.xaml.vb
@@ -0,0 +1,3 @@
+Public Class ProdWndV
+
+End Class
diff --git a/EgtBEAMWALL.ViewerOptimizer/TabWnd/ProjWndV.xaml b/EgtBEAMWALL.ViewerOptimizer/TabWnd/ProjWndV.xaml
new file mode 100644
index 00000000..1f451aa1
--- /dev/null
+++ b/EgtBEAMWALL.ViewerOptimizer/TabWnd/ProjWndV.xaml
@@ -0,0 +1,72 @@
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
diff --git a/EgtBEAMWALL.ViewerOptimizer/TabWnd/ProjWndV.xaml.vb b/EgtBEAMWALL.ViewerOptimizer/TabWnd/ProjWndV.xaml.vb
new file mode 100644
index 00000000..8e3f28ca
--- /dev/null
+++ b/EgtBEAMWALL.ViewerOptimizer/TabWnd/ProjWndV.xaml.vb
@@ -0,0 +1,3 @@
+Public Class FeatureV
+
+End Class
diff --git a/EgtBEAMWALL.ViewerOptimizer/TabWnd/ProjWndVM.vb b/EgtBEAMWALL.ViewerOptimizer/TabWnd/ProjWndVM.vb
new file mode 100644
index 00000000..33054761
--- /dev/null
+++ b/EgtBEAMWALL.ViewerOptimizer/TabWnd/ProjWndVM.vb
@@ -0,0 +1,21 @@
+Imports EgtBEAMWALL.Core.ConstGen
+
+Public Class ProjWndVM
+
+#Region "FIELD & PROPERTIES"
+
+ Public ReadOnly Property PartManager_Visibility As Visibility
+ Get
+ Return If((Map.refMainMenuVM.SelPage = Pages.VIEW OrElse Map.refMainMenuVM.SelPage = Pages.ONLYPRODPAGE) AndAlso Not IsNothing(Map.refProjectVM.BTLStructureVM) AndAlso Map.refProjectVM.BTLStructureVM.SelectionType = BTLStructureVM.SelectionTypes.SELECT_ AndAlso Not Map.refFreeContourManagerVM.bIsActive, Visibility.Visible, Visibility.Collapsed)
+ End Get
+ End Property
+
+ Public ReadOnly Property FreeContourManager_Visibility As Visibility
+ Get
+ Return Map.refProjectVM.FreeContourManager_Visibility
+ End Get
+ End Property
+
+#End Region ' Fields & Properties
+
+End Class
diff --git a/EgtBEAMWALL.ViewerOptimizer/Utility/Dictionary.xaml b/EgtBEAMWALL.ViewerOptimizer/Utility/Dictionary.xaml
index 9b26be6f..e7a5c580 100644
--- a/EgtBEAMWALL.ViewerOptimizer/Utility/Dictionary.xaml
+++ b/EgtBEAMWALL.ViewerOptimizer/Utility/Dictionary.xaml
@@ -57,6 +57,7 @@
+
diff --git a/EgtBEAMWALL.ViewerOptimizer/Utility/Map.vb b/EgtBEAMWALL.ViewerOptimizer/Utility/Map.vb
index 4b906b37..f5efcab8 100644
--- a/EgtBEAMWALL.ViewerOptimizer/Utility/Map.vb
+++ b/EgtBEAMWALL.ViewerOptimizer/Utility/Map.vb
@@ -39,6 +39,7 @@ Module Map
Private m_refRawPartManagerVM As RawPartManagerVM
Private m_refPartInRawPartManagerVM As PartInRawPartManagerVM
Private m_refFeatureListManagerVM As FeatureListManagerVM
+ Private m_refProdProjManagerVM As ProdProjManagerVM
'Private m_refOpenProjectFileDialogVM As OpenProjectFileDialogVM
'Private m_refRawPartTabVM As RawPartTabVM
'Private m_refNestingTabVM As NestingTabVM
@@ -276,6 +277,13 @@ Module Map
End Get
End Property
+ Public ReadOnly Property refProdProjManagerVM As ProdProjManagerVM
+ Get
+ Return m_refProdProjManagerVM
+ End Get
+ End Property
+
+
'Public ReadOnly Property refOpenProjectFileDialogVM As OpenProjectFileDialogVM
' Get
' Return m_refOpenProjectFileDialogVM
@@ -513,6 +521,12 @@ Module Map
Return Not IsNothing(m_refFeatureListManagerVM)
End Function
+ Friend Function SetRefProdProjManagerVM(ProdProjManagerVM As ProdProjManagerVM) As Boolean
+ m_refProdProjManagerVM = ProdProjManagerVM
+ Return Not IsNothing(m_refProdProjManagerVM)
+ End Function
+
+
'Friend Function SetRefOpenProjectFileDialogVM(OpenProjectFileDialogVM As OpenProjectFileDialogVM) As Boolean
' m_refOpenProjectFileDialogVM = OpenProjectFileDialogVM
' Return Not IsNothing(m_refOpenProjectFileDialogVM)
@@ -588,7 +602,7 @@ Module Map
Not IsNothing(m_refAddSectionXMaterialWndVM) AndAlso Not IsNothing(m_refStatisticsTimePanelVM) AndAlso
Not IsNothing(m_refOnlyProdManagerVM) AndAlso Not IsNothing(m_refBTLPartManagerVM) AndAlso
Not IsNothing(m_refRawPartManagerVM) AndAlso Not IsNothing(m_refPartInRawPartManagerVM) AndAlso
- Not IsNothing(m_refFeatureListManagerVM) AndAlso
+ Not IsNothing(m_refFeatureListManagerVM) AndAlso Not IsNothing(m_refProdProjManagerVM) AndAlso
LibMap.EndInit()
End Function