unit googleandroidenterprise;
{$MODE objfpc}
{$H+}

interface

uses sysutils, classes, googleservice, restbase, googlebase;

type
  
  //Top-level schema types
  TAppRestrictionsSchema = Class;
  TAppRestrictionsSchemaRestriction = Class;
  TAppRestrictionsSchemaRestrictionRestrictionValue = Class;
  TAppVersion = Class;
  TApprovalUrlInfo = Class;
  TCollection = Class;
  TCollectionViewersListResponse = Class;
  TCollectionsListResponse = Class;
  TDevice = Class;
  TDeviceState = Class;
  TDevicesListResponse = Class;
  TEnterprise = Class;
  TEnterpriseAccount = Class;
  TEnterprisesListResponse = Class;
  TEnterprisesSendTestPushNotificationResponse = Class;
  TEntitlement = Class;
  TEntitlementsListResponse = Class;
  TGroupLicense = Class;
  TGroupLicenseUsersListResponse = Class;
  TGroupLicensesListResponse = Class;
  TInstall = Class;
  TInstallsListResponse = Class;
  TLocalizedText = Class;
  TPageInfo = Class;
  TPermission = Class;
  TProduct = Class;
  TProductPermission = Class;
  TProductPermissions = Class;
  TProductSet = Class;
  TProductsApproveRequest = Class;
  TProductsGenerateApprovalUrlResponse = Class;
  TProductsListResponse = Class;
  TStoreCluster = Class;
  TStoreLayout = Class;
  TStoreLayoutClustersListResponse = Class;
  TStoreLayoutPagesListResponse = Class;
  TStorePage = Class;
  TTokenPagination = Class;
  TUser = Class;
  TUserToken = Class;
  TUsersListResponse = Class;
  TAppRestrictionsSchemaArray = Array of TAppRestrictionsSchema;
  TAppRestrictionsSchemaRestrictionArray = Array of TAppRestrictionsSchemaRestriction;
  TAppRestrictionsSchemaRestrictionRestrictionValueArray = Array of TAppRestrictionsSchemaRestrictionRestrictionValue;
  TAppVersionArray = Array of TAppVersion;
  TApprovalUrlInfoArray = Array of TApprovalUrlInfo;
  TCollectionArray = Array of TCollection;
  TCollectionViewersListResponseArray = Array of TCollectionViewersListResponse;
  TCollectionsListResponseArray = Array of TCollectionsListResponse;
  TDeviceArray = Array of TDevice;
  TDeviceStateArray = Array of TDeviceState;
  TDevicesListResponseArray = Array of TDevicesListResponse;
  TEnterpriseArray = Array of TEnterprise;
  TEnterpriseAccountArray = Array of TEnterpriseAccount;
  TEnterprisesListResponseArray = Array of TEnterprisesListResponse;
  TEnterprisesSendTestPushNotificationResponseArray = Array of TEnterprisesSendTestPushNotificationResponse;
  TEntitlementArray = Array of TEntitlement;
  TEntitlementsListResponseArray = Array of TEntitlementsListResponse;
  TGroupLicenseArray = Array of TGroupLicense;
  TGroupLicenseUsersListResponseArray = Array of TGroupLicenseUsersListResponse;
  TGroupLicensesListResponseArray = Array of TGroupLicensesListResponse;
  TInstallArray = Array of TInstall;
  TInstallsListResponseArray = Array of TInstallsListResponse;
  TLocalizedTextArray = Array of TLocalizedText;
  TPageInfoArray = Array of TPageInfo;
  TPermissionArray = Array of TPermission;
  TProductArray = Array of TProduct;
  TProductPermissionArray = Array of TProductPermission;
  TProductPermissionsArray = Array of TProductPermissions;
  TProductSetArray = Array of TProductSet;
  TProductsApproveRequestArray = Array of TProductsApproveRequest;
  TProductsGenerateApprovalUrlResponseArray = Array of TProductsGenerateApprovalUrlResponse;
  TProductsListResponseArray = Array of TProductsListResponse;
  TStoreClusterArray = Array of TStoreCluster;
  TStoreLayoutArray = Array of TStoreLayout;
  TStoreLayoutClustersListResponseArray = Array of TStoreLayoutClustersListResponse;
  TStoreLayoutPagesListResponseArray = Array of TStoreLayoutPagesListResponse;
  TStorePageArray = Array of TStorePage;
  TTokenPaginationArray = Array of TTokenPagination;
  TUserArray = Array of TUser;
  TUserTokenArray = Array of TUserToken;
  TUsersListResponseArray = Array of TUsersListResponse;
  //Anonymous types, using auto-generated names
  TAppRestrictionsSchemaTyperestrictionsArray = Array of TAppRestrictionsSchemaRestriction;
  TCollectionViewersListResponseTypeuserArray = Array of TUser;
  TCollectionsListResponseTypecollectionArray = Array of TCollection;
  TDevicesListResponseTypedeviceArray = Array of TDevice;
  TEnterprisesListResponseTypeenterpriseArray = Array of TEnterprise;
  TEntitlementsListResponseTypeentitlementArray = Array of TEntitlement;
  TGroupLicenseUsersListResponseTypeuserArray = Array of TUser;
  TGroupLicensesListResponseTypegroupLicenseArray = Array of TGroupLicense;
  TInstallsListResponseTypeinstallArray = Array of TInstall;
  TProductTypeappVersionArray = Array of TAppVersion;
  TProductPermissionsTypepermissionArray = Array of TProductPermission;
  TProductsListResponseTypeproductArray = Array of TProduct;
  TStoreClusterTypenameArray = Array of TLocalizedText;
  TStoreLayoutClustersListResponseTypeclusterArray = Array of TStoreCluster;
  TStoreLayoutPagesListResponseTypepageArray = Array of TStorePage;
  TStorePageTypenameArray = Array of TLocalizedText;
  TUsersListResponseTypeuserArray = Array of TUser;
  
  { --------------------------------------------------------------------
    TAppRestrictionsSchema
    --------------------------------------------------------------------}
  
  TAppRestrictionsSchema = Class(TGoogleBaseObject)
  Private
    Fkind : String;
    Frestrictions : TAppRestrictionsSchemaTyperestrictionsArray;
  Protected
    //Property setters
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    Procedure Setrestrictions(AIndex : Integer; const AValue : TAppRestrictionsSchemaTyperestrictionsArray); virtual;
    //2.6.4. bug workaround
    {$IFDEF VER2_6}
    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
    {$ENDIF VER2_6}
  Public
  Published
    Property kind : String Index 0 Read Fkind Write Setkind;
    Property restrictions : TAppRestrictionsSchemaTyperestrictionsArray Index 8 Read Frestrictions Write Setrestrictions;
  end;
  TAppRestrictionsSchemaClass = Class of TAppRestrictionsSchema;
  
  { --------------------------------------------------------------------
    TAppRestrictionsSchemaRestriction
    --------------------------------------------------------------------}
  
  TAppRestrictionsSchemaRestriction = Class(TGoogleBaseObject)
  Private
    FdefaultValue : TAppRestrictionsSchemaRestrictionRestrictionValue;
    Fdescription : String;
    Fentry : TStringArray;
    FentryValue : TStringArray;
    Fkey : String;
    FrestrictionType : String;
    Ftitle : String;
  Protected
    //Property setters
    Procedure SetdefaultValue(AIndex : Integer; const AValue : TAppRestrictionsSchemaRestrictionRestrictionValue); virtual;
    Procedure Setdescription(AIndex : Integer; const AValue : String); virtual;
    Procedure Setentry(AIndex : Integer; const AValue : TStringArray); virtual;
    Procedure SetentryValue(AIndex : Integer; const AValue : TStringArray); virtual;
    Procedure Setkey(AIndex : Integer; const AValue : String); virtual;
    Procedure SetrestrictionType(AIndex : Integer; const AValue : String); virtual;
    Procedure Settitle(AIndex : Integer; const AValue : String); virtual;
    //2.6.4. bug workaround
    {$IFDEF VER2_6}
    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
    {$ENDIF VER2_6}
  Public
  Published
    Property defaultValue : TAppRestrictionsSchemaRestrictionRestrictionValue Index 0 Read FdefaultValue Write SetdefaultValue;
    Property description : String Index 8 Read Fdescription Write Setdescription;
    Property entry : TStringArray Index 16 Read Fentry Write Setentry;
    Property entryValue : TStringArray Index 24 Read FentryValue Write SetentryValue;
    Property key : String Index 32 Read Fkey Write Setkey;
    Property restrictionType : String Index 40 Read FrestrictionType Write SetrestrictionType;
    Property title : String Index 48 Read Ftitle Write Settitle;
  end;
  TAppRestrictionsSchemaRestrictionClass = Class of TAppRestrictionsSchemaRestriction;
  
  { --------------------------------------------------------------------
    TAppRestrictionsSchemaRestrictionRestrictionValue
    --------------------------------------------------------------------}
  
  TAppRestrictionsSchemaRestrictionRestrictionValue = Class(TGoogleBaseObject)
  Private
    F_type : String;
    FvalueBool : boolean;
    FvalueInteger : integer;
    FvalueMultiselect : TStringArray;
    FvalueString : String;
  Protected
    Class Function ExportPropertyName(Const AName : String) : string; override;
    //Property setters
    Procedure Set_type(AIndex : Integer; const AValue : String); virtual;
    Procedure SetvalueBool(AIndex : Integer; const AValue : boolean); virtual;
    Procedure SetvalueInteger(AIndex : Integer; const AValue : integer); virtual;
    Procedure SetvalueMultiselect(AIndex : Integer; const AValue : TStringArray); virtual;
    Procedure SetvalueString(AIndex : Integer; const AValue : String); virtual;
    //2.6.4. bug workaround
    {$IFDEF VER2_6}
    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
    {$ENDIF VER2_6}
  Public
  Published
    Property _type : String Index 0 Read F_type Write Set_type;
    Property valueBool : boolean Index 8 Read FvalueBool Write SetvalueBool;
    Property valueInteger : integer Index 16 Read FvalueInteger Write SetvalueInteger;
    Property valueMultiselect : TStringArray Index 24 Read FvalueMultiselect Write SetvalueMultiselect;
    Property valueString : String Index 32 Read FvalueString Write SetvalueString;
  end;
  TAppRestrictionsSchemaRestrictionRestrictionValueClass = Class of TAppRestrictionsSchemaRestrictionRestrictionValue;
  
  { --------------------------------------------------------------------
    TAppVersion
    --------------------------------------------------------------------}
  
  TAppVersion = Class(TGoogleBaseObject)
  Private
    FversionCode : integer;
    FversionString : String;
  Protected
    //Property setters
    Procedure SetversionCode(AIndex : Integer; const AValue : integer); virtual;
    Procedure SetversionString(AIndex : Integer; const AValue : String); virtual;
  Public
  Published
    Property versionCode : integer Index 0 Read FversionCode Write SetversionCode;
    Property versionString : String Index 8 Read FversionString Write SetversionString;
  end;
  TAppVersionClass = Class of TAppVersion;
  
  { --------------------------------------------------------------------
    TApprovalUrlInfo
    --------------------------------------------------------------------}
  
  TApprovalUrlInfo = Class(TGoogleBaseObject)
  Private
    FapprovalUrl : String;
    Fkind : String;
  Protected
    //Property setters
    Procedure SetapprovalUrl(AIndex : Integer; const AValue : String); virtual;
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
  Public
  Published
    Property approvalUrl : String Index 0 Read FapprovalUrl Write SetapprovalUrl;
    Property kind : String Index 8 Read Fkind Write Setkind;
  end;
  TApprovalUrlInfoClass = Class of TApprovalUrlInfo;
  
  { --------------------------------------------------------------------
    TCollection
    --------------------------------------------------------------------}
  
  TCollection = Class(TGoogleBaseObject)
  Private
    FcollectionId : String;
    Fkind : String;
    Fname : String;
    FproductId : TStringArray;
    Fvisibility : String;
  Protected
    //Property setters
    Procedure SetcollectionId(AIndex : Integer; const AValue : String); virtual;
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    Procedure Setname(AIndex : Integer; const AValue : String); virtual;
    Procedure SetproductId(AIndex : Integer; const AValue : TStringArray); virtual;
    Procedure Setvisibility(AIndex : Integer; const AValue : String); virtual;
    //2.6.4. bug workaround
    {$IFDEF VER2_6}
    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
    {$ENDIF VER2_6}
  Public
  Published
    Property collectionId : String Index 0 Read FcollectionId Write SetcollectionId;
    Property kind : String Index 8 Read Fkind Write Setkind;
    Property name : String Index 16 Read Fname Write Setname;
    Property productId : TStringArray Index 24 Read FproductId Write SetproductId;
    Property visibility : String Index 32 Read Fvisibility Write Setvisibility;
  end;
  TCollectionClass = Class of TCollection;
  
  { --------------------------------------------------------------------
    TCollectionViewersListResponse
    --------------------------------------------------------------------}
  
  TCollectionViewersListResponse = Class(TGoogleBaseObject)
  Private
    Fkind : String;
    Fuser : TCollectionViewersListResponseTypeuserArray;
  Protected
    //Property setters
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    Procedure Setuser(AIndex : Integer; const AValue : TCollectionViewersListResponseTypeuserArray); virtual;
    //2.6.4. bug workaround
    {$IFDEF VER2_6}
    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
    {$ENDIF VER2_6}
  Public
  Published
    Property kind : String Index 0 Read Fkind Write Setkind;
    Property user : TCollectionViewersListResponseTypeuserArray Index 8 Read Fuser Write Setuser;
  end;
  TCollectionViewersListResponseClass = Class of TCollectionViewersListResponse;
  
  { --------------------------------------------------------------------
    TCollectionsListResponse
    --------------------------------------------------------------------}
  
  TCollectionsListResponse = Class(TGoogleBaseObject)
  Private
    Fcollection : TCollectionsListResponseTypecollectionArray;
    Fkind : String;
  Protected
    //Property setters
    Procedure Setcollection(AIndex : Integer; const AValue : TCollectionsListResponseTypecollectionArray); virtual;
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    //2.6.4. bug workaround
    {$IFDEF VER2_6}
    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
    {$ENDIF VER2_6}
  Public
  Published
    Property collection : TCollectionsListResponseTypecollectionArray Index 0 Read Fcollection Write Setcollection;
    Property kind : String Index 8 Read Fkind Write Setkind;
  end;
  TCollectionsListResponseClass = Class of TCollectionsListResponse;
  
  { --------------------------------------------------------------------
    TDevice
    --------------------------------------------------------------------}
  
  TDevice = Class(TGoogleBaseObject)
  Private
    FandroidId : String;
    Fkind : String;
    FmanagementType : String;
  Protected
    //Property setters
    Procedure SetandroidId(AIndex : Integer; const AValue : String); virtual;
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    Procedure SetmanagementType(AIndex : Integer; const AValue : String); virtual;
  Public
  Published
    Property androidId : String Index 0 Read FandroidId Write SetandroidId;
    Property kind : String Index 8 Read Fkind Write Setkind;
    Property managementType : String Index 16 Read FmanagementType Write SetmanagementType;
  end;
  TDeviceClass = Class of TDevice;
  
  { --------------------------------------------------------------------
    TDeviceState
    --------------------------------------------------------------------}
  
  TDeviceState = Class(TGoogleBaseObject)
  Private
    FaccountState : String;
    Fkind : String;
  Protected
    //Property setters
    Procedure SetaccountState(AIndex : Integer; const AValue : String); virtual;
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
  Public
  Published
    Property accountState : String Index 0 Read FaccountState Write SetaccountState;
    Property kind : String Index 8 Read Fkind Write Setkind;
  end;
  TDeviceStateClass = Class of TDeviceState;
  
  { --------------------------------------------------------------------
    TDevicesListResponse
    --------------------------------------------------------------------}
  
  TDevicesListResponse = Class(TGoogleBaseObject)
  Private
    Fdevice : TDevicesListResponseTypedeviceArray;
    Fkind : String;
  Protected
    //Property setters
    Procedure Setdevice(AIndex : Integer; const AValue : TDevicesListResponseTypedeviceArray); virtual;
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    //2.6.4. bug workaround
    {$IFDEF VER2_6}
    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
    {$ENDIF VER2_6}
  Public
  Published
    Property device : TDevicesListResponseTypedeviceArray Index 0 Read Fdevice Write Setdevice;
    Property kind : String Index 8 Read Fkind Write Setkind;
  end;
  TDevicesListResponseClass = Class of TDevicesListResponse;
  
  { --------------------------------------------------------------------
    TEnterprise
    --------------------------------------------------------------------}
  
  TEnterprise = Class(TGoogleBaseObject)
  Private
    Fid : String;
    Fkind : String;
    Fname : String;
    FprimaryDomain : String;
  Protected
    //Property setters
    Procedure Setid(AIndex : Integer; const AValue : String); virtual;
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    Procedure Setname(AIndex : Integer; const AValue : String); virtual;
    Procedure SetprimaryDomain(AIndex : Integer; const AValue : String); virtual;
  Public
  Published
    Property id : String Index 0 Read Fid Write Setid;
    Property kind : String Index 8 Read Fkind Write Setkind;
    Property name : String Index 16 Read Fname Write Setname;
    Property primaryDomain : String Index 24 Read FprimaryDomain Write SetprimaryDomain;
  end;
  TEnterpriseClass = Class of TEnterprise;
  
  { --------------------------------------------------------------------
    TEnterpriseAccount
    --------------------------------------------------------------------}
  
  TEnterpriseAccount = Class(TGoogleBaseObject)
  Private
    FaccountEmail : String;
    Fkind : String;
  Protected
    //Property setters
    Procedure SetaccountEmail(AIndex : Integer; const AValue : String); virtual;
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
  Public
  Published
    Property accountEmail : String Index 0 Read FaccountEmail Write SetaccountEmail;
    Property kind : String Index 8 Read Fkind Write Setkind;
  end;
  TEnterpriseAccountClass = Class of TEnterpriseAccount;
  
  { --------------------------------------------------------------------
    TEnterprisesListResponse
    --------------------------------------------------------------------}
  
  TEnterprisesListResponse = Class(TGoogleBaseObject)
  Private
    Fenterprise : TEnterprisesListResponseTypeenterpriseArray;
    Fkind : String;
  Protected
    //Property setters
    Procedure Setenterprise(AIndex : Integer; const AValue : TEnterprisesListResponseTypeenterpriseArray); virtual;
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    //2.6.4. bug workaround
    {$IFDEF VER2_6}
    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
    {$ENDIF VER2_6}
  Public
  Published
    Property enterprise : TEnterprisesListResponseTypeenterpriseArray Index 0 Read Fenterprise Write Setenterprise;
    Property kind : String Index 8 Read Fkind Write Setkind;
  end;
  TEnterprisesListResponseClass = Class of TEnterprisesListResponse;
  
  { --------------------------------------------------------------------
    TEnterprisesSendTestPushNotificationResponse
    --------------------------------------------------------------------}
  
  TEnterprisesSendTestPushNotificationResponse = Class(TGoogleBaseObject)
  Private
    FmessageId : String;
    FtopicName : String;
  Protected
    //Property setters
    Procedure SetmessageId(AIndex : Integer; const AValue : String); virtual;
    Procedure SettopicName(AIndex : Integer; const AValue : String); virtual;
  Public
  Published
    Property messageId : String Index 0 Read FmessageId Write SetmessageId;
    Property topicName : String Index 8 Read FtopicName Write SettopicName;
  end;
  TEnterprisesSendTestPushNotificationResponseClass = Class of TEnterprisesSendTestPushNotificationResponse;
  
  { --------------------------------------------------------------------
    TEntitlement
    --------------------------------------------------------------------}
  
  TEntitlement = Class(TGoogleBaseObject)
  Private
    Fkind : String;
    FproductId : String;
    Freason : String;
  Protected
    //Property setters
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    Procedure SetproductId(AIndex : Integer; const AValue : String); virtual;
    Procedure Setreason(AIndex : Integer; const AValue : String); virtual;
  Public
  Published
    Property kind : String Index 0 Read Fkind Write Setkind;
    Property productId : String Index 8 Read FproductId Write SetproductId;
    Property reason : String Index 16 Read Freason Write Setreason;
  end;
  TEntitlementClass = Class of TEntitlement;
  
  { --------------------------------------------------------------------
    TEntitlementsListResponse
    --------------------------------------------------------------------}
  
  TEntitlementsListResponse = Class(TGoogleBaseObject)
  Private
    Fentitlement : TEntitlementsListResponseTypeentitlementArray;
    Fkind : String;
  Protected
    //Property setters
    Procedure Setentitlement(AIndex : Integer; const AValue : TEntitlementsListResponseTypeentitlementArray); virtual;
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    //2.6.4. bug workaround
    {$IFDEF VER2_6}
    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
    {$ENDIF VER2_6}
  Public
  Published
    Property entitlement : TEntitlementsListResponseTypeentitlementArray Index 0 Read Fentitlement Write Setentitlement;
    Property kind : String Index 8 Read Fkind Write Setkind;
  end;
  TEntitlementsListResponseClass = Class of TEntitlementsListResponse;
  
  { --------------------------------------------------------------------
    TGroupLicense
    --------------------------------------------------------------------}
  
  TGroupLicense = Class(TGoogleBaseObject)
  Private
    FacquisitionKind : String;
    Fapproval : String;
    Fkind : String;
    FnumProvisioned : integer;
    FnumPurchased : integer;
    FproductId : String;
  Protected
    //Property setters
    Procedure SetacquisitionKind(AIndex : Integer; const AValue : String); virtual;
    Procedure Setapproval(AIndex : Integer; const AValue : String); virtual;
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    Procedure SetnumProvisioned(AIndex : Integer; const AValue : integer); virtual;
    Procedure SetnumPurchased(AIndex : Integer; const AValue : integer); virtual;
    Procedure SetproductId(AIndex : Integer; const AValue : String); virtual;
  Public
  Published
    Property acquisitionKind : String Index 0 Read FacquisitionKind Write SetacquisitionKind;
    Property approval : String Index 8 Read Fapproval Write Setapproval;
    Property kind : String Index 16 Read Fkind Write Setkind;
    Property numProvisioned : integer Index 24 Read FnumProvisioned Write SetnumProvisioned;
    Property numPurchased : integer Index 32 Read FnumPurchased Write SetnumPurchased;
    Property productId : String Index 40 Read FproductId Write SetproductId;
  end;
  TGroupLicenseClass = Class of TGroupLicense;
  
  { --------------------------------------------------------------------
    TGroupLicenseUsersListResponse
    --------------------------------------------------------------------}
  
  TGroupLicenseUsersListResponse = Class(TGoogleBaseObject)
  Private
    Fkind : String;
    Fuser : TGroupLicenseUsersListResponseTypeuserArray;
  Protected
    //Property setters
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    Procedure Setuser(AIndex : Integer; const AValue : TGroupLicenseUsersListResponseTypeuserArray); virtual;
    //2.6.4. bug workaround
    {$IFDEF VER2_6}
    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
    {$ENDIF VER2_6}
  Public
  Published
    Property kind : String Index 0 Read Fkind Write Setkind;
    Property user : TGroupLicenseUsersListResponseTypeuserArray Index 8 Read Fuser Write Setuser;
  end;
  TGroupLicenseUsersListResponseClass = Class of TGroupLicenseUsersListResponse;
  
  { --------------------------------------------------------------------
    TGroupLicensesListResponse
    --------------------------------------------------------------------}
  
  TGroupLicensesListResponse = Class(TGoogleBaseObject)
  Private
    FgroupLicense : TGroupLicensesListResponseTypegroupLicenseArray;
    Fkind : String;
  Protected
    //Property setters
    Procedure SetgroupLicense(AIndex : Integer; const AValue : TGroupLicensesListResponseTypegroupLicenseArray); virtual;
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    //2.6.4. bug workaround
    {$IFDEF VER2_6}
    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
    {$ENDIF VER2_6}
  Public
  Published
    Property groupLicense : TGroupLicensesListResponseTypegroupLicenseArray Index 0 Read FgroupLicense Write SetgroupLicense;
    Property kind : String Index 8 Read Fkind Write Setkind;
  end;
  TGroupLicensesListResponseClass = Class of TGroupLicensesListResponse;
  
  { --------------------------------------------------------------------
    TInstall
    --------------------------------------------------------------------}
  
  TInstall = Class(TGoogleBaseObject)
  Private
    FinstallState : String;
    Fkind : String;
    FproductId : String;
    FversionCode : integer;
  Protected
    //Property setters
    Procedure SetinstallState(AIndex : Integer; const AValue : String); virtual;
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    Procedure SetproductId(AIndex : Integer; const AValue : String); virtual;
    Procedure SetversionCode(AIndex : Integer; const AValue : integer); virtual;
  Public
  Published
    Property installState : String Index 0 Read FinstallState Write SetinstallState;
    Property kind : String Index 8 Read Fkind Write Setkind;
    Property productId : String Index 16 Read FproductId Write SetproductId;
    Property versionCode : integer Index 24 Read FversionCode Write SetversionCode;
  end;
  TInstallClass = Class of TInstall;
  
  { --------------------------------------------------------------------
    TInstallsListResponse
    --------------------------------------------------------------------}
  
  TInstallsListResponse = Class(TGoogleBaseObject)
  Private
    Finstall : TInstallsListResponseTypeinstallArray;
    Fkind : String;
  Protected
    //Property setters
    Procedure Setinstall(AIndex : Integer; const AValue : TInstallsListResponseTypeinstallArray); virtual;
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    //2.6.4. bug workaround
    {$IFDEF VER2_6}
    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
    {$ENDIF VER2_6}
  Public
  Published
    Property install : TInstallsListResponseTypeinstallArray Index 0 Read Finstall Write Setinstall;
    Property kind : String Index 8 Read Fkind Write Setkind;
  end;
  TInstallsListResponseClass = Class of TInstallsListResponse;
  
  { --------------------------------------------------------------------
    TLocalizedText
    --------------------------------------------------------------------}
  
  TLocalizedText = Class(TGoogleBaseObject)
  Private
    Flocale : String;
    Ftext : String;
  Protected
    //Property setters
    Procedure Setlocale(AIndex : Integer; const AValue : String); virtual;
    Procedure Settext(AIndex : Integer; const AValue : String); virtual;
  Public
  Published
    Property locale : String Index 0 Read Flocale Write Setlocale;
    Property text : String Index 8 Read Ftext Write Settext;
  end;
  TLocalizedTextClass = Class of TLocalizedText;
  
  { --------------------------------------------------------------------
    TPageInfo
    --------------------------------------------------------------------}
  
  TPageInfo = Class(TGoogleBaseObject)
  Private
    FresultPerPage : integer;
    FstartIndex : integer;
    FtotalResults : integer;
  Protected
    //Property setters
    Procedure SetresultPerPage(AIndex : Integer; const AValue : integer); virtual;
    Procedure SetstartIndex(AIndex : Integer; const AValue : integer); virtual;
    Procedure SettotalResults(AIndex : Integer; const AValue : integer); virtual;
  Public
  Published
    Property resultPerPage : integer Index 0 Read FresultPerPage Write SetresultPerPage;
    Property startIndex : integer Index 8 Read FstartIndex Write SetstartIndex;
    Property totalResults : integer Index 16 Read FtotalResults Write SettotalResults;
  end;
  TPageInfoClass = Class of TPageInfo;
  
  { --------------------------------------------------------------------
    TPermission
    --------------------------------------------------------------------}
  
  TPermission = Class(TGoogleBaseObject)
  Private
    Fdescription : String;
    Fkind : String;
    Fname : String;
    FpermissionId : String;
  Protected
    //Property setters
    Procedure Setdescription(AIndex : Integer; const AValue : String); virtual;
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    Procedure Setname(AIndex : Integer; const AValue : String); virtual;
    Procedure SetpermissionId(AIndex : Integer; const AValue : String); virtual;
  Public
  Published
    Property description : String Index 0 Read Fdescription Write Setdescription;
    Property kind : String Index 8 Read Fkind Write Setkind;
    Property name : String Index 16 Read Fname Write Setname;
    Property permissionId : String Index 24 Read FpermissionId Write SetpermissionId;
  end;
  TPermissionClass = Class of TPermission;
  
  { --------------------------------------------------------------------
    TProduct
    --------------------------------------------------------------------}
  
  TProduct = Class(TGoogleBaseObject)
  Private
    FappVersion : TProductTypeappVersionArray;
    FauthorName : String;
    FdetailsUrl : String;
    FdistributionChannel : String;
    FiconUrl : String;
    Fkind : String;
    FproductId : String;
    FproductPricing : String;
    FrequiresContainerApp : boolean;
    FsmallIconUrl : String;
    Ftitle : String;
    FworkDetailsUrl : String;
  Protected
    //Property setters
    Procedure SetappVersion(AIndex : Integer; const AValue : TProductTypeappVersionArray); virtual;
    Procedure SetauthorName(AIndex : Integer; const AValue : String); virtual;
    Procedure SetdetailsUrl(AIndex : Integer; const AValue : String); virtual;
    Procedure SetdistributionChannel(AIndex : Integer; const AValue : String); virtual;
    Procedure SeticonUrl(AIndex : Integer; const AValue : String); virtual;
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    Procedure SetproductId(AIndex : Integer; const AValue : String); virtual;
    Procedure SetproductPricing(AIndex : Integer; const AValue : String); virtual;
    Procedure SetrequiresContainerApp(AIndex : Integer; const AValue : boolean); virtual;
    Procedure SetsmallIconUrl(AIndex : Integer; const AValue : String); virtual;
    Procedure Settitle(AIndex : Integer; const AValue : String); virtual;
    Procedure SetworkDetailsUrl(AIndex : Integer; const AValue : String); virtual;
    //2.6.4. bug workaround
    {$IFDEF VER2_6}
    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
    {$ENDIF VER2_6}
  Public
  Published
    Property appVersion : TProductTypeappVersionArray Index 0 Read FappVersion Write SetappVersion;
    Property authorName : String Index 8 Read FauthorName Write SetauthorName;
    Property detailsUrl : String Index 16 Read FdetailsUrl Write SetdetailsUrl;
    Property distributionChannel : String Index 24 Read FdistributionChannel Write SetdistributionChannel;
    Property iconUrl : String Index 32 Read FiconUrl Write SeticonUrl;
    Property kind : String Index 40 Read Fkind Write Setkind;
    Property productId : String Index 48 Read FproductId Write SetproductId;
    Property productPricing : String Index 56 Read FproductPricing Write SetproductPricing;
    Property requiresContainerApp : boolean Index 64 Read FrequiresContainerApp Write SetrequiresContainerApp;
    Property smallIconUrl : String Index 72 Read FsmallIconUrl Write SetsmallIconUrl;
    Property title : String Index 80 Read Ftitle Write Settitle;
    Property workDetailsUrl : String Index 88 Read FworkDetailsUrl Write SetworkDetailsUrl;
  end;
  TProductClass = Class of TProduct;
  
  { --------------------------------------------------------------------
    TProductPermission
    --------------------------------------------------------------------}
  
  TProductPermission = Class(TGoogleBaseObject)
  Private
    FpermissionId : String;
    Fstate : String;
  Protected
    //Property setters
    Procedure SetpermissionId(AIndex : Integer; const AValue : String); virtual;
    Procedure Setstate(AIndex : Integer; const AValue : String); virtual;
  Public
  Published
    Property permissionId : String Index 0 Read FpermissionId Write SetpermissionId;
    Property state : String Index 8 Read Fstate Write Setstate;
  end;
  TProductPermissionClass = Class of TProductPermission;
  
  { --------------------------------------------------------------------
    TProductPermissions
    --------------------------------------------------------------------}
  
  TProductPermissions = Class(TGoogleBaseObject)
  Private
    Fkind : String;
    Fpermission : TProductPermissionsTypepermissionArray;
    FproductId : String;
  Protected
    //Property setters
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    Procedure Setpermission(AIndex : Integer; const AValue : TProductPermissionsTypepermissionArray); virtual;
    Procedure SetproductId(AIndex : Integer; const AValue : String); virtual;
    //2.6.4. bug workaround
    {$IFDEF VER2_6}
    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
    {$ENDIF VER2_6}
  Public
  Published
    Property kind : String Index 0 Read Fkind Write Setkind;
    Property permission : TProductPermissionsTypepermissionArray Index 8 Read Fpermission Write Setpermission;
    Property productId : String Index 16 Read FproductId Write SetproductId;
  end;
  TProductPermissionsClass = Class of TProductPermissions;
  
  { --------------------------------------------------------------------
    TProductSet
    --------------------------------------------------------------------}
  
  TProductSet = Class(TGoogleBaseObject)
  Private
    Fkind : String;
    FproductId : TStringArray;
  Protected
    //Property setters
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    Procedure SetproductId(AIndex : Integer; const AValue : TStringArray); virtual;
    //2.6.4. bug workaround
    {$IFDEF VER2_6}
    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
    {$ENDIF VER2_6}
  Public
  Published
    Property kind : String Index 0 Read Fkind Write Setkind;
    Property productId : TStringArray Index 8 Read FproductId Write SetproductId;
  end;
  TProductSetClass = Class of TProductSet;
  
  { --------------------------------------------------------------------
    TProductsApproveRequest
    --------------------------------------------------------------------}
  
  TProductsApproveRequest = Class(TGoogleBaseObject)
  Private
    FapprovalUrlInfo : TApprovalUrlInfo;
  Protected
    //Property setters
    Procedure SetapprovalUrlInfo(AIndex : Integer; const AValue : TApprovalUrlInfo); virtual;
  Public
  Published
    Property approvalUrlInfo : TApprovalUrlInfo Index 0 Read FapprovalUrlInfo Write SetapprovalUrlInfo;
  end;
  TProductsApproveRequestClass = Class of TProductsApproveRequest;
  
  { --------------------------------------------------------------------
    TProductsGenerateApprovalUrlResponse
    --------------------------------------------------------------------}
  
  TProductsGenerateApprovalUrlResponse = Class(TGoogleBaseObject)
  Private
    Furl : String;
  Protected
    //Property setters
    Procedure Seturl(AIndex : Integer; const AValue : String); virtual;
  Public
  Published
    Property url : String Index 0 Read Furl Write Seturl;
  end;
  TProductsGenerateApprovalUrlResponseClass = Class of TProductsGenerateApprovalUrlResponse;
  
  { --------------------------------------------------------------------
    TProductsListResponse
    --------------------------------------------------------------------}
  
  TProductsListResponse = Class(TGoogleBaseObject)
  Private
    Fkind : String;
    FpageInfo : TPageInfo;
    Fproduct : TProductsListResponseTypeproductArray;
    FtokenPagination : TTokenPagination;
  Protected
    //Property setters
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    Procedure SetpageInfo(AIndex : Integer; const AValue : TPageInfo); virtual;
    Procedure Setproduct(AIndex : Integer; const AValue : TProductsListResponseTypeproductArray); virtual;
    Procedure SettokenPagination(AIndex : Integer; const AValue : TTokenPagination); virtual;
    //2.6.4. bug workaround
    {$IFDEF VER2_6}
    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
    {$ENDIF VER2_6}
  Public
  Published
    Property kind : String Index 0 Read Fkind Write Setkind;
    Property pageInfo : TPageInfo Index 8 Read FpageInfo Write SetpageInfo;
    Property product : TProductsListResponseTypeproductArray Index 16 Read Fproduct Write Setproduct;
    Property tokenPagination : TTokenPagination Index 24 Read FtokenPagination Write SettokenPagination;
  end;
  TProductsListResponseClass = Class of TProductsListResponse;
  
  { --------------------------------------------------------------------
    TStoreCluster
    --------------------------------------------------------------------}
  
  TStoreCluster = Class(TGoogleBaseObject)
  Private
    Fid : String;
    Fkind : String;
    Fname : TStoreClusterTypenameArray;
    ForderInPage : String;
    FproductId : TStringArray;
  Protected
    //Property setters
    Procedure Setid(AIndex : Integer; const AValue : String); virtual;
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    Procedure Setname(AIndex : Integer; const AValue : TStoreClusterTypenameArray); virtual;
    Procedure SetorderInPage(AIndex : Integer; const AValue : String); virtual;
    Procedure SetproductId(AIndex : Integer; const AValue : TStringArray); virtual;
    //2.6.4. bug workaround
    {$IFDEF VER2_6}
    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
    {$ENDIF VER2_6}
  Public
  Published
    Property id : String Index 0 Read Fid Write Setid;
    Property kind : String Index 8 Read Fkind Write Setkind;
    Property name : TStoreClusterTypenameArray Index 16 Read Fname Write Setname;
    Property orderInPage : String Index 24 Read ForderInPage Write SetorderInPage;
    Property productId : TStringArray Index 32 Read FproductId Write SetproductId;
  end;
  TStoreClusterClass = Class of TStoreCluster;
  
  { --------------------------------------------------------------------
    TStoreLayout
    --------------------------------------------------------------------}
  
  TStoreLayout = Class(TGoogleBaseObject)
  Private
    FhomepageId : String;
    Fkind : String;
  Protected
    //Property setters
    Procedure SethomepageId(AIndex : Integer; const AValue : String); virtual;
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
  Public
  Published
    Property homepageId : String Index 0 Read FhomepageId Write SethomepageId;
    Property kind : String Index 8 Read Fkind Write Setkind;
  end;
  TStoreLayoutClass = Class of TStoreLayout;
  
  { --------------------------------------------------------------------
    TStoreLayoutClustersListResponse
    --------------------------------------------------------------------}
  
  TStoreLayoutClustersListResponse = Class(TGoogleBaseObject)
  Private
    Fcluster : TStoreLayoutClustersListResponseTypeclusterArray;
    Fkind : String;
  Protected
    //Property setters
    Procedure Setcluster(AIndex : Integer; const AValue : TStoreLayoutClustersListResponseTypeclusterArray); virtual;
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    //2.6.4. bug workaround
    {$IFDEF VER2_6}
    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
    {$ENDIF VER2_6}
  Public
  Published
    Property cluster : TStoreLayoutClustersListResponseTypeclusterArray Index 0 Read Fcluster Write Setcluster;
    Property kind : String Index 8 Read Fkind Write Setkind;
  end;
  TStoreLayoutClustersListResponseClass = Class of TStoreLayoutClustersListResponse;
  
  { --------------------------------------------------------------------
    TStoreLayoutPagesListResponse
    --------------------------------------------------------------------}
  
  TStoreLayoutPagesListResponse = Class(TGoogleBaseObject)
  Private
    Fkind : String;
    Fpage : TStoreLayoutPagesListResponseTypepageArray;
  Protected
    //Property setters
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    Procedure Setpage(AIndex : Integer; const AValue : TStoreLayoutPagesListResponseTypepageArray); virtual;
    //2.6.4. bug workaround
    {$IFDEF VER2_6}
    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
    {$ENDIF VER2_6}
  Public
  Published
    Property kind : String Index 0 Read Fkind Write Setkind;
    Property page : TStoreLayoutPagesListResponseTypepageArray Index 8 Read Fpage Write Setpage;
  end;
  TStoreLayoutPagesListResponseClass = Class of TStoreLayoutPagesListResponse;
  
  { --------------------------------------------------------------------
    TStorePage
    --------------------------------------------------------------------}
  
  TStorePage = Class(TGoogleBaseObject)
  Private
    Fid : String;
    Fkind : String;
    Flink : TStringArray;
    Fname : TStorePageTypenameArray;
  Protected
    //Property setters
    Procedure Setid(AIndex : Integer; const AValue : String); virtual;
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    Procedure Setlink(AIndex : Integer; const AValue : TStringArray); virtual;
    Procedure Setname(AIndex : Integer; const AValue : TStorePageTypenameArray); virtual;
    //2.6.4. bug workaround
    {$IFDEF VER2_6}
    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
    {$ENDIF VER2_6}
  Public
  Published
    Property id : String Index 0 Read Fid Write Setid;
    Property kind : String Index 8 Read Fkind Write Setkind;
    Property link : TStringArray Index 16 Read Flink Write Setlink;
    Property name : TStorePageTypenameArray Index 24 Read Fname Write Setname;
  end;
  TStorePageClass = Class of TStorePage;
  
  { --------------------------------------------------------------------
    TTokenPagination
    --------------------------------------------------------------------}
  
  TTokenPagination = Class(TGoogleBaseObject)
  Private
    FnextPageToken : String;
    FpreviousPageToken : String;
  Protected
    //Property setters
    Procedure SetnextPageToken(AIndex : Integer; const AValue : String); virtual;
    Procedure SetpreviousPageToken(AIndex : Integer; const AValue : String); virtual;
  Public
  Published
    Property nextPageToken : String Index 0 Read FnextPageToken Write SetnextPageToken;
    Property previousPageToken : String Index 8 Read FpreviousPageToken Write SetpreviousPageToken;
  end;
  TTokenPaginationClass = Class of TTokenPagination;
  
  { --------------------------------------------------------------------
    TUser
    --------------------------------------------------------------------}
  
  TUser = Class(TGoogleBaseObject)
  Private
    Fid : String;
    Fkind : String;
    FprimaryEmail : String;
  Protected
    //Property setters
    Procedure Setid(AIndex : Integer; const AValue : String); virtual;
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    Procedure SetprimaryEmail(AIndex : Integer; const AValue : String); virtual;
  Public
  Published
    Property id : String Index 0 Read Fid Write Setid;
    Property kind : String Index 8 Read Fkind Write Setkind;
    Property primaryEmail : String Index 16 Read FprimaryEmail Write SetprimaryEmail;
  end;
  TUserClass = Class of TUser;
  
  { --------------------------------------------------------------------
    TUserToken
    --------------------------------------------------------------------}
  
  TUserToken = Class(TGoogleBaseObject)
  Private
    Fkind : String;
    Ftoken : String;
    FuserId : String;
  Protected
    //Property setters
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    Procedure Settoken(AIndex : Integer; const AValue : String); virtual;
    Procedure SetuserId(AIndex : Integer; const AValue : String); virtual;
  Public
  Published
    Property kind : String Index 0 Read Fkind Write Setkind;
    Property token : String Index 8 Read Ftoken Write Settoken;
    Property userId : String Index 16 Read FuserId Write SetuserId;
  end;
  TUserTokenClass = Class of TUserToken;
  
  { --------------------------------------------------------------------
    TUsersListResponse
    --------------------------------------------------------------------}
  
  TUsersListResponse = Class(TGoogleBaseObject)
  Private
    Fkind : String;
    Fuser : TUsersListResponseTypeuserArray;
  Protected
    //Property setters
    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
    Procedure Setuser(AIndex : Integer; const AValue : TUsersListResponseTypeuserArray); virtual;
    //2.6.4. bug workaround
    {$IFDEF VER2_6}
    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
    {$ENDIF VER2_6}
  Public
  Published
    Property kind : String Index 0 Read Fkind Write Setkind;
    Property user : TUsersListResponseTypeuserArray Index 8 Read Fuser Write Setuser;
  end;
  TUsersListResponseClass = Class of TUsersListResponse;
  
  { --------------------------------------------------------------------
    TCollectionsResource
    --------------------------------------------------------------------}
  
  TCollectionsResource = Class(TGoogleResource)
  Public
    Class Function ResourceName : String; override;
    Class Function DefaultAPI : TGoogleAPIClass; override;
    Procedure Delete(collectionId: string; enterpriseId: string);
    Function Get(collectionId: string; enterpriseId: string) : TCollection;
    Function Insert(enterpriseId: string; aCollection : TCollection) : TCollection;
    Function List(enterpriseId: string) : TCollectionsListResponse;
    Function Patch(collectionId: string; enterpriseId: string; aCollection : TCollection) : TCollection;
    Function Update(collectionId: string; enterpriseId: string; aCollection : TCollection) : TCollection;
  end;
  
  
  { --------------------------------------------------------------------
    TCollectionviewersResource
    --------------------------------------------------------------------}
  
  TCollectionviewersResource = Class(TGoogleResource)
  Public
    Class Function ResourceName : String; override;
    Class Function DefaultAPI : TGoogleAPIClass; override;
    Procedure Delete(collectionId: string; enterpriseId: string; userId: string);
    Function Get(collectionId: string; enterpriseId: string; userId: string) : TUser;
    Function List(collectionId: string; enterpriseId: string) : TCollectionViewersListResponse;
    Function Patch(collectionId: string; enterpriseId: string; userId: string; aUser : TUser) : TUser;
    Function Update(collectionId: string; enterpriseId: string; userId: string; aUser : TUser) : TUser;
  end;
  
  
  { --------------------------------------------------------------------
    TDevicesResource
    --------------------------------------------------------------------}
  
  TDevicesResource = Class(TGoogleResource)
  Public
    Class Function ResourceName : String; override;
    Class Function DefaultAPI : TGoogleAPIClass; override;
    Function Get(deviceId: string; enterpriseId: string; userId: string) : TDevice;
    Function GetState(deviceId: string; enterpriseId: string; userId: string) : TDeviceState;
    Function List(enterpriseId: string; userId: string) : TDevicesListResponse;
    Function SetState(deviceId: string; enterpriseId: string; userId: string; aDeviceState : TDeviceState) : TDeviceState;
  end;
  
  
  { --------------------------------------------------------------------
    TEnterprisesResource
    --------------------------------------------------------------------}
  
  
  //Optional query Options for TEnterprisesResource, method Enroll
  
  TEnterprisesEnrollOptions = Record
    token : String;
  end;
  
  
  //Optional query Options for TEnterprisesResource, method Insert
  
  TEnterprisesInsertOptions = Record
    token : String;
  end;
  
  
  //Optional query Options for TEnterprisesResource, method List
  
  TEnterprisesListOptions = Record
    domain : String;
  end;
  
  TEnterprisesResource = Class(TGoogleResource)
  Public
    Class Function ResourceName : String; override;
    Class Function DefaultAPI : TGoogleAPIClass; override;
    Procedure Delete(enterpriseId: string);
    Function Enroll(aEnterprise : TEnterprise; AQuery : string  = '') : TEnterprise;
    Function Enroll(aEnterprise : TEnterprise; AQuery : TEnterprisesenrollOptions) : TEnterprise;
    Function Get(enterpriseId: string) : TEnterprise;
    Function GetStoreLayout(enterpriseId: string) : TStoreLayout;
    Function Insert(aEnterprise : TEnterprise; AQuery : string  = '') : TEnterprise;
    Function Insert(aEnterprise : TEnterprise; AQuery : TEnterprisesinsertOptions) : TEnterprise;
    Function List(AQuery : string  = '') : TEnterprisesListResponse;
    Function List(AQuery : TEnterpriseslistOptions) : TEnterprisesListResponse;
    Function SendTestPushNotification(enterpriseId: string) : TEnterprisesSendTestPushNotificationResponse;
    Function SetAccount(enterpriseId: string; aEnterpriseAccount : TEnterpriseAccount) : TEnterpriseAccount;
    Function SetStoreLayout(enterpriseId: string; aStoreLayout : TStoreLayout) : TStoreLayout;
    Procedure Unenroll(enterpriseId: string);
  end;
  
  
  { --------------------------------------------------------------------
    TEntitlementsResource
    --------------------------------------------------------------------}
  
  
  //Optional query Options for TEntitlementsResource, method Patch
  
  TEntitlementsPatchOptions = Record
    install : boolean;
  end;
  
  
  //Optional query Options for TEntitlementsResource, method Update
  
  TEntitlementsUpdateOptions = Record
    install : boolean;
  end;
  
  TEntitlementsResource = Class(TGoogleResource)
  Public
    Class Function ResourceName : String; override;
    Class Function DefaultAPI : TGoogleAPIClass; override;
    Procedure Delete(enterpriseId: string; entitlementId: string; userId: string);
    Function Get(enterpriseId: string; entitlementId: string; userId: string) : TEntitlement;
    Function List(enterpriseId: string; userId: string) : TEntitlementsListResponse;
    Function Patch(enterpriseId: string; entitlementId: string; userId: string; aEntitlement : TEntitlement; AQuery : string  = '') : TEntitlement;
    Function Patch(enterpriseId: string; entitlementId: string; userId: string; aEntitlement : TEntitlement; AQuery : TEntitlementspatchOptions) : TEntitlement;
    Function Update(enterpriseId: string; entitlementId: string; userId: string; aEntitlement : TEntitlement; AQuery : string  = '') : TEntitlement;
    Function Update(enterpriseId: string; entitlementId: string; userId: string; aEntitlement : TEntitlement; AQuery : TEntitlementsupdateOptions) : TEntitlement;
  end;
  
  
  { --------------------------------------------------------------------
    TGrouplicensesResource
    --------------------------------------------------------------------}
  
  TGrouplicensesResource = Class(TGoogleResource)
  Public
    Class Function ResourceName : String; override;
    Class Function DefaultAPI : TGoogleAPIClass; override;
    Function Get(enterpriseId: string; groupLicenseId: string) : TGroupLicense;
    Function List(enterpriseId: string) : TGroupLicensesListResponse;
  end;
  
  
  { --------------------------------------------------------------------
    TGrouplicenseusersResource
    --------------------------------------------------------------------}
  
  TGrouplicenseusersResource = Class(TGoogleResource)
  Public
    Class Function ResourceName : String; override;
    Class Function DefaultAPI : TGoogleAPIClass; override;
    Function List(enterpriseId: string; groupLicenseId: string) : TGroupLicenseUsersListResponse;
  end;
  
  
  { --------------------------------------------------------------------
    TInstallsResource
    --------------------------------------------------------------------}
  
  TInstallsResource = Class(TGoogleResource)
  Public
    Class Function ResourceName : String; override;
    Class Function DefaultAPI : TGoogleAPIClass; override;
    Procedure Delete(deviceId: string; enterpriseId: string; installId: string; userId: string);
    Function Get(deviceId: string; enterpriseId: string; installId: string; userId: string) : TInstall;
    Function List(deviceId: string; enterpriseId: string; userId: string) : TInstallsListResponse;
    Function Patch(deviceId: string; enterpriseId: string; installId: string; userId: string; aInstall : TInstall) : TInstall;
    Function Update(deviceId: string; enterpriseId: string; installId: string; userId: string; aInstall : TInstall) : TInstall;
  end;
  
  
  { --------------------------------------------------------------------
    TPermissionsResource
    --------------------------------------------------------------------}
  
  
  //Optional query Options for TPermissionsResource, method Get
  
  TPermissionsGetOptions = Record
    language : String;
  end;
  
  TPermissionsResource = Class(TGoogleResource)
  Public
    Class Function ResourceName : String; override;
    Class Function DefaultAPI : TGoogleAPIClass; override;
    Function Get(permissionId: string; AQuery : string  = '') : TPermission;
    Function Get(permissionId: string; AQuery : TPermissionsgetOptions) : TPermission;
  end;
  
  
  { --------------------------------------------------------------------
    TProductsResource
    --------------------------------------------------------------------}
  
  
  //Optional query Options for TProductsResource, method GenerateApprovalUrl
  
  TProductsGenerateApprovalUrlOptions = Record
    languageCode : String;
  end;
  
  
  //Optional query Options for TProductsResource, method Get
  
  TProductsGetOptions = Record
    language : String;
  end;
  
  
  //Optional query Options for TProductsResource, method GetAppRestrictionsSchema
  
  TProductsGetAppRestrictionsSchemaOptions = Record
    language : String;
  end;
  
  
  //Optional query Options for TProductsResource, method List
  
  TProductsListOptions = Record
    approved : boolean;
    language : String;
    maxResults : integer;
    query : String;
    token : String;
  end;
  
  TProductsResource = Class(TGoogleResource)
  Public
    Class Function ResourceName : String; override;
    Class Function DefaultAPI : TGoogleAPIClass; override;
    Procedure Approve(enterpriseId: string; productId: string; aProductsApproveRequest : TProductsApproveRequest);
    Function GenerateApprovalUrl(enterpriseId: string; productId: string; AQuery : string  = '') : TProductsGenerateApprovalUrlResponse;
    Function GenerateApprovalUrl(enterpriseId: string; productId: string; AQuery : TProductsgenerateApprovalUrlOptions) : TProductsGenerateApprovalUrlResponse;
    Function Get(enterpriseId: string; productId: string; AQuery : string  = '') : TProduct;
    Function Get(enterpriseId: string; productId: string; AQuery : TProductsgetOptions) : TProduct;
    Function GetAppRestrictionsSchema(enterpriseId: string; productId: string; AQuery : string  = '') : TAppRestrictionsSchema;
    Function GetAppRestrictionsSchema(enterpriseId: string; productId: string; AQuery : TProductsgetAppRestrictionsSchemaOptions) : TAppRestrictionsSchema;
    Function GetPermissions(enterpriseId: string; productId: string) : TProductPermissions;
    Function List(enterpriseId: string; AQuery : string  = '') : TProductsListResponse;
    Function List(enterpriseId: string; AQuery : TProductslistOptions) : TProductsListResponse;
    Function UpdatePermissions(enterpriseId: string; productId: string; aProductPermissions : TProductPermissions) : TProductPermissions;
  end;
  
  
  { --------------------------------------------------------------------
    TStorelayoutclustersResource
    --------------------------------------------------------------------}
  
  TStorelayoutclustersResource = Class(TGoogleResource)
  Public
    Class Function ResourceName : String; override;
    Class Function DefaultAPI : TGoogleAPIClass; override;
    Procedure Delete(clusterId: string; enterpriseId: string; pageId: string);
    Function Get(clusterId: string; enterpriseId: string; pageId: string) : TStoreCluster;
    Function Insert(enterpriseId: string; pageId: string; aStoreCluster : TStoreCluster) : TStoreCluster;
    Function List(enterpriseId: string; pageId: string) : TStoreLayoutClustersListResponse;
    Function Patch(clusterId: string; enterpriseId: string; pageId: string; aStoreCluster : TStoreCluster) : TStoreCluster;
    Function Update(clusterId: string; enterpriseId: string; pageId: string; aStoreCluster : TStoreCluster) : TStoreCluster;
  end;
  
  
  { --------------------------------------------------------------------
    TStorelayoutpagesResource
    --------------------------------------------------------------------}
  
  TStorelayoutpagesResource = Class(TGoogleResource)
  Public
    Class Function ResourceName : String; override;
    Class Function DefaultAPI : TGoogleAPIClass; override;
    Procedure Delete(enterpriseId: string; pageId: string);
    Function Get(enterpriseId: string; pageId: string) : TStorePage;
    Function Insert(enterpriseId: string; aStorePage : TStorePage) : TStorePage;
    Function List(enterpriseId: string) : TStoreLayoutPagesListResponse;
    Function Patch(enterpriseId: string; pageId: string; aStorePage : TStorePage) : TStorePage;
    Function Update(enterpriseId: string; pageId: string; aStorePage : TStorePage) : TStorePage;
  end;
  
  
  { --------------------------------------------------------------------
    TUsersResource
    --------------------------------------------------------------------}
  
  
  //Optional query Options for TUsersResource, method List
  
  TUsersListOptions = Record
    email : String;
  end;
  
  TUsersResource = Class(TGoogleResource)
  Public
    Class Function ResourceName : String; override;
    Class Function DefaultAPI : TGoogleAPIClass; override;
    Function GenerateToken(enterpriseId: string; userId: string) : TUserToken;
    Function Get(enterpriseId: string; userId: string) : TUser;
    Function GetAvailableProductSet(enterpriseId: string; userId: string) : TProductSet;
    Function List(enterpriseId: string; AQuery : string  = '') : TUsersListResponse;
    Function List(enterpriseId: string; AQuery : TUserslistOptions) : TUsersListResponse;
    Procedure RevokeToken(enterpriseId: string; userId: string);
    Function SetAvailableProductSet(enterpriseId: string; userId: string; aProductSet : TProductSet) : TProductSet;
  end;
  
  
  { --------------------------------------------------------------------
    TAndroidenterpriseAPI
    --------------------------------------------------------------------}
  
  TAndroidenterpriseAPI = Class(TGoogleAPI)
  Private
    FCollectionsInstance : TCollectionsResource;
    FCollectionviewersInstance : TCollectionviewersResource;
    FDevicesInstance : TDevicesResource;
    FEnterprisesInstance : TEnterprisesResource;
    FEntitlementsInstance : TEntitlementsResource;
    FGrouplicensesInstance : TGrouplicensesResource;
    FGrouplicenseusersInstance : TGrouplicenseusersResource;
    FInstallsInstance : TInstallsResource;
    FPermissionsInstance : TPermissionsResource;
    FProductsInstance : TProductsResource;
    FStorelayoutclustersInstance : TStorelayoutclustersResource;
    FStorelayoutpagesInstance : TStorelayoutpagesResource;
    FUsersInstance : TUsersResource;
    Function GetCollectionsInstance : TCollectionsResource;virtual;
    Function GetCollectionviewersInstance : TCollectionviewersResource;virtual;
    Function GetDevicesInstance : TDevicesResource;virtual;
    Function GetEnterprisesInstance : TEnterprisesResource;virtual;
    Function GetEntitlementsInstance : TEntitlementsResource;virtual;
    Function GetGrouplicensesInstance : TGrouplicensesResource;virtual;
    Function GetGrouplicenseusersInstance : TGrouplicenseusersResource;virtual;
    Function GetInstallsInstance : TInstallsResource;virtual;
    Function GetPermissionsInstance : TPermissionsResource;virtual;
    Function GetProductsInstance : TProductsResource;virtual;
    Function GetStorelayoutclustersInstance : TStorelayoutclustersResource;virtual;
    Function GetStorelayoutpagesInstance : TStorelayoutpagesResource;virtual;
    Function GetUsersInstance : TUsersResource;virtual;
  Public
    //Override class functions with API info
    Class Function APIName : String; override;
    Class Function APIVersion : String; override;
    Class Function APIRevision : String; override;
    Class Function APIID : String; override;
    Class Function APITitle : String; override;
    Class Function APIDescription : String; override;
    Class Function APIOwnerDomain : String; override;
    Class Function APIOwnerName : String; override;
    Class Function APIIcon16 : String; override;
    Class Function APIIcon32 : String; override;
    Class Function APIdocumentationLink : String; override;
    Class Function APIrootUrl : string; override;
    Class Function APIbasePath : string;override;
    Class Function APIbaseURL : String;override;
    Class Function APIProtocol : string;override;
    Class Function APIservicePath : string;override;
    Class Function APIbatchPath : String;override;
    Class Function APIAuthScopes : TScopeInfoArray;override;
    Class Function APINeedsAuth : Boolean;override;
    Class Procedure RegisterAPIResources; override;
    //Add create function for resources
    Function CreateCollectionsResource(AOwner : TComponent) : TCollectionsResource;virtual;overload;
    Function CreateCollectionsResource : TCollectionsResource;virtual;overload;
    Function CreateCollectionviewersResource(AOwner : TComponent) : TCollectionviewersResource;virtual;overload;
    Function CreateCollectionviewersResource : TCollectionviewersResource;virtual;overload;
    Function CreateDevicesResource(AOwner : TComponent) : TDevicesResource;virtual;overload;
    Function CreateDevicesResource : TDevicesResource;virtual;overload;
    Function CreateEnterprisesResource(AOwner : TComponent) : TEnterprisesResource;virtual;overload;
    Function CreateEnterprisesResource : TEnterprisesResource;virtual;overload;
    Function CreateEntitlementsResource(AOwner : TComponent) : TEntitlementsResource;virtual;overload;
    Function CreateEntitlementsResource : TEntitlementsResource;virtual;overload;
    Function CreateGrouplicensesResource(AOwner : TComponent) : TGrouplicensesResource;virtual;overload;
    Function CreateGrouplicensesResource : TGrouplicensesResource;virtual;overload;
    Function CreateGrouplicenseusersResource(AOwner : TComponent) : TGrouplicenseusersResource;virtual;overload;
    Function CreateGrouplicenseusersResource : TGrouplicenseusersResource;virtual;overload;
    Function CreateInstallsResource(AOwner : TComponent) : TInstallsResource;virtual;overload;
    Function CreateInstallsResource : TInstallsResource;virtual;overload;
    Function CreatePermissionsResource(AOwner : TComponent) : TPermissionsResource;virtual;overload;
    Function CreatePermissionsResource : TPermissionsResource;virtual;overload;
    Function CreateProductsResource(AOwner : TComponent) : TProductsResource;virtual;overload;
    Function CreateProductsResource : TProductsResource;virtual;overload;
    Function CreateStorelayoutclustersResource(AOwner : TComponent) : TStorelayoutclustersResource;virtual;overload;
    Function CreateStorelayoutclustersResource : TStorelayoutclustersResource;virtual;overload;
    Function CreateStorelayoutpagesResource(AOwner : TComponent) : TStorelayoutpagesResource;virtual;overload;
    Function CreateStorelayoutpagesResource : TStorelayoutpagesResource;virtual;overload;
    Function CreateUsersResource(AOwner : TComponent) : TUsersResource;virtual;overload;
    Function CreateUsersResource : TUsersResource;virtual;overload;
    //Add default on-demand instances for resources
    Property CollectionsResource : TCollectionsResource Read GetCollectionsInstance;
    Property CollectionviewersResource : TCollectionviewersResource Read GetCollectionviewersInstance;
    Property DevicesResource : TDevicesResource Read GetDevicesInstance;
    Property EnterprisesResource : TEnterprisesResource Read GetEnterprisesInstance;
    Property EntitlementsResource : TEntitlementsResource Read GetEntitlementsInstance;
    Property GrouplicensesResource : TGrouplicensesResource Read GetGrouplicensesInstance;
    Property GrouplicenseusersResource : TGrouplicenseusersResource Read GetGrouplicenseusersInstance;
    Property InstallsResource : TInstallsResource Read GetInstallsInstance;
    Property PermissionsResource : TPermissionsResource Read GetPermissionsInstance;
    Property ProductsResource : TProductsResource Read GetProductsInstance;
    Property StorelayoutclustersResource : TStorelayoutclustersResource Read GetStorelayoutclustersInstance;
    Property StorelayoutpagesResource : TStorelayoutpagesResource Read GetStorelayoutpagesInstance;
    Property UsersResource : TUsersResource Read GetUsersInstance;
  end;

