Skip to content

KVSFCYItemTrackingLines#

Procedures#

InsertRecord(Record Tracking Specification) :#

Summary: Inserts a new item tracking record if no blocking conditions exist and the tracking specification doesn't already exist.

procedure InsertRecord(var TempTrackingSpecification: Record "Tracking Specification" temporary): 

Parameters:

  • TempTrackingSpecification: Temporary tracking specification record to insert

SetFormRunMode(Option) :#

Summary: Sets the form run mode to control item tracking behavior for different scenarios.

procedure SetFormRunMode(Mode: Option): 

Parameters:

  • Mode: Run mode option: empty, Reclass, Combined Ship/Rcpt, Drop Shipment, or Transfer

GetFormRunMode(Option) :#

Summary: Gets the current form run mode setting.

procedure GetFormRunMode(var Mode: Option): 

Parameters:

  • Mode: Returns the current run mode option

SetSourceSpec(Record Tracking Specification, Date) :#

Summary: Sets up the item tracking lines page with source document specification and configures tracking behavior based on the source type.

procedure SetSourceSpec(TrackingSpecification: Record "Tracking Specification"; AvailabilityDate: Date): 

Parameters:

  • TrackingSpecification: Source tracking specification containing document and item details
  • AvailabilityDate: Date to use for availability calculations

SetSecondSourceQuantity(Decimal) :#

Summary: Sets secondary source quantities for warehouse operations to control handling and invoicing quantities.

procedure SetSecondSourceQuantity(SecondSourceQuantityArray: Decimal): 

Parameters:

  • SecondSourceQuantityArray: Array containing source type and quantities for second source

SetSecondSourceRowID(Text[250]) :#

Summary: Sets the secondary source row ID for synchronization with linked documents in drop shipment or transfer scenarios.

procedure SetSecondSourceRowID(RowID: Text[250]): 

Parameters:

  • RowID: Row identifier for the secondary source document

CalculateSums() :#

Summary: Calculates and updates the sum totals for quantity base, qty to handle base, and qty to invoice base across all tracking lines.

procedure CalculateSums(): 

UpdateUndefinedQty() : Boolean#

procedure UpdateUndefinedQty(): Boolean

EntriesAreIdentical(Record Reservation Entry, Record Reservation Entry, Boolean) : Boolean#

Summary: Compares two reservation entries to determine if they are identical across all relevant fields.

procedure EntriesAreIdentical(var ReservEntry1: Record "Reservation Entry"; var ReservEntry2: Record "Reservation Entry"; var IdenticalArray: Boolean): Boolean

Parameters:

  • ReservEntry1: First reservation entry to compare
  • ReservEntry2: Second reservation entry to compare
  • IdenticalArray: Returns comparison results for main fields [1] and secondary fields [2]

Returns: True if both reservation entries are completely identical

NextEntryNo() : Integer#

Summary: Generates the next sequential entry number for item tracking lines.

procedure NextEntryNo(): Integer

Returns: Next available entry number

WriteToDatabase() :#

procedure WriteToDatabase(): 

ZeroLineExists() : Boolean#

Summary: Checks if a zero-quantity line exists without tracking information (blank serial/lot numbers).

procedure ZeroLineExists(): Boolean

Returns: True if a zero line with blank tracking exists

TestTempSpecificationExists() : Boolean#

Summary: Tests whether a tracking specification with the same serial/lot/package numbers already exists in the current dataset. Used to prevent duplicate tracking entries and validate tracking uniqueness before insertion.

procedure TestTempSpecificationExists(): Boolean

Returns: True if a duplicate tracking specification exists, false if the tracking is unique

RegisterItemTrackingLines(Record Tracking Specification, Date, Record Tracking Specification) :#

Summary: Registers item tracking lines from a temporary dataset to the database, merging with existing lines where applicable.

procedure RegisterItemTrackingLines(SourceSpecification: Record "Tracking Specification"; AvailabilityDate: Date; var TempTrackingSpecification: Record "Tracking Specification" temporary): 

Parameters:

  • SourceSpecification: Source document specification for the tracking lines
  • AvailabilityDate: Date to use for availability and expiration calculations
  • TempTrackingSpecification: Temporary tracking specifications to register

SynchronizeLinkedSources(Text[250]) : Boolean#

Summary: Synchronizes item tracking between linked source documents such as drop shipments or transfers.

procedure SynchronizeLinkedSources(DialogText: Text[250]): Boolean

Parameters:

  • DialogText: Text to display in synchronization dialog

Returns: True if synchronization was performed successfully

SetBlockCommit(Boolean) :#

Summary: Sets whether database commits should be blocked during item tracking operations.

procedure SetBlockCommit(NewBlockCommit: Boolean): 

Parameters:

  • NewBlockCommit: True to block commits, false to allow commits

SetCalledFromSynchWhseItemTrkg(Boolean) :#

Summary: Sets the flag indicating the page was called from warehouse item tracking synchronization and blocks commits.

procedure SetCalledFromSynchWhseItemTrkg(CalledFromSynchWhseItemTrkg2: Boolean): 

Parameters:

  • CalledFromSynchWhseItemTrkg2: True if called from warehouse synchronization

SetInbound(Boolean) :#

Summary: Sets the inbound flag to control item tracking behavior for inbound vs outbound operations.

procedure SetInbound(NewInbound: Boolean): 

Parameters:

  • NewInbound: True for inbound operations, false for outbound

SetDirectTransfer(Boolean) :#

Obsolete

This Element will be removed or changed with a future Version of the App.

[Obsolete('No longer used, use KVSFCYSetCurrentRunModeReclass instead', '24.3')]
procedure SetDirectTransfer(IsDirectTransfer2: Boolean): 

KVSFCYSetCurrentRunModeReclass() :#

Summary: Sets the current run mode to reclassification for item tracking operations.

procedure KVSFCYSetCurrentRunModeReclass(): 

SerialNoOnAfterValidate() :#

procedure SerialNoOnAfterValidate(): 

LotNoOnAfterValidate() :#

procedure LotNoOnAfterValidate(): 

QuantityBaseOnAfterValidate() :#

procedure QuantityBaseOnAfterValidate(): 

QuantityBaseOnValidate() :#

procedure QuantityBaseOnValidate(): 

QtytoHandleBaseOnAfterValidate() :#

procedure QtytoHandleBaseOnAfterValidate(): 

QtytoInvoiceBaseOnAfterValidat() :#

procedure QtytoInvoiceBaseOnAfterValidat(): 

GetEditableSettings(Boolean, Boolean, Boolean, Boolean, Boolean, Boolean, Boolean, Boolean, Boolean, Boolean, Boolean, Boolean, Boolean, Boolean) :#

Summary: Gets the current editable settings for all item tracking fields to determine which fields can be modified.

