unit EERModel_XML_ERwin41_Import;

//----------------------------------------------------------------------------------------------------------------------
//
// This file is part of fabFORCE DBDesigner4.
// Copyright (C) 2002 Michael G. Zinner, www.fabFORCE.net
//
// DBDesigner4 is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// DBDesigner4 is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with DBDesigner4; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
//
//----------------------------------------------------------------------------------------------------------------------
//
// Unit EERModel_XML_ERwin41_Import.pas
// ------------------------------------
// Version 1.0, 03.05.2003, Mike
// Description
//   Contains the XML Data Binding for the ERwin41 Import
//
// Changes:
//   Version 1.0, 03.05.2003, Mike
//     initial version, Mike
//
//----------------------------------------------------------------------------------------------------------------------

interface

uses xmldom, XMLDoc, XMLIntf;

type

{ Forward Decls }

  IXMLERwin4Type = interface;
  IXMLModelType = interface;
  IXMLModelPropsType = interface;
  IXMLType_ = interface;
  IXMLFile_NameType = interface;
  IXMLFile_FormatType = interface;
  IXMLTarget_ServerType = interface;
  IXMLDBMS_VersionType = interface;
  IXMLDBMS_Minor_VersionType = interface;
  IXMLEntity_GroupsType = interface;
  IXMLEntityType = interface;
  IXMLEntityPropsType = interface;
  IXMLAttribute_GroupsType = interface;
  IXMLAttributeType = interface;
  IXMLAttributePropsType = interface;
  IXMLMaster_AttributeType = interface;
  IXMLHistory_Information_GroupsType = interface;
  IXMLHistory_InformationType = interface;
  IXMLHistory_InformationPropsType = interface;
  IXMLDefault_Object_Alternative_IdType = interface;
  IXMLKey_Group_GroupsType = interface;
  IXMLKey_GroupType = interface;
  IXMLKey_GroupPropsType = interface;
  IXMLKey_Group_Member_GroupsType = interface;
  IXMLKey_Group_MemberType = interface;
  IXMLKey_Group_MemberPropsType = interface;
  IXMLDomain_GroupsType = interface;
  IXMLDomainType = interface;
  IXMLDomainPropsType = interface;
  IXMLPhysical_Domain_NameType = interface;
  IXMLParent_DomainType = interface;
  IXMLBitmap_GroupsType = interface;
  IXMLBitmapType = interface;
  IXMLBitmapPropsType = interface;
  IXMLBitmap_DIB_SizeType = interface;
  IXMLBitmap_DIB_HandleType = interface;
  IXMLFlagsType = interface;
  IXMLImage_IndexType = interface;
  IXMLSubject_Area_GroupsType = interface;
  IXMLSubject_AreaType = interface;
  IXMLSubject_AreaPropsType = interface;
  IXMLNameType = interface;
  IXMLReferenced_EntitiesType = interface;
  IXMLReferenced_EntitiesTypeList = interface;
  IXMLReferenced_RelationshipsType = interface;
  IXMLReferenced_RelationshipsTypeList = interface;
  IXMLStored_Display_GroupsType = interface;
  IXMLStored_DisplayType = interface;
  IXMLStored_DisplayPropsType = interface;
  IXMLDrawing_Object_Entity_GroupsType = interface;
  IXMLDrawing_Object_EntityType = interface;
  IXMLDrawing_Object_EntityPropsType = interface;
  IXMLDrawing_Object_Relationship_GroupsType = interface;
  IXMLDrawing_Object_RelationshipType = interface;
  IXMLDrawing_Object_RelationshipPropsType = interface;
  IXMLRelationship_GroupsType = interface;
  IXMLRelationshipType = interface;
  IXMLRelationshipPropsType = interface;
  IXMLDefault_Value_GroupsType = interface;
  IXMLDefault_ValueType = interface;
  IXMLDefault_ValuePropsType = interface;
  IXMLTrigger_Template_GroupsType = interface;
  IXMLTrigger_TemplateType = interface;
  IXMLTrigger_TemplatePropsType = interface;
  IXMLTemplate_CodeType = interface;
  IXMLDefault_Trigger_Template_GroupsType = interface;
  IXMLDefault_Trigger_TemplateType = interface;
  IXMLDefault_Trigger_TemplatePropsType = interface;
  IXMLTemplate_Purpose_TextType = interface;
  IXMLTemplate_PurposeType = interface;
  IXMLName_Mapping_GroupsType = interface;
  IXMLName_MappingType = interface;
  IXMLName_MappingPropsType = interface;
  IXMLNaming_Options_GroupsType = interface;
  IXMLNaming_OptionsType = interface;
  IXMLNaming_OptionsPropsType = interface;
  IXMLPhysical_OnlyType = interface;
  IXMLLogical_OnlyType = interface;
  IXMLString_List = interface;

