TTransactionDesc = packed record
  TransactionID: LongWord;
  GlobalID: LongWord;
  IsolationLevel: TTransIsolationLevel;
  CustomIsolation: LongWord;
end;

struct TTransactionDesc {
  LongWord TransactionID;
  LongWord GlobalID;
  TTransIsolationLevel IsolationLevel;
  LongWord CustomIsolation;
};