procedure GetEditableSettings(var ItemNoEditable2: Boolean; var VariantCodeEditable2: Boolean; var LocationCodeEditable2: Boolean; var QtyToHandleBaseEditable2: Boolean; var QtyToInvoiceBaseEditable2: Boolean; var QuantityBaseEditable2: Boolean; var SerialNoEditable2: Boolean; var LotNoEditable2: Boolean; var DescriptionEditable2: Boolean; var NewSerialNoEditable2: Boolean; var NewLotNoEditable2: Boolean; var NewExpirationDateEditable2: Boolean; var ExpirationDateEditable2: Boolean; var WarrantyDateEditable2: Boolean): 

Parameters:

  • ItemNoEditable2: Returns whether Item No. field is editable
  • VariantCodeEditable2: Returns whether Variant Code field is editable
  • LocationCodeEditable2: Returns whether Location Code field is editable
  • QtyToHandleBaseEditable2: Returns whether Qty. to Handle (Base) field is editable
  • QtyToInvoiceBaseEditable2: Returns whether Qty. to Invoice (Base) field is editable
  • QuantityBaseEditable2: Returns whether Quantity (Base) field is editable
  • SerialNoEditable2: Returns whether Serial No. field is editable
  • LotNoEditable2: Returns whether Lot No. field is editable
  • DescriptionEditable2: Returns whether Description field is editable
  • NewSerialNoEditable2: Returns whether New Serial No. field is editable
  • NewLotNoEditable2: Returns whether New Lot No. field is editable
  • NewExpirationDateEditable2: Returns whether New Expiration Date field is editable
  • ExpirationDateEditable2: Returns whether Expiration Date field is editable
  • WarrantyDateEditable2: Returns whether Warranty Date field is editable

GetVisibleSettings(Boolean, Boolean, Boolean, Boolean, Boolean, Boolean, Boolean, Boolean, Boolean, Boolean, Boolean, Boolean, Boolean, Boolean, Boolean, Boolean, Boolean) :#

Summary: Gets the current visibility settings for all item tracking UI elements to determine which controls are shown.

procedure GetVisibleSettings(var Handle1Visible2: Boolean; var Handle2Visible2: Boolean; var Handle3Visible2: Boolean; var QtyToHandleBaseVisible2: Boolean; var Invoice1Visible2: Boolean; var Invoice2Visible2: Boolean; var Invoice3Visible2: Boolean; var QtyToInvoiceBaseVisible2: Boolean; var NewSerialNoVisible2: Boolean; var NewLotNoVisible2: Boolean; var NewExpirationDateVisible2: Boolean; var ButtonLineReclassVisible2: Boolean; var ButtonLineVisible2: Boolean; var FunctionsSupplyVisible2: Boolean; var FunctionsDemandVisible2: Boolean; var Inbound2: Boolean; var InboundIsSet2: Boolean): 

Parameters:

  • Handle1Visible2: Returns whether Handle column 1 is visible
  • Handle2Visible2: Returns whether Handle column 2 is visible
  • Handle3Visible2: Returns whether Handle column 3 is visible
  • QtyToHandleBaseVisible2: Returns whether Qty. to Handle (Base) column is visible
  • Invoice1Visible2: Returns whether Invoice column 1 is visible
  • Invoice2Visible2: Returns whether Invoice column 2 is visible
  • Invoice3Visible2: Returns whether Invoice column 3 is visible
  • QtyToInvoiceBaseVisible2: Returns whether Qty. to Invoice (Base) column is visible
  • NewSerialNoVisible2: Returns whether New Serial No. field is visible
  • NewLotNoVisible2: Returns whether New Lot No. field is visible
  • NewExpirationDateVisible2: Returns whether New Expiration Date field is visible
  • ButtonLineReclassVisible2: Returns whether reclassification line buttons are visible
  • ButtonLineVisible2: Returns whether standard line buttons are visible
  • FunctionsSupplyVisible2: Returns whether supply function buttons are visible
  • FunctionsDemandVisible2: Returns whether demand function buttons are visible
  • Inbound2: Returns the current inbound flag setting
  • InboundIsSet2: Returns whether inbound flag has been explicitly set

GetVariables(Record Tracking Specification, Record Tracking Specification, Record Tracking Specification, Record Item, Decimal, Decimal, Integer, Boolean, Boolean, Boolean) :#

Summary: Gets all internal variables and temporary tracking specification records for external processing or synchronization.

procedure GetVariables(var TempTrackingSpecInsert2: Record "Tracking Specification" temporary; var TempTrackingSpecModify2: Record "Tracking Specification" temporary; var TempTrackingSpecDelete2: Record "Tracking Specification" temporary; var Item2: Record "Item"; var UndefinedQtyArray2: Decimal; var SourceQuantityArray2: Decimal; var CurrentSignFactor2: Integer; var InsertIsBlocked2: Boolean; var DeleteIsBlocked2: Boolean; var BlockCommit2: Boolean): 

Parameters:

  • TempTrackingSpecInsert2: Returns temporary records marked for insertion
  • TempTrackingSpecModify2: Returns temporary records marked for modification
  • TempTrackingSpecDelete2: Returns temporary records marked for deletion
  • Item2: Returns the current item record
  • UndefinedQtyArray2: Returns array of undefined quantities
  • SourceQuantityArray2: Returns array of source quantities
  • CurrentSignFactor2: Returns the current sign factor
  • InsertIsBlocked2: Returns whether insert operations are blocked
  • DeleteIsBlocked2: Returns whether delete operations are blocked
  • BlockCommit2: Returns whether database commits are blocked

SetVariables(Record Tracking Specification, Record Tracking Specification, Record Tracking Specification) :#

Summary: Sets internal temporary tracking specification records from external sources for synchronization purposes.

procedure SetVariables(var TempTrackingSpecInsert2: Record "Tracking Specification" temporary; var TempTrackingSpecModify2: Record "Tracking Specification" temporary; var TempTrackingSpecDelete2: Record "Tracking Specification" temporary): 

Parameters:

  • TempTrackingSpecInsert2: Temporary records to mark for insertion
  • TempTrackingSpecModify2: Temporary records to mark for modification
  • TempTrackingSpecDelete2: Temporary records to mark for deletion

GetTrackingSpec(Record Tracking Specification) :#

Summary: Gets all current tracking specifications from the page into a temporary record set for external processing.

procedure GetTrackingSpec(var TempTrackingSpecification: Record "Tracking Specification" temporary): 

Parameters:

  • TempTrackingSpecification: Temporary record set to populate with current tracking specifications

SetSecondSourceID(Integer, Boolean) :#

Summary: Sets the secondary source ID and assemble-to-order flag for special handling scenarios.

procedure SetSecondSourceID(SourceID: Integer; IsATO: Boolean): 

Parameters:

  • SourceID: Secondary source document ID
  • IsATO: True if this is an assemble-to-order scenario

SynchronizeWarehouseItemTracking() :#

procedure SynchronizeWarehouseItemTracking(): 

IsOrderToOrderBindingToTransfer() : Boolean#

procedure IsOrderToOrderBindingToTransfer(): Boolean

Events#

OnAddReservEntriesToTempRecSetOnAfterTempTrackingSpecificationTransferFields(Record Tracking Specification, Record Reservation Entry) :#

