Emmanuele Sassi
891bbd4a08
Corretta sezione Rimossa selezione grezzo Gestione blocco interfaccia su verifica e simula Aggiunta correzione con cancellazione cartelle progetti Tolto ricaricmento progetto nel passaggio da proj a prod Iniziat studio esportazione statistiche Migliorati messaggi su nesting Cambiata gestione tipo progetto
166 lines
3.1 KiB
VB.net
166 lines
3.1 KiB
VB.net
Imports EgtUILib
|
|
|
|
Public Class StatisticsVM
|
|
Inherits VMBase
|
|
|
|
#Region "Messages"
|
|
|
|
Public ReadOnly Property PDN_Msg As String
|
|
Get
|
|
Return EgtMsg(61809)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property DO_Msg As String
|
|
Get
|
|
Return EgtMsg(61810)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property W_Msg As String
|
|
Get
|
|
Return EgtMsg(61605)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property H_Msg As String
|
|
Get
|
|
Return EgtMsg(61606)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property L_Msg As String
|
|
Get
|
|
Return EgtMsg(61604)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property NAM_Msg As String
|
|
Get
|
|
Return EgtMsg(61603)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property MAT_Msg As String
|
|
Get
|
|
Return EgtMsg(61607)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property CNT_Msg As String
|
|
Get
|
|
Return EgtMsg(61608)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property ADDED_Msg As String
|
|
Get
|
|
Return EgtMsg(61813)
|
|
End Get
|
|
End Property
|
|
Public ReadOnly Property INPROD_Msg As String
|
|
Get
|
|
Return EgtMsg(61609)
|
|
End Get
|
|
End Property
|
|
Public ReadOnly Property DONE_Msg As String
|
|
Get
|
|
Return EgtMsg(61814)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property GRP_Msg As String
|
|
Get
|
|
Return EgtMsg(61612)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property UNIT_VOLUME_Msg As String
|
|
Get
|
|
Return EgtMsg(61712)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property TOT_VOLUME_Msg As String
|
|
Get
|
|
Return EgtMsg(61713)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property UNIT_TIME_Msg As String
|
|
Get
|
|
Return EgtMsg(61714)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property TOT_TIME_Msg As String
|
|
Get
|
|
Return EgtMsg(61715)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property BTLTotParts_Msg As String
|
|
Get
|
|
Return EgtMsg(61716) & ": "
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property BTLTotVolume_Msg As String
|
|
Get
|
|
Return EgtMsg(61717) & ": "
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property BTLTotTime_Msg As String
|
|
Get
|
|
Return EgtMsg(61718) & ": "
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property TotMachGroups_Msg As String
|
|
Get
|
|
Return "Numero totale grezzi" & ": "
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property Used_Msg As String
|
|
Get
|
|
Return EgtMsg(61817)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property Waste_Msg As String
|
|
Get
|
|
Return EgtMsg(61818)
|
|
End Get
|
|
End Property
|
|
|
|
#End Region ' Messages
|
|
|
|
' Definizione comandi
|
|
Private m_cmdPrint As ICommand
|
|
|
|
#Region "COMMANDS"
|
|
|
|
#Region "Invert"
|
|
|
|
Public ReadOnly Property Print_Command As ICommand
|
|
Get
|
|
If m_cmdPrint Is Nothing Then
|
|
m_cmdPrint = New Command(AddressOf Print)
|
|
End If
|
|
Return m_cmdPrint
|
|
End Get
|
|
End Property
|
|
|
|
Public Sub Print()
|
|
|
|
End Sub
|
|
|
|
|
|
#End Region ' Invert
|
|
|
|
#End Region ' COMMANDS
|
|
|
|
End Class
|