implementation


{ --------------------------------------------------------------------
  TAppRestrictionsSchema
  --------------------------------------------------------------------}


Procedure TAppRestrictionsSchema.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TAppRestrictionsSchema.Setrestrictions(AIndex : Integer; const AValue : TAppRestrictionsSchemaTyperestrictionsArray); 

begin
  If (Frestrictions=AValue) then exit;
  Frestrictions:=AValue;
  MarkPropertyChanged(AIndex);
end;


//2.6.4. bug workaround
{$IFDEF VER2_6}
Procedure TAppRestrictionsSchema.SetArrayLength(Const AName : String; ALength : Longint); 

begin
  Case AName of
  'restrictions' : SetLength(Frestrictions,ALength);
  else
    Inherited SetArrayLength(AName,ALength);
  end;
end;
{$ENDIF VER2_6}




{ --------------------------------------------------------------------
  TAppRestrictionsSchemaRestriction
  --------------------------------------------------------------------}


Procedure TAppRestrictionsSchemaRestriction.SetdefaultValue(AIndex : Integer; const AValue : TAppRestrictionsSchemaRestrictionRestrictionValue); 

begin
  If (FdefaultValue=AValue) then exit;
  FdefaultValue:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TAppRestrictionsSchemaRestriction.Setdescription(AIndex : Integer; const AValue : String); 