Summary: Triggers after transferring fields from reservation entry to temporary tracking specification.

[IntegrationEvent(false, false)]
local procedure OnAddReservEntriesToTempRecSetOnAfterTempTrackingSpecificationTransferFields(var TempTrackingSpecification: Record "Tracking Specification" temporary; var ReservEntry: Record "Reservation Entry"): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnAddReservEntriesToTempRecSetOnAfterTempTrackingSpecificationTransferFields', '', false, false)]
local procedure DoSomethingOnAddReservEntriesToTempRecSetOnAfterTempTrackingSpecificationTransferFields(var TempTrackingSpecification: Record "Tracking Specification" temporary; var ReservEntry: Record "Reservation Entry")
begin
end;

Parameters:

  • TempTrackingSpecification: Temporary tracking specification being populated
  • ReservEntry: Source reservation entry

OnAfterCopyTrackingSpec(Record Tracking Specification, Record Tracking Specification) :#

Summary: Triggers after copying tracking specification fields between records.

[IntegrationEvent(false, false)]
local procedure OnAfterCopyTrackingSpec(var SourceTrackingSpec: Record "Tracking Specification"; var DestTrkgSpec: Record "Tracking Specification"): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnAfterCopyTrackingSpec', '', false, false)]
local procedure DoSomethingOnAfterCopyTrackingSpec(var SourceTrackingSpec: Record "Tracking Specification"; var DestTrkgSpec: Record "Tracking Specification")
begin
end;

Parameters:

  • SourceTrackingSpec: Source tracking specification
  • DestTrkgSpec: Destination tracking specification

OnAfterClearTrackingSpec(Record Tracking Specification) :#

Summary: Triggers after clearing tracking specification fields.

[IntegrationEvent(false, false)]
local procedure OnAfterClearTrackingSpec(var OldTrkgSpec: Record "Tracking Specification"): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnAfterClearTrackingSpec', '', false, false)]
local procedure DoSomethingOnAfterClearTrackingSpec(var OldTrkgSpec: Record "Tracking Specification")
begin
end;

Parameters:

  • OldTrkgSpec: Tracking specification that was cleared

OnAfterCreateReservEntryFor(Record Tracking Specification, Record Tracking Specification, Codeunit Create Reserv. Entry) :#

[IntegrationEvent(false, false)]
local procedure OnAfterCreateReservEntryFor(var OldTrackingSpecification: Record "Tracking Specification"; var NewTrackingSpecification: Record "Tracking Specification"; var CreateReservEntry: Codeunit "Create Reserv. Entry"): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnAfterCreateReservEntryFor', '', false, false)]
local procedure DoSomethingOnAfterCreateReservEntryFor(var OldTrackingSpecification: Record "Tracking Specification"; var NewTrackingSpecification: Record "Tracking Specification"; var CreateReservEntry: Codeunit "Create Reserv. Entry")
begin
end;

OnAfterEntriesAreIdentical(Record Reservation Entry, Record Reservation Entry, Boolean) :#

Summary: Triggers after comparing reservation entries for identity.

[IntegrationEvent(false, false)]
local procedure OnAfterEntriesAreIdentical(ReservEntry1: Record "Reservation Entry"; ReservEntry2: Record "Reservation Entry"; var IdenticalArray: Boolean): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnAfterEntriesAreIdentical', '', false, false)]
local procedure DoSomethingOnAfterEntriesAreIdentical(ReservEntry1: Record "Reservation Entry"; ReservEntry2: Record "Reservation Entry"; var IdenticalArray: Boolean)
begin
end;

Parameters:

  • ReservEntry1: First reservation entry
  • ReservEntry2: Second reservation entry
  • IdenticalArray: Array indicating which fields are identical

OnAfterMoveFields(Record Tracking Specification, Record Reservation Entry) :#

Summary: Triggers after moving fields from reservation entry to tracking specification.

[IntegrationEvent(false, false)]
local procedure OnAfterMoveFields(var TrkgSpec: Record "Tracking Specification"; var ReservEntry: Record "Reservation Entry"): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnAfterMoveFields', '', false, false)]
local procedure DoSomethingOnAfterMoveFields(var TrkgSpec: Record "Tracking Specification"; var ReservEntry: Record "Reservation Entry")
begin
end;

Parameters:

  • TrkgSpec: Target tracking specification
  • ReservEntry: Source reservation entry

OnAfterAssignNewTrackingNo(Record Tracking Specification, Record Tracking Specification, Integer) :#

Summary: Triggers after assigning new tracking number to specification.

[IntegrationEvent(false, false)]
local procedure OnAfterAssignNewTrackingNo(var TrkgSpec: Record "Tracking Specification"; xTrkgSpec: Record "Tracking Specification"; FieldID: Integer): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnAfterAssignNewTrackingNo', '', false, false)]
local procedure DoSomethingOnAfterAssignNewTrackingNo(var TrkgSpec: Record "Tracking Specification"; xTrkgSpec: Record "Tracking Specification"; FieldID: Integer)
begin
end;

Parameters:

  • TrkgSpec: Tracking specification with new number
  • xTrkgSpec: Previous tracking specification
  • FieldID: ID of the field that was assigned

OnAfterGetHandleSource(Record Tracking Specification, Boolean) :#

Summary: Triggers after determining handle column visibility for tracking specification.

[IntegrationEvent(false, false)]
local procedure OnAfterGetHandleSource(TrackingSpecification: Record "Tracking Specification"; var QtyToHandleColumnIsHidden: Boolean): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnAfterGetHandleSource', '', false, false)]
local procedure DoSomethingOnAfterGetHandleSource(TrackingSpecification: Record "Tracking Specification"; var QtyToHandleColumnIsHidden: Boolean)
begin
end;

Parameters:

  • TrackingSpecification: Tracking specification being evaluated
  • QtyToHandleColumnIsHidden: Flag indicating if handle column should be hidden

OnAfterGetInvoiceSource(Record Tracking Specification, Boolean) :#

Summary: Triggers after determining invoice column visibility for tracking specification.

[IntegrationEvent(false, false)]
local procedure OnAfterGetInvoiceSource(TrackingSpecification: Record "Tracking Specification"; var QtyToInvoiceColumnIsHidden: Boolean): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnAfterGetInvoiceSource', '', false, false)]
local procedure DoSomethingOnAfterGetInvoiceSource(TrackingSpecification: Record "Tracking Specification"; var QtyToInvoiceColumnIsHidden: Boolean)
begin
end;

Parameters:

  • TrackingSpecification: Tracking specification being evaluated
  • QtyToInvoiceColumnIsHidden: Flag indicating if invoice column should be hidden

OnAfterRegisterItemTrackingLines(Record Tracking Specification, Record Tracking Specification, Record Tracking Specification, Date) :#

Summary: Triggers after registering item tracking lines to database.

