| # | Line 1146 | Line 1146 | begin | |
|---|---|---|
| 1146 | RemoveMonitor(aTransaction as TFB30Transaction); | |
| 1147 | end; | |
| 1148 | FExecTransactionIntf := aTransaction; | |
| 1149 | + | FSQLRecord.FTransaction := (aTransaction as TFB30Transaction); |
| 1150 | + | FSQLRecord.FTransactionSeqNo := FSQLRecord.FTransaction.TransactionSeqNo; |
| 1151 | SignalActivity; | |
| 1152 | Inc(FChangeSeqNo); | |
| 1153 | end; | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |