freepascal.compiler/packages/odata/utils/ras.pas

{
This unit has been produced by ws_helper.
  Input unit name : "System_Data_Resources_AnnotationSchema".
  This unit name  : "ras".
  Date            : "12-5-16 15:37:59".
}
unit ras;
{$IFDEF FPC}
  {$mode objfpc} {$H+}
{$ENDIF}
{$DEFINE WST_RECORD_RTTI}
interface

uses SysUtils, Classes, TypInfo, base_service_intf, service_intf;

const
  sNAME_SPACE = 'http://schemas.microsoft.com/ado/2009/02/edm/annotation';
  sUNIT_NAME = 'System_Data_Resources_AnnotationSchema';

type


  TStoreGeneratedPattern = ( 
    None
    ,Identity
    ,Computed
  );

  StoreGeneratedPattern_Type = TStoreGeneratedPattern;

  LazyLoadingEnabled_Type = boolean;

Implementation
uses metadata_repository, record_rtti;


var
  typeRegistryInstance : TTypeRegistry = nil;
initialization
  typeRegistryInstance := GetTypeRegistry();

  typeRegistryInstance.Register(sNAME_SPACE,TypeInfo(TStoreGeneratedPattern),'TStoreGeneratedPattern');



End.