TrkItem (object)

ITrkItem Interface
TrkItem is a Tracker Item object. This object can be accessed from TrkItems collection.
TrkItem object contains Item ID and Item Type ID fields, both of which are required fields. The Item ID field is unique in the Tracking model.


Dim oTADBRoot As Object
Dim oTrkItem As Object

Set oTADBRoot = CreateObject("TADB.TADBRoot")

If oTADBRoot Is Nothing Then
   MsgBox "Root Object is not created"
End If

oTADBRoot.Load "TRK7", ""

oTADBRoot.TrkItems.ReadDB "Item9"
Set oTrkItem = oTADBRoot.TrkItems.Item("Item9")
If Not oTrkItem Is Nothing then
   ' Item9 is found successfully....
   MsgBox "RefID: " & oTrkItem.ReferenceID
   MsgBox "Item Type ID: " & oTrkItem.ItemTypeID
   ' Item9 is not found so Add Item9....
   Set oTrkItem = oTADBRoot.TrkItems.Add("Item9")
   oTrkItem.ReferenceID ="XYZRefID"
   oTrkItem.ItemTypeID = "VEHICLE ORDER"
End If

Properties: ExtHoldActive , GroupID , ID , IntHoldActive , IntHoldReason , ItemTypeID , ParentItemID , ReferenceID , Reg1ID , Reg1Loc , Reg2ID , Reg2Loc , RegEntryTime , RelativeItems , StatusHI , StatusLO , TrackingType , TrkItemType
Methods: Archive , Created , LastModified , Save