EndTransaction Event

Fires whenever a control segment is read that marks the end of a transaction.

Syntax

type TEndTransactionEvent = procedure EndTransaction(Sender: TObject; const Tag: String; const ControlNumber: String; Count: Integer; const FullSegment: String) of object;

property OnEndTransaction: TEndTransactionEvent read FOnEndTransaction write FOnEndTransaction;

Remarks

The EndTransaction event will fire when a control segment marking the end of a transaction is read. The Tag parameter contains the tag of the segment, such as SE. ControlNumber contains the control number associated with the segment, and links this event with the corresponding StartTransaction event. Count contains the value of the count element included in the closing segment, which identifies the number of segments in a transaction set.