# | Line 1046 | Line 1046 | begin | |
---|---|---|
1046 | RemoveMonitor(aTransaction as TFB25Transaction); | |
1047 | end; | |
1048 | FExecTransactionIntf := aTransaction; | |
1049 | + | FSQLRecord.FTransaction := aTransaction as TFB25Transaction; |
1050 | + | FSQLRecord.FTransactionSeqNo := FSQLRecord.FTransaction.TransactionSeqNo; |
1051 | Inc(FChangeSeqNo); | |
1052 | end; | |
1053 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |