Nicola Pievani
d950fc1060
-> nuova definizione dei pezzi (classe Part) -> nuova gestione dei magazzini -> aggiunta pagina per la selezione dei pezzi manuali -> nuova configurazione delle variabili.
75 lines
1.3 KiB
VB.net
75 lines
1.3 KiB
VB.net
Public Module Enums
|
|
|
|
Public Enum Warehouses As Integer
|
|
B = 1
|
|
A = 2
|
|
End Enum
|
|
|
|
Public Enum ColumnsWarehouse As Integer
|
|
FIRST = 0
|
|
SECOND = 1
|
|
THIRD = 2
|
|
End Enum
|
|
|
|
Public Enum ConfigWarehose As Integer
|
|
PALLET = 0
|
|
RACK = 1
|
|
End Enum
|
|
|
|
Public Enum ConfigBox As Integer
|
|
PALLET = 0
|
|
RACK = 1
|
|
End Enum
|
|
|
|
Public Enum States As Integer
|
|
NOT_AVAILABLE = 0
|
|
AVAILABLE = 1
|
|
FULL = 2
|
|
LOADING = 3
|
|
End Enum
|
|
|
|
#Region "PART"
|
|
|
|
' decrizione della posizione del pezzo
|
|
Public Enum Place As Integer
|
|
ON_TABLE = 0
|
|
ON_MOTOR_RULLER = 1
|
|
ON_MANUAL_BOX = 2
|
|
ON_BOX = 3
|
|
ON_WASTE_BOX = 4
|
|
End Enum
|
|
|
|
' descrizione dello stato del pezzo
|
|
Public Enum StatusPart As Integer
|
|
GOOD = 0
|
|
WASTE = 1
|
|
NOT_LOADED = 2
|
|
End Enum
|
|
|
|
' descrizione del tipo di scarico del pezzo
|
|
Public Enum Unloading As Integer
|
|
AUTOMATIC = 0
|
|
MANUAL = 1
|
|
End Enum
|
|
|
|
#End Region ' PART
|
|
|
|
Public Enum StatusMachine As Integer
|
|
WAITING_POINT = 0
|
|
LOADED_POINT = 1
|
|
MOVING = 2
|
|
CHANGE_POINT = 3
|
|
EXCEPTION = 4
|
|
End Enum
|
|
|
|
Public Enum StatusProj As Integer
|
|
DONE = 0
|
|
WORKING = 1
|
|
WAITING = 2
|
|
LOADING = 3
|
|
End Enum
|
|
|
|
|
|
|
|
End Module
|