www.pudn.com > transfox.rar > data.pas

unit data; 
 
interface 
 
uses 
  SysUtils, Classes, DB, DBTables; 
 
type 
  TDM = class(TDataModule) 
    Database1: TDatabase; 
    Q_sickcase: TQuery; 
    DS_sickcaes: TDataSource; 
    Q_brows: TQuery; 
    DS_brows: TDataSource; 
    BtchMv_sickcase: TBatchMove; 
    Q_source: TQuery; 
    Tbl_dest: TTable; 
    Database_hmrs: TDatabase; 
    Q_delete: TQuery; 
    DS_fox: TDataSource; 
    Q_fox: TQuery; 
    Q_ks: TQuery; 
    Tbl_source: TTable; 
  private 
    { Private declarations } 
  public 
    { Public declarations } 
  end; 
 
var 
  DM: TDM; 
 
implementation 
 
{$R *.dfm} 
 
end.