begin
  If (Fdescription=AValue) then exit;
  Fdescription:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TAppRestrictionsSchemaRestriction.Setentry(AIndex : Integer; const AValue : TStringArray); 

begin
  If (Fentry=AValue) then exit;
  Fentry:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TAppRestrictionsSchemaRestriction.SetentryValue(AIndex : Integer; const AValue : TStringArray); 

begin
  If (FentryValue=AValue) then exit;
  FentryValue:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TAppRestrictionsSchemaRestriction.Setkey(AIndex : Integer; const AValue : String); 

begin
  If (Fkey=AValue) then exit;
  Fkey:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TAppRestrictionsSchemaRestriction.SetrestrictionType(AIndex : Integer; const AValue : String); 

begin
  If (FrestrictionType=AValue) then exit;
  FrestrictionType:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TAppRestrictionsSchemaRestriction.Settitle(AIndex : Integer; const AValue : String); 

begin
  If (Ftitle=AValue) then exit;
  Ftitle:=AValue;
  MarkPropertyChanged(AIndex);
end;


//2.6.4. bug workaround
{$IFDEF VER2_6}
Procedure TAppRestrictionsSchemaRestriction.SetArrayLength(Const AName : String; ALength : Longint); 

begin
  Case AName of
  'entry' : SetLength(Fentry,ALength);
  'entryvalue' : SetLength(FentryValue,ALength);
  else
    Inherited SetArrayLength(AName,ALength);
  end;
