unit Api.Ibase40;
{$DEFINE FPC_DOTTEDUNITS}
{$i ibase40.pp}