--- oup/current/DataAccess/DataAccess.pas	2007/06/19 22:06:10	227
+++ oup/current/DataAccess/DataAccess.pas	2007/07/17 22:27:16	241
@@ -24,7 +24,7 @@ type
     property ChangeRights: TChangeRights read FChangeRights;
     property MetaData:     TMetaManager read FMeta;
 
-    constructor Create(FileName: String; ConnectionID: Integer; var Msg: TStatusMessages); virtual; abstract;
+    constructor Create(FileName: String; ConnectionID: Integer; var Msg: TStatusMessages); virtual;
     procedure Close; virtual; abstract;
 
     function ExtractFileIDOfName(Name: String): Integer; virtual;
@@ -49,6 +49,7 @@ type
     function GetDatLink(FileID, DatOffset: Integer): TDatLink; virtual; abstract;
     function GetRawList(FileID: Integer): TRawDataList; virtual; abstract;
     function GetRawInfo(FileID, DatOffset: Integer): TRawDataInfo; virtual; abstract;
+    function GetRawsForType(RawType: String): TRawDataList; virtual; abstract;
 
     procedure LoadRawFile(FileID, DatOffset: Integer; var Target: TStream); overload; virtual; abstract;
     procedure LoadRawFile(FileID, DatOffset: Integer; var Target: TByteData); overload;
@@ -75,6 +76,14 @@ implementation
  Implementation of TDataAccess
 *)
 
+constructor TDataAccess.Create(FileName: String; ConnectionID: Integer;
+  var Msg: TStatusMessages);
+begin
+  FMeta := TMetaManager.Create(FConnectionID, Self);
+end;
+
+
+
 function TDataAccess.ExtractFileIDOfName(Name: String): Integer;
 begin
   if Name[5] = '-' then