PURCHASE
DataSource;
    taPoprec1PORDTYPE: TStringField;
    taPoprec1ORDNO: TFloatField;
    taPoprec1PODATE: TDateField;
    taPoprec1DUEDATE: TDateField;
    taPoprec1ORDSTATUS: TStringField;
    taPoprec1ORDERBY: TStringField;
    taPoprec1ACREF: TStringField;
    taPoprec1NAME: TStringField;
    taPoprec1ADDRESS1: TStringField;
    taPoprec1ADDRESS2: TStringField;
    taPoprec1ADDRESS3: TStringField;
    taPoprec1ADDRESS4: TStringField;
    taPoprec1TELNO: TStringField;
    taPoprec1DELNAME: TStr