end;
{$ENDIF VER2_6}




{ --------------------------------------------------------------------
  TAppRestrictionsSchemaRestrictionRestrictionValue
  --------------------------------------------------------------------}


Procedure TAppRestrictionsSchemaRestrictionRestrictionValue.Set_type(AIndex : Integer; const AValue : String); 

begin
  If (F_type=AValue) then exit;
  F_type:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TAppRestrictionsSchemaRestrictionRestrictionValue.SetvalueBool(AIndex : Integer; const AValue : boolean); 

begin
  If (FvalueBool=AValue) then exit;
  FvalueBool:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TAppRestrictionsSchemaRestrictionRestrictionValue.SetvalueInteger(AIndex : Integer; const AValue : integer); 

begin
  If (FvalueInteger=AValue) then exit;
  FvalueInteger:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TAppRestrictionsSchemaRestrictionRestrictionValue.SetvalueMultiselect(AIndex : Integer; const AValue : TStringArray); 

begin
  If (FvalueMultiselect=AValue) then exit;
  FvalueMultiselect:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TAppRestrictionsSchemaRestrictionRestrictionValue.SetvalueString(AIndex : Integer; const AValue : String); 

begin
  If (FvalueString=AValue) then exit;
  FvalueString:=AValue;
  MarkPropertyChanged(AIndex);
end;



Class Function TAppRestrictionsSchemaRestrictionRestrictionValue.ExportPropertyName(Const AName : String) :String;

begin
  Case AName of
  '_type' : Result:='type';
  else
    Result:=Inherited ExportPropertyName(AName);
  end;
end;

//2.6.4. bug workaround
{$IFDEF VER2_6}
Procedure TAppRestrictionsSchemaRestrictionRestrictionValue.SetArrayLength(Const AName : String; ALength : Longint); 

begin
  Case AName of
  'valuemultiselect' : SetLength(FvalueMultiselect,ALength);
  else
    Inherited SetArrayLength(AName,ALength);
  end;
end;
{$ENDIF VER2_6}




{ --------------------------------------------------------------------
  TAppVersion
  --------------------------------------------------------------------}


Procedure TAppVersion.SetversionCode(AIndex : Integer; const AValue : integer); 

begin
  If (FversionCode=AValue) then exit;
  FversionCode:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TAppVersion.SetversionString(AIndex : Integer; const AValue : String); 

begin
  If (FversionString=AValue) then exit;
  FversionString:=AValue;
  MarkPropertyChanged(AIndex);
end;





{ --------------------------------------------------------------------
  TApprovalUrlInfo
  --------------------------------------------------------------------}


Procedure TApprovalUrlInfo.SetapprovalUrl(AIndex : Integer; const AValue : String); 

begin
  If (FapprovalUrl=AValue) then exit;
  FapprovalUrl:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TApprovalUrlInfo.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;





{ --------------------------------------------------------------------
  TCollection
  --------------------------------------------------------------------}


Procedure TCollection.SetcollectionId(AIndex : Integer; const AValue : String); 

begin
  If (FcollectionId=AValue) then exit;
  FcollectionId:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TCollection.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TCollection.Setname(AIndex : Integer; const AValue : String); 

begin
  If (Fname=AValue) then exit;
  Fname:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TCollection.SetproductId(AIndex : Integer; const AValue : TStringArray); 

begin
  If (FproductId=AValue) then exit;
  FproductId:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TCollection.Setvisibility(AIndex : Integer; const AValue : String); 

begin
  If (Fvisibility=AValue) then exit;
  Fvisibility:=AValue;
  MarkPropertyChanged(AIndex);
end;


//2.6.4. bug workaround
{$IFDEF VER2_6}
Procedure TCollection.SetArrayLength(Const AName : String; ALength : Longint); 

begin
  Case AName of
  'productid' : SetLength(FproductId,ALength);
  else
    Inherited SetArrayLength(AName,ALength);
  end;
end;
{$ENDIF VER2_6}




{ --------------------------------------------------------------------
  TCollectionViewersListResponse
  --------------------------------------------------------------------}


Procedure TCollectionViewersListResponse.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TCollectionViewersListResponse.Setuser(AIndex : Integer; const AValue : TCollectionViewersListResponseTypeuserArray); 

begin
  If (Fuser=AValue) then exit;
  Fuser:=AValue;
  MarkPropertyChanged(AIndex);
end;


//2.6.4. bug workaround
{$IFDEF VER2_6}
Procedure TCollectionViewersListResponse.SetArrayLength(Const AName : String; ALength : Longint); 

begin
  Case AName of
  'user' : SetLength(Fuser,ALength);
  else
    Inherited SetArrayLength(AName,ALength);
  end;
end;
{$ENDIF VER2_6}




{ --------------------------------------------------------------------
  TCollectionsListResponse
  --------------------------------------------------------------------}


Procedure TCollectionsListResponse.Setcollection(AIndex : Integer; const AValue : TCollectionsListResponseTypecollectionArray); 

begin
  If (Fcollection=AValue) then exit;
  Fcollection:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TCollectionsListResponse.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;


//2.6.4. bug workaround
{$IFDEF VER2_6}
Procedure TCollectionsListResponse.SetArrayLength(Const AName : String; ALength : Longint); 

begin
  Case AName of
  'collection' : SetLength(Fcollection,ALength);
  else
    Inherited SetArrayLength(AName,ALength);
  end;
end;
{$ENDIF VER2_6}




{ --------------------------------------------------------------------
  TDevice
  --------------------------------------------------------------------}


Procedure TDevice.SetandroidId(AIndex : Integer; const AValue : String); 

begin
  If (FandroidId=AValue) then exit;
  FandroidId:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TDevice.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TDevice.SetmanagementType(AIndex : Integer; const AValue : String); 

begin
  If (FmanagementType=AValue) then exit;
  FmanagementType:=AValue;
  MarkPropertyChanged(AIndex);
end;





{ --------------------------------------------------------------------
  TDeviceState
  --------------------------------------------------------------------}


Procedure TDeviceState.SetaccountState(AIndex : Integer; const AValue : String); 

begin
  If (FaccountState=AValue) then exit;
  FaccountState:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TDeviceState.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;





{ --------------------------------------------------------------------
  TDevicesListResponse
  --------------------------------------------------------------------}


Procedure TDevicesListResponse.Setdevice(AIndex : Integer; const AValue : TDevicesListResponseTypedeviceArray); 

begin
  If (Fdevice=AValue) then exit;
  Fdevice:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TDevicesListResponse.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;


//2.6.4. bug workaround
{$IFDEF VER2_6}
Procedure TDevicesListResponse.SetArrayLength(Const AName : String; ALength : Longint); 

begin
  Case AName of
  'device' : SetLength(Fdevice,ALength);
  else
    Inherited SetArrayLength(AName,ALength);
  end;
end;
{$ENDIF VER2_6}




{ --------------------------------------------------------------------
  TEnterprise
  --------------------------------------------------------------------}


Procedure TEnterprise.Setid(AIndex : Integer; const AValue : String); 

begin
  If (Fid=AValue) then exit;
  Fid:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TEnterprise.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TEnterprise.Setname(AIndex : Integer; const AValue : String); 

begin
  If (Fname=AValue) then exit;
  Fname:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TEnterprise.SetprimaryDomain(AIndex : Integer; const AValue : String); 

begin
  If (FprimaryDomain=AValue) then exit;
  FprimaryDomain:=AValue;
  MarkPropertyChanged(AIndex);
end;





{ --------------------------------------------------------------------
  TEnterpriseAccount
  --------------------------------------------------------------------}


Procedure TEnterpriseAccount.SetaccountEmail(AIndex : Integer; const AValue : String); 

begin
  If (FaccountEmail=AValue) then exit;
  FaccountEmail:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TEnterpriseAccount.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;





{ --------------------------------------------------------------------
  TEnterprisesListResponse
  --------------------------------------------------------------------}


Procedure TEnterprisesListResponse.Setenterprise(AIndex : Integer; const AValue : TEnterprisesListResponseTypeenterpriseArray); 

begin
  If (Fenterprise=AValue) then exit;
  Fenterprise:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TEnterprisesListResponse.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;


//2.6.4. bug workaround
{$IFDEF VER2_6}
Procedure TEnterprisesListResponse.SetArrayLength(Const AName : String; ALength : Longint); 

begin
  Case AName of
  'enterprise' : SetLength(Fenterprise,ALength);
  else
    Inherited SetArrayLength(AName,ALength);
  end;
end;
{$ENDIF VER2_6}




{ --------------------------------------------------------------------
  TEnterprisesSendTestPushNotificationResponse
  --------------------------------------------------------------------}


Procedure TEnterprisesSendTestPushNotificationResponse.SetmessageId(AIndex : Integer; const AValue : String); 

begin
  If (FmessageId=AValue) then exit;
  FmessageId:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TEnterprisesSendTestPushNotificationResponse.SettopicName(AIndex : Integer; const AValue : String); 

begin
  If (FtopicName=AValue) then exit;
  FtopicName:=AValue;
  MarkPropertyChanged(AIndex);
end;





{ --------------------------------------------------------------------
  TEntitlement
  --------------------------------------------------------------------}


Procedure TEntitlement.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TEntitlement.SetproductId(AIndex : Integer; const AValue : String); 

begin
  If (FproductId=AValue) then exit;
  FproductId:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TEntitlement.Setreason(AIndex : Integer; const AValue : String); 

begin
  If (Freason=AValue) then exit;
  Freason:=AValue;
  MarkPropertyChanged(AIndex);
end;





{ --------------------------------------------------------------------
  TEntitlementsListResponse
  --------------------------------------------------------------------}


Procedure TEntitlementsListResponse.Setentitlement(AIndex : Integer; const AValue : TEntitlementsListResponseTypeentitlementArray); 

begin
  If (Fentitlement=AValue) then exit;
  Fentitlement:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TEntitlementsListResponse.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;


//2.6.4. bug workaround
{$IFDEF VER2_6}
Procedure TEntitlementsListResponse.SetArrayLength(Const AName : String; ALength : Longint); 

begin
  Case AName of
  'entitlement' : SetLength(Fentitlement,ALength);
  else
    Inherited SetArrayLength(AName,ALength);
  end;
end;
{$ENDIF VER2_6}




{ --------------------------------------------------------------------
  TGroupLicense
  --------------------------------------------------------------------}


Procedure TGroupLicense.SetacquisitionKind(AIndex : Integer; const AValue : String); 

begin
  If (FacquisitionKind=AValue) then exit;
  FacquisitionKind:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TGroupLicense.Setapproval(AIndex : Integer; const AValue : String); 

begin
  If (Fapproval=AValue) then exit;
  Fapproval:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TGroupLicense.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TGroupLicense.SetnumProvisioned(AIndex : Integer; const AValue : integer); 

begin
  If (FnumProvisioned=AValue) then exit;
  FnumProvisioned:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TGroupLicense.SetnumPurchased(AIndex : Integer; const AValue : integer); 

begin
  If (FnumPurchased=AValue) then exit;
  FnumPurchased:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TGroupLicense.SetproductId(AIndex : Integer; const AValue : String); 

begin
  If (FproductId=AValue) then exit;
  FproductId:=AValue;
  MarkPropertyChanged(AIndex);
end;





{ --------------------------------------------------------------------
  TGroupLicenseUsersListResponse
  --------------------------------------------------------------------}


Procedure TGroupLicenseUsersListResponse.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TGroupLicenseUsersListResponse.Setuser(AIndex : Integer; const AValue : TGroupLicenseUsersListResponseTypeuserArray); 

begin
  If (Fuser=AValue) then exit;
  Fuser:=AValue;
  MarkPropertyChanged(AIndex);
end;


//2.6.4. bug workaround
{$IFDEF VER2_6}
Procedure TGroupLicenseUsersListResponse.SetArrayLength(Const AName : String; ALength : Longint); 

begin
  Case AName of
  'user' : SetLength(Fuser,ALength);
  else
    Inherited SetArrayLength(AName,ALength);
  end;
end;
{$ENDIF VER2_6}




{ --------------------------------------------------------------------
  TGroupLicensesListResponse
  --------------------------------------------------------------------}


Procedure TGroupLicensesListResponse.SetgroupLicense(AIndex : Integer; const AValue : TGroupLicensesListResponseTypegroupLicenseArray); 

begin
  If (FgroupLicense=AValue) then exit;
  FgroupLicense:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TGroupLicensesListResponse.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;


//2.6.4. bug workaround
{$IFDEF VER2_6}
Procedure TGroupLicensesListResponse.SetArrayLength(Const AName : String; ALength : Longint); 

begin
  Case AName of
  'grouplicense' : SetLength(FgroupLicense,ALength);
  else
    Inherited SetArrayLength(AName,ALength);
  end;
end;
{$ENDIF VER2_6}




{ --------------------------------------------------------------------
  TInstall
  --------------------------------------------------------------------}


Procedure TInstall.SetinstallState(AIndex : Integer; const AValue : String); 

begin
  If (FinstallState=AValue) then exit;
  FinstallState:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TInstall.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TInstall.SetproductId(AIndex : Integer; const AValue : String); 

begin
  If (FproductId=AValue) then exit;
  FproductId:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TInstall.SetversionCode(AIndex : Integer; const AValue : integer); 

begin
  If (FversionCode=AValue) then exit;
  FversionCode:=AValue;
  MarkPropertyChanged(AIndex);
end;





{ --------------------------------------------------------------------
  TInstallsListResponse
  --------------------------------------------------------------------}


Procedure TInstallsListResponse.Setinstall(AIndex : Integer; const AValue : TInstallsListResponseTypeinstallArray); 

begin
  If (Finstall=AValue) then exit;
  Finstall:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TInstallsListResponse.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;


//2.6.4. bug workaround
{$IFDEF VER2_6}
Procedure TInstallsListResponse.SetArrayLength(Const AName : String; ALength : Longint); 

begin
  Case AName of
  'install' : SetLength(Finstall,ALength);
  else
    Inherited SetArrayLength(AName,ALength);
  end;
end;
{$ENDIF VER2_6}




{ --------------------------------------------------------------------
  TLocalizedText
  --------------------------------------------------------------------}


Procedure TLocalizedText.Setlocale(AIndex : Integer; const AValue : String); 

begin
  If (Flocale=AValue) then exit;
  Flocale:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TLocalizedText.Settext(AIndex : Integer; const AValue : String); 

begin
  If (Ftext=AValue) then exit;
  Ftext:=AValue;
  MarkPropertyChanged(AIndex);
end;





{ --------------------------------------------------------------------
  TPageInfo
  --------------------------------------------------------------------}


Procedure TPageInfo.SetresultPerPage(AIndex : Integer; const AValue : integer); 

begin
  If (FresultPerPage=AValue) then exit;
  FresultPerPage:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TPageInfo.SetstartIndex(AIndex : Integer; const AValue : integer); 

begin
  If (FstartIndex=AValue) then exit;
  FstartIndex:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TPageInfo.SettotalResults(AIndex : Integer; const AValue : integer); 

begin
  If (FtotalResults=AValue) then exit;
  FtotalResults:=AValue;
  MarkPropertyChanged(AIndex);
end;





{ --------------------------------------------------------------------
  TPermission
  --------------------------------------------------------------------}


Procedure TPermission.Setdescription(AIndex : Integer; const AValue : String); 

begin
  If (Fdescription=AValue) then exit;
  Fdescription:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TPermission.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TPermission.Setname(AIndex : Integer; const AValue : String); 

begin
  If (Fname=AValue) then exit;
  Fname:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TPermission.SetpermissionId(AIndex : Integer; const AValue : String); 

begin
  If (FpermissionId=AValue) then exit;
  FpermissionId:=AValue;
  MarkPropertyChanged(AIndex);
end;





{ --------------------------------------------------------------------
  TProduct
  --------------------------------------------------------------------}


Procedure TProduct.SetappVersion(AIndex : Integer; const AValue : TProductTypeappVersionArray); 

begin
  If (FappVersion=AValue) then exit;
  FappVersion:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TProduct.SetauthorName(AIndex : Integer; const AValue : String); 

begin
  If (FauthorName=AValue) then exit;
  FauthorName:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TProduct.SetdetailsUrl(AIndex : Integer; const AValue : String); 

begin
  If (FdetailsUrl=AValue) then exit;
  FdetailsUrl:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TProduct.SetdistributionChannel(AIndex : Integer; const AValue : String); 

begin
  If (FdistributionChannel=AValue) then exit;
  FdistributionChannel:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TProduct.SeticonUrl(AIndex : Integer; const AValue : String); 

begin
  If (FiconUrl=AValue) then exit;
  FiconUrl:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TProduct.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TProduct.SetproductId(AIndex : Integer; const AValue : String); 

begin
  If (FproductId=AValue) then exit;
  FproductId:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TProduct.SetproductPricing(AIndex : Integer; const AValue : String); 

begin
  If (FproductPricing=AValue) then exit;
  FproductPricing:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TProduct.SetrequiresContainerApp(AIndex : Integer; const AValue : boolean); 

begin
  If (FrequiresContainerApp=AValue) then exit;
  FrequiresContainerApp:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TProduct.SetsmallIconUrl(AIndex : Integer; const AValue : String); 

begin
  If (FsmallIconUrl=AValue) then exit;
  FsmallIconUrl:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TProduct.Settitle(AIndex : Integer; const AValue : String); 

begin
  If (Ftitle=AValue) then exit;
  Ftitle:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TProduct.SetworkDetailsUrl(AIndex : Integer; const AValue : String); 

begin
  If (FworkDetailsUrl=AValue) then exit;
  FworkDetailsUrl:=AValue;
  MarkPropertyChanged(AIndex);
end;


//2.6.4. bug workaround
{$IFDEF VER2_6}
Procedure TProduct.SetArrayLength(Const AName : String; ALength : Longint); 

begin
  Case AName of
  'appversion' : SetLength(FappVersion,ALength);
  else
    Inherited SetArrayLength(AName,ALength);
  end;
end;
{$ENDIF VER2_6}




{ --------------------------------------------------------------------
  TProductPermission
  --------------------------------------------------------------------}


Procedure TProductPermission.SetpermissionId(AIndex : Integer; const AValue : String); 

begin
  If (FpermissionId=AValue) then exit;
  FpermissionId:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TProductPermission.Setstate(AIndex : Integer; const AValue : String); 

begin
  If (Fstate=AValue) then exit;
  Fstate:=AValue;
  MarkPropertyChanged(AIndex);
end;





{ --------------------------------------------------------------------
  TProductPermissions
  --------------------------------------------------------------------}


Procedure TProductPermissions.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TProductPermissions.Setpermission(AIndex : Integer; const AValue : TProductPermissionsTypepermissionArray); 

begin
  If (Fpermission=AValue) then exit;
  Fpermission:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TProductPermissions.SetproductId(AIndex : Integer; const AValue : String); 

begin
  If (FproductId=AValue) then exit;
  FproductId:=AValue;
  MarkPropertyChanged(AIndex);
end;


//2.6.4. bug workaround
{$IFDEF VER2_6}
Procedure TProductPermissions.SetArrayLength(Const AName : String; ALength : Longint); 

begin
  Case AName of
  'permission' : SetLength(Fpermission,ALength);
  else
    Inherited SetArrayLength(AName,ALength);
  end;
end;
{$ENDIF VER2_6}




{ --------------------------------------------------------------------
  TProductSet
  --------------------------------------------------------------------}


Procedure TProductSet.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TProductSet.SetproductId(AIndex : Integer; const AValue : TStringArray); 

begin
  If (FproductId=AValue) then exit;
  FproductId:=AValue;
  MarkPropertyChanged(AIndex);
end;


//2.6.4. bug workaround
{$IFDEF VER2_6}
Procedure TProductSet.SetArrayLength(Const AName : String; ALength : Longint); 

begin
  Case AName of
  'productid' : SetLength(FproductId,ALength);
  else
    Inherited SetArrayLength(AName,ALength);
  end;
end;
{$ENDIF VER2_6}




{ --------------------------------------------------------------------
  TProductsApproveRequest
  --------------------------------------------------------------------}


Procedure TProductsApproveRequest.SetapprovalUrlInfo(AIndex : Integer; const AValue : TApprovalUrlInfo); 

begin
  If (FapprovalUrlInfo=AValue) then exit;
  FapprovalUrlInfo:=AValue;
  MarkPropertyChanged(AIndex);
end;





{ --------------------------------------------------------------------
  TProductsGenerateApprovalUrlResponse
  --------------------------------------------------------------------}


Procedure TProductsGenerateApprovalUrlResponse.Seturl(AIndex : Integer; const AValue : String); 

begin
  If (Furl=AValue) then exit;
  Furl:=AValue;
  MarkPropertyChanged(AIndex);
end;





{ --------------------------------------------------------------------
  TProductsListResponse
  --------------------------------------------------------------------}


Procedure TProductsListResponse.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TProductsListResponse.SetpageInfo(AIndex : Integer; const AValue : TPageInfo); 

begin
  If (FpageInfo=AValue) then exit;
  FpageInfo:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TProductsListResponse.Setproduct(AIndex : Integer; const AValue : TProductsListResponseTypeproductArray); 

begin
  If (Fproduct=AValue) then exit;
  Fproduct:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TProductsListResponse.SettokenPagination(AIndex : Integer; const AValue : TTokenPagination); 

begin
  If (FtokenPagination=AValue) then exit;
  FtokenPagination:=AValue;
  MarkPropertyChanged(AIndex);
end;


//2.6.4. bug workaround
{$IFDEF VER2_6}
Procedure TProductsListResponse.SetArrayLength(Const AName : String; ALength : Longint); 

begin
  Case AName of
  'product' : SetLength(Fproduct,ALength);
  else
    Inherited SetArrayLength(AName,ALength);
  end;
end;
{$ENDIF VER2_6}




{ --------------------------------------------------------------------
  TStoreCluster
  --------------------------------------------------------------------}


Procedure TStoreCluster.Setid(AIndex : Integer; const AValue : String); 

begin
  If (Fid=AValue) then exit;
  Fid:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TStoreCluster.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TStoreCluster.Setname(AIndex : Integer; const AValue : TStoreClusterTypenameArray); 

begin
  If (Fname=AValue) then exit;
  Fname:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TStoreCluster.SetorderInPage(AIndex : Integer; const AValue : String); 

