The batch number of the stock lot.
object.Batch
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISStockLot interface |
string
Display the number of the stock lots loaded on the basis of the selected filter and some information about them, including their batch numbers.
Dim aFilter
Dim aStockLots
Dim aStockLot
Dim aMessage
Dim i
Set aFilter = InventoryUtils.CreateStockLotFilter
aFilter.LocationID = 990
set aStockLots = InventoryUtils.LoadStockLots(aFilter)
aMessage = "Stock Lots Count = " & aStockLots.Count
for i = 0 to aStockLots.Count - 1
set aStockLot = aStockLots.Item(i)
aMessage = aMessage & vbNewLine & (i + 1) & ") " &_
"Details: " & vbNewLine &_
" - Batch: " & aStockLot.Batch & vbNewLine &_
" - Expiry: " & aStockLot.Expiry & vbNewLine &_
" - Note: " & aStockLot.Note & vbNewLine &_
" - Order Number: " & aStockLot.OrderNum & vbNewLine &_
" - Quantity: " & aStockLot.Quantity
next
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface Batch can be found in
.