# | Line 1099 | Line 1099 | begin | |
---|---|---|
1099 | tr := StartTransaction(TPB,taCommit); | |
1100 | try | |
1101 | ExecImmediate(tr,sql,aSQLDialect); | |
1102 | + | tr.Commit; |
1103 | except | |
1104 | tr.Rollback(true); | |
1105 | raise; |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |