Codeunit "Item Tracing Mgt."

ID 6520
Namespace: Microsoft.Inventory.Tracking

Methods

FindRecords

procedure FindRecords(var TempTrackEntry: Record "Item Tracing Buffer", var TempTrackEntry2: Record "Item Tracing Buffer", SerialNoFilter: Text, LotNoFilter: Text, PackageNoFilter: Text, ItemNoFilter: Text, VariantFilter: Text, Direction: Option, ShowComponents: Option)

Parameters

Name Type Description
TempTrackEntry Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
TempTrackEntry2 Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
SerialNoFilter Text
LotNoFilter Text
PackageNoFilter Text
ItemNoFilter Text
VariantFilter Text
Direction Option
ShowComponents Option

NextLevel

procedure NextLevel(var TempTrackEntry: Record "Item Tracing Buffer", TempTrackEntry2: Record "Item Tracing Buffer", Direction: Option, ShowComponents: Option, ParentID: Integer)

Parameters

Name Type Description
TempTrackEntry Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
TempTrackEntry2 Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
Direction Option
ShowComponents Option
ParentID Integer

FindComponents

procedure FindComponents(var ItemLedgEntry2: Record "Item Ledger Entry", var TempItemTracingBuffer: Record "Item Tracing Buffer" temporary, Direction: Option, ShowComponents: Option, ParentID: Integer)

Parameters

Name Type Description
ItemLedgEntry2 Table Microsoft.Inventory.Ledger."Item Ledger Entry"
TempItemTracingBuffer Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
Direction Option
ShowComponents Option
ParentID Integer

InsertRecord

procedure InsertRecord(var TempTrackEntry: Record "Item Tracing Buffer", ParentID: Integer): Boolean

Parameters

Name Type Description
TempTrackEntry Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
ParentID Integer

Returns

Type Description
Boolean

InitTempTable

procedure InitTempTable(var TempTrackEntry: Record "Item Tracing Buffer", var TempTrackEntry2: Record "Item Tracing Buffer")

Parameters

Name Type Description
TempTrackEntry Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
TempTrackEntry2 Table Microsoft.Inventory.Tracking."Item Tracing Buffer"

ExpandAll

procedure ExpandAll(var TempTrackEntry: Record "Item Tracing Buffer", var TempTrackEntry2: Record "Item Tracing Buffer")

Parameters

Name Type Description
TempTrackEntry Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
TempTrackEntry2 Table Microsoft.Inventory.Tracking."Item Tracing Buffer"

TransferData

procedure TransferData(var ItemLedgEntry: Record "Item Ledger Entry", var TempTrackEntry: Record "Item Tracing Buffer")

Parameters

Name Type Description
ItemLedgEntry Table Microsoft.Inventory.Ledger."Item Ledger Entry"
TempTrackEntry Table Microsoft.Inventory.Tracking."Item Tracing Buffer"

InitSearchCriteria

procedure InitSearchCriteria(SerialNoFilter: Text, LotNoFilter: Text, PackageNoFilter: Text, ItemNoFilter: Text)

Parameters

Name Type Description
SerialNoFilter Text
LotNoFilter Text
PackageNoFilter Text
ItemNoFilter Text

InitSearchParm

procedure InitSearchParm(var ItemTracingBuffer: Record "Item Tracing Buffer", var SerialNoFilter: Text, var LotNoFilter: Text, var PackageNoFilter: Text, var ItemNoFilter: Text, var VariantFilter: Text)

Parameters

Name Type Description
ItemTracingBuffer Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
SerialNoFilter Text
LotNoFilter Text
PackageNoFilter Text
ItemNoFilter Text
VariantFilter Text

SetRecordID

procedure SetRecordID(var TrackingEntry: Record "Item Tracing Buffer")

Parameters

Name Type Description
TrackingEntry Table Microsoft.Inventory.Tracking."Item Tracing Buffer"

ShowDocument

procedure ShowDocument(RecID: RecordId)

Parameters

Name Type Description
RecID RecordId

SetExpansionStatus