{ IXMLERwin4Type }

  IXMLERwin4Type = interface(IXMLNode)
    ['{86FB8222-FC26-4D47-B8DF-C0FC451C4C67}']
    { Property Accessors }
    function Get_FileVersion: Integer;
    function Get_Model: IXMLModelType;
    procedure Set_FileVersion(Value: Integer);
    { Methods & Properties }
    property FileVersion: Integer read Get_FileVersion write Set_FileVersion;
    property Model: IXMLModelType read Get_Model;
  end;

{ IXMLModelType }

  IXMLModelType = interface(IXMLNode)
    ['{904B28E4-8D8F-407C-B353-3086C74CAD78}']
    { Property Accessors }
    function Get_Id: WideString;
    function Get_ModelType: Integer;
    function Get_TargetServer: Integer;
    function Get_DBMSVersion: Integer;
    function Get_DBMSMinorVersion: Integer;
    function Get_ModelProps: IXMLModelPropsType;
    function Get_Entity_Groups: IXMLEntity_GroupsType;
    function Get_Domain_Groups: IXMLDomain_GroupsType;
    function Get_Bitmap_Groups: IXMLBitmap_GroupsType;
    function Get_Subject_Area_Groups: IXMLSubject_Area_GroupsType;
    function Get_Relationship_Groups: IXMLRelationship_GroupsType;
    function Get_Default_Value_Groups: IXMLDefault_Value_GroupsType;
    function Get_Trigger_Template_Groups: IXMLTrigger_Template_GroupsType;
    function Get_Default_Trigger_Template_Groups: IXMLDefault_Trigger_Template_GroupsType;
    function Get_Name_Mapping_Groups: IXMLName_Mapping_GroupsType;
    function Get_Naming_Options_Groups: IXMLNaming_Options_GroupsType;
    function Get_History_Information_Groups: IXMLHistory_Information_GroupsType;
    procedure Set_Id(Value: WideString);
    procedure Set_ModelType(Value: Integer);
    procedure Set_TargetServer(Value: Integer);
    procedure Set_DBMSVersion(Value: Integer);
    procedure Set_DBMSMinorVersion(Value: Integer);
    { Methods & Properties }
    property Id: WideString read Get_Id write Set_Id;
    property ModelType: Integer read Get_ModelType write Set_ModelType;
    property TargetServer: Integer read Get_TargetServer write Set_TargetServer;
    property DBMSVersion: Integer read Get_DBMSVersion write Set_DBMSVersion;
    property DBMSMinorVersion: Integer read Get_DBMSMinorVersion write Set_DBMSMinorVersion;
    property ModelProps: IXMLModelPropsType read Get_ModelProps;
    property Entity_Groups: IXMLEntity_GroupsType read Get_Entity_Groups;
    property Domain_Groups: IXMLDomain_GroupsType read Get_Domain_Groups;
    property Bitmap_Groups: IXMLBitmap_GroupsType read Get_Bitmap_Groups;
    property Subject_Area_Groups: IXMLSubject_Area_GroupsType read Get_Subject_Area_Groups;
    property Relationship_Groups: IXMLRelationship_GroupsType read Get_Relationship_Groups;
    property Default_Value_Groups: IXMLDefault_Value_GroupsType read Get_Default_Value_Groups;
    property Trigger_Template_Groups: IXMLTrigger_Template_GroupsType read Get_Trigger_Template_Groups;
    property Default_Trigger_Template_Groups: IXMLDefault_Trigger_Template_GroupsType read Get_Default_Trigger_Template_Groups;
    property Name_Mapping_Groups: IXMLName_Mapping_GroupsType read Get_Name_Mapping_Groups;
    property Naming_Options_Groups: IXMLNaming_Options_GroupsType read Get_Naming_Options_Groups;
    property History_Information_Groups: IXMLHistory_Information_GroupsType read Get_History_Information_Groups;
  end;