begin
  If (ForderInPage=AValue) then exit;
  ForderInPage:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TStoreCluster.SetproductId(AIndex : Integer; const AValue : TStringArray); 

begin
  If (FproductId=AValue) then exit;
  FproductId:=AValue;
  MarkPropertyChanged(AIndex);
end;


//2.6.4. bug workaround
{$IFDEF VER2_6}
Procedure TStoreCluster.SetArrayLength(Const AName : String; ALength : Longint); 

begin
  Case AName of
  'name' : SetLength(Fname,ALength);
  'productid' : SetLength(FproductId,ALength);
  else
    Inherited SetArrayLength(AName,ALength);
  end;
end;
{$ENDIF VER2_6}




{ --------------------------------------------------------------------
  TStoreLayout
  --------------------------------------------------------------------}


Procedure TStoreLayout.SethomepageId(AIndex : Integer; const AValue : String); 

begin
  If (FhomepageId=AValue) then exit;
  FhomepageId:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TStoreLayout.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;





{ --------------------------------------------------------------------
  TStoreLayoutClustersListResponse
  --------------------------------------------------------------------}


Procedure TStoreLayoutClustersListResponse.Setcluster(AIndex : Integer; const AValue : TStoreLayoutClustersListResponseTypeclusterArray); 

begin
  If (Fcluster=AValue) then exit;
  Fcluster:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TStoreLayoutClustersListResponse.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;


//2.6.4. bug workaround
{$IFDEF VER2_6}
Procedure TStoreLayoutClustersListResponse.SetArrayLength(Const AName : String; ALength : Longint); 

begin
  Case AName of
  'cluster' : SetLength(Fcluster,ALength);
  else
    Inherited SetArrayLength(AName,ALength);
  end;
end;
{$ENDIF VER2_6}




{ --------------------------------------------------------------------
  TStoreLayoutPagesListResponse
  --------------------------------------------------------------------}


Procedure TStoreLayoutPagesListResponse.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TStoreLayoutPagesListResponse.Setpage(AIndex : Integer; const AValue : TStoreLayoutPagesListResponseTypepageArray); 

begin
  If (Fpage=AValue) then exit;
  Fpage:=AValue;
  MarkPropertyChanged(AIndex);
end;


//2.6.4. bug workaround
{$IFDEF VER2_6}
Procedure TStoreLayoutPagesListResponse.SetArrayLength(Const AName : String; ALength : Longint); 

begin
  Case AName of
  'page' : SetLength(Fpage,ALength);
  else
    Inherited SetArrayLength(AName,ALength);
  end;
end;
{$ENDIF VER2_6}




{ --------------------------------------------------------------------
  TStorePage
  --------------------------------------------------------------------}


Procedure TStorePage.Setid(AIndex : Integer; const AValue : String); 

begin
  If (Fid=AValue) then exit;
  Fid:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TStorePage.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TStorePage.Setlink(AIndex : Integer; const AValue : TStringArray); 

begin
  If (Flink=AValue) then exit;
  Flink:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TStorePage.Setname(AIndex : Integer; const AValue : TStorePageTypenameArray); 

begin
  If (Fname=AValue) then exit;
  Fname:=AValue;
  MarkPropertyChanged(AIndex);
end;


//2.6.4. bug workaround
{$IFDEF VER2_6}
Procedure TStorePage.SetArrayLength(Const AName : String; ALength : Longint); 

begin
  Case AName of
  'link' : SetLength(Flink,ALength);
  'name' : SetLength(Fname,ALength);
  else
    Inherited SetArrayLength(AName,ALength);
  end;
end;
{$ENDIF VER2_6}




{ --------------------------------------------------------------------
  TTokenPagination
  --------------------------------------------------------------------}


Procedure TTokenPagination.SetnextPageToken(AIndex : Integer; const AValue : String); 

begin
  If (FnextPageToken=AValue) then exit;
  FnextPageToken:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TTokenPagination.SetpreviousPageToken(AIndex : Integer; const AValue : String); 

begin
  If (FpreviousPageToken=AValue) then exit;
  FpreviousPageToken:=AValue;
  MarkPropertyChanged(AIndex);
end;





{ --------------------------------------------------------------------
  TUser
  --------------------------------------------------------------------}


Procedure TUser.Setid(AIndex : Integer; const AValue : String); 

begin
  If (Fid=AValue) then exit;
  Fid:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TUser.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TUser.SetprimaryEmail(AIndex : Integer; const AValue : String); 

begin
  If (FprimaryEmail=AValue) then exit;
  FprimaryEmail:=AValue;
  MarkPropertyChanged(AIndex);
end;





{ --------------------------------------------------------------------
  TUserToken
  --------------------------------------------------------------------}


Procedure TUserToken.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TUserToken.Settoken(AIndex : Integer; const AValue : String); 

begin
  If (Ftoken=AValue) then exit;
  Ftoken:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TUserToken.SetuserId(AIndex : Integer; const AValue : String); 

begin
  If (FuserId=AValue) then exit;
  FuserId:=AValue;
  MarkPropertyChanged(AIndex);
end;





{ --------------------------------------------------------------------
  TUsersListResponse
  --------------------------------------------------------------------}


Procedure TUsersListResponse.Setkind(AIndex : Integer; const AValue : String); 

begin
  If (Fkind=AValue) then exit;
  Fkind:=AValue;
  MarkPropertyChanged(AIndex);
end;



Procedure TUsersListResponse.Setuser(AIndex : Integer; const AValue : TUsersListResponseTypeuserArray); 

begin
  If (Fuser=AValue) then exit;
  Fuser:=AValue;
  MarkPropertyChanged(AIndex);
end;


//2.6.4. bug workaround
{$IFDEF VER2_6}
Procedure TUsersListResponse.SetArrayLength(Const AName : String; ALength : Longint); 

begin
  Case AName of
  'user' : SetLength(Fuser,ALength);
  else
    Inherited SetArrayLength(AName,ALength);
  end;
end;
{$ENDIF VER2_6}




{ --------------------------------------------------------------------
  TCollectionsResource
  --------------------------------------------------------------------}


Class Function TCollectionsResource.ResourceName : String;

begin
  Result:='collections';
end;

Class Function TCollectionsResource.DefaultAPI : TGoogleAPIClass;

begin
  Result:=TandroidenterpriseAPI;
end;

Procedure TCollectionsResource.Delete(collectionId: string; enterpriseId: string);

Const
  _HTTPMethod = 'DELETE';
  _Path       = 'enterprises/{enterpriseId}/collections/{collectionId}';
  _Methodid   = 'androidenterprise.collections.delete';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['collectionId',collectionId,'enterpriseId',enterpriseId]);
  ServiceCall(_HTTPMethod,_P,'',Nil,Nil);
end;

Function TCollectionsResource.Get(collectionId: string; enterpriseId: string) : TCollection;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}/collections/{collectionId}';
  _Methodid   = 'androidenterprise.collections.get';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['collectionId',collectionId,'enterpriseId',enterpriseId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TCollection) as TCollection;
end;

Function TCollectionsResource.Insert(enterpriseId: string; aCollection : TCollection) : TCollection;

Const
  _HTTPMethod = 'POST';
  _Path       = 'enterprises/{enterpriseId}/collections';
  _Methodid   = 'androidenterprise.collections.insert';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',aCollection,TCollection) as TCollection;
end;

Function TCollectionsResource.List(enterpriseId: string) : TCollectionsListResponse;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}/collections';
  _Methodid   = 'androidenterprise.collections.list';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TCollectionsListResponse) as TCollectionsListResponse;
end;

Function TCollectionsResource.Patch(collectionId: string; enterpriseId: string; aCollection : TCollection) : TCollection;

Const
  _HTTPMethod = 'PATCH';
  _Path       = 'enterprises/{enterpriseId}/collections/{collectionId}';
  _Methodid   = 'androidenterprise.collections.patch';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['collectionId',collectionId,'enterpriseId',enterpriseId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',aCollection,TCollection) as TCollection;
end;

Function TCollectionsResource.Update(collectionId: string; enterpriseId: string; aCollection : TCollection) : TCollection;

Const
  _HTTPMethod = 'PUT';
  _Path       = 'enterprises/{enterpriseId}/collections/{collectionId}';
  _Methodid   = 'androidenterprise.collections.update';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['collectionId',collectionId,'enterpriseId',enterpriseId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',aCollection,TCollection) as TCollection;
end;



{ --------------------------------------------------------------------
  TCollectionviewersResource
  --------------------------------------------------------------------}


Class Function TCollectionviewersResource.ResourceName : String;

begin
  Result:='collectionviewers';
end;

Class Function TCollectionviewersResource.DefaultAPI : TGoogleAPIClass;

begin
  Result:=TandroidenterpriseAPI;
end;

Procedure TCollectionviewersResource.Delete(collectionId: string; enterpriseId: string; userId: string);

Const
  _HTTPMethod = 'DELETE';
  _Path       = 'enterprises/{enterpriseId}/collections/{collectionId}/users/{userId}';
  _Methodid   = 'androidenterprise.collectionviewers.delete';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['collectionId',collectionId,'enterpriseId',enterpriseId,'userId',userId]);
  ServiceCall(_HTTPMethod,_P,'',Nil,Nil);
end;

Function TCollectionviewersResource.Get(collectionId: string; enterpriseId: string; userId: string) : TUser;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}/collections/{collectionId}/users/{userId}';
  _Methodid   = 'androidenterprise.collectionviewers.get';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['collectionId',collectionId,'enterpriseId',enterpriseId,'userId',userId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TUser) as TUser;
end;

Function TCollectionviewersResource.List(collectionId: string; enterpriseId: string) : TCollectionViewersListResponse;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}/collections/{collectionId}/users';
  _Methodid   = 'androidenterprise.collectionviewers.list';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['collectionId',collectionId,'enterpriseId',enterpriseId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TCollectionViewersListResponse) as TCollectionViewersListResponse;
end;

Function TCollectionviewersResource.Patch(collectionId: string; enterpriseId: string; userId: string; aUser : TUser) : TUser;

Const
  _HTTPMethod = 'PATCH';
  _Path       = 'enterprises/{enterpriseId}/collections/{collectionId}/users/{userId}';
  _Methodid   = 'androidenterprise.collectionviewers.patch';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['collectionId',collectionId,'enterpriseId',enterpriseId,'userId',userId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',aUser,TUser) as TUser;
end;

Function TCollectionviewersResource.Update(collectionId: string; enterpriseId: string; userId: string; aUser : TUser) : TUser;

Const
  _HTTPMethod = 'PUT';
  _Path       = 'enterprises/{enterpriseId}/collections/{collectionId}/users/{userId}';
  _Methodid   = 'androidenterprise.collectionviewers.update';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['collectionId',collectionId,'enterpriseId',enterpriseId,'userId',userId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',aUser,TUser) as TUser;
end;



{ --------------------------------------------------------------------
  TDevicesResource
  --------------------------------------------------------------------}


Class Function TDevicesResource.ResourceName : String;

begin
  Result:='devices';
end;

Class Function TDevicesResource.DefaultAPI : TGoogleAPIClass;

begin
  Result:=TandroidenterpriseAPI;
end;

Function TDevicesResource.Get(deviceId: string; enterpriseId: string; userId: string) : TDevice;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}/users/{userId}/devices/{deviceId}';
  _Methodid   = 'androidenterprise.devices.get';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['deviceId',deviceId,'enterpriseId',enterpriseId,'userId',userId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TDevice) as TDevice;
end;

Function TDevicesResource.GetState(deviceId: string; enterpriseId: string; userId: string) : TDeviceState;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}/users/{userId}/devices/{deviceId}/state';
  _Methodid   = 'androidenterprise.devices.getState';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['deviceId',deviceId,'enterpriseId',enterpriseId,'userId',userId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TDeviceState) as TDeviceState;
end;

Function TDevicesResource.List(enterpriseId: string; userId: string) : TDevicesListResponse;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}/users/{userId}/devices';
  _Methodid   = 'androidenterprise.devices.list';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId,'userId',userId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TDevicesListResponse) as TDevicesListResponse;
end;

Function TDevicesResource.SetState(deviceId: string; enterpriseId: string; userId: string; aDeviceState : TDeviceState) : TDeviceState;

Const
  _HTTPMethod = 'PUT';
  _Path       = 'enterprises/{enterpriseId}/users/{userId}/devices/{deviceId}/state';
  _Methodid   = 'androidenterprise.devices.setState';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['deviceId',deviceId,'enterpriseId',enterpriseId,'userId',userId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',aDeviceState,TDeviceState) as TDeviceState;
end;



{ --------------------------------------------------------------------
  TEnterprisesResource
  --------------------------------------------------------------------}


Class Function TEnterprisesResource.ResourceName : String;

begin
  Result:='enterprises';
end;

Class Function TEnterprisesResource.DefaultAPI : TGoogleAPIClass;

begin
  Result:=TandroidenterpriseAPI;
end;

Procedure TEnterprisesResource.Delete(enterpriseId: string);

Const
  _HTTPMethod = 'DELETE';
  _Path       = 'enterprises/{enterpriseId}';
  _Methodid   = 'androidenterprise.enterprises.delete';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId]);
  ServiceCall(_HTTPMethod,_P,'',Nil,Nil);
end;

Function TEnterprisesResource.Enroll(aEnterprise : TEnterprise; AQuery : string = '') : TEnterprise;

Const
  _HTTPMethod = 'POST';
  _Path       = 'enterprises/enroll';
  _Methodid   = 'androidenterprise.enterprises.enroll';

begin
  Result:=ServiceCall(_HTTPMethod,_Path,AQuery,aEnterprise,TEnterprise) as TEnterprise;
end;


Function TEnterprisesResource.Enroll(aEnterprise : TEnterprise; AQuery : TEnterprisesenrollOptions) : TEnterprise;

Var
  _Q : String;

begin
  _Q:='';
  AddToQuery(_Q,'token',AQuery.token);
  Result:=Enroll(aEnterprise,_Q);
end;

Function TEnterprisesResource.Get(enterpriseId: string) : TEnterprise;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}';
  _Methodid   = 'androidenterprise.enterprises.get';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TEnterprise) as TEnterprise;
end;

Function TEnterprisesResource.GetStoreLayout(enterpriseId: string) : TStoreLayout;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}/storeLayout';
  _Methodid   = 'androidenterprise.enterprises.getStoreLayout';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TStoreLayout) as TStoreLayout;
end;

Function TEnterprisesResource.Insert(aEnterprise : TEnterprise; AQuery : string = '') : TEnterprise;

Const
  _HTTPMethod = 'POST';
  _Path       = 'enterprises';
  _Methodid   = 'androidenterprise.enterprises.insert';

begin
  Result:=ServiceCall(_HTTPMethod,_Path,AQuery,aEnterprise,TEnterprise) as TEnterprise;
end;


Function TEnterprisesResource.Insert(aEnterprise : TEnterprise; AQuery : TEnterprisesinsertOptions) : TEnterprise;

Var
  _Q : String;

begin
  _Q:='';
  AddToQuery(_Q,'token',AQuery.token);
  Result:=Insert(aEnterprise,_Q);
end;

Function TEnterprisesResource.List(AQuery : string = '') : TEnterprisesListResponse;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises';
  _Methodid   = 'androidenterprise.enterprises.list';

begin
  Result:=ServiceCall(_HTTPMethod,_Path,AQuery,Nil,TEnterprisesListResponse) as TEnterprisesListResponse;
end;


Function TEnterprisesResource.List(AQuery : TEnterpriseslistOptions) : TEnterprisesListResponse;

Var
  _Q : String;

begin
  _Q:='';
  AddToQuery(_Q,'domain',AQuery.domain);
  Result:=List(_Q);
end;

Function TEnterprisesResource.SendTestPushNotification(enterpriseId: string) : TEnterprisesSendTestPushNotificationResponse;

Const
  _HTTPMethod = 'POST';
  _Path       = 'enterprises/{enterpriseId}/sendTestPushNotification';
  _Methodid   = 'androidenterprise.enterprises.sendTestPushNotification';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TEnterprisesSendTestPushNotificationResponse) as TEnterprisesSendTestPushNotificationResponse;
end;

Function TEnterprisesResource.SetAccount(enterpriseId: string; aEnterpriseAccount : TEnterpriseAccount) : TEnterpriseAccount;

Const
  _HTTPMethod = 'PUT';
  _Path       = 'enterprises/{enterpriseId}/account';
  _Methodid   = 'androidenterprise.enterprises.setAccount';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',aEnterpriseAccount,TEnterpriseAccount) as TEnterpriseAccount;
end;

Function TEnterprisesResource.SetStoreLayout(enterpriseId: string; aStoreLayout : TStoreLayout) : TStoreLayout;

Const
  _HTTPMethod = 'PUT';
  _Path       = 'enterprises/{enterpriseId}/storeLayout';
  _Methodid   = 'androidenterprise.enterprises.setStoreLayout';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',aStoreLayout,TStoreLayout) as TStoreLayout;
end;

Procedure TEnterprisesResource.Unenroll(enterpriseId: string);

Const
  _HTTPMethod = 'POST';
  _Path       = 'enterprises/{enterpriseId}/unenroll';
  _Methodid   = 'androidenterprise.enterprises.unenroll';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId]);
  ServiceCall(_HTTPMethod,_P,'',Nil,Nil);
end;



{ --------------------------------------------------------------------
  TEntitlementsResource
  --------------------------------------------------------------------}


Class Function TEntitlementsResource.ResourceName : String;

begin
  Result:='entitlements';
end;

Class Function TEntitlementsResource.DefaultAPI : TGoogleAPIClass;

begin
  Result:=TandroidenterpriseAPI;
end;

Procedure TEntitlementsResource.Delete(enterpriseId: string; entitlementId: string; userId: string);

Const
  _HTTPMethod = 'DELETE';
  _Path       = 'enterprises/{enterpriseId}/users/{userId}/entitlements/{entitlementId}';
  _Methodid   = 'androidenterprise.entitlements.delete';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId,'entitlementId',entitlementId,'userId',userId]);
  ServiceCall(_HTTPMethod,_P,'',Nil,Nil);
end;

Function TEntitlementsResource.Get(enterpriseId: string; entitlementId: string; userId: string) : TEntitlement;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}/users/{userId}/entitlements/{entitlementId}';
  _Methodid   = 'androidenterprise.entitlements.get';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId,'entitlementId',entitlementId,'userId',userId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TEntitlement) as TEntitlement;
end;

Function TEntitlementsResource.List(enterpriseId: string; userId: string) : TEntitlementsListResponse;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}/users/{userId}/entitlements';
  _Methodid   = 'androidenterprise.entitlements.list';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId,'userId',userId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TEntitlementsListResponse) as TEntitlementsListResponse;
end;

Function TEntitlementsResource.Patch(enterpriseId: string; entitlementId: string; userId: string; aEntitlement : TEntitlement; AQuery : string = '') : TEntitlement;

Const
  _HTTPMethod = 'PATCH';
  _Path       = 'enterprises/{enterpriseId}/users/{userId}/entitlements/{entitlementId}';
  _Methodid   = 'androidenterprise.entitlements.patch';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId,'entitlementId',entitlementId,'userId',userId]);
  Result:=ServiceCall(_HTTPMethod,_P,AQuery,aEntitlement,TEntitlement) as TEntitlement;
end;


Function TEntitlementsResource.Patch(enterpriseId: string; entitlementId: string; userId: string; aEntitlement : TEntitlement; AQuery : TEntitlementspatchOptions) : TEntitlement;

Var
  _Q : String;

begin
  _Q:='';
  AddToQuery(_Q,'install',AQuery.install);
  Result:=Patch(enterpriseId,entitlementId,userId,aEntitlement,_Q);
end;

Function TEntitlementsResource.Update(enterpriseId: string; entitlementId: string; userId: string; aEntitlement : TEntitlement; AQuery : string = '') : TEntitlement;

Const
  _HTTPMethod = 'PUT';
  _Path       = 'enterprises/{enterpriseId}/users/{userId}/entitlements/{entitlementId}';
  _Methodid   = 'androidenterprise.entitlements.update';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId,'entitlementId',entitlementId,'userId',userId]);
  Result:=ServiceCall(_HTTPMethod,_P,AQuery,aEntitlement,TEntitlement) as TEntitlement;
end;


Function TEntitlementsResource.Update(enterpriseId: string; entitlementId: string; userId: string; aEntitlement : TEntitlement; AQuery : TEntitlementsupdateOptions) : TEntitlement;

Var
  _Q : String;

begin
  _Q:='';
  AddToQuery(_Q,'install',AQuery.install);
  Result:=Update(enterpriseId,entitlementId,userId,aEntitlement,_Q);
end;



{ --------------------------------------------------------------------
  TGrouplicensesResource
  --------------------------------------------------------------------}


Class Function TGrouplicensesResource.ResourceName : String;

begin
  Result:='grouplicenses';
end;

Class Function TGrouplicensesResource.DefaultAPI : TGoogleAPIClass;

begin
  Result:=TandroidenterpriseAPI;
end;

Function TGrouplicensesResource.Get(enterpriseId: string; groupLicenseId: string) : TGroupLicense;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}/groupLicenses/{groupLicenseId}';
  _Methodid   = 'androidenterprise.grouplicenses.get';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId,'groupLicenseId',groupLicenseId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TGroupLicense) as TGroupLicense;
end;

Function TGrouplicensesResource.List(enterpriseId: string) : TGroupLicensesListResponse;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}/groupLicenses';
  _Methodid   = 'androidenterprise.grouplicenses.list';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TGroupLicensesListResponse) as TGroupLicensesListResponse;
end;



{ --------------------------------------------------------------------
  TGrouplicenseusersResource
  --------------------------------------------------------------------}


Class Function TGrouplicenseusersResource.ResourceName : String;

begin
  Result:='grouplicenseusers';
end;

Class Function TGrouplicenseusersResource.DefaultAPI : TGoogleAPIClass;

begin
  Result:=TandroidenterpriseAPI;
end;

Function TGrouplicenseusersResource.List(enterpriseId: string; groupLicenseId: string) : TGroupLicenseUsersListResponse;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}/groupLicenses/{groupLicenseId}/users';
  _Methodid   = 'androidenterprise.grouplicenseusers.list';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId,'groupLicenseId',groupLicenseId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TGroupLicenseUsersListResponse) as TGroupLicenseUsersListResponse;
end;



{ --------------------------------------------------------------------
  TInstallsResource
  --------------------------------------------------------------------}


Class Function TInstallsResource.ResourceName : String;

begin
  Result:='installs';
end;

Class Function TInstallsResource.DefaultAPI : TGoogleAPIClass;

begin
  Result:=TandroidenterpriseAPI;
end;

Procedure TInstallsResource.Delete(deviceId: string; enterpriseId: string; installId: string; userId: string);

Const
  _HTTPMethod = 'DELETE';
  _Path       = 'enterprises/{enterpriseId}/users/{userId}/devices/{deviceId}/installs/{installId}';
  _Methodid   = 'androidenterprise.installs.delete';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['deviceId',deviceId,'enterpriseId',enterpriseId,'installId',installId,'userId',userId]);
  ServiceCall(_HTTPMethod,_P,'',Nil,Nil);
end;

Function TInstallsResource.Get(deviceId: string; enterpriseId: string; installId: string; userId: string) : TInstall;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}/users/{userId}/devices/{deviceId}/installs/{installId}';
  _Methodid   = 'androidenterprise.installs.get';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['deviceId',deviceId,'enterpriseId',enterpriseId,'installId',installId,'userId',userId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TInstall) as TInstall;
end;

Function TInstallsResource.List(deviceId: string; enterpriseId: string; userId: string) : TInstallsListResponse;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}/users/{userId}/devices/{deviceId}/installs';
  _Methodid   = 'androidenterprise.installs.list';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['deviceId',deviceId,'enterpriseId',enterpriseId,'userId',userId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TInstallsListResponse) as TInstallsListResponse;
end;

Function TInstallsResource.Patch(deviceId: string; enterpriseId: string; installId: string; userId: string; aInstall : TInstall) : TInstall;

Const
  _HTTPMethod = 'PATCH';
  _Path       = 'enterprises/{enterpriseId}/users/{userId}/devices/{deviceId}/installs/{installId}';
  _Methodid   = 'androidenterprise.installs.patch';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['deviceId',deviceId,'enterpriseId',enterpriseId,'installId',installId,'userId',userId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',aInstall,TInstall) as TInstall;
end;

Function TInstallsResource.Update(deviceId: string; enterpriseId: string; installId: string; userId: string; aInstall : TInstall) : TInstall;

Const
  _HTTPMethod = 'PUT';
  _Path       = 'enterprises/{enterpriseId}/users/{userId}/devices/{deviceId}/installs/{installId}';
  _Methodid   = 'androidenterprise.installs.update';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['deviceId',deviceId,'enterpriseId',enterpriseId,'installId',installId,'userId',userId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',aInstall,TInstall) as TInstall;
end;



{ --------------------------------------------------------------------
  TPermissionsResource
  --------------------------------------------------------------------}


Class Function TPermissionsResource.ResourceName : String;

begin
  Result:='permissions';
end;

Class Function TPermissionsResource.DefaultAPI : TGoogleAPIClass;

begin
  Result:=TandroidenterpriseAPI;
end;

Function TPermissionsResource.Get(permissionId: string; AQuery : string = '') : TPermission;

Const
  _HTTPMethod = 'GET';
  _Path       = 'permissions/{permissionId}';
  _Methodid   = 'androidenterprise.permissions.get';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['permissionId',permissionId]);
  Result:=ServiceCall(_HTTPMethod,_P,AQuery,Nil,TPermission) as TPermission;
end;


Function TPermissionsResource.Get(permissionId: string; AQuery : TPermissionsgetOptions) : TPermission;

Var
  _Q : String;

begin
  _Q:='';
  AddToQuery(_Q,'language',AQuery.language);
  Result:=Get(permissionId,_Q);
end;



{ --------------------------------------------------------------------
  TProductsResource
  --------------------------------------------------------------------}


Class Function TProductsResource.ResourceName : String;

begin
  Result:='products';
end;

Class Function TProductsResource.DefaultAPI : TGoogleAPIClass;

begin
  Result:=TandroidenterpriseAPI;
end;

Procedure TProductsResource.Approve(enterpriseId: string; productId: string; aProductsApproveRequest : TProductsApproveRequest);

Const
  _HTTPMethod = 'POST';
  _Path       = 'enterprises/{enterpriseId}/products/{productId}/approve';
  _Methodid   = 'androidenterprise.products.approve';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId,'productId',productId]);
  ServiceCall(_HTTPMethod,_P,'',aProductsApproveRequest,Nil);
end;

Function TProductsResource.GenerateApprovalUrl(enterpriseId: string; productId: string; AQuery : string = '') : TProductsGenerateApprovalUrlResponse;

Const
  _HTTPMethod = 'POST';
  _Path       = 'enterprises/{enterpriseId}/products/{productId}/generateApprovalUrl';
  _Methodid   = 'androidenterprise.products.generateApprovalUrl';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId,'productId',productId]);
  Result:=ServiceCall(_HTTPMethod,_P,AQuery,Nil,TProductsGenerateApprovalUrlResponse) as TProductsGenerateApprovalUrlResponse;
end;


Function TProductsResource.GenerateApprovalUrl(enterpriseId: string; productId: string; AQuery : TProductsgenerateApprovalUrlOptions) : TProductsGenerateApprovalUrlResponse;

Var
  _Q : String;

begin
  _Q:='';
  AddToQuery(_Q,'languageCode',AQuery.languageCode);
  Result:=GenerateApprovalUrl(enterpriseId,productId,_Q);
end;

Function TProductsResource.Get(enterpriseId: string; productId: string; AQuery : string = '') : TProduct;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}/products/{productId}';
  _Methodid   = 'androidenterprise.products.get';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId,'productId',productId]);
  Result:=ServiceCall(_HTTPMethod,_P,AQuery,Nil,TProduct) as TProduct;
end;


Function TProductsResource.Get(enterpriseId: string; productId: string; AQuery : TProductsgetOptions) : TProduct;

Var
  _Q : String;

begin
  _Q:='';
  AddToQuery(_Q,'language',AQuery.language);
  Result:=Get(enterpriseId,productId,_Q);
end;

Function TProductsResource.GetAppRestrictionsSchema(enterpriseId: string; productId: string; AQuery : string = '') : TAppRestrictionsSchema;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}/products/{productId}/appRestrictionsSchema';
  _Methodid   = 'androidenterprise.products.getAppRestrictionsSchema';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId,'productId',productId]);
  Result:=ServiceCall(_HTTPMethod,_P,AQuery,Nil,TAppRestrictionsSchema) as TAppRestrictionsSchema;
end;


Function TProductsResource.GetAppRestrictionsSchema(enterpriseId: string; productId: string; AQuery : TProductsgetAppRestrictionsSchemaOptions) : TAppRestrictionsSchema;

Var
  _Q : String;

begin
  _Q:='';
  AddToQuery(_Q,'language',AQuery.language);
  Result:=GetAppRestrictionsSchema(enterpriseId,productId,_Q);
end;

Function TProductsResource.GetPermissions(enterpriseId: string; productId: string) : TProductPermissions;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}/products/{productId}/permissions';
  _Methodid   = 'androidenterprise.products.getPermissions';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId,'productId',productId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TProductPermissions) as TProductPermissions;
end;

Function TProductsResource.List(enterpriseId: string; AQuery : string = '') : TProductsListResponse;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}/products';
  _Methodid   = 'androidenterprise.products.list';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId]);
  Result:=ServiceCall(_HTTPMethod,_P,AQuery,Nil,TProductsListResponse) as TProductsListResponse;
end;


Function TProductsResource.List(enterpriseId: string; AQuery : TProductslistOptions) : TProductsListResponse;

Var
  _Q : String;

begin
  _Q:='';
  AddToQuery(_Q,'approved',AQuery.approved);
  AddToQuery(_Q,'language',AQuery.language);
  AddToQuery(_Q,'maxResults',AQuery.maxResults);
  AddToQuery(_Q,'query',AQuery.query);
  AddToQuery(_Q,'token',AQuery.token);
  Result:=List(enterpriseId,_Q);
end;

Function TProductsResource.UpdatePermissions(enterpriseId: string; productId: string; aProductPermissions : TProductPermissions) : TProductPermissions;

Const
  _HTTPMethod = 'PUT';
  _Path       = 'enterprises/{enterpriseId}/products/{productId}/permissions';
  _Methodid   = 'androidenterprise.products.updatePermissions';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId,'productId',productId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',aProductPermissions,TProductPermissions) as TProductPermissions;
end;



{ --------------------------------------------------------------------
  TStorelayoutclustersResource
  --------------------------------------------------------------------}


Class Function TStorelayoutclustersResource.ResourceName : String;

begin
  Result:='storelayoutclusters';
end;

Class Function TStorelayoutclustersResource.DefaultAPI : TGoogleAPIClass;

begin
  Result:=TandroidenterpriseAPI;
end;

Procedure TStorelayoutclustersResource.Delete(clusterId: string; enterpriseId: string; pageId: string);

Const
  _HTTPMethod = 'DELETE';
  _Path       = 'enterprises/{enterpriseId}/storeLayout/pages/{pageId}/clusters/{clusterId}';
  _Methodid   = 'androidenterprise.storelayoutclusters.delete';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['clusterId',clusterId,'enterpriseId',enterpriseId,'pageId',pageId]);
  ServiceCall(_HTTPMethod,_P,'',Nil,Nil);
end;

Function TStorelayoutclustersResource.Get(clusterId: string; enterpriseId: string; pageId: string) : TStoreCluster;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}/storeLayout/pages/{pageId}/clusters/{clusterId}';
  _Methodid   = 'androidenterprise.storelayoutclusters.get';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['clusterId',clusterId,'enterpriseId',enterpriseId,'pageId',pageId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TStoreCluster) as TStoreCluster;
end;

Function TStorelayoutclustersResource.Insert(enterpriseId: string; pageId: string; aStoreCluster : TStoreCluster) : TStoreCluster;

Const
  _HTTPMethod = 'POST';
  _Path       = 'enterprises/{enterpriseId}/storeLayout/pages/{pageId}/clusters';
  _Methodid   = 'androidenterprise.storelayoutclusters.insert';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId,'pageId',pageId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',aStoreCluster,TStoreCluster) as TStoreCluster;
end;

Function TStorelayoutclustersResource.List(enterpriseId: string; pageId: string) : TStoreLayoutClustersListResponse;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}/storeLayout/pages/{pageId}/clusters';
  _Methodid   = 'androidenterprise.storelayoutclusters.list';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId,'pageId',pageId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TStoreLayoutClustersListResponse) as TStoreLayoutClustersListResponse;
end;

Function TStorelayoutclustersResource.Patch(clusterId: string; enterpriseId: string; pageId: string; aStoreCluster : TStoreCluster) : TStoreCluster;

Const
  _HTTPMethod = 'PATCH';
  _Path       = 'enterprises/{enterpriseId}/storeLayout/pages/{pageId}/clusters/{clusterId}';
  _Methodid   = 'androidenterprise.storelayoutclusters.patch';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['clusterId',clusterId,'enterpriseId',enterpriseId,'pageId',pageId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',aStoreCluster,TStoreCluster) as TStoreCluster;
end;

Function TStorelayoutclustersResource.Update(clusterId: string; enterpriseId: string; pageId: string; aStoreCluster : TStoreCluster) : TStoreCluster;

Const
  _HTTPMethod = 'PUT';
  _Path       = 'enterprises/{enterpriseId}/storeLayout/pages/{pageId}/clusters/{clusterId}';
  _Methodid   = 'androidenterprise.storelayoutclusters.update';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['clusterId',clusterId,'enterpriseId',enterpriseId,'pageId',pageId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',aStoreCluster,TStoreCluster) as TStoreCluster;
end;



{ --------------------------------------------------------------------
  TStorelayoutpagesResource
  --------------------------------------------------------------------}


Class Function TStorelayoutpagesResource.ResourceName : String;

begin
  Result:='storelayoutpages';
end;

Class Function TStorelayoutpagesResource.DefaultAPI : TGoogleAPIClass;

begin
  Result:=TandroidenterpriseAPI;
end;

Procedure TStorelayoutpagesResource.Delete(enterpriseId: string; pageId: string);

Const
  _HTTPMethod = 'DELETE';
  _Path       = 'enterprises/{enterpriseId}/storeLayout/pages/{pageId}';
  _Methodid   = 'androidenterprise.storelayoutpages.delete';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId,'pageId',pageId]);
  ServiceCall(_HTTPMethod,_P,'',Nil,Nil);
end;

Function TStorelayoutpagesResource.Get(enterpriseId: string; pageId: string) : TStorePage;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}/storeLayout/pages/{pageId}';
  _Methodid   = 'androidenterprise.storelayoutpages.get';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId,'pageId',pageId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TStorePage) as TStorePage;