[IntegrationEvent(false, false)]
local procedure OnAfterRegisterItemTrackingLines(var TrackingSpecification: Record "Tracking Specification"; var TempTrackingSpecification: Record "Tracking Specification" temporary; var CurrTrackingSpecification: Record "Tracking Specification"; var AvailabilityDate: Date): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnAfterRegisterItemTrackingLines', '', false, false)]
local procedure DoSomethingOnAfterRegisterItemTrackingLines(var TrackingSpecification: Record "Tracking Specification"; var TempTrackingSpecification: Record "Tracking Specification" temporary; var CurrTrackingSpecification: Record "Tracking Specification"; var AvailabilityDate: Date)
begin
end;

Parameters:

  • TrackingSpecification: Source tracking specification
  • TempTrackingSpecification: Temporary tracking specifications being registered
  • CurrTrackingSpecification: Current tracking specification
  • AvailabilityDate: Date for availability calculations

OnAfterSetControls(Record Item Tracking Code, Option, Boolean) :#

Summary: Triggers after setting control visibility and access based on item tracking code.

[IntegrationEvent(true, false)]
local procedure OnAfterSetControls(ItemTrackingCode: Record "Item Tracking Code"; var Controls: Option; var SetAccess: Boolean): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnAfterSetControls', '', false, false)]
local procedure DoSomethingOnAfterSetControls(ItemTrackingCode: Record "Item Tracking Code"; var Controls: Option; var SetAccess: Boolean)
begin
end;

Parameters:

  • ItemTrackingCode: Item tracking code defining tracking requirements
  • Controls: Control type being configured
  • SetAccess: Flag indicating if access should be set

OnAfterSetSourceSpec(Record Tracking Specification, Record Tracking Specification, Date, Boolean) :#

Summary: Triggers after setting source specification for item tracking.

[IntegrationEvent(false, false)]
local procedure OnAfterSetSourceSpec(var TrackingSpecification: Record "Tracking Specification"; var CurrTrackingSpecification: Record "Tracking Specification"; var AvailabilityDate: Date; var BlockCommit: Boolean): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnAfterSetSourceSpec', '', false, false)]
local procedure DoSomethingOnAfterSetSourceSpec(var TrackingSpecification: Record "Tracking Specification"; var CurrTrackingSpecification: Record "Tracking Specification"; var AvailabilityDate: Date; var BlockCommit: Boolean)
begin
end;

Parameters:

  • TrackingSpecification: Source tracking specification
  • CurrTrackingSpecification: Current tracking specification
  • AvailabilityDate: Availability calculation date
  • BlockCommit: Flag indicating if database commits should be blocked

OnAfterSynchronizeLinkedSources(Option, Integer, Text[250], Text[250]) :#

Summary: Triggers after synchronizing linked sources in item tracking.

[IntegrationEvent(false, false)]
local procedure OnAfterSynchronizeLinkedSources(FormRunMode: Option; CurrentSourceType: Integer; CurrentSourceRowID: Text[250]; SecondSourceRowID: Text[250]): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnAfterSynchronizeLinkedSources', '', false, false)]
local procedure DoSomethingOnAfterSynchronizeLinkedSources(FormRunMode: Option; CurrentSourceType: Integer; CurrentSourceRowID: Text[250]; SecondSourceRowID: Text[250])
begin
end;

Parameters:

  • FormRunMode: Current form run mode
  • CurrentSourceType: Type of current source document
  • CurrentSourceRowID: Row ID of current source
  • SecondSourceRowID: Row ID of linked source

OnAssignLotNoOnAfterInsert(Record Tracking Specification) :#

Summary: Triggers after inserting lot number assignment tracking specification.

[IntegrationEvent(false, false)]
local procedure OnAssignLotNoOnAfterInsert(var TrackingSpecification: Record "Tracking Specification"): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnAssignLotNoOnAfterInsert', '', false, false)]
local procedure DoSomethingOnAssignLotNoOnAfterInsert(var TrackingSpecification: Record "Tracking Specification")
begin
end;

Parameters:

  • TrackingSpecification: Tracking specification with assigned lot number

OnAssignSerialNoBatchOnAfterInsert(Record Tracking Specification) :#

Summary: Triggers after inserting serial number batch assignment tracking specification.

[IntegrationEvent(false, false)]
local procedure OnAssignSerialNoBatchOnAfterInsert(var TrackingSpecification: Record "Tracking Specification"): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnAssignSerialNoBatchOnAfterInsert', '', false, false)]
local procedure DoSomethingOnAssignSerialNoBatchOnAfterInsert(var TrackingSpecification: Record "Tracking Specification")
begin
end;

Parameters:

  • TrackingSpecification: Tracking specification with assigned serial number

OnBeforeAddToGlobalRecordSet(Record Tracking Specification, Boolean, Integer) :#

Summary: Triggers before adding tracking specification to global record set.

[IntegrationEvent(false, false)]
local procedure OnBeforeAddToGlobalRecordSet(var TrackingSpecification: Record "Tracking Specification"; EntriesExist: Boolean; CurrentSignFactor: Integer): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnBeforeAddToGlobalRecordSet', '', false, false)]
local procedure DoSomethingOnBeforeAddToGlobalRecordSet(var TrackingSpecification: Record "Tracking Specification"; EntriesExist: Boolean; CurrentSignFactor: Integer)
begin
end;

Parameters:

  • TrackingSpecification: Tracking specification to add
  • EntriesExist: Flag indicating if entries exist
  • CurrentSignFactor: Current sign factor for calculations

OnBeforeAssignNewLotNo(Record Tracking Specification, Boolean) :#

Summary: Triggers before assigning new lot number to tracking specification.