procedure SetExpansionStatus(Rec: Record "Item Tracing Buffer", var TempTrackEntry: Record "Item Tracing Buffer", var TempTrackEntry2: Record "Item Tracing Buffer", var ActualExpansionStatus: Option)

Parameters

Name Type Description
Rec Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
TempTrackEntry Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
TempTrackEntry2 Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
ActualExpansionStatus Option

IsSpecificTracking

procedure IsSpecificTracking(ItemNo: Code[20], ItemTrackingSetup: Record "Item Tracking Setup" temporary): Boolean

Parameters

Name Type Description
ItemNo Code[20]
ItemTrackingSetup Table Microsoft.Inventory.Tracking."Item Tracking Setup"

Returns

Type Description
Boolean

RecallHistory

procedure RecallHistory(Steps: Integer, var TempTrackEntry: Record "Item Tracing Buffer", var TempTrackEntry2: Record "Item Tracing Buffer", var SerialNoFilter: Text, var LotNoFilter: Text, var PackageNoFilter: Text, var ItemNoFilter: Text, var VariantFilter: Text, var TraceMethod: Option, var ShowComponents: Option): Boolean

Parameters

Name Type Description
Steps Integer
TempTrackEntry Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
TempTrackEntry2 Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
SerialNoFilter Text
LotNoFilter Text
PackageNoFilter Text
ItemNoFilter Text
VariantFilter Text
TraceMethod Option
ShowComponents Option

Returns

Type Description
Boolean

GetHistoryStatus

procedure GetHistoryStatus(var PreviousExists: Boolean, var NextExists: Boolean)

Parameters

Name Type Description
PreviousExists Boolean
NextExists Boolean

SetVariables

procedure SetVariables(NewTempLineNo: Integer, NewCurrentLevel: Integer)

Parameters

Name Type Description
NewTempLineNo Integer
NewCurrentLevel Integer

GetVariables

procedure GetVariables(var NewTempLineNo: Integer, var NewCurrentLevel: Integer)

Parameters

Name Type Description
NewTempLineNo Integer
NewCurrentLevel Integer

Events

OnAfterInitItemTracingHistoryBuffer

[IntegrationEvent(False,False)]
local procedure OnAfterInitItemTracingHistoryBuffer(var ItemTracingHistoryBuffer: Record "Item Tracing History Buffer", var ExtFilterExists: Boolean)

Parameters

Name Type Description
ItemTracingHistoryBuffer Table Microsoft.Inventory.Tracking."Item Tracing History Buffer"
ExtFilterExists Boolean

OnAfterInitSearchParam

[IntegrationEvent(False,False)]
local procedure OnAfterInitSearchParam(var ItemTracingBuffer: Record "Item Tracing Buffer", var ItemTracingBuffer2: Record "Item Tracing Buffer")

Parameters

Name Type Description
ItemTracingBuffer Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
ItemTracingBuffer2 Table Microsoft.Inventory.Tracking."Item Tracing Buffer"

OnAfterInitSearchCriteria

[IntegrationEvent(False,False)]
local procedure OnAfterInitSearchCriteria(SerialNoFilter: Text, LotNoFilter: Text, PackageNoFilter: Text, ItemNoFilter: Text, var SearchCriteria: Option)

Parameters

Name Type Description
SerialNoFilter Text
LotNoFilter Text
PackageNoFilter Text
ItemNoFilter Text
SearchCriteria Option

OnAfterTransferData

[IntegrationEvent(False,False)]
local procedure OnAfterTransferData(var ItemLedgerEntry: Record "Item Ledger Entry", var TempItemTracingBuffer: Record "Item Tracing Buffer" temporary, ValueEntry: Record "Value Entry")

Parameters

Name Type Description
ItemLedgerEntry Table Microsoft.Inventory.Ledger."Item Ledger Entry"
TempItemTracingBuffer Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
ValueEntry Table Microsoft.Inventory.Ledger."Value Entry"

OnBeforeExitLevel

[IntegrationEvent(False,False)]
local procedure OnBeforeExitLevel(TempItemTracingBuffer: Record "Item Tracing Buffer" temporary, var Result: Boolean, var IsHandled: Boolean)

Parameters

Name Type Description
TempItemTracingBuffer Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
Result Boolean
IsHandled Boolean

OnBeforeFindComponents

[IntegrationEvent(False,False)]
local procedure OnBeforeFindComponents(var ItemLedgEntry2: Record "Item Ledger Entry", var TempItemTracingBuffer: Record "Item Tracing Buffer" temporary, Direction: Option, ShowComponents: Option, ParentID: Integer, var CurrentLevel: Integer, var TempLineNo: Integer, var IsHandled: Boolean)

Parameters

Name Type Description
ItemLedgEntry2 Table Microsoft.Inventory.Ledger."Item Ledger Entry"
TempItemTracingBuffer Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
Direction Option
ShowComponents Option
ParentID Integer
CurrentLevel Integer
TempLineNo Integer
IsHandled Boolean

OnBeforeInsertRecord

[IntegrationEvent(False,False)]
local procedure OnBeforeInsertRecord(var ItemTracingBuffer: Record "Item Tracing Buffer", ParentID: Integer, var Result: Boolean, var IsHandled: Boolean)

Parameters

Name Type Description
ItemTracingBuffer Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
ParentID Integer
Result Boolean
IsHandled Boolean

OnBeforeIsSpecificTracking

[IntegrationEvent(False,False)]
local procedure OnBeforeIsSpecificTracking(ItemNo: Code[20], ItemTrackingSetup: Record "Item Tracking Setup" temporary, var IsSpecific: Boolean, var IsHandled: Boolean)

Parameters

Name Type Description
ItemNo Code[20]
ItemTrackingSetup Table Microsoft.Inventory.Tracking."Item Tracking Setup"
IsSpecific Boolean
IsHandled Boolean

OnBeforeItemTracingHistoryBufferInsert

[IntegrationEvent(False,False)]
local procedure OnBeforeItemTracingHistoryBufferInsert(var ItemTracingHistoryBuffer: Record "Item Tracing History Buffer")

Parameters

Name Type Description
ItemTracingHistoryBuffer Table Microsoft.Inventory.Tracking."Item Tracing History Buffer"

OnBeforeNextLevel

[IntegrationEvent(False,False)]
local procedure OnBeforeNextLevel(var TempTrackEntry: Record "Item Tracing Buffer" temporary, var TempTrackEntry2: Record "Item Tracing Buffer" temporary, Direction: Option, ShowComponents: Option, ParentID: Integer, var CurrentLevel: Integer, var TempLineNo: Integer, var IsHandled: Boolean)

Parameters

Name Type Description
TempTrackEntry Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
TempTrackEntry2 Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
Direction Option
ShowComponents Option
ParentID Integer
CurrentLevel Integer
TempLineNo Integer
IsHandled Boolean

OnBeforeShowDocument

[IntegrationEvent(False,False)]
local procedure OnBeforeShowDocument(RecRef: RecordRef, var IsHandled: Boolean)

Parameters

Name Type Description
RecRef RecordRef
IsHandled Boolean

OnBeforeSetRecordID

[IntegrationEvent(False,False)]
local procedure OnBeforeSetRecordID(var TrackingEntry: Record "Item Tracing Buffer", var IsHandled: Boolean)

Parameters

Name Type Description
TrackingEntry Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
IsHandled Boolean

OnBeforeUpdateHistory

[IntegrationEvent(False,False)]
local procedure OnBeforeUpdateHistory(var TempItemTracingHistoryBuffer: Record "Item Tracing History Buffer" temporary, var CurrentHistoryEntryNo: Integer, SerialNoFilter: Text, LotNoFilter: Text, PackageNoFilter: Text, ItemNoFilter: Text, VariantFilter: Text, TraceMethod: Option, ShowComponents: Option, var OK: Boolean, var IsHandled: Boolean)

Parameters

Name Type Description
TempItemTracingHistoryBuffer Table Microsoft.Inventory.Tracking."Item Tracing History Buffer"
CurrentHistoryEntryNo Integer
SerialNoFilter Text
LotNoFilter Text
PackageNoFilter Text
ItemNoFilter Text
VariantFilter Text
TraceMethod Option
ShowComponents Option
OK Boolean
IsHandled Boolean

OnFindComponentsOnAfterSetFilters

[IntegrationEvent(False,False)]
local procedure OnFindComponentsOnAfterSetFilters(var ItemLedgerEntry: Record "Item Ledger Entry", var ItemLedgerEntry2: Record "Item Ledger Entry")

Parameters

Name Type Description
ItemLedgerEntry Table Microsoft.Inventory.Ledger."Item Ledger Entry"
ItemLedgerEntry2 Table Microsoft.Inventory.Ledger."Item Ledger Entry"

OnFindComponentsOnAfterTransferData

[IntegrationEvent(False,False)]
local procedure OnFindComponentsOnAfterTransferData(var TempItemTracingBuffer: Record "Item Tracing Buffer" temporary, var ItemLedgerEntry2: Record "Item Ledger Entry", ItemLedgerEntry: Record "Item Ledger Entry")

Parameters

Name Type Description
TempItemTracingBuffer Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
ItemLedgerEntry2 Table Microsoft.Inventory.Ledger."Item Ledger Entry"
ItemLedgerEntry Table Microsoft.Inventory.Ledger."Item Ledger Entry"

OnFirstLevelOnAfterSetLedgerEntryFilters

[IntegrationEvent(False,False)]
local procedure OnFirstLevelOnAfterSetLedgerEntryFilters(var ItemLedgerEntry: Record "Item Ledger Entry", var SerialNoFilter: Text, var LotNoFilter: Text, var ItemNoFilter: Text)

Parameters

Name Type Description
ItemLedgerEntry Table Microsoft.Inventory.Ledger."Item Ledger Entry"
SerialNoFilter Text
LotNoFilter Text
ItemNoFilter Text

OnFirstLevelOnAfterItemLedgEntrySetCurrentKey

[IntegrationEvent(False,False)]
local procedure OnFirstLevelOnAfterItemLedgEntrySetCurrentKey(var ItemLedgerEntry: Record "Item Ledger Entry")

Parameters

Name Type Description
ItemLedgerEntry Table Microsoft.Inventory.Ledger."Item Ledger Entry"

OnFirstLevelOnAfterTempItemTracingBufferSetCurrentKey

[IntegrationEvent(False,False)]
local procedure OnFirstLevelOnAfterTempItemTracingBufferSetCurrentKey(var TempItemTracingBuffer: Record "Item Tracing Buffer" temporary)

Parameters

Name Type Description
TempItemTracingBuffer Table Microsoft.Inventory.Tracking."Item Tracing Buffer"

OnFirstLevelOnAfterTransferData

[IntegrationEvent(False,False)]
local procedure OnFirstLevelOnAfterTransferData(var TempItemTracingBuffer: Record "Item Tracing Buffer" temporary)

Parameters

Name Type Description
TempItemTracingBuffer Table Microsoft.Inventory.Tracking."Item Tracing Buffer"

OnFirstLevelOnBeforeInsertFirstLevelEntry

[IntegrationEvent(False,False)]
local procedure OnFirstLevelOnBeforeInsertFirstLevelEntry(var ItemTracingBuffer: Record "Item Tracing Buffer", ItemLedgerEntry: Record "Item Ledger Entry")

Parameters

Name Type Description
ItemTracingBuffer Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
ItemLedgerEntry Table Microsoft.Inventory.Ledger."Item Ledger Entry"

OnFirstLevelOnBeforeTransferData

[IntegrationEvent(False,False)]
local procedure OnFirstLevelOnBeforeTransferData(var ItemLedgerEntry: Record "Item Ledger Entry", var ItemLedgerEntry2: Record "Item Ledger Entry")

Parameters

Name Type Description
ItemLedgerEntry Table Microsoft.Inventory.Ledger."Item Ledger Entry"
ItemLedgerEntry2 Table Microsoft.Inventory.Ledger."Item Ledger Entry"

