ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/branches/udr/client/3.0/FB30Statement.pas
(Generate patch)

Comparing ibx/trunk/fbintf/client/3.0/FB30Statement.pas (file contents):
Revision 68 by tony, Tue Oct 17 10:07:58 2017 UTC vs.
Revision 209 by tony, Wed Mar 14 12:48:51 2018 UTC

# 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;
# Line 1305 | Line 1307 | begin
1307        FBOF := false;
1308        result := true;
1309      end;
1310 +    if FCollectStatistics then
1311 +    begin
1312 +      UtilIntf.getPerfCounters(StatusIntf,
1313 +                              (GetAttachment as TFB30Attachment).AttachmentIntf,
1314 +                              ISQL_COUNTERS,@FAfterStats);
1315 +      Check4DataBaseError;
1316 +      FStatisticsAvailable := true;
1317 +    end;
1318    end;
1319    FSQLRecord.RowChange;
1320    SignalActivity;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines