packages feed

gogol-datastore 0.5.0 → 1.0.0

raw patch · 44 files changed

+8879/−8779 lines, 44 filesdep −basedep ~gogol-coresetup-changed

Dependencies removed: base

Dependency ranges changed: gogol-core

Files

README.md view
@@ -8,7 +8,7 @@  ## Version -`0.5.0`+`1.0.0`   ## Description
Setup.hs view
@@ -1,2 +1,3 @@-import           Distribution.Simple+import Distribution.Simple+ main = defaultMain
+ gen/Gogol/Datastore.hs view
@@ -0,0 +1,606 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Datastore+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Accesses the schemaless NoSQL database to provide fully managed, robust, scalable storage for your application.+--+-- /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference>+module Gogol.Datastore+  ( -- * Configuration+    datastoreService,++    -- * OAuth Scopes+    CloudPlatform'FullControl,+    Datastore'FullControl,++    -- * Resources++    -- ** datastore.projects.allocateIds+    DatastoreProjectsAllocateIdsResource,+    DatastoreProjectsAllocateIds (..),+    newDatastoreProjectsAllocateIds,++    -- ** datastore.projects.beginTransaction+    DatastoreProjectsBeginTransactionResource,+    DatastoreProjectsBeginTransaction (..),+    newDatastoreProjectsBeginTransaction,++    -- ** datastore.projects.commit+    DatastoreProjectsCommitResource,+    DatastoreProjectsCommit (..),+    newDatastoreProjectsCommit,++    -- ** datastore.projects.export+    DatastoreProjectsExportResource,+    DatastoreProjectsExport (..),+    newDatastoreProjectsExport,++    -- ** datastore.projects.import+    DatastoreProjectsImportResource,+    DatastoreProjectsImport (..),+    newDatastoreProjectsImport,++    -- ** datastore.projects.indexes.create+    DatastoreProjectsIndexesCreateResource,+    DatastoreProjectsIndexesCreate (..),+    newDatastoreProjectsIndexesCreate,++    -- ** datastore.projects.indexes.delete+    DatastoreProjectsIndexesDeleteResource,+    DatastoreProjectsIndexesDelete (..),+    newDatastoreProjectsIndexesDelete,++    -- ** datastore.projects.indexes.get+    DatastoreProjectsIndexesGetResource,+    DatastoreProjectsIndexesGet (..),+    newDatastoreProjectsIndexesGet,++    -- ** datastore.projects.indexes.list+    DatastoreProjectsIndexesListResource,+    DatastoreProjectsIndexesList (..),+    newDatastoreProjectsIndexesList,++    -- ** datastore.projects.lookup+    DatastoreProjectsLookupResource,+    DatastoreProjectsLookup (..),+    newDatastoreProjectsLookup,++    -- ** datastore.projects.operations.cancel+    DatastoreProjectsOperationsCancelResource,+    DatastoreProjectsOperationsCancel (..),+    newDatastoreProjectsOperationsCancel,++    -- ** datastore.projects.operations.delete+    DatastoreProjectsOperationsDeleteResource,+    DatastoreProjectsOperationsDelete (..),+    newDatastoreProjectsOperationsDelete,++    -- ** datastore.projects.operations.get+    DatastoreProjectsOperationsGetResource,+    DatastoreProjectsOperationsGet (..),+    newDatastoreProjectsOperationsGet,++    -- ** datastore.projects.operations.list+    DatastoreProjectsOperationsListResource,+    DatastoreProjectsOperationsList (..),+    newDatastoreProjectsOperationsList,++    -- ** datastore.projects.reserveIds+    DatastoreProjectsReserveIdsResource,+    DatastoreProjectsReserveIds (..),+    newDatastoreProjectsReserveIds,++    -- ** datastore.projects.rollback+    DatastoreProjectsRollbackResource,+    DatastoreProjectsRollback (..),+    newDatastoreProjectsRollback,++    -- ** datastore.projects.runAggregationQuery+    DatastoreProjectsRunAggregationQueryResource,+    DatastoreProjectsRunAggregationQuery (..),+    newDatastoreProjectsRunAggregationQuery,++    -- ** datastore.projects.runQuery+    DatastoreProjectsRunQueryResource,+    DatastoreProjectsRunQuery (..),+    newDatastoreProjectsRunQuery,++    -- * Types++    -- ** Xgafv+    Xgafv (..),++    -- ** Aggregation+    Aggregation (..),+    newAggregation,++    -- ** AggregationQuery+    AggregationQuery (..),+    newAggregationQuery,++    -- ** AggregationResult+    AggregationResult (..),+    newAggregationResult,++    -- ** AggregationResult_AggregateProperties+    AggregationResult_AggregateProperties (..),+    newAggregationResult_AggregateProperties,++    -- ** AggregationResultBatch+    AggregationResultBatch (..),+    newAggregationResultBatch,++    -- ** AggregationResultBatch_MoreResults+    AggregationResultBatch_MoreResults (..),++    -- ** AllocateIdsRequest+    AllocateIdsRequest (..),+    newAllocateIdsRequest,++    -- ** AllocateIdsResponse+    AllocateIdsResponse (..),+    newAllocateIdsResponse,++    -- ** ArrayValue+    ArrayValue (..),+    newArrayValue,++    -- ** Avg+    Avg (..),+    newAvg,++    -- ** BeginTransactionRequest+    BeginTransactionRequest (..),+    newBeginTransactionRequest,++    -- ** BeginTransactionResponse+    BeginTransactionResponse (..),+    newBeginTransactionResponse,++    -- ** CommitRequest+    CommitRequest (..),+    newCommitRequest,++    -- ** CommitRequest_Mode+    CommitRequest_Mode (..),++    -- ** CommitResponse+    CommitResponse (..),+    newCommitResponse,++    -- ** CompositeFilter+    CompositeFilter (..),+    newCompositeFilter,++    -- ** CompositeFilter_Op+    CompositeFilter_Op (..),++    -- ** Count+    Count (..),+    newCount,++    -- ** Empty+    Empty (..),+    newEmpty,++    -- ** Entity+    Entity (..),+    newEntity,++    -- ** Entity_Properties+    Entity_Properties (..),+    newEntity_Properties,++    -- ** EntityResult+    EntityResult (..),+    newEntityResult,++    -- ** ExecutionStats+    ExecutionStats (..),+    newExecutionStats,++    -- ** ExecutionStats_DebugStats+    ExecutionStats_DebugStats (..),+    newExecutionStats_DebugStats,++    -- ** ExplainMetrics+    ExplainMetrics (..),+    newExplainMetrics,++    -- ** ExplainOptions+    ExplainOptions (..),+    newExplainOptions,++    -- ** Filter+    Filter (..),+    newFilter,++    -- ** FindNearest+    FindNearest (..),+    newFindNearest,++    -- ** FindNearest_DistanceMeasure+    FindNearest_DistanceMeasure (..),++    -- ** GoogleDatastoreAdminV1CommonMetadata+    GoogleDatastoreAdminV1CommonMetadata (..),+    newGoogleDatastoreAdminV1CommonMetadata,++    -- ** GoogleDatastoreAdminV1CommonMetadata_Labels+    GoogleDatastoreAdminV1CommonMetadata_Labels (..),+    newGoogleDatastoreAdminV1CommonMetadata_Labels,++    -- ** GoogleDatastoreAdminV1CommonMetadata_OperationType+    GoogleDatastoreAdminV1CommonMetadata_OperationType (..),++    -- ** GoogleDatastoreAdminV1CommonMetadata_State+    GoogleDatastoreAdminV1CommonMetadata_State (..),++    -- ** GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata+    GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata (..),+    newGoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata,++    -- ** GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState+    GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState (..),++    -- ** GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep+    GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep (..),++    -- ** GoogleDatastoreAdminV1EntityFilter+    GoogleDatastoreAdminV1EntityFilter (..),+    newGoogleDatastoreAdminV1EntityFilter,++    -- ** GoogleDatastoreAdminV1ExportEntitiesMetadata+    GoogleDatastoreAdminV1ExportEntitiesMetadata (..),+    newGoogleDatastoreAdminV1ExportEntitiesMetadata,++    -- ** GoogleDatastoreAdminV1ExportEntitiesRequest+    GoogleDatastoreAdminV1ExportEntitiesRequest (..),+    newGoogleDatastoreAdminV1ExportEntitiesRequest,++    -- ** GoogleDatastoreAdminV1ExportEntitiesRequest_Labels+    GoogleDatastoreAdminV1ExportEntitiesRequest_Labels (..),+    newGoogleDatastoreAdminV1ExportEntitiesRequest_Labels,++    -- ** GoogleDatastoreAdminV1ExportEntitiesResponse+    GoogleDatastoreAdminV1ExportEntitiesResponse (..),+    newGoogleDatastoreAdminV1ExportEntitiesResponse,++    -- ** GoogleDatastoreAdminV1ImportEntitiesMetadata+    GoogleDatastoreAdminV1ImportEntitiesMetadata (..),+    newGoogleDatastoreAdminV1ImportEntitiesMetadata,++    -- ** GoogleDatastoreAdminV1ImportEntitiesRequest+    GoogleDatastoreAdminV1ImportEntitiesRequest (..),+    newGoogleDatastoreAdminV1ImportEntitiesRequest,++    -- ** GoogleDatastoreAdminV1ImportEntitiesRequest_Labels+    GoogleDatastoreAdminV1ImportEntitiesRequest_Labels (..),+    newGoogleDatastoreAdminV1ImportEntitiesRequest_Labels,++    -- ** GoogleDatastoreAdminV1Index+    GoogleDatastoreAdminV1Index (..),+    newGoogleDatastoreAdminV1Index,++    -- ** GoogleDatastoreAdminV1Index_Ancestor+    GoogleDatastoreAdminV1Index_Ancestor (..),++    -- ** GoogleDatastoreAdminV1Index_State+    GoogleDatastoreAdminV1Index_State (..),++    -- ** GoogleDatastoreAdminV1IndexOperationMetadata+    GoogleDatastoreAdminV1IndexOperationMetadata (..),+    newGoogleDatastoreAdminV1IndexOperationMetadata,++    -- ** GoogleDatastoreAdminV1IndexedProperty+    GoogleDatastoreAdminV1IndexedProperty (..),+    newGoogleDatastoreAdminV1IndexedProperty,++    -- ** GoogleDatastoreAdminV1IndexedProperty_Direction+    GoogleDatastoreAdminV1IndexedProperty_Direction (..),++    -- ** GoogleDatastoreAdminV1ListIndexesResponse+    GoogleDatastoreAdminV1ListIndexesResponse (..),+    newGoogleDatastoreAdminV1ListIndexesResponse,++    -- ** GoogleDatastoreAdminV1MigrationProgressEvent+    GoogleDatastoreAdminV1MigrationProgressEvent (..),+    newGoogleDatastoreAdminV1MigrationProgressEvent,++    -- ** GoogleDatastoreAdminV1MigrationProgressEvent_Step+    GoogleDatastoreAdminV1MigrationProgressEvent_Step (..),++    -- ** GoogleDatastoreAdminV1MigrationStateEvent+    GoogleDatastoreAdminV1MigrationStateEvent (..),+    newGoogleDatastoreAdminV1MigrationStateEvent,++    -- ** GoogleDatastoreAdminV1MigrationStateEvent_State+    GoogleDatastoreAdminV1MigrationStateEvent_State (..),++    -- ** GoogleDatastoreAdminV1PrepareStepDetails+    GoogleDatastoreAdminV1PrepareStepDetails (..),+    newGoogleDatastoreAdminV1PrepareStepDetails,++    -- ** GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode+    GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode (..),++    -- ** GoogleDatastoreAdminV1Progress+    GoogleDatastoreAdminV1Progress (..),+    newGoogleDatastoreAdminV1Progress,++    -- ** GoogleDatastoreAdminV1RedirectWritesStepDetails+    GoogleDatastoreAdminV1RedirectWritesStepDetails (..),+    newGoogleDatastoreAdminV1RedirectWritesStepDetails,++    -- ** GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode+    GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode (..),++    -- ** GoogleDatastoreAdminV1beta1CommonMetadata+    GoogleDatastoreAdminV1beta1CommonMetadata (..),+    newGoogleDatastoreAdminV1beta1CommonMetadata,++    -- ** GoogleDatastoreAdminV1beta1CommonMetadata_Labels+    GoogleDatastoreAdminV1beta1CommonMetadata_Labels (..),+    newGoogleDatastoreAdminV1beta1CommonMetadata_Labels,++    -- ** GoogleDatastoreAdminV1beta1CommonMetadata_OperationType+    GoogleDatastoreAdminV1beta1CommonMetadata_OperationType (..),++    -- ** GoogleDatastoreAdminV1beta1CommonMetadata_State+    GoogleDatastoreAdminV1beta1CommonMetadata_State (..),++    -- ** GoogleDatastoreAdminV1beta1EntityFilter+    GoogleDatastoreAdminV1beta1EntityFilter (..),+    newGoogleDatastoreAdminV1beta1EntityFilter,++    -- ** GoogleDatastoreAdminV1beta1ExportEntitiesMetadata+    GoogleDatastoreAdminV1beta1ExportEntitiesMetadata (..),+    newGoogleDatastoreAdminV1beta1ExportEntitiesMetadata,++    -- ** GoogleDatastoreAdminV1beta1ExportEntitiesResponse+    GoogleDatastoreAdminV1beta1ExportEntitiesResponse (..),+    newGoogleDatastoreAdminV1beta1ExportEntitiesResponse,++    -- ** GoogleDatastoreAdminV1beta1ImportEntitiesMetadata+    GoogleDatastoreAdminV1beta1ImportEntitiesMetadata (..),+    newGoogleDatastoreAdminV1beta1ImportEntitiesMetadata,++    -- ** GoogleDatastoreAdminV1beta1Progress+    GoogleDatastoreAdminV1beta1Progress (..),+    newGoogleDatastoreAdminV1beta1Progress,++    -- ** GoogleLongrunningListOperationsResponse+    GoogleLongrunningListOperationsResponse (..),+    newGoogleLongrunningListOperationsResponse,++    -- ** GoogleLongrunningOperation+    GoogleLongrunningOperation (..),+    newGoogleLongrunningOperation,++    -- ** GoogleLongrunningOperation_Metadata+    GoogleLongrunningOperation_Metadata (..),+    newGoogleLongrunningOperation_Metadata,++    -- ** GoogleLongrunningOperation_Response+    GoogleLongrunningOperation_Response (..),+    newGoogleLongrunningOperation_Response,++    -- ** GqlQuery+    GqlQuery (..),+    newGqlQuery,++    -- ** GqlQuery_NamedBindings+    GqlQuery_NamedBindings (..),+    newGqlQuery_NamedBindings,++    -- ** GqlQueryParameter+    GqlQueryParameter (..),+    newGqlQueryParameter,++    -- ** Key+    Key (..),+    newKey,++    -- ** KindExpression+    KindExpression (..),+    newKindExpression,++    -- ** LatLng+    LatLng (..),+    newLatLng,++    -- ** LookupRequest+    LookupRequest (..),+    newLookupRequest,++    -- ** LookupResponse+    LookupResponse (..),+    newLookupResponse,++    -- ** Mutation+    Mutation (..),+    newMutation,++    -- ** Mutation_ConflictResolutionStrategy+    Mutation_ConflictResolutionStrategy (..),++    -- ** MutationResult+    MutationResult (..),+    newMutationResult,++    -- ** PartitionId+    PartitionId (..),+    newPartitionId,++    -- ** PathElement+    PathElement (..),+    newPathElement,++    -- ** PlanSummary+    PlanSummary (..),+    newPlanSummary,++    -- ** PlanSummary_IndexesUsedItem+    PlanSummary_IndexesUsedItem (..),+    newPlanSummary_IndexesUsedItem,++    -- ** Projection+    Projection (..),+    newProjection,++    -- ** PropertyFilter+    PropertyFilter (..),+    newPropertyFilter,++    -- ** PropertyFilter_Op+    PropertyFilter_Op (..),++    -- ** PropertyMask+    PropertyMask (..),+    newPropertyMask,++    -- ** PropertyOrder+    PropertyOrder (..),+    newPropertyOrder,++    -- ** PropertyOrder_Direction+    PropertyOrder_Direction (..),++    -- ** PropertyReference+    PropertyReference (..),+    newPropertyReference,++    -- ** PropertyTransform+    PropertyTransform (..),+    newPropertyTransform,++    -- ** PropertyTransform_SetToServerValue+    PropertyTransform_SetToServerValue (..),++    -- ** Query+    Query (..),+    newQuery,++    -- ** QueryResultBatch+    QueryResultBatch (..),+    newQueryResultBatch,++    -- ** QueryResultBatch_EntityResultType+    QueryResultBatch_EntityResultType (..),++    -- ** QueryResultBatch_MoreResults+    QueryResultBatch_MoreResults (..),++    -- ** ReadOnly+    ReadOnly (..),+    newReadOnly,++    -- ** ReadOptions+    ReadOptions (..),+    newReadOptions,++    -- ** ReadOptions_ReadConsistency+    ReadOptions_ReadConsistency (..),++    -- ** ReadWrite+    ReadWrite (..),+    newReadWrite,++    -- ** ReserveIdsRequest+    ReserveIdsRequest (..),+    newReserveIdsRequest,++    -- ** ReserveIdsResponse+    ReserveIdsResponse (..),+    newReserveIdsResponse,++    -- ** RollbackRequest+    RollbackRequest (..),+    newRollbackRequest,++    -- ** RollbackResponse+    RollbackResponse (..),+    newRollbackResponse,++    -- ** RunAggregationQueryRequest+    RunAggregationQueryRequest (..),+    newRunAggregationQueryRequest,++    -- ** RunAggregationQueryResponse+    RunAggregationQueryResponse (..),+    newRunAggregationQueryResponse,++    -- ** RunQueryRequest+    RunQueryRequest (..),+    newRunQueryRequest,++    -- ** RunQueryResponse+    RunQueryResponse (..),+    newRunQueryResponse,++    -- ** Status+    Status (..),+    newStatus,++    -- ** Status_DetailsItem+    Status_DetailsItem (..),+    newStatus_DetailsItem,++    -- ** Sum+    Sum (..),+    newSum,++    -- ** TransactionOptions+    TransactionOptions (..),+    newTransactionOptions,++    -- ** Value+    Value (..),+    newValue,++    -- ** Value_NullValue+    Value_NullValue (..),+  )+where++import Gogol.Datastore.Projects.AllocateIds+import Gogol.Datastore.Projects.BeginTransaction+import Gogol.Datastore.Projects.Commit+import Gogol.Datastore.Projects.Export+import Gogol.Datastore.Projects.Import+import Gogol.Datastore.Projects.Indexes.Create+import Gogol.Datastore.Projects.Indexes.Delete+import Gogol.Datastore.Projects.Indexes.Get+import Gogol.Datastore.Projects.Indexes.List+import Gogol.Datastore.Projects.Lookup+import Gogol.Datastore.Projects.Operations.Cancel+import Gogol.Datastore.Projects.Operations.Delete+import Gogol.Datastore.Projects.Operations.Get+import Gogol.Datastore.Projects.Operations.List+import Gogol.Datastore.Projects.ReserveIds+import Gogol.Datastore.Projects.Rollback+import Gogol.Datastore.Projects.RunAggregationQuery+import Gogol.Datastore.Projects.RunQuery+import Gogol.Datastore.Types
+ gen/Gogol/Datastore/Internal/Product.hs view
@@ -0,0 +1,4281 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Datastore.Internal.Product+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Gogol.Datastore.Internal.Product+  ( -- * Aggregation+    Aggregation (..),+    newAggregation,++    -- * AggregationQuery+    AggregationQuery (..),+    newAggregationQuery,++    -- * AggregationResult+    AggregationResult (..),+    newAggregationResult,++    -- * AggregationResult_AggregateProperties+    AggregationResult_AggregateProperties (..),+    newAggregationResult_AggregateProperties,++    -- * AggregationResultBatch+    AggregationResultBatch (..),+    newAggregationResultBatch,++    -- * AllocateIdsRequest+    AllocateIdsRequest (..),+    newAllocateIdsRequest,++    -- * AllocateIdsResponse+    AllocateIdsResponse (..),+    newAllocateIdsResponse,++    -- * ArrayValue+    ArrayValue (..),+    newArrayValue,++    -- * Avg+    Avg (..),+    newAvg,++    -- * BeginTransactionRequest+    BeginTransactionRequest (..),+    newBeginTransactionRequest,++    -- * BeginTransactionResponse+    BeginTransactionResponse (..),+    newBeginTransactionResponse,++    -- * CommitRequest+    CommitRequest (..),+    newCommitRequest,++    -- * CommitResponse+    CommitResponse (..),+    newCommitResponse,++    -- * CompositeFilter+    CompositeFilter (..),+    newCompositeFilter,++    -- * Count+    Count (..),+    newCount,++    -- * Empty+    Empty (..),+    newEmpty,++    -- * Entity+    Entity (..),+    newEntity,++    -- * Entity_Properties+    Entity_Properties (..),+    newEntity_Properties,++    -- * EntityResult+    EntityResult (..),+    newEntityResult,++    -- * ExecutionStats+    ExecutionStats (..),+    newExecutionStats,++    -- * ExecutionStats_DebugStats+    ExecutionStats_DebugStats (..),+    newExecutionStats_DebugStats,++    -- * ExplainMetrics+    ExplainMetrics (..),+    newExplainMetrics,++    -- * ExplainOptions+    ExplainOptions (..),+    newExplainOptions,++    -- * Filter+    Filter (..),+    newFilter,++    -- * FindNearest+    FindNearest (..),+    newFindNearest,++    -- * GoogleDatastoreAdminV1CommonMetadata+    GoogleDatastoreAdminV1CommonMetadata (..),+    newGoogleDatastoreAdminV1CommonMetadata,++    -- * GoogleDatastoreAdminV1CommonMetadata_Labels+    GoogleDatastoreAdminV1CommonMetadata_Labels (..),+    newGoogleDatastoreAdminV1CommonMetadata_Labels,++    -- * GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata+    GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata (..),+    newGoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata,++    -- * GoogleDatastoreAdminV1EntityFilter+    GoogleDatastoreAdminV1EntityFilter (..),+    newGoogleDatastoreAdminV1EntityFilter,++    -- * GoogleDatastoreAdminV1ExportEntitiesMetadata+    GoogleDatastoreAdminV1ExportEntitiesMetadata (..),+    newGoogleDatastoreAdminV1ExportEntitiesMetadata,++    -- * GoogleDatastoreAdminV1ExportEntitiesRequest+    GoogleDatastoreAdminV1ExportEntitiesRequest (..),+    newGoogleDatastoreAdminV1ExportEntitiesRequest,++    -- * GoogleDatastoreAdminV1ExportEntitiesRequest_Labels+    GoogleDatastoreAdminV1ExportEntitiesRequest_Labels (..),+    newGoogleDatastoreAdminV1ExportEntitiesRequest_Labels,++    -- * GoogleDatastoreAdminV1ExportEntitiesResponse+    GoogleDatastoreAdminV1ExportEntitiesResponse (..),+    newGoogleDatastoreAdminV1ExportEntitiesResponse,++    -- * GoogleDatastoreAdminV1ImportEntitiesMetadata+    GoogleDatastoreAdminV1ImportEntitiesMetadata (..),+    newGoogleDatastoreAdminV1ImportEntitiesMetadata,++    -- * GoogleDatastoreAdminV1ImportEntitiesRequest+    GoogleDatastoreAdminV1ImportEntitiesRequest (..),+    newGoogleDatastoreAdminV1ImportEntitiesRequest,++    -- * GoogleDatastoreAdminV1ImportEntitiesRequest_Labels+    GoogleDatastoreAdminV1ImportEntitiesRequest_Labels (..),+    newGoogleDatastoreAdminV1ImportEntitiesRequest_Labels,++    -- * GoogleDatastoreAdminV1Index+    GoogleDatastoreAdminV1Index (..),+    newGoogleDatastoreAdminV1Index,++    -- * GoogleDatastoreAdminV1IndexOperationMetadata+    GoogleDatastoreAdminV1IndexOperationMetadata (..),+    newGoogleDatastoreAdminV1IndexOperationMetadata,++    -- * GoogleDatastoreAdminV1IndexedProperty+    GoogleDatastoreAdminV1IndexedProperty (..),+    newGoogleDatastoreAdminV1IndexedProperty,++    -- * GoogleDatastoreAdminV1ListIndexesResponse+    GoogleDatastoreAdminV1ListIndexesResponse (..),+    newGoogleDatastoreAdminV1ListIndexesResponse,++    -- * GoogleDatastoreAdminV1MigrationProgressEvent+    GoogleDatastoreAdminV1MigrationProgressEvent (..),+    newGoogleDatastoreAdminV1MigrationProgressEvent,++    -- * GoogleDatastoreAdminV1MigrationStateEvent+    GoogleDatastoreAdminV1MigrationStateEvent (..),+    newGoogleDatastoreAdminV1MigrationStateEvent,++    -- * GoogleDatastoreAdminV1PrepareStepDetails+    GoogleDatastoreAdminV1PrepareStepDetails (..),+    newGoogleDatastoreAdminV1PrepareStepDetails,++    -- * GoogleDatastoreAdminV1Progress+    GoogleDatastoreAdminV1Progress (..),+    newGoogleDatastoreAdminV1Progress,++    -- * GoogleDatastoreAdminV1RedirectWritesStepDetails+    GoogleDatastoreAdminV1RedirectWritesStepDetails (..),+    newGoogleDatastoreAdminV1RedirectWritesStepDetails,++    -- * GoogleDatastoreAdminV1beta1CommonMetadata+    GoogleDatastoreAdminV1beta1CommonMetadata (..),+    newGoogleDatastoreAdminV1beta1CommonMetadata,++    -- * GoogleDatastoreAdminV1beta1CommonMetadata_Labels+    GoogleDatastoreAdminV1beta1CommonMetadata_Labels (..),+    newGoogleDatastoreAdminV1beta1CommonMetadata_Labels,++    -- * GoogleDatastoreAdminV1beta1EntityFilter+    GoogleDatastoreAdminV1beta1EntityFilter (..),+    newGoogleDatastoreAdminV1beta1EntityFilter,++    -- * GoogleDatastoreAdminV1beta1ExportEntitiesMetadata+    GoogleDatastoreAdminV1beta1ExportEntitiesMetadata (..),+    newGoogleDatastoreAdminV1beta1ExportEntitiesMetadata,++    -- * GoogleDatastoreAdminV1beta1ExportEntitiesResponse+    GoogleDatastoreAdminV1beta1ExportEntitiesResponse (..),+    newGoogleDatastoreAdminV1beta1ExportEntitiesResponse,++    -- * GoogleDatastoreAdminV1beta1ImportEntitiesMetadata+    GoogleDatastoreAdminV1beta1ImportEntitiesMetadata (..),+    newGoogleDatastoreAdminV1beta1ImportEntitiesMetadata,++    -- * GoogleDatastoreAdminV1beta1Progress+    GoogleDatastoreAdminV1beta1Progress (..),+    newGoogleDatastoreAdminV1beta1Progress,++    -- * GoogleLongrunningListOperationsResponse+    GoogleLongrunningListOperationsResponse (..),+    newGoogleLongrunningListOperationsResponse,++    -- * GoogleLongrunningOperation+    GoogleLongrunningOperation (..),+    newGoogleLongrunningOperation,++    -- * GoogleLongrunningOperation_Metadata+    GoogleLongrunningOperation_Metadata (..),+    newGoogleLongrunningOperation_Metadata,++    -- * GoogleLongrunningOperation_Response+    GoogleLongrunningOperation_Response (..),+    newGoogleLongrunningOperation_Response,++    -- * GqlQuery+    GqlQuery (..),+    newGqlQuery,++    -- * GqlQuery_NamedBindings+    GqlQuery_NamedBindings (..),+    newGqlQuery_NamedBindings,++    -- * GqlQueryParameter+    GqlQueryParameter (..),+    newGqlQueryParameter,++    -- * Key+    Key (..),+    newKey,++    -- * KindExpression+    KindExpression (..),+    newKindExpression,++    -- * LatLng+    LatLng (..),+    newLatLng,++    -- * LookupRequest+    LookupRequest (..),+    newLookupRequest,++    -- * LookupResponse+    LookupResponse (..),+    newLookupResponse,++    -- * Mutation+    Mutation (..),+    newMutation,++    -- * MutationResult+    MutationResult (..),+    newMutationResult,++    -- * PartitionId+    PartitionId (..),+    newPartitionId,++    -- * PathElement+    PathElement (..),+    newPathElement,++    -- * PlanSummary+    PlanSummary (..),+    newPlanSummary,++    -- * PlanSummary_IndexesUsedItem+    PlanSummary_IndexesUsedItem (..),+    newPlanSummary_IndexesUsedItem,++    -- * Projection+    Projection (..),+    newProjection,++    -- * PropertyFilter+    PropertyFilter (..),+    newPropertyFilter,++    -- * PropertyMask+    PropertyMask (..),+    newPropertyMask,++    -- * PropertyOrder+    PropertyOrder (..),+    newPropertyOrder,++    -- * PropertyReference+    PropertyReference (..),+    newPropertyReference,++    -- * PropertyTransform+    PropertyTransform (..),+    newPropertyTransform,++    -- * Query+    Query (..),+    newQuery,++    -- * QueryResultBatch+    QueryResultBatch (..),+    newQueryResultBatch,++    -- * ReadOnly+    ReadOnly (..),+    newReadOnly,++    -- * ReadOptions+    ReadOptions (..),+    newReadOptions,++    -- * ReadWrite+    ReadWrite (..),+    newReadWrite,++    -- * ReserveIdsRequest+    ReserveIdsRequest (..),+    newReserveIdsRequest,++    -- * ReserveIdsResponse+    ReserveIdsResponse (..),+    newReserveIdsResponse,++    -- * RollbackRequest+    RollbackRequest (..),+    newRollbackRequest,++    -- * RollbackResponse+    RollbackResponse (..),+    newRollbackResponse,++    -- * RunAggregationQueryRequest+    RunAggregationQueryRequest (..),+    newRunAggregationQueryRequest,++    -- * RunAggregationQueryResponse+    RunAggregationQueryResponse (..),+    newRunAggregationQueryResponse,++    -- * RunQueryRequest+    RunQueryRequest (..),+    newRunQueryRequest,++    -- * RunQueryResponse+    RunQueryResponse (..),+    newRunQueryResponse,++    -- * Status+    Status (..),+    newStatus,++    -- * Status_DetailsItem+    Status_DetailsItem (..),+    newStatus_DetailsItem,++    -- * Sum+    Sum (..),+    newSum,++    -- * TransactionOptions+    TransactionOptions (..),+    newTransactionOptions,++    -- * Value+    Value (..),+    newValue,+  )+where++import Gogol.Datastore.Internal.Sum+import Gogol.Prelude qualified as Core++-- | Defines an aggregation that produces a single result.+--+-- /See:/ 'newAggregation' smart constructor.+data Aggregation = Aggregation+  { -- | Optional. Optional name of the property to store the result of the aggregation. If not provided, Datastore will pick a default name following the format @property_@. For example: @AGGREGATE COUNT_UP_TO(1) AS count_up_to_1, COUNT_UP_TO(2), COUNT_UP_TO(3) AS count_up_to_3, COUNT(*) OVER ( ... );@ becomes: @AGGREGATE COUNT_UP_TO(1) AS count_up_to_1, COUNT_UP_TO(2) AS property_1, COUNT_UP_TO(3) AS count_up_to_3, COUNT(*) AS property_2 OVER ( ... );@ Requires: * Must be unique across all aggregation aliases. * Conform to entity property name limitations.+    alias :: (Core.Maybe Core.Text),+    -- | Average aggregator.+    avg :: (Core.Maybe Avg),+    -- | Count aggregator.+    count :: (Core.Maybe Count),+    -- | Sum aggregator.+    sum :: (Core.Maybe Sum)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Aggregation' with the minimum fields required to make a request.+newAggregation ::+  Aggregation+newAggregation =+  Aggregation+    { alias = Core.Nothing,+      avg = Core.Nothing,+      count = Core.Nothing,+      sum = Core.Nothing+    }++instance Core.FromJSON Aggregation where+  parseJSON =+    Core.withObject+      "Aggregation"+      ( \o ->+          Aggregation+            Core.<$> (o Core..:? "alias")+            Core.<*> (o Core..:? "avg")+            Core.<*> (o Core..:? "count")+            Core.<*> (o Core..:? "sum")+      )++instance Core.ToJSON Aggregation where+  toJSON Aggregation {..} =+    Core.object+      ( Core.catMaybes+          [ ("alias" Core..=) Core.<$> alias,+            ("avg" Core..=) Core.<$> avg,+            ("count" Core..=) Core.<$> count,+            ("sum" Core..=) Core.<$> sum+          ]+      )++-- | Datastore query for running an aggregation over a Query.+--+-- /See:/ 'newAggregationQuery' smart constructor.+data AggregationQuery = AggregationQuery+  { -- | Optional. Series of aggregations to apply over the results of the @nested_query@. Requires: * A minimum of one and maximum of five aggregations per query.+    aggregations :: (Core.Maybe [Aggregation]),+    -- | Nested query for aggregation+    nestedQuery :: (Core.Maybe Query)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AggregationQuery' with the minimum fields required to make a request.+newAggregationQuery ::+  AggregationQuery+newAggregationQuery =+  AggregationQuery+    { aggregations = Core.Nothing,+      nestedQuery = Core.Nothing+    }++instance Core.FromJSON AggregationQuery where+  parseJSON =+    Core.withObject+      "AggregationQuery"+      ( \o ->+          AggregationQuery+            Core.<$> (o Core..:? "aggregations")+            Core.<*> (o Core..:? "nestedQuery")+      )++instance Core.ToJSON AggregationQuery where+  toJSON AggregationQuery {..} =+    Core.object+      ( Core.catMaybes+          [ ("aggregations" Core..=) Core.<$> aggregations,+            ("nestedQuery" Core..=) Core.<$> nestedQuery+          ]+      )++-- | The result of a single bucket from a Datastore aggregation query. The keys of @aggregate_properties@ are the same for all results in an aggregation query, unlike entity queries which can have different fields present for each result.+--+-- /See:/ 'newAggregationResult' smart constructor.+newtype AggregationResult = AggregationResult+  { -- | The result of the aggregation functions, ex: @COUNT(*) AS total_entities@. The key is the alias assigned to the aggregation function on input and the size of this map equals the number of aggregation functions in the query.+    aggregateProperties :: (Core.Maybe AggregationResult_AggregateProperties)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AggregationResult' with the minimum fields required to make a request.+newAggregationResult ::+  AggregationResult+newAggregationResult =+  AggregationResult {aggregateProperties = Core.Nothing}++instance Core.FromJSON AggregationResult where+  parseJSON =+    Core.withObject+      "AggregationResult"+      ( \o ->+          AggregationResult Core.<$> (o Core..:? "aggregateProperties")+      )++instance Core.ToJSON AggregationResult where+  toJSON AggregationResult {..} =+    Core.object+      ( Core.catMaybes+          [("aggregateProperties" Core..=) Core.<$> aggregateProperties]+      )++-- | The result of the aggregation functions, ex: @COUNT(*) AS total_entities@. The key is the alias assigned to the aggregation function on input and the size of this map equals the number of aggregation functions in the query.+--+-- /See:/ 'newAggregationResult_AggregateProperties' smart constructor.+newtype AggregationResult_AggregateProperties = AggregationResult_AggregateProperties+  { additional :: (Core.HashMap Core.Text Value)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AggregationResult_AggregateProperties' with the minimum fields required to make a request.+newAggregationResult_AggregateProperties ::+  -- |  See 'additional'.+  Core.HashMap Core.Text Value ->+  AggregationResult_AggregateProperties+newAggregationResult_AggregateProperties additional =+  AggregationResult_AggregateProperties {additional = additional}++instance Core.FromJSON AggregationResult_AggregateProperties where+  parseJSON =+    Core.withObject+      "AggregationResult_AggregateProperties"+      ( \o ->+          AggregationResult_AggregateProperties+            Core.<$> (Core.parseJSONObject o)+      )++instance Core.ToJSON AggregationResult_AggregateProperties where+  toJSON AggregationResult_AggregateProperties {..} =+    Core.toJSON additional++-- | A batch of aggregation results produced by an aggregation query.+--+-- /See:/ 'newAggregationResultBatch' smart constructor.+data AggregationResultBatch = AggregationResultBatch+  { -- | The aggregation results for this batch.+    aggregationResults :: (Core.Maybe [AggregationResult]),+    -- | The state of the query after the current batch. Only COUNT(*) aggregations are supported in the initial launch. Therefore, expected result type is limited to @NO_MORE_RESULTS@.+    moreResults :: (Core.Maybe AggregationResultBatch_MoreResults),+    -- | Read timestamp this batch was returned from. In a single transaction, subsequent query result batches for the same query can have a greater timestamp. Each batch\'s read timestamp is valid for all preceding batches.+    readTime :: (Core.Maybe Core.DateTime)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AggregationResultBatch' with the minimum fields required to make a request.+newAggregationResultBatch ::+  AggregationResultBatch+newAggregationResultBatch =+  AggregationResultBatch+    { aggregationResults = Core.Nothing,+      moreResults = Core.Nothing,+      readTime = Core.Nothing+    }++instance Core.FromJSON AggregationResultBatch where+  parseJSON =+    Core.withObject+      "AggregationResultBatch"+      ( \o ->+          AggregationResultBatch+            Core.<$> (o Core..:? "aggregationResults")+            Core.<*> (o Core..:? "moreResults")+            Core.<*> (o Core..:? "readTime")+      )++instance Core.ToJSON AggregationResultBatch where+  toJSON AggregationResultBatch {..} =+    Core.object+      ( Core.catMaybes+          [ ("aggregationResults" Core..=) Core.<$> aggregationResults,+            ("moreResults" Core..=) Core.<$> moreResults,+            ("readTime" Core..=) Core.<$> readTime+          ]+      )++-- | The request for Datastore.AllocateIds.+--+-- /See:/ 'newAllocateIdsRequest' smart constructor.+data AllocateIdsRequest = AllocateIdsRequest+  { -- | The ID of the database against which to make the request. \'(default)\' is not allowed; please use empty string \'\' to refer the default database.+    databaseId :: (Core.Maybe Core.Text),+    -- | Required. A list of keys with incomplete key paths for which to allocate IDs. No key may be reserved\/read-only.+    keys :: (Core.Maybe [Key])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AllocateIdsRequest' with the minimum fields required to make a request.+newAllocateIdsRequest ::+  AllocateIdsRequest+newAllocateIdsRequest =+  AllocateIdsRequest+    { databaseId = Core.Nothing,+      keys = Core.Nothing+    }++instance Core.FromJSON AllocateIdsRequest where+  parseJSON =+    Core.withObject+      "AllocateIdsRequest"+      ( \o ->+          AllocateIdsRequest+            Core.<$> (o Core..:? "databaseId")+            Core.<*> (o Core..:? "keys")+      )++instance Core.ToJSON AllocateIdsRequest where+  toJSON AllocateIdsRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("databaseId" Core..=) Core.<$> databaseId,+            ("keys" Core..=) Core.<$> keys+          ]+      )++-- | The response for Datastore.AllocateIds.+--+-- /See:/ 'newAllocateIdsResponse' smart constructor.+newtype AllocateIdsResponse = AllocateIdsResponse+  { -- | The keys specified in the request (in the same order), each with its key path completed with a newly allocated ID.+    keys :: (Core.Maybe [Key])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AllocateIdsResponse' with the minimum fields required to make a request.+newAllocateIdsResponse ::+  AllocateIdsResponse+newAllocateIdsResponse = AllocateIdsResponse {keys = Core.Nothing}++instance Core.FromJSON AllocateIdsResponse where+  parseJSON =+    Core.withObject+      "AllocateIdsResponse"+      (\o -> AllocateIdsResponse Core.<$> (o Core..:? "keys"))++instance Core.ToJSON AllocateIdsResponse where+  toJSON AllocateIdsResponse {..} =+    Core.object (Core.catMaybes [("keys" Core..=) Core.<$> keys])++-- | An array value.+--+-- /See:/ 'newArrayValue' smart constructor.+newtype ArrayValue = ArrayValue+  { -- | Values in the array. The order of values in an array is preserved as long as all values have identical settings for \'exclude/from/indexes\'.+    values :: (Core.Maybe [Value])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ArrayValue' with the minimum fields required to make a request.+newArrayValue ::+  ArrayValue+newArrayValue = ArrayValue {values = Core.Nothing}++instance Core.FromJSON ArrayValue where+  parseJSON =+    Core.withObject+      "ArrayValue"+      (\o -> ArrayValue Core.<$> (o Core..:? "values"))++instance Core.ToJSON ArrayValue where+  toJSON ArrayValue {..} =+    Core.object (Core.catMaybes [("values" Core..=) Core.<$> values])++-- | Average of the values of the requested property. * Only numeric values will be aggregated. All non-numeric values including @NULL@ are skipped. * If the aggregated values contain @NaN@, returns @NaN@. Infinity math follows IEEE-754 standards. * If the aggregated value set is empty, returns @NULL@. * Always returns the result as a double.+--+-- /See:/ 'newAvg' smart constructor.+newtype Avg = Avg+  { -- | The property to aggregate on.+    property :: (Core.Maybe PropertyReference)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Avg' with the minimum fields required to make a request.+newAvg ::+  Avg+newAvg = Avg {property = Core.Nothing}++instance Core.FromJSON Avg where+  parseJSON =+    Core.withObject+      "Avg"+      (\o -> Avg Core.<$> (o Core..:? "property"))++instance Core.ToJSON Avg where+  toJSON Avg {..} =+    Core.object+      (Core.catMaybes [("property" Core..=) Core.<$> property])++-- | The request for Datastore.BeginTransaction.+--+-- /See:/ 'newBeginTransactionRequest' smart constructor.+data BeginTransactionRequest = BeginTransactionRequest+  { -- | The ID of the database against which to make the request. \'(default)\' is not allowed; please use empty string \'\' to refer the default database.+    databaseId :: (Core.Maybe Core.Text),+    -- | Options for a new transaction.+    transactionOptions :: (Core.Maybe TransactionOptions)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'BeginTransactionRequest' with the minimum fields required to make a request.+newBeginTransactionRequest ::+  BeginTransactionRequest+newBeginTransactionRequest =+  BeginTransactionRequest+    { databaseId = Core.Nothing,+      transactionOptions = Core.Nothing+    }++instance Core.FromJSON BeginTransactionRequest where+  parseJSON =+    Core.withObject+      "BeginTransactionRequest"+      ( \o ->+          BeginTransactionRequest+            Core.<$> (o Core..:? "databaseId")+            Core.<*> (o Core..:? "transactionOptions")+      )++instance Core.ToJSON BeginTransactionRequest where+  toJSON BeginTransactionRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("databaseId" Core..=) Core.<$> databaseId,+            ("transactionOptions" Core..=) Core.<$> transactionOptions+          ]+      )++-- | The response for Datastore.BeginTransaction.+--+-- /See:/ 'newBeginTransactionResponse' smart constructor.+newtype BeginTransactionResponse = BeginTransactionResponse+  { -- | The transaction identifier (always present).+    transaction :: (Core.Maybe Core.Base64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'BeginTransactionResponse' with the minimum fields required to make a request.+newBeginTransactionResponse ::+  BeginTransactionResponse+newBeginTransactionResponse =+  BeginTransactionResponse {transaction = Core.Nothing}++instance Core.FromJSON BeginTransactionResponse where+  parseJSON =+    Core.withObject+      "BeginTransactionResponse"+      ( \o ->+          BeginTransactionResponse Core.<$> (o Core..:? "transaction")+      )++instance Core.ToJSON BeginTransactionResponse where+  toJSON BeginTransactionResponse {..} =+    Core.object+      (Core.catMaybes [("transaction" Core..=) Core.<$> transaction])++-- | The request for Datastore.Commit.+--+-- /See:/ 'newCommitRequest' smart constructor.+data CommitRequest = CommitRequest+  { -- | The ID of the database against which to make the request. \'(default)\' is not allowed; please use empty string \'\' to refer the default database.+    databaseId :: (Core.Maybe Core.Text),+    -- | The type of commit to perform. Defaults to @TRANSACTIONAL@.+    mode :: (Core.Maybe CommitRequest_Mode),+    -- | The mutations to perform. When mode is @TRANSACTIONAL@, mutations affecting a single entity are applied in order. The following sequences of mutations affecting a single entity are not permitted in a single @Commit@ request: - @insert@ followed by @insert@ - @update@ followed by @insert@ - @upsert@ followed by @insert@ - @delete@ followed by @update@ When mode is @NON_TRANSACTIONAL@, no two mutations may affect a single entity.+    mutations :: (Core.Maybe [Mutation]),+    -- | Options for beginning a new transaction for this request. The transaction is committed when the request completes. If specified, TransactionOptions.mode must be TransactionOptions.ReadWrite.+    singleUseTransaction :: (Core.Maybe TransactionOptions),+    -- | The identifier of the transaction associated with the commit. A transaction identifier is returned by a call to Datastore.BeginTransaction.+    transaction :: (Core.Maybe Core.Base64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CommitRequest' with the minimum fields required to make a request.+newCommitRequest ::+  CommitRequest+newCommitRequest =+  CommitRequest+    { databaseId = Core.Nothing,+      mode = Core.Nothing,+      mutations = Core.Nothing,+      singleUseTransaction = Core.Nothing,+      transaction = Core.Nothing+    }++instance Core.FromJSON CommitRequest where+  parseJSON =+    Core.withObject+      "CommitRequest"+      ( \o ->+          CommitRequest+            Core.<$> (o Core..:? "databaseId")+            Core.<*> (o Core..:? "mode")+            Core.<*> (o Core..:? "mutations")+            Core.<*> (o Core..:? "singleUseTransaction")+            Core.<*> (o Core..:? "transaction")+      )++instance Core.ToJSON CommitRequest where+  toJSON CommitRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("databaseId" Core..=) Core.<$> databaseId,+            ("mode" Core..=) Core.<$> mode,+            ("mutations" Core..=) Core.<$> mutations,+            ("singleUseTransaction" Core..=) Core.<$> singleUseTransaction,+            ("transaction" Core..=) Core.<$> transaction+          ]+      )++-- | The response for Datastore.Commit.+--+-- /See:/ 'newCommitResponse' smart constructor.+data CommitResponse = CommitResponse+  { -- | The transaction commit timestamp. Not set for non-transactional commits.+    commitTime :: (Core.Maybe Core.DateTime),+    -- | The number of index entries updated during the commit, or zero if none were updated.+    indexUpdates :: (Core.Maybe Core.Int32),+    -- | The result of performing the mutations. The i-th mutation result corresponds to the i-th mutation in the request.+    mutationResults :: (Core.Maybe [MutationResult])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CommitResponse' with the minimum fields required to make a request.+newCommitResponse ::+  CommitResponse+newCommitResponse =+  CommitResponse+    { commitTime = Core.Nothing,+      indexUpdates = Core.Nothing,+      mutationResults = Core.Nothing+    }++instance Core.FromJSON CommitResponse where+  parseJSON =+    Core.withObject+      "CommitResponse"+      ( \o ->+          CommitResponse+            Core.<$> (o Core..:? "commitTime")+            Core.<*> (o Core..:? "indexUpdates")+            Core.<*> (o Core..:? "mutationResults")+      )++instance Core.ToJSON CommitResponse where+  toJSON CommitResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("commitTime" Core..=) Core.<$> commitTime,+            ("indexUpdates" Core..=) Core.<$> indexUpdates,+            ("mutationResults" Core..=) Core.<$> mutationResults+          ]+      )++-- | A filter that merges multiple other filters using the given operator.+--+-- /See:/ 'newCompositeFilter' smart constructor.+data CompositeFilter = CompositeFilter+  { -- | The list of filters to combine. Requires: * At least one filter is present.+    filters :: (Core.Maybe [Filter]),+    -- | The operator for combining multiple filters.+    op :: (Core.Maybe CompositeFilter_Op)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CompositeFilter' with the minimum fields required to make a request.+newCompositeFilter ::+  CompositeFilter+newCompositeFilter =+  CompositeFilter {filters = Core.Nothing, op = Core.Nothing}++instance Core.FromJSON CompositeFilter where+  parseJSON =+    Core.withObject+      "CompositeFilter"+      ( \o ->+          CompositeFilter+            Core.<$> (o Core..:? "filters")+            Core.<*> (o Core..:? "op")+      )++instance Core.ToJSON CompositeFilter where+  toJSON CompositeFilter {..} =+    Core.object+      ( Core.catMaybes+          [("filters" Core..=) Core.<$> filters, ("op" Core..=) Core.<$> op]+      )++-- | Count of entities that match the query. The @COUNT(*)@ aggregation function operates on the entire entity so it does not require a field reference.+--+-- /See:/ 'newCount' smart constructor.+newtype Count = Count+  { -- | Optional. Optional constraint on the maximum number of entities to count. This provides a way to set an upper bound on the number of entities to scan, limiting latency, and cost. Unspecified is interpreted as no bound. If a zero value is provided, a count result of zero should always be expected. High-Level Example: @AGGREGATE COUNT_UP_TO(1000) OVER ( SELECT * FROM k );@ Requires: * Must be non-negative when present.+    upTo :: (Core.Maybe Core.Int64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Count' with the minimum fields required to make a request.+newCount ::+  Count+newCount = Count {upTo = Core.Nothing}++instance Core.FromJSON Count where+  parseJSON =+    Core.withObject+      "Count"+      ( \o ->+          Count+            Core.<$> (o Core..:? "upTo" Core.<&> Core.fmap Core.fromAsText)+      )++instance Core.ToJSON Count where+  toJSON Count {..} =+    Core.object+      ( Core.catMaybes+          [("upTo" Core..=) Core.. Core.AsText Core.<$> upTo]+      )++-- | A generic empty message that you can re-use to avoid defining duplicated empty messages in your APIs. A typical example is to use it as the request or the response type of an API method. For instance: service Foo { rpc Bar(google.protobuf.Empty) returns (google.protobuf.Empty); }+--+-- /See:/ 'newEmpty' smart constructor.+data Empty = Empty+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Empty' with the minimum fields required to make a request.+newEmpty ::+  Empty+newEmpty = Empty++instance Core.FromJSON Empty where+  parseJSON = Core.withObject "Empty" (\o -> Core.pure Empty)++instance Core.ToJSON Empty where+  toJSON = Core.const Core.emptyObject++-- | A Datastore data object. Must not exceed 1 MiB - 4 bytes.+--+-- /See:/ 'newEntity' smart constructor.+data Entity = Entity+  { -- | The entity\'s key. An entity must have a key, unless otherwise documented (for example, an entity in @Value.entity_value@ may have no key). An entity\'s kind is its key path\'s last element\'s kind, or null if it has no key.+    key :: (Core.Maybe Key),+    -- | The entity\'s properties. The map\'s keys are property names. A property name matching regex @__.*__@ is reserved. A reserved property name is forbidden in certain documented contexts. The map keys, represented as UTF-8, must not exceed 1,500 bytes and cannot be empty.+    properties :: (Core.Maybe Entity_Properties)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Entity' with the minimum fields required to make a request.+newEntity ::+  Entity+newEntity = Entity {key = Core.Nothing, properties = Core.Nothing}++instance Core.FromJSON Entity where+  parseJSON =+    Core.withObject+      "Entity"+      ( \o ->+          Entity+            Core.<$> (o Core..:? "key")+            Core.<*> (o Core..:? "properties")+      )++instance Core.ToJSON Entity where+  toJSON Entity {..} =+    Core.object+      ( Core.catMaybes+          [ ("key" Core..=) Core.<$> key,+            ("properties" Core..=) Core.<$> properties+          ]+      )++-- | The entity\'s properties. The map\'s keys are property names. A property name matching regex @__.*__@ is reserved. A reserved property name is forbidden in certain documented contexts. The map keys, represented as UTF-8, must not exceed 1,500 bytes and cannot be empty.+--+-- /See:/ 'newEntity_Properties' smart constructor.+newtype Entity_Properties = Entity_Properties+  { additional :: (Core.HashMap Core.Text Value)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Entity_Properties' with the minimum fields required to make a request.+newEntity_Properties ::+  -- |  See 'additional'.+  Core.HashMap Core.Text Value ->+  Entity_Properties+newEntity_Properties additional =+  Entity_Properties {additional = additional}++instance Core.FromJSON Entity_Properties where+  parseJSON =+    Core.withObject+      "Entity_Properties"+      (\o -> Entity_Properties Core.<$> (Core.parseJSONObject o))++instance Core.ToJSON Entity_Properties where+  toJSON Entity_Properties {..} = Core.toJSON additional++-- | The result of fetching an entity from Datastore.+--+-- /See:/ 'newEntityResult' smart constructor.+data EntityResult = EntityResult+  { -- | The time at which the entity was created. This field is set for @FULL@ entity results. If this entity is missing, this field will not be set.+    createTime :: (Core.Maybe Core.DateTime),+    -- | A cursor that points to the position after the result entity. Set only when the @EntityResult@ is part of a @QueryResultBatch@ message.+    cursor :: (Core.Maybe Core.Base64),+    -- | The resulting entity.+    entity :: (Core.Maybe Entity),+    -- | The time at which the entity was last changed. This field is set for @FULL@ entity results. If this entity is missing, this field will not be set.+    updateTime :: (Core.Maybe Core.DateTime),+    -- | The version of the entity, a strictly positive number that monotonically increases with changes to the entity. This field is set for @FULL@ entity results. For missing entities in @LookupResponse@, this is the version of the snapshot that was used to look up the entity, and it is always set except for eventually consistent reads.+    version :: (Core.Maybe Core.Int64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EntityResult' with the minimum fields required to make a request.+newEntityResult ::+  EntityResult+newEntityResult =+  EntityResult+    { createTime = Core.Nothing,+      cursor = Core.Nothing,+      entity = Core.Nothing,+      updateTime = Core.Nothing,+      version = Core.Nothing+    }++instance Core.FromJSON EntityResult where+  parseJSON =+    Core.withObject+      "EntityResult"+      ( \o ->+          EntityResult+            Core.<$> (o Core..:? "createTime")+            Core.<*> (o Core..:? "cursor")+            Core.<*> (o Core..:? "entity")+            Core.<*> (o Core..:? "updateTime")+            Core.<*> (o Core..:? "version" Core.<&> Core.fmap Core.fromAsText)+      )++instance Core.ToJSON EntityResult where+  toJSON EntityResult {..} =+    Core.object+      ( Core.catMaybes+          [ ("createTime" Core..=) Core.<$> createTime,+            ("cursor" Core..=) Core.<$> cursor,+            ("entity" Core..=) Core.<$> entity,+            ("updateTime" Core..=) Core.<$> updateTime,+            ("version" Core..=) Core.. Core.AsText Core.<$> version+          ]+      )++-- | Execution statistics for the query.+--+-- /See:/ 'newExecutionStats' smart constructor.+data ExecutionStats = ExecutionStats+  { -- | Debugging statistics from the execution of the query. Note that the debugging stats are subject to change as Firestore evolves. It could include: { \"indexes/entries/scanned\": \"1000\", \"documents/scanned\": \"20\", \"billing/details\" : { \"documents/billable\": \"20\", \"index/entries/billable\": \"1000\", \"min/query_cost\": \"0\" } }+    debugStats :: (Core.Maybe ExecutionStats_DebugStats),+    -- | Total time to execute the query in the backend.+    executionDuration :: (Core.Maybe Core.Duration),+    -- | Total billable read operations.+    readOperations :: (Core.Maybe Core.Int64),+    -- | Total number of results returned, including documents, projections, aggregation results, keys.+    resultsReturned :: (Core.Maybe Core.Int64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ExecutionStats' with the minimum fields required to make a request.+newExecutionStats ::+  ExecutionStats+newExecutionStats =+  ExecutionStats+    { debugStats = Core.Nothing,+      executionDuration = Core.Nothing,+      readOperations = Core.Nothing,+      resultsReturned = Core.Nothing+    }++instance Core.FromJSON ExecutionStats where+  parseJSON =+    Core.withObject+      "ExecutionStats"+      ( \o ->+          ExecutionStats+            Core.<$> (o Core..:? "debugStats")+            Core.<*> (o Core..:? "executionDuration")+            Core.<*> (o Core..:? "readOperations" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "resultsReturned" Core.<&> Core.fmap Core.fromAsText)+      )++instance Core.ToJSON ExecutionStats where+  toJSON ExecutionStats {..} =+    Core.object+      ( Core.catMaybes+          [ ("debugStats" Core..=) Core.<$> debugStats,+            ("executionDuration" Core..=) Core.<$> executionDuration,+            ("readOperations" Core..=)+              Core.. Core.AsText+              Core.<$> readOperations,+            ("resultsReturned" Core..=)+              Core.. Core.AsText+              Core.<$> resultsReturned+          ]+      )++-- | Debugging statistics from the execution of the query. Note that the debugging stats are subject to change as Firestore evolves. It could include: { \"indexes/entries/scanned\": \"1000\", \"documents/scanned\": \"20\", \"billing/details\" : { \"documents/billable\": \"20\", \"index/entries/billable\": \"1000\", \"min/query_cost\": \"0\" } }+--+-- /See:/ 'newExecutionStats_DebugStats' smart constructor.+newtype ExecutionStats_DebugStats = ExecutionStats_DebugStats+  { -- | Properties of the object.+    additional :: (Core.HashMap Core.Text Core.Value)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ExecutionStats_DebugStats' with the minimum fields required to make a request.+newExecutionStats_DebugStats ::+  -- |  Properties of the object. See 'additional'.+  Core.HashMap Core.Text Core.Value ->+  ExecutionStats_DebugStats+newExecutionStats_DebugStats additional =+  ExecutionStats_DebugStats {additional = additional}++instance Core.FromJSON ExecutionStats_DebugStats where+  parseJSON =+    Core.withObject+      "ExecutionStats_DebugStats"+      ( \o ->+          ExecutionStats_DebugStats Core.<$> (Core.parseJSONObject o)+      )++instance Core.ToJSON ExecutionStats_DebugStats where+  toJSON ExecutionStats_DebugStats {..} = Core.toJSON additional++-- | Explain metrics for the query.+--+-- /See:/ 'newExplainMetrics' smart constructor.+data ExplainMetrics = ExplainMetrics+  { -- | Aggregated stats from the execution of the query. Only present when ExplainOptions.analyze is set to true.+    executionStats :: (Core.Maybe ExecutionStats),+    -- | Planning phase information for the query.+    planSummary :: (Core.Maybe PlanSummary)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ExplainMetrics' with the minimum fields required to make a request.+newExplainMetrics ::+  ExplainMetrics+newExplainMetrics =+  ExplainMetrics+    { executionStats = Core.Nothing,+      planSummary = Core.Nothing+    }++instance Core.FromJSON ExplainMetrics where+  parseJSON =+    Core.withObject+      "ExplainMetrics"+      ( \o ->+          ExplainMetrics+            Core.<$> (o Core..:? "executionStats")+            Core.<*> (o Core..:? "planSummary")+      )++instance Core.ToJSON ExplainMetrics where+  toJSON ExplainMetrics {..} =+    Core.object+      ( Core.catMaybes+          [ ("executionStats" Core..=) Core.<$> executionStats,+            ("planSummary" Core..=) Core.<$> planSummary+          ]+      )++-- | Explain options for the query.+--+-- /See:/ 'newExplainOptions' smart constructor.+newtype ExplainOptions = ExplainOptions+  { -- | Optional. Whether to execute this query. When false (the default), the query will be planned, returning only metrics from the planning stages. When true, the query will be planned and executed, returning the full query results along with both planning and execution stage metrics.+    analyze :: (Core.Maybe Core.Bool)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ExplainOptions' with the minimum fields required to make a request.+newExplainOptions ::+  ExplainOptions+newExplainOptions = ExplainOptions {analyze = Core.Nothing}++instance Core.FromJSON ExplainOptions where+  parseJSON =+    Core.withObject+      "ExplainOptions"+      (\o -> ExplainOptions Core.<$> (o Core..:? "analyze"))++instance Core.ToJSON ExplainOptions where+  toJSON ExplainOptions {..} =+    Core.object+      (Core.catMaybes [("analyze" Core..=) Core.<$> analyze])++-- | A holder for any type of filter.+--+-- /See:/ 'newFilter' smart constructor.+data Filter = Filter+  { -- | A composite filter.+    compositeFilter :: (Core.Maybe CompositeFilter),+    -- | A filter on a property.+    propertyFilter :: (Core.Maybe PropertyFilter)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Filter' with the minimum fields required to make a request.+newFilter ::+  Filter+newFilter =+  Filter+    { compositeFilter = Core.Nothing,+      propertyFilter = Core.Nothing+    }++instance Core.FromJSON Filter where+  parseJSON =+    Core.withObject+      "Filter"+      ( \o ->+          Filter+            Core.<$> (o Core..:? "compositeFilter")+            Core.<*> (o Core..:? "propertyFilter")+      )++instance Core.ToJSON Filter where+  toJSON Filter {..} =+    Core.object+      ( Core.catMaybes+          [ ("compositeFilter" Core..=) Core.<$> compositeFilter,+            ("propertyFilter" Core..=) Core.<$> propertyFilter+          ]+      )++-- | Nearest Neighbors search config. The ordering provided by FindNearest supersedes the order_by stage. If multiple documents have the same vector distance, the returned document order is not guaranteed to be stable between queries.+--+-- /See:/ 'newFindNearest' smart constructor.+data FindNearest = FindNearest+  { -- | Required. The Distance Measure to use, required.+    distanceMeasure :: (Core.Maybe FindNearest_DistanceMeasure),+    -- | Optional. Optional name of the field to output the result of the vector distance calculation. Must conform to entity property limitations.+    distanceResultProperty :: (Core.Maybe Core.Text),+    -- | Optional. Option to specify a threshold for which no less similar documents will be returned. The behavior of the specified @distance_measure@ will affect the meaning of the distance threshold. Since DOT/PRODUCT distances increase when the vectors are more similar, the comparison is inverted. * For EUCLIDEAN, COSINE: WHERE distance \<= distance/threshold * For DOT/PRODUCT: WHERE distance >= distance/threshold+    distanceThreshold :: (Core.Maybe Core.Double),+    -- | Required. The number of nearest neighbors to return. Must be a positive integer of no more than 100.+    limit :: (Core.Maybe Core.Int32),+    -- | Required. The query vector that we are searching on. Must be a vector of no more than 2048 dimensions.+    queryVector :: (Core.Maybe Value),+    -- | Required. An indexed vector property to search upon. Only documents which contain vectors whose dimensionality match the query_vector can be returned.+    vectorProperty :: (Core.Maybe PropertyReference)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'FindNearest' with the minimum fields required to make a request.+newFindNearest ::+  FindNearest+newFindNearest =+  FindNearest+    { distanceMeasure = Core.Nothing,+      distanceResultProperty = Core.Nothing,+      distanceThreshold = Core.Nothing,+      limit = Core.Nothing,+      queryVector = Core.Nothing,+      vectorProperty = Core.Nothing+    }++instance Core.FromJSON FindNearest where+  parseJSON =+    Core.withObject+      "FindNearest"+      ( \o ->+          FindNearest+            Core.<$> (o Core..:? "distanceMeasure")+            Core.<*> (o Core..:? "distanceResultProperty")+            Core.<*> (o Core..:? "distanceThreshold")+            Core.<*> (o Core..:? "limit")+            Core.<*> (o Core..:? "queryVector")+            Core.<*> (o Core..:? "vectorProperty")+      )++instance Core.ToJSON FindNearest where+  toJSON FindNearest {..} =+    Core.object+      ( Core.catMaybes+          [ ("distanceMeasure" Core..=) Core.<$> distanceMeasure,+            ("distanceResultProperty" Core..=) Core.<$> distanceResultProperty,+            ("distanceThreshold" Core..=) Core.<$> distanceThreshold,+            ("limit" Core..=) Core.<$> limit,+            ("queryVector" Core..=) Core.<$> queryVector,+            ("vectorProperty" Core..=) Core.<$> vectorProperty+          ]+      )++-- | Metadata common to all Datastore Admin operations.+--+-- /See:/ 'newGoogleDatastoreAdminV1CommonMetadata' smart constructor.+data GoogleDatastoreAdminV1CommonMetadata = GoogleDatastoreAdminV1CommonMetadata+  { -- | The time the operation ended, either successfully or otherwise.+    endTime :: (Core.Maybe Core.DateTime),+    -- | The client-assigned labels which were provided when the operation was created. May also include additional labels.+    labels :: (Core.Maybe GoogleDatastoreAdminV1CommonMetadata_Labels),+    -- | The type of the operation. Can be used as a filter in ListOperationsRequest.+    operationType :: (Core.Maybe GoogleDatastoreAdminV1CommonMetadata_OperationType),+    -- | The time that work began on the operation.+    startTime :: (Core.Maybe Core.DateTime),+    -- | The current state of the Operation.+    state :: (Core.Maybe GoogleDatastoreAdminV1CommonMetadata_State)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1CommonMetadata' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1CommonMetadata ::+  GoogleDatastoreAdminV1CommonMetadata+newGoogleDatastoreAdminV1CommonMetadata =+  GoogleDatastoreAdminV1CommonMetadata+    { endTime = Core.Nothing,+      labels = Core.Nothing,+      operationType = Core.Nothing,+      startTime = Core.Nothing,+      state = Core.Nothing+    }++instance Core.FromJSON GoogleDatastoreAdminV1CommonMetadata where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1CommonMetadata"+      ( \o ->+          GoogleDatastoreAdminV1CommonMetadata+            Core.<$> (o Core..:? "endTime")+            Core.<*> (o Core..:? "labels")+            Core.<*> (o Core..:? "operationType")+            Core.<*> (o Core..:? "startTime")+            Core.<*> (o Core..:? "state")+      )++instance Core.ToJSON GoogleDatastoreAdminV1CommonMetadata where+  toJSON GoogleDatastoreAdminV1CommonMetadata {..} =+    Core.object+      ( Core.catMaybes+          [ ("endTime" Core..=) Core.<$> endTime,+            ("labels" Core..=) Core.<$> labels,+            ("operationType" Core..=) Core.<$> operationType,+            ("startTime" Core..=) Core.<$> startTime,+            ("state" Core..=) Core.<$> state+          ]+      )++-- | The client-assigned labels which were provided when the operation was created. May also include additional labels.+--+-- /See:/ 'newGoogleDatastoreAdminV1CommonMetadata_Labels' smart constructor.+newtype GoogleDatastoreAdminV1CommonMetadata_Labels = GoogleDatastoreAdminV1CommonMetadata_Labels+  { additional :: (Core.HashMap Core.Text Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1CommonMetadata_Labels' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1CommonMetadata_Labels ::+  -- |  See 'additional'.+  Core.HashMap Core.Text Core.Text ->+  GoogleDatastoreAdminV1CommonMetadata_Labels+newGoogleDatastoreAdminV1CommonMetadata_Labels additional =+  GoogleDatastoreAdminV1CommonMetadata_Labels+    { additional =+        additional+    }++instance Core.FromJSON GoogleDatastoreAdminV1CommonMetadata_Labels where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1CommonMetadata_Labels"+      ( \o ->+          GoogleDatastoreAdminV1CommonMetadata_Labels+            Core.<$> (Core.parseJSONObject o)+      )++instance Core.ToJSON GoogleDatastoreAdminV1CommonMetadata_Labels where+  toJSON GoogleDatastoreAdminV1CommonMetadata_Labels {..} =+    Core.toJSON additional++-- | Metadata for Datastore to Firestore migration operations. The DatastoreFirestoreMigration operation is not started by the end-user via an explicit \"creation\" method. This is an intentional deviation from the LRO design pattern. This singleton resource can be accessed at: \"projects\/{project_id}\/operations\/datastore-firestore-migration\"+--+-- /See:/ 'newGoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata' smart constructor.+data GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata = GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata+  { -- | The current state of migration from Cloud Datastore to Cloud Firestore in Datastore mode.+    migrationState ::+      ( Core.Maybe+          GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState+      ),+    -- | The current step of migration from Cloud Datastore to Cloud Firestore in Datastore mode.+    migrationStep ::+      ( Core.Maybe+          GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep+      )+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata ::+  GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata+newGoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata =+  GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata+    { migrationState =+        Core.Nothing,+      migrationStep = Core.Nothing+    }++instance+  Core.FromJSON+    GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata+  where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata"+      ( \o ->+          GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata+            Core.<$> (o Core..:? "migrationState")+            Core.<*> (o Core..:? "migrationStep")+      )++instance+  Core.ToJSON+    GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata+  where+  toJSON+    GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata {..} =+      Core.object+        ( Core.catMaybes+            [ ("migrationState" Core..=) Core.<$> migrationState,+              ("migrationStep" Core..=) Core.<$> migrationStep+            ]+        )++-- | Identifies a subset of entities in a project. This is specified as combinations of kinds and namespaces (either or both of which may be all, as described in the following examples). Example usage: Entire project: kinds=[], namespace/ids=[] Kinds Foo and Bar in all namespaces: kinds=[\'Foo\', \'Bar\'], namespace/ids=[] Kinds Foo and Bar only in the default namespace: kinds=[\'Foo\', \'Bar\'], namespace/ids=[\'\'] Kinds Foo and Bar in both the default and Baz namespaces: kinds=[\'Foo\', \'Bar\'], namespace/ids=[\'\', \'Baz\'] The entire Baz namespace: kinds=[], namespace_ids=[\'Baz\']+--+-- /See:/ 'newGoogleDatastoreAdminV1EntityFilter' smart constructor.+data GoogleDatastoreAdminV1EntityFilter = GoogleDatastoreAdminV1EntityFilter+  { -- | If empty, then this represents all kinds.+    kinds :: (Core.Maybe [Core.Text]),+    -- | An empty list represents all namespaces. This is the preferred usage for projects that don\'t use namespaces. An empty string element represents the default namespace. This should be used if the project has data in non-default namespaces, but doesn\'t want to include them. Each namespace in this list must be unique.+    namespaceIds :: (Core.Maybe [Core.Text])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1EntityFilter' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1EntityFilter ::+  GoogleDatastoreAdminV1EntityFilter+newGoogleDatastoreAdminV1EntityFilter =+  GoogleDatastoreAdminV1EntityFilter+    { kinds = Core.Nothing,+      namespaceIds = Core.Nothing+    }++instance Core.FromJSON GoogleDatastoreAdminV1EntityFilter where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1EntityFilter"+      ( \o ->+          GoogleDatastoreAdminV1EntityFilter+            Core.<$> (o Core..:? "kinds")+            Core.<*> (o Core..:? "namespaceIds")+      )++instance Core.ToJSON GoogleDatastoreAdminV1EntityFilter where+  toJSON GoogleDatastoreAdminV1EntityFilter {..} =+    Core.object+      ( Core.catMaybes+          [ ("kinds" Core..=) Core.<$> kinds,+            ("namespaceIds" Core..=) Core.<$> namespaceIds+          ]+      )++-- | Metadata for ExportEntities operations.+--+-- /See:/ 'newGoogleDatastoreAdminV1ExportEntitiesMetadata' smart constructor.+data GoogleDatastoreAdminV1ExportEntitiesMetadata = GoogleDatastoreAdminV1ExportEntitiesMetadata+  { -- | Metadata common to all Datastore Admin operations.+    common :: (Core.Maybe GoogleDatastoreAdminV1CommonMetadata),+    -- | Description of which entities are being exported.+    entityFilter :: (Core.Maybe GoogleDatastoreAdminV1EntityFilter),+    -- | Location for the export metadata and data files. This will be the same value as the google.datastore.admin.v1.ExportEntitiesRequest.output/url/prefix field. The final output location is provided in google.datastore.admin.v1.ExportEntitiesResponse.output_url.+    outputUrlPrefix :: (Core.Maybe Core.Text),+    -- | An estimate of the number of bytes processed.+    progressBytes :: (Core.Maybe GoogleDatastoreAdminV1Progress),+    -- | An estimate of the number of entities processed.+    progressEntities :: (Core.Maybe GoogleDatastoreAdminV1Progress)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1ExportEntitiesMetadata' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1ExportEntitiesMetadata ::+  GoogleDatastoreAdminV1ExportEntitiesMetadata+newGoogleDatastoreAdminV1ExportEntitiesMetadata =+  GoogleDatastoreAdminV1ExportEntitiesMetadata+    { common =+        Core.Nothing,+      entityFilter = Core.Nothing,+      outputUrlPrefix = Core.Nothing,+      progressBytes = Core.Nothing,+      progressEntities = Core.Nothing+    }++instance Core.FromJSON GoogleDatastoreAdminV1ExportEntitiesMetadata where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1ExportEntitiesMetadata"+      ( \o ->+          GoogleDatastoreAdminV1ExportEntitiesMetadata+            Core.<$> (o Core..:? "common")+            Core.<*> (o Core..:? "entityFilter")+            Core.<*> (o Core..:? "outputUrlPrefix")+            Core.<*> (o Core..:? "progressBytes")+            Core.<*> (o Core..:? "progressEntities")+      )++instance Core.ToJSON GoogleDatastoreAdminV1ExportEntitiesMetadata where+  toJSON GoogleDatastoreAdminV1ExportEntitiesMetadata {..} =+    Core.object+      ( Core.catMaybes+          [ ("common" Core..=) Core.<$> common,+            ("entityFilter" Core..=) Core.<$> entityFilter,+            ("outputUrlPrefix" Core..=) Core.<$> outputUrlPrefix,+            ("progressBytes" Core..=) Core.<$> progressBytes,+            ("progressEntities" Core..=) Core.<$> progressEntities+          ]+      )++-- | The request for google.datastore.admin.v1.DatastoreAdmin.ExportEntities.+--+-- /See:/ 'newGoogleDatastoreAdminV1ExportEntitiesRequest' smart constructor.+data GoogleDatastoreAdminV1ExportEntitiesRequest = GoogleDatastoreAdminV1ExportEntitiesRequest+  { -- | Description of what data from the project is included in the export.+    entityFilter :: (Core.Maybe GoogleDatastoreAdminV1EntityFilter),+    -- | Client-assigned labels.+    labels :: (Core.Maybe GoogleDatastoreAdminV1ExportEntitiesRequest_Labels),+    -- | Required. Location for the export metadata and data files. The full resource URL of the external storage location. Currently, only Google Cloud Storage is supported. So output/url/prefix should be of the form: @gs:\/\/BUCKET_NAME[\/NAMESPACE_PATH]@, where @BUCKET_NAME@ is the name of the Cloud Storage bucket and @NAMESPACE_PATH@ is an optional Cloud Storage namespace path (this is not a Cloud Datastore namespace). For more information about Cloud Storage namespace paths, see <https://cloud.google.com/storage/docs/naming#object-considerations Object name considerations>. The resulting files will be nested deeper than the specified URL prefix. The final output URL will be provided in the google.datastore.admin.v1.ExportEntitiesResponse.output_url field. That value should be used for subsequent ImportEntities operations. By nesting the data files deeper, the same Cloud Storage bucket can be used in multiple ExportEntities operations without conflict.+    outputUrlPrefix :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1ExportEntitiesRequest' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1ExportEntitiesRequest ::+  GoogleDatastoreAdminV1ExportEntitiesRequest+newGoogleDatastoreAdminV1ExportEntitiesRequest =+  GoogleDatastoreAdminV1ExportEntitiesRequest+    { entityFilter =+        Core.Nothing,+      labels = Core.Nothing,+      outputUrlPrefix = Core.Nothing+    }++instance Core.FromJSON GoogleDatastoreAdminV1ExportEntitiesRequest where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1ExportEntitiesRequest"+      ( \o ->+          GoogleDatastoreAdminV1ExportEntitiesRequest+            Core.<$> (o Core..:? "entityFilter")+            Core.<*> (o Core..:? "labels")+            Core.<*> (o Core..:? "outputUrlPrefix")+      )++instance Core.ToJSON GoogleDatastoreAdminV1ExportEntitiesRequest where+  toJSON GoogleDatastoreAdminV1ExportEntitiesRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("entityFilter" Core..=) Core.<$> entityFilter,+            ("labels" Core..=) Core.<$> labels,+            ("outputUrlPrefix" Core..=) Core.<$> outputUrlPrefix+          ]+      )++-- | Client-assigned labels.+--+-- /See:/ 'newGoogleDatastoreAdminV1ExportEntitiesRequest_Labels' smart constructor.+newtype GoogleDatastoreAdminV1ExportEntitiesRequest_Labels = GoogleDatastoreAdminV1ExportEntitiesRequest_Labels+  { additional :: (Core.HashMap Core.Text Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1ExportEntitiesRequest_Labels' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1ExportEntitiesRequest_Labels ::+  -- |  See 'additional'.+  Core.HashMap Core.Text Core.Text ->+  GoogleDatastoreAdminV1ExportEntitiesRequest_Labels+newGoogleDatastoreAdminV1ExportEntitiesRequest_Labels additional =+  GoogleDatastoreAdminV1ExportEntitiesRequest_Labels+    { additional =+        additional+    }++instance+  Core.FromJSON+    GoogleDatastoreAdminV1ExportEntitiesRequest_Labels+  where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1ExportEntitiesRequest_Labels"+      ( \o ->+          GoogleDatastoreAdminV1ExportEntitiesRequest_Labels+            Core.<$> (Core.parseJSONObject o)+      )++instance+  Core.ToJSON+    GoogleDatastoreAdminV1ExportEntitiesRequest_Labels+  where+  toJSON GoogleDatastoreAdminV1ExportEntitiesRequest_Labels {..} =+    Core.toJSON additional++-- | The response for google.datastore.admin.v1.DatastoreAdmin.ExportEntities.+--+-- /See:/ 'newGoogleDatastoreAdminV1ExportEntitiesResponse' smart constructor.+newtype GoogleDatastoreAdminV1ExportEntitiesResponse = GoogleDatastoreAdminV1ExportEntitiesResponse+  { -- | Location of the output metadata file. This can be used to begin an import into Cloud Datastore (this project or another project). See google.datastore.admin.v1.ImportEntitiesRequest.input_url. Only present if the operation completed successfully.+    outputUrl :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1ExportEntitiesResponse' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1ExportEntitiesResponse ::+  GoogleDatastoreAdminV1ExportEntitiesResponse+newGoogleDatastoreAdminV1ExportEntitiesResponse =+  GoogleDatastoreAdminV1ExportEntitiesResponse+    { outputUrl =+        Core.Nothing+    }++instance Core.FromJSON GoogleDatastoreAdminV1ExportEntitiesResponse where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1ExportEntitiesResponse"+      ( \o ->+          GoogleDatastoreAdminV1ExportEntitiesResponse+            Core.<$> (o Core..:? "outputUrl")+      )++instance Core.ToJSON GoogleDatastoreAdminV1ExportEntitiesResponse where+  toJSON GoogleDatastoreAdminV1ExportEntitiesResponse {..} =+    Core.object+      (Core.catMaybes [("outputUrl" Core..=) Core.<$> outputUrl])++-- | Metadata for ImportEntities operations.+--+-- /See:/ 'newGoogleDatastoreAdminV1ImportEntitiesMetadata' smart constructor.+data GoogleDatastoreAdminV1ImportEntitiesMetadata = GoogleDatastoreAdminV1ImportEntitiesMetadata+  { -- | Metadata common to all Datastore Admin operations.+    common :: (Core.Maybe GoogleDatastoreAdminV1CommonMetadata),+    -- | Description of which entities are being imported.+    entityFilter :: (Core.Maybe GoogleDatastoreAdminV1EntityFilter),+    -- | The location of the import metadata file. This will be the same value as the google.datastore.admin.v1.ExportEntitiesResponse.output_url field.+    inputUrl :: (Core.Maybe Core.Text),+    -- | An estimate of the number of bytes processed.+    progressBytes :: (Core.Maybe GoogleDatastoreAdminV1Progress),+    -- | An estimate of the number of entities processed.+    progressEntities :: (Core.Maybe GoogleDatastoreAdminV1Progress)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1ImportEntitiesMetadata' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1ImportEntitiesMetadata ::+  GoogleDatastoreAdminV1ImportEntitiesMetadata+newGoogleDatastoreAdminV1ImportEntitiesMetadata =+  GoogleDatastoreAdminV1ImportEntitiesMetadata+    { common =+        Core.Nothing,+      entityFilter = Core.Nothing,+      inputUrl = Core.Nothing,+      progressBytes = Core.Nothing,+      progressEntities = Core.Nothing+    }++instance Core.FromJSON GoogleDatastoreAdminV1ImportEntitiesMetadata where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1ImportEntitiesMetadata"+      ( \o ->+          GoogleDatastoreAdminV1ImportEntitiesMetadata+            Core.<$> (o Core..:? "common")+            Core.<*> (o Core..:? "entityFilter")+            Core.<*> (o Core..:? "inputUrl")+            Core.<*> (o Core..:? "progressBytes")+            Core.<*> (o Core..:? "progressEntities")+      )++instance Core.ToJSON GoogleDatastoreAdminV1ImportEntitiesMetadata where+  toJSON GoogleDatastoreAdminV1ImportEntitiesMetadata {..} =+    Core.object+      ( Core.catMaybes+          [ ("common" Core..=) Core.<$> common,+            ("entityFilter" Core..=) Core.<$> entityFilter,+            ("inputUrl" Core..=) Core.<$> inputUrl,+            ("progressBytes" Core..=) Core.<$> progressBytes,+            ("progressEntities" Core..=) Core.<$> progressEntities+          ]+      )++-- | The request for google.datastore.admin.v1.DatastoreAdmin.ImportEntities.+--+-- /See:/ 'newGoogleDatastoreAdminV1ImportEntitiesRequest' smart constructor.+data GoogleDatastoreAdminV1ImportEntitiesRequest = GoogleDatastoreAdminV1ImportEntitiesRequest+  { -- | Optionally specify which kinds\/namespaces are to be imported. If provided, the list must be a subset of the EntityFilter used in creating the export, otherwise a FAILED_PRECONDITION error will be returned. If no filter is specified then all entities from the export are imported.+    entityFilter :: (Core.Maybe GoogleDatastoreAdminV1EntityFilter),+    -- | Required. The full resource URL of the external storage location. Currently, only Google Cloud Storage is supported. So input/url should be of the form: @gs:\/\/BUCKET_NAME[\/NAMESPACE_PATH]\/OVERALL_EXPORT_METADATA_FILE@, where @BUCKET_NAME@ is the name of the Cloud Storage bucket, @NAMESPACE_PATH@ is an optional Cloud Storage namespace path (this is not a Cloud Datastore namespace), and @OVERALL_EXPORT_METADATA_FILE@ is the metadata file written by the ExportEntities operation. For more information about Cloud Storage namespace paths, see <https://cloud.google.com/storage/docs/naming#object-considerations Object name considerations>. For more information, see google.datastore.admin.v1.ExportEntitiesResponse.output/url.+    inputUrl :: (Core.Maybe Core.Text),+    -- | Client-assigned labels.+    labels :: (Core.Maybe GoogleDatastoreAdminV1ImportEntitiesRequest_Labels)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1ImportEntitiesRequest' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1ImportEntitiesRequest ::+  GoogleDatastoreAdminV1ImportEntitiesRequest+newGoogleDatastoreAdminV1ImportEntitiesRequest =+  GoogleDatastoreAdminV1ImportEntitiesRequest+    { entityFilter =+        Core.Nothing,+      inputUrl = Core.Nothing,+      labels = Core.Nothing+    }++instance Core.FromJSON GoogleDatastoreAdminV1ImportEntitiesRequest where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1ImportEntitiesRequest"+      ( \o ->+          GoogleDatastoreAdminV1ImportEntitiesRequest+            Core.<$> (o Core..:? "entityFilter")+            Core.<*> (o Core..:? "inputUrl")+            Core.<*> (o Core..:? "labels")+      )++instance Core.ToJSON GoogleDatastoreAdminV1ImportEntitiesRequest where+  toJSON GoogleDatastoreAdminV1ImportEntitiesRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("entityFilter" Core..=) Core.<$> entityFilter,+            ("inputUrl" Core..=) Core.<$> inputUrl,+            ("labels" Core..=) Core.<$> labels+          ]+      )++-- | Client-assigned labels.+--+-- /See:/ 'newGoogleDatastoreAdminV1ImportEntitiesRequest_Labels' smart constructor.+newtype GoogleDatastoreAdminV1ImportEntitiesRequest_Labels = GoogleDatastoreAdminV1ImportEntitiesRequest_Labels+  { additional :: (Core.HashMap Core.Text Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1ImportEntitiesRequest_Labels' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1ImportEntitiesRequest_Labels ::+  -- |  See 'additional'.+  Core.HashMap Core.Text Core.Text ->+  GoogleDatastoreAdminV1ImportEntitiesRequest_Labels+newGoogleDatastoreAdminV1ImportEntitiesRequest_Labels additional =+  GoogleDatastoreAdminV1ImportEntitiesRequest_Labels+    { additional =+        additional+    }++instance+  Core.FromJSON+    GoogleDatastoreAdminV1ImportEntitiesRequest_Labels+  where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1ImportEntitiesRequest_Labels"+      ( \o ->+          GoogleDatastoreAdminV1ImportEntitiesRequest_Labels+            Core.<$> (Core.parseJSONObject o)+      )++instance+  Core.ToJSON+    GoogleDatastoreAdminV1ImportEntitiesRequest_Labels+  where+  toJSON GoogleDatastoreAdminV1ImportEntitiesRequest_Labels {..} =+    Core.toJSON additional++-- | Datastore composite index definition.+--+-- /See:/ 'newGoogleDatastoreAdminV1Index' smart constructor.+data GoogleDatastoreAdminV1Index = GoogleDatastoreAdminV1Index+  { -- | Required. The index\'s ancestor mode. Must not be ANCESTOR/MODE/UNSPECIFIED.+    ancestor :: (Core.Maybe GoogleDatastoreAdminV1Index_Ancestor),+    -- | Output only. The resource ID of the index.+    indexId :: (Core.Maybe Core.Text),+    -- | Required. The entity kind to which this index applies.+    kind :: (Core.Maybe Core.Text),+    -- | Output only. Project ID.+    projectId :: (Core.Maybe Core.Text),+    -- | Required. An ordered sequence of property names and their index attributes. Requires: * A maximum of 100 properties.+    properties :: (Core.Maybe [GoogleDatastoreAdminV1IndexedProperty]),+    -- | Output only. The state of the index.+    state :: (Core.Maybe GoogleDatastoreAdminV1Index_State)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1Index' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1Index ::+  GoogleDatastoreAdminV1Index+newGoogleDatastoreAdminV1Index =+  GoogleDatastoreAdminV1Index+    { ancestor = Core.Nothing,+      indexId = Core.Nothing,+      kind = Core.Nothing,+      projectId = Core.Nothing,+      properties = Core.Nothing,+      state = Core.Nothing+    }++instance Core.FromJSON GoogleDatastoreAdminV1Index where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1Index"+      ( \o ->+          GoogleDatastoreAdminV1Index+            Core.<$> (o Core..:? "ancestor")+            Core.<*> (o Core..:? "indexId")+            Core.<*> (o Core..:? "kind")+            Core.<*> (o Core..:? "projectId")+            Core.<*> (o Core..:? "properties")+            Core.<*> (o Core..:? "state")+      )++instance Core.ToJSON GoogleDatastoreAdminV1Index where+  toJSON GoogleDatastoreAdminV1Index {..} =+    Core.object+      ( Core.catMaybes+          [ ("ancestor" Core..=) Core.<$> ancestor,+            ("indexId" Core..=) Core.<$> indexId,+            ("kind" Core..=) Core.<$> kind,+            ("projectId" Core..=) Core.<$> projectId,+            ("properties" Core..=) Core.<$> properties,+            ("state" Core..=) Core.<$> state+          ]+      )++-- | Metadata for Index operations.+--+-- /See:/ 'newGoogleDatastoreAdminV1IndexOperationMetadata' smart constructor.+data GoogleDatastoreAdminV1IndexOperationMetadata = GoogleDatastoreAdminV1IndexOperationMetadata+  { -- | Metadata common to all Datastore Admin operations.+    common :: (Core.Maybe GoogleDatastoreAdminV1CommonMetadata),+    -- | The index resource ID that this operation is acting on.+    indexId :: (Core.Maybe Core.Text),+    -- | An estimate of the number of entities processed.+    progressEntities :: (Core.Maybe GoogleDatastoreAdminV1Progress)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1IndexOperationMetadata' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1IndexOperationMetadata ::+  GoogleDatastoreAdminV1IndexOperationMetadata+newGoogleDatastoreAdminV1IndexOperationMetadata =+  GoogleDatastoreAdminV1IndexOperationMetadata+    { common =+        Core.Nothing,+      indexId = Core.Nothing,+      progressEntities = Core.Nothing+    }++instance Core.FromJSON GoogleDatastoreAdminV1IndexOperationMetadata where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1IndexOperationMetadata"+      ( \o ->+          GoogleDatastoreAdminV1IndexOperationMetadata+            Core.<$> (o Core..:? "common")+            Core.<*> (o Core..:? "indexId")+            Core.<*> (o Core..:? "progressEntities")+      )++instance Core.ToJSON GoogleDatastoreAdminV1IndexOperationMetadata where+  toJSON GoogleDatastoreAdminV1IndexOperationMetadata {..} =+    Core.object+      ( Core.catMaybes+          [ ("common" Core..=) Core.<$> common,+            ("indexId" Core..=) Core.<$> indexId,+            ("progressEntities" Core..=) Core.<$> progressEntities+          ]+      )++-- | A property of an index.+--+-- /See:/ 'newGoogleDatastoreAdminV1IndexedProperty' smart constructor.+data GoogleDatastoreAdminV1IndexedProperty = GoogleDatastoreAdminV1IndexedProperty+  { -- | Required. The indexed property\'s direction. Must not be DIRECTION_UNSPECIFIED.+    direction :: (Core.Maybe GoogleDatastoreAdminV1IndexedProperty_Direction),+    -- | Required. The property name to index.+    name :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1IndexedProperty' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1IndexedProperty ::+  GoogleDatastoreAdminV1IndexedProperty+newGoogleDatastoreAdminV1IndexedProperty =+  GoogleDatastoreAdminV1IndexedProperty+    { direction = Core.Nothing,+      name = Core.Nothing+    }++instance Core.FromJSON GoogleDatastoreAdminV1IndexedProperty where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1IndexedProperty"+      ( \o ->+          GoogleDatastoreAdminV1IndexedProperty+            Core.<$> (o Core..:? "direction")+            Core.<*> (o Core..:? "name")+      )++instance Core.ToJSON GoogleDatastoreAdminV1IndexedProperty where+  toJSON GoogleDatastoreAdminV1IndexedProperty {..} =+    Core.object+      ( Core.catMaybes+          [ ("direction" Core..=) Core.<$> direction,+            ("name" Core..=) Core.<$> name+          ]+      )++-- | The response for google.datastore.admin.v1.DatastoreAdmin.ListIndexes.+--+-- /See:/ 'newGoogleDatastoreAdminV1ListIndexesResponse' smart constructor.+data GoogleDatastoreAdminV1ListIndexesResponse = GoogleDatastoreAdminV1ListIndexesResponse+  { -- | The indexes.+    indexes :: (Core.Maybe [GoogleDatastoreAdminV1Index]),+    -- | The standard List next-page token.+    nextPageToken :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1ListIndexesResponse' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1ListIndexesResponse ::+  GoogleDatastoreAdminV1ListIndexesResponse+newGoogleDatastoreAdminV1ListIndexesResponse =+  GoogleDatastoreAdminV1ListIndexesResponse+    { indexes = Core.Nothing,+      nextPageToken = Core.Nothing+    }++instance Core.FromJSON GoogleDatastoreAdminV1ListIndexesResponse where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1ListIndexesResponse"+      ( \o ->+          GoogleDatastoreAdminV1ListIndexesResponse+            Core.<$> (o Core..:? "indexes")+            Core.<*> (o Core..:? "nextPageToken")+      )++instance Core.ToJSON GoogleDatastoreAdminV1ListIndexesResponse where+  toJSON GoogleDatastoreAdminV1ListIndexesResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("indexes" Core..=) Core.<$> indexes,+            ("nextPageToken" Core..=) Core.<$> nextPageToken+          ]+      )++-- | An event signifying the start of a new step in a <https://cloud.google.com/datastore/docs/upgrade-to-firestore migration from Cloud Datastore to Cloud Firestore in Datastore mode>.+--+-- /See:/ 'newGoogleDatastoreAdminV1MigrationProgressEvent' smart constructor.+data GoogleDatastoreAdminV1MigrationProgressEvent = GoogleDatastoreAdminV1MigrationProgressEvent+  { -- | Details for the @PREPARE@ step.+    prepareStepDetails :: (Core.Maybe GoogleDatastoreAdminV1PrepareStepDetails),+    -- | Details for the @REDIRECT_WRITES@ step.+    redirectWritesStepDetails :: (Core.Maybe GoogleDatastoreAdminV1RedirectWritesStepDetails),+    -- | The step that is starting. An event with step set to @START@ indicates that the migration has been reverted back to the initial pre-migration state.+    step :: (Core.Maybe GoogleDatastoreAdminV1MigrationProgressEvent_Step)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1MigrationProgressEvent' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1MigrationProgressEvent ::+  GoogleDatastoreAdminV1MigrationProgressEvent+newGoogleDatastoreAdminV1MigrationProgressEvent =+  GoogleDatastoreAdminV1MigrationProgressEvent+    { prepareStepDetails =+        Core.Nothing,+      redirectWritesStepDetails = Core.Nothing,+      step = Core.Nothing+    }++instance Core.FromJSON GoogleDatastoreAdminV1MigrationProgressEvent where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1MigrationProgressEvent"+      ( \o ->+          GoogleDatastoreAdminV1MigrationProgressEvent+            Core.<$> (o Core..:? "prepareStepDetails")+            Core.<*> (o Core..:? "redirectWritesStepDetails")+            Core.<*> (o Core..:? "step")+      )++instance Core.ToJSON GoogleDatastoreAdminV1MigrationProgressEvent where+  toJSON GoogleDatastoreAdminV1MigrationProgressEvent {..} =+    Core.object+      ( Core.catMaybes+          [ ("prepareStepDetails" Core..=) Core.<$> prepareStepDetails,+            ("redirectWritesStepDetails" Core..=)+              Core.<$> redirectWritesStepDetails,+            ("step" Core..=) Core.<$> step+          ]+      )++-- | An event signifying a change in state of a <https://cloud.google.com/datastore/docs/upgrade-to-firestore migration from Cloud Datastore to Cloud Firestore in Datastore mode>.+--+-- /See:/ 'newGoogleDatastoreAdminV1MigrationStateEvent' smart constructor.+newtype GoogleDatastoreAdminV1MigrationStateEvent = GoogleDatastoreAdminV1MigrationStateEvent+  { -- | The new state of the migration.+    state :: (Core.Maybe GoogleDatastoreAdminV1MigrationStateEvent_State)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1MigrationStateEvent' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1MigrationStateEvent ::+  GoogleDatastoreAdminV1MigrationStateEvent+newGoogleDatastoreAdminV1MigrationStateEvent =+  GoogleDatastoreAdminV1MigrationStateEvent {state = Core.Nothing}++instance Core.FromJSON GoogleDatastoreAdminV1MigrationStateEvent where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1MigrationStateEvent"+      ( \o ->+          GoogleDatastoreAdminV1MigrationStateEvent+            Core.<$> (o Core..:? "state")+      )++instance Core.ToJSON GoogleDatastoreAdminV1MigrationStateEvent where+  toJSON GoogleDatastoreAdminV1MigrationStateEvent {..} =+    Core.object (Core.catMaybes [("state" Core..=) Core.<$> state])++-- | Details for the @PREPARE@ step.+--+-- /See:/ 'newGoogleDatastoreAdminV1PrepareStepDetails' smart constructor.+newtype GoogleDatastoreAdminV1PrepareStepDetails = GoogleDatastoreAdminV1PrepareStepDetails+  { -- | The concurrency mode this database will use when it reaches the @REDIRECT_WRITES@ step.+    concurrencyMode ::+      ( Core.Maybe+          GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode+      )+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1PrepareStepDetails' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1PrepareStepDetails ::+  GoogleDatastoreAdminV1PrepareStepDetails+newGoogleDatastoreAdminV1PrepareStepDetails =+  GoogleDatastoreAdminV1PrepareStepDetails+    { concurrencyMode =+        Core.Nothing+    }++instance Core.FromJSON GoogleDatastoreAdminV1PrepareStepDetails where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1PrepareStepDetails"+      ( \o ->+          GoogleDatastoreAdminV1PrepareStepDetails+            Core.<$> (o Core..:? "concurrencyMode")+      )++instance Core.ToJSON GoogleDatastoreAdminV1PrepareStepDetails where+  toJSON GoogleDatastoreAdminV1PrepareStepDetails {..} =+    Core.object+      ( Core.catMaybes+          [("concurrencyMode" Core..=) Core.<$> concurrencyMode]+      )++-- | Measures the progress of a particular metric.+--+-- /See:/ 'newGoogleDatastoreAdminV1Progress' smart constructor.+data GoogleDatastoreAdminV1Progress = GoogleDatastoreAdminV1Progress+  { -- | The amount of work that has been completed. Note that this may be greater than work_estimated.+    workCompleted :: (Core.Maybe Core.Int64),+    -- | An estimate of how much work needs to be performed. May be zero if the work estimate is unavailable.+    workEstimated :: (Core.Maybe Core.Int64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1Progress' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1Progress ::+  GoogleDatastoreAdminV1Progress+newGoogleDatastoreAdminV1Progress =+  GoogleDatastoreAdminV1Progress+    { workCompleted = Core.Nothing,+      workEstimated = Core.Nothing+    }++instance Core.FromJSON GoogleDatastoreAdminV1Progress where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1Progress"+      ( \o ->+          GoogleDatastoreAdminV1Progress+            Core.<$> (o Core..:? "workCompleted" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "workEstimated" Core.<&> Core.fmap Core.fromAsText)+      )++instance Core.ToJSON GoogleDatastoreAdminV1Progress where+  toJSON GoogleDatastoreAdminV1Progress {..} =+    Core.object+      ( Core.catMaybes+          [ ("workCompleted" Core..=)+              Core.. Core.AsText+              Core.<$> workCompleted,+            ("workEstimated" Core..=)+              Core.. Core.AsText+              Core.<$> workEstimated+          ]+      )++-- | Details for the @REDIRECT_WRITES@ step.+--+-- /See:/ 'newGoogleDatastoreAdminV1RedirectWritesStepDetails' smart constructor.+newtype GoogleDatastoreAdminV1RedirectWritesStepDetails = GoogleDatastoreAdminV1RedirectWritesStepDetails+  { -- | The concurrency mode for this database.+    concurrencyMode ::+      ( Core.Maybe+          GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode+      )+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1RedirectWritesStepDetails' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1RedirectWritesStepDetails ::+  GoogleDatastoreAdminV1RedirectWritesStepDetails+newGoogleDatastoreAdminV1RedirectWritesStepDetails =+  GoogleDatastoreAdminV1RedirectWritesStepDetails+    { concurrencyMode =+        Core.Nothing+    }++instance+  Core.FromJSON+    GoogleDatastoreAdminV1RedirectWritesStepDetails+  where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1RedirectWritesStepDetails"+      ( \o ->+          GoogleDatastoreAdminV1RedirectWritesStepDetails+            Core.<$> (o Core..:? "concurrencyMode")+      )++instance+  Core.ToJSON+    GoogleDatastoreAdminV1RedirectWritesStepDetails+  where+  toJSON GoogleDatastoreAdminV1RedirectWritesStepDetails {..} =+    Core.object+      ( Core.catMaybes+          [("concurrencyMode" Core..=) Core.<$> concurrencyMode]+      )++-- | Metadata common to all Datastore Admin operations.+--+-- /See:/ 'newGoogleDatastoreAdminV1beta1CommonMetadata' smart constructor.+data GoogleDatastoreAdminV1beta1CommonMetadata = GoogleDatastoreAdminV1beta1CommonMetadata+  { -- | The time the operation ended, either successfully or otherwise.+    endTime :: (Core.Maybe Core.DateTime),+    -- | The client-assigned labels which were provided when the operation was created. May also include additional labels.+    labels :: (Core.Maybe GoogleDatastoreAdminV1beta1CommonMetadata_Labels),+    -- | The type of the operation. Can be used as a filter in ListOperationsRequest.+    operationType ::+      ( Core.Maybe+          GoogleDatastoreAdminV1beta1CommonMetadata_OperationType+      ),+    -- | The time that work began on the operation.+    startTime :: (Core.Maybe Core.DateTime),+    -- | The current state of the Operation.+    state :: (Core.Maybe GoogleDatastoreAdminV1beta1CommonMetadata_State)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1beta1CommonMetadata' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1beta1CommonMetadata ::+  GoogleDatastoreAdminV1beta1CommonMetadata+newGoogleDatastoreAdminV1beta1CommonMetadata =+  GoogleDatastoreAdminV1beta1CommonMetadata+    { endTime = Core.Nothing,+      labels = Core.Nothing,+      operationType = Core.Nothing,+      startTime = Core.Nothing,+      state = Core.Nothing+    }++instance Core.FromJSON GoogleDatastoreAdminV1beta1CommonMetadata where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1beta1CommonMetadata"+      ( \o ->+          GoogleDatastoreAdminV1beta1CommonMetadata+            Core.<$> (o Core..:? "endTime")+            Core.<*> (o Core..:? "labels")+            Core.<*> (o Core..:? "operationType")+            Core.<*> (o Core..:? "startTime")+            Core.<*> (o Core..:? "state")+      )++instance Core.ToJSON GoogleDatastoreAdminV1beta1CommonMetadata where+  toJSON GoogleDatastoreAdminV1beta1CommonMetadata {..} =+    Core.object+      ( Core.catMaybes+          [ ("endTime" Core..=) Core.<$> endTime,+            ("labels" Core..=) Core.<$> labels,+            ("operationType" Core..=) Core.<$> operationType,+            ("startTime" Core..=) Core.<$> startTime,+            ("state" Core..=) Core.<$> state+          ]+      )++-- | The client-assigned labels which were provided when the operation was created. May also include additional labels.+--+-- /See:/ 'newGoogleDatastoreAdminV1beta1CommonMetadata_Labels' smart constructor.+newtype GoogleDatastoreAdminV1beta1CommonMetadata_Labels = GoogleDatastoreAdminV1beta1CommonMetadata_Labels+  { additional :: (Core.HashMap Core.Text Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1beta1CommonMetadata_Labels' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1beta1CommonMetadata_Labels ::+  -- |  See 'additional'.+  Core.HashMap Core.Text Core.Text ->+  GoogleDatastoreAdminV1beta1CommonMetadata_Labels+newGoogleDatastoreAdminV1beta1CommonMetadata_Labels additional =+  GoogleDatastoreAdminV1beta1CommonMetadata_Labels+    { additional =+        additional+    }++instance+  Core.FromJSON+    GoogleDatastoreAdminV1beta1CommonMetadata_Labels+  where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1beta1CommonMetadata_Labels"+      ( \o ->+          GoogleDatastoreAdminV1beta1CommonMetadata_Labels+            Core.<$> (Core.parseJSONObject o)+      )++instance+  Core.ToJSON+    GoogleDatastoreAdminV1beta1CommonMetadata_Labels+  where+  toJSON GoogleDatastoreAdminV1beta1CommonMetadata_Labels {..} =+    Core.toJSON additional++-- | Identifies a subset of entities in a project. This is specified as combinations of kinds and namespaces (either or both of which may be all, as described in the following examples). Example usage: Entire project: kinds=[], namespace/ids=[] Kinds Foo and Bar in all namespaces: kinds=[\'Foo\', \'Bar\'], namespace/ids=[] Kinds Foo and Bar only in the default namespace: kinds=[\'Foo\', \'Bar\'], namespace/ids=[\'\'] Kinds Foo and Bar in both the default and Baz namespaces: kinds=[\'Foo\', \'Bar\'], namespace/ids=[\'\', \'Baz\'] The entire Baz namespace: kinds=[], namespace_ids=[\'Baz\']+--+-- /See:/ 'newGoogleDatastoreAdminV1beta1EntityFilter' smart constructor.+data GoogleDatastoreAdminV1beta1EntityFilter = GoogleDatastoreAdminV1beta1EntityFilter+  { -- | If empty, then this represents all kinds.+    kinds :: (Core.Maybe [Core.Text]),+    -- | An empty list represents all namespaces. This is the preferred usage for projects that don\'t use namespaces. An empty string element represents the default namespace. This should be used if the project has data in non-default namespaces, but doesn\'t want to include them. Each namespace in this list must be unique.+    namespaceIds :: (Core.Maybe [Core.Text])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1beta1EntityFilter' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1beta1EntityFilter ::+  GoogleDatastoreAdminV1beta1EntityFilter+newGoogleDatastoreAdminV1beta1EntityFilter =+  GoogleDatastoreAdminV1beta1EntityFilter+    { kinds = Core.Nothing,+      namespaceIds = Core.Nothing+    }++instance Core.FromJSON GoogleDatastoreAdminV1beta1EntityFilter where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1beta1EntityFilter"+      ( \o ->+          GoogleDatastoreAdminV1beta1EntityFilter+            Core.<$> (o Core..:? "kinds")+            Core.<*> (o Core..:? "namespaceIds")+      )++instance Core.ToJSON GoogleDatastoreAdminV1beta1EntityFilter where+  toJSON GoogleDatastoreAdminV1beta1EntityFilter {..} =+    Core.object+      ( Core.catMaybes+          [ ("kinds" Core..=) Core.<$> kinds,+            ("namespaceIds" Core..=) Core.<$> namespaceIds+          ]+      )++-- | Metadata for ExportEntities operations.+--+-- /See:/ 'newGoogleDatastoreAdminV1beta1ExportEntitiesMetadata' smart constructor.+data GoogleDatastoreAdminV1beta1ExportEntitiesMetadata = GoogleDatastoreAdminV1beta1ExportEntitiesMetadata+  { -- | Metadata common to all Datastore Admin operations.+    common :: (Core.Maybe GoogleDatastoreAdminV1beta1CommonMetadata),+    -- | Description of which entities are being exported.+    entityFilter :: (Core.Maybe GoogleDatastoreAdminV1beta1EntityFilter),+    -- | Location for the export metadata and data files. This will be the same value as the google.datastore.admin.v1beta1.ExportEntitiesRequest.output/url/prefix field. The final output location is provided in google.datastore.admin.v1beta1.ExportEntitiesResponse.output_url.+    outputUrlPrefix :: (Core.Maybe Core.Text),+    -- | An estimate of the number of bytes processed.+    progressBytes :: (Core.Maybe GoogleDatastoreAdminV1beta1Progress),+    -- | An estimate of the number of entities processed.+    progressEntities :: (Core.Maybe GoogleDatastoreAdminV1beta1Progress)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1beta1ExportEntitiesMetadata' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1beta1ExportEntitiesMetadata ::+  GoogleDatastoreAdminV1beta1ExportEntitiesMetadata+newGoogleDatastoreAdminV1beta1ExportEntitiesMetadata =+  GoogleDatastoreAdminV1beta1ExportEntitiesMetadata+    { common =+        Core.Nothing,+      entityFilter = Core.Nothing,+      outputUrlPrefix = Core.Nothing,+      progressBytes = Core.Nothing,+      progressEntities = Core.Nothing+    }++instance+  Core.FromJSON+    GoogleDatastoreAdminV1beta1ExportEntitiesMetadata+  where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1beta1ExportEntitiesMetadata"+      ( \o ->+          GoogleDatastoreAdminV1beta1ExportEntitiesMetadata+            Core.<$> (o Core..:? "common")+            Core.<*> (o Core..:? "entityFilter")+            Core.<*> (o Core..:? "outputUrlPrefix")+            Core.<*> (o Core..:? "progressBytes")+            Core.<*> (o Core..:? "progressEntities")+      )++instance+  Core.ToJSON+    GoogleDatastoreAdminV1beta1ExportEntitiesMetadata+  where+  toJSON GoogleDatastoreAdminV1beta1ExportEntitiesMetadata {..} =+    Core.object+      ( Core.catMaybes+          [ ("common" Core..=) Core.<$> common,+            ("entityFilter" Core..=) Core.<$> entityFilter,+            ("outputUrlPrefix" Core..=) Core.<$> outputUrlPrefix,+            ("progressBytes" Core..=) Core.<$> progressBytes,+            ("progressEntities" Core..=) Core.<$> progressEntities+          ]+      )++-- | The response for google.datastore.admin.v1beta1.DatastoreAdmin.ExportEntities.+--+-- /See:/ 'newGoogleDatastoreAdminV1beta1ExportEntitiesResponse' smart constructor.+newtype GoogleDatastoreAdminV1beta1ExportEntitiesResponse = GoogleDatastoreAdminV1beta1ExportEntitiesResponse+  { -- | Location of the output metadata file. This can be used to begin an import into Cloud Datastore (this project or another project). See google.datastore.admin.v1beta1.ImportEntitiesRequest.input_url. Only present if the operation completed successfully.+    outputUrl :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1beta1ExportEntitiesResponse' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1beta1ExportEntitiesResponse ::+  GoogleDatastoreAdminV1beta1ExportEntitiesResponse+newGoogleDatastoreAdminV1beta1ExportEntitiesResponse =+  GoogleDatastoreAdminV1beta1ExportEntitiesResponse+    { outputUrl =+        Core.Nothing+    }++instance+  Core.FromJSON+    GoogleDatastoreAdminV1beta1ExportEntitiesResponse+  where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1beta1ExportEntitiesResponse"+      ( \o ->+          GoogleDatastoreAdminV1beta1ExportEntitiesResponse+            Core.<$> (o Core..:? "outputUrl")+      )++instance+  Core.ToJSON+    GoogleDatastoreAdminV1beta1ExportEntitiesResponse+  where+  toJSON GoogleDatastoreAdminV1beta1ExportEntitiesResponse {..} =+    Core.object+      (Core.catMaybes [("outputUrl" Core..=) Core.<$> outputUrl])++-- | Metadata for ImportEntities operations.+--+-- /See:/ 'newGoogleDatastoreAdminV1beta1ImportEntitiesMetadata' smart constructor.+data GoogleDatastoreAdminV1beta1ImportEntitiesMetadata = GoogleDatastoreAdminV1beta1ImportEntitiesMetadata+  { -- | Metadata common to all Datastore Admin operations.+    common :: (Core.Maybe GoogleDatastoreAdminV1beta1CommonMetadata),+    -- | Description of which entities are being imported.+    entityFilter :: (Core.Maybe GoogleDatastoreAdminV1beta1EntityFilter),+    -- | The location of the import metadata file. This will be the same value as the google.datastore.admin.v1beta1.ExportEntitiesResponse.output_url field.+    inputUrl :: (Core.Maybe Core.Text),+    -- | An estimate of the number of bytes processed.+    progressBytes :: (Core.Maybe GoogleDatastoreAdminV1beta1Progress),+    -- | An estimate of the number of entities processed.+    progressEntities :: (Core.Maybe GoogleDatastoreAdminV1beta1Progress)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1beta1ImportEntitiesMetadata' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1beta1ImportEntitiesMetadata ::+  GoogleDatastoreAdminV1beta1ImportEntitiesMetadata+newGoogleDatastoreAdminV1beta1ImportEntitiesMetadata =+  GoogleDatastoreAdminV1beta1ImportEntitiesMetadata+    { common =+        Core.Nothing,+      entityFilter = Core.Nothing,+      inputUrl = Core.Nothing,+      progressBytes = Core.Nothing,+      progressEntities = Core.Nothing+    }++instance+  Core.FromJSON+    GoogleDatastoreAdminV1beta1ImportEntitiesMetadata+  where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1beta1ImportEntitiesMetadata"+      ( \o ->+          GoogleDatastoreAdminV1beta1ImportEntitiesMetadata+            Core.<$> (o Core..:? "common")+            Core.<*> (o Core..:? "entityFilter")+            Core.<*> (o Core..:? "inputUrl")+            Core.<*> (o Core..:? "progressBytes")+            Core.<*> (o Core..:? "progressEntities")+      )++instance+  Core.ToJSON+    GoogleDatastoreAdminV1beta1ImportEntitiesMetadata+  where+  toJSON GoogleDatastoreAdminV1beta1ImportEntitiesMetadata {..} =+    Core.object+      ( Core.catMaybes+          [ ("common" Core..=) Core.<$> common,+            ("entityFilter" Core..=) Core.<$> entityFilter,+            ("inputUrl" Core..=) Core.<$> inputUrl,+            ("progressBytes" Core..=) Core.<$> progressBytes,+            ("progressEntities" Core..=) Core.<$> progressEntities+          ]+      )++-- | Measures the progress of a particular metric.+--+-- /See:/ 'newGoogleDatastoreAdminV1beta1Progress' smart constructor.+data GoogleDatastoreAdminV1beta1Progress = GoogleDatastoreAdminV1beta1Progress+  { -- | The amount of work that has been completed. Note that this may be greater than work_estimated.+    workCompleted :: (Core.Maybe Core.Int64),+    -- | An estimate of how much work needs to be performed. May be zero if the work estimate is unavailable.+    workEstimated :: (Core.Maybe Core.Int64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleDatastoreAdminV1beta1Progress' with the minimum fields required to make a request.+newGoogleDatastoreAdminV1beta1Progress ::+  GoogleDatastoreAdminV1beta1Progress+newGoogleDatastoreAdminV1beta1Progress =+  GoogleDatastoreAdminV1beta1Progress+    { workCompleted = Core.Nothing,+      workEstimated = Core.Nothing+    }++instance Core.FromJSON GoogleDatastoreAdminV1beta1Progress where+  parseJSON =+    Core.withObject+      "GoogleDatastoreAdminV1beta1Progress"+      ( \o ->+          GoogleDatastoreAdminV1beta1Progress+            Core.<$> (o Core..:? "workCompleted" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "workEstimated" Core.<&> Core.fmap Core.fromAsText)+      )++instance Core.ToJSON GoogleDatastoreAdminV1beta1Progress where+  toJSON GoogleDatastoreAdminV1beta1Progress {..} =+    Core.object+      ( Core.catMaybes+          [ ("workCompleted" Core..=)+              Core.. Core.AsText+              Core.<$> workCompleted,+            ("workEstimated" Core..=)+              Core.. Core.AsText+              Core.<$> workEstimated+          ]+      )++-- | The response message for Operations.ListOperations.+--+-- /See:/ 'newGoogleLongrunningListOperationsResponse' smart constructor.+data GoogleLongrunningListOperationsResponse = GoogleLongrunningListOperationsResponse+  { -- | The standard List next-page token.+    nextPageToken :: (Core.Maybe Core.Text),+    -- | A list of operations that matches the specified filter in the request.+    operations :: (Core.Maybe [GoogleLongrunningOperation])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleLongrunningListOperationsResponse' with the minimum fields required to make a request.+newGoogleLongrunningListOperationsResponse ::+  GoogleLongrunningListOperationsResponse+newGoogleLongrunningListOperationsResponse =+  GoogleLongrunningListOperationsResponse+    { nextPageToken =+        Core.Nothing,+      operations = Core.Nothing+    }++instance Core.FromJSON GoogleLongrunningListOperationsResponse where+  parseJSON =+    Core.withObject+      "GoogleLongrunningListOperationsResponse"+      ( \o ->+          GoogleLongrunningListOperationsResponse+            Core.<$> (o Core..:? "nextPageToken")+            Core.<*> (o Core..:? "operations")+      )++instance Core.ToJSON GoogleLongrunningListOperationsResponse where+  toJSON GoogleLongrunningListOperationsResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("nextPageToken" Core..=) Core.<$> nextPageToken,+            ("operations" Core..=) Core.<$> operations+          ]+      )++-- | This resource represents a long-running operation that is the result of a network API call.+--+-- /See:/ 'newGoogleLongrunningOperation' smart constructor.+data GoogleLongrunningOperation = GoogleLongrunningOperation+  { -- | If the value is @false@, it means the operation is still in progress. If @true@, the operation is completed, and either @error@ or @response@ is available.+    done :: (Core.Maybe Core.Bool),+    -- | The error result of the operation in case of failure or cancellation.+    error :: (Core.Maybe Status),+    -- | Service-specific metadata associated with the operation. It typically contains progress information and common metadata such as create time. Some services might not provide such metadata. Any method that returns a long-running operation should document the metadata type, if any.+    metadata :: (Core.Maybe GoogleLongrunningOperation_Metadata),+    -- | The server-assigned name, which is only unique within the same service that originally returns it. If you use the default HTTP mapping, the @name@ should be a resource name ending with @operations\/{unique_id}@.+    name :: (Core.Maybe Core.Text),+    -- | The normal, successful response of the operation. If the original method returns no data on success, such as @Delete@, the response is @google.protobuf.Empty@. If the original method is standard @Get@\/@Create@\/@Update@, the response should be the resource. For other methods, the response should have the type @XxxResponse@, where @Xxx@ is the original method name. For example, if the original method name is @TakeSnapshot()@, the inferred response type is @TakeSnapshotResponse@.+    response :: (Core.Maybe GoogleLongrunningOperation_Response)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleLongrunningOperation' with the minimum fields required to make a request.+newGoogleLongrunningOperation ::+  GoogleLongrunningOperation+newGoogleLongrunningOperation =+  GoogleLongrunningOperation+    { done = Core.Nothing,+      error = Core.Nothing,+      metadata = Core.Nothing,+      name = Core.Nothing,+      response = Core.Nothing+    }++instance Core.FromJSON GoogleLongrunningOperation where+  parseJSON =+    Core.withObject+      "GoogleLongrunningOperation"+      ( \o ->+          GoogleLongrunningOperation+            Core.<$> (o Core..:? "done")+            Core.<*> (o Core..:? "error")+            Core.<*> (o Core..:? "metadata")+            Core.<*> (o Core..:? "name")+            Core.<*> (o Core..:? "response")+      )++instance Core.ToJSON GoogleLongrunningOperation where+  toJSON GoogleLongrunningOperation {..} =+    Core.object+      ( Core.catMaybes+          [ ("done" Core..=) Core.<$> done,+            ("error" Core..=) Core.<$> error,+            ("metadata" Core..=) Core.<$> metadata,+            ("name" Core..=) Core.<$> name,+            ("response" Core..=) Core.<$> response+          ]+      )++-- | Service-specific metadata associated with the operation. It typically contains progress information and common metadata such as create time. Some services might not provide such metadata. Any method that returns a long-running operation should document the metadata type, if any.+--+-- /See:/ 'newGoogleLongrunningOperation_Metadata' smart constructor.+newtype GoogleLongrunningOperation_Metadata = GoogleLongrunningOperation_Metadata+  { -- | Properties of the object. Contains field \@type with type URL.+    additional :: (Core.HashMap Core.Text Core.Value)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleLongrunningOperation_Metadata' with the minimum fields required to make a request.+newGoogleLongrunningOperation_Metadata ::+  -- |  Properties of the object. Contains field \@type with type URL. See 'additional'.+  Core.HashMap Core.Text Core.Value ->+  GoogleLongrunningOperation_Metadata+newGoogleLongrunningOperation_Metadata additional =+  GoogleLongrunningOperation_Metadata {additional = additional}++instance Core.FromJSON GoogleLongrunningOperation_Metadata where+  parseJSON =+    Core.withObject+      "GoogleLongrunningOperation_Metadata"+      ( \o ->+          GoogleLongrunningOperation_Metadata+            Core.<$> (Core.parseJSONObject o)+      )++instance Core.ToJSON GoogleLongrunningOperation_Metadata where+  toJSON GoogleLongrunningOperation_Metadata {..} =+    Core.toJSON additional++-- | The normal, successful response of the operation. If the original method returns no data on success, such as @Delete@, the response is @google.protobuf.Empty@. If the original method is standard @Get@\/@Create@\/@Update@, the response should be the resource. For other methods, the response should have the type @XxxResponse@, where @Xxx@ is the original method name. For example, if the original method name is @TakeSnapshot()@, the inferred response type is @TakeSnapshotResponse@.+--+-- /See:/ 'newGoogleLongrunningOperation_Response' smart constructor.+newtype GoogleLongrunningOperation_Response = GoogleLongrunningOperation_Response+  { -- | Properties of the object. Contains field \@type with type URL.+    additional :: (Core.HashMap Core.Text Core.Value)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GoogleLongrunningOperation_Response' with the minimum fields required to make a request.+newGoogleLongrunningOperation_Response ::+  -- |  Properties of the object. Contains field \@type with type URL. See 'additional'.+  Core.HashMap Core.Text Core.Value ->+  GoogleLongrunningOperation_Response+newGoogleLongrunningOperation_Response additional =+  GoogleLongrunningOperation_Response {additional = additional}++instance Core.FromJSON GoogleLongrunningOperation_Response where+  parseJSON =+    Core.withObject+      "GoogleLongrunningOperation_Response"+      ( \o ->+          GoogleLongrunningOperation_Response+            Core.<$> (Core.parseJSONObject o)+      )++instance Core.ToJSON GoogleLongrunningOperation_Response where+  toJSON GoogleLongrunningOperation_Response {..} =+    Core.toJSON additional++-- | A <https://cloud.google.com/datastore/docs/apis/gql/gql_reference GQL query>.+--+-- /See:/ 'newGqlQuery' smart constructor.+data GqlQuery = GqlQuery+  { -- | When false, the query string must not contain any literals and instead must bind all values. For example, @SELECT * FROM Kind WHERE a = \'string literal\'@ is not allowed, while @SELECT * FROM Kind WHERE a = \@value@ is.+    allowLiterals :: (Core.Maybe Core.Bool),+    -- | For each non-reserved named binding site in the query string, there must be a named parameter with that name, but not necessarily the inverse. Key must match regex @A-Za-z_$*@, must not match regex @__.*__@, and must not be @\"\"@.+    namedBindings :: (Core.Maybe GqlQuery_NamedBindings),+    -- | Numbered binding site \@1 references the first numbered parameter, effectively using 1-based indexing, rather than the usual 0. For each binding site numbered i in @query_string@, there must be an i-th numbered parameter. The inverse must also be true.+    positionalBindings :: (Core.Maybe [GqlQueryParameter]),+    -- | A string of the format described <https://cloud.google.com/datastore/docs/apis/gql/gql_reference here>.+    queryString :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GqlQuery' with the minimum fields required to make a request.+newGqlQuery ::+  GqlQuery+newGqlQuery =+  GqlQuery+    { allowLiterals = Core.Nothing,+      namedBindings = Core.Nothing,+      positionalBindings = Core.Nothing,+      queryString = Core.Nothing+    }++instance Core.FromJSON GqlQuery where+  parseJSON =+    Core.withObject+      "GqlQuery"+      ( \o ->+          GqlQuery+            Core.<$> (o Core..:? "allowLiterals")+            Core.<*> (o Core..:? "namedBindings")+            Core.<*> (o Core..:? "positionalBindings")+            Core.<*> (o Core..:? "queryString")+      )++instance Core.ToJSON GqlQuery where+  toJSON GqlQuery {..} =+    Core.object+      ( Core.catMaybes+          [ ("allowLiterals" Core..=) Core.<$> allowLiterals,+            ("namedBindings" Core..=) Core.<$> namedBindings,+            ("positionalBindings" Core..=) Core.<$> positionalBindings,+            ("queryString" Core..=) Core.<$> queryString+          ]+      )++-- | For each non-reserved named binding site in the query string, there must be a named parameter with that name, but not necessarily the inverse. Key must match regex @A-Za-z_$*@, must not match regex @__.*__@, and must not be @\"\"@.+--+-- /See:/ 'newGqlQuery_NamedBindings' smart constructor.+newtype GqlQuery_NamedBindings = GqlQuery_NamedBindings+  { additional :: (Core.HashMap Core.Text GqlQueryParameter)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GqlQuery_NamedBindings' with the minimum fields required to make a request.+newGqlQuery_NamedBindings ::+  -- |  See 'additional'.+  Core.HashMap Core.Text GqlQueryParameter ->+  GqlQuery_NamedBindings+newGqlQuery_NamedBindings additional =+  GqlQuery_NamedBindings {additional = additional}++instance Core.FromJSON GqlQuery_NamedBindings where+  parseJSON =+    Core.withObject+      "GqlQuery_NamedBindings"+      (\o -> GqlQuery_NamedBindings Core.<$> (Core.parseJSONObject o))++instance Core.ToJSON GqlQuery_NamedBindings where+  toJSON GqlQuery_NamedBindings {..} = Core.toJSON additional++-- | A binding parameter for a GQL query.+--+-- /See:/ 'newGqlQueryParameter' smart constructor.+data GqlQueryParameter = GqlQueryParameter+  { -- | A query cursor. Query cursors are returned in query result batches.+    cursor :: (Core.Maybe Core.Base64),+    -- | A value parameter.+    value :: (Core.Maybe Value)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GqlQueryParameter' with the minimum fields required to make a request.+newGqlQueryParameter ::+  GqlQueryParameter+newGqlQueryParameter =+  GqlQueryParameter {cursor = Core.Nothing, value = Core.Nothing}++instance Core.FromJSON GqlQueryParameter where+  parseJSON =+    Core.withObject+      "GqlQueryParameter"+      ( \o ->+          GqlQueryParameter+            Core.<$> (o Core..:? "cursor")+            Core.<*> (o Core..:? "value")+      )++instance Core.ToJSON GqlQueryParameter where+  toJSON GqlQueryParameter {..} =+    Core.object+      ( Core.catMaybes+          [ ("cursor" Core..=) Core.<$> cursor,+            ("value" Core..=) Core.<$> value+          ]+      )++-- | A unique identifier for an entity. If a key\'s partition ID or any of its path kinds or names are reserved\/read-only, the key is reserved\/read-only. A reserved\/read-only key is forbidden in certain documented contexts.+--+-- /See:/ 'newKey' smart constructor.+data Key = Key+  { -- | Entities are partitioned into subsets, currently identified by a project ID and namespace ID. Queries are scoped to a single partition.+    partitionId :: (Core.Maybe PartitionId),+    -- | The entity path. An entity path consists of one or more elements composed of a kind and a string or numerical identifier, which identify entities. The first element identifies a /root entity/, the second element identifies a /child/ of the root entity, the third element identifies a child of the second entity, and so forth. The entities identified by all prefixes of the path are called the element\'s /ancestors/. An entity path is always fully complete: /all/ of the entity\'s ancestors are required to be in the path along with the entity identifier itself. The only exception is that in some documented cases, the identifier in the last path element (for the entity) itself may be omitted. For example, the last path element of the key of @Mutation.insert@ may have no identifier. A path can never be empty, and a path can have at most 100 elements.+    path :: (Core.Maybe [PathElement])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Key' with the minimum fields required to make a request.+newKey ::+  Key+newKey = Key {partitionId = Core.Nothing, path = Core.Nothing}++instance Core.FromJSON Key where+  parseJSON =+    Core.withObject+      "Key"+      ( \o ->+          Key+            Core.<$> (o Core..:? "partitionId")+            Core.<*> (o Core..:? "path")+      )++instance Core.ToJSON Key where+  toJSON Key {..} =+    Core.object+      ( Core.catMaybes+          [ ("partitionId" Core..=) Core.<$> partitionId,+            ("path" Core..=) Core.<$> path+          ]+      )++-- | A representation of a kind.+--+-- /See:/ 'newKindExpression' smart constructor.+newtype KindExpression = KindExpression+  { -- | The name of the kind.+    name :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'KindExpression' with the minimum fields required to make a request.+newKindExpression ::+  KindExpression+newKindExpression = KindExpression {name = Core.Nothing}++instance Core.FromJSON KindExpression where+  parseJSON =+    Core.withObject+      "KindExpression"+      (\o -> KindExpression Core.<$> (o Core..:? "name"))++instance Core.ToJSON KindExpression where+  toJSON KindExpression {..} =+    Core.object (Core.catMaybes [("name" Core..=) Core.<$> name])++-- | An object that represents a latitude\/longitude pair. This is expressed as a pair of doubles to represent degrees latitude and degrees longitude. Unless specified otherwise, this object must conform to the WGS84 standard. Values must be within normalized ranges.+--+-- /See:/ 'newLatLng' smart constructor.+data LatLng = LatLng+  { -- | The latitude in degrees. It must be in the range [-90.0, +90.0].+    latitude :: (Core.Maybe Core.Double),+    -- | The longitude in degrees. It must be in the range [-180.0, +180.0].+    longitude :: (Core.Maybe Core.Double)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'LatLng' with the minimum fields required to make a request.+newLatLng ::+  LatLng+newLatLng =+  LatLng {latitude = Core.Nothing, longitude = Core.Nothing}++instance Core.FromJSON LatLng where+  parseJSON =+    Core.withObject+      "LatLng"+      ( \o ->+          LatLng+            Core.<$> (o Core..:? "latitude")+            Core.<*> (o Core..:? "longitude")+      )++instance Core.ToJSON LatLng where+  toJSON LatLng {..} =+    Core.object+      ( Core.catMaybes+          [ ("latitude" Core..=) Core.<$> latitude,+            ("longitude" Core..=) Core.<$> longitude+          ]+      )++-- | The request for Datastore.Lookup.+--+-- /See:/ 'newLookupRequest' smart constructor.+data LookupRequest = LookupRequest+  { -- | The ID of the database against which to make the request. \'(default)\' is not allowed; please use empty string \'\' to refer the default database.+    databaseId :: (Core.Maybe Core.Text),+    -- | Required. Keys of entities to look up.+    keys :: (Core.Maybe [Key]),+    -- | The properties to return. Defaults to returning all properties. If this field is set and an entity has a property not referenced in the mask, it will be absent from LookupResponse.found.entity.properties. The entity\'s key is always returned.+    propertyMask :: (Core.Maybe PropertyMask),+    -- | The options for this lookup request.+    readOptions :: (Core.Maybe ReadOptions)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'LookupRequest' with the minimum fields required to make a request.+newLookupRequest ::+  LookupRequest+newLookupRequest =+  LookupRequest+    { databaseId = Core.Nothing,+      keys = Core.Nothing,+      propertyMask = Core.Nothing,+      readOptions = Core.Nothing+    }++instance Core.FromJSON LookupRequest where+  parseJSON =+    Core.withObject+      "LookupRequest"+      ( \o ->+          LookupRequest+            Core.<$> (o Core..:? "databaseId")+            Core.<*> (o Core..:? "keys")+            Core.<*> (o Core..:? "propertyMask")+            Core.<*> (o Core..:? "readOptions")+      )++instance Core.ToJSON LookupRequest where+  toJSON LookupRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("databaseId" Core..=) Core.<$> databaseId,+            ("keys" Core..=) Core.<$> keys,+            ("propertyMask" Core..=) Core.<$> propertyMask,+            ("readOptions" Core..=) Core.<$> readOptions+          ]+      )++-- | The response for Datastore.Lookup.+--+-- /See:/ 'newLookupResponse' smart constructor.+data LookupResponse = LookupResponse+  { -- | A list of keys that were not looked up due to resource constraints. The order of results in this field is undefined and has no relation to the order of the keys in the input.+    deferred :: (Core.Maybe [Key]),+    -- | Entities found as @ResultType.FULL@ entities. The order of results in this field is undefined and has no relation to the order of the keys in the input.+    found :: (Core.Maybe [EntityResult]),+    -- | Entities not found as @ResultType.KEY_ONLY@ entities. The order of results in this field is undefined and has no relation to the order of the keys in the input.+    missing :: (Core.Maybe [EntityResult]),+    -- | The time at which these entities were read or found missing.+    readTime :: (Core.Maybe Core.DateTime),+    -- | The identifier of the transaction that was started as part of this Lookup request. Set only when ReadOptions.new/transaction was set in LookupRequest.read/options.+    transaction :: (Core.Maybe Core.Base64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'LookupResponse' with the minimum fields required to make a request.+newLookupResponse ::+  LookupResponse+newLookupResponse =+  LookupResponse+    { deferred = Core.Nothing,+      found = Core.Nothing,+      missing = Core.Nothing,+      readTime = Core.Nothing,+      transaction = Core.Nothing+    }++instance Core.FromJSON LookupResponse where+  parseJSON =+    Core.withObject+      "LookupResponse"+      ( \o ->+          LookupResponse+            Core.<$> (o Core..:? "deferred")+            Core.<*> (o Core..:? "found")+            Core.<*> (o Core..:? "missing")+            Core.<*> (o Core..:? "readTime")+            Core.<*> (o Core..:? "transaction")+      )++instance Core.ToJSON LookupResponse where+  toJSON LookupResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("deferred" Core..=) Core.<$> deferred,+            ("found" Core..=) Core.<$> found,+            ("missing" Core..=) Core.<$> missing,+            ("readTime" Core..=) Core.<$> readTime,+            ("transaction" Core..=) Core.<$> transaction+          ]+      )++-- | A mutation to apply to an entity.+--+-- /See:/ 'newMutation' smart constructor.+data Mutation = Mutation+  { -- | The version of the entity that this mutation is being applied to. If this does not match the current version on the server, the mutation conflicts.+    baseVersion :: (Core.Maybe Core.Int64),+    -- | The strategy to use when a conflict is detected. Defaults to @SERVER_VALUE@. If this is set, then @conflict_detection_strategy@ must also be set.+    conflictResolutionStrategy :: (Core.Maybe Mutation_ConflictResolutionStrategy),+    -- | The key of the entity to delete. The entity may or may not already exist. Must have a complete key path and must not be reserved\/read-only.+    delete :: (Core.Maybe Key),+    -- | The entity to insert. The entity must not already exist. The entity key\'s final path element may be incomplete.+    insert :: (Core.Maybe Entity),+    -- | The properties to write in this mutation. None of the properties in the mask may have a reserved name, except for @__key__@. This field is ignored for @delete@. If the entity already exists, only properties referenced in the mask are updated, others are left untouched. Properties referenced in the mask but not in the entity are deleted.+    propertyMask :: (Core.Maybe PropertyMask),+    -- | Optional. The transforms to perform on the entity. This field can be set only when the operation is @insert@, @update@, or @upsert@. If present, the transforms are be applied to the entity regardless of the property mask, in order, after the operation.+    propertyTransforms :: (Core.Maybe [PropertyTransform]),+    -- | The entity to update. The entity must already exist. Must have a complete key path.+    update :: (Core.Maybe Entity),+    -- | The update time of the entity that this mutation is being applied to. If this does not match the current update time on the server, the mutation conflicts.+    updateTime :: (Core.Maybe Core.DateTime),+    -- | The entity to upsert. The entity may or may not already exist. The entity key\'s final path element may be incomplete.+    upsert :: (Core.Maybe Entity)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Mutation' with the minimum fields required to make a request.+newMutation ::+  Mutation+newMutation =+  Mutation+    { baseVersion = Core.Nothing,+      conflictResolutionStrategy = Core.Nothing,+      delete = Core.Nothing,+      insert = Core.Nothing,+      propertyMask = Core.Nothing,+      propertyTransforms = Core.Nothing,+      update = Core.Nothing,+      updateTime = Core.Nothing,+      upsert = Core.Nothing+    }++instance Core.FromJSON Mutation where+  parseJSON =+    Core.withObject+      "Mutation"+      ( \o ->+          Mutation+            Core.<$> (o Core..:? "baseVersion" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "conflictResolutionStrategy")+            Core.<*> (o Core..:? "delete")+            Core.<*> (o Core..:? "insert")+            Core.<*> (o Core..:? "propertyMask")+            Core.<*> (o Core..:? "propertyTransforms")+            Core.<*> (o Core..:? "update")+            Core.<*> (o Core..:? "updateTime")+            Core.<*> (o Core..:? "upsert")+      )++instance Core.ToJSON Mutation where+  toJSON Mutation {..} =+    Core.object+      ( Core.catMaybes+          [ ("baseVersion" Core..=) Core.. Core.AsText Core.<$> baseVersion,+            ("conflictResolutionStrategy" Core..=)+              Core.<$> conflictResolutionStrategy,+            ("delete" Core..=) Core.<$> delete,+            ("insert" Core..=) Core.<$> insert,+            ("propertyMask" Core..=) Core.<$> propertyMask,+            ("propertyTransforms" Core..=) Core.<$> propertyTransforms,+            ("update" Core..=) Core.<$> update,+            ("updateTime" Core..=) Core.<$> updateTime,+            ("upsert" Core..=) Core.<$> upsert+          ]+      )++-- | The result of applying a mutation.+--+-- /See:/ 'newMutationResult' smart constructor.+data MutationResult = MutationResult+  { -- | Whether a conflict was detected for this mutation. Always false when a conflict detection strategy field is not set in the mutation.+    conflictDetected :: (Core.Maybe Core.Bool),+    -- | The create time of the entity. This field will not be set after a \'delete\'.+    createTime :: (Core.Maybe Core.DateTime),+    -- | The automatically allocated key. Set only when the mutation allocated a key.+    key :: (Core.Maybe Key),+    -- | The results of applying each PropertyTransform, in the same order of the request.+    transformResults :: (Core.Maybe [Value]),+    -- | The update time of the entity on the server after processing the mutation. If the mutation doesn\'t change anything on the server, then the timestamp will be the update timestamp of the current entity. This field will not be set after a \'delete\'.+    updateTime :: (Core.Maybe Core.DateTime),+    -- | The version of the entity on the server after processing the mutation. If the mutation doesn\'t change anything on the server, then the version will be the version of the current entity or, if no entity is present, a version that is strictly greater than the version of any previous entity and less than the version of any possible future entity.+    version :: (Core.Maybe Core.Int64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'MutationResult' with the minimum fields required to make a request.+newMutationResult ::+  MutationResult+newMutationResult =+  MutationResult+    { conflictDetected = Core.Nothing,+      createTime = Core.Nothing,+      key = Core.Nothing,+      transformResults = Core.Nothing,+      updateTime = Core.Nothing,+      version = Core.Nothing+    }++instance Core.FromJSON MutationResult where+  parseJSON =+    Core.withObject+      "MutationResult"+      ( \o ->+          MutationResult+            Core.<$> (o Core..:? "conflictDetected")+            Core.<*> (o Core..:? "createTime")+            Core.<*> (o Core..:? "key")+            Core.<*> (o Core..:? "transformResults")+            Core.<*> (o Core..:? "updateTime")+            Core.<*> (o Core..:? "version" Core.<&> Core.fmap Core.fromAsText)+      )++instance Core.ToJSON MutationResult where+  toJSON MutationResult {..} =+    Core.object+      ( Core.catMaybes+          [ ("conflictDetected" Core..=) Core.<$> conflictDetected,+            ("createTime" Core..=) Core.<$> createTime,+            ("key" Core..=) Core.<$> key,+            ("transformResults" Core..=) Core.<$> transformResults,+            ("updateTime" Core..=) Core.<$> updateTime,+            ("version" Core..=) Core.. Core.AsText Core.<$> version+          ]+      )++-- | A partition ID identifies a grouping of entities. The grouping is always by project and namespace, however the namespace ID may be empty. A partition ID contains several dimensions: project ID and namespace ID. Partition dimensions: - May be @\"\"@. - Must be valid UTF-8 bytes. - Must have values that match regex @[A-Za-z\\d\\.\\-_]{1,100}@ If the value of any dimension matches regex @__.*__@, the partition is reserved\/read-only. A reserved\/read-only partition ID is forbidden in certain documented contexts. Foreign partition IDs (in which the project ID does not match the context project ID ) are discouraged. Reads and writes of foreign partition IDs may fail if the project is not in an active state.+--+-- /See:/ 'newPartitionId' smart constructor.+data PartitionId = PartitionId+  { -- | If not empty, the ID of the database to which the entities belong.+    databaseId :: (Core.Maybe Core.Text),+    -- | If not empty, the ID of the namespace to which the entities belong.+    namespaceId :: (Core.Maybe Core.Text),+    -- | The ID of the project to which the entities belong.+    projectId :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PartitionId' with the minimum fields required to make a request.+newPartitionId ::+  PartitionId+newPartitionId =+  PartitionId+    { databaseId = Core.Nothing,+      namespaceId = Core.Nothing,+      projectId = Core.Nothing+    }++instance Core.FromJSON PartitionId where+  parseJSON =+    Core.withObject+      "PartitionId"+      ( \o ->+          PartitionId+            Core.<$> (o Core..:? "databaseId")+            Core.<*> (o Core..:? "namespaceId")+            Core.<*> (o Core..:? "projectId")+      )++instance Core.ToJSON PartitionId where+  toJSON PartitionId {..} =+    Core.object+      ( Core.catMaybes+          [ ("databaseId" Core..=) Core.<$> databaseId,+            ("namespaceId" Core..=) Core.<$> namespaceId,+            ("projectId" Core..=) Core.<$> projectId+          ]+      )++-- | A (kind, ID\/name) pair used to construct a key path. If either name or ID is set, the element is complete. If neither is set, the element is incomplete.+--+-- /See:/ 'newPathElement' smart constructor.+data PathElement = PathElement+  { -- | The auto-allocated ID of the entity. Never equal to zero. Values less than zero are discouraged and may not be supported in the future.+    id :: (Core.Maybe Core.Int64),+    -- | The kind of the entity. A kind matching regex @__.*__@ is reserved\/read-only. A kind must not contain more than 1500 bytes when UTF-8 encoded. Cannot be @\"\"@. Must be valid UTF-8 bytes. Legacy values that are not valid UTF-8 are encoded as @__bytes__@ where \`\` is the base-64 encoding of the bytes.+    kind :: (Core.Maybe Core.Text),+    -- | The name of the entity. A name matching regex @__.*__@ is reserved\/read-only. A name must not be more than 1500 bytes when UTF-8 encoded. Cannot be @\"\"@. Must be valid UTF-8 bytes. Legacy values that are not valid UTF-8 are encoded as @__bytes__@ where \`\` is the base-64 encoding of the bytes.+    name :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PathElement' with the minimum fields required to make a request.+newPathElement ::+  PathElement+newPathElement =+  PathElement+    { id = Core.Nothing,+      kind = Core.Nothing,+      name = Core.Nothing+    }++instance Core.FromJSON PathElement where+  parseJSON =+    Core.withObject+      "PathElement"+      ( \o ->+          PathElement+            Core.<$> (o Core..:? "id" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "kind")+            Core.<*> (o Core..:? "name")+      )++instance Core.ToJSON PathElement where+  toJSON PathElement {..} =+    Core.object+      ( Core.catMaybes+          [ ("id" Core..=) Core.. Core.AsText Core.<$> id,+            ("kind" Core..=) Core.<$> kind,+            ("name" Core..=) Core.<$> name+          ]+      )++-- | Planning phase information for the query.+--+-- /See:/ 'newPlanSummary' smart constructor.+newtype PlanSummary = PlanSummary+  { -- | The indexes selected for the query. For example: [ {\"query/scope\": \"Collection\", \"properties\": \"(foo ASC, __name__ ASC)\"}, {\"query/scope\": \"Collection\", \"properties\": \"(bar ASC, __name__ ASC)\"} ]+    indexesUsed :: (Core.Maybe [PlanSummary_IndexesUsedItem])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PlanSummary' with the minimum fields required to make a request.+newPlanSummary ::+  PlanSummary+newPlanSummary = PlanSummary {indexesUsed = Core.Nothing}++instance Core.FromJSON PlanSummary where+  parseJSON =+    Core.withObject+      "PlanSummary"+      (\o -> PlanSummary Core.<$> (o Core..:? "indexesUsed"))++instance Core.ToJSON PlanSummary where+  toJSON PlanSummary {..} =+    Core.object+      (Core.catMaybes [("indexesUsed" Core..=) Core.<$> indexesUsed])++--+-- /See:/ 'newPlanSummary_IndexesUsedItem' smart constructor.+newtype PlanSummary_IndexesUsedItem = PlanSummary_IndexesUsedItem+  { -- | Properties of the object.+    additional :: (Core.HashMap Core.Text Core.Value)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PlanSummary_IndexesUsedItem' with the minimum fields required to make a request.+newPlanSummary_IndexesUsedItem ::+  -- |  Properties of the object. See 'additional'.+  Core.HashMap Core.Text Core.Value ->+  PlanSummary_IndexesUsedItem+newPlanSummary_IndexesUsedItem additional =+  PlanSummary_IndexesUsedItem {additional = additional}++instance Core.FromJSON PlanSummary_IndexesUsedItem where+  parseJSON =+    Core.withObject+      "PlanSummary_IndexesUsedItem"+      ( \o ->+          PlanSummary_IndexesUsedItem Core.<$> (Core.parseJSONObject o)+      )++instance Core.ToJSON PlanSummary_IndexesUsedItem where+  toJSON PlanSummary_IndexesUsedItem {..} = Core.toJSON additional++-- | A representation of a property in a projection.+--+-- /See:/ 'newProjection' smart constructor.+newtype Projection = Projection+  { -- | The property to project.+    property :: (Core.Maybe PropertyReference)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Projection' with the minimum fields required to make a request.+newProjection ::+  Projection+newProjection = Projection {property = Core.Nothing}++instance Core.FromJSON Projection where+  parseJSON =+    Core.withObject+      "Projection"+      (\o -> Projection Core.<$> (o Core..:? "property"))++instance Core.ToJSON Projection where+  toJSON Projection {..} =+    Core.object+      (Core.catMaybes [("property" Core..=) Core.<$> property])++-- | A filter on a specific property.+--+-- /See:/ 'newPropertyFilter' smart constructor.+data PropertyFilter = PropertyFilter+  { -- | The operator to filter by.+    op :: (Core.Maybe PropertyFilter_Op),+    -- | The property to filter by.+    property :: (Core.Maybe PropertyReference),+    -- | The value to compare the property to.+    value :: (Core.Maybe Value)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PropertyFilter' with the minimum fields required to make a request.+newPropertyFilter ::+  PropertyFilter+newPropertyFilter =+  PropertyFilter+    { op = Core.Nothing,+      property = Core.Nothing,+      value = Core.Nothing+    }++instance Core.FromJSON PropertyFilter where+  parseJSON =+    Core.withObject+      "PropertyFilter"+      ( \o ->+          PropertyFilter+            Core.<$> (o Core..:? "op")+            Core.<*> (o Core..:? "property")+            Core.<*> (o Core..:? "value")+      )++instance Core.ToJSON PropertyFilter where+  toJSON PropertyFilter {..} =+    Core.object+      ( Core.catMaybes+          [ ("op" Core..=) Core.<$> op,+            ("property" Core..=) Core.<$> property,+            ("value" Core..=) Core.<$> value+          ]+      )++-- | The set of arbitrarily nested property paths used to restrict an operation to only a subset of properties in an entity.+--+-- /See:/ 'newPropertyMask' smart constructor.+newtype PropertyMask = PropertyMask+  { -- | The paths to the properties covered by this mask. A path is a list of property names separated by dots (@.@), for example @foo.bar@ means the property @bar@ inside the entity property @foo@ inside the entity associated with this path. If a property name contains a dot @.@ or a backslash @\\@, then that name must be escaped. A path must not be empty, and may not reference a value inside an array value.+    paths :: (Core.Maybe [Core.Text])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PropertyMask' with the minimum fields required to make a request.+newPropertyMask ::+  PropertyMask+newPropertyMask = PropertyMask {paths = Core.Nothing}++instance Core.FromJSON PropertyMask where+  parseJSON =+    Core.withObject+      "PropertyMask"+      (\o -> PropertyMask Core.<$> (o Core..:? "paths"))++instance Core.ToJSON PropertyMask where+  toJSON PropertyMask {..} =+    Core.object (Core.catMaybes [("paths" Core..=) Core.<$> paths])++-- | The desired order for a specific property.+--+-- /See:/ 'newPropertyOrder' smart constructor.+data PropertyOrder = PropertyOrder+  { -- | The direction to order by. Defaults to @ASCENDING@.+    direction :: (Core.Maybe PropertyOrder_Direction),+    -- | The property to order by.+    property :: (Core.Maybe PropertyReference)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PropertyOrder' with the minimum fields required to make a request.+newPropertyOrder ::+  PropertyOrder+newPropertyOrder =+  PropertyOrder {direction = Core.Nothing, property = Core.Nothing}++instance Core.FromJSON PropertyOrder where+  parseJSON =+    Core.withObject+      "PropertyOrder"+      ( \o ->+          PropertyOrder+            Core.<$> (o Core..:? "direction")+            Core.<*> (o Core..:? "property")+      )++instance Core.ToJSON PropertyOrder where+  toJSON PropertyOrder {..} =+    Core.object+      ( Core.catMaybes+          [ ("direction" Core..=) Core.<$> direction,+            ("property" Core..=) Core.<$> property+          ]+      )++-- | A reference to a property relative to the kind expressions.+--+-- /See:/ 'newPropertyReference' smart constructor.+newtype PropertyReference = PropertyReference+  { -- | A reference to a property. Requires: * MUST be a dot-delimited (@.@) string of segments, where each segment conforms to entity property name limitations.+    name :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PropertyReference' with the minimum fields required to make a request.+newPropertyReference ::+  PropertyReference+newPropertyReference = PropertyReference {name = Core.Nothing}++instance Core.FromJSON PropertyReference where+  parseJSON =+    Core.withObject+      "PropertyReference"+      (\o -> PropertyReference Core.<$> (o Core..:? "name"))++instance Core.ToJSON PropertyReference where+  toJSON PropertyReference {..} =+    Core.object (Core.catMaybes [("name" Core..=) Core.<$> name])++-- | A transformation of an entity property.+--+-- /See:/ 'newPropertyTransform' smart constructor.+data PropertyTransform = PropertyTransform+  { -- | Appends the given elements in order if they are not already present in the current property value. If the property is not an array, or if the property does not yet exist, it is first set to the empty array. Equivalent numbers of different types (e.g. 3L and 3.0) are considered equal when checking if a value is missing. NaN is equal to NaN, and the null value is equal to the null value. If the input contains multiple equivalent values, only the first will be considered. The corresponding transform result will be the null value.+    appendMissingElements :: (Core.Maybe ArrayValue),+    -- | Adds the given value to the property\'s current value. This must be an integer or a double value. If the property is not an integer or double, or if the property does not yet exist, the transformation will set the property to the given value. If either of the given value or the current property value are doubles, both values will be interpreted as doubles. Double arithmetic and representation of double values follows IEEE 754 semantics. If there is positive\/negative integer overflow, the property is resolved to the largest magnitude positive\/negative integer.+    increment :: (Core.Maybe Value),+    -- | Sets the property to the maximum of its current value and the given value. This must be an integer or a double value. If the property is not an integer or double, or if the property does not yet exist, the transformation will set the property to the given value. If a maximum operation is applied where the property and the input value are of mixed types (that is - one is an integer and one is a double) the property takes on the type of the larger operand. If the operands are equivalent (e.g. 3 and 3.0), the property does not change. 0, 0.0, and -0.0 are all zero. The maximum of a zero stored value and zero input value is always the stored value. The maximum of any numeric value x and NaN is NaN.+    maximum :: (Core.Maybe Value),+    -- | Sets the property to the minimum of its current value and the given value. This must be an integer or a double value. If the property is not an integer or double, or if the property does not yet exist, the transformation will set the property to the input value. If a minimum operation is applied where the property and the input value are of mixed types (that is - one is an integer and one is a double) the property takes on the type of the smaller operand. If the operands are equivalent (e.g. 3 and 3.0), the property does not change. 0, 0.0, and -0.0 are all zero. The minimum of a zero stored value and zero input value is always the stored value. The minimum of any numeric value x and NaN is NaN.+    minimum :: (Core.Maybe Value),+    -- | Optional. The name of the property. Property paths (a list of property names separated by dots (@.@)) may be used to refer to properties inside entity values. For example @foo.bar@ means the property @bar@ inside the entity property @foo@. If a property name contains a dot @.@ or a backlslash @\\@, then that name must be escaped.+    property :: (Core.Maybe Core.Text),+    -- | Removes all of the given elements from the array in the property. If the property is not an array, or if the property does not yet exist, it is set to the empty array. Equivalent numbers of different types (e.g. 3L and 3.0) are considered equal when deciding whether an element should be removed. NaN is equal to NaN, and the null value is equal to the null value. This will remove all equivalent values if there are duplicates. The corresponding transform result will be the null value.+    removeAllFromArray :: (Core.Maybe ArrayValue),+    -- | Sets the property to the given server value.+    setToServerValue :: (Core.Maybe PropertyTransform_SetToServerValue)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PropertyTransform' with the minimum fields required to make a request.+newPropertyTransform ::+  PropertyTransform+newPropertyTransform =+  PropertyTransform+    { appendMissingElements = Core.Nothing,+      increment = Core.Nothing,+      maximum = Core.Nothing,+      minimum = Core.Nothing,+      property = Core.Nothing,+      removeAllFromArray = Core.Nothing,+      setToServerValue = Core.Nothing+    }++instance Core.FromJSON PropertyTransform where+  parseJSON =+    Core.withObject+      "PropertyTransform"+      ( \o ->+          PropertyTransform+            Core.<$> (o Core..:? "appendMissingElements")+            Core.<*> (o Core..:? "increment")+            Core.<*> (o Core..:? "maximum")+            Core.<*> (o Core..:? "minimum")+            Core.<*> (o Core..:? "property")+            Core.<*> (o Core..:? "removeAllFromArray")+            Core.<*> (o Core..:? "setToServerValue")+      )++instance Core.ToJSON PropertyTransform where+  toJSON PropertyTransform {..} =+    Core.object+      ( Core.catMaybes+          [ ("appendMissingElements" Core..=) Core.<$> appendMissingElements,+            ("increment" Core..=) Core.<$> increment,+            ("maximum" Core..=) Core.<$> maximum,+            ("minimum" Core..=) Core.<$> minimum,+            ("property" Core..=) Core.<$> property,+            ("removeAllFromArray" Core..=) Core.<$> removeAllFromArray,+            ("setToServerValue" Core..=) Core.<$> setToServerValue+          ]+      )++-- | A query for entities. The query stages are executed in the following order: 1. kind 2. filter 3. projection 4. order + start/cursor + end/cursor 5. offset 6. limit 7. find_nearest+--+-- /See:/ 'newQuery' smart constructor.+data Query = Query+  { -- | The properties to make distinct. The query results will contain the first result for each distinct combination of values for the given properties (if empty, all results are returned). Requires: * If @order@ is specified, the set of distinct on properties must appear before the non-distinct on properties in @order@.+    distinctOn :: (Core.Maybe [PropertyReference]),+    -- | An ending point for the query results. Query cursors are returned in query result batches and <https://cloud.google.com/datastore/docs/concepts/queries#cursors_limits_and_offsets can only be used to limit the same query>.+    endCursor :: (Core.Maybe Core.Base64),+    -- | The filter to apply.+    filter :: (Core.Maybe Filter),+    -- | Optional. A potential Nearest Neighbors Search. Applies after all other filters and ordering. Finds the closest vector embeddings to the given query vector.+    findNearest :: (Core.Maybe FindNearest),+    -- | The kinds to query (if empty, returns entities of all kinds). Currently at most 1 kind may be specified.+    kind :: (Core.Maybe [KindExpression]),+    -- | The maximum number of results to return. Applies after all other constraints. Optional. Unspecified is interpreted as no limit. Must be >= 0 if specified.+    limit :: (Core.Maybe Core.Int32),+    -- | The number of results to skip. Applies before limit, but after all other constraints. Optional. Must be >= 0 if specified.+    offset :: (Core.Maybe Core.Int32),+    -- | The order to apply to the query results (if empty, order is unspecified).+    order :: (Core.Maybe [PropertyOrder]),+    -- | The projection to return. Defaults to returning all properties.+    projection :: (Core.Maybe [Projection]),+    -- | A starting point for the query results. Query cursors are returned in query result batches and <https://cloud.google.com/datastore/docs/concepts/queries#cursors_limits_and_offsets can only be used to continue the same query>.+    startCursor :: (Core.Maybe Core.Base64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Query' with the minimum fields required to make a request.+newQuery ::+  Query+newQuery =+  Query+    { distinctOn = Core.Nothing,+      endCursor = Core.Nothing,+      filter = Core.Nothing,+      findNearest = Core.Nothing,+      kind = Core.Nothing,+      limit = Core.Nothing,+      offset = Core.Nothing,+      order = Core.Nothing,+      projection = Core.Nothing,+      startCursor = Core.Nothing+    }++instance Core.FromJSON Query where+  parseJSON =+    Core.withObject+      "Query"+      ( \o ->+          Query+            Core.<$> (o Core..:? "distinctOn")+            Core.<*> (o Core..:? "endCursor")+            Core.<*> (o Core..:? "filter")+            Core.<*> (o Core..:? "findNearest")+            Core.<*> (o Core..:? "kind")+            Core.<*> (o Core..:? "limit")+            Core.<*> (o Core..:? "offset")+            Core.<*> (o Core..:? "order")+            Core.<*> (o Core..:? "projection")+            Core.<*> (o Core..:? "startCursor")+      )++instance Core.ToJSON Query where+  toJSON Query {..} =+    Core.object+      ( Core.catMaybes+          [ ("distinctOn" Core..=) Core.<$> distinctOn,+            ("endCursor" Core..=) Core.<$> endCursor,+            ("filter" Core..=) Core.<$> filter,+            ("findNearest" Core..=) Core.<$> findNearest,+            ("kind" Core..=) Core.<$> kind,+            ("limit" Core..=) Core.<$> limit,+            ("offset" Core..=) Core.<$> offset,+            ("order" Core..=) Core.<$> order,+            ("projection" Core..=) Core.<$> projection,+            ("startCursor" Core..=) Core.<$> startCursor+          ]+      )++-- | A batch of results produced by a query.+--+-- /See:/ 'newQueryResultBatch' smart constructor.+data QueryResultBatch = QueryResultBatch+  { -- | A cursor that points to the position after the last result in the batch.+    endCursor :: (Core.Maybe Core.Base64),+    -- | The result type for every entity in @entity_results@.+    entityResultType :: (Core.Maybe QueryResultBatch_EntityResultType),+    -- | The results for this batch.+    entityResults :: (Core.Maybe [EntityResult]),+    -- | The state of the query after the current batch.+    moreResults :: (Core.Maybe QueryResultBatch_MoreResults),+    -- | Read timestamp this batch was returned from. This applies to the range of results from the query\'s @start_cursor@ (or the beginning of the query if no cursor was given) to this batch\'s @end_cursor@ (not the query\'s @end_cursor@). In a single transaction, subsequent query result batches for the same query can have a greater timestamp. Each batch\'s read timestamp is valid for all preceding batches. This value will not be set for eventually consistent queries in Cloud Datastore.+    readTime :: (Core.Maybe Core.DateTime),+    -- | A cursor that points to the position after the last skipped result. Will be set when @skipped_results@ != 0.+    skippedCursor :: (Core.Maybe Core.Base64),+    -- | The number of results skipped, typically because of an offset.+    skippedResults :: (Core.Maybe Core.Int32),+    -- | The version number of the snapshot this batch was returned from. This applies to the range of results from the query\'s @start_cursor@ (or the beginning of the query if no cursor was given) to this batch\'s @end_cursor@ (not the query\'s @end_cursor@). In a single transaction, subsequent query result batches for the same query can have a greater snapshot version number. Each batch\'s snapshot version is valid for all preceding batches. The value will be zero for eventually consistent queries.+    snapshotVersion :: (Core.Maybe Core.Int64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'QueryResultBatch' with the minimum fields required to make a request.+newQueryResultBatch ::+  QueryResultBatch+newQueryResultBatch =+  QueryResultBatch+    { endCursor = Core.Nothing,+      entityResultType = Core.Nothing,+      entityResults = Core.Nothing,+      moreResults = Core.Nothing,+      readTime = Core.Nothing,+      skippedCursor = Core.Nothing,+      skippedResults = Core.Nothing,+      snapshotVersion = Core.Nothing+    }++instance Core.FromJSON QueryResultBatch where+  parseJSON =+    Core.withObject+      "QueryResultBatch"+      ( \o ->+          QueryResultBatch+            Core.<$> (o Core..:? "endCursor")+            Core.<*> (o Core..:? "entityResultType")+            Core.<*> (o Core..:? "entityResults")+            Core.<*> (o Core..:? "moreResults")+            Core.<*> (o Core..:? "readTime")+            Core.<*> (o Core..:? "skippedCursor")+            Core.<*> (o Core..:? "skippedResults")+            Core.<*> (o Core..:? "snapshotVersion" Core.<&> Core.fmap Core.fromAsText)+      )++instance Core.ToJSON QueryResultBatch where+  toJSON QueryResultBatch {..} =+    Core.object+      ( Core.catMaybes+          [ ("endCursor" Core..=) Core.<$> endCursor,+            ("entityResultType" Core..=) Core.<$> entityResultType,+            ("entityResults" Core..=) Core.<$> entityResults,+            ("moreResults" Core..=) Core.<$> moreResults,+            ("readTime" Core..=) Core.<$> readTime,+            ("skippedCursor" Core..=) Core.<$> skippedCursor,+            ("skippedResults" Core..=) Core.<$> skippedResults,+            ("snapshotVersion" Core..=)+              Core.. Core.AsText+              Core.<$> snapshotVersion+          ]+      )++-- | Options specific to read-only transactions.+--+-- /See:/ 'newReadOnly' smart constructor.+newtype ReadOnly = ReadOnly+  { -- | Reads entities at the given time. This must be a microsecond precision timestamp within the past one hour, or if Point-in-Time Recovery is enabled, can additionally be a whole minute timestamp within the past 7 days.+    readTime :: (Core.Maybe Core.DateTime)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ReadOnly' with the minimum fields required to make a request.+newReadOnly ::+  ReadOnly+newReadOnly = ReadOnly {readTime = Core.Nothing}++instance Core.FromJSON ReadOnly where+  parseJSON =+    Core.withObject+      "ReadOnly"+      (\o -> ReadOnly Core.<$> (o Core..:? "readTime"))++instance Core.ToJSON ReadOnly where+  toJSON ReadOnly {..} =+    Core.object+      (Core.catMaybes [("readTime" Core..=) Core.<$> readTime])++-- | The options shared by read requests.+--+-- /See:/ 'newReadOptions' smart constructor.+data ReadOptions = ReadOptions+  { -- | Options for beginning a new transaction for this request. The new transaction identifier will be returned in the corresponding response as either LookupResponse.transaction or RunQueryResponse.transaction.+    newTransaction' :: (Core.Maybe TransactionOptions),+    -- | The non-transactional read consistency to use.+    readConsistency :: (Core.Maybe ReadOptions_ReadConsistency),+    -- | Reads entities as they were at the given time. This value is only supported for Cloud Firestore in Datastore mode. This must be a microsecond precision timestamp within the past one hour, or if Point-in-Time Recovery is enabled, can additionally be a whole minute timestamp within the past 7 days.+    readTime :: (Core.Maybe Core.DateTime),+    -- | The identifier of the transaction in which to read. A transaction identifier is returned by a call to Datastore.BeginTransaction.+    transaction :: (Core.Maybe Core.Base64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ReadOptions' with the minimum fields required to make a request.+newReadOptions ::+  ReadOptions+newReadOptions =+  ReadOptions+    { newTransaction' = Core.Nothing,+      readConsistency = Core.Nothing,+      readTime = Core.Nothing,+      transaction = Core.Nothing+    }++instance Core.FromJSON ReadOptions where+  parseJSON =+    Core.withObject+      "ReadOptions"+      ( \o ->+          ReadOptions+            Core.<$> (o Core..:? "newTransaction")+            Core.<*> (o Core..:? "readConsistency")+            Core.<*> (o Core..:? "readTime")+            Core.<*> (o Core..:? "transaction")+      )++instance Core.ToJSON ReadOptions where+  toJSON ReadOptions {..} =+    Core.object+      ( Core.catMaybes+          [ ("newTransaction" Core..=) Core.<$> newTransaction',+            ("readConsistency" Core..=) Core.<$> readConsistency,+            ("readTime" Core..=) Core.<$> readTime,+            ("transaction" Core..=) Core.<$> transaction+          ]+      )++-- | Options specific to read \/ write transactions.+--+-- /See:/ 'newReadWrite' smart constructor.+newtype ReadWrite = ReadWrite+  { -- | The transaction identifier of the transaction being retried.+    previousTransaction :: (Core.Maybe Core.Base64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ReadWrite' with the minimum fields required to make a request.+newReadWrite ::+  ReadWrite+newReadWrite = ReadWrite {previousTransaction = Core.Nothing}++instance Core.FromJSON ReadWrite where+  parseJSON =+    Core.withObject+      "ReadWrite"+      (\o -> ReadWrite Core.<$> (o Core..:? "previousTransaction"))++instance Core.ToJSON ReadWrite where+  toJSON ReadWrite {..} =+    Core.object+      ( Core.catMaybes+          [("previousTransaction" Core..=) Core.<$> previousTransaction]+      )++-- | The request for Datastore.ReserveIds.+--+-- /See:/ 'newReserveIdsRequest' smart constructor.+data ReserveIdsRequest = ReserveIdsRequest+  { -- | The ID of the database against which to make the request. \'(default)\' is not allowed; please use empty string \'\' to refer the default database.+    databaseId :: (Core.Maybe Core.Text),+    -- | Required. A list of keys with complete key paths whose numeric IDs should not be auto-allocated.+    keys :: (Core.Maybe [Key])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ReserveIdsRequest' with the minimum fields required to make a request.+newReserveIdsRequest ::+  ReserveIdsRequest+newReserveIdsRequest =+  ReserveIdsRequest {databaseId = Core.Nothing, keys = Core.Nothing}++instance Core.FromJSON ReserveIdsRequest where+  parseJSON =+    Core.withObject+      "ReserveIdsRequest"+      ( \o ->+          ReserveIdsRequest+            Core.<$> (o Core..:? "databaseId")+            Core.<*> (o Core..:? "keys")+      )++instance Core.ToJSON ReserveIdsRequest where+  toJSON ReserveIdsRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("databaseId" Core..=) Core.<$> databaseId,+            ("keys" Core..=) Core.<$> keys+          ]+      )++-- | The response for Datastore.ReserveIds.+--+-- /See:/ 'newReserveIdsResponse' smart constructor.+data ReserveIdsResponse = ReserveIdsResponse+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ReserveIdsResponse' with the minimum fields required to make a request.+newReserveIdsResponse ::+  ReserveIdsResponse+newReserveIdsResponse = ReserveIdsResponse++instance Core.FromJSON ReserveIdsResponse where+  parseJSON =+    Core.withObject+      "ReserveIdsResponse"+      (\o -> Core.pure ReserveIdsResponse)++instance Core.ToJSON ReserveIdsResponse where+  toJSON = Core.const Core.emptyObject++-- | The request for Datastore.Rollback.+--+-- /See:/ 'newRollbackRequest' smart constructor.+data RollbackRequest = RollbackRequest+  { -- | The ID of the database against which to make the request. \'(default)\' is not allowed; please use empty string \'\' to refer the default database.+    databaseId :: (Core.Maybe Core.Text),+    -- | Required. The transaction identifier, returned by a call to Datastore.BeginTransaction.+    transaction :: (Core.Maybe Core.Base64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'RollbackRequest' with the minimum fields required to make a request.+newRollbackRequest ::+  RollbackRequest+newRollbackRequest =+  RollbackRequest+    { databaseId = Core.Nothing,+      transaction = Core.Nothing+    }++instance Core.FromJSON RollbackRequest where+  parseJSON =+    Core.withObject+      "RollbackRequest"+      ( \o ->+          RollbackRequest+            Core.<$> (o Core..:? "databaseId")+            Core.<*> (o Core..:? "transaction")+      )++instance Core.ToJSON RollbackRequest where+  toJSON RollbackRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("databaseId" Core..=) Core.<$> databaseId,+            ("transaction" Core..=) Core.<$> transaction+          ]+      )++-- | The response for Datastore.Rollback. (an empty message).+--+-- /See:/ 'newRollbackResponse' smart constructor.+data RollbackResponse = RollbackResponse+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'RollbackResponse' with the minimum fields required to make a request.+newRollbackResponse ::+  RollbackResponse+newRollbackResponse = RollbackResponse++instance Core.FromJSON RollbackResponse where+  parseJSON =+    Core.withObject+      "RollbackResponse"+      (\o -> Core.pure RollbackResponse)++instance Core.ToJSON RollbackResponse where+  toJSON = Core.const Core.emptyObject++-- | The request for Datastore.RunAggregationQuery.+--+-- /See:/ 'newRunAggregationQueryRequest' smart constructor.+data RunAggregationQueryRequest = RunAggregationQueryRequest+  { -- | The query to run.+    aggregationQuery :: (Core.Maybe AggregationQuery),+    -- | The ID of the database against which to make the request. \'(default)\' is not allowed; please use empty string \'\' to refer the default database.+    databaseId :: (Core.Maybe Core.Text),+    -- | Optional. Explain options for the query. If set, additional query statistics will be returned. If not, only query results will be returned.+    explainOptions :: (Core.Maybe ExplainOptions),+    -- | The GQL query to run. This query must be an aggregation query.+    gqlQuery :: (Core.Maybe GqlQuery),+    -- | Entities are partitioned into subsets, identified by a partition ID. Queries are scoped to a single partition. This partition ID is normalized with the standard default context partition ID.+    partitionId :: (Core.Maybe PartitionId),+    -- | The options for this query.+    readOptions :: (Core.Maybe ReadOptions)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'RunAggregationQueryRequest' with the minimum fields required to make a request.+newRunAggregationQueryRequest ::+  RunAggregationQueryRequest+newRunAggregationQueryRequest =+  RunAggregationQueryRequest+    { aggregationQuery = Core.Nothing,+      databaseId = Core.Nothing,+      explainOptions = Core.Nothing,+      gqlQuery = Core.Nothing,+      partitionId = Core.Nothing,+      readOptions = Core.Nothing+    }++instance Core.FromJSON RunAggregationQueryRequest where+  parseJSON =+    Core.withObject+      "RunAggregationQueryRequest"+      ( \o ->+          RunAggregationQueryRequest+            Core.<$> (o Core..:? "aggregationQuery")+            Core.<*> (o Core..:? "databaseId")+            Core.<*> (o Core..:? "explainOptions")+            Core.<*> (o Core..:? "gqlQuery")+            Core.<*> (o Core..:? "partitionId")+            Core.<*> (o Core..:? "readOptions")+      )++instance Core.ToJSON RunAggregationQueryRequest where+  toJSON RunAggregationQueryRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("aggregationQuery" Core..=) Core.<$> aggregationQuery,+            ("databaseId" Core..=) Core.<$> databaseId,+            ("explainOptions" Core..=) Core.<$> explainOptions,+            ("gqlQuery" Core..=) Core.<$> gqlQuery,+            ("partitionId" Core..=) Core.<$> partitionId,+            ("readOptions" Core..=) Core.<$> readOptions+          ]+      )++-- | The response for Datastore.RunAggregationQuery.+--+-- /See:/ 'newRunAggregationQueryResponse' smart constructor.+data RunAggregationQueryResponse = RunAggregationQueryResponse+  { -- | A batch of aggregation results. Always present.+    batch :: (Core.Maybe AggregationResultBatch),+    -- | Query explain metrics. This is only present when the RunAggregationQueryRequest.explain_options is provided, and it is sent only once with the last response in the stream.+    explainMetrics :: (Core.Maybe ExplainMetrics),+    -- | The parsed form of the @GqlQuery@ from the request, if it was set.+    query :: (Core.Maybe AggregationQuery),+    -- | The identifier of the transaction that was started as part of this RunAggregationQuery request. Set only when ReadOptions.new/transaction was set in RunAggregationQueryRequest.read/options.+    transaction :: (Core.Maybe Core.Base64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'RunAggregationQueryResponse' with the minimum fields required to make a request.+newRunAggregationQueryResponse ::+  RunAggregationQueryResponse+newRunAggregationQueryResponse =+  RunAggregationQueryResponse+    { batch = Core.Nothing,+      explainMetrics = Core.Nothing,+      query = Core.Nothing,+      transaction = Core.Nothing+    }++instance Core.FromJSON RunAggregationQueryResponse where+  parseJSON =+    Core.withObject+      "RunAggregationQueryResponse"+      ( \o ->+          RunAggregationQueryResponse+            Core.<$> (o Core..:? "batch")+            Core.<*> (o Core..:? "explainMetrics")+            Core.<*> (o Core..:? "query")+            Core.<*> (o Core..:? "transaction")+      )++instance Core.ToJSON RunAggregationQueryResponse where+  toJSON RunAggregationQueryResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("batch" Core..=) Core.<$> batch,+            ("explainMetrics" Core..=) Core.<$> explainMetrics,+            ("query" Core..=) Core.<$> query,+            ("transaction" Core..=) Core.<$> transaction+          ]+      )++-- | The request for Datastore.RunQuery.+--+-- /See:/ 'newRunQueryRequest' smart constructor.+data RunQueryRequest = RunQueryRequest+  { -- | The ID of the database against which to make the request. \'(default)\' is not allowed; please use empty string \'\' to refer the default database.+    databaseId :: (Core.Maybe Core.Text),+    -- | Optional. Explain options for the query. If set, additional query statistics will be returned. If not, only query results will be returned.+    explainOptions :: (Core.Maybe ExplainOptions),+    -- | The GQL query to run. This query must be a non-aggregation query.+    gqlQuery :: (Core.Maybe GqlQuery),+    -- | Entities are partitioned into subsets, identified by a partition ID. Queries are scoped to a single partition. This partition ID is normalized with the standard default context partition ID.+    partitionId :: (Core.Maybe PartitionId),+    -- | The properties to return. This field must not be set for a projection query. See LookupRequest.property_mask.+    propertyMask :: (Core.Maybe PropertyMask),+    -- | The query to run.+    query :: (Core.Maybe Query),+    -- | The options for this query.+    readOptions :: (Core.Maybe ReadOptions)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'RunQueryRequest' with the minimum fields required to make a request.+newRunQueryRequest ::+  RunQueryRequest+newRunQueryRequest =+  RunQueryRequest+    { databaseId = Core.Nothing,+      explainOptions = Core.Nothing,+      gqlQuery = Core.Nothing,+      partitionId = Core.Nothing,+      propertyMask = Core.Nothing,+      query = Core.Nothing,+      readOptions = Core.Nothing+    }++instance Core.FromJSON RunQueryRequest where+  parseJSON =+    Core.withObject+      "RunQueryRequest"+      ( \o ->+          RunQueryRequest+            Core.<$> (o Core..:? "databaseId")+            Core.<*> (o Core..:? "explainOptions")+            Core.<*> (o Core..:? "gqlQuery")+            Core.<*> (o Core..:? "partitionId")+            Core.<*> (o Core..:? "propertyMask")+            Core.<*> (o Core..:? "query")+            Core.<*> (o Core..:? "readOptions")+      )++instance Core.ToJSON RunQueryRequest where+  toJSON RunQueryRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("databaseId" Core..=) Core.<$> databaseId,+            ("explainOptions" Core..=) Core.<$> explainOptions,+            ("gqlQuery" Core..=) Core.<$> gqlQuery,+            ("partitionId" Core..=) Core.<$> partitionId,+            ("propertyMask" Core..=) Core.<$> propertyMask,+            ("query" Core..=) Core.<$> query,+            ("readOptions" Core..=) Core.<$> readOptions+          ]+      )++-- | The response for Datastore.RunQuery.+--+-- /See:/ 'newRunQueryResponse' smart constructor.+data RunQueryResponse = RunQueryResponse+  { -- | A batch of query results. This is always present unless running a query under explain-only mode: RunQueryRequest.explain_options was provided and ExplainOptions.analyze was set to false.+    batch :: (Core.Maybe QueryResultBatch),+    -- | Query explain metrics. This is only present when the RunQueryRequest.explain_options is provided, and it is sent only once with the last response in the stream.+    explainMetrics :: (Core.Maybe ExplainMetrics),+    -- | The parsed form of the @GqlQuery@ from the request, if it was set.+    query :: (Core.Maybe Query),+    -- | The identifier of the transaction that was started as part of this RunQuery request. Set only when ReadOptions.new/transaction was set in RunQueryRequest.read/options.+    transaction :: (Core.Maybe Core.Base64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'RunQueryResponse' with the minimum fields required to make a request.+newRunQueryResponse ::+  RunQueryResponse+newRunQueryResponse =+  RunQueryResponse+    { batch = Core.Nothing,+      explainMetrics = Core.Nothing,+      query = Core.Nothing,+      transaction = Core.Nothing+    }++instance Core.FromJSON RunQueryResponse where+  parseJSON =+    Core.withObject+      "RunQueryResponse"+      ( \o ->+          RunQueryResponse+            Core.<$> (o Core..:? "batch")+            Core.<*> (o Core..:? "explainMetrics")+            Core.<*> (o Core..:? "query")+            Core.<*> (o Core..:? "transaction")+      )++instance Core.ToJSON RunQueryResponse where+  toJSON RunQueryResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("batch" Core..=) Core.<$> batch,+            ("explainMetrics" Core..=) Core.<$> explainMetrics,+            ("query" Core..=) Core.<$> query,+            ("transaction" Core..=) Core.<$> transaction+          ]+      )++-- | The @Status@ type defines a logical error model that is suitable for different programming environments, including REST APIs and RPC APIs. It is used by <https://github.com/grpc gRPC>. Each @Status@ message contains three pieces of data: error code, error message, and error details. You can find out more about this error model and how to work with it in the <https://cloud.google.com/apis/design/errors API Design Guide>.+--+-- /See:/ 'newStatus' smart constructor.+data Status = Status+  { -- | The status code, which should be an enum value of google.rpc.Code.+    code :: (Core.Maybe Core.Int32),+    -- | A list of messages that carry the error details. There is a common set of message types for APIs to use.+    details :: (Core.Maybe [Status_DetailsItem]),+    -- | A developer-facing error message, which should be in English. Any user-facing error message should be localized and sent in the google.rpc.Status.details field, or localized by the client.+    message :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Status' with the minimum fields required to make a request.+newStatus ::+  Status+newStatus =+  Status+    { code = Core.Nothing,+      details = Core.Nothing,+      message = Core.Nothing+    }++instance Core.FromJSON Status where+  parseJSON =+    Core.withObject+      "Status"+      ( \o ->+          Status+            Core.<$> (o Core..:? "code")+            Core.<*> (o Core..:? "details")+            Core.<*> (o Core..:? "message")+      )++instance Core.ToJSON Status where+  toJSON Status {..} =+    Core.object+      ( Core.catMaybes+          [ ("code" Core..=) Core.<$> code,+            ("details" Core..=) Core.<$> details,+            ("message" Core..=) Core.<$> message+          ]+      )++--+-- /See:/ 'newStatus_DetailsItem' smart constructor.+newtype Status_DetailsItem = Status_DetailsItem+  { -- | Properties of the object. Contains field \@type with type URL.+    additional :: (Core.HashMap Core.Text Core.Value)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Status_DetailsItem' with the minimum fields required to make a request.+newStatus_DetailsItem ::+  -- |  Properties of the object. Contains field \@type with type URL. See 'additional'.+  Core.HashMap Core.Text Core.Value ->+  Status_DetailsItem+newStatus_DetailsItem additional =+  Status_DetailsItem {additional = additional}++instance Core.FromJSON Status_DetailsItem where+  parseJSON =+    Core.withObject+      "Status_DetailsItem"+      (\o -> Status_DetailsItem Core.<$> (Core.parseJSONObject o))++instance Core.ToJSON Status_DetailsItem where+  toJSON Status_DetailsItem {..} = Core.toJSON additional++-- | Sum of the values of the requested property. * Only numeric values will be aggregated. All non-numeric values including @NULL@ are skipped. * If the aggregated values contain @NaN@, returns @NaN@. Infinity math follows IEEE-754 standards. * If the aggregated value set is empty, returns 0. * Returns a 64-bit integer if all aggregated numbers are integers and the sum result does not overflow. Otherwise, the result is returned as a double. Note that even if all the aggregated values are integers, the result is returned as a double if it cannot fit within a 64-bit signed integer. When this occurs, the returned value will lose precision. * When underflow occurs, floating-point aggregation is non-deterministic. This means that running the same query repeatedly without any changes to the underlying values could produce slightly different results each time. In those cases, values should be stored as integers over floating-point numbers.+--+-- /See:/ 'newSum' smart constructor.+newtype Sum = Sum+  { -- | The property to aggregate on.+    property :: (Core.Maybe PropertyReference)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Sum' with the minimum fields required to make a request.+newSum ::+  Sum+newSum = Sum {property = Core.Nothing}++instance Core.FromJSON Sum where+  parseJSON =+    Core.withObject+      "Sum"+      (\o -> Sum Core.<$> (o Core..:? "property"))++instance Core.ToJSON Sum where+  toJSON Sum {..} =+    Core.object+      (Core.catMaybes [("property" Core..=) Core.<$> property])++-- | Options for beginning a new transaction. Transactions can be created explicitly with calls to Datastore.BeginTransaction or implicitly by setting ReadOptions.new_transaction in read requests.+--+-- /See:/ 'newTransactionOptions' smart constructor.+data TransactionOptions = TransactionOptions+  { -- | The transaction should only allow reads.+    readOnly :: (Core.Maybe ReadOnly),+    -- | The transaction should allow both reads and writes.+    readWrite :: (Core.Maybe ReadWrite)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TransactionOptions' with the minimum fields required to make a request.+newTransactionOptions ::+  TransactionOptions+newTransactionOptions =+  TransactionOptions+    { readOnly = Core.Nothing,+      readWrite = Core.Nothing+    }++instance Core.FromJSON TransactionOptions where+  parseJSON =+    Core.withObject+      "TransactionOptions"+      ( \o ->+          TransactionOptions+            Core.<$> (o Core..:? "readOnly")+            Core.<*> (o Core..:? "readWrite")+      )++instance Core.ToJSON TransactionOptions where+  toJSON TransactionOptions {..} =+    Core.object+      ( Core.catMaybes+          [ ("readOnly" Core..=) Core.<$> readOnly,+            ("readWrite" Core..=) Core.<$> readWrite+          ]+      )++-- | A message that can hold any of the supported value types and associated metadata.+--+-- /See:/ 'newValue' smart constructor.+data Value = Value+  { -- | An array value. Cannot contain another array value. A @Value@ instance that sets field @array_value@ must not set fields @meaning@ or @exclude_from_indexes@.+    arrayValue :: (Core.Maybe ArrayValue),+    -- | A blob value. May have at most 1,000,000 bytes. When @exclude_from_indexes@ is false, may have at most 1500 bytes. In JSON requests, must be base64-encoded.+    blobValue :: (Core.Maybe Core.Base64),+    -- | A boolean value.+    booleanValue :: (Core.Maybe Core.Bool),+    -- | A double value.+    doubleValue :: (Core.Maybe Core.Double),+    -- | An entity value. - May have no key. - May have a key with an incomplete key path. - May have a reserved\/read-only key.+    entityValue :: (Core.Maybe Entity),+    -- | If the value should be excluded from all indexes including those defined explicitly.+    excludeFromIndexes :: (Core.Maybe Core.Bool),+    -- | A geo point value representing a point on the surface of Earth.+    geoPointValue :: (Core.Maybe LatLng),+    -- | An integer value.+    integerValue :: (Core.Maybe Core.Int64),+    -- | A key value.+    keyValue :: (Core.Maybe Key),+    -- | The @meaning@ field should only be populated for backwards compatibility.+    meaning :: (Core.Maybe Core.Int32),+    -- | A null value.+    nullValue :: (Core.Maybe Value_NullValue),+    -- | A UTF-8 encoded string value. When @exclude_from_indexes@ is false (it is indexed) , may have at most 1500 bytes. Otherwise, may be set to at most 1,000,000 bytes.+    stringValue :: (Core.Maybe Core.Text),+    -- | A timestamp value. When stored in the Datastore, precise only to microseconds; any additional precision is rounded down.+    timestampValue :: (Core.Maybe Core.DateTime)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Value' with the minimum fields required to make a request.+newValue ::+  Value+newValue =+  Value+    { arrayValue = Core.Nothing,+      blobValue = Core.Nothing,+      booleanValue = Core.Nothing,+      doubleValue = Core.Nothing,+      entityValue = Core.Nothing,+      excludeFromIndexes = Core.Nothing,+      geoPointValue = Core.Nothing,+      integerValue = Core.Nothing,+      keyValue = Core.Nothing,+      meaning = Core.Nothing,+      nullValue = Core.Nothing,+      stringValue = Core.Nothing,+      timestampValue = Core.Nothing+    }++instance Core.FromJSON Value where+  parseJSON =+    Core.withObject+      "Value"+      ( \o ->+          Value+            Core.<$> (o Core..:? "arrayValue")+            Core.<*> (o Core..:? "blobValue")+            Core.<*> (o Core..:? "booleanValue")+            Core.<*> (o Core..:? "doubleValue")+            Core.<*> (o Core..:? "entityValue")+            Core.<*> (o Core..:? "excludeFromIndexes")+            Core.<*> (o Core..:? "geoPointValue")+            Core.<*> (o Core..:? "integerValue" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "keyValue")+            Core.<*> (o Core..:? "meaning")+            Core.<*> (o Core..:? "nullValue")+            Core.<*> (o Core..:? "stringValue")+            Core.<*> (o Core..:? "timestampValue")+      )++instance Core.ToJSON Value where+  toJSON Value {..} =+    Core.object+      ( Core.catMaybes+          [ ("arrayValue" Core..=) Core.<$> arrayValue,+            ("blobValue" Core..=) Core.<$> blobValue,+            ("booleanValue" Core..=) Core.<$> booleanValue,+            ("doubleValue" Core..=) Core.<$> doubleValue,+            ("entityValue" Core..=) Core.<$> entityValue,+            ("excludeFromIndexes" Core..=) Core.<$> excludeFromIndexes,+            ("geoPointValue" Core..=) Core.<$> geoPointValue,+            ("integerValue" Core..=) Core.. Core.AsText Core.<$> integerValue,+            ("keyValue" Core..=) Core.<$> keyValue,+            ("meaning" Core..=) Core.<$> meaning,+            ("nullValue" Core..=) Core.<$> nullValue,+            ("stringValue" Core..=) Core.<$> stringValue,+            ("timestampValue" Core..=) Core.<$> timestampValue+          ]+      )
+ gen/Gogol/Datastore/Internal/Sum.hs view
@@ -0,0 +1,1291 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Datastore.Internal.Sum+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Gogol.Datastore.Internal.Sum+  ( -- * Xgafv+    Xgafv+      ( Xgafv_1,+        Xgafv_2,+        ..+      ),++    -- * AggregationResultBatch_MoreResults+    AggregationResultBatch_MoreResults+      ( AggregationResultBatch_MoreResults_MORERESULTSTYPEUNSPECIFIED,+        AggregationResultBatch_MoreResults_NOTFINISHED,+        AggregationResultBatch_MoreResults_MORERESULTSAFTERLIMIT,+        AggregationResultBatch_MoreResults_MORERESULTSAFTERCURSOR,+        AggregationResultBatch_MoreResults_NOMORERESULTS,+        ..+      ),++    -- * CommitRequest_Mode+    CommitRequest_Mode+      ( CommitRequest_Mode_MODEUNSPECIFIED,+        CommitRequest_Mode_Transactional,+        CommitRequest_Mode_NONTRANSACTIONAL,+        ..+      ),++    -- * CompositeFilter_Op+    CompositeFilter_Op+      ( CompositeFilter_Op_OPERATORUNSPECIFIED,+        CompositeFilter_Op_And,+        CompositeFilter_Op_OR,+        ..+      ),++    -- * FindNearest_DistanceMeasure+    FindNearest_DistanceMeasure+      ( FindNearest_DistanceMeasure_DISTANCEMEASUREUNSPECIFIED,+        FindNearest_DistanceMeasure_Euclidean,+        FindNearest_DistanceMeasure_Cosine,+        FindNearest_DistanceMeasure_DOTPRODUCT,+        ..+      ),++    -- * GoogleDatastoreAdminV1CommonMetadata_OperationType+    GoogleDatastoreAdminV1CommonMetadata_OperationType+      ( GoogleDatastoreAdminV1CommonMetadata_OperationType_OPERATIONTYPEUNSPECIFIED,+        GoogleDatastoreAdminV1CommonMetadata_OperationType_EXPORTENTITIES,+        GoogleDatastoreAdminV1CommonMetadata_OperationType_IMPORTENTITIES,+        GoogleDatastoreAdminV1CommonMetadata_OperationType_CREATEINDEX,+        GoogleDatastoreAdminV1CommonMetadata_OperationType_DELETEINDEX,+        ..+      ),++    -- * GoogleDatastoreAdminV1CommonMetadata_State+    GoogleDatastoreAdminV1CommonMetadata_State+      ( GoogleDatastoreAdminV1CommonMetadata_State_STATEUNSPECIFIED,+        GoogleDatastoreAdminV1CommonMetadata_State_Initializing,+        GoogleDatastoreAdminV1CommonMetadata_State_Processing,+        GoogleDatastoreAdminV1CommonMetadata_State_Cancelling,+        GoogleDatastoreAdminV1CommonMetadata_State_Finalizing,+        GoogleDatastoreAdminV1CommonMetadata_State_Successful,+        GoogleDatastoreAdminV1CommonMetadata_State_Failed,+        GoogleDatastoreAdminV1CommonMetadata_State_Cancelled,+        ..+      ),++    -- * GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState+    GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState+      ( GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState_MIGRATIONSTATEUNSPECIFIED,+        GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState_Running,+        GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState_Paused,+        GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState_Complete,+        ..+      ),++    -- * GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep+    GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep+      ( GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_MIGRATIONSTEPUNSPECIFIED,+        GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_Prepare,+        GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_Start,+        GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_APPLYWRITESSYNCHRONOUSLY,+        GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_COPYANDVERIFY,+        GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_REDIRECTEVENTUALLYCONSISTENTREADS,+        GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_REDIRECTSTRONGLYCONSISTENTREADS,+        GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_REDIRECTWRITES,+        ..+      ),++    -- * GoogleDatastoreAdminV1Index_Ancestor+    GoogleDatastoreAdminV1Index_Ancestor+      ( GoogleDatastoreAdminV1Index_Ancestor_ANCESTORMODEUNSPECIFIED,+        GoogleDatastoreAdminV1Index_Ancestor_None,+        GoogleDatastoreAdminV1Index_Ancestor_ALLANCESTORS,+        ..+      ),++    -- * GoogleDatastoreAdminV1Index_State+    GoogleDatastoreAdminV1Index_State+      ( GoogleDatastoreAdminV1Index_State_STATEUNSPECIFIED,+        GoogleDatastoreAdminV1Index_State_Creating,+        GoogleDatastoreAdminV1Index_State_Ready,+        GoogleDatastoreAdminV1Index_State_Deleting,+        GoogleDatastoreAdminV1Index_State_Error',+        ..+      ),++    -- * GoogleDatastoreAdminV1IndexedProperty_Direction+    GoogleDatastoreAdminV1IndexedProperty_Direction+      ( GoogleDatastoreAdminV1IndexedProperty_Direction_DIRECTIONUNSPECIFIED,+        GoogleDatastoreAdminV1IndexedProperty_Direction_Ascending,+        GoogleDatastoreAdminV1IndexedProperty_Direction_Descending,+        ..+      ),++    -- * GoogleDatastoreAdminV1MigrationProgressEvent_Step+    GoogleDatastoreAdminV1MigrationProgressEvent_Step+      ( GoogleDatastoreAdminV1MigrationProgressEvent_Step_MIGRATIONSTEPUNSPECIFIED,+        GoogleDatastoreAdminV1MigrationProgressEvent_Step_Prepare,+        GoogleDatastoreAdminV1MigrationProgressEvent_Step_Start,+        GoogleDatastoreAdminV1MigrationProgressEvent_Step_APPLYWRITESSYNCHRONOUSLY,+        GoogleDatastoreAdminV1MigrationProgressEvent_Step_COPYANDVERIFY,+        GoogleDatastoreAdminV1MigrationProgressEvent_Step_REDIRECTEVENTUALLYCONSISTENTREADS,+        GoogleDatastoreAdminV1MigrationProgressEvent_Step_REDIRECTSTRONGLYCONSISTENTREADS,+        GoogleDatastoreAdminV1MigrationProgressEvent_Step_REDIRECTWRITES,+        ..+      ),++    -- * GoogleDatastoreAdminV1MigrationStateEvent_State+    GoogleDatastoreAdminV1MigrationStateEvent_State+      ( GoogleDatastoreAdminV1MigrationStateEvent_State_MIGRATIONSTATEUNSPECIFIED,+        GoogleDatastoreAdminV1MigrationStateEvent_State_Running,+        GoogleDatastoreAdminV1MigrationStateEvent_State_Paused,+        GoogleDatastoreAdminV1MigrationStateEvent_State_Complete,+        ..+      ),++    -- * GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode+    GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode+      ( GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode_CONCURRENCYMODEUNSPECIFIED,+        GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode_Pessimistic,+        GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode_Optimistic,+        GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode_OPTIMISTICWITHENTITYGROUPS,+        ..+      ),++    -- * GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode+    GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode+      ( GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode_CONCURRENCYMODEUNSPECIFIED,+        GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode_Pessimistic,+        GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode_Optimistic,+        GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode_OPTIMISTICWITHENTITYGROUPS,+        ..+      ),++    -- * GoogleDatastoreAdminV1beta1CommonMetadata_OperationType+    GoogleDatastoreAdminV1beta1CommonMetadata_OperationType+      ( GoogleDatastoreAdminV1beta1CommonMetadata_OperationType_OPERATIONTYPEUNSPECIFIED,+        GoogleDatastoreAdminV1beta1CommonMetadata_OperationType_EXPORTENTITIES,+        GoogleDatastoreAdminV1beta1CommonMetadata_OperationType_IMPORTENTITIES,+        ..+      ),++    -- * GoogleDatastoreAdminV1beta1CommonMetadata_State+    GoogleDatastoreAdminV1beta1CommonMetadata_State+      ( GoogleDatastoreAdminV1beta1CommonMetadata_State_STATEUNSPECIFIED,+        GoogleDatastoreAdminV1beta1CommonMetadata_State_Initializing,+        GoogleDatastoreAdminV1beta1CommonMetadata_State_Processing,+        GoogleDatastoreAdminV1beta1CommonMetadata_State_Cancelling,+        GoogleDatastoreAdminV1beta1CommonMetadata_State_Finalizing,+        GoogleDatastoreAdminV1beta1CommonMetadata_State_Successful,+        GoogleDatastoreAdminV1beta1CommonMetadata_State_Failed,+        GoogleDatastoreAdminV1beta1CommonMetadata_State_Cancelled,+        ..+      ),++    -- * Mutation_ConflictResolutionStrategy+    Mutation_ConflictResolutionStrategy+      ( Mutation_ConflictResolutionStrategy_STRATEGYUNSPECIFIED,+        Mutation_ConflictResolutionStrategy_SERVERVALUE,+        Mutation_ConflictResolutionStrategy_Fail,+        ..+      ),++    -- * PropertyFilter_Op+    PropertyFilter_Op+      ( PropertyFilter_Op_OPERATORUNSPECIFIED,+        PropertyFilter_Op_LESSTHAN,+        PropertyFilter_Op_LESSTHANOREQUAL,+        PropertyFilter_Op_GREATERTHAN,+        PropertyFilter_Op_GREATERTHANOREQUAL,+        PropertyFilter_Op_Equal,+        PropertyFilter_Op_IN,+        PropertyFilter_Op_NOTEQUAL,+        PropertyFilter_Op_HASANCESTOR,+        PropertyFilter_Op_NOTIN,+        ..+      ),++    -- * PropertyOrder_Direction+    PropertyOrder_Direction+      ( PropertyOrder_Direction_DIRECTIONUNSPECIFIED,+        PropertyOrder_Direction_Ascending,+        PropertyOrder_Direction_Descending,+        ..+      ),++    -- * PropertyTransform_SetToServerValue+    PropertyTransform_SetToServerValue+      ( PropertyTransform_SetToServerValue_SERVERVALUEUNSPECIFIED,+        PropertyTransform_SetToServerValue_REQUESTTIME,+        ..+      ),++    -- * QueryResultBatch_EntityResultType+    QueryResultBatch_EntityResultType+      ( QueryResultBatch_EntityResultType_RESULTTYPEUNSPECIFIED,+        QueryResultBatch_EntityResultType_Full,+        QueryResultBatch_EntityResultType_Projection,+        QueryResultBatch_EntityResultType_KEYONLY,+        ..+      ),++    -- * QueryResultBatch_MoreResults+    QueryResultBatch_MoreResults+      ( QueryResultBatch_MoreResults_MORERESULTSTYPEUNSPECIFIED,+        QueryResultBatch_MoreResults_NOTFINISHED,+        QueryResultBatch_MoreResults_MORERESULTSAFTERLIMIT,+        QueryResultBatch_MoreResults_MORERESULTSAFTERCURSOR,+        QueryResultBatch_MoreResults_NOMORERESULTS,+        ..+      ),++    -- * ReadOptions_ReadConsistency+    ReadOptions_ReadConsistency+      ( ReadOptions_ReadConsistency_READCONSISTENCYUNSPECIFIED,+        ReadOptions_ReadConsistency_Strong,+        ReadOptions_ReadConsistency_Eventual,+        ..+      ),++    -- * Value_NullValue+    Value_NullValue+      ( Value_NullValue_NULLVALUE,+        ..+      ),+  )+where++import Gogol.Prelude qualified as Core++-- | V1 error format.+newtype Xgafv = Xgafv {fromXgafv :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | v1 error format+pattern Xgafv_1 :: Xgafv+pattern Xgafv_1 = Xgafv "1"++-- | v2 error format+pattern Xgafv_2 :: Xgafv+pattern Xgafv_2 = Xgafv "2"++{-# COMPLETE+  Xgafv_1,+  Xgafv_2,+  Xgafv+  #-}++-- | The state of the query after the current batch. Only COUNT(*) aggregations are supported in the initial launch. Therefore, expected result type is limited to @NO_MORE_RESULTS@.+newtype AggregationResultBatch_MoreResults = AggregationResultBatch_MoreResults {fromAggregationResultBatch_MoreResults :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unspecified. This value is never used.+pattern AggregationResultBatch_MoreResults_MORERESULTSTYPEUNSPECIFIED :: AggregationResultBatch_MoreResults+pattern AggregationResultBatch_MoreResults_MORERESULTSTYPEUNSPECIFIED = AggregationResultBatch_MoreResults "MORE_RESULTS_TYPE_UNSPECIFIED"++-- | There may be additional batches to fetch from this query.+pattern AggregationResultBatch_MoreResults_NOTFINISHED :: AggregationResultBatch_MoreResults+pattern AggregationResultBatch_MoreResults_NOTFINISHED = AggregationResultBatch_MoreResults "NOT_FINISHED"++-- | The query is finished, but there may be more results after the limit.+pattern AggregationResultBatch_MoreResults_MORERESULTSAFTERLIMIT :: AggregationResultBatch_MoreResults+pattern AggregationResultBatch_MoreResults_MORERESULTSAFTERLIMIT = AggregationResultBatch_MoreResults "MORE_RESULTS_AFTER_LIMIT"++-- | The query is finished, but there may be more results after the end cursor.+pattern AggregationResultBatch_MoreResults_MORERESULTSAFTERCURSOR :: AggregationResultBatch_MoreResults+pattern AggregationResultBatch_MoreResults_MORERESULTSAFTERCURSOR = AggregationResultBatch_MoreResults "MORE_RESULTS_AFTER_CURSOR"++-- | The query is finished, and there are no more results.+pattern AggregationResultBatch_MoreResults_NOMORERESULTS :: AggregationResultBatch_MoreResults+pattern AggregationResultBatch_MoreResults_NOMORERESULTS = AggregationResultBatch_MoreResults "NO_MORE_RESULTS"++{-# COMPLETE+  AggregationResultBatch_MoreResults_MORERESULTSTYPEUNSPECIFIED,+  AggregationResultBatch_MoreResults_NOTFINISHED,+  AggregationResultBatch_MoreResults_MORERESULTSAFTERLIMIT,+  AggregationResultBatch_MoreResults_MORERESULTSAFTERCURSOR,+  AggregationResultBatch_MoreResults_NOMORERESULTS,+  AggregationResultBatch_MoreResults+  #-}++-- | The type of commit to perform. Defaults to @TRANSACTIONAL@.+newtype CommitRequest_Mode = CommitRequest_Mode {fromCommitRequest_Mode :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unspecified. This value must not be used.+pattern CommitRequest_Mode_MODEUNSPECIFIED :: CommitRequest_Mode+pattern CommitRequest_Mode_MODEUNSPECIFIED = CommitRequest_Mode "MODE_UNSPECIFIED"++-- | Transactional: The mutations are either all applied, or none are applied. Learn about transactions <https://cloud.google.com/datastore/docs/concepts/transactions here>.+pattern CommitRequest_Mode_Transactional :: CommitRequest_Mode+pattern CommitRequest_Mode_Transactional = CommitRequest_Mode "TRANSACTIONAL"++-- | Non-transactional: The mutations may not apply as all or none.+pattern CommitRequest_Mode_NONTRANSACTIONAL :: CommitRequest_Mode+pattern CommitRequest_Mode_NONTRANSACTIONAL = CommitRequest_Mode "NON_TRANSACTIONAL"++{-# COMPLETE+  CommitRequest_Mode_MODEUNSPECIFIED,+  CommitRequest_Mode_Transactional,+  CommitRequest_Mode_NONTRANSACTIONAL,+  CommitRequest_Mode+  #-}++-- | The operator for combining multiple filters.+newtype CompositeFilter_Op = CompositeFilter_Op {fromCompositeFilter_Op :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unspecified. This value must not be used.+pattern CompositeFilter_Op_OPERATORUNSPECIFIED :: CompositeFilter_Op+pattern CompositeFilter_Op_OPERATORUNSPECIFIED = CompositeFilter_Op "OPERATOR_UNSPECIFIED"++-- | The results are required to satisfy each of the combined filters.+pattern CompositeFilter_Op_And :: CompositeFilter_Op+pattern CompositeFilter_Op_And = CompositeFilter_Op "AND"++-- | Documents are required to satisfy at least one of the combined filters.+pattern CompositeFilter_Op_OR :: CompositeFilter_Op+pattern CompositeFilter_Op_OR = CompositeFilter_Op "OR"++{-# COMPLETE+  CompositeFilter_Op_OPERATORUNSPECIFIED,+  CompositeFilter_Op_And,+  CompositeFilter_Op_OR,+  CompositeFilter_Op+  #-}++-- | Required. The Distance Measure to use, required.+newtype FindNearest_DistanceMeasure = FindNearest_DistanceMeasure {fromFindNearest_DistanceMeasure :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Should not be set.+pattern FindNearest_DistanceMeasure_DISTANCEMEASUREUNSPECIFIED :: FindNearest_DistanceMeasure+pattern FindNearest_DistanceMeasure_DISTANCEMEASUREUNSPECIFIED = FindNearest_DistanceMeasure "DISTANCE_MEASURE_UNSPECIFIED"++-- | Measures the EUCLIDEAN distance between the vectors. See <https://en.wikipedia.org/wiki/Euclidean_distance Euclidean> to learn more. The resulting distance decreases the more similar two vectors are.+pattern FindNearest_DistanceMeasure_Euclidean :: FindNearest_DistanceMeasure+pattern FindNearest_DistanceMeasure_Euclidean = FindNearest_DistanceMeasure "EUCLIDEAN"++-- | COSINE distance compares vectors based on the angle between them, which allows you to measure similarity that isn\'t based on the vectors magnitude. We recommend using DOT_PRODUCT with unit normalized vectors instead of COSINE distance, which is mathematically equivalent with better performance. See <https://en.wikipedia.org/wiki/Cosine_similarity Cosine Similarity> to learn more about COSINE similarity and COSINE distance. The resulting COSINE distance decreases the more similar two vectors are.+pattern FindNearest_DistanceMeasure_Cosine :: FindNearest_DistanceMeasure+pattern FindNearest_DistanceMeasure_Cosine = FindNearest_DistanceMeasure "COSINE"++-- | Similar to cosine but is affected by the magnitude of the vectors. See <https://en.wikipedia.org/wiki/Dot_product Dot Product> to learn more. The resulting distance increases the more similar two vectors are.+pattern FindNearest_DistanceMeasure_DOTPRODUCT :: FindNearest_DistanceMeasure+pattern FindNearest_DistanceMeasure_DOTPRODUCT = FindNearest_DistanceMeasure "DOT_PRODUCT"++{-# COMPLETE+  FindNearest_DistanceMeasure_DISTANCEMEASUREUNSPECIFIED,+  FindNearest_DistanceMeasure_Euclidean,+  FindNearest_DistanceMeasure_Cosine,+  FindNearest_DistanceMeasure_DOTPRODUCT,+  FindNearest_DistanceMeasure+  #-}++-- | The type of the operation. Can be used as a filter in ListOperationsRequest.+newtype GoogleDatastoreAdminV1CommonMetadata_OperationType = GoogleDatastoreAdminV1CommonMetadata_OperationType {fromGoogleDatastoreAdminV1CommonMetadata_OperationType :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unspecified.+pattern GoogleDatastoreAdminV1CommonMetadata_OperationType_OPERATIONTYPEUNSPECIFIED :: GoogleDatastoreAdminV1CommonMetadata_OperationType+pattern GoogleDatastoreAdminV1CommonMetadata_OperationType_OPERATIONTYPEUNSPECIFIED = GoogleDatastoreAdminV1CommonMetadata_OperationType "OPERATION_TYPE_UNSPECIFIED"++-- | ExportEntities.+pattern GoogleDatastoreAdminV1CommonMetadata_OperationType_EXPORTENTITIES :: GoogleDatastoreAdminV1CommonMetadata_OperationType+pattern GoogleDatastoreAdminV1CommonMetadata_OperationType_EXPORTENTITIES = GoogleDatastoreAdminV1CommonMetadata_OperationType "EXPORT_ENTITIES"++-- | ImportEntities.+pattern GoogleDatastoreAdminV1CommonMetadata_OperationType_IMPORTENTITIES :: GoogleDatastoreAdminV1CommonMetadata_OperationType+pattern GoogleDatastoreAdminV1CommonMetadata_OperationType_IMPORTENTITIES = GoogleDatastoreAdminV1CommonMetadata_OperationType "IMPORT_ENTITIES"++-- | CreateIndex.+pattern GoogleDatastoreAdminV1CommonMetadata_OperationType_CREATEINDEX :: GoogleDatastoreAdminV1CommonMetadata_OperationType+pattern GoogleDatastoreAdminV1CommonMetadata_OperationType_CREATEINDEX = GoogleDatastoreAdminV1CommonMetadata_OperationType "CREATE_INDEX"++-- | DeleteIndex.+pattern GoogleDatastoreAdminV1CommonMetadata_OperationType_DELETEINDEX :: GoogleDatastoreAdminV1CommonMetadata_OperationType+pattern GoogleDatastoreAdminV1CommonMetadata_OperationType_DELETEINDEX = GoogleDatastoreAdminV1CommonMetadata_OperationType "DELETE_INDEX"++{-# COMPLETE+  GoogleDatastoreAdminV1CommonMetadata_OperationType_OPERATIONTYPEUNSPECIFIED,+  GoogleDatastoreAdminV1CommonMetadata_OperationType_EXPORTENTITIES,+  GoogleDatastoreAdminV1CommonMetadata_OperationType_IMPORTENTITIES,+  GoogleDatastoreAdminV1CommonMetadata_OperationType_CREATEINDEX,+  GoogleDatastoreAdminV1CommonMetadata_OperationType_DELETEINDEX,+  GoogleDatastoreAdminV1CommonMetadata_OperationType+  #-}++-- | The current state of the Operation.+newtype GoogleDatastoreAdminV1CommonMetadata_State = GoogleDatastoreAdminV1CommonMetadata_State {fromGoogleDatastoreAdminV1CommonMetadata_State :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unspecified.+pattern GoogleDatastoreAdminV1CommonMetadata_State_STATEUNSPECIFIED :: GoogleDatastoreAdminV1CommonMetadata_State+pattern GoogleDatastoreAdminV1CommonMetadata_State_STATEUNSPECIFIED = GoogleDatastoreAdminV1CommonMetadata_State "STATE_UNSPECIFIED"++-- | Request is being prepared for processing.+pattern GoogleDatastoreAdminV1CommonMetadata_State_Initializing :: GoogleDatastoreAdminV1CommonMetadata_State+pattern GoogleDatastoreAdminV1CommonMetadata_State_Initializing = GoogleDatastoreAdminV1CommonMetadata_State "INITIALIZING"++-- | Request is actively being processed.+pattern GoogleDatastoreAdminV1CommonMetadata_State_Processing :: GoogleDatastoreAdminV1CommonMetadata_State+pattern GoogleDatastoreAdminV1CommonMetadata_State_Processing = GoogleDatastoreAdminV1CommonMetadata_State "PROCESSING"++-- | Request is in the process of being cancelled after user called google.longrunning.Operations.CancelOperation on the operation.+pattern GoogleDatastoreAdminV1CommonMetadata_State_Cancelling :: GoogleDatastoreAdminV1CommonMetadata_State+pattern GoogleDatastoreAdminV1CommonMetadata_State_Cancelling = GoogleDatastoreAdminV1CommonMetadata_State "CANCELLING"++-- | Request has been processed and is in its finalization stage.+pattern GoogleDatastoreAdminV1CommonMetadata_State_Finalizing :: GoogleDatastoreAdminV1CommonMetadata_State+pattern GoogleDatastoreAdminV1CommonMetadata_State_Finalizing = GoogleDatastoreAdminV1CommonMetadata_State "FINALIZING"++-- | Request has completed successfully.+pattern GoogleDatastoreAdminV1CommonMetadata_State_Successful :: GoogleDatastoreAdminV1CommonMetadata_State+pattern GoogleDatastoreAdminV1CommonMetadata_State_Successful = GoogleDatastoreAdminV1CommonMetadata_State "SUCCESSFUL"++-- | Request has finished being processed, but encountered an error.+pattern GoogleDatastoreAdminV1CommonMetadata_State_Failed :: GoogleDatastoreAdminV1CommonMetadata_State+pattern GoogleDatastoreAdminV1CommonMetadata_State_Failed = GoogleDatastoreAdminV1CommonMetadata_State "FAILED"++-- | Request has finished being cancelled after user called google.longrunning.Operations.CancelOperation.+pattern GoogleDatastoreAdminV1CommonMetadata_State_Cancelled :: GoogleDatastoreAdminV1CommonMetadata_State+pattern GoogleDatastoreAdminV1CommonMetadata_State_Cancelled = GoogleDatastoreAdminV1CommonMetadata_State "CANCELLED"++{-# COMPLETE+  GoogleDatastoreAdminV1CommonMetadata_State_STATEUNSPECIFIED,+  GoogleDatastoreAdminV1CommonMetadata_State_Initializing,+  GoogleDatastoreAdminV1CommonMetadata_State_Processing,+  GoogleDatastoreAdminV1CommonMetadata_State_Cancelling,+  GoogleDatastoreAdminV1CommonMetadata_State_Finalizing,+  GoogleDatastoreAdminV1CommonMetadata_State_Successful,+  GoogleDatastoreAdminV1CommonMetadata_State_Failed,+  GoogleDatastoreAdminV1CommonMetadata_State_Cancelled,+  GoogleDatastoreAdminV1CommonMetadata_State+  #-}++-- | The current state of migration from Cloud Datastore to Cloud Firestore in Datastore mode.+newtype GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState = GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState {fromGoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unspecified.+pattern GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState_MIGRATIONSTATEUNSPECIFIED :: GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState+pattern GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState_MIGRATIONSTATEUNSPECIFIED = GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState "MIGRATION_STATE_UNSPECIFIED"++-- | The migration is running.+pattern GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState_Running :: GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState+pattern GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState_Running = GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState "RUNNING"++-- | The migration is paused.+pattern GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState_Paused :: GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState+pattern GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState_Paused = GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState "PAUSED"++-- | The migration is complete.+pattern GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState_Complete :: GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState+pattern GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState_Complete = GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState "COMPLETE"++{-# COMPLETE+  GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState_MIGRATIONSTATEUNSPECIFIED,+  GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState_Running,+  GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState_Paused,+  GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState_Complete,+  GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState+  #-}++-- | The current step of migration from Cloud Datastore to Cloud Firestore in Datastore mode.+newtype GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep = GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep {fromGoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unspecified.+pattern GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_MIGRATIONSTEPUNSPECIFIED :: GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep+pattern GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_MIGRATIONSTEPUNSPECIFIED = GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep "MIGRATION_STEP_UNSPECIFIED"++-- | Pre-migration: the database is prepared for migration.+pattern GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_Prepare :: GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep+pattern GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_Prepare = GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep "PREPARE"++-- | Start of migration.+pattern GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_Start :: GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep+pattern GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_Start = GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep "START"++-- | Writes are applied synchronously to at least one replica.+pattern GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_APPLYWRITESSYNCHRONOUSLY :: GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep+pattern GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_APPLYWRITESSYNCHRONOUSLY = GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep "APPLY_WRITES_SYNCHRONOUSLY"++-- | Data is copied to Cloud Firestore and then verified to match the data in Cloud Datastore.+pattern GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_COPYANDVERIFY :: GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep+pattern GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_COPYANDVERIFY = GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep "COPY_AND_VERIFY"++-- | Eventually-consistent reads are redirected to Cloud Firestore.+pattern GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_REDIRECTEVENTUALLYCONSISTENTREADS :: GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep+pattern GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_REDIRECTEVENTUALLYCONSISTENTREADS = GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep "REDIRECT_EVENTUALLY_CONSISTENT_READS"++-- | Strongly-consistent reads are redirected to Cloud Firestore.+pattern GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_REDIRECTSTRONGLYCONSISTENTREADS :: GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep+pattern GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_REDIRECTSTRONGLYCONSISTENTREADS = GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep "REDIRECT_STRONGLY_CONSISTENT_READS"++-- | Writes are redirected to Cloud Firestore.+pattern GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_REDIRECTWRITES :: GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep+pattern GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_REDIRECTWRITES = GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep "REDIRECT_WRITES"++{-# COMPLETE+  GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_MIGRATIONSTEPUNSPECIFIED,+  GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_Prepare,+  GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_Start,+  GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_APPLYWRITESSYNCHRONOUSLY,+  GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_COPYANDVERIFY,+  GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_REDIRECTEVENTUALLYCONSISTENTREADS,+  GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_REDIRECTSTRONGLYCONSISTENTREADS,+  GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep_REDIRECTWRITES,+  GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep+  #-}++-- | Required. The index\'s ancestor mode. Must not be ANCESTOR/MODE/UNSPECIFIED.+newtype GoogleDatastoreAdminV1Index_Ancestor = GoogleDatastoreAdminV1Index_Ancestor {fromGoogleDatastoreAdminV1Index_Ancestor :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | The ancestor mode is unspecified.+pattern GoogleDatastoreAdminV1Index_Ancestor_ANCESTORMODEUNSPECIFIED :: GoogleDatastoreAdminV1Index_Ancestor+pattern GoogleDatastoreAdminV1Index_Ancestor_ANCESTORMODEUNSPECIFIED = GoogleDatastoreAdminV1Index_Ancestor "ANCESTOR_MODE_UNSPECIFIED"++-- | Do not include the entity\'s ancestors in the index.+pattern GoogleDatastoreAdminV1Index_Ancestor_None :: GoogleDatastoreAdminV1Index_Ancestor+pattern GoogleDatastoreAdminV1Index_Ancestor_None = GoogleDatastoreAdminV1Index_Ancestor "NONE"++-- | Include all the entity\'s ancestors in the index.+pattern GoogleDatastoreAdminV1Index_Ancestor_ALLANCESTORS :: GoogleDatastoreAdminV1Index_Ancestor+pattern GoogleDatastoreAdminV1Index_Ancestor_ALLANCESTORS = GoogleDatastoreAdminV1Index_Ancestor "ALL_ANCESTORS"++{-# COMPLETE+  GoogleDatastoreAdminV1Index_Ancestor_ANCESTORMODEUNSPECIFIED,+  GoogleDatastoreAdminV1Index_Ancestor_None,+  GoogleDatastoreAdminV1Index_Ancestor_ALLANCESTORS,+  GoogleDatastoreAdminV1Index_Ancestor+  #-}++-- | Output only. The state of the index.+newtype GoogleDatastoreAdminV1Index_State = GoogleDatastoreAdminV1Index_State {fromGoogleDatastoreAdminV1Index_State :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | The state is unspecified.+pattern GoogleDatastoreAdminV1Index_State_STATEUNSPECIFIED :: GoogleDatastoreAdminV1Index_State+pattern GoogleDatastoreAdminV1Index_State_STATEUNSPECIFIED = GoogleDatastoreAdminV1Index_State "STATE_UNSPECIFIED"++-- | The index is being created, and cannot be used by queries. There is an active long-running operation for the index. The index is updated when writing an entity. Some index data may exist.+pattern GoogleDatastoreAdminV1Index_State_Creating :: GoogleDatastoreAdminV1Index_State+pattern GoogleDatastoreAdminV1Index_State_Creating = GoogleDatastoreAdminV1Index_State "CREATING"++-- | The index is ready to be used. The index is updated when writing an entity. The index is fully populated from all stored entities it applies to.+pattern GoogleDatastoreAdminV1Index_State_Ready :: GoogleDatastoreAdminV1Index_State+pattern GoogleDatastoreAdminV1Index_State_Ready = GoogleDatastoreAdminV1Index_State "READY"++-- | The index is being deleted, and cannot be used by queries. There is an active long-running operation for the index. The index is not updated when writing an entity. Some index data may exist.+pattern GoogleDatastoreAdminV1Index_State_Deleting :: GoogleDatastoreAdminV1Index_State+pattern GoogleDatastoreAdminV1Index_State_Deleting = GoogleDatastoreAdminV1Index_State "DELETING"++-- | The index was being created or deleted, but something went wrong. The index cannot by used by queries. There is no active long-running operation for the index, and the most recently finished long-running operation failed. The index is not updated when writing an entity. Some index data may exist.+pattern GoogleDatastoreAdminV1Index_State_Error' :: GoogleDatastoreAdminV1Index_State+pattern GoogleDatastoreAdminV1Index_State_Error' = GoogleDatastoreAdminV1Index_State "ERROR"++{-# COMPLETE+  GoogleDatastoreAdminV1Index_State_STATEUNSPECIFIED,+  GoogleDatastoreAdminV1Index_State_Creating,+  GoogleDatastoreAdminV1Index_State_Ready,+  GoogleDatastoreAdminV1Index_State_Deleting,+  GoogleDatastoreAdminV1Index_State_Error',+  GoogleDatastoreAdminV1Index_State+  #-}++-- | Required. The indexed property\'s direction. Must not be DIRECTION_UNSPECIFIED.+newtype GoogleDatastoreAdminV1IndexedProperty_Direction = GoogleDatastoreAdminV1IndexedProperty_Direction {fromGoogleDatastoreAdminV1IndexedProperty_Direction :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | The direction is unspecified.+pattern GoogleDatastoreAdminV1IndexedProperty_Direction_DIRECTIONUNSPECIFIED :: GoogleDatastoreAdminV1IndexedProperty_Direction+pattern GoogleDatastoreAdminV1IndexedProperty_Direction_DIRECTIONUNSPECIFIED = GoogleDatastoreAdminV1IndexedProperty_Direction "DIRECTION_UNSPECIFIED"++-- | The property\'s values are indexed so as to support sequencing in ascending order and also query by \<, >, \<=, >=, and =.+pattern GoogleDatastoreAdminV1IndexedProperty_Direction_Ascending :: GoogleDatastoreAdminV1IndexedProperty_Direction+pattern GoogleDatastoreAdminV1IndexedProperty_Direction_Ascending = GoogleDatastoreAdminV1IndexedProperty_Direction "ASCENDING"++-- | The property\'s values are indexed so as to support sequencing in descending order and also query by \<, >, \<=, >=, and =.+pattern GoogleDatastoreAdminV1IndexedProperty_Direction_Descending :: GoogleDatastoreAdminV1IndexedProperty_Direction+pattern GoogleDatastoreAdminV1IndexedProperty_Direction_Descending = GoogleDatastoreAdminV1IndexedProperty_Direction "DESCENDING"++{-# COMPLETE+  GoogleDatastoreAdminV1IndexedProperty_Direction_DIRECTIONUNSPECIFIED,+  GoogleDatastoreAdminV1IndexedProperty_Direction_Ascending,+  GoogleDatastoreAdminV1IndexedProperty_Direction_Descending,+  GoogleDatastoreAdminV1IndexedProperty_Direction+  #-}++-- | The step that is starting. An event with step set to @START@ indicates that the migration has been reverted back to the initial pre-migration state.+newtype GoogleDatastoreAdminV1MigrationProgressEvent_Step = GoogleDatastoreAdminV1MigrationProgressEvent_Step {fromGoogleDatastoreAdminV1MigrationProgressEvent_Step :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unspecified.+pattern GoogleDatastoreAdminV1MigrationProgressEvent_Step_MIGRATIONSTEPUNSPECIFIED :: GoogleDatastoreAdminV1MigrationProgressEvent_Step+pattern GoogleDatastoreAdminV1MigrationProgressEvent_Step_MIGRATIONSTEPUNSPECIFIED = GoogleDatastoreAdminV1MigrationProgressEvent_Step "MIGRATION_STEP_UNSPECIFIED"++-- | Pre-migration: the database is prepared for migration.+pattern GoogleDatastoreAdminV1MigrationProgressEvent_Step_Prepare :: GoogleDatastoreAdminV1MigrationProgressEvent_Step+pattern GoogleDatastoreAdminV1MigrationProgressEvent_Step_Prepare = GoogleDatastoreAdminV1MigrationProgressEvent_Step "PREPARE"++-- | Start of migration.+pattern GoogleDatastoreAdminV1MigrationProgressEvent_Step_Start :: GoogleDatastoreAdminV1MigrationProgressEvent_Step+pattern GoogleDatastoreAdminV1MigrationProgressEvent_Step_Start = GoogleDatastoreAdminV1MigrationProgressEvent_Step "START"++-- | Writes are applied synchronously to at least one replica.+pattern GoogleDatastoreAdminV1MigrationProgressEvent_Step_APPLYWRITESSYNCHRONOUSLY :: GoogleDatastoreAdminV1MigrationProgressEvent_Step+pattern GoogleDatastoreAdminV1MigrationProgressEvent_Step_APPLYWRITESSYNCHRONOUSLY = GoogleDatastoreAdminV1MigrationProgressEvent_Step "APPLY_WRITES_SYNCHRONOUSLY"++-- | Data is copied to Cloud Firestore and then verified to match the data in Cloud Datastore.+pattern GoogleDatastoreAdminV1MigrationProgressEvent_Step_COPYANDVERIFY :: GoogleDatastoreAdminV1MigrationProgressEvent_Step+pattern GoogleDatastoreAdminV1MigrationProgressEvent_Step_COPYANDVERIFY = GoogleDatastoreAdminV1MigrationProgressEvent_Step "COPY_AND_VERIFY"++-- | Eventually-consistent reads are redirected to Cloud Firestore.+pattern GoogleDatastoreAdminV1MigrationProgressEvent_Step_REDIRECTEVENTUALLYCONSISTENTREADS :: GoogleDatastoreAdminV1MigrationProgressEvent_Step+pattern GoogleDatastoreAdminV1MigrationProgressEvent_Step_REDIRECTEVENTUALLYCONSISTENTREADS = GoogleDatastoreAdminV1MigrationProgressEvent_Step "REDIRECT_EVENTUALLY_CONSISTENT_READS"++-- | Strongly-consistent reads are redirected to Cloud Firestore.+pattern GoogleDatastoreAdminV1MigrationProgressEvent_Step_REDIRECTSTRONGLYCONSISTENTREADS :: GoogleDatastoreAdminV1MigrationProgressEvent_Step+pattern GoogleDatastoreAdminV1MigrationProgressEvent_Step_REDIRECTSTRONGLYCONSISTENTREADS = GoogleDatastoreAdminV1MigrationProgressEvent_Step "REDIRECT_STRONGLY_CONSISTENT_READS"++-- | Writes are redirected to Cloud Firestore.+pattern GoogleDatastoreAdminV1MigrationProgressEvent_Step_REDIRECTWRITES :: GoogleDatastoreAdminV1MigrationProgressEvent_Step+pattern GoogleDatastoreAdminV1MigrationProgressEvent_Step_REDIRECTWRITES = GoogleDatastoreAdminV1MigrationProgressEvent_Step "REDIRECT_WRITES"++{-# COMPLETE+  GoogleDatastoreAdminV1MigrationProgressEvent_Step_MIGRATIONSTEPUNSPECIFIED,+  GoogleDatastoreAdminV1MigrationProgressEvent_Step_Prepare,+  GoogleDatastoreAdminV1MigrationProgressEvent_Step_Start,+  GoogleDatastoreAdminV1MigrationProgressEvent_Step_APPLYWRITESSYNCHRONOUSLY,+  GoogleDatastoreAdminV1MigrationProgressEvent_Step_COPYANDVERIFY,+  GoogleDatastoreAdminV1MigrationProgressEvent_Step_REDIRECTEVENTUALLYCONSISTENTREADS,+  GoogleDatastoreAdminV1MigrationProgressEvent_Step_REDIRECTSTRONGLYCONSISTENTREADS,+  GoogleDatastoreAdminV1MigrationProgressEvent_Step_REDIRECTWRITES,+  GoogleDatastoreAdminV1MigrationProgressEvent_Step+  #-}++-- | The new state of the migration.+newtype GoogleDatastoreAdminV1MigrationStateEvent_State = GoogleDatastoreAdminV1MigrationStateEvent_State {fromGoogleDatastoreAdminV1MigrationStateEvent_State :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unspecified.+pattern GoogleDatastoreAdminV1MigrationStateEvent_State_MIGRATIONSTATEUNSPECIFIED :: GoogleDatastoreAdminV1MigrationStateEvent_State+pattern GoogleDatastoreAdminV1MigrationStateEvent_State_MIGRATIONSTATEUNSPECIFIED = GoogleDatastoreAdminV1MigrationStateEvent_State "MIGRATION_STATE_UNSPECIFIED"++-- | The migration is running.+pattern GoogleDatastoreAdminV1MigrationStateEvent_State_Running :: GoogleDatastoreAdminV1MigrationStateEvent_State+pattern GoogleDatastoreAdminV1MigrationStateEvent_State_Running = GoogleDatastoreAdminV1MigrationStateEvent_State "RUNNING"++-- | The migration is paused.+pattern GoogleDatastoreAdminV1MigrationStateEvent_State_Paused :: GoogleDatastoreAdminV1MigrationStateEvent_State+pattern GoogleDatastoreAdminV1MigrationStateEvent_State_Paused = GoogleDatastoreAdminV1MigrationStateEvent_State "PAUSED"++-- | The migration is complete.+pattern GoogleDatastoreAdminV1MigrationStateEvent_State_Complete :: GoogleDatastoreAdminV1MigrationStateEvent_State+pattern GoogleDatastoreAdminV1MigrationStateEvent_State_Complete = GoogleDatastoreAdminV1MigrationStateEvent_State "COMPLETE"++{-# COMPLETE+  GoogleDatastoreAdminV1MigrationStateEvent_State_MIGRATIONSTATEUNSPECIFIED,+  GoogleDatastoreAdminV1MigrationStateEvent_State_Running,+  GoogleDatastoreAdminV1MigrationStateEvent_State_Paused,+  GoogleDatastoreAdminV1MigrationStateEvent_State_Complete,+  GoogleDatastoreAdminV1MigrationStateEvent_State+  #-}++-- | The concurrency mode this database will use when it reaches the @REDIRECT_WRITES@ step.+newtype GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode = GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode {fromGoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unspecified.+pattern GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode_CONCURRENCYMODEUNSPECIFIED :: GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode+pattern GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode_CONCURRENCYMODEUNSPECIFIED = GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode "CONCURRENCY_MODE_UNSPECIFIED"++-- | Pessimistic concurrency.+pattern GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode_Pessimistic :: GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode+pattern GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode_Pessimistic = GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode "PESSIMISTIC"++-- | Optimistic concurrency.+pattern GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode_Optimistic :: GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode+pattern GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode_Optimistic = GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode "OPTIMISTIC"++-- | Optimistic concurrency with entity groups.+pattern GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode_OPTIMISTICWITHENTITYGROUPS :: GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode+pattern GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode_OPTIMISTICWITHENTITYGROUPS = GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode "OPTIMISTIC_WITH_ENTITY_GROUPS"++{-# COMPLETE+  GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode_CONCURRENCYMODEUNSPECIFIED,+  GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode_Pessimistic,+  GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode_Optimistic,+  GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode_OPTIMISTICWITHENTITYGROUPS,+  GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode+  #-}++-- | The concurrency mode for this database.+newtype GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode = GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode {fromGoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unspecified.+pattern GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode_CONCURRENCYMODEUNSPECIFIED :: GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode+pattern GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode_CONCURRENCYMODEUNSPECIFIED = GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode "CONCURRENCY_MODE_UNSPECIFIED"++-- | Pessimistic concurrency.+pattern GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode_Pessimistic :: GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode+pattern GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode_Pessimistic = GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode "PESSIMISTIC"++-- | Optimistic concurrency.+pattern GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode_Optimistic :: GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode+pattern GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode_Optimistic = GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode "OPTIMISTIC"++-- | Optimistic concurrency with entity groups.+pattern GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode_OPTIMISTICWITHENTITYGROUPS :: GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode+pattern GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode_OPTIMISTICWITHENTITYGROUPS = GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode "OPTIMISTIC_WITH_ENTITY_GROUPS"++{-# COMPLETE+  GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode_CONCURRENCYMODEUNSPECIFIED,+  GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode_Pessimistic,+  GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode_Optimistic,+  GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode_OPTIMISTICWITHENTITYGROUPS,+  GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode+  #-}++-- | The type of the operation. Can be used as a filter in ListOperationsRequest.+newtype GoogleDatastoreAdminV1beta1CommonMetadata_OperationType = GoogleDatastoreAdminV1beta1CommonMetadata_OperationType {fromGoogleDatastoreAdminV1beta1CommonMetadata_OperationType :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unspecified.+pattern GoogleDatastoreAdminV1beta1CommonMetadata_OperationType_OPERATIONTYPEUNSPECIFIED :: GoogleDatastoreAdminV1beta1CommonMetadata_OperationType+pattern GoogleDatastoreAdminV1beta1CommonMetadata_OperationType_OPERATIONTYPEUNSPECIFIED = GoogleDatastoreAdminV1beta1CommonMetadata_OperationType "OPERATION_TYPE_UNSPECIFIED"++-- | ExportEntities.+pattern GoogleDatastoreAdminV1beta1CommonMetadata_OperationType_EXPORTENTITIES :: GoogleDatastoreAdminV1beta1CommonMetadata_OperationType+pattern GoogleDatastoreAdminV1beta1CommonMetadata_OperationType_EXPORTENTITIES = GoogleDatastoreAdminV1beta1CommonMetadata_OperationType "EXPORT_ENTITIES"++-- | ImportEntities.+pattern GoogleDatastoreAdminV1beta1CommonMetadata_OperationType_IMPORTENTITIES :: GoogleDatastoreAdminV1beta1CommonMetadata_OperationType+pattern GoogleDatastoreAdminV1beta1CommonMetadata_OperationType_IMPORTENTITIES = GoogleDatastoreAdminV1beta1CommonMetadata_OperationType "IMPORT_ENTITIES"++{-# COMPLETE+  GoogleDatastoreAdminV1beta1CommonMetadata_OperationType_OPERATIONTYPEUNSPECIFIED,+  GoogleDatastoreAdminV1beta1CommonMetadata_OperationType_EXPORTENTITIES,+  GoogleDatastoreAdminV1beta1CommonMetadata_OperationType_IMPORTENTITIES,+  GoogleDatastoreAdminV1beta1CommonMetadata_OperationType+  #-}++-- | The current state of the Operation.+newtype GoogleDatastoreAdminV1beta1CommonMetadata_State = GoogleDatastoreAdminV1beta1CommonMetadata_State {fromGoogleDatastoreAdminV1beta1CommonMetadata_State :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unspecified.+pattern GoogleDatastoreAdminV1beta1CommonMetadata_State_STATEUNSPECIFIED :: GoogleDatastoreAdminV1beta1CommonMetadata_State+pattern GoogleDatastoreAdminV1beta1CommonMetadata_State_STATEUNSPECIFIED = GoogleDatastoreAdminV1beta1CommonMetadata_State "STATE_UNSPECIFIED"++-- | Request is being prepared for processing.+pattern GoogleDatastoreAdminV1beta1CommonMetadata_State_Initializing :: GoogleDatastoreAdminV1beta1CommonMetadata_State+pattern GoogleDatastoreAdminV1beta1CommonMetadata_State_Initializing = GoogleDatastoreAdminV1beta1CommonMetadata_State "INITIALIZING"++-- | Request is actively being processed.+pattern GoogleDatastoreAdminV1beta1CommonMetadata_State_Processing :: GoogleDatastoreAdminV1beta1CommonMetadata_State+pattern GoogleDatastoreAdminV1beta1CommonMetadata_State_Processing = GoogleDatastoreAdminV1beta1CommonMetadata_State "PROCESSING"++-- | Request is in the process of being cancelled after user called google.longrunning.Operations.CancelOperation on the operation.+pattern GoogleDatastoreAdminV1beta1CommonMetadata_State_Cancelling :: GoogleDatastoreAdminV1beta1CommonMetadata_State+pattern GoogleDatastoreAdminV1beta1CommonMetadata_State_Cancelling = GoogleDatastoreAdminV1beta1CommonMetadata_State "CANCELLING"++-- | Request has been processed and is in its finalization stage.+pattern GoogleDatastoreAdminV1beta1CommonMetadata_State_Finalizing :: GoogleDatastoreAdminV1beta1CommonMetadata_State+pattern GoogleDatastoreAdminV1beta1CommonMetadata_State_Finalizing = GoogleDatastoreAdminV1beta1CommonMetadata_State "FINALIZING"++-- | Request has completed successfully.+pattern GoogleDatastoreAdminV1beta1CommonMetadata_State_Successful :: GoogleDatastoreAdminV1beta1CommonMetadata_State+pattern GoogleDatastoreAdminV1beta1CommonMetadata_State_Successful = GoogleDatastoreAdminV1beta1CommonMetadata_State "SUCCESSFUL"++-- | Request has finished being processed, but encountered an error.+pattern GoogleDatastoreAdminV1beta1CommonMetadata_State_Failed :: GoogleDatastoreAdminV1beta1CommonMetadata_State+pattern GoogleDatastoreAdminV1beta1CommonMetadata_State_Failed = GoogleDatastoreAdminV1beta1CommonMetadata_State "FAILED"++-- | Request has finished being cancelled after user called google.longrunning.Operations.CancelOperation.+pattern GoogleDatastoreAdminV1beta1CommonMetadata_State_Cancelled :: GoogleDatastoreAdminV1beta1CommonMetadata_State+pattern GoogleDatastoreAdminV1beta1CommonMetadata_State_Cancelled = GoogleDatastoreAdminV1beta1CommonMetadata_State "CANCELLED"++{-# COMPLETE+  GoogleDatastoreAdminV1beta1CommonMetadata_State_STATEUNSPECIFIED,+  GoogleDatastoreAdminV1beta1CommonMetadata_State_Initializing,+  GoogleDatastoreAdminV1beta1CommonMetadata_State_Processing,+  GoogleDatastoreAdminV1beta1CommonMetadata_State_Cancelling,+  GoogleDatastoreAdminV1beta1CommonMetadata_State_Finalizing,+  GoogleDatastoreAdminV1beta1CommonMetadata_State_Successful,+  GoogleDatastoreAdminV1beta1CommonMetadata_State_Failed,+  GoogleDatastoreAdminV1beta1CommonMetadata_State_Cancelled,+  GoogleDatastoreAdminV1beta1CommonMetadata_State+  #-}++-- | The strategy to use when a conflict is detected. Defaults to @SERVER_VALUE@. If this is set, then @conflict_detection_strategy@ must also be set.+newtype Mutation_ConflictResolutionStrategy = Mutation_ConflictResolutionStrategy {fromMutation_ConflictResolutionStrategy :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unspecified. Defaults to @SERVER_VALUE@.+pattern Mutation_ConflictResolutionStrategy_STRATEGYUNSPECIFIED :: Mutation_ConflictResolutionStrategy+pattern Mutation_ConflictResolutionStrategy_STRATEGYUNSPECIFIED = Mutation_ConflictResolutionStrategy "STRATEGY_UNSPECIFIED"++-- | The server entity is kept.+pattern Mutation_ConflictResolutionStrategy_SERVERVALUE :: Mutation_ConflictResolutionStrategy+pattern Mutation_ConflictResolutionStrategy_SERVERVALUE = Mutation_ConflictResolutionStrategy "SERVER_VALUE"++-- | The whole commit request fails.+pattern Mutation_ConflictResolutionStrategy_Fail :: Mutation_ConflictResolutionStrategy+pattern Mutation_ConflictResolutionStrategy_Fail = Mutation_ConflictResolutionStrategy "FAIL"++{-# COMPLETE+  Mutation_ConflictResolutionStrategy_STRATEGYUNSPECIFIED,+  Mutation_ConflictResolutionStrategy_SERVERVALUE,+  Mutation_ConflictResolutionStrategy_Fail,+  Mutation_ConflictResolutionStrategy+  #-}++-- | The operator to filter by.+newtype PropertyFilter_Op = PropertyFilter_Op {fromPropertyFilter_Op :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unspecified. This value must not be used.+pattern PropertyFilter_Op_OPERATORUNSPECIFIED :: PropertyFilter_Op+pattern PropertyFilter_Op_OPERATORUNSPECIFIED = PropertyFilter_Op "OPERATOR_UNSPECIFIED"++-- | The given @property@ is less than the given @value@. Requires: * That @property@ comes first in @order_by@.+pattern PropertyFilter_Op_LESSTHAN :: PropertyFilter_Op+pattern PropertyFilter_Op_LESSTHAN = PropertyFilter_Op "LESS_THAN"++-- | The given @property@ is less than or equal to the given @value@. Requires: * That @property@ comes first in @order_by@.+pattern PropertyFilter_Op_LESSTHANOREQUAL :: PropertyFilter_Op+pattern PropertyFilter_Op_LESSTHANOREQUAL = PropertyFilter_Op "LESS_THAN_OR_EQUAL"++-- | The given @property@ is greater than the given @value@. Requires: * That @property@ comes first in @order_by@.+pattern PropertyFilter_Op_GREATERTHAN :: PropertyFilter_Op+pattern PropertyFilter_Op_GREATERTHAN = PropertyFilter_Op "GREATER_THAN"++-- | The given @property@ is greater than or equal to the given @value@. Requires: * That @property@ comes first in @order_by@.+pattern PropertyFilter_Op_GREATERTHANOREQUAL :: PropertyFilter_Op+pattern PropertyFilter_Op_GREATERTHANOREQUAL = PropertyFilter_Op "GREATER_THAN_OR_EQUAL"++-- | The given @property@ is equal to the given @value@.+pattern PropertyFilter_Op_Equal :: PropertyFilter_Op+pattern PropertyFilter_Op_Equal = PropertyFilter_Op "EQUAL"++-- | The given @property@ is equal to at least one value in the given array. Requires: * That @value@ is a non-empty @ArrayValue@, subject to disjunction limits. * No @NOT_IN@ is in the same query.+pattern PropertyFilter_Op_IN :: PropertyFilter_Op+pattern PropertyFilter_Op_IN = PropertyFilter_Op "IN"++-- | The given @property@ is not equal to the given @value@. Requires: * No other @NOT_EQUAL@ or @NOT_IN@ is in the same query. * That @property@ comes first in the @order_by@.+pattern PropertyFilter_Op_NOTEQUAL :: PropertyFilter_Op+pattern PropertyFilter_Op_NOTEQUAL = PropertyFilter_Op "NOT_EQUAL"++-- | Limit the result set to the given entity and its descendants. Requires: * That @value@ is an entity key. * All evaluated disjunctions must have the same @HAS_ANCESTOR@ filter.+pattern PropertyFilter_Op_HASANCESTOR :: PropertyFilter_Op+pattern PropertyFilter_Op_HASANCESTOR = PropertyFilter_Op "HAS_ANCESTOR"++-- | The value of the @property@ is not in the given array. Requires: * That @value@ is a non-empty @ArrayValue@ with at most 10 values. * No other @OR@, @IN@, @NOT_IN@, @NOT_EQUAL@ is in the same query. * That @field@ comes first in the @order_by@.+pattern PropertyFilter_Op_NOTIN :: PropertyFilter_Op+pattern PropertyFilter_Op_NOTIN = PropertyFilter_Op "NOT_IN"++{-# COMPLETE+  PropertyFilter_Op_OPERATORUNSPECIFIED,+  PropertyFilter_Op_LESSTHAN,+  PropertyFilter_Op_LESSTHANOREQUAL,+  PropertyFilter_Op_GREATERTHAN,+  PropertyFilter_Op_GREATERTHANOREQUAL,+  PropertyFilter_Op_Equal,+  PropertyFilter_Op_IN,+  PropertyFilter_Op_NOTEQUAL,+  PropertyFilter_Op_HASANCESTOR,+  PropertyFilter_Op_NOTIN,+  PropertyFilter_Op+  #-}++-- | The direction to order by. Defaults to @ASCENDING@.+newtype PropertyOrder_Direction = PropertyOrder_Direction {fromPropertyOrder_Direction :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unspecified. This value must not be used.+pattern PropertyOrder_Direction_DIRECTIONUNSPECIFIED :: PropertyOrder_Direction+pattern PropertyOrder_Direction_DIRECTIONUNSPECIFIED = PropertyOrder_Direction "DIRECTION_UNSPECIFIED"++-- | Ascending.+pattern PropertyOrder_Direction_Ascending :: PropertyOrder_Direction+pattern PropertyOrder_Direction_Ascending = PropertyOrder_Direction "ASCENDING"++-- | Descending.+pattern PropertyOrder_Direction_Descending :: PropertyOrder_Direction+pattern PropertyOrder_Direction_Descending = PropertyOrder_Direction "DESCENDING"++{-# COMPLETE+  PropertyOrder_Direction_DIRECTIONUNSPECIFIED,+  PropertyOrder_Direction_Ascending,+  PropertyOrder_Direction_Descending,+  PropertyOrder_Direction+  #-}++-- | Sets the property to the given server value.+newtype PropertyTransform_SetToServerValue = PropertyTransform_SetToServerValue {fromPropertyTransform_SetToServerValue :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unspecified. This value must not be used.+pattern PropertyTransform_SetToServerValue_SERVERVALUEUNSPECIFIED :: PropertyTransform_SetToServerValue+pattern PropertyTransform_SetToServerValue_SERVERVALUEUNSPECIFIED = PropertyTransform_SetToServerValue "SERVER_VALUE_UNSPECIFIED"++-- | The time at which the server processed the request, with millisecond precision. If used on multiple properties (same or different entities) in a transaction, all the properties will get the same server timestamp.+pattern PropertyTransform_SetToServerValue_REQUESTTIME :: PropertyTransform_SetToServerValue+pattern PropertyTransform_SetToServerValue_REQUESTTIME = PropertyTransform_SetToServerValue "REQUEST_TIME"++{-# COMPLETE+  PropertyTransform_SetToServerValue_SERVERVALUEUNSPECIFIED,+  PropertyTransform_SetToServerValue_REQUESTTIME,+  PropertyTransform_SetToServerValue+  #-}++-- | The result type for every entity in @entity_results@.+newtype QueryResultBatch_EntityResultType = QueryResultBatch_EntityResultType {fromQueryResultBatch_EntityResultType :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unspecified. This value is never used.+pattern QueryResultBatch_EntityResultType_RESULTTYPEUNSPECIFIED :: QueryResultBatch_EntityResultType+pattern QueryResultBatch_EntityResultType_RESULTTYPEUNSPECIFIED = QueryResultBatch_EntityResultType "RESULT_TYPE_UNSPECIFIED"++-- | The key and properties.+pattern QueryResultBatch_EntityResultType_Full :: QueryResultBatch_EntityResultType+pattern QueryResultBatch_EntityResultType_Full = QueryResultBatch_EntityResultType "FULL"++-- | A projected subset of properties. The entity may have no key.+pattern QueryResultBatch_EntityResultType_Projection :: QueryResultBatch_EntityResultType+pattern QueryResultBatch_EntityResultType_Projection = QueryResultBatch_EntityResultType "PROJECTION"++-- | Only the key.+pattern QueryResultBatch_EntityResultType_KEYONLY :: QueryResultBatch_EntityResultType+pattern QueryResultBatch_EntityResultType_KEYONLY = QueryResultBatch_EntityResultType "KEY_ONLY"++{-# COMPLETE+  QueryResultBatch_EntityResultType_RESULTTYPEUNSPECIFIED,+  QueryResultBatch_EntityResultType_Full,+  QueryResultBatch_EntityResultType_Projection,+  QueryResultBatch_EntityResultType_KEYONLY,+  QueryResultBatch_EntityResultType+  #-}++-- | The state of the query after the current batch.+newtype QueryResultBatch_MoreResults = QueryResultBatch_MoreResults {fromQueryResultBatch_MoreResults :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unspecified. This value is never used.+pattern QueryResultBatch_MoreResults_MORERESULTSTYPEUNSPECIFIED :: QueryResultBatch_MoreResults+pattern QueryResultBatch_MoreResults_MORERESULTSTYPEUNSPECIFIED = QueryResultBatch_MoreResults "MORE_RESULTS_TYPE_UNSPECIFIED"++-- | There may be additional batches to fetch from this query.+pattern QueryResultBatch_MoreResults_NOTFINISHED :: QueryResultBatch_MoreResults+pattern QueryResultBatch_MoreResults_NOTFINISHED = QueryResultBatch_MoreResults "NOT_FINISHED"++-- | The query is finished, but there may be more results after the limit.+pattern QueryResultBatch_MoreResults_MORERESULTSAFTERLIMIT :: QueryResultBatch_MoreResults+pattern QueryResultBatch_MoreResults_MORERESULTSAFTERLIMIT = QueryResultBatch_MoreResults "MORE_RESULTS_AFTER_LIMIT"++-- | The query is finished, but there may be more results after the end cursor.+pattern QueryResultBatch_MoreResults_MORERESULTSAFTERCURSOR :: QueryResultBatch_MoreResults+pattern QueryResultBatch_MoreResults_MORERESULTSAFTERCURSOR = QueryResultBatch_MoreResults "MORE_RESULTS_AFTER_CURSOR"++-- | The query is finished, and there are no more results.+pattern QueryResultBatch_MoreResults_NOMORERESULTS :: QueryResultBatch_MoreResults+pattern QueryResultBatch_MoreResults_NOMORERESULTS = QueryResultBatch_MoreResults "NO_MORE_RESULTS"++{-# COMPLETE+  QueryResultBatch_MoreResults_MORERESULTSTYPEUNSPECIFIED,+  QueryResultBatch_MoreResults_NOTFINISHED,+  QueryResultBatch_MoreResults_MORERESULTSAFTERLIMIT,+  QueryResultBatch_MoreResults_MORERESULTSAFTERCURSOR,+  QueryResultBatch_MoreResults_NOMORERESULTS,+  QueryResultBatch_MoreResults+  #-}++-- | The non-transactional read consistency to use.+newtype ReadOptions_ReadConsistency = ReadOptions_ReadConsistency {fromReadOptions_ReadConsistency :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unspecified. This value must not be used.+pattern ReadOptions_ReadConsistency_READCONSISTENCYUNSPECIFIED :: ReadOptions_ReadConsistency+pattern ReadOptions_ReadConsistency_READCONSISTENCYUNSPECIFIED = ReadOptions_ReadConsistency "READ_CONSISTENCY_UNSPECIFIED"++-- | Strong consistency.+pattern ReadOptions_ReadConsistency_Strong :: ReadOptions_ReadConsistency+pattern ReadOptions_ReadConsistency_Strong = ReadOptions_ReadConsistency "STRONG"++-- | Eventual consistency.+pattern ReadOptions_ReadConsistency_Eventual :: ReadOptions_ReadConsistency+pattern ReadOptions_ReadConsistency_Eventual = ReadOptions_ReadConsistency "EVENTUAL"++{-# COMPLETE+  ReadOptions_ReadConsistency_READCONSISTENCYUNSPECIFIED,+  ReadOptions_ReadConsistency_Strong,+  ReadOptions_ReadConsistency_Eventual,+  ReadOptions_ReadConsistency+  #-}++-- | A null value.+newtype Value_NullValue = Value_NullValue {fromValue_NullValue :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Null value.+pattern Value_NullValue_NULLVALUE :: Value_NullValue+pattern Value_NullValue_NULLVALUE = Value_NullValue "NULL_VALUE"++{-# COMPLETE+  Value_NullValue_NULLVALUE,+  Value_NullValue+  #-}
+ gen/Gogol/Datastore/Projects/AllocateIds.hs view
@@ -0,0 +1,117 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Datastore.Projects.AllocateIds+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Allocates IDs for the given keys, which is useful for referencing an entity before it is inserted.+--+-- /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.allocateIds@.+module Gogol.Datastore.Projects.AllocateIds+  ( -- * Resource+    DatastoreProjectsAllocateIdsResource,++    -- ** Constructing a Request+    DatastoreProjectsAllocateIds (..),+    newDatastoreProjectsAllocateIds,+  )+where++import Gogol.Datastore.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @datastore.projects.allocateIds@ method which the+-- 'DatastoreProjectsAllocateIds' request conforms to.+type DatastoreProjectsAllocateIdsResource =+  "v1"+    Core.:> "projects"+    Core.:> Core.CaptureMode "projectId" "allocateIds" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] AllocateIdsRequest+    Core.:> Core.Post '[Core.JSON] AllocateIdsResponse++-- | Allocates IDs for the given keys, which is useful for referencing an entity before it is inserted.+--+-- /See:/ 'newDatastoreProjectsAllocateIds' smart constructor.+data DatastoreProjectsAllocateIds = DatastoreProjectsAllocateIds+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: AllocateIdsRequest,+    -- | Required. The ID of the project against which to make the request.+    projectId :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DatastoreProjectsAllocateIds' with the minimum fields required to make a request.+newDatastoreProjectsAllocateIds ::+  -- |  Multipart request metadata. See 'payload'.+  AllocateIdsRequest ->+  -- |  Required. The ID of the project against which to make the request. See 'projectId'.+  Core.Text ->+  DatastoreProjectsAllocateIds+newDatastoreProjectsAllocateIds payload projectId =+  DatastoreProjectsAllocateIds+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      payload = payload,+      projectId = projectId,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DatastoreProjectsAllocateIds where+  type Rs DatastoreProjectsAllocateIds = AllocateIdsResponse+  type+    Scopes DatastoreProjectsAllocateIds =+      '[CloudPlatform'FullControl, Datastore'FullControl]+  requestClient DatastoreProjectsAllocateIds {..} =+    go+      projectId+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      datastoreService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy DatastoreProjectsAllocateIdsResource)+          Core.mempty
+ gen/Gogol/Datastore/Projects/BeginTransaction.hs view
@@ -0,0 +1,121 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Datastore.Projects.BeginTransaction+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Begins a new transaction.+--+-- /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.beginTransaction@.+module Gogol.Datastore.Projects.BeginTransaction+  ( -- * Resource+    DatastoreProjectsBeginTransactionResource,++    -- ** Constructing a Request+    DatastoreProjectsBeginTransaction (..),+    newDatastoreProjectsBeginTransaction,+  )+where++import Gogol.Datastore.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @datastore.projects.beginTransaction@ method which the+-- 'DatastoreProjectsBeginTransaction' request conforms to.+type DatastoreProjectsBeginTransactionResource =+  "v1"+    Core.:> "projects"+    Core.:> Core.CaptureMode "projectId" "beginTransaction" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] BeginTransactionRequest+    Core.:> Core.Post '[Core.JSON] BeginTransactionResponse++-- | Begins a new transaction.+--+-- /See:/ 'newDatastoreProjectsBeginTransaction' smart constructor.+data DatastoreProjectsBeginTransaction = DatastoreProjectsBeginTransaction+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: BeginTransactionRequest,+    -- | Required. The ID of the project against which to make the request.+    projectId :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DatastoreProjectsBeginTransaction' with the minimum fields required to make a request.+newDatastoreProjectsBeginTransaction ::+  -- |  Multipart request metadata. See 'payload'.+  BeginTransactionRequest ->+  -- |  Required. The ID of the project against which to make the request. See 'projectId'.+  Core.Text ->+  DatastoreProjectsBeginTransaction+newDatastoreProjectsBeginTransaction payload projectId =+  DatastoreProjectsBeginTransaction+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      payload = payload,+      projectId = projectId,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DatastoreProjectsBeginTransaction where+  type+    Rs DatastoreProjectsBeginTransaction =+      BeginTransactionResponse+  type+    Scopes DatastoreProjectsBeginTransaction =+      '[CloudPlatform'FullControl, Datastore'FullControl]+  requestClient DatastoreProjectsBeginTransaction {..} =+    go+      projectId+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      datastoreService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy DatastoreProjectsBeginTransactionResource+          )+          Core.mempty
+ gen/Gogol/Datastore/Projects/Commit.hs view
@@ -0,0 +1,117 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Datastore.Projects.Commit+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Commits a transaction, optionally creating, deleting or modifying some entities.+--+-- /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.commit@.+module Gogol.Datastore.Projects.Commit+  ( -- * Resource+    DatastoreProjectsCommitResource,++    -- ** Constructing a Request+    DatastoreProjectsCommit (..),+    newDatastoreProjectsCommit,+  )+where++import Gogol.Datastore.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @datastore.projects.commit@ method which the+-- 'DatastoreProjectsCommit' request conforms to.+type DatastoreProjectsCommitResource =+  "v1"+    Core.:> "projects"+    Core.:> Core.CaptureMode "projectId" "commit" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] CommitRequest+    Core.:> Core.Post '[Core.JSON] CommitResponse++-- | Commits a transaction, optionally creating, deleting or modifying some entities.+--+-- /See:/ 'newDatastoreProjectsCommit' smart constructor.+data DatastoreProjectsCommit = DatastoreProjectsCommit+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: CommitRequest,+    -- | Required. The ID of the project against which to make the request.+    projectId :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DatastoreProjectsCommit' with the minimum fields required to make a request.+newDatastoreProjectsCommit ::+  -- |  Multipart request metadata. See 'payload'.+  CommitRequest ->+  -- |  Required. The ID of the project against which to make the request. See 'projectId'.+  Core.Text ->+  DatastoreProjectsCommit+newDatastoreProjectsCommit payload projectId =+  DatastoreProjectsCommit+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      payload = payload,+      projectId = projectId,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DatastoreProjectsCommit where+  type Rs DatastoreProjectsCommit = CommitResponse+  type+    Scopes DatastoreProjectsCommit =+      '[CloudPlatform'FullControl, Datastore'FullControl]+  requestClient DatastoreProjectsCommit {..} =+    go+      projectId+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      datastoreService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy DatastoreProjectsCommitResource)+          Core.mempty
+ gen/Gogol/Datastore/Projects/Export.hs view
@@ -0,0 +1,119 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Datastore.Projects.Export+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Exports a copy of all or a subset of entities from Google Cloud Datastore to another storage system, such as Google Cloud Storage. Recent updates to entities may not be reflected in the export. The export occurs in the background and its progress can be monitored and managed via the Operation resource that is created. The output of an export may only be used once the associated operation is done. If an export operation is cancelled before completion it may leave partial data behind in Google Cloud Storage.+--+-- /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.export@.+module Gogol.Datastore.Projects.Export+  ( -- * Resource+    DatastoreProjectsExportResource,++    -- ** Constructing a Request+    DatastoreProjectsExport (..),+    newDatastoreProjectsExport,+  )+where++import Gogol.Datastore.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @datastore.projects.export@ method which the+-- 'DatastoreProjectsExport' request conforms to.+type DatastoreProjectsExportResource =+  "v1"+    Core.:> "projects"+    Core.:> Core.CaptureMode "projectId" "export" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody+              '[Core.JSON]+              GoogleDatastoreAdminV1ExportEntitiesRequest+    Core.:> Core.Post '[Core.JSON] GoogleLongrunningOperation++-- | Exports a copy of all or a subset of entities from Google Cloud Datastore to another storage system, such as Google Cloud Storage. Recent updates to entities may not be reflected in the export. The export occurs in the background and its progress can be monitored and managed via the Operation resource that is created. The output of an export may only be used once the associated operation is done. If an export operation is cancelled before completion it may leave partial data behind in Google Cloud Storage.+--+-- /See:/ 'newDatastoreProjectsExport' smart constructor.+data DatastoreProjectsExport = DatastoreProjectsExport+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: GoogleDatastoreAdminV1ExportEntitiesRequest,+    -- | Required. Project ID against which to make the request.+    projectId :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DatastoreProjectsExport' with the minimum fields required to make a request.+newDatastoreProjectsExport ::+  -- |  Multipart request metadata. See 'payload'.+  GoogleDatastoreAdminV1ExportEntitiesRequest ->+  -- |  Required. Project ID against which to make the request. See 'projectId'.+  Core.Text ->+  DatastoreProjectsExport+newDatastoreProjectsExport payload projectId =+  DatastoreProjectsExport+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      payload = payload,+      projectId = projectId,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DatastoreProjectsExport where+  type Rs DatastoreProjectsExport = GoogleLongrunningOperation+  type+    Scopes DatastoreProjectsExport =+      '[CloudPlatform'FullControl, Datastore'FullControl]+  requestClient DatastoreProjectsExport {..} =+    go+      projectId+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      datastoreService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy DatastoreProjectsExportResource)+          Core.mempty
+ gen/Gogol/Datastore/Projects/Import.hs view
@@ -0,0 +1,119 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Datastore.Projects.Import+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Imports entities into Google Cloud Datastore. Existing entities with the same key are overwritten. The import occurs in the background and its progress can be monitored and managed via the Operation resource that is created. If an ImportEntities operation is cancelled, it is possible that a subset of the data has already been imported to Cloud Datastore.+--+-- /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.import@.+module Gogol.Datastore.Projects.Import+  ( -- * Resource+    DatastoreProjectsImportResource,++    -- ** Constructing a Request+    DatastoreProjectsImport (..),+    newDatastoreProjectsImport,+  )+where++import Gogol.Datastore.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @datastore.projects.import@ method which the+-- 'DatastoreProjectsImport' request conforms to.+type DatastoreProjectsImportResource =+  "v1"+    Core.:> "projects"+    Core.:> Core.CaptureMode "projectId" "import" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody+              '[Core.JSON]+              GoogleDatastoreAdminV1ImportEntitiesRequest+    Core.:> Core.Post '[Core.JSON] GoogleLongrunningOperation++-- | Imports entities into Google Cloud Datastore. Existing entities with the same key are overwritten. The import occurs in the background and its progress can be monitored and managed via the Operation resource that is created. If an ImportEntities operation is cancelled, it is possible that a subset of the data has already been imported to Cloud Datastore.+--+-- /See:/ 'newDatastoreProjectsImport' smart constructor.+data DatastoreProjectsImport = DatastoreProjectsImport+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: GoogleDatastoreAdminV1ImportEntitiesRequest,+    -- | Required. Project ID against which to make the request.+    projectId :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DatastoreProjectsImport' with the minimum fields required to make a request.+newDatastoreProjectsImport ::+  -- |  Multipart request metadata. See 'payload'.+  GoogleDatastoreAdminV1ImportEntitiesRequest ->+  -- |  Required. Project ID against which to make the request. See 'projectId'.+  Core.Text ->+  DatastoreProjectsImport+newDatastoreProjectsImport payload projectId =+  DatastoreProjectsImport+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      payload = payload,+      projectId = projectId,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DatastoreProjectsImport where+  type Rs DatastoreProjectsImport = GoogleLongrunningOperation+  type+    Scopes DatastoreProjectsImport =+      '[CloudPlatform'FullControl, Datastore'FullControl]+  requestClient DatastoreProjectsImport {..} =+    go+      projectId+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      datastoreService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy DatastoreProjectsImportResource)+          Core.mempty
+ gen/Gogol/Datastore/Projects/Indexes/Create.hs view
@@ -0,0 +1,118 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Datastore.Projects.Indexes.Create+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates the specified index. A newly created index\'s initial state is @CREATING@. On completion of the returned google.longrunning.Operation, the state will be @READY@. If the index already exists, the call will return an @ALREADY_EXISTS@ status. During index creation, the process could result in an error, in which case the index will move to the @ERROR@ state. The process can be recovered by fixing the data that caused the error, removing the index with delete, then re-creating the index with create. Indexes with a single property cannot be created.+--+-- /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.indexes.create@.+module Gogol.Datastore.Projects.Indexes.Create+  ( -- * Resource+    DatastoreProjectsIndexesCreateResource,++    -- ** Constructing a Request+    DatastoreProjectsIndexesCreate (..),+    newDatastoreProjectsIndexesCreate,+  )+where++import Gogol.Datastore.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @datastore.projects.indexes.create@ method which the+-- 'DatastoreProjectsIndexesCreate' request conforms to.+type DatastoreProjectsIndexesCreateResource =+  "v1"+    Core.:> "projects"+    Core.:> Core.Capture "projectId" Core.Text+    Core.:> "indexes"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] GoogleDatastoreAdminV1Index+    Core.:> Core.Post '[Core.JSON] GoogleLongrunningOperation++-- | Creates the specified index. A newly created index\'s initial state is @CREATING@. On completion of the returned google.longrunning.Operation, the state will be @READY@. If the index already exists, the call will return an @ALREADY_EXISTS@ status. During index creation, the process could result in an error, in which case the index will move to the @ERROR@ state. The process can be recovered by fixing the data that caused the error, removing the index with delete, then re-creating the index with create. Indexes with a single property cannot be created.+--+-- /See:/ 'newDatastoreProjectsIndexesCreate' smart constructor.+data DatastoreProjectsIndexesCreate = DatastoreProjectsIndexesCreate+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: GoogleDatastoreAdminV1Index,+    -- | Project ID against which to make the request.+    projectId :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DatastoreProjectsIndexesCreate' with the minimum fields required to make a request.+newDatastoreProjectsIndexesCreate ::+  -- |  Multipart request metadata. See 'payload'.+  GoogleDatastoreAdminV1Index ->+  -- |  Project ID against which to make the request. See 'projectId'.+  Core.Text ->+  DatastoreProjectsIndexesCreate+newDatastoreProjectsIndexesCreate payload projectId =+  DatastoreProjectsIndexesCreate+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      payload = payload,+      projectId = projectId,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DatastoreProjectsIndexesCreate where+  type Rs DatastoreProjectsIndexesCreate = GoogleLongrunningOperation+  type+    Scopes DatastoreProjectsIndexesCreate =+      '[CloudPlatform'FullControl, Datastore'FullControl]+  requestClient DatastoreProjectsIndexesCreate {..} =+    go+      projectId+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      datastoreService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy DatastoreProjectsIndexesCreateResource)+          Core.mempty
+ gen/Gogol/Datastore/Projects/Indexes/Delete.hs view
@@ -0,0 +1,118 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Datastore.Projects.Indexes.Delete+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes an existing index. An index can only be deleted if it is in a @READY@ or @ERROR@ state. On successful execution of the request, the index will be in a @DELETING@ state. And on completion of the returned google.longrunning.Operation, the index will be removed. During index deletion, the process could result in an error, in which case the index will move to the @ERROR@ state. The process can be recovered by fixing the data that caused the error, followed by calling delete again.+--+-- /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.indexes.delete@.+module Gogol.Datastore.Projects.Indexes.Delete+  ( -- * Resource+    DatastoreProjectsIndexesDeleteResource,++    -- ** Constructing a Request+    DatastoreProjectsIndexesDelete (..),+    newDatastoreProjectsIndexesDelete,+  )+where++import Gogol.Datastore.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @datastore.projects.indexes.delete@ method which the+-- 'DatastoreProjectsIndexesDelete' request conforms to.+type DatastoreProjectsIndexesDeleteResource =+  "v1"+    Core.:> "projects"+    Core.:> Core.Capture "projectId" Core.Text+    Core.:> "indexes"+    Core.:> Core.Capture "indexId" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Delete '[Core.JSON] GoogleLongrunningOperation++-- | Deletes an existing index. An index can only be deleted if it is in a @READY@ or @ERROR@ state. On successful execution of the request, the index will be in a @DELETING@ state. And on completion of the returned google.longrunning.Operation, the index will be removed. During index deletion, the process could result in an error, in which case the index will move to the @ERROR@ state. The process can be recovered by fixing the data that caused the error, followed by calling delete again.+--+-- /See:/ 'newDatastoreProjectsIndexesDelete' smart constructor.+data DatastoreProjectsIndexesDelete = DatastoreProjectsIndexesDelete+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The resource ID of the index to delete.+    indexId :: Core.Text,+    -- | Project ID against which to make the request.+    projectId :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DatastoreProjectsIndexesDelete' with the minimum fields required to make a request.+newDatastoreProjectsIndexesDelete ::+  -- |  The resource ID of the index to delete. See 'indexId'.+  Core.Text ->+  -- |  Project ID against which to make the request. See 'projectId'.+  Core.Text ->+  DatastoreProjectsIndexesDelete+newDatastoreProjectsIndexesDelete indexId projectId =+  DatastoreProjectsIndexesDelete+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      indexId = indexId,+      projectId = projectId,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DatastoreProjectsIndexesDelete where+  type Rs DatastoreProjectsIndexesDelete = GoogleLongrunningOperation+  type+    Scopes DatastoreProjectsIndexesDelete =+      '[CloudPlatform'FullControl, Datastore'FullControl]+  requestClient DatastoreProjectsIndexesDelete {..} =+    go+      projectId+      indexId+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      datastoreService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy DatastoreProjectsIndexesDeleteResource)+          Core.mempty
+ gen/Gogol/Datastore/Projects/Indexes/Get.hs view
@@ -0,0 +1,118 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Datastore.Projects.Indexes.Get+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Gets an index.+--+-- /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.indexes.get@.+module Gogol.Datastore.Projects.Indexes.Get+  ( -- * Resource+    DatastoreProjectsIndexesGetResource,++    -- ** Constructing a Request+    DatastoreProjectsIndexesGet (..),+    newDatastoreProjectsIndexesGet,+  )+where++import Gogol.Datastore.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @datastore.projects.indexes.get@ method which the+-- 'DatastoreProjectsIndexesGet' request conforms to.+type DatastoreProjectsIndexesGetResource =+  "v1"+    Core.:> "projects"+    Core.:> Core.Capture "projectId" Core.Text+    Core.:> "indexes"+    Core.:> Core.Capture "indexId" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] GoogleDatastoreAdminV1Index++-- | Gets an index.+--+-- /See:/ 'newDatastoreProjectsIndexesGet' smart constructor.+data DatastoreProjectsIndexesGet = DatastoreProjectsIndexesGet+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The resource ID of the index to get.+    indexId :: Core.Text,+    -- | Project ID against which to make the request.+    projectId :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DatastoreProjectsIndexesGet' with the minimum fields required to make a request.+newDatastoreProjectsIndexesGet ::+  -- |  The resource ID of the index to get. See 'indexId'.+  Core.Text ->+  -- |  Project ID against which to make the request. See 'projectId'.+  Core.Text ->+  DatastoreProjectsIndexesGet+newDatastoreProjectsIndexesGet indexId projectId =+  DatastoreProjectsIndexesGet+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      indexId = indexId,+      projectId = projectId,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DatastoreProjectsIndexesGet where+  type Rs DatastoreProjectsIndexesGet = GoogleDatastoreAdminV1Index+  type+    Scopes DatastoreProjectsIndexesGet =+      '[CloudPlatform'FullControl, Datastore'FullControl]+  requestClient DatastoreProjectsIndexesGet {..} =+    go+      projectId+      indexId+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      datastoreService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy DatastoreProjectsIndexesGetResource)+          Core.mempty
+ gen/Gogol/Datastore/Projects/Indexes/List.hs view
@@ -0,0 +1,127 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Datastore.Projects.Indexes.List+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists the indexes that match the specified filters. Datastore uses an eventually consistent query to fetch the list of indexes and may occasionally return stale results.+--+-- /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.indexes.list@.+module Gogol.Datastore.Projects.Indexes.List+  ( -- * Resource+    DatastoreProjectsIndexesListResource,++    -- ** Constructing a Request+    DatastoreProjectsIndexesList (..),+    newDatastoreProjectsIndexesList,+  )+where++import Gogol.Datastore.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @datastore.projects.indexes.list@ method which the+-- 'DatastoreProjectsIndexesList' request conforms to.+type DatastoreProjectsIndexesListResource =+  "v1"+    Core.:> "projects"+    Core.:> Core.Capture "projectId" Core.Text+    Core.:> "indexes"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "filter" Core.Text+    Core.:> Core.QueryParam "pageSize" Core.Int32+    Core.:> Core.QueryParam "pageToken" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] GoogleDatastoreAdminV1ListIndexesResponse++-- | Lists the indexes that match the specified filters. Datastore uses an eventually consistent query to fetch the list of indexes and may occasionally return stale results.+--+-- /See:/ 'newDatastoreProjectsIndexesList' smart constructor.+data DatastoreProjectsIndexesList = DatastoreProjectsIndexesList+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    filter :: (Core.Maybe Core.Text),+    -- | The maximum number of items to return. If zero, then all results will be returned.+    pageSize :: (Core.Maybe Core.Int32),+    -- | The next/page/token value returned from a previous List request, if any.+    pageToken :: (Core.Maybe Core.Text),+    -- | Project ID against which to make the request.+    projectId :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DatastoreProjectsIndexesList' with the minimum fields required to make a request.+newDatastoreProjectsIndexesList ::+  -- |  Project ID against which to make the request. See 'projectId'.+  Core.Text ->+  DatastoreProjectsIndexesList+newDatastoreProjectsIndexesList projectId =+  DatastoreProjectsIndexesList+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      filter = Core.Nothing,+      pageSize = Core.Nothing,+      pageToken = Core.Nothing,+      projectId = projectId,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DatastoreProjectsIndexesList where+  type+    Rs DatastoreProjectsIndexesList =+      GoogleDatastoreAdminV1ListIndexesResponse+  type+    Scopes DatastoreProjectsIndexesList =+      '[CloudPlatform'FullControl, Datastore'FullControl]+  requestClient DatastoreProjectsIndexesList {..} =+    go+      projectId+      xgafv+      accessToken+      callback+      filter+      pageSize+      pageToken+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      datastoreService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy DatastoreProjectsIndexesListResource)+          Core.mempty
+ gen/Gogol/Datastore/Projects/Lookup.hs view
@@ -0,0 +1,117 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Datastore.Projects.Lookup+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Looks up entities by key.+--+-- /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.lookup@.+module Gogol.Datastore.Projects.Lookup+  ( -- * Resource+    DatastoreProjectsLookupResource,++    -- ** Constructing a Request+    DatastoreProjectsLookup (..),+    newDatastoreProjectsLookup,+  )+where++import Gogol.Datastore.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @datastore.projects.lookup@ method which the+-- 'DatastoreProjectsLookup' request conforms to.+type DatastoreProjectsLookupResource =+  "v1"+    Core.:> "projects"+    Core.:> Core.CaptureMode "projectId" "lookup" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] LookupRequest+    Core.:> Core.Post '[Core.JSON] LookupResponse++-- | Looks up entities by key.+--+-- /See:/ 'newDatastoreProjectsLookup' smart constructor.+data DatastoreProjectsLookup = DatastoreProjectsLookup+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: LookupRequest,+    -- | Required. The ID of the project against which to make the request.+    projectId :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DatastoreProjectsLookup' with the minimum fields required to make a request.+newDatastoreProjectsLookup ::+  -- |  Multipart request metadata. See 'payload'.+  LookupRequest ->+  -- |  Required. The ID of the project against which to make the request. See 'projectId'.+  Core.Text ->+  DatastoreProjectsLookup+newDatastoreProjectsLookup payload projectId =+  DatastoreProjectsLookup+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      payload = payload,+      projectId = projectId,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DatastoreProjectsLookup where+  type Rs DatastoreProjectsLookup = LookupResponse+  type+    Scopes DatastoreProjectsLookup =+      '[CloudPlatform'FullControl, Datastore'FullControl]+  requestClient DatastoreProjectsLookup {..} =+    go+      projectId+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      datastoreService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy DatastoreProjectsLookupResource)+          Core.mempty
+ gen/Gogol/Datastore/Projects/Operations/Cancel.hs view
@@ -0,0 +1,111 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Datastore.Projects.Operations.Cancel+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Starts asynchronous cancellation on a long-running operation. The server makes a best effort to cancel the operation, but success is not guaranteed. If the server doesn\'t support this method, it returns @google.rpc.Code.UNIMPLEMENTED@. Clients can use Operations.GetOperation or other methods to check whether the cancellation succeeded or whether the operation completed despite cancellation. On successful cancellation, the operation is not deleted; instead, it becomes an operation with an Operation.error value with a google.rpc.Status.code of @1@, corresponding to @Code.CANCELLED@.+--+-- /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.operations.cancel@.+module Gogol.Datastore.Projects.Operations.Cancel+  ( -- * Resource+    DatastoreProjectsOperationsCancelResource,++    -- ** Constructing a Request+    DatastoreProjectsOperationsCancel (..),+    newDatastoreProjectsOperationsCancel,+  )+where++import Gogol.Datastore.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @datastore.projects.operations.cancel@ method which the+-- 'DatastoreProjectsOperationsCancel' request conforms to.+type DatastoreProjectsOperationsCancelResource =+  "v1"+    Core.:> Core.CaptureMode "name" "cancel" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Post '[Core.JSON] Empty++-- | Starts asynchronous cancellation on a long-running operation. The server makes a best effort to cancel the operation, but success is not guaranteed. If the server doesn\'t support this method, it returns @google.rpc.Code.UNIMPLEMENTED@. Clients can use Operations.GetOperation or other methods to check whether the cancellation succeeded or whether the operation completed despite cancellation. On successful cancellation, the operation is not deleted; instead, it becomes an operation with an Operation.error value with a google.rpc.Status.code of @1@, corresponding to @Code.CANCELLED@.+--+-- /See:/ 'newDatastoreProjectsOperationsCancel' smart constructor.+data DatastoreProjectsOperationsCancel = DatastoreProjectsOperationsCancel+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The name of the operation resource to be cancelled.+    name :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DatastoreProjectsOperationsCancel' with the minimum fields required to make a request.+newDatastoreProjectsOperationsCancel ::+  -- |  The name of the operation resource to be cancelled. See 'name'.+  Core.Text ->+  DatastoreProjectsOperationsCancel+newDatastoreProjectsOperationsCancel name =+  DatastoreProjectsOperationsCancel+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      name = name,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DatastoreProjectsOperationsCancel where+  type Rs DatastoreProjectsOperationsCancel = Empty+  type+    Scopes DatastoreProjectsOperationsCancel =+      '[CloudPlatform'FullControl, Datastore'FullControl]+  requestClient DatastoreProjectsOperationsCancel {..} =+    go+      name+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      datastoreService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy DatastoreProjectsOperationsCancelResource+          )+          Core.mempty
+ gen/Gogol/Datastore/Projects/Operations/Delete.hs view
@@ -0,0 +1,111 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Datastore.Projects.Operations.Delete+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes a long-running operation. This method indicates that the client is no longer interested in the operation result. It does not cancel the operation. If the server doesn\'t support this method, it returns @google.rpc.Code.UNIMPLEMENTED@.+--+-- /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.operations.delete@.+module Gogol.Datastore.Projects.Operations.Delete+  ( -- * Resource+    DatastoreProjectsOperationsDeleteResource,++    -- ** Constructing a Request+    DatastoreProjectsOperationsDelete (..),+    newDatastoreProjectsOperationsDelete,+  )+where++import Gogol.Datastore.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @datastore.projects.operations.delete@ method which the+-- 'DatastoreProjectsOperationsDelete' request conforms to.+type DatastoreProjectsOperationsDeleteResource =+  "v1"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Delete '[Core.JSON] Empty++-- | Deletes a long-running operation. This method indicates that the client is no longer interested in the operation result. It does not cancel the operation. If the server doesn\'t support this method, it returns @google.rpc.Code.UNIMPLEMENTED@.+--+-- /See:/ 'newDatastoreProjectsOperationsDelete' smart constructor.+data DatastoreProjectsOperationsDelete = DatastoreProjectsOperationsDelete+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The name of the operation resource to be deleted.+    name :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DatastoreProjectsOperationsDelete' with the minimum fields required to make a request.+newDatastoreProjectsOperationsDelete ::+  -- |  The name of the operation resource to be deleted. See 'name'.+  Core.Text ->+  DatastoreProjectsOperationsDelete+newDatastoreProjectsOperationsDelete name =+  DatastoreProjectsOperationsDelete+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      name = name,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DatastoreProjectsOperationsDelete where+  type Rs DatastoreProjectsOperationsDelete = Empty+  type+    Scopes DatastoreProjectsOperationsDelete =+      '[CloudPlatform'FullControl, Datastore'FullControl]+  requestClient DatastoreProjectsOperationsDelete {..} =+    go+      name+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      datastoreService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy DatastoreProjectsOperationsDeleteResource+          )+          Core.mempty
+ gen/Gogol/Datastore/Projects/Operations/Get.hs view
@@ -0,0 +1,109 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Datastore.Projects.Operations.Get+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Gets the latest state of a long-running operation. Clients can use this method to poll the operation result at intervals as recommended by the API service.+--+-- /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.operations.get@.+module Gogol.Datastore.Projects.Operations.Get+  ( -- * Resource+    DatastoreProjectsOperationsGetResource,++    -- ** Constructing a Request+    DatastoreProjectsOperationsGet (..),+    newDatastoreProjectsOperationsGet,+  )+where++import Gogol.Datastore.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @datastore.projects.operations.get@ method which the+-- 'DatastoreProjectsOperationsGet' request conforms to.+type DatastoreProjectsOperationsGetResource =+  "v1"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] GoogleLongrunningOperation++-- | Gets the latest state of a long-running operation. Clients can use this method to poll the operation result at intervals as recommended by the API service.+--+-- /See:/ 'newDatastoreProjectsOperationsGet' smart constructor.+data DatastoreProjectsOperationsGet = DatastoreProjectsOperationsGet+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The name of the operation resource.+    name :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DatastoreProjectsOperationsGet' with the minimum fields required to make a request.+newDatastoreProjectsOperationsGet ::+  -- |  The name of the operation resource. See 'name'.+  Core.Text ->+  DatastoreProjectsOperationsGet+newDatastoreProjectsOperationsGet name =+  DatastoreProjectsOperationsGet+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      name = name,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DatastoreProjectsOperationsGet where+  type Rs DatastoreProjectsOperationsGet = GoogleLongrunningOperation+  type+    Scopes DatastoreProjectsOperationsGet =+      '[CloudPlatform'FullControl, Datastore'FullControl]+  requestClient DatastoreProjectsOperationsGet {..} =+    go+      name+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      datastoreService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy DatastoreProjectsOperationsGetResource)+          Core.mempty
+ gen/Gogol/Datastore/Projects/Operations/List.hs view
@@ -0,0 +1,127 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Datastore.Projects.Operations.List+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists operations that match the specified filter in the request. If the server doesn\'t support this method, it returns @UNIMPLEMENTED@.+--+-- /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.operations.list@.+module Gogol.Datastore.Projects.Operations.List+  ( -- * Resource+    DatastoreProjectsOperationsListResource,++    -- ** Constructing a Request+    DatastoreProjectsOperationsList (..),+    newDatastoreProjectsOperationsList,+  )+where++import Gogol.Datastore.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @datastore.projects.operations.list@ method which the+-- 'DatastoreProjectsOperationsList' request conforms to.+type DatastoreProjectsOperationsListResource =+  "v1"+    Core.:> Core.Capture "name" Core.Text+    Core.:> "operations"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "filter" Core.Text+    Core.:> Core.QueryParam "pageSize" Core.Int32+    Core.:> Core.QueryParam "pageToken" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] GoogleLongrunningListOperationsResponse++-- | Lists operations that match the specified filter in the request. If the server doesn\'t support this method, it returns @UNIMPLEMENTED@.+--+-- /See:/ 'newDatastoreProjectsOperationsList' smart constructor.+data DatastoreProjectsOperationsList = DatastoreProjectsOperationsList+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The standard list filter.+    filter :: (Core.Maybe Core.Text),+    -- | The name of the operation\'s parent resource.+    name :: Core.Text,+    -- | The standard list page size.+    pageSize :: (Core.Maybe Core.Int32),+    -- | The standard list page token.+    pageToken :: (Core.Maybe Core.Text),+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DatastoreProjectsOperationsList' with the minimum fields required to make a request.+newDatastoreProjectsOperationsList ::+  -- |  The name of the operation\'s parent resource. See 'name'.+  Core.Text ->+  DatastoreProjectsOperationsList+newDatastoreProjectsOperationsList name =+  DatastoreProjectsOperationsList+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      filter = Core.Nothing,+      name = name,+      pageSize = Core.Nothing,+      pageToken = Core.Nothing,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DatastoreProjectsOperationsList where+  type+    Rs DatastoreProjectsOperationsList =+      GoogleLongrunningListOperationsResponse+  type+    Scopes DatastoreProjectsOperationsList =+      '[CloudPlatform'FullControl, Datastore'FullControl]+  requestClient DatastoreProjectsOperationsList {..} =+    go+      name+      xgafv+      accessToken+      callback+      filter+      pageSize+      pageToken+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      datastoreService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy DatastoreProjectsOperationsListResource)+          Core.mempty
+ gen/Gogol/Datastore/Projects/ReserveIds.hs view
@@ -0,0 +1,117 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Datastore.Projects.ReserveIds+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Prevents the supplied keys\' IDs from being auto-allocated by Cloud Datastore.+--+-- /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.reserveIds@.+module Gogol.Datastore.Projects.ReserveIds+  ( -- * Resource+    DatastoreProjectsReserveIdsResource,++    -- ** Constructing a Request+    DatastoreProjectsReserveIds (..),+    newDatastoreProjectsReserveIds,+  )+where++import Gogol.Datastore.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @datastore.projects.reserveIds@ method which the+-- 'DatastoreProjectsReserveIds' request conforms to.+type DatastoreProjectsReserveIdsResource =+  "v1"+    Core.:> "projects"+    Core.:> Core.CaptureMode "projectId" "reserveIds" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] ReserveIdsRequest+    Core.:> Core.Post '[Core.JSON] ReserveIdsResponse++-- | Prevents the supplied keys\' IDs from being auto-allocated by Cloud Datastore.+--+-- /See:/ 'newDatastoreProjectsReserveIds' smart constructor.+data DatastoreProjectsReserveIds = DatastoreProjectsReserveIds+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: ReserveIdsRequest,+    -- | Required. The ID of the project against which to make the request.+    projectId :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DatastoreProjectsReserveIds' with the minimum fields required to make a request.+newDatastoreProjectsReserveIds ::+  -- |  Multipart request metadata. See 'payload'.+  ReserveIdsRequest ->+  -- |  Required. The ID of the project against which to make the request. See 'projectId'.+  Core.Text ->+  DatastoreProjectsReserveIds+newDatastoreProjectsReserveIds payload projectId =+  DatastoreProjectsReserveIds+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      payload = payload,+      projectId = projectId,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DatastoreProjectsReserveIds where+  type Rs DatastoreProjectsReserveIds = ReserveIdsResponse+  type+    Scopes DatastoreProjectsReserveIds =+      '[CloudPlatform'FullControl, Datastore'FullControl]+  requestClient DatastoreProjectsReserveIds {..} =+    go+      projectId+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      datastoreService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy DatastoreProjectsReserveIdsResource)+          Core.mempty
+ gen/Gogol/Datastore/Projects/Rollback.hs view
@@ -0,0 +1,117 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Datastore.Projects.Rollback+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Rolls back a transaction.+--+-- /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.rollback@.+module Gogol.Datastore.Projects.Rollback+  ( -- * Resource+    DatastoreProjectsRollbackResource,++    -- ** Constructing a Request+    DatastoreProjectsRollback (..),+    newDatastoreProjectsRollback,+  )+where++import Gogol.Datastore.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @datastore.projects.rollback@ method which the+-- 'DatastoreProjectsRollback' request conforms to.+type DatastoreProjectsRollbackResource =+  "v1"+    Core.:> "projects"+    Core.:> Core.CaptureMode "projectId" "rollback" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] RollbackRequest+    Core.:> Core.Post '[Core.JSON] RollbackResponse++-- | Rolls back a transaction.+--+-- /See:/ 'newDatastoreProjectsRollback' smart constructor.+data DatastoreProjectsRollback = DatastoreProjectsRollback+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: RollbackRequest,+    -- | Required. The ID of the project against which to make the request.+    projectId :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DatastoreProjectsRollback' with the minimum fields required to make a request.+newDatastoreProjectsRollback ::+  -- |  Multipart request metadata. See 'payload'.+  RollbackRequest ->+  -- |  Required. The ID of the project against which to make the request. See 'projectId'.+  Core.Text ->+  DatastoreProjectsRollback+newDatastoreProjectsRollback payload projectId =+  DatastoreProjectsRollback+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      payload = payload,+      projectId = projectId,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DatastoreProjectsRollback where+  type Rs DatastoreProjectsRollback = RollbackResponse+  type+    Scopes DatastoreProjectsRollback =+      '[CloudPlatform'FullControl, Datastore'FullControl]+  requestClient DatastoreProjectsRollback {..} =+    go+      projectId+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      datastoreService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy DatastoreProjectsRollbackResource)+          Core.mempty
+ gen/Gogol/Datastore/Projects/RunAggregationQuery.hs view
@@ -0,0 +1,121 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Datastore.Projects.RunAggregationQuery+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Runs an aggregation query.+--+-- /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.runAggregationQuery@.+module Gogol.Datastore.Projects.RunAggregationQuery+  ( -- * Resource+    DatastoreProjectsRunAggregationQueryResource,++    -- ** Constructing a Request+    DatastoreProjectsRunAggregationQuery (..),+    newDatastoreProjectsRunAggregationQuery,+  )+where++import Gogol.Datastore.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @datastore.projects.runAggregationQuery@ method which the+-- 'DatastoreProjectsRunAggregationQuery' request conforms to.+type DatastoreProjectsRunAggregationQueryResource =+  "v1"+    Core.:> "projects"+    Core.:> Core.CaptureMode "projectId" "runAggregationQuery" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] RunAggregationQueryRequest+    Core.:> Core.Post '[Core.JSON] RunAggregationQueryResponse++-- | Runs an aggregation query.+--+-- /See:/ 'newDatastoreProjectsRunAggregationQuery' smart constructor.+data DatastoreProjectsRunAggregationQuery = DatastoreProjectsRunAggregationQuery+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: RunAggregationQueryRequest,+    -- | Required. The ID of the project against which to make the request.+    projectId :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DatastoreProjectsRunAggregationQuery' with the minimum fields required to make a request.+newDatastoreProjectsRunAggregationQuery ::+  -- |  Multipart request metadata. See 'payload'.+  RunAggregationQueryRequest ->+  -- |  Required. The ID of the project against which to make the request. See 'projectId'.+  Core.Text ->+  DatastoreProjectsRunAggregationQuery+newDatastoreProjectsRunAggregationQuery payload projectId =+  DatastoreProjectsRunAggregationQuery+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      payload = payload,+      projectId = projectId,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DatastoreProjectsRunAggregationQuery where+  type+    Rs DatastoreProjectsRunAggregationQuery =+      RunAggregationQueryResponse+  type+    Scopes DatastoreProjectsRunAggregationQuery =+      '[CloudPlatform'FullControl, Datastore'FullControl]+  requestClient DatastoreProjectsRunAggregationQuery {..} =+    go+      projectId+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      datastoreService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy DatastoreProjectsRunAggregationQueryResource+          )+          Core.mempty
+ gen/Gogol/Datastore/Projects/RunQuery.hs view
@@ -0,0 +1,117 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Datastore.Projects.RunQuery+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Queries for entities.+--+-- /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.runQuery@.+module Gogol.Datastore.Projects.RunQuery+  ( -- * Resource+    DatastoreProjectsRunQueryResource,++    -- ** Constructing a Request+    DatastoreProjectsRunQuery (..),+    newDatastoreProjectsRunQuery,+  )+where++import Gogol.Datastore.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @datastore.projects.runQuery@ method which the+-- 'DatastoreProjectsRunQuery' request conforms to.+type DatastoreProjectsRunQueryResource =+  "v1"+    Core.:> "projects"+    Core.:> Core.CaptureMode "projectId" "runQuery" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] RunQueryRequest+    Core.:> Core.Post '[Core.JSON] RunQueryResponse++-- | Queries for entities.+--+-- /See:/ 'newDatastoreProjectsRunQuery' smart constructor.+data DatastoreProjectsRunQuery = DatastoreProjectsRunQuery+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: RunQueryRequest,+    -- | Required. The ID of the project against which to make the request.+    projectId :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DatastoreProjectsRunQuery' with the minimum fields required to make a request.+newDatastoreProjectsRunQuery ::+  -- |  Multipart request metadata. See 'payload'.+  RunQueryRequest ->+  -- |  Required. The ID of the project against which to make the request. See 'projectId'.+  Core.Text ->+  DatastoreProjectsRunQuery+newDatastoreProjectsRunQuery payload projectId =+  DatastoreProjectsRunQuery+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      payload = payload,+      projectId = projectId,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest DatastoreProjectsRunQuery where+  type Rs DatastoreProjectsRunQuery = RunQueryResponse+  type+    Scopes DatastoreProjectsRunQuery =+      '[CloudPlatform'FullControl, Datastore'FullControl]+  requestClient DatastoreProjectsRunQuery {..} =+    go+      projectId+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      datastoreService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy DatastoreProjectsRunQueryResource)+          Core.mempty
+ gen/Gogol/Datastore/Types.hs view
@@ -0,0 +1,509 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.Datastore.Types+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Gogol.Datastore.Types+  ( -- * Configuration+    datastoreService,++    -- * OAuth Scopes+    CloudPlatform'FullControl,+    Datastore'FullControl,++    -- * Types++    -- ** Xgafv+    Xgafv (..),++    -- ** Aggregation+    Aggregation (..),+    newAggregation,++    -- ** AggregationQuery+    AggregationQuery (..),+    newAggregationQuery,++    -- ** AggregationResult+    AggregationResult (..),+    newAggregationResult,++    -- ** AggregationResult_AggregateProperties+    AggregationResult_AggregateProperties (..),+    newAggregationResult_AggregateProperties,++    -- ** AggregationResultBatch+    AggregationResultBatch (..),+    newAggregationResultBatch,++    -- ** AggregationResultBatch_MoreResults+    AggregationResultBatch_MoreResults (..),++    -- ** AllocateIdsRequest+    AllocateIdsRequest (..),+    newAllocateIdsRequest,++    -- ** AllocateIdsResponse+    AllocateIdsResponse (..),+    newAllocateIdsResponse,++    -- ** ArrayValue+    ArrayValue (..),+    newArrayValue,++    -- ** Avg+    Avg (..),+    newAvg,++    -- ** BeginTransactionRequest+    BeginTransactionRequest (..),+    newBeginTransactionRequest,++    -- ** BeginTransactionResponse+    BeginTransactionResponse (..),+    newBeginTransactionResponse,++    -- ** CommitRequest+    CommitRequest (..),+    newCommitRequest,++    -- ** CommitRequest_Mode+    CommitRequest_Mode (..),++    -- ** CommitResponse+    CommitResponse (..),+    newCommitResponse,++    -- ** CompositeFilter+    CompositeFilter (..),+    newCompositeFilter,++    -- ** CompositeFilter_Op+    CompositeFilter_Op (..),++    -- ** Count+    Count (..),+    newCount,++    -- ** Empty+    Empty (..),+    newEmpty,++    -- ** Entity+    Entity (..),+    newEntity,++    -- ** Entity_Properties+    Entity_Properties (..),+    newEntity_Properties,++    -- ** EntityResult+    EntityResult (..),+    newEntityResult,++    -- ** ExecutionStats+    ExecutionStats (..),+    newExecutionStats,++    -- ** ExecutionStats_DebugStats+    ExecutionStats_DebugStats (..),+    newExecutionStats_DebugStats,++    -- ** ExplainMetrics+    ExplainMetrics (..),+    newExplainMetrics,++    -- ** ExplainOptions+    ExplainOptions (..),+    newExplainOptions,++    -- ** Filter+    Filter (..),+    newFilter,++    -- ** FindNearest+    FindNearest (..),+    newFindNearest,++    -- ** FindNearest_DistanceMeasure+    FindNearest_DistanceMeasure (..),++    -- ** GoogleDatastoreAdminV1CommonMetadata+    GoogleDatastoreAdminV1CommonMetadata (..),+    newGoogleDatastoreAdminV1CommonMetadata,++    -- ** GoogleDatastoreAdminV1CommonMetadata_Labels+    GoogleDatastoreAdminV1CommonMetadata_Labels (..),+    newGoogleDatastoreAdminV1CommonMetadata_Labels,++    -- ** GoogleDatastoreAdminV1CommonMetadata_OperationType+    GoogleDatastoreAdminV1CommonMetadata_OperationType (..),++    -- ** GoogleDatastoreAdminV1CommonMetadata_State+    GoogleDatastoreAdminV1CommonMetadata_State (..),++    -- ** GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata+    GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata (..),+    newGoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata,++    -- ** GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState+    GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationState (..),++    -- ** GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep+    GoogleDatastoreAdminV1DatastoreFirestoreMigrationMetadata_MigrationStep (..),++    -- ** GoogleDatastoreAdminV1EntityFilter+    GoogleDatastoreAdminV1EntityFilter (..),+    newGoogleDatastoreAdminV1EntityFilter,++    -- ** GoogleDatastoreAdminV1ExportEntitiesMetadata+    GoogleDatastoreAdminV1ExportEntitiesMetadata (..),+    newGoogleDatastoreAdminV1ExportEntitiesMetadata,++    -- ** GoogleDatastoreAdminV1ExportEntitiesRequest+    GoogleDatastoreAdminV1ExportEntitiesRequest (..),+    newGoogleDatastoreAdminV1ExportEntitiesRequest,++    -- ** GoogleDatastoreAdminV1ExportEntitiesRequest_Labels+    GoogleDatastoreAdminV1ExportEntitiesRequest_Labels (..),+    newGoogleDatastoreAdminV1ExportEntitiesRequest_Labels,++    -- ** GoogleDatastoreAdminV1ExportEntitiesResponse+    GoogleDatastoreAdminV1ExportEntitiesResponse (..),+    newGoogleDatastoreAdminV1ExportEntitiesResponse,++    -- ** GoogleDatastoreAdminV1ImportEntitiesMetadata+    GoogleDatastoreAdminV1ImportEntitiesMetadata (..),+    newGoogleDatastoreAdminV1ImportEntitiesMetadata,++    -- ** GoogleDatastoreAdminV1ImportEntitiesRequest+    GoogleDatastoreAdminV1ImportEntitiesRequest (..),+    newGoogleDatastoreAdminV1ImportEntitiesRequest,++    -- ** GoogleDatastoreAdminV1ImportEntitiesRequest_Labels+    GoogleDatastoreAdminV1ImportEntitiesRequest_Labels (..),+    newGoogleDatastoreAdminV1ImportEntitiesRequest_Labels,++    -- ** GoogleDatastoreAdminV1Index+    GoogleDatastoreAdminV1Index (..),+    newGoogleDatastoreAdminV1Index,++    -- ** GoogleDatastoreAdminV1Index_Ancestor+    GoogleDatastoreAdminV1Index_Ancestor (..),++    -- ** GoogleDatastoreAdminV1Index_State+    GoogleDatastoreAdminV1Index_State (..),++    -- ** GoogleDatastoreAdminV1IndexOperationMetadata+    GoogleDatastoreAdminV1IndexOperationMetadata (..),+    newGoogleDatastoreAdminV1IndexOperationMetadata,++    -- ** GoogleDatastoreAdminV1IndexedProperty+    GoogleDatastoreAdminV1IndexedProperty (..),+    newGoogleDatastoreAdminV1IndexedProperty,++    -- ** GoogleDatastoreAdminV1IndexedProperty_Direction+    GoogleDatastoreAdminV1IndexedProperty_Direction (..),++    -- ** GoogleDatastoreAdminV1ListIndexesResponse+    GoogleDatastoreAdminV1ListIndexesResponse (..),+    newGoogleDatastoreAdminV1ListIndexesResponse,++    -- ** GoogleDatastoreAdminV1MigrationProgressEvent+    GoogleDatastoreAdminV1MigrationProgressEvent (..),+    newGoogleDatastoreAdminV1MigrationProgressEvent,++    -- ** GoogleDatastoreAdminV1MigrationProgressEvent_Step+    GoogleDatastoreAdminV1MigrationProgressEvent_Step (..),++    -- ** GoogleDatastoreAdminV1MigrationStateEvent+    GoogleDatastoreAdminV1MigrationStateEvent (..),+    newGoogleDatastoreAdminV1MigrationStateEvent,++    -- ** GoogleDatastoreAdminV1MigrationStateEvent_State+    GoogleDatastoreAdminV1MigrationStateEvent_State (..),++    -- ** GoogleDatastoreAdminV1PrepareStepDetails+    GoogleDatastoreAdminV1PrepareStepDetails (..),+    newGoogleDatastoreAdminV1PrepareStepDetails,++    -- ** GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode+    GoogleDatastoreAdminV1PrepareStepDetails_ConcurrencyMode (..),++    -- ** GoogleDatastoreAdminV1Progress+    GoogleDatastoreAdminV1Progress (..),+    newGoogleDatastoreAdminV1Progress,++    -- ** GoogleDatastoreAdminV1RedirectWritesStepDetails+    GoogleDatastoreAdminV1RedirectWritesStepDetails (..),+    newGoogleDatastoreAdminV1RedirectWritesStepDetails,++    -- ** GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode+    GoogleDatastoreAdminV1RedirectWritesStepDetails_ConcurrencyMode (..),++    -- ** GoogleDatastoreAdminV1beta1CommonMetadata+    GoogleDatastoreAdminV1beta1CommonMetadata (..),+    newGoogleDatastoreAdminV1beta1CommonMetadata,++    -- ** GoogleDatastoreAdminV1beta1CommonMetadata_Labels+    GoogleDatastoreAdminV1beta1CommonMetadata_Labels (..),+    newGoogleDatastoreAdminV1beta1CommonMetadata_Labels,++    -- ** GoogleDatastoreAdminV1beta1CommonMetadata_OperationType+    GoogleDatastoreAdminV1beta1CommonMetadata_OperationType (..),++    -- ** GoogleDatastoreAdminV1beta1CommonMetadata_State+    GoogleDatastoreAdminV1beta1CommonMetadata_State (..),++    -- ** GoogleDatastoreAdminV1beta1EntityFilter+    GoogleDatastoreAdminV1beta1EntityFilter (..),+    newGoogleDatastoreAdminV1beta1EntityFilter,++    -- ** GoogleDatastoreAdminV1beta1ExportEntitiesMetadata+    GoogleDatastoreAdminV1beta1ExportEntitiesMetadata (..),+    newGoogleDatastoreAdminV1beta1ExportEntitiesMetadata,++    -- ** GoogleDatastoreAdminV1beta1ExportEntitiesResponse+    GoogleDatastoreAdminV1beta1ExportEntitiesResponse (..),+    newGoogleDatastoreAdminV1beta1ExportEntitiesResponse,++    -- ** GoogleDatastoreAdminV1beta1ImportEntitiesMetadata+    GoogleDatastoreAdminV1beta1ImportEntitiesMetadata (..),+    newGoogleDatastoreAdminV1beta1ImportEntitiesMetadata,++    -- ** GoogleDatastoreAdminV1beta1Progress+    GoogleDatastoreAdminV1beta1Progress (..),+    newGoogleDatastoreAdminV1beta1Progress,++    -- ** GoogleLongrunningListOperationsResponse+    GoogleLongrunningListOperationsResponse (..),+    newGoogleLongrunningListOperationsResponse,++    -- ** GoogleLongrunningOperation+    GoogleLongrunningOperation (..),+    newGoogleLongrunningOperation,++    -- ** GoogleLongrunningOperation_Metadata+    GoogleLongrunningOperation_Metadata (..),+    newGoogleLongrunningOperation_Metadata,++    -- ** GoogleLongrunningOperation_Response+    GoogleLongrunningOperation_Response (..),+    newGoogleLongrunningOperation_Response,++    -- ** GqlQuery+    GqlQuery (..),+    newGqlQuery,++    -- ** GqlQuery_NamedBindings+    GqlQuery_NamedBindings (..),+    newGqlQuery_NamedBindings,++    -- ** GqlQueryParameter+    GqlQueryParameter (..),+    newGqlQueryParameter,++    -- ** Key+    Key (..),+    newKey,++    -- ** KindExpression+    KindExpression (..),+    newKindExpression,++    -- ** LatLng+    LatLng (..),+    newLatLng,++    -- ** LookupRequest+    LookupRequest (..),+    newLookupRequest,++    -- ** LookupResponse+    LookupResponse (..),+    newLookupResponse,++    -- ** Mutation+    Mutation (..),+    newMutation,++    -- ** Mutation_ConflictResolutionStrategy+    Mutation_ConflictResolutionStrategy (..),++    -- ** MutationResult+    MutationResult (..),+    newMutationResult,++    -- ** PartitionId+    PartitionId (..),+    newPartitionId,++    -- ** PathElement+    PathElement (..),+    newPathElement,++    -- ** PlanSummary+    PlanSummary (..),+    newPlanSummary,++    -- ** PlanSummary_IndexesUsedItem+    PlanSummary_IndexesUsedItem (..),+    newPlanSummary_IndexesUsedItem,++    -- ** Projection+    Projection (..),+    newProjection,++    -- ** PropertyFilter+    PropertyFilter (..),+    newPropertyFilter,++    -- ** PropertyFilter_Op+    PropertyFilter_Op (..),++    -- ** PropertyMask+    PropertyMask (..),+    newPropertyMask,++    -- ** PropertyOrder+    PropertyOrder (..),+    newPropertyOrder,++    -- ** PropertyOrder_Direction+    PropertyOrder_Direction (..),++    -- ** PropertyReference+    PropertyReference (..),+    newPropertyReference,++    -- ** PropertyTransform+    PropertyTransform (..),+    newPropertyTransform,++    -- ** PropertyTransform_SetToServerValue+    PropertyTransform_SetToServerValue (..),++    -- ** Query+    Query (..),+    newQuery,++    -- ** QueryResultBatch+    QueryResultBatch (..),+    newQueryResultBatch,++    -- ** QueryResultBatch_EntityResultType+    QueryResultBatch_EntityResultType (..),++    -- ** QueryResultBatch_MoreResults+    QueryResultBatch_MoreResults (..),++    -- ** ReadOnly+    ReadOnly (..),+    newReadOnly,++    -- ** ReadOptions+    ReadOptions (..),+    newReadOptions,++    -- ** ReadOptions_ReadConsistency+    ReadOptions_ReadConsistency (..),++    -- ** ReadWrite+    ReadWrite (..),+    newReadWrite,++    -- ** ReserveIdsRequest+    ReserveIdsRequest (..),+    newReserveIdsRequest,++    -- ** ReserveIdsResponse+    ReserveIdsResponse (..),+    newReserveIdsResponse,++    -- ** RollbackRequest+    RollbackRequest (..),+    newRollbackRequest,++    -- ** RollbackResponse+    RollbackResponse (..),+    newRollbackResponse,++    -- ** RunAggregationQueryRequest+    RunAggregationQueryRequest (..),+    newRunAggregationQueryRequest,++    -- ** RunAggregationQueryResponse+    RunAggregationQueryResponse (..),+    newRunAggregationQueryResponse,++    -- ** RunQueryRequest+    RunQueryRequest (..),+    newRunQueryRequest,++    -- ** RunQueryResponse+    RunQueryResponse (..),+    newRunQueryResponse,++    -- ** Status+    Status (..),+    newStatus,++    -- ** Status_DetailsItem+    Status_DetailsItem (..),+    newStatus_DetailsItem,++    -- ** Sum+    Sum (..),+    newSum,++    -- ** TransactionOptions+    TransactionOptions (..),+    newTransactionOptions,++    -- ** Value+    Value (..),+    newValue,++    -- ** Value_NullValue+    Value_NullValue (..),+  )+where++import Gogol.Datastore.Internal.Product+import Gogol.Datastore.Internal.Sum+import Gogol.Prelude qualified as Core++-- | Default request referring to version @v1@ of the Cloud Datastore API. This contains the host and root path used as a starting point for constructing service requests.+datastoreService :: Core.ServiceConfig+datastoreService =+  Core.defaultService+    (Core.ServiceId "datastore:v1")+    "datastore.googleapis.com"++-- | See, edit, configure, and delete your Google Cloud data and see the email address for your Google Account.+type CloudPlatform'FullControl =+  "https://www.googleapis.com/auth/cloud-platform"++-- | View and manage your Google Cloud Datastore data+type Datastore'FullControl =+  "https://www.googleapis.com/auth/datastore"
− gen/Network/Google/Datastore.hs 
@@ -1,624 +0,0 @@-{-# LANGUAGE DataKinds         #-}-{-# LANGUAGE NoImplicitPrelude #-}-{-# LANGUAGE TypeOperators     #-}--{-# OPTIONS_GHC -fno-warn-unused-imports    #-}-{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}---- |--- Module      : Network.Google.Datastore--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Accesses the schemaless NoSQL database to provide fully managed, robust,--- scalable storage for your application.------ /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference>-module Network.Google.Datastore-    (-    -- * Service Configuration-      datastoreService--    -- * OAuth Scopes-    , cloudPlatformScope-    , datastoreScope--    -- * API Declaration-    , DatastoreAPI--    -- * Resources--    -- ** datastore.projects.allocateIds-    , module Network.Google.Resource.Datastore.Projects.AllocateIds--    -- ** datastore.projects.beginTransaction-    , module Network.Google.Resource.Datastore.Projects.BeginTransaction--    -- ** datastore.projects.commit-    , module Network.Google.Resource.Datastore.Projects.Commit--    -- ** datastore.projects.export-    , module Network.Google.Resource.Datastore.Projects.Export--    -- ** datastore.projects.import-    , module Network.Google.Resource.Datastore.Projects.Import--    -- ** datastore.projects.indexes.get-    , module Network.Google.Resource.Datastore.Projects.Indexes.Get--    -- ** datastore.projects.indexes.list-    , module Network.Google.Resource.Datastore.Projects.Indexes.List--    -- ** datastore.projects.lookup-    , module Network.Google.Resource.Datastore.Projects.Lookup--    -- ** datastore.projects.operations.cancel-    , module Network.Google.Resource.Datastore.Projects.Operations.Cancel--    -- ** datastore.projects.operations.delete-    , module Network.Google.Resource.Datastore.Projects.Operations.Delete--    -- ** datastore.projects.operations.get-    , module Network.Google.Resource.Datastore.Projects.Operations.Get--    -- ** datastore.projects.operations.list-    , module Network.Google.Resource.Datastore.Projects.Operations.List--    -- ** datastore.projects.reserveIds-    , module Network.Google.Resource.Datastore.Projects.ReserveIds--    -- ** datastore.projects.rollback-    , module Network.Google.Resource.Datastore.Projects.Rollback--    -- ** datastore.projects.runQuery-    , module Network.Google.Resource.Datastore.Projects.RunQuery--    -- * Types--    -- ** LatLng-    , LatLng-    , latLng-    , llLatitude-    , llLongitude--    -- ** TransactionOptions-    , TransactionOptions-    , transactionOptions-    , toReadWrite-    , toReadOnly--    -- ** PropertyOrderDirection-    , PropertyOrderDirection (..)--    -- ** Status-    , Status-    , status-    , sDetails-    , sCode-    , sMessage--    -- ** GoogleLongrunningOperationMetadata-    , GoogleLongrunningOperationMetadata-    , googleLongrunningOperationMetadata-    , glomAddtional--    -- ** ReadWrite-    , ReadWrite-    , readWrite-    , rwPreviousTransaction--    -- ** GoogleDatastoreAdminV1beta1ExportEntitiesResponse-    , GoogleDatastoreAdminV1beta1ExportEntitiesResponse-    , googleDatastoreAdminV1beta1ExportEntitiesResponse-    , gdaveerOutputURL--    -- ** RollbackRequest-    , RollbackRequest-    , rollbackRequest-    , rrTransaction--    -- ** ReserveIdsRequest-    , ReserveIdsRequest-    , reserveIdsRequest-    , rirKeys-    , rirDatabaseId--    -- ** PartitionId-    , PartitionId-    , partitionId-    , piNamespaceId-    , piProjectId--    -- ** GoogleDatastoreAdminV1ListIndexesResponse-    , GoogleDatastoreAdminV1ListIndexesResponse-    , googleDatastoreAdminV1ListIndexesResponse-    , gdavlirNextPageToken-    , gdavlirIndexes--    -- ** QueryResultBatch-    , QueryResultBatch-    , queryResultBatch-    , qrbSkippedResults-    , qrbSkippedCursor-    , qrbEntityResultType-    , qrbSnapshotVersion-    , qrbEntityResults-    , qrbMoreResults-    , qrbEndCursor--    -- ** CompositeFilterOp-    , CompositeFilterOp (..)--    -- ** EntityProperties-    , EntityProperties-    , entityProperties-    , epAddtional--    -- ** GoogleDatastoreAdminV1ImportEntitiesRequestLabels-    , GoogleDatastoreAdminV1ImportEntitiesRequestLabels-    , googleDatastoreAdminV1ImportEntitiesRequestLabels-    , gdavierlAddtional--    -- ** BeginTransactionRequest-    , BeginTransactionRequest-    , beginTransactionRequest-    , btrTransactionOptions--    -- ** RunQueryRequest-    , RunQueryRequest-    , runQueryRequest-    , rqrPartitionId-    , rqrGqlQuery-    , rqrQuery-    , rqrReadOptions--    -- ** AllocateIdsRequest-    , AllocateIdsRequest-    , allocateIdsRequest-    , airKeys--    -- ** GoogleDatastoreAdminV1ExportEntitiesMetadata-    , GoogleDatastoreAdminV1ExportEntitiesMetadata-    , googleDatastoreAdminV1ExportEntitiesMetadata-    , gdaveemProgressBytes-    , gdaveemOutputURLPrefix-    , gdaveemProgressEntities-    , gdaveemEntityFilter-    , gdaveemCommon--    -- ** QueryResultBatchEntityResultType-    , QueryResultBatchEntityResultType (..)--    -- ** GoogleDatastoreAdminV1beta1CommonMetadata-    , GoogleDatastoreAdminV1beta1CommonMetadata-    , googleDatastoreAdminV1beta1CommonMetadata-    , gdavcmState-    , gdavcmStartTime-    , gdavcmEndTime-    , gdavcmLabels-    , gdavcmOperationType--    -- ** Empty-    , Empty-    , empty--    -- ** CompositeFilter-    , CompositeFilter-    , compositeFilter-    , cfOp-    , cfFilters--    -- ** GoogleDatastoreAdminV1beta1CommonMetadataOperationType-    , GoogleDatastoreAdminV1beta1CommonMetadataOperationType (..)--    -- ** QueryResultBatchMoreResults-    , QueryResultBatchMoreResults (..)--    -- ** GoogleDatastoreAdminV1IndexOperationMetadata-    , GoogleDatastoreAdminV1IndexOperationMetadata-    , googleDatastoreAdminV1IndexOperationMetadata-    , gdaviomProgressEntities-    , gdaviomCommon-    , gdaviomIndexId--    -- ** GoogleDatastoreAdminV1beta1ImportEntitiesMetadata-    , GoogleDatastoreAdminV1beta1ImportEntitiesMetadata-    , googleDatastoreAdminV1beta1ImportEntitiesMetadata-    , gdaviemProgressBytes-    , gdaviemProgressEntities-    , gdaviemEntityFilter-    , gdaviemInputURL-    , gdaviemCommon--    -- ** GoogleDatastoreAdminV1beta1Progress-    , GoogleDatastoreAdminV1beta1Progress-    , googleDatastoreAdminV1beta1Progress-    , gdavpWorkCompleted-    , gdavpWorkEstimated--    -- ** BeginTransactionResponse-    , BeginTransactionResponse-    , beginTransactionResponse-    , btrTransaction--    -- ** MutationResult-    , MutationResult-    , mutationResult-    , mrConflictDetected-    , mrKey-    , mrVersion--    -- ** AllocateIdsResponse-    , AllocateIdsResponse-    , allocateIdsResponse-    , aKeys--    -- ** GqlQuery-    , GqlQuery-    , gqlQuery-    , gqPositionalBindings-    , gqNamedBindings-    , gqQueryString-    , gqAllowLiterals--    -- ** RunQueryResponse-    , RunQueryResponse-    , runQueryResponse-    , rBatch-    , rQuery--    -- ** GoogleDatastoreAdminV1ExportEntitiesRequestLabels-    , GoogleDatastoreAdminV1ExportEntitiesRequestLabels-    , googleDatastoreAdminV1ExportEntitiesRequestLabels-    , gdaveerlAddtional--    -- ** GoogleDatastoreAdminV1CommonMetadataOperationType-    , GoogleDatastoreAdminV1CommonMetadataOperationType (..)--    -- ** Value-    , Value-    , value-    , vKeyValue-    , vGeoPointValue-    , vIntegerValue-    , vTimestampValue-    , vEntityValue-    , vExcludeFromIndexes-    , vDoubleValue-    , vStringValue-    , vBooleanValue-    , vMeaning-    , vArrayValue-    , vNullValue-    , vBlobValue--    -- ** ValueNullValue-    , ValueNullValue (..)--    -- ** GoogleDatastoreAdminV1IndexedPropertyDirection-    , GoogleDatastoreAdminV1IndexedPropertyDirection (..)--    -- ** GoogleDatastoreAdminV1CommonMetadataLabels-    , GoogleDatastoreAdminV1CommonMetadataLabels-    , googleDatastoreAdminV1CommonMetadataLabels-    , gdavcmlAddtional--    -- ** GoogleDatastoreAdminV1IndexAncestor-    , GoogleDatastoreAdminV1IndexAncestor (..)--    -- ** StatusDetailsItem-    , StatusDetailsItem-    , statusDetailsItem-    , sdiAddtional--    -- ** LookupRequest-    , LookupRequest-    , lookupRequest-    , lrKeys-    , lrReadOptions--    -- ** ReadOptionsReadConsistency-    , ReadOptionsReadConsistency (..)--    -- ** GoogleDatastoreAdminV1CommonMetadata-    , GoogleDatastoreAdminV1CommonMetadata-    , googleDatastoreAdminV1CommonMetadata-    , gState-    , gStartTime-    , gEndTime-    , gLabels-    , gOperationType--    -- ** GoogleDatastoreAdminV1ExportEntitiesRequest-    , GoogleDatastoreAdminV1ExportEntitiesRequest-    , googleDatastoreAdminV1ExportEntitiesRequest-    , gdaveerOutputURLPrefix-    , gdaveerEntityFilter-    , gdaveerLabels--    -- ** Mutation-    , Mutation-    , mutation-    , mBaseVersion-    , mInsert-    , mUpsert-    , mDelete-    , mUpdate--    -- ** GqlQueryNamedBindings-    , GqlQueryNamedBindings-    , gqlQueryNamedBindings-    , gqnbAddtional--    -- ** GoogleDatastoreAdminV1ExportEntitiesResponse-    , GoogleDatastoreAdminV1ExportEntitiesResponse-    , googleDatastoreAdminV1ExportEntitiesResponse-    , gOutputURL--    -- ** PropertyReference-    , PropertyReference-    , propertyReference-    , prName--    -- ** Key-    , Key-    , key-    , kPartitionId-    , kPath--    -- ** GoogleDatastoreAdminV1ImportEntitiesRequest-    , GoogleDatastoreAdminV1ImportEntitiesRequest-    , googleDatastoreAdminV1ImportEntitiesRequest-    , gdavierEntityFilter-    , gdavierInputURL-    , gdavierLabels--    -- ** GoogleDatastoreAdminV1IndexState-    , GoogleDatastoreAdminV1IndexState (..)--    -- ** PropertyFilter-    , PropertyFilter-    , propertyFilter-    , pfProperty-    , pfOp-    , pfValue--    -- ** Query-    , Query-    , query-    , qStartCursor-    , qOffSet-    , qKind-    , qDistinctOn-    , qEndCursor-    , qLimit-    , qProjection-    , qFilter-    , qOrder--    -- ** ArrayValue-    , ArrayValue-    , arrayValue-    , avValues--    -- ** EntityResult-    , EntityResult-    , entityResult-    , erCursor-    , erVersion-    , erEntity--    -- ** Xgafv-    , Xgafv (..)--    -- ** CommitResponse-    , CommitResponse-    , commitResponse-    , crIndexUpdates-    , crMutationResults--    -- ** KindExpression-    , KindExpression-    , kindExpression-    , keName--    -- ** GoogleLongrunningOperationResponse-    , GoogleLongrunningOperationResponse-    , googleLongrunningOperationResponse-    , glorAddtional--    -- ** ReadOptions-    , ReadOptions-    , readOptions-    , roReadConsistency-    , roTransaction--    -- ** GoogleDatastoreAdminV1beta1CommonMetadataState-    , GoogleDatastoreAdminV1beta1CommonMetadataState (..)--    -- ** GoogleDatastoreAdminV1EntityFilter-    , GoogleDatastoreAdminV1EntityFilter-    , googleDatastoreAdminV1EntityFilter-    , gdavefNamespaceIds-    , gdavefKinds--    -- ** RollbackResponse-    , RollbackResponse-    , rollbackResponse--    -- ** Projection-    , Projection-    , projection-    , pProperty--    -- ** ReserveIdsResponse-    , ReserveIdsResponse-    , reserveIdsResponse--    -- ** Filter-    , Filter-    , filter'-    , fCompositeFilter-    , fPropertyFilter--    -- ** GoogleDatastoreAdminV1Index-    , GoogleDatastoreAdminV1Index-    , googleDatastoreAdminV1Index-    , gdaviState-    , gdaviKind-    , gdaviProjectId-    , gdaviIndexId-    , gdaviAncestor-    , gdaviProperties--    -- ** GoogleDatastoreAdminV1beta1CommonMetadataLabels-    , GoogleDatastoreAdminV1beta1CommonMetadataLabels-    , googleDatastoreAdminV1beta1CommonMetadataLabels-    , gAddtional--    -- ** PropertyFilterOp-    , PropertyFilterOp (..)--    -- ** CommitRequest-    , CommitRequest-    , commitRequest-    , crMutations-    , crMode-    , crTransaction--    -- ** CommitRequestMode-    , CommitRequestMode (..)--    -- ** GoogleLongrunningListOperationsResponse-    , GoogleLongrunningListOperationsResponse-    , googleLongrunningListOperationsResponse-    , gllorNextPageToken-    , gllorOperations--    -- ** GoogleDatastoreAdminV1ImportEntitiesMetadata-    , GoogleDatastoreAdminV1ImportEntitiesMetadata-    , googleDatastoreAdminV1ImportEntitiesMetadata-    , gProgressBytes-    , gProgressEntities-    , gEntityFilter-    , gInputURL-    , gCommon--    -- ** GoogleDatastoreAdminV1Progress-    , GoogleDatastoreAdminV1Progress-    , googleDatastoreAdminV1Progress-    , gWorkCompleted-    , gWorkEstimated--    -- ** PathElement-    , PathElement-    , pathElement-    , peKind-    , peName-    , peId--    -- ** Entity-    , Entity-    , entity-    , eKey-    , eProperties--    -- ** GoogleDatastoreAdminV1beta1EntityFilter-    , GoogleDatastoreAdminV1beta1EntityFilter-    , googleDatastoreAdminV1beta1EntityFilter-    , gNamespaceIds-    , gKinds--    -- ** ReadOnly-    , ReadOnly-    , readOnly--    -- ** GoogleDatastoreAdminV1IndexedProperty-    , GoogleDatastoreAdminV1IndexedProperty-    , googleDatastoreAdminV1IndexedProperty-    , gdavipDirection-    , gdavipName--    -- ** LookupResponse-    , LookupResponse-    , lookupResponse-    , lrDeferred-    , lrFound-    , lrMissing--    -- ** GoogleLongrunningOperation-    , GoogleLongrunningOperation-    , googleLongrunningOperation-    , gloDone-    , gloError-    , gloResponse-    , gloName-    , gloMetadata--    -- ** PropertyOrder-    , PropertyOrder-    , propertyOrder-    , poProperty-    , poDirection--    -- ** GoogleDatastoreAdminV1beta1ExportEntitiesMetadata-    , GoogleDatastoreAdminV1beta1ExportEntitiesMetadata-    , googleDatastoreAdminV1beta1ExportEntitiesMetadata-    , gooProgressBytes-    , gooOutputURLPrefix-    , gooProgressEntities-    , gooEntityFilter-    , gooCommon--    -- ** GqlQueryParameter-    , GqlQueryParameter-    , gqlQueryParameter-    , gqpCursor-    , gqpValue--    -- ** GoogleDatastoreAdminV1CommonMetadataState-    , GoogleDatastoreAdminV1CommonMetadataState (..)-    ) where--import           Network.Google.Datastore.Types-import           Network.Google.Prelude-import           Network.Google.Resource.Datastore.Projects.AllocateIds-import           Network.Google.Resource.Datastore.Projects.BeginTransaction-import           Network.Google.Resource.Datastore.Projects.Commit-import           Network.Google.Resource.Datastore.Projects.Export-import           Network.Google.Resource.Datastore.Projects.Import-import           Network.Google.Resource.Datastore.Projects.Indexes.Get-import           Network.Google.Resource.Datastore.Projects.Indexes.List-import           Network.Google.Resource.Datastore.Projects.Lookup-import           Network.Google.Resource.Datastore.Projects.Operations.Cancel-import           Network.Google.Resource.Datastore.Projects.Operations.Delete-import           Network.Google.Resource.Datastore.Projects.Operations.Get-import           Network.Google.Resource.Datastore.Projects.Operations.List-import           Network.Google.Resource.Datastore.Projects.ReserveIds-import           Network.Google.Resource.Datastore.Projects.Rollback-import           Network.Google.Resource.Datastore.Projects.RunQuery--{- $resources-TODO--}---- | Represents the entirety of the methods and resources available for the Cloud Datastore API service.-type DatastoreAPI =-     ProjectsIndexesListResource :<|>-       ProjectsIndexesGetResource-       :<|> ProjectsOperationsListResource-       :<|> ProjectsOperationsGetResource-       :<|> ProjectsOperationsCancelResource-       :<|> ProjectsOperationsDeleteResource-       :<|> ProjectsExportResource-       :<|> ProjectsBeginTransactionResource-       :<|> ProjectsAllocateIdsResource-       :<|> ProjectsRunQueryResource-       :<|> ProjectsRollbackResource-       :<|> ProjectsReserveIdsResource-       :<|> ProjectsLookupResource-       :<|> ProjectsImportResource-       :<|> ProjectsCommitResource
− gen/Network/Google/Datastore/Types.hs 
@@ -1,547 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}---- |--- Module      : Network.Google.Datastore.Types--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)----module Network.Google.Datastore.Types-    (-    -- * Service Configuration-      datastoreService--    -- * OAuth Scopes-    , cloudPlatformScope-    , datastoreScope--    -- * LatLng-    , LatLng-    , latLng-    , llLatitude-    , llLongitude--    -- * TransactionOptions-    , TransactionOptions-    , transactionOptions-    , toReadWrite-    , toReadOnly--    -- * PropertyOrderDirection-    , PropertyOrderDirection (..)--    -- * Status-    , Status-    , status-    , sDetails-    , sCode-    , sMessage--    -- * GoogleLongrunningOperationMetadata-    , GoogleLongrunningOperationMetadata-    , googleLongrunningOperationMetadata-    , glomAddtional--    -- * ReadWrite-    , ReadWrite-    , readWrite-    , rwPreviousTransaction--    -- * GoogleDatastoreAdminV1beta1ExportEntitiesResponse-    , GoogleDatastoreAdminV1beta1ExportEntitiesResponse-    , googleDatastoreAdminV1beta1ExportEntitiesResponse-    , gdaveerOutputURL--    -- * RollbackRequest-    , RollbackRequest-    , rollbackRequest-    , rrTransaction--    -- * ReserveIdsRequest-    , ReserveIdsRequest-    , reserveIdsRequest-    , rirKeys-    , rirDatabaseId--    -- * PartitionId-    , PartitionId-    , partitionId-    , piNamespaceId-    , piProjectId--    -- * GoogleDatastoreAdminV1ListIndexesResponse-    , GoogleDatastoreAdminV1ListIndexesResponse-    , googleDatastoreAdminV1ListIndexesResponse-    , gdavlirNextPageToken-    , gdavlirIndexes--    -- * QueryResultBatch-    , QueryResultBatch-    , queryResultBatch-    , qrbSkippedResults-    , qrbSkippedCursor-    , qrbEntityResultType-    , qrbSnapshotVersion-    , qrbEntityResults-    , qrbMoreResults-    , qrbEndCursor--    -- * CompositeFilterOp-    , CompositeFilterOp (..)--    -- * EntityProperties-    , EntityProperties-    , entityProperties-    , epAddtional--    -- * GoogleDatastoreAdminV1ImportEntitiesRequestLabels-    , GoogleDatastoreAdminV1ImportEntitiesRequestLabels-    , googleDatastoreAdminV1ImportEntitiesRequestLabels-    , gdavierlAddtional--    -- * BeginTransactionRequest-    , BeginTransactionRequest-    , beginTransactionRequest-    , btrTransactionOptions--    -- * RunQueryRequest-    , RunQueryRequest-    , runQueryRequest-    , rqrPartitionId-    , rqrGqlQuery-    , rqrQuery-    , rqrReadOptions--    -- * AllocateIdsRequest-    , AllocateIdsRequest-    , allocateIdsRequest-    , airKeys--    -- * GoogleDatastoreAdminV1ExportEntitiesMetadata-    , GoogleDatastoreAdminV1ExportEntitiesMetadata-    , googleDatastoreAdminV1ExportEntitiesMetadata-    , gdaveemProgressBytes-    , gdaveemOutputURLPrefix-    , gdaveemProgressEntities-    , gdaveemEntityFilter-    , gdaveemCommon--    -- * QueryResultBatchEntityResultType-    , QueryResultBatchEntityResultType (..)--    -- * GoogleDatastoreAdminV1beta1CommonMetadata-    , GoogleDatastoreAdminV1beta1CommonMetadata-    , googleDatastoreAdminV1beta1CommonMetadata-    , gdavcmState-    , gdavcmStartTime-    , gdavcmEndTime-    , gdavcmLabels-    , gdavcmOperationType--    -- * Empty-    , Empty-    , empty--    -- * CompositeFilter-    , CompositeFilter-    , compositeFilter-    , cfOp-    , cfFilters--    -- * GoogleDatastoreAdminV1beta1CommonMetadataOperationType-    , GoogleDatastoreAdminV1beta1CommonMetadataOperationType (..)--    -- * QueryResultBatchMoreResults-    , QueryResultBatchMoreResults (..)--    -- * GoogleDatastoreAdminV1IndexOperationMetadata-    , GoogleDatastoreAdminV1IndexOperationMetadata-    , googleDatastoreAdminV1IndexOperationMetadata-    , gdaviomProgressEntities-    , gdaviomCommon-    , gdaviomIndexId--    -- * GoogleDatastoreAdminV1beta1ImportEntitiesMetadata-    , GoogleDatastoreAdminV1beta1ImportEntitiesMetadata-    , googleDatastoreAdminV1beta1ImportEntitiesMetadata-    , gdaviemProgressBytes-    , gdaviemProgressEntities-    , gdaviemEntityFilter-    , gdaviemInputURL-    , gdaviemCommon--    -- * GoogleDatastoreAdminV1beta1Progress-    , GoogleDatastoreAdminV1beta1Progress-    , googleDatastoreAdminV1beta1Progress-    , gdavpWorkCompleted-    , gdavpWorkEstimated--    -- * BeginTransactionResponse-    , BeginTransactionResponse-    , beginTransactionResponse-    , btrTransaction--    -- * MutationResult-    , MutationResult-    , mutationResult-    , mrConflictDetected-    , mrKey-    , mrVersion--    -- * AllocateIdsResponse-    , AllocateIdsResponse-    , allocateIdsResponse-    , aKeys--    -- * GqlQuery-    , GqlQuery-    , gqlQuery-    , gqPositionalBindings-    , gqNamedBindings-    , gqQueryString-    , gqAllowLiterals--    -- * RunQueryResponse-    , RunQueryResponse-    , runQueryResponse-    , rBatch-    , rQuery--    -- * GoogleDatastoreAdminV1ExportEntitiesRequestLabels-    , GoogleDatastoreAdminV1ExportEntitiesRequestLabels-    , googleDatastoreAdminV1ExportEntitiesRequestLabels-    , gdaveerlAddtional--    -- * GoogleDatastoreAdminV1CommonMetadataOperationType-    , GoogleDatastoreAdminV1CommonMetadataOperationType (..)--    -- * Value-    , Value-    , value-    , vKeyValue-    , vGeoPointValue-    , vIntegerValue-    , vTimestampValue-    , vEntityValue-    , vExcludeFromIndexes-    , vDoubleValue-    , vStringValue-    , vBooleanValue-    , vMeaning-    , vArrayValue-    , vNullValue-    , vBlobValue--    -- * ValueNullValue-    , ValueNullValue (..)--    -- * GoogleDatastoreAdminV1IndexedPropertyDirection-    , GoogleDatastoreAdminV1IndexedPropertyDirection (..)--    -- * GoogleDatastoreAdminV1CommonMetadataLabels-    , GoogleDatastoreAdminV1CommonMetadataLabels-    , googleDatastoreAdminV1CommonMetadataLabels-    , gdavcmlAddtional--    -- * GoogleDatastoreAdminV1IndexAncestor-    , GoogleDatastoreAdminV1IndexAncestor (..)--    -- * StatusDetailsItem-    , StatusDetailsItem-    , statusDetailsItem-    , sdiAddtional--    -- * LookupRequest-    , LookupRequest-    , lookupRequest-    , lrKeys-    , lrReadOptions--    -- * ReadOptionsReadConsistency-    , ReadOptionsReadConsistency (..)--    -- * GoogleDatastoreAdminV1CommonMetadata-    , GoogleDatastoreAdminV1CommonMetadata-    , googleDatastoreAdminV1CommonMetadata-    , gState-    , gStartTime-    , gEndTime-    , gLabels-    , gOperationType--    -- * GoogleDatastoreAdminV1ExportEntitiesRequest-    , GoogleDatastoreAdminV1ExportEntitiesRequest-    , googleDatastoreAdminV1ExportEntitiesRequest-    , gdaveerOutputURLPrefix-    , gdaveerEntityFilter-    , gdaveerLabels--    -- * Mutation-    , Mutation-    , mutation-    , mBaseVersion-    , mInsert-    , mUpsert-    , mDelete-    , mUpdate--    -- * GqlQueryNamedBindings-    , GqlQueryNamedBindings-    , gqlQueryNamedBindings-    , gqnbAddtional--    -- * GoogleDatastoreAdminV1ExportEntitiesResponse-    , GoogleDatastoreAdminV1ExportEntitiesResponse-    , googleDatastoreAdminV1ExportEntitiesResponse-    , gOutputURL--    -- * PropertyReference-    , PropertyReference-    , propertyReference-    , prName--    -- * Key-    , Key-    , key-    , kPartitionId-    , kPath--    -- * GoogleDatastoreAdminV1ImportEntitiesRequest-    , GoogleDatastoreAdminV1ImportEntitiesRequest-    , googleDatastoreAdminV1ImportEntitiesRequest-    , gdavierEntityFilter-    , gdavierInputURL-    , gdavierLabels--    -- * GoogleDatastoreAdminV1IndexState-    , GoogleDatastoreAdminV1IndexState (..)--    -- * PropertyFilter-    , PropertyFilter-    , propertyFilter-    , pfProperty-    , pfOp-    , pfValue--    -- * Query-    , Query-    , query-    , qStartCursor-    , qOffSet-    , qKind-    , qDistinctOn-    , qEndCursor-    , qLimit-    , qProjection-    , qFilter-    , qOrder--    -- * ArrayValue-    , ArrayValue-    , arrayValue-    , avValues--    -- * EntityResult-    , EntityResult-    , entityResult-    , erCursor-    , erVersion-    , erEntity--    -- * Xgafv-    , Xgafv (..)--    -- * CommitResponse-    , CommitResponse-    , commitResponse-    , crIndexUpdates-    , crMutationResults--    -- * KindExpression-    , KindExpression-    , kindExpression-    , keName--    -- * GoogleLongrunningOperationResponse-    , GoogleLongrunningOperationResponse-    , googleLongrunningOperationResponse-    , glorAddtional--    -- * ReadOptions-    , ReadOptions-    , readOptions-    , roReadConsistency-    , roTransaction--    -- * GoogleDatastoreAdminV1beta1CommonMetadataState-    , GoogleDatastoreAdminV1beta1CommonMetadataState (..)--    -- * GoogleDatastoreAdminV1EntityFilter-    , GoogleDatastoreAdminV1EntityFilter-    , googleDatastoreAdminV1EntityFilter-    , gdavefNamespaceIds-    , gdavefKinds--    -- * RollbackResponse-    , RollbackResponse-    , rollbackResponse--    -- * Projection-    , Projection-    , projection-    , pProperty--    -- * ReserveIdsResponse-    , ReserveIdsResponse-    , reserveIdsResponse--    -- * Filter-    , Filter-    , filter'-    , fCompositeFilter-    , fPropertyFilter--    -- * GoogleDatastoreAdminV1Index-    , GoogleDatastoreAdminV1Index-    , googleDatastoreAdminV1Index-    , gdaviState-    , gdaviKind-    , gdaviProjectId-    , gdaviIndexId-    , gdaviAncestor-    , gdaviProperties--    -- * GoogleDatastoreAdminV1beta1CommonMetadataLabels-    , GoogleDatastoreAdminV1beta1CommonMetadataLabels-    , googleDatastoreAdminV1beta1CommonMetadataLabels-    , gAddtional--    -- * PropertyFilterOp-    , PropertyFilterOp (..)--    -- * CommitRequest-    , CommitRequest-    , commitRequest-    , crMutations-    , crMode-    , crTransaction--    -- * CommitRequestMode-    , CommitRequestMode (..)--    -- * GoogleLongrunningListOperationsResponse-    , GoogleLongrunningListOperationsResponse-    , googleLongrunningListOperationsResponse-    , gllorNextPageToken-    , gllorOperations--    -- * GoogleDatastoreAdminV1ImportEntitiesMetadata-    , GoogleDatastoreAdminV1ImportEntitiesMetadata-    , googleDatastoreAdminV1ImportEntitiesMetadata-    , gProgressBytes-    , gProgressEntities-    , gEntityFilter-    , gInputURL-    , gCommon--    -- * GoogleDatastoreAdminV1Progress-    , GoogleDatastoreAdminV1Progress-    , googleDatastoreAdminV1Progress-    , gWorkCompleted-    , gWorkEstimated--    -- * PathElement-    , PathElement-    , pathElement-    , peKind-    , peName-    , peId--    -- * Entity-    , Entity-    , entity-    , eKey-    , eProperties--    -- * GoogleDatastoreAdminV1beta1EntityFilter-    , GoogleDatastoreAdminV1beta1EntityFilter-    , googleDatastoreAdminV1beta1EntityFilter-    , gNamespaceIds-    , gKinds--    -- * ReadOnly-    , ReadOnly-    , readOnly--    -- * GoogleDatastoreAdminV1IndexedProperty-    , GoogleDatastoreAdminV1IndexedProperty-    , googleDatastoreAdminV1IndexedProperty-    , gdavipDirection-    , gdavipName--    -- * LookupResponse-    , LookupResponse-    , lookupResponse-    , lrDeferred-    , lrFound-    , lrMissing--    -- * GoogleLongrunningOperation-    , GoogleLongrunningOperation-    , googleLongrunningOperation-    , gloDone-    , gloError-    , gloResponse-    , gloName-    , gloMetadata--    -- * PropertyOrder-    , PropertyOrder-    , propertyOrder-    , poProperty-    , poDirection--    -- * GoogleDatastoreAdminV1beta1ExportEntitiesMetadata-    , GoogleDatastoreAdminV1beta1ExportEntitiesMetadata-    , googleDatastoreAdminV1beta1ExportEntitiesMetadata-    , gooProgressBytes-    , gooOutputURLPrefix-    , gooProgressEntities-    , gooEntityFilter-    , gooCommon--    -- * GqlQueryParameter-    , GqlQueryParameter-    , gqlQueryParameter-    , gqpCursor-    , gqpValue--    -- * GoogleDatastoreAdminV1CommonMetadataState-    , GoogleDatastoreAdminV1CommonMetadataState (..)-    ) where--import           Network.Google.Datastore.Types.Product-import           Network.Google.Datastore.Types.Sum-import           Network.Google.Prelude---- | Default request referring to version 'v1' of the Cloud Datastore API. This contains the host and root path used as a starting point for constructing service requests.-datastoreService :: ServiceConfig-datastoreService-  = defaultService (ServiceId "datastore:v1")-      "datastore.googleapis.com"---- | View and manage your data across Google Cloud Platform services-cloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]-cloudPlatformScope = Proxy---- | View and manage your Google Cloud Datastore data-datastoreScope :: Proxy '["https://www.googleapis.com/auth/datastore"]-datastoreScope = Proxy
− gen/Network/Google/Datastore/Types/Product.hs 
@@ -1,4333 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}--{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-imports #-}---- |--- Module      : Network.Google.Datastore.Types.Product--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)----module Network.Google.Datastore.Types.Product where--import           Network.Google.Datastore.Types.Sum-import           Network.Google.Prelude---- | An object representing a latitude\/longitude pair. This is expressed as--- a pair of doubles representing degrees latitude and degrees longitude.--- Unless specified otherwise, this must conform to the--- <http://www.unoosa.org/pdf/icg/2012/template/WGS_84.pdf WGS84 standard>.--- Values must be within normalized ranges.------ /See:/ 'latLng' smart constructor.-data LatLng =-  LatLng'-    { _llLatitude  :: !(Maybe (Textual Double))-    , _llLongitude :: !(Maybe (Textual Double))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'LatLng' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'llLatitude'------ * 'llLongitude'-latLng-    :: LatLng-latLng = LatLng' {_llLatitude = Nothing, _llLongitude = Nothing}----- | The latitude in degrees. It must be in the range [-90.0, +90.0].-llLatitude :: Lens' LatLng (Maybe Double)-llLatitude-  = lens _llLatitude (\ s a -> s{_llLatitude = a}) .-      mapping _Coerce---- | The longitude in degrees. It must be in the range [-180.0, +180.0].-llLongitude :: Lens' LatLng (Maybe Double)-llLongitude-  = lens _llLongitude (\ s a -> s{_llLongitude = a}) .-      mapping _Coerce--instance FromJSON LatLng where-        parseJSON-          = withObject "LatLng"-              (\ o ->-                 LatLng' <$>-                   (o .:? "latitude") <*> (o .:? "longitude"))--instance ToJSON LatLng where-        toJSON LatLng'{..}-          = object-              (catMaybes-                 [("latitude" .=) <$> _llLatitude,-                  ("longitude" .=) <$> _llLongitude])---- | Options for beginning a new transaction. Transactions can be created--- explicitly with calls to Datastore.BeginTransaction or implicitly by--- setting ReadOptions.new_transaction in read requests.------ /See:/ 'transactionOptions' smart constructor.-data TransactionOptions =-  TransactionOptions'-    { _toReadWrite :: !(Maybe ReadWrite)-    , _toReadOnly  :: !(Maybe ReadOnly)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TransactionOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'toReadWrite'------ * 'toReadOnly'-transactionOptions-    :: TransactionOptions-transactionOptions =-  TransactionOptions' {_toReadWrite = Nothing, _toReadOnly = Nothing}----- | The transaction should allow both reads and writes.-toReadWrite :: Lens' TransactionOptions (Maybe ReadWrite)-toReadWrite-  = lens _toReadWrite (\ s a -> s{_toReadWrite = a})---- | The transaction should only allow reads.-toReadOnly :: Lens' TransactionOptions (Maybe ReadOnly)-toReadOnly-  = lens _toReadOnly (\ s a -> s{_toReadOnly = a})--instance FromJSON TransactionOptions where-        parseJSON-          = withObject "TransactionOptions"-              (\ o ->-                 TransactionOptions' <$>-                   (o .:? "readWrite") <*> (o .:? "readOnly"))--instance ToJSON TransactionOptions where-        toJSON TransactionOptions'{..}-          = object-              (catMaybes-                 [("readWrite" .=) <$> _toReadWrite,-                  ("readOnly" .=) <$> _toReadOnly])---- | The \`Status\` type defines a logical error model that is suitable for--- different programming environments, including REST APIs and RPC APIs. It--- is used by [gRPC](https:\/\/github.com\/grpc). The error model is--- designed to be: - Simple to use and understand for most users - Flexible--- enough to meet unexpected needs # Overview The \`Status\` message--- contains three pieces of data: error code, error message, and error--- details. The error code should be an enum value of google.rpc.Code, but--- it may accept additional error codes if needed. The error message should--- be a developer-facing English message that helps developers *understand*--- and *resolve* the error. If a localized user-facing error message is--- needed, put the localized message in the error details or localize it in--- the client. The optional error details may contain arbitrary information--- about the error. There is a predefined set of error detail types in the--- package \`google.rpc\` that can be used for common error conditions. #--- Language mapping The \`Status\` message is the logical representation of--- the error model, but it is not necessarily the actual wire format. When--- the \`Status\` message is exposed in different client libraries and--- different wire protocols, it can be mapped differently. For example, it--- will likely be mapped to some exceptions in Java, but more likely mapped--- to some error codes in C. # Other uses The error model and the--- \`Status\` message can be used in a variety of environments, either with--- or without APIs, to provide a consistent developer experience across--- different environments. Example uses of this error model include: ---- Partial errors. If a service needs to return partial errors to the--- client, it may embed the \`Status\` in the normal response to indicate--- the partial errors. - Workflow errors. A typical workflow has multiple--- steps. Each step may have a \`Status\` message for error reporting. ---- Batch operations. If a client uses batch request and batch response, the--- \`Status\` message should be used directly inside batch response, one--- for each error sub-response. - Asynchronous operations. If an API call--- embeds asynchronous operation results in its response, the status of--- those operations should be represented directly using the \`Status\`--- message. - Logging. If some API errors are stored in logs, the message--- \`Status\` could be used directly after any stripping needed for--- security\/privacy reasons.------ /See:/ 'status' smart constructor.-data Status =-  Status'-    { _sDetails :: !(Maybe [StatusDetailsItem])-    , _sCode    :: !(Maybe (Textual Int32))-    , _sMessage :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Status' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sDetails'------ * 'sCode'------ * 'sMessage'-status-    :: Status-status = Status' {_sDetails = Nothing, _sCode = Nothing, _sMessage = Nothing}----- | A list of messages that carry the error details. There is a common set--- of message types for APIs to use.-sDetails :: Lens' Status [StatusDetailsItem]-sDetails-  = lens _sDetails (\ s a -> s{_sDetails = a}) .-      _Default-      . _Coerce---- | The status code, which should be an enum value of google.rpc.Code.-sCode :: Lens' Status (Maybe Int32)-sCode-  = lens _sCode (\ s a -> s{_sCode = a}) .-      mapping _Coerce---- | A developer-facing error message, which should be in English. Any--- user-facing error message should be localized and sent in the--- google.rpc.Status.details field, or localized by the client.-sMessage :: Lens' Status (Maybe Text)-sMessage = lens _sMessage (\ s a -> s{_sMessage = a})--instance FromJSON Status where-        parseJSON-          = withObject "Status"-              (\ o ->-                 Status' <$>-                   (o .:? "details" .!= mempty) <*> (o .:? "code") <*>-                     (o .:? "message"))--instance ToJSON Status where-        toJSON Status'{..}-          = object-              (catMaybes-                 [("details" .=) <$> _sDetails,-                  ("code" .=) <$> _sCode,-                  ("message" .=) <$> _sMessage])---- | Service-specific metadata associated with the operation. It typically--- contains progress information and common metadata such as create time.--- Some services might not provide such metadata. Any method that returns a--- long-running operation should document the metadata type, if any.------ /See:/ 'googleLongrunningOperationMetadata' smart constructor.-newtype GoogleLongrunningOperationMetadata =-  GoogleLongrunningOperationMetadata'-    { _glomAddtional :: HashMap Text JSONValue-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GoogleLongrunningOperationMetadata' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'glomAddtional'-googleLongrunningOperationMetadata-    :: HashMap Text JSONValue -- ^ 'glomAddtional'-    -> GoogleLongrunningOperationMetadata-googleLongrunningOperationMetadata pGlomAddtional_ =-  GoogleLongrunningOperationMetadata'-    {_glomAddtional = _Coerce # pGlomAddtional_}----- | Properties of the object. Contains field \'type with type URL.-glomAddtional :: Lens' GoogleLongrunningOperationMetadata (HashMap Text JSONValue)-glomAddtional-  = lens _glomAddtional-      (\ s a -> s{_glomAddtional = a})-      . _Coerce--instance FromJSON GoogleLongrunningOperationMetadata-         where-        parseJSON-          = withObject "GoogleLongrunningOperationMetadata"-              (\ o ->-                 GoogleLongrunningOperationMetadata' <$>-                   (parseJSONObject o))--instance ToJSON GoogleLongrunningOperationMetadata-         where-        toJSON = toJSON . _glomAddtional---- | Options specific to read \/ write transactions.------ /See:/ 'readWrite' smart constructor.-newtype ReadWrite =-  ReadWrite'-    { _rwPreviousTransaction :: Maybe Bytes-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ReadWrite' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rwPreviousTransaction'-readWrite-    :: ReadWrite-readWrite = ReadWrite' {_rwPreviousTransaction = Nothing}----- | The transaction identifier of the transaction being retried.-rwPreviousTransaction :: Lens' ReadWrite (Maybe ByteString)-rwPreviousTransaction-  = lens _rwPreviousTransaction-      (\ s a -> s{_rwPreviousTransaction = a})-      . mapping _Bytes--instance FromJSON ReadWrite where-        parseJSON-          = withObject "ReadWrite"-              (\ o -> ReadWrite' <$> (o .:? "previousTransaction"))--instance ToJSON ReadWrite where-        toJSON ReadWrite'{..}-          = object-              (catMaybes-                 [("previousTransaction" .=) <$>-                    _rwPreviousTransaction])---- | The response for--- google.datastore.admin.v1beta1.DatastoreAdmin.ExportEntities.------ /See:/ 'googleDatastoreAdminV1beta1ExportEntitiesResponse' smart constructor.-newtype GoogleDatastoreAdminV1beta1ExportEntitiesResponse =-  GoogleDatastoreAdminV1beta1ExportEntitiesResponse'-    { _gdaveerOutputURL :: Maybe Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GoogleDatastoreAdminV1beta1ExportEntitiesResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gdaveerOutputURL'-googleDatastoreAdminV1beta1ExportEntitiesResponse-    :: GoogleDatastoreAdminV1beta1ExportEntitiesResponse-googleDatastoreAdminV1beta1ExportEntitiesResponse =-  GoogleDatastoreAdminV1beta1ExportEntitiesResponse'-    {_gdaveerOutputURL = Nothing}----- | Location of the output metadata file. This can be used to begin an--- import into Cloud Datastore (this project or another project). See--- google.datastore.admin.v1beta1.ImportEntitiesRequest.input_url. Only--- present if the operation completed successfully.-gdaveerOutputURL :: Lens' GoogleDatastoreAdminV1beta1ExportEntitiesResponse (Maybe Text)-gdaveerOutputURL-  = lens _gdaveerOutputURL-      (\ s a -> s{_gdaveerOutputURL = a})--instance FromJSON-           GoogleDatastoreAdminV1beta1ExportEntitiesResponse-         where-        parseJSON-          = withObject-              "GoogleDatastoreAdminV1beta1ExportEntitiesResponse"-              (\ o ->-                 GoogleDatastoreAdminV1beta1ExportEntitiesResponse'-                   <$> (o .:? "outputUrl"))--instance ToJSON-           GoogleDatastoreAdminV1beta1ExportEntitiesResponse-         where-        toJSON-          GoogleDatastoreAdminV1beta1ExportEntitiesResponse'{..}-          = object-              (catMaybes [("outputUrl" .=) <$> _gdaveerOutputURL])---- | The request for Datastore.Rollback.------ /See:/ 'rollbackRequest' smart constructor.-newtype RollbackRequest =-  RollbackRequest'-    { _rrTransaction :: Maybe Bytes-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'RollbackRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rrTransaction'-rollbackRequest-    :: RollbackRequest-rollbackRequest = RollbackRequest' {_rrTransaction = Nothing}----- | The transaction identifier, returned by a call to--- Datastore.BeginTransaction.-rrTransaction :: Lens' RollbackRequest (Maybe ByteString)-rrTransaction-  = lens _rrTransaction-      (\ s a -> s{_rrTransaction = a})-      . mapping _Bytes--instance FromJSON RollbackRequest where-        parseJSON-          = withObject "RollbackRequest"-              (\ o -> RollbackRequest' <$> (o .:? "transaction"))--instance ToJSON RollbackRequest where-        toJSON RollbackRequest'{..}-          = object-              (catMaybes [("transaction" .=) <$> _rrTransaction])---- | The request for Datastore.ReserveIds.------ /See:/ 'reserveIdsRequest' smart constructor.-data ReserveIdsRequest =-  ReserveIdsRequest'-    { _rirKeys       :: !(Maybe [Key])-    , _rirDatabaseId :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ReserveIdsRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rirKeys'------ * 'rirDatabaseId'-reserveIdsRequest-    :: ReserveIdsRequest-reserveIdsRequest =-  ReserveIdsRequest' {_rirKeys = Nothing, _rirDatabaseId = Nothing}----- | A list of keys with complete key paths whose numeric IDs should not be--- auto-allocated.-rirKeys :: Lens' ReserveIdsRequest [Key]-rirKeys-  = lens _rirKeys (\ s a -> s{_rirKeys = a}) . _Default-      . _Coerce---- | If not empty, the ID of the database against which to make the request.-rirDatabaseId :: Lens' ReserveIdsRequest (Maybe Text)-rirDatabaseId-  = lens _rirDatabaseId-      (\ s a -> s{_rirDatabaseId = a})--instance FromJSON ReserveIdsRequest where-        parseJSON-          = withObject "ReserveIdsRequest"-              (\ o ->-                 ReserveIdsRequest' <$>-                   (o .:? "keys" .!= mempty) <*> (o .:? "databaseId"))--instance ToJSON ReserveIdsRequest where-        toJSON ReserveIdsRequest'{..}-          = object-              (catMaybes-                 [("keys" .=) <$> _rirKeys,-                  ("databaseId" .=) <$> _rirDatabaseId])---- | A partition ID identifies a grouping of entities. The grouping is always--- by project and namespace, however the namespace ID may be empty. A--- partition ID contains several dimensions: project ID and namespace ID.--- Partition dimensions: - May be \`\"\"\`. - Must be valid UTF-8 bytes. ---- Must have values that match regex \`[A-Za-z\\d\\.\\-_]{1,100}\` If the--- value of any dimension matches regex \`__.*__\`, the partition is--- reserved\/read-only. A reserved\/read-only partition ID is forbidden in--- certain documented contexts. Foreign partition IDs (in which the project--- ID does not match the context project ID ) are discouraged. Reads and--- writes of foreign partition IDs may fail if the project is not in an--- active state.------ /See:/ 'partitionId' smart constructor.-data PartitionId =-  PartitionId'-    { _piNamespaceId :: !(Maybe Text)-    , _piProjectId   :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PartitionId' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'piNamespaceId'------ * 'piProjectId'-partitionId-    :: PartitionId-partitionId = PartitionId' {_piNamespaceId = Nothing, _piProjectId = Nothing}----- | If not empty, the ID of the namespace to which the entities belong.-piNamespaceId :: Lens' PartitionId (Maybe Text)-piNamespaceId-  = lens _piNamespaceId-      (\ s a -> s{_piNamespaceId = a})---- | The ID of the project to which the entities belong.-piProjectId :: Lens' PartitionId (Maybe Text)-piProjectId-  = lens _piProjectId (\ s a -> s{_piProjectId = a})--instance FromJSON PartitionId where-        parseJSON-          = withObject "PartitionId"-              (\ o ->-                 PartitionId' <$>-                   (o .:? "namespaceId") <*> (o .:? "projectId"))--instance ToJSON PartitionId where-        toJSON PartitionId'{..}-          = object-              (catMaybes-                 [("namespaceId" .=) <$> _piNamespaceId,-                  ("projectId" .=) <$> _piProjectId])---- | The response for google.datastore.admin.v1.DatastoreAdmin.ListIndexes.------ /See:/ 'googleDatastoreAdminV1ListIndexesResponse' smart constructor.-data GoogleDatastoreAdminV1ListIndexesResponse =-  GoogleDatastoreAdminV1ListIndexesResponse'-    { _gdavlirNextPageToken :: !(Maybe Text)-    , _gdavlirIndexes       :: !(Maybe [GoogleDatastoreAdminV1Index])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GoogleDatastoreAdminV1ListIndexesResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gdavlirNextPageToken'------ * 'gdavlirIndexes'-googleDatastoreAdminV1ListIndexesResponse-    :: GoogleDatastoreAdminV1ListIndexesResponse-googleDatastoreAdminV1ListIndexesResponse =-  GoogleDatastoreAdminV1ListIndexesResponse'-    {_gdavlirNextPageToken = Nothing, _gdavlirIndexes = Nothing}----- | The standard List next-page token.-gdavlirNextPageToken :: Lens' GoogleDatastoreAdminV1ListIndexesResponse (Maybe Text)-gdavlirNextPageToken-  = lens _gdavlirNextPageToken-      (\ s a -> s{_gdavlirNextPageToken = a})---- | The indexes.-gdavlirIndexes :: Lens' GoogleDatastoreAdminV1ListIndexesResponse [GoogleDatastoreAdminV1Index]-gdavlirIndexes-  = lens _gdavlirIndexes-      (\ s a -> s{_gdavlirIndexes = a})-      . _Default-      . _Coerce--instance FromJSON-           GoogleDatastoreAdminV1ListIndexesResponse-         where-        parseJSON-          = withObject-              "GoogleDatastoreAdminV1ListIndexesResponse"-              (\ o ->-                 GoogleDatastoreAdminV1ListIndexesResponse' <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "indexes" .!= mempty))--instance ToJSON-           GoogleDatastoreAdminV1ListIndexesResponse-         where-        toJSON GoogleDatastoreAdminV1ListIndexesResponse'{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _gdavlirNextPageToken,-                  ("indexes" .=) <$> _gdavlirIndexes])---- | A batch of results produced by a query.------ /See:/ 'queryResultBatch' smart constructor.-data QueryResultBatch =-  QueryResultBatch'-    { _qrbSkippedResults   :: !(Maybe (Textual Int32))-    , _qrbSkippedCursor    :: !(Maybe Bytes)-    , _qrbEntityResultType :: !(Maybe QueryResultBatchEntityResultType)-    , _qrbSnapshotVersion  :: !(Maybe (Textual Int64))-    , _qrbEntityResults    :: !(Maybe [EntityResult])-    , _qrbMoreResults      :: !(Maybe QueryResultBatchMoreResults)-    , _qrbEndCursor        :: !(Maybe Bytes)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'QueryResultBatch' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'qrbSkippedResults'------ * 'qrbSkippedCursor'------ * 'qrbEntityResultType'------ * 'qrbSnapshotVersion'------ * 'qrbEntityResults'------ * 'qrbMoreResults'------ * 'qrbEndCursor'-queryResultBatch-    :: QueryResultBatch-queryResultBatch =-  QueryResultBatch'-    { _qrbSkippedResults = Nothing-    , _qrbSkippedCursor = Nothing-    , _qrbEntityResultType = Nothing-    , _qrbSnapshotVersion = Nothing-    , _qrbEntityResults = Nothing-    , _qrbMoreResults = Nothing-    , _qrbEndCursor = Nothing-    }----- | The number of results skipped, typically because of an offset.-qrbSkippedResults :: Lens' QueryResultBatch (Maybe Int32)-qrbSkippedResults-  = lens _qrbSkippedResults-      (\ s a -> s{_qrbSkippedResults = a})-      . mapping _Coerce---- | A cursor that points to the position after the last skipped result. Will--- be set when \`skipped_results\` != 0.-qrbSkippedCursor :: Lens' QueryResultBatch (Maybe ByteString)-qrbSkippedCursor-  = lens _qrbSkippedCursor-      (\ s a -> s{_qrbSkippedCursor = a})-      . mapping _Bytes---- | The result type for every entity in \`entity_results\`.-qrbEntityResultType :: Lens' QueryResultBatch (Maybe QueryResultBatchEntityResultType)-qrbEntityResultType-  = lens _qrbEntityResultType-      (\ s a -> s{_qrbEntityResultType = a})---- | The version number of the snapshot this batch was returned from. This--- applies to the range of results from the query\'s \`start_cursor\` (or--- the beginning of the query if no cursor was given) to this batch\'s--- \`end_cursor\` (not the query\'s \`end_cursor\`). In a single--- transaction, subsequent query result batches for the same query can have--- a greater snapshot version number. Each batch\'s snapshot version is--- valid for all preceding batches. The value will be zero for eventually--- consistent queries.-qrbSnapshotVersion :: Lens' QueryResultBatch (Maybe Int64)-qrbSnapshotVersion-  = lens _qrbSnapshotVersion-      (\ s a -> s{_qrbSnapshotVersion = a})-      . mapping _Coerce---- | The results for this batch.-qrbEntityResults :: Lens' QueryResultBatch [EntityResult]-qrbEntityResults-  = lens _qrbEntityResults-      (\ s a -> s{_qrbEntityResults = a})-      . _Default-      . _Coerce---- | The state of the query after the current batch.-qrbMoreResults :: Lens' QueryResultBatch (Maybe QueryResultBatchMoreResults)-qrbMoreResults-  = lens _qrbMoreResults-      (\ s a -> s{_qrbMoreResults = a})---- | A cursor that points to the position after the last result in the batch.-qrbEndCursor :: Lens' QueryResultBatch (Maybe ByteString)-qrbEndCursor-  = lens _qrbEndCursor (\ s a -> s{_qrbEndCursor = a})-      . mapping _Bytes--instance FromJSON QueryResultBatch where-        parseJSON-          = withObject "QueryResultBatch"-              (\ o ->-                 QueryResultBatch' <$>-                   (o .:? "skippedResults") <*> (o .:? "skippedCursor")-                     <*> (o .:? "entityResultType")-                     <*> (o .:? "snapshotVersion")-                     <*> (o .:? "entityResults" .!= mempty)-                     <*> (o .:? "moreResults")-                     <*> (o .:? "endCursor"))--instance ToJSON QueryResultBatch where-        toJSON QueryResultBatch'{..}-          = object-              (catMaybes-                 [("skippedResults" .=) <$> _qrbSkippedResults,-                  ("skippedCursor" .=) <$> _qrbSkippedCursor,-                  ("entityResultType" .=) <$> _qrbEntityResultType,-                  ("snapshotVersion" .=) <$> _qrbSnapshotVersion,-                  ("entityResults" .=) <$> _qrbEntityResults,-                  ("moreResults" .=) <$> _qrbMoreResults,-                  ("endCursor" .=) <$> _qrbEndCursor])---- | The entity\'s properties. The map\'s keys are property names. A property--- name matching regex \`__.*__\` is reserved. A reserved property name is--- forbidden in certain documented contexts. The name must not contain more--- than 500 characters. The name cannot be \`\"\"\`.------ /See:/ 'entityProperties' smart constructor.-newtype EntityProperties =-  EntityProperties'-    { _epAddtional :: HashMap Text Value-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'EntityProperties' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'epAddtional'-entityProperties-    :: HashMap Text Value -- ^ 'epAddtional'-    -> EntityProperties-entityProperties pEpAddtional_ =-  EntityProperties' {_epAddtional = _Coerce # pEpAddtional_}---epAddtional :: Lens' EntityProperties (HashMap Text Value)-epAddtional-  = lens _epAddtional (\ s a -> s{_epAddtional = a}) .-      _Coerce--instance FromJSON EntityProperties where-        parseJSON-          = withObject "EntityProperties"-              (\ o -> EntityProperties' <$> (parseJSONObject o))--instance ToJSON EntityProperties where-        toJSON = toJSON . _epAddtional---- | Client-assigned labels.------ /See:/ 'googleDatastoreAdminV1ImportEntitiesRequestLabels' smart constructor.-newtype GoogleDatastoreAdminV1ImportEntitiesRequestLabels =-  GoogleDatastoreAdminV1ImportEntitiesRequestLabels'-    { _gdavierlAddtional :: HashMap Text Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GoogleDatastoreAdminV1ImportEntitiesRequestLabels' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gdavierlAddtional'-googleDatastoreAdminV1ImportEntitiesRequestLabels-    :: HashMap Text Text -- ^ 'gdavierlAddtional'-    -> GoogleDatastoreAdminV1ImportEntitiesRequestLabels-googleDatastoreAdminV1ImportEntitiesRequestLabels pGdavierlAddtional_ =-  GoogleDatastoreAdminV1ImportEntitiesRequestLabels'-    {_gdavierlAddtional = _Coerce # pGdavierlAddtional_}---gdavierlAddtional :: Lens' GoogleDatastoreAdminV1ImportEntitiesRequestLabels (HashMap Text Text)-gdavierlAddtional-  = lens _gdavierlAddtional-      (\ s a -> s{_gdavierlAddtional = a})-      . _Coerce--instance FromJSON-           GoogleDatastoreAdminV1ImportEntitiesRequestLabels-         where-        parseJSON-          = withObject-              "GoogleDatastoreAdminV1ImportEntitiesRequestLabels"-              (\ o ->-                 GoogleDatastoreAdminV1ImportEntitiesRequestLabels'-                   <$> (parseJSONObject o))--instance ToJSON-           GoogleDatastoreAdminV1ImportEntitiesRequestLabels-         where-        toJSON = toJSON . _gdavierlAddtional---- | The request for Datastore.BeginTransaction.------ /See:/ 'beginTransactionRequest' smart constructor.-newtype BeginTransactionRequest =-  BeginTransactionRequest'-    { _btrTransactionOptions :: Maybe TransactionOptions-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'BeginTransactionRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'btrTransactionOptions'-beginTransactionRequest-    :: BeginTransactionRequest-beginTransactionRequest =-  BeginTransactionRequest' {_btrTransactionOptions = Nothing}----- | Options for a new transaction.-btrTransactionOptions :: Lens' BeginTransactionRequest (Maybe TransactionOptions)-btrTransactionOptions-  = lens _btrTransactionOptions-      (\ s a -> s{_btrTransactionOptions = a})--instance FromJSON BeginTransactionRequest where-        parseJSON-          = withObject "BeginTransactionRequest"-              (\ o ->-                 BeginTransactionRequest' <$>-                   (o .:? "transactionOptions"))--instance ToJSON BeginTransactionRequest where-        toJSON BeginTransactionRequest'{..}-          = object-              (catMaybes-                 [("transactionOptions" .=) <$>-                    _btrTransactionOptions])---- | The request for Datastore.RunQuery.------ /See:/ 'runQueryRequest' smart constructor.-data RunQueryRequest =-  RunQueryRequest'-    { _rqrPartitionId :: !(Maybe PartitionId)-    , _rqrGqlQuery    :: !(Maybe GqlQuery)-    , _rqrQuery       :: !(Maybe Query)-    , _rqrReadOptions :: !(Maybe ReadOptions)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'RunQueryRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rqrPartitionId'------ * 'rqrGqlQuery'------ * 'rqrQuery'------ * 'rqrReadOptions'-runQueryRequest-    :: RunQueryRequest-runQueryRequest =-  RunQueryRequest'-    { _rqrPartitionId = Nothing-    , _rqrGqlQuery = Nothing-    , _rqrQuery = Nothing-    , _rqrReadOptions = Nothing-    }----- | Entities are partitioned into subsets, identified by a partition ID.--- Queries are scoped to a single partition. This partition ID is--- normalized with the standard default context partition ID.-rqrPartitionId :: Lens' RunQueryRequest (Maybe PartitionId)-rqrPartitionId-  = lens _rqrPartitionId-      (\ s a -> s{_rqrPartitionId = a})---- | The GQL query to run.-rqrGqlQuery :: Lens' RunQueryRequest (Maybe GqlQuery)-rqrGqlQuery-  = lens _rqrGqlQuery (\ s a -> s{_rqrGqlQuery = a})---- | The query to run.-rqrQuery :: Lens' RunQueryRequest (Maybe Query)-rqrQuery = lens _rqrQuery (\ s a -> s{_rqrQuery = a})---- | The options for this query.-rqrReadOptions :: Lens' RunQueryRequest (Maybe ReadOptions)-rqrReadOptions-  = lens _rqrReadOptions-      (\ s a -> s{_rqrReadOptions = a})--instance FromJSON RunQueryRequest where-        parseJSON-          = withObject "RunQueryRequest"-              (\ o ->-                 RunQueryRequest' <$>-                   (o .:? "partitionId") <*> (o .:? "gqlQuery") <*>-                     (o .:? "query")-                     <*> (o .:? "readOptions"))--instance ToJSON RunQueryRequest where-        toJSON RunQueryRequest'{..}-          = object-              (catMaybes-                 [("partitionId" .=) <$> _rqrPartitionId,-                  ("gqlQuery" .=) <$> _rqrGqlQuery,-                  ("query" .=) <$> _rqrQuery,-                  ("readOptions" .=) <$> _rqrReadOptions])---- | The request for Datastore.AllocateIds.------ /See:/ 'allocateIdsRequest' smart constructor.-newtype AllocateIdsRequest =-  AllocateIdsRequest'-    { _airKeys :: Maybe [Key]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'AllocateIdsRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'airKeys'-allocateIdsRequest-    :: AllocateIdsRequest-allocateIdsRequest = AllocateIdsRequest' {_airKeys = Nothing}----- | A list of keys with incomplete key paths for which to allocate IDs. No--- key may be reserved\/read-only.-airKeys :: Lens' AllocateIdsRequest [Key]-airKeys-  = lens _airKeys (\ s a -> s{_airKeys = a}) . _Default-      . _Coerce--instance FromJSON AllocateIdsRequest where-        parseJSON-          = withObject "AllocateIdsRequest"-              (\ o ->-                 AllocateIdsRequest' <$> (o .:? "keys" .!= mempty))--instance ToJSON AllocateIdsRequest where-        toJSON AllocateIdsRequest'{..}-          = object (catMaybes [("keys" .=) <$> _airKeys])---- | Metadata for ExportEntities operations.------ /See:/ 'googleDatastoreAdminV1ExportEntitiesMetadata' smart constructor.-data GoogleDatastoreAdminV1ExportEntitiesMetadata =-  GoogleDatastoreAdminV1ExportEntitiesMetadata'-    { _gdaveemProgressBytes    :: !(Maybe GoogleDatastoreAdminV1Progress)-    , _gdaveemOutputURLPrefix  :: !(Maybe Text)-    , _gdaveemProgressEntities :: !(Maybe GoogleDatastoreAdminV1Progress)-    , _gdaveemEntityFilter     :: !(Maybe GoogleDatastoreAdminV1EntityFilter)-    , _gdaveemCommon           :: !(Maybe GoogleDatastoreAdminV1CommonMetadata)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GoogleDatastoreAdminV1ExportEntitiesMetadata' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gdaveemProgressBytes'------ * 'gdaveemOutputURLPrefix'------ * 'gdaveemProgressEntities'------ * 'gdaveemEntityFilter'------ * 'gdaveemCommon'-googleDatastoreAdminV1ExportEntitiesMetadata-    :: GoogleDatastoreAdminV1ExportEntitiesMetadata-googleDatastoreAdminV1ExportEntitiesMetadata =-  GoogleDatastoreAdminV1ExportEntitiesMetadata'-    { _gdaveemProgressBytes = Nothing-    , _gdaveemOutputURLPrefix = Nothing-    , _gdaveemProgressEntities = Nothing-    , _gdaveemEntityFilter = Nothing-    , _gdaveemCommon = Nothing-    }----- | An estimate of the number of bytes processed.-gdaveemProgressBytes :: Lens' GoogleDatastoreAdminV1ExportEntitiesMetadata (Maybe GoogleDatastoreAdminV1Progress)-gdaveemProgressBytes-  = lens _gdaveemProgressBytes-      (\ s a -> s{_gdaveemProgressBytes = a})---- | Location for the export metadata and data files. This will be the same--- value as the--- google.datastore.admin.v1.ExportEntitiesRequest.output_url_prefix field.--- The final output location is provided in--- google.datastore.admin.v1.ExportEntitiesResponse.output_url.-gdaveemOutputURLPrefix :: Lens' GoogleDatastoreAdminV1ExportEntitiesMetadata (Maybe Text)-gdaveemOutputURLPrefix-  = lens _gdaveemOutputURLPrefix-      (\ s a -> s{_gdaveemOutputURLPrefix = a})---- | An estimate of the number of entities processed.-gdaveemProgressEntities :: Lens' GoogleDatastoreAdminV1ExportEntitiesMetadata (Maybe GoogleDatastoreAdminV1Progress)-gdaveemProgressEntities-  = lens _gdaveemProgressEntities-      (\ s a -> s{_gdaveemProgressEntities = a})---- | Description of which entities are being exported.-gdaveemEntityFilter :: Lens' GoogleDatastoreAdminV1ExportEntitiesMetadata (Maybe GoogleDatastoreAdminV1EntityFilter)-gdaveemEntityFilter-  = lens _gdaveemEntityFilter-      (\ s a -> s{_gdaveemEntityFilter = a})---- | Metadata common to all Datastore Admin operations.-gdaveemCommon :: Lens' GoogleDatastoreAdminV1ExportEntitiesMetadata (Maybe GoogleDatastoreAdminV1CommonMetadata)-gdaveemCommon-  = lens _gdaveemCommon-      (\ s a -> s{_gdaveemCommon = a})--instance FromJSON-           GoogleDatastoreAdminV1ExportEntitiesMetadata-         where-        parseJSON-          = withObject-              "GoogleDatastoreAdminV1ExportEntitiesMetadata"-              (\ o ->-                 GoogleDatastoreAdminV1ExportEntitiesMetadata' <$>-                   (o .:? "progressBytes") <*> (o .:? "outputUrlPrefix")-                     <*> (o .:? "progressEntities")-                     <*> (o .:? "entityFilter")-                     <*> (o .:? "common"))--instance ToJSON-           GoogleDatastoreAdminV1ExportEntitiesMetadata-         where-        toJSON-          GoogleDatastoreAdminV1ExportEntitiesMetadata'{..}-          = object-              (catMaybes-                 [("progressBytes" .=) <$> _gdaveemProgressBytes,-                  ("outputUrlPrefix" .=) <$> _gdaveemOutputURLPrefix,-                  ("progressEntities" .=) <$> _gdaveemProgressEntities,-                  ("entityFilter" .=) <$> _gdaveemEntityFilter,-                  ("common" .=) <$> _gdaveemCommon])---- | Metadata common to all Datastore Admin operations.------ /See:/ 'googleDatastoreAdminV1beta1CommonMetadata' smart constructor.-data GoogleDatastoreAdminV1beta1CommonMetadata =-  GoogleDatastoreAdminV1beta1CommonMetadata'-    { _gdavcmState         :: !(Maybe GoogleDatastoreAdminV1beta1CommonMetadataState)-    , _gdavcmStartTime     :: !(Maybe DateTime')-    , _gdavcmEndTime       :: !(Maybe DateTime')-    , _gdavcmLabels        :: !(Maybe GoogleDatastoreAdminV1beta1CommonMetadataLabels)-    , _gdavcmOperationType :: !(Maybe GoogleDatastoreAdminV1beta1CommonMetadataOperationType)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GoogleDatastoreAdminV1beta1CommonMetadata' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gdavcmState'------ * 'gdavcmStartTime'------ * 'gdavcmEndTime'------ * 'gdavcmLabels'------ * 'gdavcmOperationType'-googleDatastoreAdminV1beta1CommonMetadata-    :: GoogleDatastoreAdminV1beta1CommonMetadata-googleDatastoreAdminV1beta1CommonMetadata =-  GoogleDatastoreAdminV1beta1CommonMetadata'-    { _gdavcmState = Nothing-    , _gdavcmStartTime = Nothing-    , _gdavcmEndTime = Nothing-    , _gdavcmLabels = Nothing-    , _gdavcmOperationType = Nothing-    }----- | The current state of the Operation.-gdavcmState :: Lens' GoogleDatastoreAdminV1beta1CommonMetadata (Maybe GoogleDatastoreAdminV1beta1CommonMetadataState)-gdavcmState-  = lens _gdavcmState (\ s a -> s{_gdavcmState = a})---- | The time that work began on the operation.-gdavcmStartTime :: Lens' GoogleDatastoreAdminV1beta1CommonMetadata (Maybe UTCTime)-gdavcmStartTime-  = lens _gdavcmStartTime-      (\ s a -> s{_gdavcmStartTime = a})-      . mapping _DateTime---- | The time the operation ended, either successfully or otherwise.-gdavcmEndTime :: Lens' GoogleDatastoreAdminV1beta1CommonMetadata (Maybe UTCTime)-gdavcmEndTime-  = lens _gdavcmEndTime-      (\ s a -> s{_gdavcmEndTime = a})-      . mapping _DateTime---- | The client-assigned labels which were provided when the operation was--- created. May also include additional labels.-gdavcmLabels :: Lens' GoogleDatastoreAdminV1beta1CommonMetadata (Maybe GoogleDatastoreAdminV1beta1CommonMetadataLabels)-gdavcmLabels-  = lens _gdavcmLabels (\ s a -> s{_gdavcmLabels = a})---- | The type of the operation. Can be used as a filter in--- ListOperationsRequest.-gdavcmOperationType :: Lens' GoogleDatastoreAdminV1beta1CommonMetadata (Maybe GoogleDatastoreAdminV1beta1CommonMetadataOperationType)-gdavcmOperationType-  = lens _gdavcmOperationType-      (\ s a -> s{_gdavcmOperationType = a})--instance FromJSON-           GoogleDatastoreAdminV1beta1CommonMetadata-         where-        parseJSON-          = withObject-              "GoogleDatastoreAdminV1beta1CommonMetadata"-              (\ o ->-                 GoogleDatastoreAdminV1beta1CommonMetadata' <$>-                   (o .:? "state") <*> (o .:? "startTime") <*>-                     (o .:? "endTime")-                     <*> (o .:? "labels")-                     <*> (o .:? "operationType"))--instance ToJSON-           GoogleDatastoreAdminV1beta1CommonMetadata-         where-        toJSON GoogleDatastoreAdminV1beta1CommonMetadata'{..}-          = object-              (catMaybes-                 [("state" .=) <$> _gdavcmState,-                  ("startTime" .=) <$> _gdavcmStartTime,-                  ("endTime" .=) <$> _gdavcmEndTime,-                  ("labels" .=) <$> _gdavcmLabels,-                  ("operationType" .=) <$> _gdavcmOperationType])---- | A generic empty message that you can re-use to avoid defining duplicated--- empty messages in your APIs. A typical example is to use it as the--- request or the response type of an API method. For instance: service Foo--- { rpc Bar(google.protobuf.Empty) returns (google.protobuf.Empty); } The--- JSON representation for \`Empty\` is empty JSON object \`{}\`.------ /See:/ 'empty' smart constructor.-data Empty =-  Empty'-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Empty' with the minimum fields required to make a request.----empty-    :: Empty-empty = Empty'---instance FromJSON Empty where-        parseJSON = withObject "Empty" (\ o -> pure Empty')--instance ToJSON Empty where-        toJSON = const emptyObject---- | A filter that merges multiple other filters using the given operator.------ /See:/ 'compositeFilter' smart constructor.-data CompositeFilter =-  CompositeFilter'-    { _cfOp      :: !(Maybe CompositeFilterOp)-    , _cfFilters :: !(Maybe [Filter])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CompositeFilter' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cfOp'------ * 'cfFilters'-compositeFilter-    :: CompositeFilter-compositeFilter = CompositeFilter' {_cfOp = Nothing, _cfFilters = Nothing}----- | The operator for combining multiple filters.-cfOp :: Lens' CompositeFilter (Maybe CompositeFilterOp)-cfOp = lens _cfOp (\ s a -> s{_cfOp = a})---- | The list of filters to combine. Must contain at least one filter.-cfFilters :: Lens' CompositeFilter [Filter]-cfFilters-  = lens _cfFilters (\ s a -> s{_cfFilters = a}) .-      _Default-      . _Coerce--instance FromJSON CompositeFilter where-        parseJSON-          = withObject "CompositeFilter"-              (\ o ->-                 CompositeFilter' <$>-                   (o .:? "op") <*> (o .:? "filters" .!= mempty))--instance ToJSON CompositeFilter where-        toJSON CompositeFilter'{..}-          = object-              (catMaybes-                 [("op" .=) <$> _cfOp, ("filters" .=) <$> _cfFilters])---- | Metadata for Index operations.------ /See:/ 'googleDatastoreAdminV1IndexOperationMetadata' smart constructor.-data GoogleDatastoreAdminV1IndexOperationMetadata =-  GoogleDatastoreAdminV1IndexOperationMetadata'-    { _gdaviomProgressEntities :: !(Maybe GoogleDatastoreAdminV1Progress)-    , _gdaviomCommon           :: !(Maybe GoogleDatastoreAdminV1CommonMetadata)-    , _gdaviomIndexId          :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GoogleDatastoreAdminV1IndexOperationMetadata' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gdaviomProgressEntities'------ * 'gdaviomCommon'------ * 'gdaviomIndexId'-googleDatastoreAdminV1IndexOperationMetadata-    :: GoogleDatastoreAdminV1IndexOperationMetadata-googleDatastoreAdminV1IndexOperationMetadata =-  GoogleDatastoreAdminV1IndexOperationMetadata'-    { _gdaviomProgressEntities = Nothing-    , _gdaviomCommon = Nothing-    , _gdaviomIndexId = Nothing-    }----- | An estimate of the number of entities processed.-gdaviomProgressEntities :: Lens' GoogleDatastoreAdminV1IndexOperationMetadata (Maybe GoogleDatastoreAdminV1Progress)-gdaviomProgressEntities-  = lens _gdaviomProgressEntities-      (\ s a -> s{_gdaviomProgressEntities = a})---- | Metadata common to all Datastore Admin operations.-gdaviomCommon :: Lens' GoogleDatastoreAdminV1IndexOperationMetadata (Maybe GoogleDatastoreAdminV1CommonMetadata)-gdaviomCommon-  = lens _gdaviomCommon-      (\ s a -> s{_gdaviomCommon = a})---- | The index resource ID that this operation is acting on.-gdaviomIndexId :: Lens' GoogleDatastoreAdminV1IndexOperationMetadata (Maybe Text)-gdaviomIndexId-  = lens _gdaviomIndexId-      (\ s a -> s{_gdaviomIndexId = a})--instance FromJSON-           GoogleDatastoreAdminV1IndexOperationMetadata-         where-        parseJSON-          = withObject-              "GoogleDatastoreAdminV1IndexOperationMetadata"-              (\ o ->-                 GoogleDatastoreAdminV1IndexOperationMetadata' <$>-                   (o .:? "progressEntities") <*> (o .:? "common") <*>-                     (o .:? "indexId"))--instance ToJSON-           GoogleDatastoreAdminV1IndexOperationMetadata-         where-        toJSON-          GoogleDatastoreAdminV1IndexOperationMetadata'{..}-          = object-              (catMaybes-                 [("progressEntities" .=) <$>-                    _gdaviomProgressEntities,-                  ("common" .=) <$> _gdaviomCommon,-                  ("indexId" .=) <$> _gdaviomIndexId])---- | Metadata for ImportEntities operations.------ /See:/ 'googleDatastoreAdminV1beta1ImportEntitiesMetadata' smart constructor.-data GoogleDatastoreAdminV1beta1ImportEntitiesMetadata =-  GoogleDatastoreAdminV1beta1ImportEntitiesMetadata'-    { _gdaviemProgressBytes    :: !(Maybe GoogleDatastoreAdminV1beta1Progress)-    , _gdaviemProgressEntities :: !(Maybe GoogleDatastoreAdminV1beta1Progress)-    , _gdaviemEntityFilter     :: !(Maybe GoogleDatastoreAdminV1beta1EntityFilter)-    , _gdaviemInputURL         :: !(Maybe Text)-    , _gdaviemCommon           :: !(Maybe GoogleDatastoreAdminV1beta1CommonMetadata)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GoogleDatastoreAdminV1beta1ImportEntitiesMetadata' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gdaviemProgressBytes'------ * 'gdaviemProgressEntities'------ * 'gdaviemEntityFilter'------ * 'gdaviemInputURL'------ * 'gdaviemCommon'-googleDatastoreAdminV1beta1ImportEntitiesMetadata-    :: GoogleDatastoreAdminV1beta1ImportEntitiesMetadata-googleDatastoreAdminV1beta1ImportEntitiesMetadata =-  GoogleDatastoreAdminV1beta1ImportEntitiesMetadata'-    { _gdaviemProgressBytes = Nothing-    , _gdaviemProgressEntities = Nothing-    , _gdaviemEntityFilter = Nothing-    , _gdaviemInputURL = Nothing-    , _gdaviemCommon = Nothing-    }----- | An estimate of the number of bytes processed.-gdaviemProgressBytes :: Lens' GoogleDatastoreAdminV1beta1ImportEntitiesMetadata (Maybe GoogleDatastoreAdminV1beta1Progress)-gdaviemProgressBytes-  = lens _gdaviemProgressBytes-      (\ s a -> s{_gdaviemProgressBytes = a})---- | An estimate of the number of entities processed.-gdaviemProgressEntities :: Lens' GoogleDatastoreAdminV1beta1ImportEntitiesMetadata (Maybe GoogleDatastoreAdminV1beta1Progress)-gdaviemProgressEntities-  = lens _gdaviemProgressEntities-      (\ s a -> s{_gdaviemProgressEntities = a})---- | Description of which entities are being imported.-gdaviemEntityFilter :: Lens' GoogleDatastoreAdminV1beta1ImportEntitiesMetadata (Maybe GoogleDatastoreAdminV1beta1EntityFilter)-gdaviemEntityFilter-  = lens _gdaviemEntityFilter-      (\ s a -> s{_gdaviemEntityFilter = a})---- | The location of the import metadata file. This will be the same value as--- the google.datastore.admin.v1beta1.ExportEntitiesResponse.output_url--- field.-gdaviemInputURL :: Lens' GoogleDatastoreAdminV1beta1ImportEntitiesMetadata (Maybe Text)-gdaviemInputURL-  = lens _gdaviemInputURL-      (\ s a -> s{_gdaviemInputURL = a})---- | Metadata common to all Datastore Admin operations.-gdaviemCommon :: Lens' GoogleDatastoreAdminV1beta1ImportEntitiesMetadata (Maybe GoogleDatastoreAdminV1beta1CommonMetadata)-gdaviemCommon-  = lens _gdaviemCommon-      (\ s a -> s{_gdaviemCommon = a})--instance FromJSON-           GoogleDatastoreAdminV1beta1ImportEntitiesMetadata-         where-        parseJSON-          = withObject-              "GoogleDatastoreAdminV1beta1ImportEntitiesMetadata"-              (\ o ->-                 GoogleDatastoreAdminV1beta1ImportEntitiesMetadata'-                   <$>-                   (o .:? "progressBytes") <*>-                     (o .:? "progressEntities")-                     <*> (o .:? "entityFilter")-                     <*> (o .:? "inputUrl")-                     <*> (o .:? "common"))--instance ToJSON-           GoogleDatastoreAdminV1beta1ImportEntitiesMetadata-         where-        toJSON-          GoogleDatastoreAdminV1beta1ImportEntitiesMetadata'{..}-          = object-              (catMaybes-                 [("progressBytes" .=) <$> _gdaviemProgressBytes,-                  ("progressEntities" .=) <$> _gdaviemProgressEntities,-                  ("entityFilter" .=) <$> _gdaviemEntityFilter,-                  ("inputUrl" .=) <$> _gdaviemInputURL,-                  ("common" .=) <$> _gdaviemCommon])---- | Measures the progress of a particular metric.------ /See:/ 'googleDatastoreAdminV1beta1Progress' smart constructor.-data GoogleDatastoreAdminV1beta1Progress =-  GoogleDatastoreAdminV1beta1Progress'-    { _gdavpWorkCompleted :: !(Maybe (Textual Int64))-    , _gdavpWorkEstimated :: !(Maybe (Textual Int64))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GoogleDatastoreAdminV1beta1Progress' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gdavpWorkCompleted'------ * 'gdavpWorkEstimated'-googleDatastoreAdminV1beta1Progress-    :: GoogleDatastoreAdminV1beta1Progress-googleDatastoreAdminV1beta1Progress =-  GoogleDatastoreAdminV1beta1Progress'-    {_gdavpWorkCompleted = Nothing, _gdavpWorkEstimated = Nothing}----- | The amount of work that has been completed. Note that this may be--- greater than work_estimated.-gdavpWorkCompleted :: Lens' GoogleDatastoreAdminV1beta1Progress (Maybe Int64)-gdavpWorkCompleted-  = lens _gdavpWorkCompleted-      (\ s a -> s{_gdavpWorkCompleted = a})-      . mapping _Coerce---- | An estimate of how much work needs to be performed. May be zero if the--- work estimate is unavailable.-gdavpWorkEstimated :: Lens' GoogleDatastoreAdminV1beta1Progress (Maybe Int64)-gdavpWorkEstimated-  = lens _gdavpWorkEstimated-      (\ s a -> s{_gdavpWorkEstimated = a})-      . mapping _Coerce--instance FromJSON GoogleDatastoreAdminV1beta1Progress-         where-        parseJSON-          = withObject "GoogleDatastoreAdminV1beta1Progress"-              (\ o ->-                 GoogleDatastoreAdminV1beta1Progress' <$>-                   (o .:? "workCompleted") <*> (o .:? "workEstimated"))--instance ToJSON GoogleDatastoreAdminV1beta1Progress-         where-        toJSON GoogleDatastoreAdminV1beta1Progress'{..}-          = object-              (catMaybes-                 [("workCompleted" .=) <$> _gdavpWorkCompleted,-                  ("workEstimated" .=) <$> _gdavpWorkEstimated])---- | The response for Datastore.BeginTransaction.------ /See:/ 'beginTransactionResponse' smart constructor.-newtype BeginTransactionResponse =-  BeginTransactionResponse'-    { _btrTransaction :: Maybe Bytes-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'BeginTransactionResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'btrTransaction'-beginTransactionResponse-    :: BeginTransactionResponse-beginTransactionResponse = BeginTransactionResponse' {_btrTransaction = Nothing}----- | The transaction identifier (always present).-btrTransaction :: Lens' BeginTransactionResponse (Maybe ByteString)-btrTransaction-  = lens _btrTransaction-      (\ s a -> s{_btrTransaction = a})-      . mapping _Bytes--instance FromJSON BeginTransactionResponse where-        parseJSON-          = withObject "BeginTransactionResponse"-              (\ o ->-                 BeginTransactionResponse' <$> (o .:? "transaction"))--instance ToJSON BeginTransactionResponse where-        toJSON BeginTransactionResponse'{..}-          = object-              (catMaybes [("transaction" .=) <$> _btrTransaction])---- | The result of applying a mutation.------ /See:/ 'mutationResult' smart constructor.-data MutationResult =-  MutationResult'-    { _mrConflictDetected :: !(Maybe Bool)-    , _mrKey              :: !(Maybe Key)-    , _mrVersion          :: !(Maybe (Textual Int64))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'MutationResult' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mrConflictDetected'------ * 'mrKey'------ * 'mrVersion'-mutationResult-    :: MutationResult-mutationResult =-  MutationResult'-    {_mrConflictDetected = Nothing, _mrKey = Nothing, _mrVersion = Nothing}----- | Whether a conflict was detected for this mutation. Always false when a--- conflict detection strategy field is not set in the mutation.-mrConflictDetected :: Lens' MutationResult (Maybe Bool)-mrConflictDetected-  = lens _mrConflictDetected-      (\ s a -> s{_mrConflictDetected = a})---- | The automatically allocated key. Set only when the mutation allocated a--- key.-mrKey :: Lens' MutationResult (Maybe Key)-mrKey = lens _mrKey (\ s a -> s{_mrKey = a})---- | The version of the entity on the server after processing the mutation.--- If the mutation doesn\'t change anything on the server, then the version--- will be the version of the current entity or, if no entity is present, a--- version that is strictly greater than the version of any previous entity--- and less than the version of any possible future entity.-mrVersion :: Lens' MutationResult (Maybe Int64)-mrVersion-  = lens _mrVersion (\ s a -> s{_mrVersion = a}) .-      mapping _Coerce--instance FromJSON MutationResult where-        parseJSON-          = withObject "MutationResult"-              (\ o ->-                 MutationResult' <$>-                   (o .:? "conflictDetected") <*> (o .:? "key") <*>-                     (o .:? "version"))--instance ToJSON MutationResult where-        toJSON MutationResult'{..}-          = object-              (catMaybes-                 [("conflictDetected" .=) <$> _mrConflictDetected,-                  ("key" .=) <$> _mrKey,-                  ("version" .=) <$> _mrVersion])---- | The response for Datastore.AllocateIds.------ /See:/ 'allocateIdsResponse' smart constructor.-newtype AllocateIdsResponse =-  AllocateIdsResponse'-    { _aKeys :: Maybe [Key]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'AllocateIdsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'aKeys'-allocateIdsResponse-    :: AllocateIdsResponse-allocateIdsResponse = AllocateIdsResponse' {_aKeys = Nothing}----- | The keys specified in the request (in the same order), each with its key--- path completed with a newly allocated ID.-aKeys :: Lens' AllocateIdsResponse [Key]-aKeys-  = lens _aKeys (\ s a -> s{_aKeys = a}) . _Default .-      _Coerce--instance FromJSON AllocateIdsResponse where-        parseJSON-          = withObject "AllocateIdsResponse"-              (\ o ->-                 AllocateIdsResponse' <$> (o .:? "keys" .!= mempty))--instance ToJSON AllocateIdsResponse where-        toJSON AllocateIdsResponse'{..}-          = object (catMaybes [("keys" .=) <$> _aKeys])---- | A [GQL--- query](https:\/\/cloud.google.com\/datastore\/docs\/apis\/gql\/gql_reference).------ /See:/ 'gqlQuery' smart constructor.-data GqlQuery =-  GqlQuery'-    { _gqPositionalBindings :: !(Maybe [GqlQueryParameter])-    , _gqNamedBindings      :: !(Maybe GqlQueryNamedBindings)-    , _gqQueryString        :: !(Maybe Text)-    , _gqAllowLiterals      :: !(Maybe Bool)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GqlQuery' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gqPositionalBindings'------ * 'gqNamedBindings'------ * 'gqQueryString'------ * 'gqAllowLiterals'-gqlQuery-    :: GqlQuery-gqlQuery =-  GqlQuery'-    { _gqPositionalBindings = Nothing-    , _gqNamedBindings = Nothing-    , _gqQueryString = Nothing-    , _gqAllowLiterals = Nothing-    }----- | Numbered binding site \'1 references the first numbered parameter,--- effectively using 1-based indexing, rather than the usual 0. For each--- binding site numbered i in \`query_string\`, there must be an i-th--- numbered parameter. The inverse must also be true.-gqPositionalBindings :: Lens' GqlQuery [GqlQueryParameter]-gqPositionalBindings-  = lens _gqPositionalBindings-      (\ s a -> s{_gqPositionalBindings = a})-      . _Default-      . _Coerce---- | For each non-reserved named binding site in the query string, there must--- be a named parameter with that name, but not necessarily the inverse.--- Key must match regex \`A-Za-z_$*\`, must not match regex \`__.*__\`, and--- must not be \`\"\"\`.-gqNamedBindings :: Lens' GqlQuery (Maybe GqlQueryNamedBindings)-gqNamedBindings-  = lens _gqNamedBindings-      (\ s a -> s{_gqNamedBindings = a})---- | A string of the format described--- [here](https:\/\/cloud.google.com\/datastore\/docs\/apis\/gql\/gql_reference).-gqQueryString :: Lens' GqlQuery (Maybe Text)-gqQueryString-  = lens _gqQueryString-      (\ s a -> s{_gqQueryString = a})---- | When false, the query string must not contain any literals and instead--- must bind all values. For example, \`SELECT * FROM Kind WHERE a =--- \'string literal\'\` is not allowed, while \`SELECT * FROM Kind WHERE a--- = \'value\` is.-gqAllowLiterals :: Lens' GqlQuery (Maybe Bool)-gqAllowLiterals-  = lens _gqAllowLiterals-      (\ s a -> s{_gqAllowLiterals = a})--instance FromJSON GqlQuery where-        parseJSON-          = withObject "GqlQuery"-              (\ o ->-                 GqlQuery' <$>-                   (o .:? "positionalBindings" .!= mempty) <*>-                     (o .:? "namedBindings")-                     <*> (o .:? "queryString")-                     <*> (o .:? "allowLiterals"))--instance ToJSON GqlQuery where-        toJSON GqlQuery'{..}-          = object-              (catMaybes-                 [("positionalBindings" .=) <$> _gqPositionalBindings,-                  ("namedBindings" .=) <$> _gqNamedBindings,-                  ("queryString" .=) <$> _gqQueryString,-                  ("allowLiterals" .=) <$> _gqAllowLiterals])---- | The response for Datastore.RunQuery.------ /See:/ 'runQueryResponse' smart constructor.-data RunQueryResponse =-  RunQueryResponse'-    { _rBatch :: !(Maybe QueryResultBatch)-    , _rQuery :: !(Maybe Query)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'RunQueryResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rBatch'------ * 'rQuery'-runQueryResponse-    :: RunQueryResponse-runQueryResponse = RunQueryResponse' {_rBatch = Nothing, _rQuery = Nothing}----- | A batch of query results (always present).-rBatch :: Lens' RunQueryResponse (Maybe QueryResultBatch)-rBatch = lens _rBatch (\ s a -> s{_rBatch = a})---- | The parsed form of the \`GqlQuery\` from the request, if it was set.-rQuery :: Lens' RunQueryResponse (Maybe Query)-rQuery = lens _rQuery (\ s a -> s{_rQuery = a})--instance FromJSON RunQueryResponse where-        parseJSON-          = withObject "RunQueryResponse"-              (\ o ->-                 RunQueryResponse' <$>-                   (o .:? "batch") <*> (o .:? "query"))--instance ToJSON RunQueryResponse where-        toJSON RunQueryResponse'{..}-          = object-              (catMaybes-                 [("batch" .=) <$> _rBatch, ("query" .=) <$> _rQuery])---- | Client-assigned labels.------ /See:/ 'googleDatastoreAdminV1ExportEntitiesRequestLabels' smart constructor.-newtype GoogleDatastoreAdminV1ExportEntitiesRequestLabels =-  GoogleDatastoreAdminV1ExportEntitiesRequestLabels'-    { _gdaveerlAddtional :: HashMap Text Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GoogleDatastoreAdminV1ExportEntitiesRequestLabels' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gdaveerlAddtional'-googleDatastoreAdminV1ExportEntitiesRequestLabels-    :: HashMap Text Text -- ^ 'gdaveerlAddtional'-    -> GoogleDatastoreAdminV1ExportEntitiesRequestLabels-googleDatastoreAdminV1ExportEntitiesRequestLabels pGdaveerlAddtional_ =-  GoogleDatastoreAdminV1ExportEntitiesRequestLabels'-    {_gdaveerlAddtional = _Coerce # pGdaveerlAddtional_}---gdaveerlAddtional :: Lens' GoogleDatastoreAdminV1ExportEntitiesRequestLabels (HashMap Text Text)-gdaveerlAddtional-  = lens _gdaveerlAddtional-      (\ s a -> s{_gdaveerlAddtional = a})-      . _Coerce--instance FromJSON-           GoogleDatastoreAdminV1ExportEntitiesRequestLabels-         where-        parseJSON-          = withObject-              "GoogleDatastoreAdminV1ExportEntitiesRequestLabels"-              (\ o ->-                 GoogleDatastoreAdminV1ExportEntitiesRequestLabels'-                   <$> (parseJSONObject o))--instance ToJSON-           GoogleDatastoreAdminV1ExportEntitiesRequestLabels-         where-        toJSON = toJSON . _gdaveerlAddtional---- | A message that can hold any of the supported value types and associated--- metadata.------ /See:/ 'value' smart constructor.-data Value =-  Value'-    { _vKeyValue           :: !(Maybe Key)-    , _vGeoPointValue      :: !(Maybe LatLng)-    , _vIntegerValue       :: !(Maybe (Textual Int64))-    , _vTimestampValue     :: !(Maybe DateTime')-    , _vEntityValue        :: !(Maybe Entity)-    , _vExcludeFromIndexes :: !(Maybe Bool)-    , _vDoubleValue        :: !(Maybe (Textual Double))-    , _vStringValue        :: !(Maybe Text)-    , _vBooleanValue       :: !(Maybe Bool)-    , _vMeaning            :: !(Maybe (Textual Int32))-    , _vArrayValue         :: !(Maybe ArrayValue)-    , _vNullValue          :: !(Maybe ValueNullValue)-    , _vBlobValue          :: !(Maybe Bytes)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Value' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'vKeyValue'------ * 'vGeoPointValue'------ * 'vIntegerValue'------ * 'vTimestampValue'------ * 'vEntityValue'------ * 'vExcludeFromIndexes'------ * 'vDoubleValue'------ * 'vStringValue'------ * 'vBooleanValue'------ * 'vMeaning'------ * 'vArrayValue'------ * 'vNullValue'------ * 'vBlobValue'-value-    :: Value-value =-  Value'-    { _vKeyValue = Nothing-    , _vGeoPointValue = Nothing-    , _vIntegerValue = Nothing-    , _vTimestampValue = Nothing-    , _vEntityValue = Nothing-    , _vExcludeFromIndexes = Nothing-    , _vDoubleValue = Nothing-    , _vStringValue = Nothing-    , _vBooleanValue = Nothing-    , _vMeaning = Nothing-    , _vArrayValue = Nothing-    , _vNullValue = Nothing-    , _vBlobValue = Nothing-    }----- | A key value.-vKeyValue :: Lens' Value (Maybe Key)-vKeyValue-  = lens _vKeyValue (\ s a -> s{_vKeyValue = a})---- | A geo point value representing a point on the surface of Earth.-vGeoPointValue :: Lens' Value (Maybe LatLng)-vGeoPointValue-  = lens _vGeoPointValue-      (\ s a -> s{_vGeoPointValue = a})---- | An integer value.-vIntegerValue :: Lens' Value (Maybe Int64)-vIntegerValue-  = lens _vIntegerValue-      (\ s a -> s{_vIntegerValue = a})-      . mapping _Coerce---- | A timestamp value. When stored in the Datastore, precise only to--- microseconds; any additional precision is rounded down.-vTimestampValue :: Lens' Value (Maybe UTCTime)-vTimestampValue-  = lens _vTimestampValue-      (\ s a -> s{_vTimestampValue = a})-      . mapping _DateTime---- | An entity value. - May have no key. - May have a key with an incomplete--- key path. - May have a reserved\/read-only key.-vEntityValue :: Lens' Value (Maybe Entity)-vEntityValue-  = lens _vEntityValue (\ s a -> s{_vEntityValue = a})---- | If the value should be excluded from all indexes including those defined--- explicitly.-vExcludeFromIndexes :: Lens' Value (Maybe Bool)-vExcludeFromIndexes-  = lens _vExcludeFromIndexes-      (\ s a -> s{_vExcludeFromIndexes = a})---- | A double value.-vDoubleValue :: Lens' Value (Maybe Double)-vDoubleValue-  = lens _vDoubleValue (\ s a -> s{_vDoubleValue = a})-      . mapping _Coerce---- | A UTF-8 encoded string value. When \`exclude_from_indexes\` is false (it--- is indexed) , may have at most 1500 bytes. Otherwise, may be set to at--- least 1,000,000 bytes.-vStringValue :: Lens' Value (Maybe Text)-vStringValue-  = lens _vStringValue (\ s a -> s{_vStringValue = a})---- | A boolean value.-vBooleanValue :: Lens' Value (Maybe Bool)-vBooleanValue-  = lens _vBooleanValue-      (\ s a -> s{_vBooleanValue = a})---- | The \`meaning\` field should only be populated for backwards--- compatibility.-vMeaning :: Lens' Value (Maybe Int32)-vMeaning-  = lens _vMeaning (\ s a -> s{_vMeaning = a}) .-      mapping _Coerce---- | An array value. Cannot contain another array value. A \`Value\` instance--- that sets field \`array_value\` must not set fields \`meaning\` or--- \`exclude_from_indexes\`.-vArrayValue :: Lens' Value (Maybe ArrayValue)-vArrayValue-  = lens _vArrayValue (\ s a -> s{_vArrayValue = a})---- | A null value.-vNullValue :: Lens' Value (Maybe ValueNullValue)-vNullValue-  = lens _vNullValue (\ s a -> s{_vNullValue = a})---- | A blob value. May have at most 1,000,000 bytes. When--- \`exclude_from_indexes\` is false, may have at most 1500 bytes. In JSON--- requests, must be base64-encoded.-vBlobValue :: Lens' Value (Maybe ByteString)-vBlobValue-  = lens _vBlobValue (\ s a -> s{_vBlobValue = a}) .-      mapping _Bytes--instance FromJSON Value where-        parseJSON-          = withObject "Value"-              (\ o ->-                 Value' <$>-                   (o .:? "keyValue") <*> (o .:? "geoPointValue") <*>-                     (o .:? "integerValue")-                     <*> (o .:? "timestampValue")-                     <*> (o .:? "entityValue")-                     <*> (o .:? "excludeFromIndexes")-                     <*> (o .:? "doubleValue")-                     <*> (o .:? "stringValue")-                     <*> (o .:? "booleanValue")-                     <*> (o .:? "meaning")-                     <*> (o .:? "arrayValue")-                     <*> (o .:? "nullValue")-                     <*> (o .:? "blobValue"))--instance ToJSON Value where-        toJSON Value'{..}-          = object-              (catMaybes-                 [("keyValue" .=) <$> _vKeyValue,-                  ("geoPointValue" .=) <$> _vGeoPointValue,-                  ("integerValue" .=) <$> _vIntegerValue,-                  ("timestampValue" .=) <$> _vTimestampValue,-                  ("entityValue" .=) <$> _vEntityValue,-                  ("excludeFromIndexes" .=) <$> _vExcludeFromIndexes,-                  ("doubleValue" .=) <$> _vDoubleValue,-                  ("stringValue" .=) <$> _vStringValue,-                  ("booleanValue" .=) <$> _vBooleanValue,-                  ("meaning" .=) <$> _vMeaning,-                  ("arrayValue" .=) <$> _vArrayValue,-                  ("nullValue" .=) <$> _vNullValue,-                  ("blobValue" .=) <$> _vBlobValue])---- | The client-assigned labels which were provided when the operation was--- created. May also include additional labels.------ /See:/ 'googleDatastoreAdminV1CommonMetadataLabels' smart constructor.-newtype GoogleDatastoreAdminV1CommonMetadataLabels =-  GoogleDatastoreAdminV1CommonMetadataLabels'-    { _gdavcmlAddtional :: HashMap Text Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GoogleDatastoreAdminV1CommonMetadataLabels' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gdavcmlAddtional'-googleDatastoreAdminV1CommonMetadataLabels-    :: HashMap Text Text -- ^ 'gdavcmlAddtional'-    -> GoogleDatastoreAdminV1CommonMetadataLabels-googleDatastoreAdminV1CommonMetadataLabels pGdavcmlAddtional_ =-  GoogleDatastoreAdminV1CommonMetadataLabels'-    {_gdavcmlAddtional = _Coerce # pGdavcmlAddtional_}---gdavcmlAddtional :: Lens' GoogleDatastoreAdminV1CommonMetadataLabels (HashMap Text Text)-gdavcmlAddtional-  = lens _gdavcmlAddtional-      (\ s a -> s{_gdavcmlAddtional = a})-      . _Coerce--instance FromJSON-           GoogleDatastoreAdminV1CommonMetadataLabels-         where-        parseJSON-          = withObject-              "GoogleDatastoreAdminV1CommonMetadataLabels"-              (\ o ->-                 GoogleDatastoreAdminV1CommonMetadataLabels' <$>-                   (parseJSONObject o))--instance ToJSON-           GoogleDatastoreAdminV1CommonMetadataLabels-         where-        toJSON = toJSON . _gdavcmlAddtional------- /See:/ 'statusDetailsItem' smart constructor.-newtype StatusDetailsItem =-  StatusDetailsItem'-    { _sdiAddtional :: HashMap Text JSONValue-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'StatusDetailsItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sdiAddtional'-statusDetailsItem-    :: HashMap Text JSONValue -- ^ 'sdiAddtional'-    -> StatusDetailsItem-statusDetailsItem pSdiAddtional_ =-  StatusDetailsItem' {_sdiAddtional = _Coerce # pSdiAddtional_}----- | Properties of the object. Contains field \'type with type URL.-sdiAddtional :: Lens' StatusDetailsItem (HashMap Text JSONValue)-sdiAddtional-  = lens _sdiAddtional (\ s a -> s{_sdiAddtional = a})-      . _Coerce--instance FromJSON StatusDetailsItem where-        parseJSON-          = withObject "StatusDetailsItem"-              (\ o -> StatusDetailsItem' <$> (parseJSONObject o))--instance ToJSON StatusDetailsItem where-        toJSON = toJSON . _sdiAddtional---- | The request for Datastore.Lookup.------ /See:/ 'lookupRequest' smart constructor.-data LookupRequest =-  LookupRequest'-    { _lrKeys        :: !(Maybe [Key])-    , _lrReadOptions :: !(Maybe ReadOptions)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'LookupRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lrKeys'------ * 'lrReadOptions'-lookupRequest-    :: LookupRequest-lookupRequest = LookupRequest' {_lrKeys = Nothing, _lrReadOptions = Nothing}----- | Keys of entities to look up.-lrKeys :: Lens' LookupRequest [Key]-lrKeys-  = lens _lrKeys (\ s a -> s{_lrKeys = a}) . _Default .-      _Coerce---- | The options for this lookup request.-lrReadOptions :: Lens' LookupRequest (Maybe ReadOptions)-lrReadOptions-  = lens _lrReadOptions-      (\ s a -> s{_lrReadOptions = a})--instance FromJSON LookupRequest where-        parseJSON-          = withObject "LookupRequest"-              (\ o ->-                 LookupRequest' <$>-                   (o .:? "keys" .!= mempty) <*> (o .:? "readOptions"))--instance ToJSON LookupRequest where-        toJSON LookupRequest'{..}-          = object-              (catMaybes-                 [("keys" .=) <$> _lrKeys,-                  ("readOptions" .=) <$> _lrReadOptions])---- | Metadata common to all Datastore Admin operations.------ /See:/ 'googleDatastoreAdminV1CommonMetadata' smart constructor.-data GoogleDatastoreAdminV1CommonMetadata =-  GoogleDatastoreAdminV1CommonMetadata'-    { _gState         :: !(Maybe GoogleDatastoreAdminV1CommonMetadataState)-    , _gStartTime     :: !(Maybe DateTime')-    , _gEndTime       :: !(Maybe DateTime')-    , _gLabels        :: !(Maybe GoogleDatastoreAdminV1CommonMetadataLabels)-    , _gOperationType :: !(Maybe GoogleDatastoreAdminV1CommonMetadataOperationType)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GoogleDatastoreAdminV1CommonMetadata' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gState'------ * 'gStartTime'------ * 'gEndTime'------ * 'gLabels'------ * 'gOperationType'-googleDatastoreAdminV1CommonMetadata-    :: GoogleDatastoreAdminV1CommonMetadata-googleDatastoreAdminV1CommonMetadata =-  GoogleDatastoreAdminV1CommonMetadata'-    { _gState = Nothing-    , _gStartTime = Nothing-    , _gEndTime = Nothing-    , _gLabels = Nothing-    , _gOperationType = Nothing-    }----- | The current state of the Operation.-gState :: Lens' GoogleDatastoreAdminV1CommonMetadata (Maybe GoogleDatastoreAdminV1CommonMetadataState)-gState = lens _gState (\ s a -> s{_gState = a})---- | The time that work began on the operation.-gStartTime :: Lens' GoogleDatastoreAdminV1CommonMetadata (Maybe UTCTime)-gStartTime-  = lens _gStartTime (\ s a -> s{_gStartTime = a}) .-      mapping _DateTime---- | The time the operation ended, either successfully or otherwise.-gEndTime :: Lens' GoogleDatastoreAdminV1CommonMetadata (Maybe UTCTime)-gEndTime-  = lens _gEndTime (\ s a -> s{_gEndTime = a}) .-      mapping _DateTime---- | The client-assigned labels which were provided when the operation was--- created. May also include additional labels.-gLabels :: Lens' GoogleDatastoreAdminV1CommonMetadata (Maybe GoogleDatastoreAdminV1CommonMetadataLabels)-gLabels = lens _gLabels (\ s a -> s{_gLabels = a})---- | The type of the operation. Can be used as a filter in--- ListOperationsRequest.-gOperationType :: Lens' GoogleDatastoreAdminV1CommonMetadata (Maybe GoogleDatastoreAdminV1CommonMetadataOperationType)-gOperationType-  = lens _gOperationType-      (\ s a -> s{_gOperationType = a})--instance FromJSON-           GoogleDatastoreAdminV1CommonMetadata-         where-        parseJSON-          = withObject "GoogleDatastoreAdminV1CommonMetadata"-              (\ o ->-                 GoogleDatastoreAdminV1CommonMetadata' <$>-                   (o .:? "state") <*> (o .:? "startTime") <*>-                     (o .:? "endTime")-                     <*> (o .:? "labels")-                     <*> (o .:? "operationType"))--instance ToJSON GoogleDatastoreAdminV1CommonMetadata-         where-        toJSON GoogleDatastoreAdminV1CommonMetadata'{..}-          = object-              (catMaybes-                 [("state" .=) <$> _gState,-                  ("startTime" .=) <$> _gStartTime,-                  ("endTime" .=) <$> _gEndTime,-                  ("labels" .=) <$> _gLabels,-                  ("operationType" .=) <$> _gOperationType])---- | The request for google.datastore.admin.v1.DatastoreAdmin.ExportEntities.------ /See:/ 'googleDatastoreAdminV1ExportEntitiesRequest' smart constructor.-data GoogleDatastoreAdminV1ExportEntitiesRequest =-  GoogleDatastoreAdminV1ExportEntitiesRequest'-    { _gdaveerOutputURLPrefix :: !(Maybe Text)-    , _gdaveerEntityFilter    :: !(Maybe GoogleDatastoreAdminV1EntityFilter)-    , _gdaveerLabels          :: !(Maybe GoogleDatastoreAdminV1ExportEntitiesRequestLabels)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GoogleDatastoreAdminV1ExportEntitiesRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gdaveerOutputURLPrefix'------ * 'gdaveerEntityFilter'------ * 'gdaveerLabels'-googleDatastoreAdminV1ExportEntitiesRequest-    :: GoogleDatastoreAdminV1ExportEntitiesRequest-googleDatastoreAdminV1ExportEntitiesRequest =-  GoogleDatastoreAdminV1ExportEntitiesRequest'-    { _gdaveerOutputURLPrefix = Nothing-    , _gdaveerEntityFilter = Nothing-    , _gdaveerLabels = Nothing-    }----- | Location for the export metadata and data files. The full resource URL--- of the external storage location. Currently, only Google Cloud Storage--- is supported. So output_url_prefix should be of the form:--- \`gs:\/\/BUCKET_NAME[\/NAMESPACE_PATH]\`, where \`BUCKET_NAME\` is the--- name of the Cloud Storage bucket and \`NAMESPACE_PATH\` is an optional--- Cloud Storage namespace path (this is not a Cloud Datastore namespace).--- For more information about Cloud Storage namespace paths, see [Object--- name--- considerations](https:\/\/cloud.google.com\/storage\/docs\/naming#object-considerations).--- The resulting files will be nested deeper than the specified URL prefix.--- The final output URL will be provided in the--- google.datastore.admin.v1.ExportEntitiesResponse.output_url field. That--- value should be used for subsequent ImportEntities operations. By--- nesting the data files deeper, the same Cloud Storage bucket can be used--- in multiple ExportEntities operations without conflict.-gdaveerOutputURLPrefix :: Lens' GoogleDatastoreAdminV1ExportEntitiesRequest (Maybe Text)-gdaveerOutputURLPrefix-  = lens _gdaveerOutputURLPrefix-      (\ s a -> s{_gdaveerOutputURLPrefix = a})---- | Description of what data from the project is included in the export.-gdaveerEntityFilter :: Lens' GoogleDatastoreAdminV1ExportEntitiesRequest (Maybe GoogleDatastoreAdminV1EntityFilter)-gdaveerEntityFilter-  = lens _gdaveerEntityFilter-      (\ s a -> s{_gdaveerEntityFilter = a})---- | Client-assigned labels.-gdaveerLabels :: Lens' GoogleDatastoreAdminV1ExportEntitiesRequest (Maybe GoogleDatastoreAdminV1ExportEntitiesRequestLabels)-gdaveerLabels-  = lens _gdaveerLabels-      (\ s a -> s{_gdaveerLabels = a})--instance FromJSON-           GoogleDatastoreAdminV1ExportEntitiesRequest-         where-        parseJSON-          = withObject-              "GoogleDatastoreAdminV1ExportEntitiesRequest"-              (\ o ->-                 GoogleDatastoreAdminV1ExportEntitiesRequest' <$>-                   (o .:? "outputUrlPrefix") <*> (o .:? "entityFilter")-                     <*> (o .:? "labels"))--instance ToJSON-           GoogleDatastoreAdminV1ExportEntitiesRequest-         where-        toJSON-          GoogleDatastoreAdminV1ExportEntitiesRequest'{..}-          = object-              (catMaybes-                 [("outputUrlPrefix" .=) <$> _gdaveerOutputURLPrefix,-                  ("entityFilter" .=) <$> _gdaveerEntityFilter,-                  ("labels" .=) <$> _gdaveerLabels])---- | A mutation to apply to an entity.------ /See:/ 'mutation' smart constructor.-data Mutation =-  Mutation'-    { _mBaseVersion :: !(Maybe (Textual Int64))-    , _mInsert      :: !(Maybe Entity)-    , _mUpsert      :: !(Maybe Entity)-    , _mDelete      :: !(Maybe Key)-    , _mUpdate      :: !(Maybe Entity)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Mutation' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mBaseVersion'------ * 'mInsert'------ * 'mUpsert'------ * 'mDelete'------ * 'mUpdate'-mutation-    :: Mutation-mutation =-  Mutation'-    { _mBaseVersion = Nothing-    , _mInsert = Nothing-    , _mUpsert = Nothing-    , _mDelete = Nothing-    , _mUpdate = Nothing-    }----- | The version of the entity that this mutation is being applied to. If--- this does not match the current version on the server, the mutation--- conflicts.-mBaseVersion :: Lens' Mutation (Maybe Int64)-mBaseVersion-  = lens _mBaseVersion (\ s a -> s{_mBaseVersion = a})-      . mapping _Coerce---- | The entity to insert. The entity must not already exist. The entity--- key\'s final path element may be incomplete.-mInsert :: Lens' Mutation (Maybe Entity)-mInsert = lens _mInsert (\ s a -> s{_mInsert = a})---- | The entity to upsert. The entity may or may not already exist. The--- entity key\'s final path element may be incomplete.-mUpsert :: Lens' Mutation (Maybe Entity)-mUpsert = lens _mUpsert (\ s a -> s{_mUpsert = a})---- | The key of the entity to delete. The entity may or may not already--- exist. Must have a complete key path and must not be--- reserved\/read-only.-mDelete :: Lens' Mutation (Maybe Key)-mDelete = lens _mDelete (\ s a -> s{_mDelete = a})---- | The entity to update. The entity must already exist. Must have a--- complete key path.-mUpdate :: Lens' Mutation (Maybe Entity)-mUpdate = lens _mUpdate (\ s a -> s{_mUpdate = a})--instance FromJSON Mutation where-        parseJSON-          = withObject "Mutation"-              (\ o ->-                 Mutation' <$>-                   (o .:? "baseVersion") <*> (o .:? "insert") <*>-                     (o .:? "upsert")-                     <*> (o .:? "delete")-                     <*> (o .:? "update"))--instance ToJSON Mutation where-        toJSON Mutation'{..}-          = object-              (catMaybes-                 [("baseVersion" .=) <$> _mBaseVersion,-                  ("insert" .=) <$> _mInsert,-                  ("upsert" .=) <$> _mUpsert,-                  ("delete" .=) <$> _mDelete,-                  ("update" .=) <$> _mUpdate])---- | For each non-reserved named binding site in the query string, there must--- be a named parameter with that name, but not necessarily the inverse.--- Key must match regex \`A-Za-z_$*\`, must not match regex \`__.*__\`, and--- must not be \`\"\"\`.------ /See:/ 'gqlQueryNamedBindings' smart constructor.-newtype GqlQueryNamedBindings =-  GqlQueryNamedBindings'-    { _gqnbAddtional :: HashMap Text GqlQueryParameter-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GqlQueryNamedBindings' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gqnbAddtional'-gqlQueryNamedBindings-    :: HashMap Text GqlQueryParameter -- ^ 'gqnbAddtional'-    -> GqlQueryNamedBindings-gqlQueryNamedBindings pGqnbAddtional_ =-  GqlQueryNamedBindings' {_gqnbAddtional = _Coerce # pGqnbAddtional_}---gqnbAddtional :: Lens' GqlQueryNamedBindings (HashMap Text GqlQueryParameter)-gqnbAddtional-  = lens _gqnbAddtional-      (\ s a -> s{_gqnbAddtional = a})-      . _Coerce--instance FromJSON GqlQueryNamedBindings where-        parseJSON-          = withObject "GqlQueryNamedBindings"-              (\ o ->-                 GqlQueryNamedBindings' <$> (parseJSONObject o))--instance ToJSON GqlQueryNamedBindings where-        toJSON = toJSON . _gqnbAddtional---- | The response for--- google.datastore.admin.v1.DatastoreAdmin.ExportEntities.------ /See:/ 'googleDatastoreAdminV1ExportEntitiesResponse' smart constructor.-newtype GoogleDatastoreAdminV1ExportEntitiesResponse =-  GoogleDatastoreAdminV1ExportEntitiesResponse'-    { _gOutputURL :: Maybe Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GoogleDatastoreAdminV1ExportEntitiesResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gOutputURL'-googleDatastoreAdminV1ExportEntitiesResponse-    :: GoogleDatastoreAdminV1ExportEntitiesResponse-googleDatastoreAdminV1ExportEntitiesResponse =-  GoogleDatastoreAdminV1ExportEntitiesResponse' {_gOutputURL = Nothing}----- | Location of the output metadata file. This can be used to begin an--- import into Cloud Datastore (this project or another project). See--- google.datastore.admin.v1.ImportEntitiesRequest.input_url. Only present--- if the operation completed successfully.-gOutputURL :: Lens' GoogleDatastoreAdminV1ExportEntitiesResponse (Maybe Text)-gOutputURL-  = lens _gOutputURL (\ s a -> s{_gOutputURL = a})--instance FromJSON-           GoogleDatastoreAdminV1ExportEntitiesResponse-         where-        parseJSON-          = withObject-              "GoogleDatastoreAdminV1ExportEntitiesResponse"-              (\ o ->-                 GoogleDatastoreAdminV1ExportEntitiesResponse' <$>-                   (o .:? "outputUrl"))--instance ToJSON-           GoogleDatastoreAdminV1ExportEntitiesResponse-         where-        toJSON-          GoogleDatastoreAdminV1ExportEntitiesResponse'{..}-          = object-              (catMaybes [("outputUrl" .=) <$> _gOutputURL])---- | A reference to a property relative to the kind expressions.------ /See:/ 'propertyReference' smart constructor.-newtype PropertyReference =-  PropertyReference'-    { _prName :: Maybe Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PropertyReference' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'prName'-propertyReference-    :: PropertyReference-propertyReference = PropertyReference' {_prName = Nothing}----- | The name of the property. If name includes \".\"s, it may be interpreted--- as a property name path.-prName :: Lens' PropertyReference (Maybe Text)-prName = lens _prName (\ s a -> s{_prName = a})--instance FromJSON PropertyReference where-        parseJSON-          = withObject "PropertyReference"-              (\ o -> PropertyReference' <$> (o .:? "name"))--instance ToJSON PropertyReference where-        toJSON PropertyReference'{..}-          = object (catMaybes [("name" .=) <$> _prName])---- | A unique identifier for an entity. If a key\'s partition ID or any of--- its path kinds or names are reserved\/read-only, the key is--- reserved\/read-only. A reserved\/read-only key is forbidden in certain--- documented contexts.------ /See:/ 'key' smart constructor.-data Key =-  Key'-    { _kPartitionId :: !(Maybe PartitionId)-    , _kPath        :: !(Maybe [PathElement])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Key' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'kPartitionId'------ * 'kPath'-key-    :: Key-key = Key' {_kPartitionId = Nothing, _kPath = Nothing}----- | Entities are partitioned into subsets, currently identified by a project--- ID and namespace ID. Queries are scoped to a single partition.-kPartitionId :: Lens' Key (Maybe PartitionId)-kPartitionId-  = lens _kPartitionId (\ s a -> s{_kPartitionId = a})---- | The entity path. An entity path consists of one or more elements--- composed of a kind and a string or numerical identifier, which identify--- entities. The first element identifies a _root entity_, the second--- element identifies a _child_ of the root entity, the third element--- identifies a child of the second entity, and so forth. The entities--- identified by all prefixes of the path are called the element\'s--- _ancestors_. An entity path is always fully complete: *all* of the--- entity\'s ancestors are required to be in the path along with the entity--- identifier itself. The only exception is that in some documented cases,--- the identifier in the last path element (for the entity) itself may be--- omitted. For example, the last path element of the key of--- \`Mutation.insert\` may have no identifier. A path can never be empty,--- and a path can have at most 100 elements.-kPath :: Lens' Key [PathElement]-kPath-  = lens _kPath (\ s a -> s{_kPath = a}) . _Default .-      _Coerce--instance FromJSON Key where-        parseJSON-          = withObject "Key"-              (\ o ->-                 Key' <$>-                   (o .:? "partitionId") <*> (o .:? "path" .!= mempty))--instance ToJSON Key where-        toJSON Key'{..}-          = object-              (catMaybes-                 [("partitionId" .=) <$> _kPartitionId,-                  ("path" .=) <$> _kPath])---- | The request for google.datastore.admin.v1.DatastoreAdmin.ImportEntities.------ /See:/ 'googleDatastoreAdminV1ImportEntitiesRequest' smart constructor.-data GoogleDatastoreAdminV1ImportEntitiesRequest =-  GoogleDatastoreAdminV1ImportEntitiesRequest'-    { _gdavierEntityFilter :: !(Maybe GoogleDatastoreAdminV1EntityFilter)-    , _gdavierInputURL     :: !(Maybe Text)-    , _gdavierLabels       :: !(Maybe GoogleDatastoreAdminV1ImportEntitiesRequestLabels)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GoogleDatastoreAdminV1ImportEntitiesRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gdavierEntityFilter'------ * 'gdavierInputURL'------ * 'gdavierLabels'-googleDatastoreAdminV1ImportEntitiesRequest-    :: GoogleDatastoreAdminV1ImportEntitiesRequest-googleDatastoreAdminV1ImportEntitiesRequest =-  GoogleDatastoreAdminV1ImportEntitiesRequest'-    { _gdavierEntityFilter = Nothing-    , _gdavierInputURL = Nothing-    , _gdavierLabels = Nothing-    }----- | Optionally specify which kinds\/namespaces are to be imported. If--- provided, the list must be a subset of the EntityFilter used in creating--- the export, otherwise a FAILED_PRECONDITION error will be returned. If--- no filter is specified then all entities from the export are imported.-gdavierEntityFilter :: Lens' GoogleDatastoreAdminV1ImportEntitiesRequest (Maybe GoogleDatastoreAdminV1EntityFilter)-gdavierEntityFilter-  = lens _gdavierEntityFilter-      (\ s a -> s{_gdavierEntityFilter = a})---- | The full resource URL of the external storage location. Currently, only--- Google Cloud Storage is supported. So input_url should be of the form:--- \`gs:\/\/BUCKET_NAME[\/NAMESPACE_PATH]\/OVERALL_EXPORT_METADATA_FILE\`,--- where \`BUCKET_NAME\` is the name of the Cloud Storage bucket,--- \`NAMESPACE_PATH\` is an optional Cloud Storage namespace path (this is--- not a Cloud Datastore namespace), and \`OVERALL_EXPORT_METADATA_FILE\`--- is the metadata file written by the ExportEntities operation. For more--- information about Cloud Storage namespace paths, see [Object name--- considerations](https:\/\/cloud.google.com\/storage\/docs\/naming#object-considerations).--- For more information, see--- google.datastore.admin.v1.ExportEntitiesResponse.output_url.-gdavierInputURL :: Lens' GoogleDatastoreAdminV1ImportEntitiesRequest (Maybe Text)-gdavierInputURL-  = lens _gdavierInputURL-      (\ s a -> s{_gdavierInputURL = a})---- | Client-assigned labels.-gdavierLabels :: Lens' GoogleDatastoreAdminV1ImportEntitiesRequest (Maybe GoogleDatastoreAdminV1ImportEntitiesRequestLabels)-gdavierLabels-  = lens _gdavierLabels-      (\ s a -> s{_gdavierLabels = a})--instance FromJSON-           GoogleDatastoreAdminV1ImportEntitiesRequest-         where-        parseJSON-          = withObject-              "GoogleDatastoreAdminV1ImportEntitiesRequest"-              (\ o ->-                 GoogleDatastoreAdminV1ImportEntitiesRequest' <$>-                   (o .:? "entityFilter") <*> (o .:? "inputUrl") <*>-                     (o .:? "labels"))--instance ToJSON-           GoogleDatastoreAdminV1ImportEntitiesRequest-         where-        toJSON-          GoogleDatastoreAdminV1ImportEntitiesRequest'{..}-          = object-              (catMaybes-                 [("entityFilter" .=) <$> _gdavierEntityFilter,-                  ("inputUrl" .=) <$> _gdavierInputURL,-                  ("labels" .=) <$> _gdavierLabels])---- | A filter on a specific property.------ /See:/ 'propertyFilter' smart constructor.-data PropertyFilter =-  PropertyFilter'-    { _pfProperty :: !(Maybe PropertyReference)-    , _pfOp       :: !(Maybe PropertyFilterOp)-    , _pfValue    :: !(Maybe Value)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PropertyFilter' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pfProperty'------ * 'pfOp'------ * 'pfValue'-propertyFilter-    :: PropertyFilter-propertyFilter =-  PropertyFilter' {_pfProperty = Nothing, _pfOp = Nothing, _pfValue = Nothing}----- | The property to filter by.-pfProperty :: Lens' PropertyFilter (Maybe PropertyReference)-pfProperty-  = lens _pfProperty (\ s a -> s{_pfProperty = a})---- | The operator to filter by.-pfOp :: Lens' PropertyFilter (Maybe PropertyFilterOp)-pfOp = lens _pfOp (\ s a -> s{_pfOp = a})---- | The value to compare the property to.-pfValue :: Lens' PropertyFilter (Maybe Value)-pfValue = lens _pfValue (\ s a -> s{_pfValue = a})--instance FromJSON PropertyFilter where-        parseJSON-          = withObject "PropertyFilter"-              (\ o ->-                 PropertyFilter' <$>-                   (o .:? "property") <*> (o .:? "op") <*>-                     (o .:? "value"))--instance ToJSON PropertyFilter where-        toJSON PropertyFilter'{..}-          = object-              (catMaybes-                 [("property" .=) <$> _pfProperty,-                  ("op" .=) <$> _pfOp, ("value" .=) <$> _pfValue])---- | A query for entities.------ /See:/ 'query' smart constructor.-data Query =-  Query'-    { _qStartCursor :: !(Maybe Bytes)-    , _qOffSet      :: !(Maybe (Textual Int32))-    , _qKind        :: !(Maybe [KindExpression])-    , _qDistinctOn  :: !(Maybe [PropertyReference])-    , _qEndCursor   :: !(Maybe Bytes)-    , _qLimit       :: !(Maybe (Textual Int32))-    , _qProjection  :: !(Maybe [Projection])-    , _qFilter      :: !(Maybe Filter)-    , _qOrder       :: !(Maybe [PropertyOrder])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Query' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'qStartCursor'------ * 'qOffSet'------ * 'qKind'------ * 'qDistinctOn'------ * 'qEndCursor'------ * 'qLimit'------ * 'qProjection'------ * 'qFilter'------ * 'qOrder'-query-    :: Query-query =-  Query'-    { _qStartCursor = Nothing-    , _qOffSet = Nothing-    , _qKind = Nothing-    , _qDistinctOn = Nothing-    , _qEndCursor = Nothing-    , _qLimit = Nothing-    , _qProjection = Nothing-    , _qFilter = Nothing-    , _qOrder = Nothing-    }----- | A starting point for the query results. Query cursors are returned in--- query result batches and [can only be used to continue the same--- query](https:\/\/cloud.google.com\/datastore\/docs\/concepts\/queries#cursors_limits_and_offsets).-qStartCursor :: Lens' Query (Maybe ByteString)-qStartCursor-  = lens _qStartCursor (\ s a -> s{_qStartCursor = a})-      . mapping _Bytes---- | The number of results to skip. Applies before limit, but after all other--- constraints. Optional. Must be >= 0 if specified.-qOffSet :: Lens' Query (Maybe Int32)-qOffSet-  = lens _qOffSet (\ s a -> s{_qOffSet = a}) .-      mapping _Coerce---- | The kinds to query (if empty, returns entities of all kinds). Currently--- at most 1 kind may be specified.-qKind :: Lens' Query [KindExpression]-qKind-  = lens _qKind (\ s a -> s{_qKind = a}) . _Default .-      _Coerce---- | The properties to make distinct. The query results will contain the--- first result for each distinct combination of values for the given--- properties (if empty, all results are returned).-qDistinctOn :: Lens' Query [PropertyReference]-qDistinctOn-  = lens _qDistinctOn (\ s a -> s{_qDistinctOn = a}) .-      _Default-      . _Coerce---- | An ending point for the query results. Query cursors are returned in--- query result batches and [can only be used to limit the same--- query](https:\/\/cloud.google.com\/datastore\/docs\/concepts\/queries#cursors_limits_and_offsets).-qEndCursor :: Lens' Query (Maybe ByteString)-qEndCursor-  = lens _qEndCursor (\ s a -> s{_qEndCursor = a}) .-      mapping _Bytes---- | The maximum number of results to return. Applies after all other--- constraints. Optional. Unspecified is interpreted as no limit. Must be--- >= 0 if specified.-qLimit :: Lens' Query (Maybe Int32)-qLimit-  = lens _qLimit (\ s a -> s{_qLimit = a}) .-      mapping _Coerce---- | The projection to return. Defaults to returning all properties.-qProjection :: Lens' Query [Projection]-qProjection-  = lens _qProjection (\ s a -> s{_qProjection = a}) .-      _Default-      . _Coerce---- | The filter to apply.-qFilter :: Lens' Query (Maybe Filter)-qFilter = lens _qFilter (\ s a -> s{_qFilter = a})---- | The order to apply to the query results (if empty, order is--- unspecified).-qOrder :: Lens' Query [PropertyOrder]-qOrder-  = lens _qOrder (\ s a -> s{_qOrder = a}) . _Default .-      _Coerce--instance FromJSON Query where-        parseJSON-          = withObject "Query"-              (\ o ->-                 Query' <$>-                   (o .:? "startCursor") <*> (o .:? "offset") <*>-                     (o .:? "kind" .!= mempty)-                     <*> (o .:? "distinctOn" .!= mempty)-                     <*> (o .:? "endCursor")-                     <*> (o .:? "limit")-                     <*> (o .:? "projection" .!= mempty)-                     <*> (o .:? "filter")-                     <*> (o .:? "order" .!= mempty))--instance ToJSON Query where-        toJSON Query'{..}-          = object-              (catMaybes-                 [("startCursor" .=) <$> _qStartCursor,-                  ("offset" .=) <$> _qOffSet, ("kind" .=) <$> _qKind,-                  ("distinctOn" .=) <$> _qDistinctOn,-                  ("endCursor" .=) <$> _qEndCursor,-                  ("limit" .=) <$> _qLimit,-                  ("projection" .=) <$> _qProjection,-                  ("filter" .=) <$> _qFilter,-                  ("order" .=) <$> _qOrder])---- | An array value.------ /See:/ 'arrayValue' smart constructor.-newtype ArrayValue =-  ArrayValue'-    { _avValues :: Maybe [Value]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ArrayValue' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'avValues'-arrayValue-    :: ArrayValue-arrayValue = ArrayValue' {_avValues = Nothing}----- | Values in the array. The order of values in an array is preserved as--- long as all values have identical settings for \'exclude_from_indexes\'.-avValues :: Lens' ArrayValue [Value]-avValues-  = lens _avValues (\ s a -> s{_avValues = a}) .-      _Default-      . _Coerce--instance FromJSON ArrayValue where-        parseJSON-          = withObject "ArrayValue"-              (\ o -> ArrayValue' <$> (o .:? "values" .!= mempty))--instance ToJSON ArrayValue where-        toJSON ArrayValue'{..}-          = object (catMaybes [("values" .=) <$> _avValues])---- | The result of fetching an entity from Datastore.------ /See:/ 'entityResult' smart constructor.-data EntityResult =-  EntityResult'-    { _erCursor  :: !(Maybe Bytes)-    , _erVersion :: !(Maybe (Textual Int64))-    , _erEntity  :: !(Maybe Entity)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'EntityResult' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'erCursor'------ * 'erVersion'------ * 'erEntity'-entityResult-    :: EntityResult-entityResult =-  EntityResult' {_erCursor = Nothing, _erVersion = Nothing, _erEntity = Nothing}----- | A cursor that points to the position after the result entity. Set only--- when the \`EntityResult\` is part of a \`QueryResultBatch\` message.-erCursor :: Lens' EntityResult (Maybe ByteString)-erCursor-  = lens _erCursor (\ s a -> s{_erCursor = a}) .-      mapping _Bytes---- | The version of the entity, a strictly positive number that monotonically--- increases with changes to the entity. This field is set for \`FULL\`--- entity results. For missing entities in \`LookupResponse\`, this is the--- version of the snapshot that was used to look up the entity, and it is--- always set except for eventually consistent reads.-erVersion :: Lens' EntityResult (Maybe Int64)-erVersion-  = lens _erVersion (\ s a -> s{_erVersion = a}) .-      mapping _Coerce---- | The resulting entity.-erEntity :: Lens' EntityResult (Maybe Entity)-erEntity = lens _erEntity (\ s a -> s{_erEntity = a})--instance FromJSON EntityResult where-        parseJSON-          = withObject "EntityResult"-              (\ o ->-                 EntityResult' <$>-                   (o .:? "cursor") <*> (o .:? "version") <*>-                     (o .:? "entity"))--instance ToJSON EntityResult where-        toJSON EntityResult'{..}-          = object-              (catMaybes-                 [("cursor" .=) <$> _erCursor,-                  ("version" .=) <$> _erVersion,-                  ("entity" .=) <$> _erEntity])---- | The response for Datastore.Commit.------ /See:/ 'commitResponse' smart constructor.-data CommitResponse =-  CommitResponse'-    { _crIndexUpdates    :: !(Maybe (Textual Int32))-    , _crMutationResults :: !(Maybe [MutationResult])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CommitResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'crIndexUpdates'------ * 'crMutationResults'-commitResponse-    :: CommitResponse-commitResponse =-  CommitResponse' {_crIndexUpdates = Nothing, _crMutationResults = Nothing}----- | The number of index entries updated during the commit, or zero if none--- were updated.-crIndexUpdates :: Lens' CommitResponse (Maybe Int32)-crIndexUpdates-  = lens _crIndexUpdates-      (\ s a -> s{_crIndexUpdates = a})-      . mapping _Coerce---- | The result of performing the mutations. The i-th mutation result--- corresponds to the i-th mutation in the request.-crMutationResults :: Lens' CommitResponse [MutationResult]-crMutationResults-  = lens _crMutationResults-      (\ s a -> s{_crMutationResults = a})-      . _Default-      . _Coerce--instance FromJSON CommitResponse where-        parseJSON-          = withObject "CommitResponse"-              (\ o ->-                 CommitResponse' <$>-                   (o .:? "indexUpdates") <*>-                     (o .:? "mutationResults" .!= mempty))--instance ToJSON CommitResponse where-        toJSON CommitResponse'{..}-          = object-              (catMaybes-                 [("indexUpdates" .=) <$> _crIndexUpdates,-                  ("mutationResults" .=) <$> _crMutationResults])---- | A representation of a kind.------ /See:/ 'kindExpression' smart constructor.-newtype KindExpression =-  KindExpression'-    { _keName :: Maybe Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'KindExpression' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'keName'-kindExpression-    :: KindExpression-kindExpression = KindExpression' {_keName = Nothing}----- | The name of the kind.-keName :: Lens' KindExpression (Maybe Text)-keName = lens _keName (\ s a -> s{_keName = a})--instance FromJSON KindExpression where-        parseJSON-          = withObject "KindExpression"-              (\ o -> KindExpression' <$> (o .:? "name"))--instance ToJSON KindExpression where-        toJSON KindExpression'{..}-          = object (catMaybes [("name" .=) <$> _keName])---- | The normal response of the operation in case of success. If the original--- method returns no data on success, such as \`Delete\`, the response is--- \`google.protobuf.Empty\`. If the original method is standard--- \`Get\`\/\`Create\`\/\`Update\`, the response should be the resource.--- For other methods, the response should have the type \`XxxResponse\`,--- where \`Xxx\` is the original method name. For example, if the original--- method name is \`TakeSnapshot()\`, the inferred response type is--- \`TakeSnapshotResponse\`.------ /See:/ 'googleLongrunningOperationResponse' smart constructor.-newtype GoogleLongrunningOperationResponse =-  GoogleLongrunningOperationResponse'-    { _glorAddtional :: HashMap Text JSONValue-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GoogleLongrunningOperationResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'glorAddtional'-googleLongrunningOperationResponse-    :: HashMap Text JSONValue -- ^ 'glorAddtional'-    -> GoogleLongrunningOperationResponse-googleLongrunningOperationResponse pGlorAddtional_ =-  GoogleLongrunningOperationResponse'-    {_glorAddtional = _Coerce # pGlorAddtional_}----- | Properties of the object. Contains field \'type with type URL.-glorAddtional :: Lens' GoogleLongrunningOperationResponse (HashMap Text JSONValue)-glorAddtional-  = lens _glorAddtional-      (\ s a -> s{_glorAddtional = a})-      . _Coerce--instance FromJSON GoogleLongrunningOperationResponse-         where-        parseJSON-          = withObject "GoogleLongrunningOperationResponse"-              (\ o ->-                 GoogleLongrunningOperationResponse' <$>-                   (parseJSONObject o))--instance ToJSON GoogleLongrunningOperationResponse-         where-        toJSON = toJSON . _glorAddtional---- | The options shared by read requests.------ /See:/ 'readOptions' smart constructor.-data ReadOptions =-  ReadOptions'-    { _roReadConsistency :: !(Maybe ReadOptionsReadConsistency)-    , _roTransaction     :: !(Maybe Bytes)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ReadOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'roReadConsistency'------ * 'roTransaction'-readOptions-    :: ReadOptions-readOptions =-  ReadOptions' {_roReadConsistency = Nothing, _roTransaction = Nothing}----- | The non-transactional read consistency to use. Cannot be set to--- \`STRONG\` for global queries.-roReadConsistency :: Lens' ReadOptions (Maybe ReadOptionsReadConsistency)-roReadConsistency-  = lens _roReadConsistency-      (\ s a -> s{_roReadConsistency = a})---- | The identifier of the transaction in which to read. A transaction--- identifier is returned by a call to Datastore.BeginTransaction.-roTransaction :: Lens' ReadOptions (Maybe ByteString)-roTransaction-  = lens _roTransaction-      (\ s a -> s{_roTransaction = a})-      . mapping _Bytes--instance FromJSON ReadOptions where-        parseJSON-          = withObject "ReadOptions"-              (\ o ->-                 ReadOptions' <$>-                   (o .:? "readConsistency") <*> (o .:? "transaction"))--instance ToJSON ReadOptions where-        toJSON ReadOptions'{..}-          = object-              (catMaybes-                 [("readConsistency" .=) <$> _roReadConsistency,-                  ("transaction" .=) <$> _roTransaction])---- | Identifies a subset of entities in a project. This is specified as--- combinations of kinds and namespaces (either or both of which may be--- all, as described in the following examples). Example usage: Entire--- project: kinds=[], namespace_ids=[] Kinds Foo and Bar in all namespaces:--- kinds=[\'Foo\', \'Bar\'], namespace_ids=[] Kinds Foo and Bar only in the--- default namespace: kinds=[\'Foo\', \'Bar\'], namespace_ids=[\'\'] Kinds--- Foo and Bar in both the default and Baz namespaces: kinds=[\'Foo\',--- \'Bar\'], namespace_ids=[\'\', \'Baz\'] The entire Baz namespace:--- kinds=[], namespace_ids=[\'Baz\']------ /See:/ 'googleDatastoreAdminV1EntityFilter' smart constructor.-data GoogleDatastoreAdminV1EntityFilter =-  GoogleDatastoreAdminV1EntityFilter'-    { _gdavefNamespaceIds :: !(Maybe [Text])-    , _gdavefKinds        :: !(Maybe [Text])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GoogleDatastoreAdminV1EntityFilter' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gdavefNamespaceIds'------ * 'gdavefKinds'-googleDatastoreAdminV1EntityFilter-    :: GoogleDatastoreAdminV1EntityFilter-googleDatastoreAdminV1EntityFilter =-  GoogleDatastoreAdminV1EntityFilter'-    {_gdavefNamespaceIds = Nothing, _gdavefKinds = Nothing}----- | An empty list represents all namespaces. This is the preferred usage for--- projects that don\'t use namespaces. An empty string element represents--- the default namespace. This should be used if the project has data in--- non-default namespaces, but doesn\'t want to include them. Each--- namespace in this list must be unique.-gdavefNamespaceIds :: Lens' GoogleDatastoreAdminV1EntityFilter [Text]-gdavefNamespaceIds-  = lens _gdavefNamespaceIds-      (\ s a -> s{_gdavefNamespaceIds = a})-      . _Default-      . _Coerce---- | If empty, then this represents all kinds.-gdavefKinds :: Lens' GoogleDatastoreAdminV1EntityFilter [Text]-gdavefKinds-  = lens _gdavefKinds (\ s a -> s{_gdavefKinds = a}) .-      _Default-      . _Coerce--instance FromJSON GoogleDatastoreAdminV1EntityFilter-         where-        parseJSON-          = withObject "GoogleDatastoreAdminV1EntityFilter"-              (\ o ->-                 GoogleDatastoreAdminV1EntityFilter' <$>-                   (o .:? "namespaceIds" .!= mempty) <*>-                     (o .:? "kinds" .!= mempty))--instance ToJSON GoogleDatastoreAdminV1EntityFilter-         where-        toJSON GoogleDatastoreAdminV1EntityFilter'{..}-          = object-              (catMaybes-                 [("namespaceIds" .=) <$> _gdavefNamespaceIds,-                  ("kinds" .=) <$> _gdavefKinds])---- | The response for Datastore.Rollback. (an empty message).------ /See:/ 'rollbackResponse' smart constructor.-data RollbackResponse =-  RollbackResponse'-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'RollbackResponse' with the minimum fields required to make a request.----rollbackResponse-    :: RollbackResponse-rollbackResponse = RollbackResponse'---instance FromJSON RollbackResponse where-        parseJSON-          = withObject "RollbackResponse"-              (\ o -> pure RollbackResponse')--instance ToJSON RollbackResponse where-        toJSON = const emptyObject---- | A representation of a property in a projection.------ /See:/ 'projection' smart constructor.-newtype Projection =-  Projection'-    { _pProperty :: Maybe PropertyReference-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Projection' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pProperty'-projection-    :: Projection-projection = Projection' {_pProperty = Nothing}----- | The property to project.-pProperty :: Lens' Projection (Maybe PropertyReference)-pProperty-  = lens _pProperty (\ s a -> s{_pProperty = a})--instance FromJSON Projection where-        parseJSON-          = withObject "Projection"-              (\ o -> Projection' <$> (o .:? "property"))--instance ToJSON Projection where-        toJSON Projection'{..}-          = object (catMaybes [("property" .=) <$> _pProperty])---- | The response for Datastore.ReserveIds.------ /See:/ 'reserveIdsResponse' smart constructor.-data ReserveIdsResponse =-  ReserveIdsResponse'-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ReserveIdsResponse' with the minimum fields required to make a request.----reserveIdsResponse-    :: ReserveIdsResponse-reserveIdsResponse = ReserveIdsResponse'---instance FromJSON ReserveIdsResponse where-        parseJSON-          = withObject "ReserveIdsResponse"-              (\ o -> pure ReserveIdsResponse')--instance ToJSON ReserveIdsResponse where-        toJSON = const emptyObject---- | A holder for any type of filter.------ /See:/ 'filter'' smart constructor.-data Filter =-  Filter'-    { _fCompositeFilter :: !(Maybe CompositeFilter)-    , _fPropertyFilter  :: !(Maybe PropertyFilter)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Filter' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'fCompositeFilter'------ * 'fPropertyFilter'-filter'-    :: Filter-filter' = Filter' {_fCompositeFilter = Nothing, _fPropertyFilter = Nothing}----- | A composite filter.-fCompositeFilter :: Lens' Filter (Maybe CompositeFilter)-fCompositeFilter-  = lens _fCompositeFilter-      (\ s a -> s{_fCompositeFilter = a})---- | A filter on a property.-fPropertyFilter :: Lens' Filter (Maybe PropertyFilter)-fPropertyFilter-  = lens _fPropertyFilter-      (\ s a -> s{_fPropertyFilter = a})--instance FromJSON Filter where-        parseJSON-          = withObject "Filter"-              (\ o ->-                 Filter' <$>-                   (o .:? "compositeFilter") <*>-                     (o .:? "propertyFilter"))--instance ToJSON Filter where-        toJSON Filter'{..}-          = object-              (catMaybes-                 [("compositeFilter" .=) <$> _fCompositeFilter,-                  ("propertyFilter" .=) <$> _fPropertyFilter])---- | A minimal index definition.------ /See:/ 'googleDatastoreAdminV1Index' smart constructor.-data GoogleDatastoreAdminV1Index =-  GoogleDatastoreAdminV1Index'-    { _gdaviState      :: !(Maybe GoogleDatastoreAdminV1IndexState)-    , _gdaviKind       :: !(Maybe Text)-    , _gdaviProjectId  :: !(Maybe Text)-    , _gdaviIndexId    :: !(Maybe Text)-    , _gdaviAncestor   :: !(Maybe GoogleDatastoreAdminV1IndexAncestor)-    , _gdaviProperties :: !(Maybe [GoogleDatastoreAdminV1IndexedProperty])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GoogleDatastoreAdminV1Index' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gdaviState'------ * 'gdaviKind'------ * 'gdaviProjectId'------ * 'gdaviIndexId'------ * 'gdaviAncestor'------ * 'gdaviProperties'-googleDatastoreAdminV1Index-    :: GoogleDatastoreAdminV1Index-googleDatastoreAdminV1Index =-  GoogleDatastoreAdminV1Index'-    { _gdaviState = Nothing-    , _gdaviKind = Nothing-    , _gdaviProjectId = Nothing-    , _gdaviIndexId = Nothing-    , _gdaviAncestor = Nothing-    , _gdaviProperties = Nothing-    }----- | The state of the index. Output only.-gdaviState :: Lens' GoogleDatastoreAdminV1Index (Maybe GoogleDatastoreAdminV1IndexState)-gdaviState-  = lens _gdaviState (\ s a -> s{_gdaviState = a})---- | The entity kind to which this index applies. Required.-gdaviKind :: Lens' GoogleDatastoreAdminV1Index (Maybe Text)-gdaviKind-  = lens _gdaviKind (\ s a -> s{_gdaviKind = a})---- | Project ID. Output only.-gdaviProjectId :: Lens' GoogleDatastoreAdminV1Index (Maybe Text)-gdaviProjectId-  = lens _gdaviProjectId-      (\ s a -> s{_gdaviProjectId = a})---- | The resource ID of the index. Output only.-gdaviIndexId :: Lens' GoogleDatastoreAdminV1Index (Maybe Text)-gdaviIndexId-  = lens _gdaviIndexId (\ s a -> s{_gdaviIndexId = a})---- | The index\'s ancestor mode. Must not be ANCESTOR_MODE_UNSPECIFIED.--- Required.-gdaviAncestor :: Lens' GoogleDatastoreAdminV1Index (Maybe GoogleDatastoreAdminV1IndexAncestor)-gdaviAncestor-  = lens _gdaviAncestor-      (\ s a -> s{_gdaviAncestor = a})---- | An ordered sequence of property names and their index attributes.--- Required.-gdaviProperties :: Lens' GoogleDatastoreAdminV1Index [GoogleDatastoreAdminV1IndexedProperty]-gdaviProperties-  = lens _gdaviProperties-      (\ s a -> s{_gdaviProperties = a})-      . _Default-      . _Coerce--instance FromJSON GoogleDatastoreAdminV1Index where-        parseJSON-          = withObject "GoogleDatastoreAdminV1Index"-              (\ o ->-                 GoogleDatastoreAdminV1Index' <$>-                   (o .:? "state") <*> (o .:? "kind") <*>-                     (o .:? "projectId")-                     <*> (o .:? "indexId")-                     <*> (o .:? "ancestor")-                     <*> (o .:? "properties" .!= mempty))--instance ToJSON GoogleDatastoreAdminV1Index where-        toJSON GoogleDatastoreAdminV1Index'{..}-          = object-              (catMaybes-                 [("state" .=) <$> _gdaviState,-                  ("kind" .=) <$> _gdaviKind,-                  ("projectId" .=) <$> _gdaviProjectId,-                  ("indexId" .=) <$> _gdaviIndexId,-                  ("ancestor" .=) <$> _gdaviAncestor,-                  ("properties" .=) <$> _gdaviProperties])---- | The client-assigned labels which were provided when the operation was--- created. May also include additional labels.------ /See:/ 'googleDatastoreAdminV1beta1CommonMetadataLabels' smart constructor.-newtype GoogleDatastoreAdminV1beta1CommonMetadataLabels =-  GoogleDatastoreAdminV1beta1CommonMetadataLabels'-    { _gAddtional :: HashMap Text Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GoogleDatastoreAdminV1beta1CommonMetadataLabels' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gAddtional'-googleDatastoreAdminV1beta1CommonMetadataLabels-    :: HashMap Text Text -- ^ 'gAddtional'-    -> GoogleDatastoreAdminV1beta1CommonMetadataLabels-googleDatastoreAdminV1beta1CommonMetadataLabels pGAddtional_ =-  GoogleDatastoreAdminV1beta1CommonMetadataLabels'-    {_gAddtional = _Coerce # pGAddtional_}---gAddtional :: Lens' GoogleDatastoreAdminV1beta1CommonMetadataLabels (HashMap Text Text)-gAddtional-  = lens _gAddtional (\ s a -> s{_gAddtional = a}) .-      _Coerce--instance FromJSON-           GoogleDatastoreAdminV1beta1CommonMetadataLabels-         where-        parseJSON-          = withObject-              "GoogleDatastoreAdminV1beta1CommonMetadataLabels"-              (\ o ->-                 GoogleDatastoreAdminV1beta1CommonMetadataLabels' <$>-                   (parseJSONObject o))--instance ToJSON-           GoogleDatastoreAdminV1beta1CommonMetadataLabels-         where-        toJSON = toJSON . _gAddtional---- | The request for Datastore.Commit.------ /See:/ 'commitRequest' smart constructor.-data CommitRequest =-  CommitRequest'-    { _crMutations   :: !(Maybe [Mutation])-    , _crMode        :: !(Maybe CommitRequestMode)-    , _crTransaction :: !(Maybe Bytes)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CommitRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'crMutations'------ * 'crMode'------ * 'crTransaction'-commitRequest-    :: CommitRequest-commitRequest =-  CommitRequest'-    {_crMutations = Nothing, _crMode = Nothing, _crTransaction = Nothing}----- | The mutations to perform. When mode is \`TRANSACTIONAL\`, mutations--- affecting a single entity are applied in order. The following sequences--- of mutations affecting a single entity are not permitted in a single--- \`Commit\` request: - \`insert\` followed by \`insert\` - \`update\`--- followed by \`insert\` - \`upsert\` followed by \`insert\` - \`delete\`--- followed by \`update\` When mode is \`NON_TRANSACTIONAL\`, no two--- mutations may affect a single entity.-crMutations :: Lens' CommitRequest [Mutation]-crMutations-  = lens _crMutations (\ s a -> s{_crMutations = a}) .-      _Default-      . _Coerce---- | The type of commit to perform. Defaults to \`TRANSACTIONAL\`.-crMode :: Lens' CommitRequest (Maybe CommitRequestMode)-crMode = lens _crMode (\ s a -> s{_crMode = a})---- | The identifier of the transaction associated with the commit. A--- transaction identifier is returned by a call to--- Datastore.BeginTransaction.-crTransaction :: Lens' CommitRequest (Maybe ByteString)-crTransaction-  = lens _crTransaction-      (\ s a -> s{_crTransaction = a})-      . mapping _Bytes--instance FromJSON CommitRequest where-        parseJSON-          = withObject "CommitRequest"-              (\ o ->-                 CommitRequest' <$>-                   (o .:? "mutations" .!= mempty) <*> (o .:? "mode") <*>-                     (o .:? "transaction"))--instance ToJSON CommitRequest where-        toJSON CommitRequest'{..}-          = object-              (catMaybes-                 [("mutations" .=) <$> _crMutations,-                  ("mode" .=) <$> _crMode,-                  ("transaction" .=) <$> _crTransaction])---- | The response message for Operations.ListOperations.------ /See:/ 'googleLongrunningListOperationsResponse' smart constructor.-data GoogleLongrunningListOperationsResponse =-  GoogleLongrunningListOperationsResponse'-    { _gllorNextPageToken :: !(Maybe Text)-    , _gllorOperations    :: !(Maybe [GoogleLongrunningOperation])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GoogleLongrunningListOperationsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gllorNextPageToken'------ * 'gllorOperations'-googleLongrunningListOperationsResponse-    :: GoogleLongrunningListOperationsResponse-googleLongrunningListOperationsResponse =-  GoogleLongrunningListOperationsResponse'-    {_gllorNextPageToken = Nothing, _gllorOperations = Nothing}----- | The standard List next-page token.-gllorNextPageToken :: Lens' GoogleLongrunningListOperationsResponse (Maybe Text)-gllorNextPageToken-  = lens _gllorNextPageToken-      (\ s a -> s{_gllorNextPageToken = a})---- | A list of operations that matches the specified filter in the request.-gllorOperations :: Lens' GoogleLongrunningListOperationsResponse [GoogleLongrunningOperation]-gllorOperations-  = lens _gllorOperations-      (\ s a -> s{_gllorOperations = a})-      . _Default-      . _Coerce--instance FromJSON-           GoogleLongrunningListOperationsResponse-         where-        parseJSON-          = withObject-              "GoogleLongrunningListOperationsResponse"-              (\ o ->-                 GoogleLongrunningListOperationsResponse' <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "operations" .!= mempty))--instance ToJSON-           GoogleLongrunningListOperationsResponse-         where-        toJSON GoogleLongrunningListOperationsResponse'{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _gllorNextPageToken,-                  ("operations" .=) <$> _gllorOperations])---- | Metadata for ImportEntities operations.------ /See:/ 'googleDatastoreAdminV1ImportEntitiesMetadata' smart constructor.-data GoogleDatastoreAdminV1ImportEntitiesMetadata =-  GoogleDatastoreAdminV1ImportEntitiesMetadata'-    { _gProgressBytes    :: !(Maybe GoogleDatastoreAdminV1Progress)-    , _gProgressEntities :: !(Maybe GoogleDatastoreAdminV1Progress)-    , _gEntityFilter     :: !(Maybe GoogleDatastoreAdminV1EntityFilter)-    , _gInputURL         :: !(Maybe Text)-    , _gCommon           :: !(Maybe GoogleDatastoreAdminV1CommonMetadata)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GoogleDatastoreAdminV1ImportEntitiesMetadata' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gProgressBytes'------ * 'gProgressEntities'------ * 'gEntityFilter'------ * 'gInputURL'------ * 'gCommon'-googleDatastoreAdminV1ImportEntitiesMetadata-    :: GoogleDatastoreAdminV1ImportEntitiesMetadata-googleDatastoreAdminV1ImportEntitiesMetadata =-  GoogleDatastoreAdminV1ImportEntitiesMetadata'-    { _gProgressBytes = Nothing-    , _gProgressEntities = Nothing-    , _gEntityFilter = Nothing-    , _gInputURL = Nothing-    , _gCommon = Nothing-    }----- | An estimate of the number of bytes processed.-gProgressBytes :: Lens' GoogleDatastoreAdminV1ImportEntitiesMetadata (Maybe GoogleDatastoreAdminV1Progress)-gProgressBytes-  = lens _gProgressBytes-      (\ s a -> s{_gProgressBytes = a})---- | An estimate of the number of entities processed.-gProgressEntities :: Lens' GoogleDatastoreAdminV1ImportEntitiesMetadata (Maybe GoogleDatastoreAdminV1Progress)-gProgressEntities-  = lens _gProgressEntities-      (\ s a -> s{_gProgressEntities = a})---- | Description of which entities are being imported.-gEntityFilter :: Lens' GoogleDatastoreAdminV1ImportEntitiesMetadata (Maybe GoogleDatastoreAdminV1EntityFilter)-gEntityFilter-  = lens _gEntityFilter-      (\ s a -> s{_gEntityFilter = a})---- | The location of the import metadata file. This will be the same value as--- the google.datastore.admin.v1.ExportEntitiesResponse.output_url field.-gInputURL :: Lens' GoogleDatastoreAdminV1ImportEntitiesMetadata (Maybe Text)-gInputURL-  = lens _gInputURL (\ s a -> s{_gInputURL = a})---- | Metadata common to all Datastore Admin operations.-gCommon :: Lens' GoogleDatastoreAdminV1ImportEntitiesMetadata (Maybe GoogleDatastoreAdminV1CommonMetadata)-gCommon = lens _gCommon (\ s a -> s{_gCommon = a})--instance FromJSON-           GoogleDatastoreAdminV1ImportEntitiesMetadata-         where-        parseJSON-          = withObject-              "GoogleDatastoreAdminV1ImportEntitiesMetadata"-              (\ o ->-                 GoogleDatastoreAdminV1ImportEntitiesMetadata' <$>-                   (o .:? "progressBytes") <*>-                     (o .:? "progressEntities")-                     <*> (o .:? "entityFilter")-                     <*> (o .:? "inputUrl")-                     <*> (o .:? "common"))--instance ToJSON-           GoogleDatastoreAdminV1ImportEntitiesMetadata-         where-        toJSON-          GoogleDatastoreAdminV1ImportEntitiesMetadata'{..}-          = object-              (catMaybes-                 [("progressBytes" .=) <$> _gProgressBytes,-                  ("progressEntities" .=) <$> _gProgressEntities,-                  ("entityFilter" .=) <$> _gEntityFilter,-                  ("inputUrl" .=) <$> _gInputURL,-                  ("common" .=) <$> _gCommon])---- | Measures the progress of a particular metric.------ /See:/ 'googleDatastoreAdminV1Progress' smart constructor.-data GoogleDatastoreAdminV1Progress =-  GoogleDatastoreAdminV1Progress'-    { _gWorkCompleted :: !(Maybe (Textual Int64))-    , _gWorkEstimated :: !(Maybe (Textual Int64))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GoogleDatastoreAdminV1Progress' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gWorkCompleted'------ * 'gWorkEstimated'-googleDatastoreAdminV1Progress-    :: GoogleDatastoreAdminV1Progress-googleDatastoreAdminV1Progress =-  GoogleDatastoreAdminV1Progress'-    {_gWorkCompleted = Nothing, _gWorkEstimated = Nothing}----- | The amount of work that has been completed. Note that this may be--- greater than work_estimated.-gWorkCompleted :: Lens' GoogleDatastoreAdminV1Progress (Maybe Int64)-gWorkCompleted-  = lens _gWorkCompleted-      (\ s a -> s{_gWorkCompleted = a})-      . mapping _Coerce---- | An estimate of how much work needs to be performed. May be zero if the--- work estimate is unavailable.-gWorkEstimated :: Lens' GoogleDatastoreAdminV1Progress (Maybe Int64)-gWorkEstimated-  = lens _gWorkEstimated-      (\ s a -> s{_gWorkEstimated = a})-      . mapping _Coerce--instance FromJSON GoogleDatastoreAdminV1Progress-         where-        parseJSON-          = withObject "GoogleDatastoreAdminV1Progress"-              (\ o ->-                 GoogleDatastoreAdminV1Progress' <$>-                   (o .:? "workCompleted") <*> (o .:? "workEstimated"))--instance ToJSON GoogleDatastoreAdminV1Progress where-        toJSON GoogleDatastoreAdminV1Progress'{..}-          = object-              (catMaybes-                 [("workCompleted" .=) <$> _gWorkCompleted,-                  ("workEstimated" .=) <$> _gWorkEstimated])---- | A (kind, ID\/name) pair used to construct a key path. If either name or--- ID is set, the element is complete. If neither is set, the element is--- incomplete.------ /See:/ 'pathElement' smart constructor.-data PathElement =-  PathElement'-    { _peKind :: !(Maybe Text)-    , _peName :: !(Maybe Text)-    , _peId   :: !(Maybe (Textual Int64))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PathElement' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'peKind'------ * 'peName'------ * 'peId'-pathElement-    :: PathElement-pathElement =-  PathElement' {_peKind = Nothing, _peName = Nothing, _peId = Nothing}----- | The kind of the entity. A kind matching regex \`__.*__\` is--- reserved\/read-only. A kind must not contain more than 1500 bytes when--- UTF-8 encoded. Cannot be \`\"\"\`.-peKind :: Lens' PathElement (Maybe Text)-peKind = lens _peKind (\ s a -> s{_peKind = a})---- | The name of the entity. A name matching regex \`__.*__\` is--- reserved\/read-only. A name must not be more than 1500 bytes when UTF-8--- encoded. Cannot be \`\"\"\`.-peName :: Lens' PathElement (Maybe Text)-peName = lens _peName (\ s a -> s{_peName = a})---- | The auto-allocated ID of the entity. Never equal to zero. Values less--- than zero are discouraged and may not be supported in the future.-peId :: Lens' PathElement (Maybe Int64)-peId-  = lens _peId (\ s a -> s{_peId = a}) .-      mapping _Coerce--instance FromJSON PathElement where-        parseJSON-          = withObject "PathElement"-              (\ o ->-                 PathElement' <$>-                   (o .:? "kind") <*> (o .:? "name") <*> (o .:? "id"))--instance ToJSON PathElement where-        toJSON PathElement'{..}-          = object-              (catMaybes-                 [("kind" .=) <$> _peKind, ("name" .=) <$> _peName,-                  ("id" .=) <$> _peId])---- | A Datastore data object. An entity is limited to 1 megabyte when stored.--- That _roughly_ corresponds to a limit of 1 megabyte for the serialized--- form of this message.------ /See:/ 'entity' smart constructor.-data Entity =-  Entity'-    { _eKey        :: !(Maybe Key)-    , _eProperties :: !(Maybe EntityProperties)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Entity' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'eKey'------ * 'eProperties'-entity-    :: Entity-entity = Entity' {_eKey = Nothing, _eProperties = Nothing}----- | The entity\'s key. An entity must have a key, unless otherwise--- documented (for example, an entity in \`Value.entity_value\` may have no--- key). An entity\'s kind is its key path\'s last element\'s kind, or null--- if it has no key.-eKey :: Lens' Entity (Maybe Key)-eKey = lens _eKey (\ s a -> s{_eKey = a})---- | The entity\'s properties. The map\'s keys are property names. A property--- name matching regex \`__.*__\` is reserved. A reserved property name is--- forbidden in certain documented contexts. The name must not contain more--- than 500 characters. The name cannot be \`\"\"\`.-eProperties :: Lens' Entity (Maybe EntityProperties)-eProperties-  = lens _eProperties (\ s a -> s{_eProperties = a})--instance FromJSON Entity where-        parseJSON-          = withObject "Entity"-              (\ o ->-                 Entity' <$> (o .:? "key") <*> (o .:? "properties"))--instance ToJSON Entity where-        toJSON Entity'{..}-          = object-              (catMaybes-                 [("key" .=) <$> _eKey,-                  ("properties" .=) <$> _eProperties])---- | Identifies a subset of entities in a project. This is specified as--- combinations of kinds and namespaces (either or both of which may be--- all, as described in the following examples). Example usage: Entire--- project: kinds=[], namespace_ids=[] Kinds Foo and Bar in all namespaces:--- kinds=[\'Foo\', \'Bar\'], namespace_ids=[] Kinds Foo and Bar only in the--- default namespace: kinds=[\'Foo\', \'Bar\'], namespace_ids=[\'\'] Kinds--- Foo and Bar in both the default and Baz namespaces: kinds=[\'Foo\',--- \'Bar\'], namespace_ids=[\'\', \'Baz\'] The entire Baz namespace:--- kinds=[], namespace_ids=[\'Baz\']------ /See:/ 'googleDatastoreAdminV1beta1EntityFilter' smart constructor.-data GoogleDatastoreAdminV1beta1EntityFilter =-  GoogleDatastoreAdminV1beta1EntityFilter'-    { _gNamespaceIds :: !(Maybe [Text])-    , _gKinds        :: !(Maybe [Text])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GoogleDatastoreAdminV1beta1EntityFilter' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gNamespaceIds'------ * 'gKinds'-googleDatastoreAdminV1beta1EntityFilter-    :: GoogleDatastoreAdminV1beta1EntityFilter-googleDatastoreAdminV1beta1EntityFilter =-  GoogleDatastoreAdminV1beta1EntityFilter'-    {_gNamespaceIds = Nothing, _gKinds = Nothing}----- | An empty list represents all namespaces. This is the preferred usage for--- projects that don\'t use namespaces. An empty string element represents--- the default namespace. This should be used if the project has data in--- non-default namespaces, but doesn\'t want to include them. Each--- namespace in this list must be unique.-gNamespaceIds :: Lens' GoogleDatastoreAdminV1beta1EntityFilter [Text]-gNamespaceIds-  = lens _gNamespaceIds-      (\ s a -> s{_gNamespaceIds = a})-      . _Default-      . _Coerce---- | If empty, then this represents all kinds.-gKinds :: Lens' GoogleDatastoreAdminV1beta1EntityFilter [Text]-gKinds-  = lens _gKinds (\ s a -> s{_gKinds = a}) . _Default .-      _Coerce--instance FromJSON-           GoogleDatastoreAdminV1beta1EntityFilter-         where-        parseJSON-          = withObject-              "GoogleDatastoreAdminV1beta1EntityFilter"-              (\ o ->-                 GoogleDatastoreAdminV1beta1EntityFilter' <$>-                   (o .:? "namespaceIds" .!= mempty) <*>-                     (o .:? "kinds" .!= mempty))--instance ToJSON-           GoogleDatastoreAdminV1beta1EntityFilter-         where-        toJSON GoogleDatastoreAdminV1beta1EntityFilter'{..}-          = object-              (catMaybes-                 [("namespaceIds" .=) <$> _gNamespaceIds,-                  ("kinds" .=) <$> _gKinds])---- | Options specific to read-only transactions.------ /See:/ 'readOnly' smart constructor.-data ReadOnly =-  ReadOnly'-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ReadOnly' with the minimum fields required to make a request.----readOnly-    :: ReadOnly-readOnly = ReadOnly'---instance FromJSON ReadOnly where-        parseJSON-          = withObject "ReadOnly" (\ o -> pure ReadOnly')--instance ToJSON ReadOnly where-        toJSON = const emptyObject---- | A property of an index.------ /See:/ 'googleDatastoreAdminV1IndexedProperty' smart constructor.-data GoogleDatastoreAdminV1IndexedProperty =-  GoogleDatastoreAdminV1IndexedProperty'-    { _gdavipDirection :: !(Maybe GoogleDatastoreAdminV1IndexedPropertyDirection)-    , _gdavipName      :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GoogleDatastoreAdminV1IndexedProperty' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gdavipDirection'------ * 'gdavipName'-googleDatastoreAdminV1IndexedProperty-    :: GoogleDatastoreAdminV1IndexedProperty-googleDatastoreAdminV1IndexedProperty =-  GoogleDatastoreAdminV1IndexedProperty'-    {_gdavipDirection = Nothing, _gdavipName = Nothing}----- | The indexed property\'s direction. Must not be DIRECTION_UNSPECIFIED.--- Required.-gdavipDirection :: Lens' GoogleDatastoreAdminV1IndexedProperty (Maybe GoogleDatastoreAdminV1IndexedPropertyDirection)-gdavipDirection-  = lens _gdavipDirection-      (\ s a -> s{_gdavipDirection = a})---- | The property name to index. Required.-gdavipName :: Lens' GoogleDatastoreAdminV1IndexedProperty (Maybe Text)-gdavipName-  = lens _gdavipName (\ s a -> s{_gdavipName = a})--instance FromJSON-           GoogleDatastoreAdminV1IndexedProperty-         where-        parseJSON-          = withObject "GoogleDatastoreAdminV1IndexedProperty"-              (\ o ->-                 GoogleDatastoreAdminV1IndexedProperty' <$>-                   (o .:? "direction") <*> (o .:? "name"))--instance ToJSON GoogleDatastoreAdminV1IndexedProperty-         where-        toJSON GoogleDatastoreAdminV1IndexedProperty'{..}-          = object-              (catMaybes-                 [("direction" .=) <$> _gdavipDirection,-                  ("name" .=) <$> _gdavipName])---- | The response for Datastore.Lookup.------ /See:/ 'lookupResponse' smart constructor.-data LookupResponse =-  LookupResponse'-    { _lrDeferred :: !(Maybe [Key])-    , _lrFound    :: !(Maybe [EntityResult])-    , _lrMissing  :: !(Maybe [EntityResult])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'LookupResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lrDeferred'------ * 'lrFound'------ * 'lrMissing'-lookupResponse-    :: LookupResponse-lookupResponse =-  LookupResponse'-    {_lrDeferred = Nothing, _lrFound = Nothing, _lrMissing = Nothing}----- | A list of keys that were not looked up due to resource constraints. The--- order of results in this field is undefined and has no relation to the--- order of the keys in the input.-lrDeferred :: Lens' LookupResponse [Key]-lrDeferred-  = lens _lrDeferred (\ s a -> s{_lrDeferred = a}) .-      _Default-      . _Coerce---- | Entities found as \`ResultType.FULL\` entities. The order of results in--- this field is undefined and has no relation to the order of the keys in--- the input.-lrFound :: Lens' LookupResponse [EntityResult]-lrFound-  = lens _lrFound (\ s a -> s{_lrFound = a}) . _Default-      . _Coerce---- | Entities not found as \`ResultType.KEY_ONLY\` entities. The order of--- results in this field is undefined and has no relation to the order of--- the keys in the input.-lrMissing :: Lens' LookupResponse [EntityResult]-lrMissing-  = lens _lrMissing (\ s a -> s{_lrMissing = a}) .-      _Default-      . _Coerce--instance FromJSON LookupResponse where-        parseJSON-          = withObject "LookupResponse"-              (\ o ->-                 LookupResponse' <$>-                   (o .:? "deferred" .!= mempty) <*>-                     (o .:? "found" .!= mempty)-                     <*> (o .:? "missing" .!= mempty))--instance ToJSON LookupResponse where-        toJSON LookupResponse'{..}-          = object-              (catMaybes-                 [("deferred" .=) <$> _lrDeferred,-                  ("found" .=) <$> _lrFound,-                  ("missing" .=) <$> _lrMissing])---- | This resource represents a long-running operation that is the result of--- a network API call.------ /See:/ 'googleLongrunningOperation' smart constructor.-data GoogleLongrunningOperation =-  GoogleLongrunningOperation'-    { _gloDone     :: !(Maybe Bool)-    , _gloError    :: !(Maybe Status)-    , _gloResponse :: !(Maybe GoogleLongrunningOperationResponse)-    , _gloName     :: !(Maybe Text)-    , _gloMetadata :: !(Maybe GoogleLongrunningOperationMetadata)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GoogleLongrunningOperation' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gloDone'------ * 'gloError'------ * 'gloResponse'------ * 'gloName'------ * 'gloMetadata'-googleLongrunningOperation-    :: GoogleLongrunningOperation-googleLongrunningOperation =-  GoogleLongrunningOperation'-    { _gloDone = Nothing-    , _gloError = Nothing-    , _gloResponse = Nothing-    , _gloName = Nothing-    , _gloMetadata = Nothing-    }----- | If the value is \`false\`, it means the operation is still in progress.--- If \`true\`, the operation is completed, and either \`error\` or--- \`response\` is available.-gloDone :: Lens' GoogleLongrunningOperation (Maybe Bool)-gloDone = lens _gloDone (\ s a -> s{_gloDone = a})---- | The error result of the operation in case of failure or cancellation.-gloError :: Lens' GoogleLongrunningOperation (Maybe Status)-gloError = lens _gloError (\ s a -> s{_gloError = a})---- | The normal response of the operation in case of success. If the original--- method returns no data on success, such as \`Delete\`, the response is--- \`google.protobuf.Empty\`. If the original method is standard--- \`Get\`\/\`Create\`\/\`Update\`, the response should be the resource.--- For other methods, the response should have the type \`XxxResponse\`,--- where \`Xxx\` is the original method name. For example, if the original--- method name is \`TakeSnapshot()\`, the inferred response type is--- \`TakeSnapshotResponse\`.-gloResponse :: Lens' GoogleLongrunningOperation (Maybe GoogleLongrunningOperationResponse)-gloResponse-  = lens _gloResponse (\ s a -> s{_gloResponse = a})---- | The server-assigned name, which is only unique within the same service--- that originally returns it. If you use the default HTTP mapping, the--- \`name\` should have the format of \`operations\/some\/unique\/name\`.-gloName :: Lens' GoogleLongrunningOperation (Maybe Text)-gloName = lens _gloName (\ s a -> s{_gloName = a})---- | Service-specific metadata associated with the operation. It typically--- contains progress information and common metadata such as create time.--- Some services might not provide such metadata. Any method that returns a--- long-running operation should document the metadata type, if any.-gloMetadata :: Lens' GoogleLongrunningOperation (Maybe GoogleLongrunningOperationMetadata)-gloMetadata-  = lens _gloMetadata (\ s a -> s{_gloMetadata = a})--instance FromJSON GoogleLongrunningOperation where-        parseJSON-          = withObject "GoogleLongrunningOperation"-              (\ o ->-                 GoogleLongrunningOperation' <$>-                   (o .:? "done") <*> (o .:? "error") <*>-                     (o .:? "response")-                     <*> (o .:? "name")-                     <*> (o .:? "metadata"))--instance ToJSON GoogleLongrunningOperation where-        toJSON GoogleLongrunningOperation'{..}-          = object-              (catMaybes-                 [("done" .=) <$> _gloDone,-                  ("error" .=) <$> _gloError,-                  ("response" .=) <$> _gloResponse,-                  ("name" .=) <$> _gloName,-                  ("metadata" .=) <$> _gloMetadata])---- | The desired order for a specific property.------ /See:/ 'propertyOrder' smart constructor.-data PropertyOrder =-  PropertyOrder'-    { _poProperty  :: !(Maybe PropertyReference)-    , _poDirection :: !(Maybe PropertyOrderDirection)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PropertyOrder' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'poProperty'------ * 'poDirection'-propertyOrder-    :: PropertyOrder-propertyOrder = PropertyOrder' {_poProperty = Nothing, _poDirection = Nothing}----- | The property to order by.-poProperty :: Lens' PropertyOrder (Maybe PropertyReference)-poProperty-  = lens _poProperty (\ s a -> s{_poProperty = a})---- | The direction to order by. Defaults to \`ASCENDING\`.-poDirection :: Lens' PropertyOrder (Maybe PropertyOrderDirection)-poDirection-  = lens _poDirection (\ s a -> s{_poDirection = a})--instance FromJSON PropertyOrder where-        parseJSON-          = withObject "PropertyOrder"-              (\ o ->-                 PropertyOrder' <$>-                   (o .:? "property") <*> (o .:? "direction"))--instance ToJSON PropertyOrder where-        toJSON PropertyOrder'{..}-          = object-              (catMaybes-                 [("property" .=) <$> _poProperty,-                  ("direction" .=) <$> _poDirection])---- | Metadata for ExportEntities operations.------ /See:/ 'googleDatastoreAdminV1beta1ExportEntitiesMetadata' smart constructor.-data GoogleDatastoreAdminV1beta1ExportEntitiesMetadata =-  GoogleDatastoreAdminV1beta1ExportEntitiesMetadata'-    { _gooProgressBytes    :: !(Maybe GoogleDatastoreAdminV1beta1Progress)-    , _gooOutputURLPrefix  :: !(Maybe Text)-    , _gooProgressEntities :: !(Maybe GoogleDatastoreAdminV1beta1Progress)-    , _gooEntityFilter     :: !(Maybe GoogleDatastoreAdminV1beta1EntityFilter)-    , _gooCommon           :: !(Maybe GoogleDatastoreAdminV1beta1CommonMetadata)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GoogleDatastoreAdminV1beta1ExportEntitiesMetadata' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gooProgressBytes'------ * 'gooOutputURLPrefix'------ * 'gooProgressEntities'------ * 'gooEntityFilter'------ * 'gooCommon'-googleDatastoreAdminV1beta1ExportEntitiesMetadata-    :: GoogleDatastoreAdminV1beta1ExportEntitiesMetadata-googleDatastoreAdminV1beta1ExportEntitiesMetadata =-  GoogleDatastoreAdminV1beta1ExportEntitiesMetadata'-    { _gooProgressBytes = Nothing-    , _gooOutputURLPrefix = Nothing-    , _gooProgressEntities = Nothing-    , _gooEntityFilter = Nothing-    , _gooCommon = Nothing-    }----- | An estimate of the number of bytes processed.-gooProgressBytes :: Lens' GoogleDatastoreAdminV1beta1ExportEntitiesMetadata (Maybe GoogleDatastoreAdminV1beta1Progress)-gooProgressBytes-  = lens _gooProgressBytes-      (\ s a -> s{_gooProgressBytes = a})---- | Location for the export metadata and data files. This will be the same--- value as the--- google.datastore.admin.v1beta1.ExportEntitiesRequest.output_url_prefix--- field. The final output location is provided in--- google.datastore.admin.v1beta1.ExportEntitiesResponse.output_url.-gooOutputURLPrefix :: Lens' GoogleDatastoreAdminV1beta1ExportEntitiesMetadata (Maybe Text)-gooOutputURLPrefix-  = lens _gooOutputURLPrefix-      (\ s a -> s{_gooOutputURLPrefix = a})---- | An estimate of the number of entities processed.-gooProgressEntities :: Lens' GoogleDatastoreAdminV1beta1ExportEntitiesMetadata (Maybe GoogleDatastoreAdminV1beta1Progress)-gooProgressEntities-  = lens _gooProgressEntities-      (\ s a -> s{_gooProgressEntities = a})---- | Description of which entities are being exported.-gooEntityFilter :: Lens' GoogleDatastoreAdminV1beta1ExportEntitiesMetadata (Maybe GoogleDatastoreAdminV1beta1EntityFilter)-gooEntityFilter-  = lens _gooEntityFilter-      (\ s a -> s{_gooEntityFilter = a})---- | Metadata common to all Datastore Admin operations.-gooCommon :: Lens' GoogleDatastoreAdminV1beta1ExportEntitiesMetadata (Maybe GoogleDatastoreAdminV1beta1CommonMetadata)-gooCommon-  = lens _gooCommon (\ s a -> s{_gooCommon = a})--instance FromJSON-           GoogleDatastoreAdminV1beta1ExportEntitiesMetadata-         where-        parseJSON-          = withObject-              "GoogleDatastoreAdminV1beta1ExportEntitiesMetadata"-              (\ o ->-                 GoogleDatastoreAdminV1beta1ExportEntitiesMetadata'-                   <$>-                   (o .:? "progressBytes") <*> (o .:? "outputUrlPrefix")-                     <*> (o .:? "progressEntities")-                     <*> (o .:? "entityFilter")-                     <*> (o .:? "common"))--instance ToJSON-           GoogleDatastoreAdminV1beta1ExportEntitiesMetadata-         where-        toJSON-          GoogleDatastoreAdminV1beta1ExportEntitiesMetadata'{..}-          = object-              (catMaybes-                 [("progressBytes" .=) <$> _gooProgressBytes,-                  ("outputUrlPrefix" .=) <$> _gooOutputURLPrefix,-                  ("progressEntities" .=) <$> _gooProgressEntities,-                  ("entityFilter" .=) <$> _gooEntityFilter,-                  ("common" .=) <$> _gooCommon])---- | A binding parameter for a GQL query.------ /See:/ 'gqlQueryParameter' smart constructor.-data GqlQueryParameter =-  GqlQueryParameter'-    { _gqpCursor :: !(Maybe Bytes)-    , _gqpValue  :: !(Maybe Value)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GqlQueryParameter' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gqpCursor'------ * 'gqpValue'-gqlQueryParameter-    :: GqlQueryParameter-gqlQueryParameter =-  GqlQueryParameter' {_gqpCursor = Nothing, _gqpValue = Nothing}----- | A query cursor. Query cursors are returned in query result batches.-gqpCursor :: Lens' GqlQueryParameter (Maybe ByteString)-gqpCursor-  = lens _gqpCursor (\ s a -> s{_gqpCursor = a}) .-      mapping _Bytes---- | A value parameter.-gqpValue :: Lens' GqlQueryParameter (Maybe Value)-gqpValue = lens _gqpValue (\ s a -> s{_gqpValue = a})--instance FromJSON GqlQueryParameter where-        parseJSON-          = withObject "GqlQueryParameter"-              (\ o ->-                 GqlQueryParameter' <$>-                   (o .:? "cursor") <*> (o .:? "value"))--instance ToJSON GqlQueryParameter where-        toJSON GqlQueryParameter'{..}-          = object-              (catMaybes-                 [("cursor" .=) <$> _gqpCursor,-                  ("value" .=) <$> _gqpValue])
− gen/Network/Google/Datastore/Types/Sum.hs 
@@ -1,672 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE LambdaCase         #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}---- |--- Module      : Network.Google.Datastore.Types.Sum--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)----module Network.Google.Datastore.Types.Sum where--import           Network.Google.Prelude hiding (Bytes)---- | The direction to order by. Defaults to \`ASCENDING\`.-data PropertyOrderDirection-    = DirectionUnspecified-      -- ^ @DIRECTION_UNSPECIFIED@-      -- Unspecified. This value must not be used.-    | Ascending-      -- ^ @ASCENDING@-      -- Ascending.-    | Descending-      -- ^ @DESCENDING@-      -- Descending.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable PropertyOrderDirection--instance FromHttpApiData PropertyOrderDirection where-    parseQueryParam = \case-        "DIRECTION_UNSPECIFIED" -> Right DirectionUnspecified-        "ASCENDING" -> Right Ascending-        "DESCENDING" -> Right Descending-        x -> Left ("Unable to parse PropertyOrderDirection from: " <> x)--instance ToHttpApiData PropertyOrderDirection where-    toQueryParam = \case-        DirectionUnspecified -> "DIRECTION_UNSPECIFIED"-        Ascending -> "ASCENDING"-        Descending -> "DESCENDING"--instance FromJSON PropertyOrderDirection where-    parseJSON = parseJSONText "PropertyOrderDirection"--instance ToJSON PropertyOrderDirection where-    toJSON = toJSONText---- | The operator for combining multiple filters.-data CompositeFilterOp-    = OperatorUnspecified-      -- ^ @OPERATOR_UNSPECIFIED@-      -- Unspecified. This value must not be used.-    | And-      -- ^ @AND@-      -- The results are required to satisfy each of the combined filters.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable CompositeFilterOp--instance FromHttpApiData CompositeFilterOp where-    parseQueryParam = \case-        "OPERATOR_UNSPECIFIED" -> Right OperatorUnspecified-        "AND" -> Right And-        x -> Left ("Unable to parse CompositeFilterOp from: " <> x)--instance ToHttpApiData CompositeFilterOp where-    toQueryParam = \case-        OperatorUnspecified -> "OPERATOR_UNSPECIFIED"-        And -> "AND"--instance FromJSON CompositeFilterOp where-    parseJSON = parseJSONText "CompositeFilterOp"--instance ToJSON CompositeFilterOp where-    toJSON = toJSONText---- | The result type for every entity in \`entity_results\`.-data QueryResultBatchEntityResultType-    = QRBERTResultTypeUnspecified-      -- ^ @RESULT_TYPE_UNSPECIFIED@-      -- Unspecified. This value is never used.-    | QRBERTFull-      -- ^ @FULL@-      -- The key and properties.-    | QRBERTProjection-      -- ^ @PROJECTION@-      -- A projected subset of properties. The entity may have no key.-    | QRBERTKeyOnly-      -- ^ @KEY_ONLY@-      -- Only the key.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable QueryResultBatchEntityResultType--instance FromHttpApiData QueryResultBatchEntityResultType where-    parseQueryParam = \case-        "RESULT_TYPE_UNSPECIFIED" -> Right QRBERTResultTypeUnspecified-        "FULL" -> Right QRBERTFull-        "PROJECTION" -> Right QRBERTProjection-        "KEY_ONLY" -> Right QRBERTKeyOnly-        x -> Left ("Unable to parse QueryResultBatchEntityResultType from: " <> x)--instance ToHttpApiData QueryResultBatchEntityResultType where-    toQueryParam = \case-        QRBERTResultTypeUnspecified -> "RESULT_TYPE_UNSPECIFIED"-        QRBERTFull -> "FULL"-        QRBERTProjection -> "PROJECTION"-        QRBERTKeyOnly -> "KEY_ONLY"--instance FromJSON QueryResultBatchEntityResultType where-    parseJSON = parseJSONText "QueryResultBatchEntityResultType"--instance ToJSON QueryResultBatchEntityResultType where-    toJSON = toJSONText---- | The type of the operation. Can be used as a filter in--- ListOperationsRequest.-data GoogleDatastoreAdminV1beta1CommonMetadataOperationType-    = OperationTypeUnspecified-      -- ^ @OPERATION_TYPE_UNSPECIFIED@-      -- Unspecified.-    | ExportEntities-      -- ^ @EXPORT_ENTITIES@-      -- ExportEntities.-    | ImportEntities-      -- ^ @IMPORT_ENTITIES@-      -- ImportEntities.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable GoogleDatastoreAdminV1beta1CommonMetadataOperationType--instance FromHttpApiData GoogleDatastoreAdminV1beta1CommonMetadataOperationType where-    parseQueryParam = \case-        "OPERATION_TYPE_UNSPECIFIED" -> Right OperationTypeUnspecified-        "EXPORT_ENTITIES" -> Right ExportEntities-        "IMPORT_ENTITIES" -> Right ImportEntities-        x -> Left ("Unable to parse GoogleDatastoreAdminV1beta1CommonMetadataOperationType from: " <> x)--instance ToHttpApiData GoogleDatastoreAdminV1beta1CommonMetadataOperationType where-    toQueryParam = \case-        OperationTypeUnspecified -> "OPERATION_TYPE_UNSPECIFIED"-        ExportEntities -> "EXPORT_ENTITIES"-        ImportEntities -> "IMPORT_ENTITIES"--instance FromJSON GoogleDatastoreAdminV1beta1CommonMetadataOperationType where-    parseJSON = parseJSONText "GoogleDatastoreAdminV1beta1CommonMetadataOperationType"--instance ToJSON GoogleDatastoreAdminV1beta1CommonMetadataOperationType where-    toJSON = toJSONText---- | The state of the query after the current batch.-data QueryResultBatchMoreResults-    = MoreResultsTypeUnspecified-      -- ^ @MORE_RESULTS_TYPE_UNSPECIFIED@-      -- Unspecified. This value is never used.-    | NotFinished-      -- ^ @NOT_FINISHED@-      -- There may be additional batches to fetch from this query.-    | MoreResultsAfterLimit-      -- ^ @MORE_RESULTS_AFTER_LIMIT@-      -- The query is finished, but there may be more results after the limit.-    | MoreResultsAfterCursor-      -- ^ @MORE_RESULTS_AFTER_CURSOR@-      -- The query is finished, but there may be more results after the end-      -- cursor.-    | NoMoreResults-      -- ^ @NO_MORE_RESULTS@-      -- The query is finished, and there are no more results.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable QueryResultBatchMoreResults--instance FromHttpApiData QueryResultBatchMoreResults where-    parseQueryParam = \case-        "MORE_RESULTS_TYPE_UNSPECIFIED" -> Right MoreResultsTypeUnspecified-        "NOT_FINISHED" -> Right NotFinished-        "MORE_RESULTS_AFTER_LIMIT" -> Right MoreResultsAfterLimit-        "MORE_RESULTS_AFTER_CURSOR" -> Right MoreResultsAfterCursor-        "NO_MORE_RESULTS" -> Right NoMoreResults-        x -> Left ("Unable to parse QueryResultBatchMoreResults from: " <> x)--instance ToHttpApiData QueryResultBatchMoreResults where-    toQueryParam = \case-        MoreResultsTypeUnspecified -> "MORE_RESULTS_TYPE_UNSPECIFIED"-        NotFinished -> "NOT_FINISHED"-        MoreResultsAfterLimit -> "MORE_RESULTS_AFTER_LIMIT"-        MoreResultsAfterCursor -> "MORE_RESULTS_AFTER_CURSOR"-        NoMoreResults -> "NO_MORE_RESULTS"--instance FromJSON QueryResultBatchMoreResults where-    parseJSON = parseJSONText "QueryResultBatchMoreResults"--instance ToJSON QueryResultBatchMoreResults where-    toJSON = toJSONText---- | The type of the operation. Can be used as a filter in--- ListOperationsRequest.-data GoogleDatastoreAdminV1CommonMetadataOperationType-    = GDAVCMOTOperationTypeUnspecified-      -- ^ @OPERATION_TYPE_UNSPECIFIED@-      -- Unspecified.-    | GDAVCMOTExportEntities-      -- ^ @EXPORT_ENTITIES@-      -- ExportEntities.-    | GDAVCMOTImportEntities-      -- ^ @IMPORT_ENTITIES@-      -- ImportEntities.-    | GDAVCMOTCreateIndex-      -- ^ @CREATE_INDEX@-      -- CreateIndex.-    | GDAVCMOTDeleteIndex-      -- ^ @DELETE_INDEX@-      -- DeleteIndex.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable GoogleDatastoreAdminV1CommonMetadataOperationType--instance FromHttpApiData GoogleDatastoreAdminV1CommonMetadataOperationType where-    parseQueryParam = \case-        "OPERATION_TYPE_UNSPECIFIED" -> Right GDAVCMOTOperationTypeUnspecified-        "EXPORT_ENTITIES" -> Right GDAVCMOTExportEntities-        "IMPORT_ENTITIES" -> Right GDAVCMOTImportEntities-        "CREATE_INDEX" -> Right GDAVCMOTCreateIndex-        "DELETE_INDEX" -> Right GDAVCMOTDeleteIndex-        x -> Left ("Unable to parse GoogleDatastoreAdminV1CommonMetadataOperationType from: " <> x)--instance ToHttpApiData GoogleDatastoreAdminV1CommonMetadataOperationType where-    toQueryParam = \case-        GDAVCMOTOperationTypeUnspecified -> "OPERATION_TYPE_UNSPECIFIED"-        GDAVCMOTExportEntities -> "EXPORT_ENTITIES"-        GDAVCMOTImportEntities -> "IMPORT_ENTITIES"-        GDAVCMOTCreateIndex -> "CREATE_INDEX"-        GDAVCMOTDeleteIndex -> "DELETE_INDEX"--instance FromJSON GoogleDatastoreAdminV1CommonMetadataOperationType where-    parseJSON = parseJSONText "GoogleDatastoreAdminV1CommonMetadataOperationType"--instance ToJSON GoogleDatastoreAdminV1CommonMetadataOperationType where-    toJSON = toJSONText---- | A null value.-data ValueNullValue-    = NullValue-      -- ^ @NULL_VALUE@-      -- Null value.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable ValueNullValue--instance FromHttpApiData ValueNullValue where-    parseQueryParam = \case-        "NULL_VALUE" -> Right NullValue-        x -> Left ("Unable to parse ValueNullValue from: " <> x)--instance ToHttpApiData ValueNullValue where-    toQueryParam = \case-        NullValue -> "NULL_VALUE"--instance FromJSON ValueNullValue where-    parseJSON = parseJSONText "ValueNullValue"--instance ToJSON ValueNullValue where-    toJSON = toJSONText---- | The indexed property\'s direction. Must not be DIRECTION_UNSPECIFIED.--- Required.-data GoogleDatastoreAdminV1IndexedPropertyDirection-    = GDAVIPDDirectionUnspecified-      -- ^ @DIRECTION_UNSPECIFIED@-      -- The direction is unspecified.-    | GDAVIPDAscending-      -- ^ @ASCENDING@-      -- The property\'s values are indexed so as to support sequencing in-      -- ascending order and also query by \<, >, \<=, >=, and =.-    | GDAVIPDDescending-      -- ^ @DESCENDING@-      -- The property\'s values are indexed so as to support sequencing in-      -- descending order and also query by \<, >, \<=, >=, and =.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable GoogleDatastoreAdminV1IndexedPropertyDirection--instance FromHttpApiData GoogleDatastoreAdminV1IndexedPropertyDirection where-    parseQueryParam = \case-        "DIRECTION_UNSPECIFIED" -> Right GDAVIPDDirectionUnspecified-        "ASCENDING" -> Right GDAVIPDAscending-        "DESCENDING" -> Right GDAVIPDDescending-        x -> Left ("Unable to parse GoogleDatastoreAdminV1IndexedPropertyDirection from: " <> x)--instance ToHttpApiData GoogleDatastoreAdminV1IndexedPropertyDirection where-    toQueryParam = \case-        GDAVIPDDirectionUnspecified -> "DIRECTION_UNSPECIFIED"-        GDAVIPDAscending -> "ASCENDING"-        GDAVIPDDescending -> "DESCENDING"--instance FromJSON GoogleDatastoreAdminV1IndexedPropertyDirection where-    parseJSON = parseJSONText "GoogleDatastoreAdminV1IndexedPropertyDirection"--instance ToJSON GoogleDatastoreAdminV1IndexedPropertyDirection where-    toJSON = toJSONText---- | The index\'s ancestor mode. Must not be ANCESTOR_MODE_UNSPECIFIED.--- Required.-data GoogleDatastoreAdminV1IndexAncestor-    = AncestorModeUnspecified-      -- ^ @ANCESTOR_MODE_UNSPECIFIED@-      -- The ancestor mode is unspecified.-    | None-      -- ^ @NONE@-      -- Do not include the entity\'s ancestors in the index.-    | AllAncestors-      -- ^ @ALL_ANCESTORS@-      -- Include all the entity\'s ancestors in the index.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable GoogleDatastoreAdminV1IndexAncestor--instance FromHttpApiData GoogleDatastoreAdminV1IndexAncestor where-    parseQueryParam = \case-        "ANCESTOR_MODE_UNSPECIFIED" -> Right AncestorModeUnspecified-        "NONE" -> Right None-        "ALL_ANCESTORS" -> Right AllAncestors-        x -> Left ("Unable to parse GoogleDatastoreAdminV1IndexAncestor from: " <> x)--instance ToHttpApiData GoogleDatastoreAdminV1IndexAncestor where-    toQueryParam = \case-        AncestorModeUnspecified -> "ANCESTOR_MODE_UNSPECIFIED"-        None -> "NONE"-        AllAncestors -> "ALL_ANCESTORS"--instance FromJSON GoogleDatastoreAdminV1IndexAncestor where-    parseJSON = parseJSONText "GoogleDatastoreAdminV1IndexAncestor"--instance ToJSON GoogleDatastoreAdminV1IndexAncestor where-    toJSON = toJSONText---- | The non-transactional read consistency to use. Cannot be set to--- \`STRONG\` for global queries.-data ReadOptionsReadConsistency-    = ReadConsistencyUnspecified-      -- ^ @READ_CONSISTENCY_UNSPECIFIED@-      -- Unspecified. This value must not be used.-    | Strong-      -- ^ @STRONG@-      -- Strong consistency.-    | Eventual-      -- ^ @EVENTUAL@-      -- Eventual consistency.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable ReadOptionsReadConsistency--instance FromHttpApiData ReadOptionsReadConsistency where-    parseQueryParam = \case-        "READ_CONSISTENCY_UNSPECIFIED" -> Right ReadConsistencyUnspecified-        "STRONG" -> Right Strong-        "EVENTUAL" -> Right Eventual-        x -> Left ("Unable to parse ReadOptionsReadConsistency from: " <> x)--instance ToHttpApiData ReadOptionsReadConsistency where-    toQueryParam = \case-        ReadConsistencyUnspecified -> "READ_CONSISTENCY_UNSPECIFIED"-        Strong -> "STRONG"-        Eventual -> "EVENTUAL"--instance FromJSON ReadOptionsReadConsistency where-    parseJSON = parseJSONText "ReadOptionsReadConsistency"--instance ToJSON ReadOptionsReadConsistency where-    toJSON = toJSONText---- | The state of the index. Output only.-data GoogleDatastoreAdminV1IndexState-    = StateUnspecified-      -- ^ @STATE_UNSPECIFIED@-      -- The state is unspecified.-    | Creating-      -- ^ @CREATING@-      -- The index is being created, and cannot be used by queries. There is an-      -- active long-running operation for the index. The index is updated when-      -- writing an entity. Some index data may exist.-    | Ready-      -- ^ @READY@-      -- The index is ready to be used. The index is updated when writing an-      -- entity. The index is fully populated from all stored entities it applies-      -- to.-    | Deleting-      -- ^ @DELETING@-      -- The index is being deleted, and cannot be used by queries. There is an-      -- active long-running operation for the index. The index is not updated-      -- when writing an entity. Some index data may exist.-    | Error'-      -- ^ @ERROR@-      -- The index was being created or deleted, but something went wrong. The-      -- index cannot by used by queries. There is no active long-running-      -- operation for the index, and the most recently finished long-running-      -- operation failed. The index is not updated when writing an entity. Some-      -- index data may exist.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable GoogleDatastoreAdminV1IndexState--instance FromHttpApiData GoogleDatastoreAdminV1IndexState where-    parseQueryParam = \case-        "STATE_UNSPECIFIED" -> Right StateUnspecified-        "CREATING" -> Right Creating-        "READY" -> Right Ready-        "DELETING" -> Right Deleting-        "ERROR" -> Right Error'-        x -> Left ("Unable to parse GoogleDatastoreAdminV1IndexState from: " <> x)--instance ToHttpApiData GoogleDatastoreAdminV1IndexState where-    toQueryParam = \case-        StateUnspecified -> "STATE_UNSPECIFIED"-        Creating -> "CREATING"-        Ready -> "READY"-        Deleting -> "DELETING"-        Error' -> "ERROR"--instance FromJSON GoogleDatastoreAdminV1IndexState where-    parseJSON = parseJSONText "GoogleDatastoreAdminV1IndexState"--instance ToJSON GoogleDatastoreAdminV1IndexState where-    toJSON = toJSONText---- | V1 error format.-data Xgafv-    = X1-      -- ^ @1@-      -- v1 error format-    | X2-      -- ^ @2@-      -- v2 error format-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable Xgafv--instance FromHttpApiData Xgafv where-    parseQueryParam = \case-        "1" -> Right X1-        "2" -> Right X2-        x -> Left ("Unable to parse Xgafv from: " <> x)--instance ToHttpApiData Xgafv where-    toQueryParam = \case-        X1 -> "1"-        X2 -> "2"--instance FromJSON Xgafv where-    parseJSON = parseJSONText "Xgafv"--instance ToJSON Xgafv where-    toJSON = toJSONText---- | The current state of the Operation.-data GoogleDatastoreAdminV1beta1CommonMetadataState-    = GDAVCMSStateUnspecified-      -- ^ @STATE_UNSPECIFIED@-      -- Unspecified.-    | GDAVCMSInitializing-      -- ^ @INITIALIZING@-      -- Request is being prepared for processing.-    | GDAVCMSProcessing-      -- ^ @PROCESSING@-      -- Request is actively being processed.-    | GDAVCMSCancelling-      -- ^ @CANCELLING@-      -- Request is in the process of being cancelled after user called-      -- google.longrunning.Operations.CancelOperation on the operation.-    | GDAVCMSFinalizing-      -- ^ @FINALIZING@-      -- Request has been processed and is in its finalization stage.-    | GDAVCMSSuccessful-      -- ^ @SUCCESSFUL@-      -- Request has completed successfully.-    | GDAVCMSFailed-      -- ^ @FAILED@-      -- Request has finished being processed, but encountered an error.-    | GDAVCMSCancelled-      -- ^ @CANCELLED@-      -- Request has finished being cancelled after user called-      -- google.longrunning.Operations.CancelOperation.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable GoogleDatastoreAdminV1beta1CommonMetadataState--instance FromHttpApiData GoogleDatastoreAdminV1beta1CommonMetadataState where-    parseQueryParam = \case-        "STATE_UNSPECIFIED" -> Right GDAVCMSStateUnspecified-        "INITIALIZING" -> Right GDAVCMSInitializing-        "PROCESSING" -> Right GDAVCMSProcessing-        "CANCELLING" -> Right GDAVCMSCancelling-        "FINALIZING" -> Right GDAVCMSFinalizing-        "SUCCESSFUL" -> Right GDAVCMSSuccessful-        "FAILED" -> Right GDAVCMSFailed-        "CANCELLED" -> Right GDAVCMSCancelled-        x -> Left ("Unable to parse GoogleDatastoreAdminV1beta1CommonMetadataState from: " <> x)--instance ToHttpApiData GoogleDatastoreAdminV1beta1CommonMetadataState where-    toQueryParam = \case-        GDAVCMSStateUnspecified -> "STATE_UNSPECIFIED"-        GDAVCMSInitializing -> "INITIALIZING"-        GDAVCMSProcessing -> "PROCESSING"-        GDAVCMSCancelling -> "CANCELLING"-        GDAVCMSFinalizing -> "FINALIZING"-        GDAVCMSSuccessful -> "SUCCESSFUL"-        GDAVCMSFailed -> "FAILED"-        GDAVCMSCancelled -> "CANCELLED"--instance FromJSON GoogleDatastoreAdminV1beta1CommonMetadataState where-    parseJSON = parseJSONText "GoogleDatastoreAdminV1beta1CommonMetadataState"--instance ToJSON GoogleDatastoreAdminV1beta1CommonMetadataState where-    toJSON = toJSONText---- | The operator to filter by.-data PropertyFilterOp-    = PFOOperatorUnspecified-      -- ^ @OPERATOR_UNSPECIFIED@-      -- Unspecified. This value must not be used.-    | PFOLessThan-      -- ^ @LESS_THAN@-      -- Less than.-    | PFOLessThanOrEqual-      -- ^ @LESS_THAN_OR_EQUAL@-      -- Less than or equal.-    | PFOGreaterThan-      -- ^ @GREATER_THAN@-      -- Greater than.-    | PFOGreaterThanOrEqual-      -- ^ @GREATER_THAN_OR_EQUAL@-      -- Greater than or equal.-    | PFOEqual-      -- ^ @EQUAL@-      -- Equal.-    | PFOHasAncestor-      -- ^ @HAS_ANCESTOR@-      -- Has ancestor.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable PropertyFilterOp--instance FromHttpApiData PropertyFilterOp where-    parseQueryParam = \case-        "OPERATOR_UNSPECIFIED" -> Right PFOOperatorUnspecified-        "LESS_THAN" -> Right PFOLessThan-        "LESS_THAN_OR_EQUAL" -> Right PFOLessThanOrEqual-        "GREATER_THAN" -> Right PFOGreaterThan-        "GREATER_THAN_OR_EQUAL" -> Right PFOGreaterThanOrEqual-        "EQUAL" -> Right PFOEqual-        "HAS_ANCESTOR" -> Right PFOHasAncestor-        x -> Left ("Unable to parse PropertyFilterOp from: " <> x)--instance ToHttpApiData PropertyFilterOp where-    toQueryParam = \case-        PFOOperatorUnspecified -> "OPERATOR_UNSPECIFIED"-        PFOLessThan -> "LESS_THAN"-        PFOLessThanOrEqual -> "LESS_THAN_OR_EQUAL"-        PFOGreaterThan -> "GREATER_THAN"-        PFOGreaterThanOrEqual -> "GREATER_THAN_OR_EQUAL"-        PFOEqual -> "EQUAL"-        PFOHasAncestor -> "HAS_ANCESTOR"--instance FromJSON PropertyFilterOp where-    parseJSON = parseJSONText "PropertyFilterOp"--instance ToJSON PropertyFilterOp where-    toJSON = toJSONText---- | The type of commit to perform. Defaults to \`TRANSACTIONAL\`.-data CommitRequestMode-    = ModeUnspecified-      -- ^ @MODE_UNSPECIFIED@-      -- Unspecified. This value must not be used.-    | Transactional-      -- ^ @TRANSACTIONAL@-      -- Transactional: The mutations are either all applied, or none are-      -- applied. Learn about transactions-      -- [here](https:\/\/cloud.google.com\/datastore\/docs\/concepts\/transactions).-    | NonTransactional-      -- ^ @NON_TRANSACTIONAL@-      -- Non-transactional: The mutations may not apply as all or none.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable CommitRequestMode--instance FromHttpApiData CommitRequestMode where-    parseQueryParam = \case-        "MODE_UNSPECIFIED" -> Right ModeUnspecified-        "TRANSACTIONAL" -> Right Transactional-        "NON_TRANSACTIONAL" -> Right NonTransactional-        x -> Left ("Unable to parse CommitRequestMode from: " <> x)--instance ToHttpApiData CommitRequestMode where-    toQueryParam = \case-        ModeUnspecified -> "MODE_UNSPECIFIED"-        Transactional -> "TRANSACTIONAL"-        NonTransactional -> "NON_TRANSACTIONAL"--instance FromJSON CommitRequestMode where-    parseJSON = parseJSONText "CommitRequestMode"--instance ToJSON CommitRequestMode where-    toJSON = toJSONText---- | The current state of the Operation.-data GoogleDatastoreAdminV1CommonMetadataState-    = GStateUnspecified-      -- ^ @STATE_UNSPECIFIED@-      -- Unspecified.-    | GInitializing-      -- ^ @INITIALIZING@-      -- Request is being prepared for processing.-    | GProcessing-      -- ^ @PROCESSING@-      -- Request is actively being processed.-    | GCancelling-      -- ^ @CANCELLING@-      -- Request is in the process of being cancelled after user called-      -- google.longrunning.Operations.CancelOperation on the operation.-    | GFinalizing-      -- ^ @FINALIZING@-      -- Request has been processed and is in its finalization stage.-    | GSuccessful-      -- ^ @SUCCESSFUL@-      -- Request has completed successfully.-    | GFailed-      -- ^ @FAILED@-      -- Request has finished being processed, but encountered an error.-    | GCancelled-      -- ^ @CANCELLED@-      -- Request has finished being cancelled after user called-      -- google.longrunning.Operations.CancelOperation.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable GoogleDatastoreAdminV1CommonMetadataState--instance FromHttpApiData GoogleDatastoreAdminV1CommonMetadataState where-    parseQueryParam = \case-        "STATE_UNSPECIFIED" -> Right GStateUnspecified-        "INITIALIZING" -> Right GInitializing-        "PROCESSING" -> Right GProcessing-        "CANCELLING" -> Right GCancelling-        "FINALIZING" -> Right GFinalizing-        "SUCCESSFUL" -> Right GSuccessful-        "FAILED" -> Right GFailed-        "CANCELLED" -> Right GCancelled-        x -> Left ("Unable to parse GoogleDatastoreAdminV1CommonMetadataState from: " <> x)--instance ToHttpApiData GoogleDatastoreAdminV1CommonMetadataState where-    toQueryParam = \case-        GStateUnspecified -> "STATE_UNSPECIFIED"-        GInitializing -> "INITIALIZING"-        GProcessing -> "PROCESSING"-        GCancelling -> "CANCELLING"-        GFinalizing -> "FINALIZING"-        GSuccessful -> "SUCCESSFUL"-        GFailed -> "FAILED"-        GCancelled -> "CANCELLED"--instance FromJSON GoogleDatastoreAdminV1CommonMetadataState where-    parseJSON = parseJSONText "GoogleDatastoreAdminV1CommonMetadataState"--instance ToJSON GoogleDatastoreAdminV1CommonMetadataState where-    toJSON = toJSONText
− gen/Network/Google/Resource/Datastore/Projects/AllocateIds.hs 
@@ -1,167 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Datastore.Projects.AllocateIds--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Allocates IDs for the given keys, which is useful for referencing an--- entity before it is inserted.------ /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.allocateIds@.-module Network.Google.Resource.Datastore.Projects.AllocateIds-    (-    -- * REST Resource-      ProjectsAllocateIdsResource--    -- * Creating a Request-    , projectsAllocateIds-    , ProjectsAllocateIds--    -- * Request Lenses-    , paiXgafv-    , paiUploadProtocol-    , paiAccessToken-    , paiUploadType-    , paiPayload-    , paiProjectId-    , paiCallback-    ) where--import           Network.Google.Datastore.Types-import           Network.Google.Prelude---- | A resource alias for @datastore.projects.allocateIds@ method which the--- 'ProjectsAllocateIds' request conforms to.-type ProjectsAllocateIdsResource =-     "v1" :>-       "projects" :>-         CaptureMode "projectId" "allocateIds" Text :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "callback" Text :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON] AllocateIdsRequest :>-                         Post '[JSON] AllocateIdsResponse---- | Allocates IDs for the given keys, which is useful for referencing an--- entity before it is inserted.------ /See:/ 'projectsAllocateIds' smart constructor.-data ProjectsAllocateIds =-  ProjectsAllocateIds'-    { _paiXgafv          :: !(Maybe Xgafv)-    , _paiUploadProtocol :: !(Maybe Text)-    , _paiAccessToken    :: !(Maybe Text)-    , _paiUploadType     :: !(Maybe Text)-    , _paiPayload        :: !AllocateIdsRequest-    , _paiProjectId      :: !Text-    , _paiCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProjectsAllocateIds' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'paiXgafv'------ * 'paiUploadProtocol'------ * 'paiAccessToken'------ * 'paiUploadType'------ * 'paiPayload'------ * 'paiProjectId'------ * 'paiCallback'-projectsAllocateIds-    :: AllocateIdsRequest -- ^ 'paiPayload'-    -> Text -- ^ 'paiProjectId'-    -> ProjectsAllocateIds-projectsAllocateIds pPaiPayload_ pPaiProjectId_ =-  ProjectsAllocateIds'-    { _paiXgafv = Nothing-    , _paiUploadProtocol = Nothing-    , _paiAccessToken = Nothing-    , _paiUploadType = Nothing-    , _paiPayload = pPaiPayload_-    , _paiProjectId = pPaiProjectId_-    , _paiCallback = Nothing-    }----- | V1 error format.-paiXgafv :: Lens' ProjectsAllocateIds (Maybe Xgafv)-paiXgafv = lens _paiXgafv (\ s a -> s{_paiXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-paiUploadProtocol :: Lens' ProjectsAllocateIds (Maybe Text)-paiUploadProtocol-  = lens _paiUploadProtocol-      (\ s a -> s{_paiUploadProtocol = a})---- | OAuth access token.-paiAccessToken :: Lens' ProjectsAllocateIds (Maybe Text)-paiAccessToken-  = lens _paiAccessToken-      (\ s a -> s{_paiAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-paiUploadType :: Lens' ProjectsAllocateIds (Maybe Text)-paiUploadType-  = lens _paiUploadType-      (\ s a -> s{_paiUploadType = a})---- | Multipart request metadata.-paiPayload :: Lens' ProjectsAllocateIds AllocateIdsRequest-paiPayload-  = lens _paiPayload (\ s a -> s{_paiPayload = a})---- | The ID of the project against which to make the request.-paiProjectId :: Lens' ProjectsAllocateIds Text-paiProjectId-  = lens _paiProjectId (\ s a -> s{_paiProjectId = a})---- | JSONP-paiCallback :: Lens' ProjectsAllocateIds (Maybe Text)-paiCallback-  = lens _paiCallback (\ s a -> s{_paiCallback = a})--instance GoogleRequest ProjectsAllocateIds where-        type Rs ProjectsAllocateIds = AllocateIdsResponse-        type Scopes ProjectsAllocateIds =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/datastore"]-        requestClient ProjectsAllocateIds'{..}-          = go _paiProjectId _paiXgafv _paiUploadProtocol-              _paiAccessToken-              _paiUploadType-              _paiCallback-              (Just AltJSON)-              _paiPayload-              datastoreService-          where go-                  = buildClient-                      (Proxy :: Proxy ProjectsAllocateIdsResource)-                      mempty
− gen/Network/Google/Resource/Datastore/Projects/BeginTransaction.hs 
@@ -1,166 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Datastore.Projects.BeginTransaction--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Begins a new transaction.------ /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.beginTransaction@.-module Network.Google.Resource.Datastore.Projects.BeginTransaction-    (-    -- * REST Resource-      ProjectsBeginTransactionResource--    -- * Creating a Request-    , projectsBeginTransaction-    , ProjectsBeginTransaction--    -- * Request Lenses-    , pbtXgafv-    , pbtUploadProtocol-    , pbtAccessToken-    , pbtUploadType-    , pbtPayload-    , pbtProjectId-    , pbtCallback-    ) where--import           Network.Google.Datastore.Types-import           Network.Google.Prelude---- | A resource alias for @datastore.projects.beginTransaction@ method which the--- 'ProjectsBeginTransaction' request conforms to.-type ProjectsBeginTransactionResource =-     "v1" :>-       "projects" :>-         CaptureMode "projectId" "beginTransaction" Text :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "callback" Text :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON] BeginTransactionRequest :>-                         Post '[JSON] BeginTransactionResponse---- | Begins a new transaction.------ /See:/ 'projectsBeginTransaction' smart constructor.-data ProjectsBeginTransaction =-  ProjectsBeginTransaction'-    { _pbtXgafv          :: !(Maybe Xgafv)-    , _pbtUploadProtocol :: !(Maybe Text)-    , _pbtAccessToken    :: !(Maybe Text)-    , _pbtUploadType     :: !(Maybe Text)-    , _pbtPayload        :: !BeginTransactionRequest-    , _pbtProjectId      :: !Text-    , _pbtCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProjectsBeginTransaction' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pbtXgafv'------ * 'pbtUploadProtocol'------ * 'pbtAccessToken'------ * 'pbtUploadType'------ * 'pbtPayload'------ * 'pbtProjectId'------ * 'pbtCallback'-projectsBeginTransaction-    :: BeginTransactionRequest -- ^ 'pbtPayload'-    -> Text -- ^ 'pbtProjectId'-    -> ProjectsBeginTransaction-projectsBeginTransaction pPbtPayload_ pPbtProjectId_ =-  ProjectsBeginTransaction'-    { _pbtXgafv = Nothing-    , _pbtUploadProtocol = Nothing-    , _pbtAccessToken = Nothing-    , _pbtUploadType = Nothing-    , _pbtPayload = pPbtPayload_-    , _pbtProjectId = pPbtProjectId_-    , _pbtCallback = Nothing-    }----- | V1 error format.-pbtXgafv :: Lens' ProjectsBeginTransaction (Maybe Xgafv)-pbtXgafv = lens _pbtXgafv (\ s a -> s{_pbtXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-pbtUploadProtocol :: Lens' ProjectsBeginTransaction (Maybe Text)-pbtUploadProtocol-  = lens _pbtUploadProtocol-      (\ s a -> s{_pbtUploadProtocol = a})---- | OAuth access token.-pbtAccessToken :: Lens' ProjectsBeginTransaction (Maybe Text)-pbtAccessToken-  = lens _pbtAccessToken-      (\ s a -> s{_pbtAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-pbtUploadType :: Lens' ProjectsBeginTransaction (Maybe Text)-pbtUploadType-  = lens _pbtUploadType-      (\ s a -> s{_pbtUploadType = a})---- | Multipart request metadata.-pbtPayload :: Lens' ProjectsBeginTransaction BeginTransactionRequest-pbtPayload-  = lens _pbtPayload (\ s a -> s{_pbtPayload = a})---- | The ID of the project against which to make the request.-pbtProjectId :: Lens' ProjectsBeginTransaction Text-pbtProjectId-  = lens _pbtProjectId (\ s a -> s{_pbtProjectId = a})---- | JSONP-pbtCallback :: Lens' ProjectsBeginTransaction (Maybe Text)-pbtCallback-  = lens _pbtCallback (\ s a -> s{_pbtCallback = a})--instance GoogleRequest ProjectsBeginTransaction where-        type Rs ProjectsBeginTransaction =-             BeginTransactionResponse-        type Scopes ProjectsBeginTransaction =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/datastore"]-        requestClient ProjectsBeginTransaction'{..}-          = go _pbtProjectId _pbtXgafv _pbtUploadProtocol-              _pbtAccessToken-              _pbtUploadType-              _pbtCallback-              (Just AltJSON)-              _pbtPayload-              datastoreService-          where go-                  = buildClient-                      (Proxy :: Proxy ProjectsBeginTransactionResource)-                      mempty
− gen/Network/Google/Resource/Datastore/Projects/Commit.hs 
@@ -1,165 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Datastore.Projects.Commit--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Commits a transaction, optionally creating, deleting or modifying some--- entities.------ /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.commit@.-module Network.Google.Resource.Datastore.Projects.Commit-    (-    -- * REST Resource-      ProjectsCommitResource--    -- * Creating a Request-    , projectsCommit-    , ProjectsCommit--    -- * Request Lenses-    , pcXgafv-    , pcUploadProtocol-    , pcAccessToken-    , pcUploadType-    , pcPayload-    , pcProjectId-    , pcCallback-    ) where--import           Network.Google.Datastore.Types-import           Network.Google.Prelude---- | A resource alias for @datastore.projects.commit@ method which the--- 'ProjectsCommit' request conforms to.-type ProjectsCommitResource =-     "v1" :>-       "projects" :>-         CaptureMode "projectId" "commit" Text :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "callback" Text :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON] CommitRequest :>-                         Post '[JSON] CommitResponse---- | Commits a transaction, optionally creating, deleting or modifying some--- entities.------ /See:/ 'projectsCommit' smart constructor.-data ProjectsCommit =-  ProjectsCommit'-    { _pcXgafv          :: !(Maybe Xgafv)-    , _pcUploadProtocol :: !(Maybe Text)-    , _pcAccessToken    :: !(Maybe Text)-    , _pcUploadType     :: !(Maybe Text)-    , _pcPayload        :: !CommitRequest-    , _pcProjectId      :: !Text-    , _pcCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProjectsCommit' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pcXgafv'------ * 'pcUploadProtocol'------ * 'pcAccessToken'------ * 'pcUploadType'------ * 'pcPayload'------ * 'pcProjectId'------ * 'pcCallback'-projectsCommit-    :: CommitRequest -- ^ 'pcPayload'-    -> Text -- ^ 'pcProjectId'-    -> ProjectsCommit-projectsCommit pPcPayload_ pPcProjectId_ =-  ProjectsCommit'-    { _pcXgafv = Nothing-    , _pcUploadProtocol = Nothing-    , _pcAccessToken = Nothing-    , _pcUploadType = Nothing-    , _pcPayload = pPcPayload_-    , _pcProjectId = pPcProjectId_-    , _pcCallback = Nothing-    }----- | V1 error format.-pcXgafv :: Lens' ProjectsCommit (Maybe Xgafv)-pcXgafv = lens _pcXgafv (\ s a -> s{_pcXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-pcUploadProtocol :: Lens' ProjectsCommit (Maybe Text)-pcUploadProtocol-  = lens _pcUploadProtocol-      (\ s a -> s{_pcUploadProtocol = a})---- | OAuth access token.-pcAccessToken :: Lens' ProjectsCommit (Maybe Text)-pcAccessToken-  = lens _pcAccessToken-      (\ s a -> s{_pcAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-pcUploadType :: Lens' ProjectsCommit (Maybe Text)-pcUploadType-  = lens _pcUploadType (\ s a -> s{_pcUploadType = a})---- | Multipart request metadata.-pcPayload :: Lens' ProjectsCommit CommitRequest-pcPayload-  = lens _pcPayload (\ s a -> s{_pcPayload = a})---- | The ID of the project against which to make the request.-pcProjectId :: Lens' ProjectsCommit Text-pcProjectId-  = lens _pcProjectId (\ s a -> s{_pcProjectId = a})---- | JSONP-pcCallback :: Lens' ProjectsCommit (Maybe Text)-pcCallback-  = lens _pcCallback (\ s a -> s{_pcCallback = a})--instance GoogleRequest ProjectsCommit where-        type Rs ProjectsCommit = CommitResponse-        type Scopes ProjectsCommit =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/datastore"]-        requestClient ProjectsCommit'{..}-          = go _pcProjectId _pcXgafv _pcUploadProtocol-              _pcAccessToken-              _pcUploadType-              _pcCallback-              (Just AltJSON)-              _pcPayload-              datastoreService-          where go-                  = buildClient (Proxy :: Proxy ProjectsCommitResource)-                      mempty
− gen/Network/Google/Resource/Datastore/Projects/Export.hs 
@@ -1,178 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Datastore.Projects.Export--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Exports a copy of all or a subset of entities from Google Cloud--- Datastore to another storage system, such as Google Cloud Storage.--- Recent updates to entities may not be reflected in the export. The--- export occurs in the background and its progress can be monitored and--- managed via the Operation resource that is created. The output of an--- export may only be used once the associated operation is done. If an--- export operation is cancelled before completion it may leave partial--- data behind in Google Cloud Storage.------ /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.export@.-module Network.Google.Resource.Datastore.Projects.Export-    (-    -- * REST Resource-      ProjectsExportResource--    -- * Creating a Request-    , projectsExport-    , ProjectsExport--    -- * Request Lenses-    , peXgafv-    , peUploadProtocol-    , peAccessToken-    , peUploadType-    , pePayload-    , peProjectId-    , peCallback-    ) where--import           Network.Google.Datastore.Types-import           Network.Google.Prelude---- | A resource alias for @datastore.projects.export@ method which the--- 'ProjectsExport' request conforms to.-type ProjectsExportResource =-     "v1" :>-       "projects" :>-         CaptureMode "projectId" "export" Text :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "callback" Text :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON]-                         GoogleDatastoreAdminV1ExportEntitiesRequest-                         :> Post '[JSON] GoogleLongrunningOperation---- | Exports a copy of all or a subset of entities from Google Cloud--- Datastore to another storage system, such as Google Cloud Storage.--- Recent updates to entities may not be reflected in the export. The--- export occurs in the background and its progress can be monitored and--- managed via the Operation resource that is created. The output of an--- export may only be used once the associated operation is done. If an--- export operation is cancelled before completion it may leave partial--- data behind in Google Cloud Storage.------ /See:/ 'projectsExport' smart constructor.-data ProjectsExport =-  ProjectsExport'-    { _peXgafv          :: !(Maybe Xgafv)-    , _peUploadProtocol :: !(Maybe Text)-    , _peAccessToken    :: !(Maybe Text)-    , _peUploadType     :: !(Maybe Text)-    , _pePayload        :: !GoogleDatastoreAdminV1ExportEntitiesRequest-    , _peProjectId      :: !Text-    , _peCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProjectsExport' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'peXgafv'------ * 'peUploadProtocol'------ * 'peAccessToken'------ * 'peUploadType'------ * 'pePayload'------ * 'peProjectId'------ * 'peCallback'-projectsExport-    :: GoogleDatastoreAdminV1ExportEntitiesRequest -- ^ 'pePayload'-    -> Text -- ^ 'peProjectId'-    -> ProjectsExport-projectsExport pPePayload_ pPeProjectId_ =-  ProjectsExport'-    { _peXgafv = Nothing-    , _peUploadProtocol = Nothing-    , _peAccessToken = Nothing-    , _peUploadType = Nothing-    , _pePayload = pPePayload_-    , _peProjectId = pPeProjectId_-    , _peCallback = Nothing-    }----- | V1 error format.-peXgafv :: Lens' ProjectsExport (Maybe Xgafv)-peXgafv = lens _peXgafv (\ s a -> s{_peXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-peUploadProtocol :: Lens' ProjectsExport (Maybe Text)-peUploadProtocol-  = lens _peUploadProtocol-      (\ s a -> s{_peUploadProtocol = a})---- | OAuth access token.-peAccessToken :: Lens' ProjectsExport (Maybe Text)-peAccessToken-  = lens _peAccessToken-      (\ s a -> s{_peAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-peUploadType :: Lens' ProjectsExport (Maybe Text)-peUploadType-  = lens _peUploadType (\ s a -> s{_peUploadType = a})---- | Multipart request metadata.-pePayload :: Lens' ProjectsExport GoogleDatastoreAdminV1ExportEntitiesRequest-pePayload-  = lens _pePayload (\ s a -> s{_pePayload = a})---- | Project ID against which to make the request.-peProjectId :: Lens' ProjectsExport Text-peProjectId-  = lens _peProjectId (\ s a -> s{_peProjectId = a})---- | JSONP-peCallback :: Lens' ProjectsExport (Maybe Text)-peCallback-  = lens _peCallback (\ s a -> s{_peCallback = a})--instance GoogleRequest ProjectsExport where-        type Rs ProjectsExport = GoogleLongrunningOperation-        type Scopes ProjectsExport =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/datastore"]-        requestClient ProjectsExport'{..}-          = go _peProjectId _peXgafv _peUploadProtocol-              _peAccessToken-              _peUploadType-              _peCallback-              (Just AltJSON)-              _pePayload-              datastoreService-          where go-                  = buildClient (Proxy :: Proxy ProjectsExportResource)-                      mempty
− gen/Network/Google/Resource/Datastore/Projects/Import.hs 
@@ -1,170 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Datastore.Projects.Import--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Imports entities into Google Cloud Datastore. Existing entities with the--- same key are overwritten. The import occurs in the background and its--- progress can be monitored and managed via the Operation resource that is--- created. If an ImportEntities operation is cancelled, it is possible--- that a subset of the data has already been imported to Cloud Datastore.------ /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.import@.-module Network.Google.Resource.Datastore.Projects.Import-    (-    -- * REST Resource-      ProjectsImportResource--    -- * Creating a Request-    , projectsImport-    , ProjectsImport--    -- * Request Lenses-    , pXgafv-    , pUploadProtocol-    , pAccessToken-    , pUploadType-    , pPayload-    , pProjectId-    , pCallback-    ) where--import           Network.Google.Datastore.Types-import           Network.Google.Prelude---- | A resource alias for @datastore.projects.import@ method which the--- 'ProjectsImport' request conforms to.-type ProjectsImportResource =-     "v1" :>-       "projects" :>-         CaptureMode "projectId" "import" Text :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "callback" Text :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON]-                         GoogleDatastoreAdminV1ImportEntitiesRequest-                         :> Post '[JSON] GoogleLongrunningOperation---- | Imports entities into Google Cloud Datastore. Existing entities with the--- same key are overwritten. The import occurs in the background and its--- progress can be monitored and managed via the Operation resource that is--- created. If an ImportEntities operation is cancelled, it is possible--- that a subset of the data has already been imported to Cloud Datastore.------ /See:/ 'projectsImport' smart constructor.-data ProjectsImport =-  ProjectsImport'-    { _pXgafv          :: !(Maybe Xgafv)-    , _pUploadProtocol :: !(Maybe Text)-    , _pAccessToken    :: !(Maybe Text)-    , _pUploadType     :: !(Maybe Text)-    , _pPayload        :: !GoogleDatastoreAdminV1ImportEntitiesRequest-    , _pProjectId      :: !Text-    , _pCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProjectsImport' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pXgafv'------ * 'pUploadProtocol'------ * 'pAccessToken'------ * 'pUploadType'------ * 'pPayload'------ * 'pProjectId'------ * 'pCallback'-projectsImport-    :: GoogleDatastoreAdminV1ImportEntitiesRequest -- ^ 'pPayload'-    -> Text -- ^ 'pProjectId'-    -> ProjectsImport-projectsImport pPPayload_ pPProjectId_ =-  ProjectsImport'-    { _pXgafv = Nothing-    , _pUploadProtocol = Nothing-    , _pAccessToken = Nothing-    , _pUploadType = Nothing-    , _pPayload = pPPayload_-    , _pProjectId = pPProjectId_-    , _pCallback = Nothing-    }----- | V1 error format.-pXgafv :: Lens' ProjectsImport (Maybe Xgafv)-pXgafv = lens _pXgafv (\ s a -> s{_pXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-pUploadProtocol :: Lens' ProjectsImport (Maybe Text)-pUploadProtocol-  = lens _pUploadProtocol-      (\ s a -> s{_pUploadProtocol = a})---- | OAuth access token.-pAccessToken :: Lens' ProjectsImport (Maybe Text)-pAccessToken-  = lens _pAccessToken (\ s a -> s{_pAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-pUploadType :: Lens' ProjectsImport (Maybe Text)-pUploadType-  = lens _pUploadType (\ s a -> s{_pUploadType = a})---- | Multipart request metadata.-pPayload :: Lens' ProjectsImport GoogleDatastoreAdminV1ImportEntitiesRequest-pPayload = lens _pPayload (\ s a -> s{_pPayload = a})---- | Project ID against which to make the request.-pProjectId :: Lens' ProjectsImport Text-pProjectId-  = lens _pProjectId (\ s a -> s{_pProjectId = a})---- | JSONP-pCallback :: Lens' ProjectsImport (Maybe Text)-pCallback-  = lens _pCallback (\ s a -> s{_pCallback = a})--instance GoogleRequest ProjectsImport where-        type Rs ProjectsImport = GoogleLongrunningOperation-        type Scopes ProjectsImport =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/datastore"]-        requestClient ProjectsImport'{..}-          = go _pProjectId _pXgafv _pUploadProtocol-              _pAccessToken-              _pUploadType-              _pCallback-              (Just AltJSON)-              _pPayload-              datastoreService-          where go-                  = buildClient (Proxy :: Proxy ProjectsImportResource)-                      mempty
− gen/Network/Google/Resource/Datastore/Projects/Indexes/Get.hs 
@@ -1,167 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Datastore.Projects.Indexes.Get--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Gets an index.------ /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.indexes.get@.-module Network.Google.Resource.Datastore.Projects.Indexes.Get-    (-    -- * REST Resource-      ProjectsIndexesGetResource--    -- * Creating a Request-    , projectsIndexesGet-    , ProjectsIndexesGet--    -- * Request Lenses-    , pigXgafv-    , pigUploadProtocol-    , pigAccessToken-    , pigUploadType-    , pigProjectId-    , pigIndexId-    , pigCallback-    ) where--import           Network.Google.Datastore.Types-import           Network.Google.Prelude---- | A resource alias for @datastore.projects.indexes.get@ method which the--- 'ProjectsIndexesGet' request conforms to.-type ProjectsIndexesGetResource =-     "v1" :>-       "projects" :>-         Capture "projectId" Text :>-           "indexes" :>-             Capture "indexId" Text :>-               QueryParam "$.xgafv" Xgafv :>-                 QueryParam "upload_protocol" Text :>-                   QueryParam "access_token" Text :>-                     QueryParam "uploadType" Text :>-                       QueryParam "callback" Text :>-                         QueryParam "alt" AltJSON :>-                           Get '[JSON] GoogleDatastoreAdminV1Index---- | Gets an index.------ /See:/ 'projectsIndexesGet' smart constructor.-data ProjectsIndexesGet =-  ProjectsIndexesGet'-    { _pigXgafv          :: !(Maybe Xgafv)-    , _pigUploadProtocol :: !(Maybe Text)-    , _pigAccessToken    :: !(Maybe Text)-    , _pigUploadType     :: !(Maybe Text)-    , _pigProjectId      :: !Text-    , _pigIndexId        :: !Text-    , _pigCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProjectsIndexesGet' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pigXgafv'------ * 'pigUploadProtocol'------ * 'pigAccessToken'------ * 'pigUploadType'------ * 'pigProjectId'------ * 'pigIndexId'------ * 'pigCallback'-projectsIndexesGet-    :: Text -- ^ 'pigProjectId'-    -> Text -- ^ 'pigIndexId'-    -> ProjectsIndexesGet-projectsIndexesGet pPigProjectId_ pPigIndexId_ =-  ProjectsIndexesGet'-    { _pigXgafv = Nothing-    , _pigUploadProtocol = Nothing-    , _pigAccessToken = Nothing-    , _pigUploadType = Nothing-    , _pigProjectId = pPigProjectId_-    , _pigIndexId = pPigIndexId_-    , _pigCallback = Nothing-    }----- | V1 error format.-pigXgafv :: Lens' ProjectsIndexesGet (Maybe Xgafv)-pigXgafv = lens _pigXgafv (\ s a -> s{_pigXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-pigUploadProtocol :: Lens' ProjectsIndexesGet (Maybe Text)-pigUploadProtocol-  = lens _pigUploadProtocol-      (\ s a -> s{_pigUploadProtocol = a})---- | OAuth access token.-pigAccessToken :: Lens' ProjectsIndexesGet (Maybe Text)-pigAccessToken-  = lens _pigAccessToken-      (\ s a -> s{_pigAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-pigUploadType :: Lens' ProjectsIndexesGet (Maybe Text)-pigUploadType-  = lens _pigUploadType-      (\ s a -> s{_pigUploadType = a})---- | Project ID against which to make the request.-pigProjectId :: Lens' ProjectsIndexesGet Text-pigProjectId-  = lens _pigProjectId (\ s a -> s{_pigProjectId = a})---- | The resource ID of the index to get.-pigIndexId :: Lens' ProjectsIndexesGet Text-pigIndexId-  = lens _pigIndexId (\ s a -> s{_pigIndexId = a})---- | JSONP-pigCallback :: Lens' ProjectsIndexesGet (Maybe Text)-pigCallback-  = lens _pigCallback (\ s a -> s{_pigCallback = a})--instance GoogleRequest ProjectsIndexesGet where-        type Rs ProjectsIndexesGet =-             GoogleDatastoreAdminV1Index-        type Scopes ProjectsIndexesGet =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/datastore"]-        requestClient ProjectsIndexesGet'{..}-          = go _pigProjectId _pigIndexId _pigXgafv-              _pigUploadProtocol-              _pigAccessToken-              _pigUploadType-              _pigCallback-              (Just AltJSON)-              datastoreService-          where go-                  = buildClient-                      (Proxy :: Proxy ProjectsIndexesGetResource)-                      mempty
− gen/Network/Google/Resource/Datastore/Projects/Indexes/List.hs 
@@ -1,196 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Datastore.Projects.Indexes.List--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Lists the indexes that match the specified filters. Datastore uses an--- eventually consistent query to fetch the list of indexes and may--- occasionally return stale results.------ /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.indexes.list@.-module Network.Google.Resource.Datastore.Projects.Indexes.List-    (-    -- * REST Resource-      ProjectsIndexesListResource--    -- * Creating a Request-    , projectsIndexesList-    , ProjectsIndexesList--    -- * Request Lenses-    , pilXgafv-    , pilUploadProtocol-    , pilAccessToken-    , pilUploadType-    , pilFilter-    , pilPageToken-    , pilProjectId-    , pilPageSize-    , pilCallback-    ) where--import           Network.Google.Datastore.Types-import           Network.Google.Prelude---- | A resource alias for @datastore.projects.indexes.list@ method which the--- 'ProjectsIndexesList' request conforms to.-type ProjectsIndexesListResource =-     "v1" :>-       "projects" :>-         Capture "projectId" Text :>-           "indexes" :>-             QueryParam "$.xgafv" Xgafv :>-               QueryParam "upload_protocol" Text :>-                 QueryParam "access_token" Text :>-                   QueryParam "uploadType" Text :>-                     QueryParam "filter" Text :>-                       QueryParam "pageToken" Text :>-                         QueryParam "pageSize" (Textual Int32) :>-                           QueryParam "callback" Text :>-                             QueryParam "alt" AltJSON :>-                               Get '[JSON]-                                 GoogleDatastoreAdminV1ListIndexesResponse---- | Lists the indexes that match the specified filters. Datastore uses an--- eventually consistent query to fetch the list of indexes and may--- occasionally return stale results.------ /See:/ 'projectsIndexesList' smart constructor.-data ProjectsIndexesList =-  ProjectsIndexesList'-    { _pilXgafv          :: !(Maybe Xgafv)-    , _pilUploadProtocol :: !(Maybe Text)-    , _pilAccessToken    :: !(Maybe Text)-    , _pilUploadType     :: !(Maybe Text)-    , _pilFilter         :: !(Maybe Text)-    , _pilPageToken      :: !(Maybe Text)-    , _pilProjectId      :: !Text-    , _pilPageSize       :: !(Maybe (Textual Int32))-    , _pilCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProjectsIndexesList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pilXgafv'------ * 'pilUploadProtocol'------ * 'pilAccessToken'------ * 'pilUploadType'------ * 'pilFilter'------ * 'pilPageToken'------ * 'pilProjectId'------ * 'pilPageSize'------ * 'pilCallback'-projectsIndexesList-    :: Text -- ^ 'pilProjectId'-    -> ProjectsIndexesList-projectsIndexesList pPilProjectId_ =-  ProjectsIndexesList'-    { _pilXgafv = Nothing-    , _pilUploadProtocol = Nothing-    , _pilAccessToken = Nothing-    , _pilUploadType = Nothing-    , _pilFilter = Nothing-    , _pilPageToken = Nothing-    , _pilProjectId = pPilProjectId_-    , _pilPageSize = Nothing-    , _pilCallback = Nothing-    }----- | V1 error format.-pilXgafv :: Lens' ProjectsIndexesList (Maybe Xgafv)-pilXgafv = lens _pilXgafv (\ s a -> s{_pilXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-pilUploadProtocol :: Lens' ProjectsIndexesList (Maybe Text)-pilUploadProtocol-  = lens _pilUploadProtocol-      (\ s a -> s{_pilUploadProtocol = a})---- | OAuth access token.-pilAccessToken :: Lens' ProjectsIndexesList (Maybe Text)-pilAccessToken-  = lens _pilAccessToken-      (\ s a -> s{_pilAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-pilUploadType :: Lens' ProjectsIndexesList (Maybe Text)-pilUploadType-  = lens _pilUploadType-      (\ s a -> s{_pilUploadType = a})--pilFilter :: Lens' ProjectsIndexesList (Maybe Text)-pilFilter-  = lens _pilFilter (\ s a -> s{_pilFilter = a})---- | The next_page_token value returned from a previous List request, if any.-pilPageToken :: Lens' ProjectsIndexesList (Maybe Text)-pilPageToken-  = lens _pilPageToken (\ s a -> s{_pilPageToken = a})---- | Project ID against which to make the request.-pilProjectId :: Lens' ProjectsIndexesList Text-pilProjectId-  = lens _pilProjectId (\ s a -> s{_pilProjectId = a})---- | The maximum number of items to return. If zero, then all results will be--- returned.-pilPageSize :: Lens' ProjectsIndexesList (Maybe Int32)-pilPageSize-  = lens _pilPageSize (\ s a -> s{_pilPageSize = a}) .-      mapping _Coerce---- | JSONP-pilCallback :: Lens' ProjectsIndexesList (Maybe Text)-pilCallback-  = lens _pilCallback (\ s a -> s{_pilCallback = a})--instance GoogleRequest ProjectsIndexesList where-        type Rs ProjectsIndexesList =-             GoogleDatastoreAdminV1ListIndexesResponse-        type Scopes ProjectsIndexesList =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/datastore"]-        requestClient ProjectsIndexesList'{..}-          = go _pilProjectId _pilXgafv _pilUploadProtocol-              _pilAccessToken-              _pilUploadType-              _pilFilter-              _pilPageToken-              _pilPageSize-              _pilCallback-              (Just AltJSON)-              datastoreService-          where go-                  = buildClient-                      (Proxy :: Proxy ProjectsIndexesListResource)-                      mempty
− gen/Network/Google/Resource/Datastore/Projects/Lookup.hs 
@@ -1,163 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Datastore.Projects.Lookup--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Looks up entities by key.------ /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.lookup@.-module Network.Google.Resource.Datastore.Projects.Lookup-    (-    -- * REST Resource-      ProjectsLookupResource--    -- * Creating a Request-    , projectsLookup-    , ProjectsLookup--    -- * Request Lenses-    , plXgafv-    , plUploadProtocol-    , plAccessToken-    , plUploadType-    , plPayload-    , plProjectId-    , plCallback-    ) where--import           Network.Google.Datastore.Types-import           Network.Google.Prelude---- | A resource alias for @datastore.projects.lookup@ method which the--- 'ProjectsLookup' request conforms to.-type ProjectsLookupResource =-     "v1" :>-       "projects" :>-         CaptureMode "projectId" "lookup" Text :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "callback" Text :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON] LookupRequest :>-                         Post '[JSON] LookupResponse---- | Looks up entities by key.------ /See:/ 'projectsLookup' smart constructor.-data ProjectsLookup =-  ProjectsLookup'-    { _plXgafv          :: !(Maybe Xgafv)-    , _plUploadProtocol :: !(Maybe Text)-    , _plAccessToken    :: !(Maybe Text)-    , _plUploadType     :: !(Maybe Text)-    , _plPayload        :: !LookupRequest-    , _plProjectId      :: !Text-    , _plCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProjectsLookup' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'plXgafv'------ * 'plUploadProtocol'------ * 'plAccessToken'------ * 'plUploadType'------ * 'plPayload'------ * 'plProjectId'------ * 'plCallback'-projectsLookup-    :: LookupRequest -- ^ 'plPayload'-    -> Text -- ^ 'plProjectId'-    -> ProjectsLookup-projectsLookup pPlPayload_ pPlProjectId_ =-  ProjectsLookup'-    { _plXgafv = Nothing-    , _plUploadProtocol = Nothing-    , _plAccessToken = Nothing-    , _plUploadType = Nothing-    , _plPayload = pPlPayload_-    , _plProjectId = pPlProjectId_-    , _plCallback = Nothing-    }----- | V1 error format.-plXgafv :: Lens' ProjectsLookup (Maybe Xgafv)-plXgafv = lens _plXgafv (\ s a -> s{_plXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-plUploadProtocol :: Lens' ProjectsLookup (Maybe Text)-plUploadProtocol-  = lens _plUploadProtocol-      (\ s a -> s{_plUploadProtocol = a})---- | OAuth access token.-plAccessToken :: Lens' ProjectsLookup (Maybe Text)-plAccessToken-  = lens _plAccessToken-      (\ s a -> s{_plAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-plUploadType :: Lens' ProjectsLookup (Maybe Text)-plUploadType-  = lens _plUploadType (\ s a -> s{_plUploadType = a})---- | Multipart request metadata.-plPayload :: Lens' ProjectsLookup LookupRequest-plPayload-  = lens _plPayload (\ s a -> s{_plPayload = a})---- | The ID of the project against which to make the request.-plProjectId :: Lens' ProjectsLookup Text-plProjectId-  = lens _plProjectId (\ s a -> s{_plProjectId = a})---- | JSONP-plCallback :: Lens' ProjectsLookup (Maybe Text)-plCallback-  = lens _plCallback (\ s a -> s{_plCallback = a})--instance GoogleRequest ProjectsLookup where-        type Rs ProjectsLookup = LookupResponse-        type Scopes ProjectsLookup =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/datastore"]-        requestClient ProjectsLookup'{..}-          = go _plProjectId _plXgafv _plUploadProtocol-              _plAccessToken-              _plUploadType-              _plCallback-              (Just AltJSON)-              _plPayload-              datastoreService-          where go-                  = buildClient (Proxy :: Proxy ProjectsLookupResource)-                      mempty
− gen/Network/Google/Resource/Datastore/Projects/Operations/Cancel.hs 
@@ -1,165 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Datastore.Projects.Operations.Cancel--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Starts asynchronous cancellation on a long-running operation. The server--- makes a best effort to cancel the operation, but success is not--- guaranteed. If the server doesn\'t support this method, it returns--- \`google.rpc.Code.UNIMPLEMENTED\`. Clients can use--- Operations.GetOperation or other methods to check whether the--- cancellation succeeded or whether the operation completed despite--- cancellation. On successful cancellation, the operation is not deleted;--- instead, it becomes an operation with an Operation.error value with a--- google.rpc.Status.code of 1, corresponding to \`Code.CANCELLED\`.------ /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.operations.cancel@.-module Network.Google.Resource.Datastore.Projects.Operations.Cancel-    (-    -- * REST Resource-      ProjectsOperationsCancelResource--    -- * Creating a Request-    , projectsOperationsCancel-    , ProjectsOperationsCancel--    -- * Request Lenses-    , pocXgafv-    , pocUploadProtocol-    , pocAccessToken-    , pocUploadType-    , pocName-    , pocCallback-    ) where--import           Network.Google.Datastore.Types-import           Network.Google.Prelude---- | A resource alias for @datastore.projects.operations.cancel@ method which the--- 'ProjectsOperationsCancel' request conforms to.-type ProjectsOperationsCancelResource =-     "v1" :>-       CaptureMode "name" "cancel" Text :>-         QueryParam "$.xgafv" Xgafv :>-           QueryParam "upload_protocol" Text :>-             QueryParam "access_token" Text :>-               QueryParam "uploadType" Text :>-                 QueryParam "callback" Text :>-                   QueryParam "alt" AltJSON :> Post '[JSON] Empty---- | Starts asynchronous cancellation on a long-running operation. The server--- makes a best effort to cancel the operation, but success is not--- guaranteed. If the server doesn\'t support this method, it returns--- \`google.rpc.Code.UNIMPLEMENTED\`. Clients can use--- Operations.GetOperation or other methods to check whether the--- cancellation succeeded or whether the operation completed despite--- cancellation. On successful cancellation, the operation is not deleted;--- instead, it becomes an operation with an Operation.error value with a--- google.rpc.Status.code of 1, corresponding to \`Code.CANCELLED\`.------ /See:/ 'projectsOperationsCancel' smart constructor.-data ProjectsOperationsCancel =-  ProjectsOperationsCancel'-    { _pocXgafv          :: !(Maybe Xgafv)-    , _pocUploadProtocol :: !(Maybe Text)-    , _pocAccessToken    :: !(Maybe Text)-    , _pocUploadType     :: !(Maybe Text)-    , _pocName           :: !Text-    , _pocCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProjectsOperationsCancel' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pocXgafv'------ * 'pocUploadProtocol'------ * 'pocAccessToken'------ * 'pocUploadType'------ * 'pocName'------ * 'pocCallback'-projectsOperationsCancel-    :: Text -- ^ 'pocName'-    -> ProjectsOperationsCancel-projectsOperationsCancel pPocName_ =-  ProjectsOperationsCancel'-    { _pocXgafv = Nothing-    , _pocUploadProtocol = Nothing-    , _pocAccessToken = Nothing-    , _pocUploadType = Nothing-    , _pocName = pPocName_-    , _pocCallback = Nothing-    }----- | V1 error format.-pocXgafv :: Lens' ProjectsOperationsCancel (Maybe Xgafv)-pocXgafv = lens _pocXgafv (\ s a -> s{_pocXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-pocUploadProtocol :: Lens' ProjectsOperationsCancel (Maybe Text)-pocUploadProtocol-  = lens _pocUploadProtocol-      (\ s a -> s{_pocUploadProtocol = a})---- | OAuth access token.-pocAccessToken :: Lens' ProjectsOperationsCancel (Maybe Text)-pocAccessToken-  = lens _pocAccessToken-      (\ s a -> s{_pocAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-pocUploadType :: Lens' ProjectsOperationsCancel (Maybe Text)-pocUploadType-  = lens _pocUploadType-      (\ s a -> s{_pocUploadType = a})---- | The name of the operation resource to be cancelled.-pocName :: Lens' ProjectsOperationsCancel Text-pocName = lens _pocName (\ s a -> s{_pocName = a})---- | JSONP-pocCallback :: Lens' ProjectsOperationsCancel (Maybe Text)-pocCallback-  = lens _pocCallback (\ s a -> s{_pocCallback = a})--instance GoogleRequest ProjectsOperationsCancel where-        type Rs ProjectsOperationsCancel = Empty-        type Scopes ProjectsOperationsCancel =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/datastore"]-        requestClient ProjectsOperationsCancel'{..}-          = go _pocName _pocXgafv _pocUploadProtocol-              _pocAccessToken-              _pocUploadType-              _pocCallback-              (Just AltJSON)-              datastoreService-          where go-                  = buildClient-                      (Proxy :: Proxy ProjectsOperationsCancelResource)-                      mempty
− gen/Network/Google/Resource/Datastore/Projects/Operations/Delete.hs 
@@ -1,155 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Datastore.Projects.Operations.Delete--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Deletes a long-running operation. This method indicates that the client--- is no longer interested in the operation result. It does not cancel the--- operation. If the server doesn\'t support this method, it returns--- \`google.rpc.Code.UNIMPLEMENTED\`.------ /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.operations.delete@.-module Network.Google.Resource.Datastore.Projects.Operations.Delete-    (-    -- * REST Resource-      ProjectsOperationsDeleteResource--    -- * Creating a Request-    , projectsOperationsDelete-    , ProjectsOperationsDelete--    -- * Request Lenses-    , podXgafv-    , podUploadProtocol-    , podAccessToken-    , podUploadType-    , podName-    , podCallback-    ) where--import           Network.Google.Datastore.Types-import           Network.Google.Prelude---- | A resource alias for @datastore.projects.operations.delete@ method which the--- 'ProjectsOperationsDelete' request conforms to.-type ProjectsOperationsDeleteResource =-     "v1" :>-       Capture "name" Text :>-         QueryParam "$.xgafv" Xgafv :>-           QueryParam "upload_protocol" Text :>-             QueryParam "access_token" Text :>-               QueryParam "uploadType" Text :>-                 QueryParam "callback" Text :>-                   QueryParam "alt" AltJSON :> Delete '[JSON] Empty---- | Deletes a long-running operation. This method indicates that the client--- is no longer interested in the operation result. It does not cancel the--- operation. If the server doesn\'t support this method, it returns--- \`google.rpc.Code.UNIMPLEMENTED\`.------ /See:/ 'projectsOperationsDelete' smart constructor.-data ProjectsOperationsDelete =-  ProjectsOperationsDelete'-    { _podXgafv          :: !(Maybe Xgafv)-    , _podUploadProtocol :: !(Maybe Text)-    , _podAccessToken    :: !(Maybe Text)-    , _podUploadType     :: !(Maybe Text)-    , _podName           :: !Text-    , _podCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProjectsOperationsDelete' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'podXgafv'------ * 'podUploadProtocol'------ * 'podAccessToken'------ * 'podUploadType'------ * 'podName'------ * 'podCallback'-projectsOperationsDelete-    :: Text -- ^ 'podName'-    -> ProjectsOperationsDelete-projectsOperationsDelete pPodName_ =-  ProjectsOperationsDelete'-    { _podXgafv = Nothing-    , _podUploadProtocol = Nothing-    , _podAccessToken = Nothing-    , _podUploadType = Nothing-    , _podName = pPodName_-    , _podCallback = Nothing-    }----- | V1 error format.-podXgafv :: Lens' ProjectsOperationsDelete (Maybe Xgafv)-podXgafv = lens _podXgafv (\ s a -> s{_podXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-podUploadProtocol :: Lens' ProjectsOperationsDelete (Maybe Text)-podUploadProtocol-  = lens _podUploadProtocol-      (\ s a -> s{_podUploadProtocol = a})---- | OAuth access token.-podAccessToken :: Lens' ProjectsOperationsDelete (Maybe Text)-podAccessToken-  = lens _podAccessToken-      (\ s a -> s{_podAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-podUploadType :: Lens' ProjectsOperationsDelete (Maybe Text)-podUploadType-  = lens _podUploadType-      (\ s a -> s{_podUploadType = a})---- | The name of the operation resource to be deleted.-podName :: Lens' ProjectsOperationsDelete Text-podName = lens _podName (\ s a -> s{_podName = a})---- | JSONP-podCallback :: Lens' ProjectsOperationsDelete (Maybe Text)-podCallback-  = lens _podCallback (\ s a -> s{_podCallback = a})--instance GoogleRequest ProjectsOperationsDelete where-        type Rs ProjectsOperationsDelete = Empty-        type Scopes ProjectsOperationsDelete =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/datastore"]-        requestClient ProjectsOperationsDelete'{..}-          = go _podName _podXgafv _podUploadProtocol-              _podAccessToken-              _podUploadType-              _podCallback-              (Just AltJSON)-              datastoreService-          where go-                  = buildClient-                      (Proxy :: Proxy ProjectsOperationsDeleteResource)-                      mempty
− gen/Network/Google/Resource/Datastore/Projects/Operations/Get.hs 
@@ -1,155 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Datastore.Projects.Operations.Get--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Gets the latest state of a long-running operation. Clients can use this--- method to poll the operation result at intervals as recommended by the--- API service.------ /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.operations.get@.-module Network.Google.Resource.Datastore.Projects.Operations.Get-    (-    -- * REST Resource-      ProjectsOperationsGetResource--    -- * Creating a Request-    , projectsOperationsGet-    , ProjectsOperationsGet--    -- * Request Lenses-    , pogXgafv-    , pogUploadProtocol-    , pogAccessToken-    , pogUploadType-    , pogName-    , pogCallback-    ) where--import           Network.Google.Datastore.Types-import           Network.Google.Prelude---- | A resource alias for @datastore.projects.operations.get@ method which the--- 'ProjectsOperationsGet' request conforms to.-type ProjectsOperationsGetResource =-     "v1" :>-       Capture "name" Text :>-         QueryParam "$.xgafv" Xgafv :>-           QueryParam "upload_protocol" Text :>-             QueryParam "access_token" Text :>-               QueryParam "uploadType" Text :>-                 QueryParam "callback" Text :>-                   QueryParam "alt" AltJSON :>-                     Get '[JSON] GoogleLongrunningOperation---- | Gets the latest state of a long-running operation. Clients can use this--- method to poll the operation result at intervals as recommended by the--- API service.------ /See:/ 'projectsOperationsGet' smart constructor.-data ProjectsOperationsGet =-  ProjectsOperationsGet'-    { _pogXgafv          :: !(Maybe Xgafv)-    , _pogUploadProtocol :: !(Maybe Text)-    , _pogAccessToken    :: !(Maybe Text)-    , _pogUploadType     :: !(Maybe Text)-    , _pogName           :: !Text-    , _pogCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProjectsOperationsGet' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pogXgafv'------ * 'pogUploadProtocol'------ * 'pogAccessToken'------ * 'pogUploadType'------ * 'pogName'------ * 'pogCallback'-projectsOperationsGet-    :: Text -- ^ 'pogName'-    -> ProjectsOperationsGet-projectsOperationsGet pPogName_ =-  ProjectsOperationsGet'-    { _pogXgafv = Nothing-    , _pogUploadProtocol = Nothing-    , _pogAccessToken = Nothing-    , _pogUploadType = Nothing-    , _pogName = pPogName_-    , _pogCallback = Nothing-    }----- | V1 error format.-pogXgafv :: Lens' ProjectsOperationsGet (Maybe Xgafv)-pogXgafv = lens _pogXgafv (\ s a -> s{_pogXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-pogUploadProtocol :: Lens' ProjectsOperationsGet (Maybe Text)-pogUploadProtocol-  = lens _pogUploadProtocol-      (\ s a -> s{_pogUploadProtocol = a})---- | OAuth access token.-pogAccessToken :: Lens' ProjectsOperationsGet (Maybe Text)-pogAccessToken-  = lens _pogAccessToken-      (\ s a -> s{_pogAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-pogUploadType :: Lens' ProjectsOperationsGet (Maybe Text)-pogUploadType-  = lens _pogUploadType-      (\ s a -> s{_pogUploadType = a})---- | The name of the operation resource.-pogName :: Lens' ProjectsOperationsGet Text-pogName = lens _pogName (\ s a -> s{_pogName = a})---- | JSONP-pogCallback :: Lens' ProjectsOperationsGet (Maybe Text)-pogCallback-  = lens _pogCallback (\ s a -> s{_pogCallback = a})--instance GoogleRequest ProjectsOperationsGet where-        type Rs ProjectsOperationsGet =-             GoogleLongrunningOperation-        type Scopes ProjectsOperationsGet =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/datastore"]-        requestClient ProjectsOperationsGet'{..}-          = go _pogName _pogXgafv _pogUploadProtocol-              _pogAccessToken-              _pogUploadType-              _pogCallback-              (Just AltJSON)-              datastoreService-          where go-                  = buildClient-                      (Proxy :: Proxy ProjectsOperationsGetResource)-                      mempty
− gen/Network/Google/Resource/Datastore/Projects/Operations/List.hs 
@@ -1,207 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Datastore.Projects.Operations.List--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Lists operations that match the specified filter in the request. If the--- server doesn\'t support this method, it returns \`UNIMPLEMENTED\`. NOTE:--- the \`name\` binding allows API services to override the binding to use--- different resource name schemes, such as \`users\/*\/operations\`. To--- override the binding, API services can add a binding such as--- \`\"\/v1\/{name=users\/*}\/operations\"\` to their service--- configuration. For backwards compatibility, the default name includes--- the operations collection id, however overriding users must ensure the--- name binding is the parent resource, without the operations collection--- id.------ /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.operations.list@.-module Network.Google.Resource.Datastore.Projects.Operations.List-    (-    -- * REST Resource-      ProjectsOperationsListResource--    -- * Creating a Request-    , projectsOperationsList-    , ProjectsOperationsList--    -- * Request Lenses-    , polXgafv-    , polUploadProtocol-    , polAccessToken-    , polUploadType-    , polName-    , polFilter-    , polPageToken-    , polPageSize-    , polCallback-    ) where--import           Network.Google.Datastore.Types-import           Network.Google.Prelude---- | A resource alias for @datastore.projects.operations.list@ method which the--- 'ProjectsOperationsList' request conforms to.-type ProjectsOperationsListResource =-     "v1" :>-       Capture "name" Text :>-         "operations" :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "filter" Text :>-                     QueryParam "pageToken" Text :>-                       QueryParam "pageSize" (Textual Int32) :>-                         QueryParam "callback" Text :>-                           QueryParam "alt" AltJSON :>-                             Get '[JSON] GoogleLongrunningListOperationsResponse---- | Lists operations that match the specified filter in the request. If the--- server doesn\'t support this method, it returns \`UNIMPLEMENTED\`. NOTE:--- the \`name\` binding allows API services to override the binding to use--- different resource name schemes, such as \`users\/*\/operations\`. To--- override the binding, API services can add a binding such as--- \`\"\/v1\/{name=users\/*}\/operations\"\` to their service--- configuration. For backwards compatibility, the default name includes--- the operations collection id, however overriding users must ensure the--- name binding is the parent resource, without the operations collection--- id.------ /See:/ 'projectsOperationsList' smart constructor.-data ProjectsOperationsList =-  ProjectsOperationsList'-    { _polXgafv          :: !(Maybe Xgafv)-    , _polUploadProtocol :: !(Maybe Text)-    , _polAccessToken    :: !(Maybe Text)-    , _polUploadType     :: !(Maybe Text)-    , _polName           :: !Text-    , _polFilter         :: !(Maybe Text)-    , _polPageToken      :: !(Maybe Text)-    , _polPageSize       :: !(Maybe (Textual Int32))-    , _polCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProjectsOperationsList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'polXgafv'------ * 'polUploadProtocol'------ * 'polAccessToken'------ * 'polUploadType'------ * 'polName'------ * 'polFilter'------ * 'polPageToken'------ * 'polPageSize'------ * 'polCallback'-projectsOperationsList-    :: Text -- ^ 'polName'-    -> ProjectsOperationsList-projectsOperationsList pPolName_ =-  ProjectsOperationsList'-    { _polXgafv = Nothing-    , _polUploadProtocol = Nothing-    , _polAccessToken = Nothing-    , _polUploadType = Nothing-    , _polName = pPolName_-    , _polFilter = Nothing-    , _polPageToken = Nothing-    , _polPageSize = Nothing-    , _polCallback = Nothing-    }----- | V1 error format.-polXgafv :: Lens' ProjectsOperationsList (Maybe Xgafv)-polXgafv = lens _polXgafv (\ s a -> s{_polXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-polUploadProtocol :: Lens' ProjectsOperationsList (Maybe Text)-polUploadProtocol-  = lens _polUploadProtocol-      (\ s a -> s{_polUploadProtocol = a})---- | OAuth access token.-polAccessToken :: Lens' ProjectsOperationsList (Maybe Text)-polAccessToken-  = lens _polAccessToken-      (\ s a -> s{_polAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-polUploadType :: Lens' ProjectsOperationsList (Maybe Text)-polUploadType-  = lens _polUploadType-      (\ s a -> s{_polUploadType = a})---- | The name of the operation\'s parent resource.-polName :: Lens' ProjectsOperationsList Text-polName = lens _polName (\ s a -> s{_polName = a})---- | The standard list filter.-polFilter :: Lens' ProjectsOperationsList (Maybe Text)-polFilter-  = lens _polFilter (\ s a -> s{_polFilter = a})---- | The standard list page token.-polPageToken :: Lens' ProjectsOperationsList (Maybe Text)-polPageToken-  = lens _polPageToken (\ s a -> s{_polPageToken = a})---- | The standard list page size.-polPageSize :: Lens' ProjectsOperationsList (Maybe Int32)-polPageSize-  = lens _polPageSize (\ s a -> s{_polPageSize = a}) .-      mapping _Coerce---- | JSONP-polCallback :: Lens' ProjectsOperationsList (Maybe Text)-polCallback-  = lens _polCallback (\ s a -> s{_polCallback = a})--instance GoogleRequest ProjectsOperationsList where-        type Rs ProjectsOperationsList =-             GoogleLongrunningListOperationsResponse-        type Scopes ProjectsOperationsList =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/datastore"]-        requestClient ProjectsOperationsList'{..}-          = go _polName _polXgafv _polUploadProtocol-              _polAccessToken-              _polUploadType-              _polFilter-              _polPageToken-              _polPageSize-              _polCallback-              (Just AltJSON)-              datastoreService-          where go-                  = buildClient-                      (Proxy :: Proxy ProjectsOperationsListResource)-                      mempty
− gen/Network/Google/Resource/Datastore/Projects/ReserveIds.hs 
@@ -1,167 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Datastore.Projects.ReserveIds--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Prevents the supplied keys\' IDs from being auto-allocated by Cloud--- Datastore.------ /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.reserveIds@.-module Network.Google.Resource.Datastore.Projects.ReserveIds-    (-    -- * REST Resource-      ProjectsReserveIdsResource--    -- * Creating a Request-    , projectsReserveIds-    , ProjectsReserveIds--    -- * Request Lenses-    , priXgafv-    , priUploadProtocol-    , priAccessToken-    , priUploadType-    , priPayload-    , priProjectId-    , priCallback-    ) where--import           Network.Google.Datastore.Types-import           Network.Google.Prelude---- | A resource alias for @datastore.projects.reserveIds@ method which the--- 'ProjectsReserveIds' request conforms to.-type ProjectsReserveIdsResource =-     "v1" :>-       "projects" :>-         CaptureMode "projectId" "reserveIds" Text :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "callback" Text :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON] ReserveIdsRequest :>-                         Post '[JSON] ReserveIdsResponse---- | Prevents the supplied keys\' IDs from being auto-allocated by Cloud--- Datastore.------ /See:/ 'projectsReserveIds' smart constructor.-data ProjectsReserveIds =-  ProjectsReserveIds'-    { _priXgafv          :: !(Maybe Xgafv)-    , _priUploadProtocol :: !(Maybe Text)-    , _priAccessToken    :: !(Maybe Text)-    , _priUploadType     :: !(Maybe Text)-    , _priPayload        :: !ReserveIdsRequest-    , _priProjectId      :: !Text-    , _priCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProjectsReserveIds' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'priXgafv'------ * 'priUploadProtocol'------ * 'priAccessToken'------ * 'priUploadType'------ * 'priPayload'------ * 'priProjectId'------ * 'priCallback'-projectsReserveIds-    :: ReserveIdsRequest -- ^ 'priPayload'-    -> Text -- ^ 'priProjectId'-    -> ProjectsReserveIds-projectsReserveIds pPriPayload_ pPriProjectId_ =-  ProjectsReserveIds'-    { _priXgafv = Nothing-    , _priUploadProtocol = Nothing-    , _priAccessToken = Nothing-    , _priUploadType = Nothing-    , _priPayload = pPriPayload_-    , _priProjectId = pPriProjectId_-    , _priCallback = Nothing-    }----- | V1 error format.-priXgafv :: Lens' ProjectsReserveIds (Maybe Xgafv)-priXgafv = lens _priXgafv (\ s a -> s{_priXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-priUploadProtocol :: Lens' ProjectsReserveIds (Maybe Text)-priUploadProtocol-  = lens _priUploadProtocol-      (\ s a -> s{_priUploadProtocol = a})---- | OAuth access token.-priAccessToken :: Lens' ProjectsReserveIds (Maybe Text)-priAccessToken-  = lens _priAccessToken-      (\ s a -> s{_priAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-priUploadType :: Lens' ProjectsReserveIds (Maybe Text)-priUploadType-  = lens _priUploadType-      (\ s a -> s{_priUploadType = a})---- | Multipart request metadata.-priPayload :: Lens' ProjectsReserveIds ReserveIdsRequest-priPayload-  = lens _priPayload (\ s a -> s{_priPayload = a})---- | The ID of the project against which to make the request.-priProjectId :: Lens' ProjectsReserveIds Text-priProjectId-  = lens _priProjectId (\ s a -> s{_priProjectId = a})---- | JSONP-priCallback :: Lens' ProjectsReserveIds (Maybe Text)-priCallback-  = lens _priCallback (\ s a -> s{_priCallback = a})--instance GoogleRequest ProjectsReserveIds where-        type Rs ProjectsReserveIds = ReserveIdsResponse-        type Scopes ProjectsReserveIds =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/datastore"]-        requestClient ProjectsReserveIds'{..}-          = go _priProjectId _priXgafv _priUploadProtocol-              _priAccessToken-              _priUploadType-              _priCallback-              (Just AltJSON)-              _priPayload-              datastoreService-          where go-                  = buildClient-                      (Proxy :: Proxy ProjectsReserveIdsResource)-                      mempty
− gen/Network/Google/Resource/Datastore/Projects/Rollback.hs 
@@ -1,164 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Datastore.Projects.Rollback--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Rolls back a transaction.------ /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.rollback@.-module Network.Google.Resource.Datastore.Projects.Rollback-    (-    -- * REST Resource-      ProjectsRollbackResource--    -- * Creating a Request-    , projectsRollback-    , ProjectsRollback--    -- * Request Lenses-    , prXgafv-    , prUploadProtocol-    , prAccessToken-    , prUploadType-    , prPayload-    , prProjectId-    , prCallback-    ) where--import           Network.Google.Datastore.Types-import           Network.Google.Prelude---- | A resource alias for @datastore.projects.rollback@ method which the--- 'ProjectsRollback' request conforms to.-type ProjectsRollbackResource =-     "v1" :>-       "projects" :>-         CaptureMode "projectId" "rollback" Text :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "callback" Text :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON] RollbackRequest :>-                         Post '[JSON] RollbackResponse---- | Rolls back a transaction.------ /See:/ 'projectsRollback' smart constructor.-data ProjectsRollback =-  ProjectsRollback'-    { _prXgafv          :: !(Maybe Xgafv)-    , _prUploadProtocol :: !(Maybe Text)-    , _prAccessToken    :: !(Maybe Text)-    , _prUploadType     :: !(Maybe Text)-    , _prPayload        :: !RollbackRequest-    , _prProjectId      :: !Text-    , _prCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProjectsRollback' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'prXgafv'------ * 'prUploadProtocol'------ * 'prAccessToken'------ * 'prUploadType'------ * 'prPayload'------ * 'prProjectId'------ * 'prCallback'-projectsRollback-    :: RollbackRequest -- ^ 'prPayload'-    -> Text -- ^ 'prProjectId'-    -> ProjectsRollback-projectsRollback pPrPayload_ pPrProjectId_ =-  ProjectsRollback'-    { _prXgafv = Nothing-    , _prUploadProtocol = Nothing-    , _prAccessToken = Nothing-    , _prUploadType = Nothing-    , _prPayload = pPrPayload_-    , _prProjectId = pPrProjectId_-    , _prCallback = Nothing-    }----- | V1 error format.-prXgafv :: Lens' ProjectsRollback (Maybe Xgafv)-prXgafv = lens _prXgafv (\ s a -> s{_prXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-prUploadProtocol :: Lens' ProjectsRollback (Maybe Text)-prUploadProtocol-  = lens _prUploadProtocol-      (\ s a -> s{_prUploadProtocol = a})---- | OAuth access token.-prAccessToken :: Lens' ProjectsRollback (Maybe Text)-prAccessToken-  = lens _prAccessToken-      (\ s a -> s{_prAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-prUploadType :: Lens' ProjectsRollback (Maybe Text)-prUploadType-  = lens _prUploadType (\ s a -> s{_prUploadType = a})---- | Multipart request metadata.-prPayload :: Lens' ProjectsRollback RollbackRequest-prPayload-  = lens _prPayload (\ s a -> s{_prPayload = a})---- | The ID of the project against which to make the request.-prProjectId :: Lens' ProjectsRollback Text-prProjectId-  = lens _prProjectId (\ s a -> s{_prProjectId = a})---- | JSONP-prCallback :: Lens' ProjectsRollback (Maybe Text)-prCallback-  = lens _prCallback (\ s a -> s{_prCallback = a})--instance GoogleRequest ProjectsRollback where-        type Rs ProjectsRollback = RollbackResponse-        type Scopes ProjectsRollback =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/datastore"]-        requestClient ProjectsRollback'{..}-          = go _prProjectId _prXgafv _prUploadProtocol-              _prAccessToken-              _prUploadType-              _prCallback-              (Just AltJSON)-              _prPayload-              datastoreService-          where go-                  = buildClient-                      (Proxy :: Proxy ProjectsRollbackResource)-                      mempty
− gen/Network/Google/Resource/Datastore/Projects/RunQuery.hs 
@@ -1,165 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.Datastore.Projects.RunQuery--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Queries for entities.------ /See:/ <https://cloud.google.com/datastore/ Cloud Datastore API Reference> for @datastore.projects.runQuery@.-module Network.Google.Resource.Datastore.Projects.RunQuery-    (-    -- * REST Resource-      ProjectsRunQueryResource--    -- * Creating a Request-    , projectsRunQuery-    , ProjectsRunQuery--    -- * Request Lenses-    , prqXgafv-    , prqUploadProtocol-    , prqAccessToken-    , prqUploadType-    , prqPayload-    , prqProjectId-    , prqCallback-    ) where--import           Network.Google.Datastore.Types-import           Network.Google.Prelude---- | A resource alias for @datastore.projects.runQuery@ method which the--- 'ProjectsRunQuery' request conforms to.-type ProjectsRunQueryResource =-     "v1" :>-       "projects" :>-         CaptureMode "projectId" "runQuery" Text :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "callback" Text :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON] RunQueryRequest :>-                         Post '[JSON] RunQueryResponse---- | Queries for entities.------ /See:/ 'projectsRunQuery' smart constructor.-data ProjectsRunQuery =-  ProjectsRunQuery'-    { _prqXgafv          :: !(Maybe Xgafv)-    , _prqUploadProtocol :: !(Maybe Text)-    , _prqAccessToken    :: !(Maybe Text)-    , _prqUploadType     :: !(Maybe Text)-    , _prqPayload        :: !RunQueryRequest-    , _prqProjectId      :: !Text-    , _prqCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProjectsRunQuery' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'prqXgafv'------ * 'prqUploadProtocol'------ * 'prqAccessToken'------ * 'prqUploadType'------ * 'prqPayload'------ * 'prqProjectId'------ * 'prqCallback'-projectsRunQuery-    :: RunQueryRequest -- ^ 'prqPayload'-    -> Text -- ^ 'prqProjectId'-    -> ProjectsRunQuery-projectsRunQuery pPrqPayload_ pPrqProjectId_ =-  ProjectsRunQuery'-    { _prqXgafv = Nothing-    , _prqUploadProtocol = Nothing-    , _prqAccessToken = Nothing-    , _prqUploadType = Nothing-    , _prqPayload = pPrqPayload_-    , _prqProjectId = pPrqProjectId_-    , _prqCallback = Nothing-    }----- | V1 error format.-prqXgafv :: Lens' ProjectsRunQuery (Maybe Xgafv)-prqXgafv = lens _prqXgafv (\ s a -> s{_prqXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-prqUploadProtocol :: Lens' ProjectsRunQuery (Maybe Text)-prqUploadProtocol-  = lens _prqUploadProtocol-      (\ s a -> s{_prqUploadProtocol = a})---- | OAuth access token.-prqAccessToken :: Lens' ProjectsRunQuery (Maybe Text)-prqAccessToken-  = lens _prqAccessToken-      (\ s a -> s{_prqAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-prqUploadType :: Lens' ProjectsRunQuery (Maybe Text)-prqUploadType-  = lens _prqUploadType-      (\ s a -> s{_prqUploadType = a})---- | Multipart request metadata.-prqPayload :: Lens' ProjectsRunQuery RunQueryRequest-prqPayload-  = lens _prqPayload (\ s a -> s{_prqPayload = a})---- | The ID of the project against which to make the request.-prqProjectId :: Lens' ProjectsRunQuery Text-prqProjectId-  = lens _prqProjectId (\ s a -> s{_prqProjectId = a})---- | JSONP-prqCallback :: Lens' ProjectsRunQuery (Maybe Text)-prqCallback-  = lens _prqCallback (\ s a -> s{_prqCallback = a})--instance GoogleRequest ProjectsRunQuery where-        type Rs ProjectsRunQuery = RunQueryResponse-        type Scopes ProjectsRunQuery =-             '["https://www.googleapis.com/auth/cloud-platform",-               "https://www.googleapis.com/auth/datastore"]-        requestClient ProjectsRunQuery'{..}-          = go _prqProjectId _prqXgafv _prqUploadProtocol-              _prqAccessToken-              _prqUploadType-              _prqCallback-              (Just AltJSON)-              _prqPayload-              datastoreService-          where go-                  = buildClient-                      (Proxy :: Proxy ProjectsRunQueryResource)-                      mempty
gogol-datastore.cabal view
@@ -1,61 +1,78 @@-name:                  gogol-datastore-version:               0.5.0-synopsis:              Google Cloud Datastore SDK.-homepage:              https://github.com/brendanhay/gogol-bug-reports:           https://github.com/brendanhay/gogol/issues-license:               OtherLicense-license-file:          LICENSE-author:                Brendan Hay-maintainer:            Brendan Hay <brendan.g.hay@gmail.com>-copyright:             Copyright (c) 2015-2016 Brendan Hay-category:              Network, Google, Cloud-build-type:            Simple-cabal-version:         >= 1.10-extra-source-files:    README.md src/.gitkeep+cabal-version:      2.2+name:               gogol-datastore+version:            1.0.0+synopsis:           Google Cloud Datastore SDK.+homepage:           https://github.com/brendanhay/gogol+bug-reports:        https://github.com/brendanhay/gogol/issues+license:            MPL-2.0+license-file:       LICENSE+author:             Brendan Hay+maintainer:+  Brendan Hay <brendan.g.hay+gogol@gmail.com>, Toni Cebrián <toni@tonicebrian.com> +copyright:          Copyright (c) 2015-2025 Brendan Hay+category:           Google+build-type:         Simple+extra-source-files:+  README.md+  src/.gitkeep+ description:-    Accesses the schemaless NoSQL database to provide fully managed, robust,-    scalable storage for your application.-    .-    /Warning:/ This is an experimental prototype/preview release which is still-    under exploratory development and not intended for public use, caveat emptor!-    .-    This library is compatible with version @v1@-    of the API.+  Accesses the schemaless NoSQL database to provide fully managed, robust, scalable storage for your application.+  .+  /Warning:/ This is an experimental prototype/preview release which is still+  under exploratory development and not intended for public use, caveat emptor!+  .+  This library is compatible with version @v1@+  of the API.  source-repository head-    type:     git-    location: git://github.com/brendanhay/gogol.git+  type:     git+  location: git://github.com/brendanhay/gogol.git+  subdir:   gogol-datastore +flag field-selectors+  description:+    If record field selectors should be enabled. Disabling this requires GHC >=9.2 and the NoFieldSelectors extension.++  default:     False+  manual:      True+ library-    default-language:  Haskell2010-    hs-source-dirs:    src gen+  default-language: GHC2021+  hs-source-dirs:   src gen+  ghc-options:+    -Wall -fwarn-incomplete-uni-patterns+    -fwarn-incomplete-record-updates -funbox-strict-fields+    -fwarn-unused-packages -    ghc-options:       -Wall+  if (!flag(field-selectors) && impl(ghc >=9.2))+    default-extensions: NoFieldSelectors -    exposed-modules:-          Network.Google.Datastore-        , Network.Google.Datastore.Types-        , Network.Google.Resource.Datastore.Projects.AllocateIds-        , Network.Google.Resource.Datastore.Projects.BeginTransaction-        , Network.Google.Resource.Datastore.Projects.Commit-        , Network.Google.Resource.Datastore.Projects.Export-        , Network.Google.Resource.Datastore.Projects.Import-        , Network.Google.Resource.Datastore.Projects.Indexes.Get-        , Network.Google.Resource.Datastore.Projects.Indexes.List-        , Network.Google.Resource.Datastore.Projects.Lookup-        , Network.Google.Resource.Datastore.Projects.Operations.Cancel-        , Network.Google.Resource.Datastore.Projects.Operations.Delete-        , Network.Google.Resource.Datastore.Projects.Operations.Get-        , Network.Google.Resource.Datastore.Projects.Operations.List-        , Network.Google.Resource.Datastore.Projects.ReserveIds-        , Network.Google.Resource.Datastore.Projects.Rollback-        , Network.Google.Resource.Datastore.Projects.RunQuery+  exposed-modules:+    Gogol.Datastore+    Gogol.Datastore.Projects.AllocateIds+    Gogol.Datastore.Projects.BeginTransaction+    Gogol.Datastore.Projects.Commit+    Gogol.Datastore.Projects.Export+    Gogol.Datastore.Projects.Import+    Gogol.Datastore.Projects.Indexes.Create+    Gogol.Datastore.Projects.Indexes.Delete+    Gogol.Datastore.Projects.Indexes.Get+    Gogol.Datastore.Projects.Indexes.List+    Gogol.Datastore.Projects.Lookup+    Gogol.Datastore.Projects.Operations.Cancel+    Gogol.Datastore.Projects.Operations.Delete+    Gogol.Datastore.Projects.Operations.Get+    Gogol.Datastore.Projects.Operations.List+    Gogol.Datastore.Projects.ReserveIds+    Gogol.Datastore.Projects.Rollback+    Gogol.Datastore.Projects.RunAggregationQuery+    Gogol.Datastore.Projects.RunQuery+    Gogol.Datastore.Types -    other-modules:-          Network.Google.Datastore.Types.Product-        , Network.Google.Datastore.Types.Sum+  other-modules:+    Gogol.Datastore.Internal.Product+    Gogol.Datastore.Internal.Sum -    build-depends:-          gogol-core == 0.5.0.*-        , base       >= 4.7 && < 5+  build-depends:    gogol-core ^>=1.0.0