OnInsertRecordOnBeforeSetDescription

[IntegrationEvent(False,False)]
local procedure OnInsertRecordOnBeforeSetDescription(var TempTrackEntry: Record "Item Tracing Buffer", var RecRef: RecordRef, var Description2: Text[100])

Parameters

Name Type Description
TempTrackEntry Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
RecRef RecordRef
Description2 Text[100]

OnNextLevelOnAfterTransferData

[IntegrationEvent(False,False)]
local procedure OnNextLevelOnAfterTransferData(var TempItemTracingBuffer: Record "Item Tracing Buffer" temporary, var TempItemTracingBuffer2: Record "Item Tracing Buffer" temporary)

Parameters

Name Type Description
TempItemTracingBuffer Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
TempItemTracingBuffer2 Table Microsoft.Inventory.Tracking."Item Tracing Buffer"

OnRetrieveHistoryDataOnAfterTraceHistoryLine

[IntegrationEvent(False,False)]
local procedure OnRetrieveHistoryDataOnAfterTraceHistoryLine(var TempItemTracingHistoryBuffer: Record "Item Tracing History Buffer" temporary)

Parameters

Name Type Description
TempItemTracingHistoryBuffer Table Microsoft.Inventory.Tracking."Item Tracing History Buffer"

OnSetRecordIDOnProcessServiceDocument

[IntegrationEvent(False,False)]
local procedure OnSetRecordIDOnProcessServiceDocument(ItemLedgEntry: Record "Item Ledger Entry", var TrackingEntry: Record "Item Tracing Buffer")

Parameters

Name Type Description
ItemLedgEntry Table Microsoft.Inventory.Ledger."Item Ledger Entry"
TrackingEntry Table Microsoft.Inventory.Tracking."Item Tracing Buffer"

OnSetRecordIDOnBeforeProcessServiceDocument

Obsolete

This element will become obsolete from version 25.0. Moved to codeunit Serv. Item Tracing Mgt.

[Obsolete(Moved to codeunit Serv. Item Tracing Mgt.,25.0)]
[IntegrationEvent(False,False)]
local procedure OnSetRecordIDOnBeforeProcessServiceDocument(ItemLedgEntry: Record "Item Ledger Entry", var TrackingEntry: Record "Item Tracing Buffer")

Parameters

Name Type Description
ItemLedgEntry Table Microsoft.Inventory.Ledger."Item Ledger Entry"
TrackingEntry Table Microsoft.Inventory.Tracking."Item Tracing Buffer"

OnBeforeInitSearchCriteria

[IntegrationEvent(False,False)]
local procedure OnBeforeInitSearchCriteria(var SearchCriteria: Option, SerialNoFilter: Text, LotNoFilter: Text, PackageNoFilter: Text, ItemNoFilter: Text, var IsHandled: Boolean)

Parameters

Name Type Description
SearchCriteria Option
SerialNoFilter Text
LotNoFilter Text
PackageNoFilter Text
ItemNoFilter Text
IsHandled Boolean

OnShowDocument

[IntegrationEvent(False,False)]
local procedure OnShowDocument(RecRef: RecordRef, RecID: RecordId)

Parameters

Name Type Description
RecRef RecordRef
RecID RecordId

OnFindRecordsOnBeforeInitTempTable

[IntegrationEvent(False,False)]
local procedure OnFindRecordsOnBeforeInitTempTable(var ItemTracingBuffer: Record "Item Tracing Buffer", Direction: Option, ShowComponents: Option)

Parameters

Name Type Description
ItemTracingBuffer Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
Direction Option
ShowComponents Option

OnAfterSetRecordID

[IntegrationEvent(False,False)]
local procedure OnAfterSetRecordID(var TrackingEntry: Record "Item Tracing Buffer", RecRef: RecordRef)

Parameters

Name Type Description
TrackingEntry Table Microsoft.Inventory.Tracking."Item Tracing Buffer"
RecRef RecordRef

See also