{ IXMLModelPropsType }

  IXMLModelPropsType = interface(IXMLNode)
    ['{171957A4-167A-4A8A-A21D-35BE42537D7B}']
    { Property Accessors }
    function Get_Name: WideString;
    function Get_Type_: IXMLType_;
    function Get_Tracking_History_Objects: WideString;
    function Get_Tracking_History_Events: WideString;
    function Get_File_Name: IXMLFile_NameType;
    function Get_Page_Grid: Integer;
    function Get_File_Format: IXMLFile_FormatType;
    function Get_Entity_Width: Integer;
    function Get_Entity_Height: Integer;
    function Get_Layout_Grid: Integer;
    function Get_Layout_Grid_X: Integer;
    function Get_Layout_Grid_Y: Integer;
    function Get_Font_Height: Integer;
    function Get_Font_Width: Integer;
    function Get_Unique_Names: Integer;
    function Get_Target_Server: IXMLTarget_ServerType;
    function Get_Default_Datatype: WideString;
    function Get_Non_Key_Null: Integer;
    function Get_Default_Fonts_and_Colors: WideString;
    function Get_Repos: Integer;
    function Get_DBMS_Version: IXMLDBMS_VersionType;
    function Get_Logical_Notation: Integer;
    function Get_DBMS_Minor_Version: IXMLDBMS_Minor_VersionType;
    function Get_Old_Repos: Integer;
    function Get_Max_View_Expr_Display_Len: Integer;
    function Get_Physical_Notation: Integer;
    function Get_Index_Name_Macro: WideString;
    function Get_Max_Def_Display_Len: Integer;
    function Get_Table_Name_Macro: WideString;
    function Get_Current_Tool: WideString;
    function Get_MM_Preview: WideString;
    function Get_Saved_From_Previous_Version: WideString;
    function Get_WYSIWYG_Print: WideString;
    function Get_Model_Background_Color: Integer;
    procedure Set_Name(Value: WideString);
    procedure Set_Tracking_History_Objects(Value: WideString);
    procedure Set_Tracking_History_Events(Value: WideString);
    procedure Set_Page_Grid(Value: Integer);
    procedure Set_Entity_Width(Value: Integer);
    procedure Set_Entity_Height(Value: Integer);
    procedure Set_Layout_Grid(Value: Integer);
    procedure Set_Layout_Grid_X(Value: Integer);
    procedure Set_Layout_Grid_Y(Value: Integer);
    procedure Set_Font_Height(Value: Integer);
    procedure Set_Font_Width(Value: Integer);
    procedure Set_Unique_Names(Value: Integer);
    procedure Set_Default_Datatype(Value: WideString);
    procedure Set_Non_Key_Null(Value: Integer);
    procedure Set_Default_Fonts_and_Colors(Value: WideString);
    procedure Set_Repos(Value: Integer);
    procedure Set_Logical_Notation(Value: Integer);
    procedure Set_Old_Repos(Value: Integer);
    procedure Set_Max_View_Expr_Display_Len(Value: Integer);
    procedure Set_Physical_Notation(Value: Integer);
    procedure Set_Index_Name_Macro(Value: WideString);
    procedure Set_Max_Def_Display_Len(Value: Integer);
    procedure Set_Table_Name_Macro(Value: WideString);
    procedure Set_Current_Tool(Value: WideString);
    procedure Set_MM_Preview(Value: WideString);
    procedure Set_Saved_From_Previous_Version(Value: WideString);
    procedure Set_WYSIWYG_Print(Value: WideString);
    procedure Set_Model_Background_Color(Value: Integer);
    { Methods & Properties }
    property Name: WideString read Get_Name write Set_Name;
    property Type_: IXMLType_ read Get_Type_;
    property Tracking_History_Objects: WideString read Get_Tracking_History_Objects write Set_Tracking_History_Objects;
    property Tracking_History_Events: WideString read Get_Tracking_History_Events write Set_Tracking_History_Events;
    property File_Name: IXMLFile_NameType read Get_File_Name;
    property Page_Grid: Integer read Get_Page_Grid write Set_Page_Grid;
    property File_Format: IXMLFile_FormatType read Get_File_Format;
    property Entity_Width: Integer read Get_Entity_Width write Set_Entity_Width;
    property Entity_Height: Integer read Get_Entity_Height write Set_Entity_Height;
    property Layout_Grid: Integer read Get_Layout_Grid write Set_Layout_Grid;
    property Layout_Grid_X: Integer read Get_Layout_Grid_X write Set_Layout_Grid_X;
    property Layout_Grid_Y: Integer read Get_Layout_Grid_Y write Set_Layout_Grid_Y;
    property Font_Height: Integer read Get_Font_Height write Set_Font_Height;
    property Font_Width: Integer read Get_Font_Width write Set_Font_Width;
    property Unique_Names: Integer read Get_Unique_Names write Set_Unique_Names;
    property Target_Server: IXMLTarget_ServerType read Get_Target_Server;
    property Default_Datatype: WideString read Get_Default_Datatype write Set_Default_Datatype;
    property Non_Key_Null: Integer read Get_Non_Key_Null write Set_Non_Key_Null;
    property Default_Fonts_and_Colors: WideString read Get_Default_Fonts_and_Colors write Set_Default_Fonts_and_Colors;
    property Repos: Integer read Get_Repos write Set_Repos;