The code of the stock item.
object.Code
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISStockItem interface |
string
Display the number of the stock items loaded on the basis of the selected filter, some information about them, including their codes.
Dim aFilter
Dim aStockItems
Dim aStockItem
Dim aMessage
Dim i
Set aFilter = InventoryUtils.CreateStockItemFilter
aFilter.SKU = "TEST1"
set aStockItems = InventoryUtils.LoadStockItems(aFilter)
aMessage = "Stock Items Count = " & aStockItems.Count
for i = 0 to aStockItems.Count - 1
set aStockItem = aStockItems.Item(i)
aMessage = aMessage & vbNewLine &_
"Description: " & aStockItem.Description & vbNewLine &_
"Code: " & aStockItem.Code & vbNewLine &_
"Note: " & aStockItem.Note & vbNewLine &_
"Pack Count: " & aStockItem.PackCount & vbNewLine &_
"SKU: " & aStockItem.SKU & vbNewLine &_
"Supplier Ref: " & aStockItem.SupplierRef & vbNewLine
next
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface Code can be found in
.