[IntegrationEvent(false, false)]
local procedure OnBeforeAssignNewLotNo(var TrackingSpecification: Record "Tracking Specification"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnBeforeAssignNewLotNo', '', false, false)]
local procedure DoSomethingOnBeforeAssignNewLotNo(var TrackingSpecification: Record "Tracking Specification"; var IsHandled: Boolean)
begin
end;

Parameters:

  • TrackingSpecification: Tracking specification to receive lot number
  • IsHandled: Flag indicating if assignment was handled by extension

OnBeforeClosePage(Record Tracking Specification, Boolean) :#

Summary: Triggers before closing item tracking lines page.

[IntegrationEvent(false, false)]
local procedure OnBeforeClosePage(var TrackingSpecification: Record "Tracking Specification"; var SkipWriteToDatabase: Boolean): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnBeforeClosePage', '', false, false)]
local procedure DoSomethingOnBeforeClosePage(var TrackingSpecification: Record "Tracking Specification"; var SkipWriteToDatabase: Boolean)
begin
end;

Parameters:

  • TrackingSpecification: Current tracking specification
  • SkipWriteToDatabase: Flag to skip database write operations

OnBeforeDeleteRecord(Record Tracking Specification) :#

Summary: Triggers before deleting tracking specification record.

[IntegrationEvent(false, false)]
local procedure OnBeforeDeleteRecord(var TrackingSpecification: Record "Tracking Specification"): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnBeforeDeleteRecord', '', false, false)]
local procedure DoSomethingOnBeforeDeleteRecord(var TrackingSpecification: Record "Tracking Specification")
begin
end;

Parameters:

  • TrackingSpecification: Tracking specification to be deleted

OnBeforeLotNoAssistEdit(Record Tracking Specification, Record Tracking Specification) :#

Summary: Triggers before lot number assist edit operation.

[IntegrationEvent(false, false)]
local procedure OnBeforeLotNoAssistEdit(var TrackingSpecification: Record "Tracking Specification"; xTrackingSpecification: Record "Tracking Specification"): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnBeforeLotNoAssistEdit', '', false, false)]
local procedure DoSomethingOnBeforeLotNoAssistEdit(var TrackingSpecification: Record "Tracking Specification"; xTrackingSpecification: Record "Tracking Specification")
begin
end;

Parameters:

  • TrackingSpecification: Current tracking specification
  • xTrackingSpecification: Previous tracking specification

OnBeforeOnModifyRecord(Record Tracking Specification, Record Tracking Specification, Boolean, Boolean, Boolean) :#

Summary: Triggers before modifying tracking specification record.

[IntegrationEvent(false, false)]
local procedure OnBeforeOnModifyRecord(var TrackingSpecification: Record "Tracking Specification"; xTrackingSpecification: Record "Tracking Specification"; InsertIsBlocked: Boolean; var Result: Boolean; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnBeforeOnModifyRecord', '', false, false)]
local procedure DoSomethingOnBeforeOnModifyRecord(var TrackingSpecification: Record "Tracking Specification"; xTrackingSpecification: Record "Tracking Specification"; InsertIsBlocked: Boolean; var Result: Boolean; var IsHandled: Boolean)
begin
end;

Parameters:

  • TrackingSpecification: Current tracking specification
  • xTrackingSpecification: Previous tracking specification
  • InsertIsBlocked: Flag indicating if insert operations are blocked
  • Result: Result of the modification operation
  • IsHandled: Flag indicating if modification was handled by extension

OnBeforeRegisterChange(Record Tracking Specification, Record Tracking Specification, Integer, Option, Boolean) :#

Summary: Triggers before registering tracking specification change.

[IntegrationEvent(false, false)]
local procedure OnBeforeRegisterChange(var OldTrackingSpecification: Record "Tracking Specification"; var NewTrackingSpecification: Record "Tracking Specification"; CurrentSignFactor: Integer; FormRunMode: Option; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnBeforeRegisterChange', '', false, false)]
local procedure DoSomethingOnBeforeRegisterChange(var OldTrackingSpecification: Record "Tracking Specification"; var NewTrackingSpecification: Record "Tracking Specification"; CurrentSignFactor: Integer; FormRunMode: Option; var IsHandled: Boolean)
begin
end;

Parameters:

  • OldTrackingSpecification: Previous tracking specification
  • NewTrackingSpecification: New tracking specification
  • CurrentSignFactor: Current sign factor for calculations
  • FormRunMode: Current form run mode
  • IsHandled: Flag indicating if change registration was handled by extension

OnBeforeSerialNoAssistEdit(Record Tracking Specification, Record Tracking Specification) :#

Summary: Triggers before serial number assist edit operation.

[IntegrationEvent(false, false)]
local procedure OnBeforeSerialNoAssistEdit(var TrackingSpecification: Record "Tracking Specification"; xTrackingSpecification: Record "Tracking Specification"): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnBeforeSerialNoAssistEdit', '', false, false)]
local procedure DoSomethingOnBeforeSerialNoAssistEdit(var TrackingSpecification: Record "Tracking Specification"; xTrackingSpecification: Record "Tracking Specification")
begin
end;

Parameters:

  • TrackingSpecification: Current tracking specification
  • xTrackingSpecification: Previous tracking specification

OnBeforeSerialNoOnAfterValidate(Record Tracking Specification) :#

Summary: Triggers before serial number field validation completion.

[IntegrationEvent(false, false)]
local procedure OnBeforeSerialNoOnAfterValidate(var TempTrackingSpecification: Record "Tracking Specification" temporary): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnBeforeSerialNoOnAfterValidate', '', false, false)]
local procedure DoSomethingOnBeforeSerialNoOnAfterValidate(var TempTrackingSpecification: Record "Tracking Specification" temporary)
begin
end;

Parameters:

  • TempTrackingSpecification: Temporary tracking specification being validated

OnBeforeSetSourceSpec(Record Tracking Specification, Record Reservation Entry) :#

Summary: Triggers before setting source specification for item tracking.

[IntegrationEvent(false, false)]
local procedure OnBeforeSetSourceSpec(var TrackingSpecification: Record "Tracking Specification"; var ReservationEntry: Record "Reservation Entry"): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnBeforeSetSourceSpec', '', false, false)]
local procedure DoSomethingOnBeforeSetSourceSpec(var TrackingSpecification: Record "Tracking Specification"; var ReservationEntry: Record "Reservation Entry")
begin
end;

Parameters:

  • TrackingSpecification: Source tracking specification
  • ReservationEntry: Related reservation entry

OnBeforeSetSecondSourceQuantity(Decimal) :#

Summary: Triggers before setting second source quantity array.

[IntegrationEvent(false, false)]
local procedure OnBeforeSetSecondSourceQuantity(var SecondSourceQuantityArray: Decimal): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnBeforeSetSecondSourceQuantity', '', false, false)]
local procedure DoSomethingOnBeforeSetSecondSourceQuantity(var SecondSourceQuantityArray: Decimal)
begin
end;

Parameters:

  • SecondSourceQuantityArray: Array of second source quantities

OnBeforeCollectTempTrackingSpecificationInsert(Record Tracking Specification, Record Item Ledger Entry, Record Tracking Specification) :#

Summary: Triggers before collecting temporary tracking specification for insertion.

[IntegrationEvent(false, false)]
local procedure OnBeforeCollectTempTrackingSpecificationInsert(var TempTrackingSpecification: Record "Tracking Specification" temporary; ItemLedgerEntry: Record "Item Ledger Entry"; var TrackingSpecification: Record "Tracking Specification"): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnBeforeCollectTempTrackingSpecificationInsert', '', false, false)]
local procedure DoSomethingOnBeforeCollectTempTrackingSpecificationInsert(var TempTrackingSpecification: Record "Tracking Specification" temporary; ItemLedgerEntry: Record "Item Ledger Entry"; var TrackingSpecification: Record "Tracking Specification")
begin
end;

Parameters:

  • TempTrackingSpecification: Temporary tracking specification being collected
  • ItemLedgerEntry: Related item ledger entry
  • TrackingSpecification: Source tracking specification

OnBeforeUpdateTrackingData(Record Tracking Specification, Record Tracking Specification, Record Tracking Specification, Integer, Decimal, Boolean) :#

Summary: Triggers before updating tracking data.

[IntegrationEvent(false, false)]
local procedure OnBeforeUpdateTrackingData(var TrackingSpecification: Record "Tracking Specification"; xTrackingSpecification: Record "Tracking Specification"; var TempxTrackingSpec: Record "Tracking Specification" temporary; CurrentSignFactor: Integer; var SourceQuantityArray: Decimal; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnBeforeUpdateTrackingData', '', false, false)]
local procedure DoSomethingOnBeforeUpdateTrackingData(var TrackingSpecification: Record "Tracking Specification"; xTrackingSpecification: Record "Tracking Specification"; var TempxTrackingSpec: Record "Tracking Specification" temporary; CurrentSignFactor: Integer; var SourceQuantityArray: Decimal; var IsHandled: Boolean)
begin
end;

Parameters:

  • TrackingSpecification: Current tracking specification
  • xTrackingSpecification: Previous tracking specification
  • TempxTrackingSpec: Temporary previous tracking specification
  • CurrentSignFactor: Current sign factor for calculations
  • SourceQuantityArray: Array of source quantities
  • IsHandled: Flag indicating if update was handled by extension

OnBeforeUpdateUndefinedQty(Record Tracking Specification, Record Tracking Specification, Decimal, Decimal, Boolean, Boolean) :#

Summary: Triggers before updating undefined quantity calculations.

[IntegrationEvent(false, false)]
local procedure OnBeforeUpdateUndefinedQty(var TrackingSpecification: Record "Tracking Specification"; var TotalItemTrackingSpecification: Record "Tracking Specification"; var UndefinedQtyArray: Decimal; var SourceQuantityArray: Decimal; var ReturnValue: Boolean; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnBeforeUpdateUndefinedQty', '', false, false)]
local procedure DoSomethingOnBeforeUpdateUndefinedQty(var TrackingSpecification: Record "Tracking Specification"; var TotalItemTrackingSpecification: Record "Tracking Specification"; var UndefinedQtyArray: Decimal; var SourceQuantityArray: Decimal; var ReturnValue: Boolean; var IsHandled: Boolean)
begin
end;

Parameters:

  • TrackingSpecification: Current tracking specification
  • TotalItemTrackingSpecification: Total item tracking specification
  • UndefinedQtyArray: Array of undefined quantities
  • SourceQuantityArray: Array of source quantities
  • ReturnValue: Return value of the update operation
  • IsHandled: Flag indicating if update was handled by extension

OnBeforeWriteToDatabase(Record Tracking Specification, Boolean) :#

Summary: Triggers before writing tracking data to database.

[IntegrationEvent(false, false)]
local procedure OnBeforeWriteToDatabase(var TrackingSpecification: Record "Tracking Specification"; var CurrentPageIsOpen: Boolean): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnBeforeWriteToDatabase', '', false, false)]
local procedure DoSomethingOnBeforeWriteToDatabase(var TrackingSpecification: Record "Tracking Specification"; var CurrentPageIsOpen: Boolean)
begin
end;

Parameters:

  • TrackingSpecification: Tracking specification to write
  • CurrentPageIsOpen: Flag indicating if current page is open

OnAddReservEntriesToTempRecSetOnBeforeInsert(Record Tracking Specification, Record Reservation Entry, Boolean, Integer) :#

Summary: Triggers before inserting reservation entries to temporary record set.

[IntegrationEvent(false, false)]
local procedure OnAddReservEntriesToTempRecSetOnBeforeInsert(var TempTrackingSpecification: Record "Tracking Specification" temporary; ReservationEntry: Record "Reservation Entry"; SwapSign: Boolean; Color: Integer): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnAddReservEntriesToTempRecSetOnBeforeInsert', '', false, false)]
local procedure DoSomethingOnAddReservEntriesToTempRecSetOnBeforeInsert(var TempTrackingSpecification: Record "Tracking Specification" temporary; ReservationEntry: Record "Reservation Entry"; SwapSign: Boolean; Color: Integer)
begin
end;

Parameters:

  • TempTrackingSpecification: Temporary tracking specification to insert
  • ReservationEntry: Source reservation entry
  • SwapSign: Flag indicating if sign should be swapped
  • Color: Color code for display

OnInsertRecordOnBeforeTempItemTrackLineInsert(Record Tracking Specification, Record Tracking Specification) :#

Summary: Triggers before inserting temporary item tracking line record.

[IntegrationEvent(false, false)]
local procedure OnInsertRecordOnBeforeTempItemTrackLineInsert(var TempTrackingSpecificationInsert: Record "Tracking Specification" temporary; var TempTrackingSpecification: Record "Tracking Specification" temporary): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnInsertRecordOnBeforeTempItemTrackLineInsert', '', false, false)]
local procedure DoSomethingOnInsertRecordOnBeforeTempItemTrackLineInsert(var TempTrackingSpecificationInsert: Record "Tracking Specification" temporary; var TempTrackingSpecification: Record "Tracking Specification" temporary)
begin
end;

Parameters:

  • TempTrackingSpecificationInsert: Temporary tracking specification for insertion
  • TempTrackingSpecification: Source temporary tracking specification

OnRegisterChangeOnAfterCreateReservEntry(Record Reservation Entry, Record Tracking Specification, Record Tracking Specification) :#

Summary: Triggers after creating reservation entry during change registration.

[IntegrationEvent(false, false)]
local procedure OnRegisterChangeOnAfterCreateReservEntry(var ReservEntry: Record "Reservation Entry"; TrackingSpecification: Record "Tracking Specification"; OldTrackingSpecification: Record "Tracking Specification"): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnRegisterChangeOnAfterCreateReservEntry', '', false, false)]
local procedure DoSomethingOnRegisterChangeOnAfterCreateReservEntry(var ReservEntry: Record "Reservation Entry"; TrackingSpecification: Record "Tracking Specification"; OldTrackingSpecification: Record "Tracking Specification")
begin
end;

Parameters:

  • ReservEntry: Created reservation entry
  • TrackingSpecification: Current tracking specification
  • OldTrackingSpecification: Previous tracking specification

OnRegisterChangeOnAfterFullDelete(Record Reservation Entry) :#

Summary: Triggers after full deletion of reservation entry during change registration.

[IntegrationEvent(false, false)]
local procedure OnRegisterChangeOnAfterFullDelete(var ReservEntry: Record "Reservation Entry"): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnRegisterChangeOnAfterFullDelete', '', false, false)]
local procedure DoSomethingOnRegisterChangeOnAfterFullDelete(var ReservEntry: Record "Reservation Entry")
begin
end;

Parameters:

  • ReservEntry: Deleted reservation entry

OnRegisterChangeOnAfterModify(Record Tracking Specification, Record Tracking Specification) :#

Summary: Triggers after modifying tracking specification during change registration.

[IntegrationEvent(false, false)]
local procedure OnRegisterChangeOnAfterModify(var NewTrackingSpecification: Record "Tracking Specification"; var OldTrackingSpecification: Record "Tracking Specification"): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnRegisterChangeOnAfterModify', '', false, false)]
local procedure DoSomethingOnRegisterChangeOnAfterModify(var NewTrackingSpecification: Record "Tracking Specification"; var OldTrackingSpecification: Record "Tracking Specification")
begin
end;

Parameters:

  • NewTrackingSpecification: Modified tracking specification
  • OldTrackingSpecification: Previous tracking specification

OnRegisterChangeOnChangeTypeModifyOnBeforeCheckEntriesAreIdentical(Record Reservation Entry, Record Reservation Entry, Record Tracking Specification, Record Tracking Specification, Boolean) :#

Summary: Triggers before checking if entries are identical during modify change type registration.

[IntegrationEvent(false, false)]
local procedure OnRegisterChangeOnChangeTypeModifyOnBeforeCheckEntriesAreIdentical(var ReservEntry1: Record "Reservation Entry"; var ReservEntry2: Record "Reservation Entry"; var OldTrackingSpecification: Record "Tracking Specification"; var NewTrackingSpecification: Record "Tracking Specification"; var IdenticalArray: Boolean): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnRegisterChangeOnChangeTypeModifyOnBeforeCheckEntriesAreIdentical', '', false, false)]
local procedure DoSomethingOnRegisterChangeOnChangeTypeModifyOnBeforeCheckEntriesAreIdentical(var ReservEntry1: Record "Reservation Entry"; var ReservEntry2: Record "Reservation Entry"; var OldTrackingSpecification: Record "Tracking Specification"; var NewTrackingSpecification: Record "Tracking Specification"; var IdenticalArray: Boolean)
begin
end;

Parameters:

  • ReservEntry1: First reservation entry to compare
  • ReservEntry2: Second reservation entry to compare
  • OldTrackingSpecification: Previous tracking specification
  • NewTrackingSpecification: New tracking specification
  • IdenticalArray: Array indicating which fields are identical

OnSelectEntriesOnAfterTransferFields(Record Tracking Specification, Record Tracking Specification) :#

Summary: Triggers after transferring fields during entry selection.

[IntegrationEvent(false, false)]
local procedure OnSelectEntriesOnAfterTransferFields(var TempTrackingSpec: Record "Tracking Specification" temporary; var TrackingSpecification: Record "Tracking Specification"): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnSelectEntriesOnAfterTransferFields', '', false, false)]
local procedure DoSomethingOnSelectEntriesOnAfterTransferFields(var TempTrackingSpec: Record "Tracking Specification" temporary; var TrackingSpecification: Record "Tracking Specification")
begin
end;

Parameters:

  • TempTrackingSpec: Temporary tracking specification
  • TrackingSpecification: Target tracking specification

OnSetQtyToHandleAndInvoiceOnBeforeReservEntryModify(Record Reservation Entry, Record Tracking Specification) :#

Summary: Triggers before modifying reservation entry during quantity to handle and invoice setting.

[IntegrationEvent(false, false)]
local procedure OnSetQtyToHandleAndInvoiceOnBeforeReservEntryModify(var ReservationEntry: Record "Reservation Entry"; TrackingSpecification: Record "Tracking Specification"): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnSetQtyToHandleAndInvoiceOnBeforeReservEntryModify', '', false, false)]
local procedure DoSomethingOnSetQtyToHandleAndInvoiceOnBeforeReservEntryModify(var ReservationEntry: Record "Reservation Entry"; TrackingSpecification: Record "Tracking Specification")
begin
end;

Parameters:

  • ReservationEntry: Reservation entry to modify
  • TrackingSpecification: Related tracking specification

OnSetQtyToHandleAndInvoiceOnBeforeTrackingSpecModify(Record Tracking Specification) :#

Summary: Triggers before modifying tracking specification during quantity to handle and invoice setting.

[IntegrationEvent(false, false)]
local procedure OnSetQtyToHandleAndInvoiceOnBeforeTrackingSpecModify(var TrackingSpecification: Record "Tracking Specification"): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnSetQtyToHandleAndInvoiceOnBeforeTrackingSpecModify', '', false, false)]
local procedure DoSomethingOnSetQtyToHandleAndInvoiceOnBeforeTrackingSpecModify(var TrackingSpecification: Record "Tracking Specification")
begin
end;

Parameters:

  • TrackingSpecification: Tracking specification to modify

OnSetSourceSpecOnAfterAssignCurrentEntryStatus(Record Tracking Specification, Option) :#

Summary: Triggers after assigning current entry status during source specification setting.

[IntegrationEvent(false, false)]
local procedure OnSetSourceSpecOnAfterAssignCurrentEntryStatus(var TrackingSpecification: Record "Tracking Specification"; var CurrentEntryStatus: Option): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnSetSourceSpecOnAfterAssignCurrentEntryStatus', '', false, false)]
local procedure DoSomethingOnSetSourceSpecOnAfterAssignCurrentEntryStatus(var TrackingSpecification: Record "Tracking Specification"; var CurrentEntryStatus: Option)
begin
end;

Parameters:

  • TrackingSpecification: Tracking specification with assigned status
  • CurrentEntryStatus: Assigned entry status

OnWriteToDatabaseOnBeforeRegisterDecrease(Record Tracking Specification) :#

Summary: Triggers before registering decrease during database write operation.

[IntegrationEvent(false, false)]
local procedure OnWriteToDatabaseOnBeforeRegisterDecrease(var TempTrackingSpecificationModify: Record "Tracking Specification" temporary): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnWriteToDatabaseOnBeforeRegisterDecrease', '', false, false)]
local procedure DoSomethingOnWriteToDatabaseOnBeforeRegisterDecrease(var TempTrackingSpecificationModify: Record "Tracking Specification" temporary)
begin
end;

Parameters:

  • TempTrackingSpecificationModify: Temporary tracking specification for modification

OnWriteToDatabaseOnBeforeRegisterInsert(Record Tracking Specification) :#

Summary: Triggers before registering insert during database write operation.

[IntegrationEvent(false, false)]
local procedure OnWriteToDatabaseOnBeforeRegisterInsert(var TempTrackingSpecificationInsert: Record "Tracking Specification" temporary): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnWriteToDatabaseOnBeforeRegisterInsert', '', false, false)]
local procedure DoSomethingOnWriteToDatabaseOnBeforeRegisterInsert(var TempTrackingSpecificationInsert: Record "Tracking Specification" temporary)
begin
end;

Parameters:

  • TempTrackingSpecificationInsert: Temporary tracking specification for insertion

OnAfterUpdateExpDateEditable(Record Tracking Specification, Boolean, Record Item Tracking Code, Boolean, Integer) :#

Summary: Triggers after updating expiration date editable status.

[IntegrationEvent(false, false)]
local procedure OnAfterUpdateExpDateEditable(var TrackingSpecification: Record "Tracking Specification"; var ExpirationDateEditable: Boolean; var ItemTrackingCode: Record "Item Tracking Code"; var NewExpirationDateEditable: Boolean; CurrentSignFactor: Integer): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnAfterUpdateExpDateEditable', '', false, false)]
local procedure DoSomethingOnAfterUpdateExpDateEditable(var TrackingSpecification: Record "Tracking Specification"; var ExpirationDateEditable: Boolean; var ItemTrackingCode: Record "Item Tracking Code"; var NewExpirationDateEditable: Boolean; CurrentSignFactor: Integer)
begin
end;

Parameters:

  • TrackingSpecification: Current tracking specification
  • ExpirationDateEditable: Current editable status
  • ItemTrackingCode: Item tracking code with settings
  • NewExpirationDateEditable: New editable status
  • CurrentSignFactor: Current sign factor for calculations

OnTestTempSpecificationExistsOnAfterSetFilters(Record Tracking Specification) :#

Summary: Triggers after setting filters during temporary specification existence test.

[IntegrationEvent(false, false)]
local procedure OnTestTempSpecificationExistsOnAfterSetFilters(var TrackingSpecification: Record "Tracking Specification"): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnTestTempSpecificationExistsOnAfterSetFilters', '', false, false)]
local procedure DoSomethingOnTestTempSpecificationExistsOnAfterSetFilters(var TrackingSpecification: Record "Tracking Specification")
begin
end;

Parameters:

  • TrackingSpecification: Tracking specification with applied filters

OnRegisterItemTrackingLinesOnAfterReclass(Record Tracking Specification, Record Tracking Specification) :#

Summary: Triggers after registering item tracking lines during reclassification.

[IntegrationEvent(false, false)]
local procedure OnRegisterItemTrackingLinesOnAfterReclass(var TrackingSpecification: Record "Tracking Specification"; TempTrackingSpecification: Record "Tracking Specification" temporary): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnRegisterItemTrackingLinesOnAfterReclass', '', false, false)]
local procedure DoSomethingOnRegisterItemTrackingLinesOnAfterReclass(var TrackingSpecification: Record "Tracking Specification"; TempTrackingSpecification: Record "Tracking Specification" temporary)
begin
end;

Parameters:

  • TrackingSpecification: Current tracking specification
  • TempTrackingSpecification: Temporary tracking specification for reclassification

OnRegisterChangeOnChangeTypeInsertOnBeforeInsertReservEntry(Record Tracking Specification, Record Tracking Specification, Record Tracking Specification, Option) :#

Summary: Triggers before inserting reservation entry during insert change type registration.

[IntegrationEvent(false, false)]
local procedure OnRegisterChangeOnChangeTypeInsertOnBeforeInsertReservEntry(var TrackingSpecification: Record "Tracking Specification"; var OldTrackingSpecification: Record "Tracking Specification"; var NewTrackingSpecification: Record "Tracking Specification"; FormRunMode: Option): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnRegisterChangeOnChangeTypeInsertOnBeforeInsertReservEntry', '', false, false)]
local procedure DoSomethingOnRegisterChangeOnChangeTypeInsertOnBeforeInsertReservEntry(var TrackingSpecification: Record "Tracking Specification"; var OldTrackingSpecification: Record "Tracking Specification"; var NewTrackingSpecification: Record "Tracking Specification"; FormRunMode: Option)
begin
end;

Parameters:

  • TrackingSpecification: Current tracking specification
  • OldTrackingSpecification: Previous tracking specification
  • NewTrackingSpecification: New tracking specification
  • FormRunMode: Current form run mode

OnWriteToDataOnBeforeCommit(Record Tracking Specification) :#

Summary: Triggers before committing data write operations.

[IntegrationEvent(false, false)]
local procedure OnWriteToDataOnBeforeCommit(var TrackingSpecification: Record "Tracking Specification"): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnWriteToDataOnBeforeCommit', '', false, false)]
local procedure DoSomethingOnWriteToDataOnBeforeCommit(var TrackingSpecification: Record "Tracking Specification")
begin
end;

Parameters:

  • TrackingSpecification: Tracking specification being written

OnQueryClosePageOnBeforeConfirmClosePage(Record Tracking Specification, Boolean) :#

Summary: Triggers before confirming page close during query close page operation.

[IntegrationEvent(false, false)]
local procedure OnQueryClosePageOnBeforeConfirmClosePage(var TrackingSpecification: Record "Tracking Specification"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnQueryClosePageOnBeforeConfirmClosePage', '', false, false)]
local procedure DoSomethingOnQueryClosePageOnBeforeConfirmClosePage(var TrackingSpecification: Record "Tracking Specification"; var IsHandled: Boolean)
begin
end;

Parameters:

  • TrackingSpecification: Current tracking specification
  • IsHandled: Flag indicating if close confirmation was handled by extension

OnBeforeRegisterItemTrackingLines() :#

Summary: Triggers before registering item tracking lines to database.

[IntegrationEvent(true, false)]
local procedure OnBeforeRegisterItemTrackingLines(): 
[EventSubscriber(ObjectType::Page, Page::"KVSFCYItemTrackingLines", 'OnBeforeRegisterItemTrackingLines', '', false, false)]
local procedure DoSomethingOnBeforeRegisterItemTrackingLines()
begin
end;

Protected Variables#

Item#

Type: Record Item

ItemTrackingCode#

Type: Record Item Tracking Code

ApplFromItemEntryVisible#

Type: Boolean

ApplToItemEntryVisible#

Type: Boolean

ButtonLineReclassVisible#

Type: Boolean

ButtonLineVisible#

Type: Boolean

DescriptionEditable#

Type: Boolean

ExpirationDateEditable#

Type: Boolean

FunctionsDemandVisible#

Type: Boolean

FunctionsSupplyVisible#

Type: Boolean

Handle1Visible#

Type: Boolean

Handle2Visible#

Type: Boolean

Handle3Visible#

Type: Boolean

InboundIsSet#

Type: Boolean

Invoice1Visible#

Type: Boolean

Invoice2Visible#

Type: Boolean

Invoice3Visible#

Type: Boolean

ItemNoEditable#

Type: Boolean

LocationCodeEditable#

Type: Boolean

LotNoEditable#

Type: Boolean

NewExpirationDateEditable#

Type: Boolean

NewExpirationDateVisible#

Type: Boolean

NewLotNoEditable#

Type: Boolean

NewLotNoVisible#

Type: Boolean

NewPackageNoEditable#

Type: Boolean

NewPackageNoVisible#

Type: Boolean

NewSerialNoEditable#

Type: Boolean

NewSerialNoVisible#

Type: Boolean

PackageNoEditable#

Type: Boolean

PackageNoVisible#

Type: Boolean

QtyToHandleBaseEditable#

Type: Boolean

QtyToHandleBaseVisible#

Type: Boolean

QtyToInvoiceBaseEditable#

Type: Boolean

QtyToInvoiceBaseVisible#

Type: Boolean

QuantityBaseEditable#

Type: Boolean

SerialNoEditable#

Type: Boolean

VariantCodeEditable#

Type: Boolean

WarrantyDateEditable#

Type: Boolean

SourceQuantityArray#

Type: Decimal

UndefinedQtyArray#

Type: Decimal

CurrentRunMode#

Type: Enum Item Tracking Run Mode

CurrentSourceType#

Type: Integer