uses
System,
tiBaseObject,
Unit containing base class used by all tiOPF classes
tiQuery,
tiPool,
Classes,
Contnrs,
SysUtils,
SyncObjs;