end;

Function TStorelayoutpagesResource.Insert(enterpriseId: string; aStorePage : TStorePage) : TStorePage;

Const
  _HTTPMethod = 'POST';
  _Path       = 'enterprises/{enterpriseId}/storeLayout/pages';
  _Methodid   = 'androidenterprise.storelayoutpages.insert';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',aStorePage,TStorePage) as TStorePage;
end;

Function TStorelayoutpagesResource.List(enterpriseId: string) : TStoreLayoutPagesListResponse;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}/storeLayout/pages';
  _Methodid   = 'androidenterprise.storelayoutpages.list';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TStoreLayoutPagesListResponse) as TStoreLayoutPagesListResponse;
end;

Function TStorelayoutpagesResource.Patch(enterpriseId: string; pageId: string; aStorePage : TStorePage) : TStorePage;

Const
  _HTTPMethod = 'PATCH';
  _Path       = 'enterprises/{enterpriseId}/storeLayout/pages/{pageId}';
  _Methodid   = 'androidenterprise.storelayoutpages.patch';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId,'pageId',pageId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',aStorePage,TStorePage) as TStorePage;
end;

Function TStorelayoutpagesResource.Update(enterpriseId: string; pageId: string; aStorePage : TStorePage) : TStorePage;

Const
  _HTTPMethod = 'PUT';
  _Path       = 'enterprises/{enterpriseId}/storeLayout/pages/{pageId}';
  _Methodid   = 'androidenterprise.storelayoutpages.update';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId,'pageId',pageId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',aStorePage,TStorePage) as TStorePage;
end;



{ --------------------------------------------------------------------
  TUsersResource
  --------------------------------------------------------------------}


Class Function TUsersResource.ResourceName : String;

begin
  Result:='users';
end;

Class Function TUsersResource.DefaultAPI : TGoogleAPIClass;

begin
  Result:=TandroidenterpriseAPI;
end;

Function TUsersResource.GenerateToken(enterpriseId: string; userId: string) : TUserToken;

Const
  _HTTPMethod = 'POST';
  _Path       = 'enterprises/{enterpriseId}/users/{userId}/token';
  _Methodid   = 'androidenterprise.users.generateToken';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId,'userId',userId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TUserToken) as TUserToken;
end;

Function TUsersResource.Get(enterpriseId: string; userId: string) : TUser;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}/users/{userId}';
  _Methodid   = 'androidenterprise.users.get';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId,'userId',userId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TUser) as TUser;
end;

Function TUsersResource.GetAvailableProductSet(enterpriseId: string; userId: string) : TProductSet;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}/users/{userId}/availableProductSet';
  _Methodid   = 'androidenterprise.users.getAvailableProductSet';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId,'userId',userId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TProductSet) as TProductSet;
end;

Function TUsersResource.List(enterpriseId: string; AQuery : string = '') : TUsersListResponse;

Const
  _HTTPMethod = 'GET';
  _Path       = 'enterprises/{enterpriseId}/users';
  _Methodid   = 'androidenterprise.users.list';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId]);
  Result:=ServiceCall(_HTTPMethod,_P,AQuery,Nil,TUsersListResponse) as TUsersListResponse;
end;


Function TUsersResource.List(enterpriseId: string; AQuery : TUserslistOptions) : TUsersListResponse;

Var
  _Q : String;

begin
  _Q:='';
  AddToQuery(_Q,'email',AQuery.email);
  Result:=List(enterpriseId,_Q);
end;

Procedure TUsersResource.RevokeToken(enterpriseId: string; userId: string);

Const
  _HTTPMethod = 'DELETE';
  _Path       = 'enterprises/{enterpriseId}/users/{userId}/token';
  _Methodid   = 'androidenterprise.users.revokeToken';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId,'userId',userId]);
  ServiceCall(_HTTPMethod,_P,'',Nil,Nil);
end;

Function TUsersResource.SetAvailableProductSet(enterpriseId: string; userId: string; aProductSet : TProductSet) : TProductSet;

Const
  _HTTPMethod = 'PUT';
  _Path       = 'enterprises/{enterpriseId}/users/{userId}/availableProductSet';
  _Methodid   = 'androidenterprise.users.setAvailableProductSet';

Var
  _P : String;

begin
  _P:=SubstitutePath(_Path,['enterpriseId',enterpriseId,'userId',userId]);
  Result:=ServiceCall(_HTTPMethod,_P,'',aProductSet,TProductSet) as TProductSet;
end;



{ --------------------------------------------------------------------
  TAndroidenterpriseAPI
  --------------------------------------------------------------------}

Class Function TAndroidenterpriseAPI.APIName : String;

begin
  Result:='androidenterprise';
end;

Class Function TAndroidenterpriseAPI.APIVersion : String;

begin
  Result:='v1';
end;

Class Function TAndroidenterpriseAPI.APIRevision : String;

begin
  Result:='20160511';
end;

Class Function TAndroidenterpriseAPI.APIID : String;

begin
  Result:='androidenterprise:v1';
end;

Class Function TAndroidenterpriseAPI.APITitle : String;

begin
  Result:='Google Play EMM API';
end;

Class Function TAndroidenterpriseAPI.APIDescription : String;

begin
  Result:='Manages the deployment of apps to Android for Work users.';
end;

Class Function TAndroidenterpriseAPI.APIOwnerDomain : String;

begin
  Result:='google.com';
end;

Class Function TAndroidenterpriseAPI.APIOwnerName : String;

begin
  Result:='Google';
end;

Class Function TAndroidenterpriseAPI.APIIcon16 : String;

begin
  Result:='https://www.google.com/images/icons/product/android-16.png';
end;

Class Function TAndroidenterpriseAPI.APIIcon32 : String;

begin
  Result:='https://www.google.com/images/icons/product/android-32.png';
end;

Class Function TAndroidenterpriseAPI.APIdocumentationLink : String;

begin
  Result:='https://developers.google.com/android/work/play/emm-api';
end;

Class Function TAndroidenterpriseAPI.APIrootUrl : string;

begin
  Result:='https://www.googleapis.com/';
end;

Class Function TAndroidenterpriseAPI.APIbasePath : string;

begin
  Result:='/androidenterprise/v1/';
end;

Class Function TAndroidenterpriseAPI.APIbaseURL : String;

begin
  Result:='https://www.googleapis.com/androidenterprise/v1/';
end;

Class Function TAndroidenterpriseAPI.APIProtocol : string;

begin
  Result:='rest';
end;

Class Function TAndroidenterpriseAPI.APIservicePath : string;

begin
  Result:='androidenterprise/v1/';
end;

Class Function TAndroidenterpriseAPI.APIbatchPath : String;

begin
  Result:='batch';
end;

Class Function TAndroidenterpriseAPI.APIAuthScopes : TScopeInfoArray;

begin
  SetLength(Result,1);
  Result[0].Name:='https://www.googleapis.com/auth/androidenterprise';
  Result[0].Description:='Manage corporate Android devices';
  
end;

Class Function TAndroidenterpriseAPI.APINeedsAuth : Boolean;

begin
  Result:=True;
end;

Class Procedure TAndroidenterpriseAPI.RegisterAPIResources;

begin
  TAppRestrictionsSchema.RegisterObject;
  TAppRestrictionsSchemaRestriction.RegisterObject;
  TAppRestrictionsSchemaRestrictionRestrictionValue.RegisterObject;
  TAppVersion.RegisterObject;
  TApprovalUrlInfo.RegisterObject;
  TCollection.RegisterObject;
  TCollectionViewersListResponse.RegisterObject;
  TCollectionsListResponse.RegisterObject;
  TDevice.RegisterObject;
  TDeviceState.RegisterObject;
  TDevicesListResponse.RegisterObject;
  TEnterprise.RegisterObject;
  TEnterpriseAccount.RegisterObject;
  TEnterprisesListResponse.RegisterObject;
  TEnterprisesSendTestPushNotificationResponse.RegisterObject;
  TEntitlement.RegisterObject;
  TEntitlementsListResponse.RegisterObject;
  TGroupLicense.RegisterObject;
  TGroupLicenseUsersListResponse.RegisterObject;
  TGroupLicensesListResponse.RegisterObject;
  TInstall.RegisterObject;
  TInstallsListResponse.RegisterObject;
  TLocalizedText.RegisterObject;
  TPageInfo.RegisterObject;
  TPermission.RegisterObject;
  TProduct.RegisterObject;
  TProductPermission.RegisterObject;
  TProductPermissions.RegisterObject;
  TProductSet.RegisterObject;
  TProductsApproveRequest.RegisterObject;
  TProductsGenerateApprovalUrlResponse.RegisterObject;
  TProductsListResponse.RegisterObject;
  TStoreCluster.RegisterObject;
  TStoreLayout.RegisterObject;
  TStoreLayoutClustersListResponse.RegisterObject;
  TStoreLayoutPagesListResponse.RegisterObject;
  TStorePage.RegisterObject;
  TTokenPagination.RegisterObject;
  TUser.RegisterObject;
  TUserToken.RegisterObject;
  TUsersListResponse.RegisterObject;
end;


Function TAndroidenterpriseAPI.GetCollectionsInstance : TCollectionsResource;

begin
  if (FCollectionsInstance=Nil) then
    FCollectionsInstance:=CreateCollectionsResource;
  Result:=FCollectionsInstance;
end;

Function TAndroidenterpriseAPI.CreateCollectionsResource : TCollectionsResource;

begin
  Result:=CreateCollectionsResource(Self);
end;


Function TAndroidenterpriseAPI.CreateCollectionsResource(AOwner : TComponent) : TCollectionsResource;

begin
  Result:=TCollectionsResource.Create(AOwner);
  Result.API:=Self.API;
end;



Function TAndroidenterpriseAPI.GetCollectionviewersInstance : TCollectionviewersResource;

begin
  if (FCollectionviewersInstance=Nil) then
    FCollectionviewersInstance:=CreateCollectionviewersResource;
  Result:=FCollectionviewersInstance;
end;

Function TAndroidenterpriseAPI.CreateCollectionviewersResource : TCollectionviewersResource;

begin
  Result:=CreateCollectionviewersResource(Self);
end;


Function TAndroidenterpriseAPI.CreateCollectionviewersResource(AOwner : TComponent) : TCollectionviewersResource;

begin
  Result:=TCollectionviewersResource.Create(AOwner);
  Result.API:=Self.API;
end;



Function TAndroidenterpriseAPI.GetDevicesInstance : TDevicesResource;

begin
  if (FDevicesInstance=Nil) then
    FDevicesInstance:=CreateDevicesResource;
  Result:=FDevicesInstance;
end;

Function TAndroidenterpriseAPI.CreateDevicesResource : TDevicesResource;

begin
  Result:=CreateDevicesResource(Self);
end;


Function TAndroidenterpriseAPI.CreateDevicesResource(AOwner : TComponent) : TDevicesResource;

begin
  Result:=TDevicesResource.Create(AOwner);
  Result.API:=Self.API;
end;



Function TAndroidenterpriseAPI.GetEnterprisesInstance : TEnterprisesResource;

begin
  if (FEnterprisesInstance=Nil) then
    FEnterprisesInstance:=CreateEnterprisesResource;
  Result:=FEnterprisesInstance;
end;

Function TAndroidenterpriseAPI.CreateEnterprisesResource : TEnterprisesResource;

begin
  Result:=CreateEnterprisesResource(Self);
end;


Function TAndroidenterpriseAPI.CreateEnterprisesResource(AOwner : TComponent) : TEnterprisesResource;

begin
  Result:=TEnterprisesResource.Create(AOwner);
  Result.API:=Self.API;
end;



Function TAndroidenterpriseAPI.GetEntitlementsInstance : TEntitlementsResource;

begin
  if (FEntitlementsInstance=Nil) then
    FEntitlementsInstance:=CreateEntitlementsResource;
  Result:=FEntitlementsInstance;
end;

Function TAndroidenterpriseAPI.CreateEntitlementsResource : TEntitlementsResource;

begin
  Result:=CreateEntitlementsResource(Self);
end;


Function TAndroidenterpriseAPI.CreateEntitlementsResource(AOwner : TComponent) : TEntitlementsResource;

begin
  Result:=TEntitlementsResource.Create(AOwner);
  Result.API:=Self.API;
end;



Function TAndroidenterpriseAPI.GetGrouplicensesInstance : TGrouplicensesResource;

begin
  if (FGrouplicensesInstance=Nil) then
    FGrouplicensesInstance:=CreateGrouplicensesResource;
  Result:=FGrouplicensesInstance;
end;

Function TAndroidenterpriseAPI.CreateGrouplicensesResource : TGrouplicensesResource;

begin
  Result:=CreateGrouplicensesResource(Self);
end;


Function TAndroidenterpriseAPI.CreateGrouplicensesResource(AOwner : TComponent) : TGrouplicensesResource;

begin
  Result:=TGrouplicensesResource.Create(AOwner);
  Result.API:=Self.API;
end;



Function TAndroidenterpriseAPI.GetGrouplicenseusersInstance : TGrouplicenseusersResource;

begin
  if (FGrouplicenseusersInstance=Nil) then
    FGrouplicenseusersInstance:=CreateGrouplicenseusersResource;
  Result:=FGrouplicenseusersInstance;
end;

Function TAndroidenterpriseAPI.CreateGrouplicenseusersResource : TGrouplicenseusersResource;

begin
  Result:=CreateGrouplicenseusersResource(Self);
end;


Function TAndroidenterpriseAPI.CreateGrouplicenseusersResource(AOwner : TComponent) : TGrouplicenseusersResource;

begin
  Result:=TGrouplicenseusersResource.Create(AOwner);
  Result.API:=Self.API;
end;



Function TAndroidenterpriseAPI.GetInstallsInstance : TInstallsResource;

begin
  if (FInstallsInstance=Nil) then
    FInstallsInstance:=CreateInstallsResource;
  Result:=FInstallsInstance;
end;

Function TAndroidenterpriseAPI.CreateInstallsResource : TInstallsResource;

begin
  Result:=CreateInstallsResource(Self);
end;


Function TAndroidenterpriseAPI.CreateInstallsResource(AOwner : TComponent) : TInstallsResource;

begin
  Result:=TInstallsResource.Create(AOwner);
  Result.API:=Self.API;
end;



Function TAndroidenterpriseAPI.GetPermissionsInstance : TPermissionsResource;

begin
  if (FPermissionsInstance=Nil) then
    FPermissionsInstance:=CreatePermissionsResource;
  Result:=FPermissionsInstance;
end;

Function TAndroidenterpriseAPI.CreatePermissionsResource : TPermissionsResource;

begin
  Result:=CreatePermissionsResource(Self);
end;


Function TAndroidenterpriseAPI.CreatePermissionsResource(AOwner : TComponent) : TPermissionsResource;

begin
  Result:=TPermissionsResource.Create(AOwner);
  Result.API:=Self.API;
end;



Function TAndroidenterpriseAPI.GetProductsInstance : TProductsResource;

begin
  if (FProductsInstance=Nil) then
    FProductsInstance:=CreateProductsResource;
  Result:=FProductsInstance;
end;

Function TAndroidenterpriseAPI.CreateProductsResource : TProductsResource;

begin
  Result:=CreateProductsResource(Self);
end;


Function TAndroidenterpriseAPI.CreateProductsResource(AOwner : TComponent) : TProductsResource;

begin
  Result:=TProductsResource.Create(AOwner);
  Result.API:=Self.API;
end;



Function TAndroidenterpriseAPI.GetStorelayoutclustersInstance : TStorelayoutclustersResource;

begin
  if (FStorelayoutclustersInstance=Nil) then
    FStorelayoutclustersInstance:=CreateStorelayoutclustersResource;
  Result:=FStorelayoutclustersInstance;
end;

Function TAndroidenterpriseAPI.CreateStorelayoutclustersResource : TStorelayoutclustersResource;

begin
  Result:=CreateStorelayoutclustersResource(Self);
end;


Function TAndroidenterpriseAPI.CreateStorelayoutclustersResource(AOwner : TComponent) : TStorelayoutclustersResource;

begin
  Result:=TStorelayoutclustersResource.Create(AOwner);
  Result.API:=Self.API;
end;



Function TAndroidenterpriseAPI.GetStorelayoutpagesInstance : TStorelayoutpagesResource;

begin
  if (FStorelayoutpagesInstance=Nil) then
    FStorelayoutpagesInstance:=CreateStorelayoutpagesResource;
  Result:=FStorelayoutpagesInstance;
end;

Function TAndroidenterpriseAPI.CreateStorelayoutpagesResource : TStorelayoutpagesResource;

begin
  Result:=CreateStorelayoutpagesResource(Self);
end;


Function TAndroidenterpriseAPI.CreateStorelayoutpagesResource(AOwner : TComponent) : TStorelayoutpagesResource;

begin
  Result:=TStorelayoutpagesResource.Create(AOwner);
  Result.API:=Self.API;
end;



Function TAndroidenterpriseAPI.GetUsersInstance : TUsersResource;

begin
  if (FUsersInstance=Nil) then
    FUsersInstance:=CreateUsersResource;
  Result:=FUsersInstance;
end;

Function TAndroidenterpriseAPI.CreateUsersResource : TUsersResource;

begin
  Result:=CreateUsersResource(Self);
end;


Function TAndroidenterpriseAPI.CreateUsersResource(AOwner : TComponent) : TUsersResource;

begin
  Result:=TUsersResource.Create(AOwner);
  Result.API:=Self.API;
end;



initialization
  TAndroidenterpriseAPI.RegisterAPI;
end.