gogol-apps-reseller 0.5.0 → 1.0.0
raw patch · 45 files changed
+3457/−3700 lines, 45 filesdep −basedep ~gogol-coresetup-changed
Dependencies removed: base
Dependency ranges changed: gogol-core
Files
- README.md +2/−2
- Setup.hs +2/−1
- gen/Gogol/AppsReseller.hs +214/−0
- gen/Gogol/AppsReseller/Internal/Product.hs +813/−0
- gen/Gogol/AppsReseller/Internal/Sum.hs +182/−0
- gen/Gogol/AppsReseller/Reseller/Customers/Get.hs +112/−0
- gen/Gogol/AppsReseller/Reseller/Customers/Insert.hs +117/−0
- gen/Gogol/AppsReseller/Reseller/Customers/Patch.hs +117/−0
- gen/Gogol/AppsReseller/Reseller/Customers/Update.hs +117/−0
- gen/Gogol/AppsReseller/Reseller/Resellernotify/Getwatchdetails.hs +110/−0
- gen/Gogol/AppsReseller/Reseller/Resellernotify/Register.hs +109/−0
- gen/Gogol/AppsReseller/Reseller/Resellernotify/Unregister.hs +109/−0
- gen/Gogol/AppsReseller/Reseller/Subscriptions/Activate.hs +119/−0
- gen/Gogol/AppsReseller/Reseller/Subscriptions/ChangePlan.hs +129/−0
- gen/Gogol/AppsReseller/Reseller/Subscriptions/ChangeRenewalSettings.hs +136/−0
- gen/Gogol/AppsReseller/Reseller/Subscriptions/ChangeSeats.hs +129/−0
- gen/Gogol/AppsReseller/Reseller/Subscriptions/Delete.hs +128/−0
- gen/Gogol/AppsReseller/Reseller/Subscriptions/Get.hs +120/−0
- gen/Gogol/AppsReseller/Reseller/Subscriptions/Insert.hs +133/−0
- gen/Gogol/AppsReseller/Reseller/Subscriptions/List.hs +130/−0
- gen/Gogol/AppsReseller/Reseller/Subscriptions/StartPaidService.hs +121/−0
- gen/Gogol/AppsReseller/Reseller/Subscriptions/Suspend.hs +119/−0
- gen/Gogol/AppsReseller/Types.hs +122/−0
- gen/Network/Google/AppsReseller.hs +0/−245
- gen/Network/Google/AppsReseller/Types.hs +0/−160
- gen/Network/Google/AppsReseller/Types/Product.hs +0/−1253
- gen/Network/Google/AppsReseller/Types/Sum.hs +0/−54
- gen/Network/Google/Resource/Reseller/Customers/Get.hs +0/−90
- gen/Network/Google/Resource/Reseller/Customers/Insert.hs +0/−105
- gen/Network/Google/Resource/Reseller/Customers/Patch.hs +0/−104
- gen/Network/Google/Resource/Reseller/Customers/Update.hs +0/−103
- gen/Network/Google/Resource/Reseller/Resellernotify/Getwatchdetails.hs +0/−79
- gen/Network/Google/Resource/Reseller/Resellernotify/Register.hs +0/−92
- gen/Network/Google/Resource/Reseller/Resellernotify/Unregister.hs +0/−92
- gen/Network/Google/Resource/Reseller/Subscriptions/Activate.hs +0/−111
- gen/Network/Google/Resource/Reseller/Subscriptions/ChangePlan.hs +0/−132
- gen/Network/Google/Resource/Reseller/Subscriptions/ChangeRenewalSettings.hs +0/−135
- gen/Network/Google/Resource/Reseller/Subscriptions/ChangeSeats.hs +0/−127
- gen/Network/Google/Resource/Reseller/Subscriptions/Delete.hs +0/−129
- gen/Network/Google/Resource/Reseller/Subscriptions/Get.hs +0/−111
- gen/Network/Google/Resource/Reseller/Subscriptions/Insert.hs +0/−127
- gen/Network/Google/Resource/Reseller/Subscriptions/List.hs +0/−162
- gen/Network/Google/Resource/Reseller/Subscriptions/StartPaidService.hs +0/−119
- gen/Network/Google/Resource/Reseller/Subscriptions/Suspend.hs +0/−111
- gogol-apps-reseller.cabal +67/−56
README.md view
@@ -8,12 +8,12 @@ ## Version -`0.5.0`+`1.0.0` ## Description -A client library for the Google Enterprise Apps Reseller.+A client library for the Google Workspace Reseller. ## Contribute
Setup.hs view
@@ -1,2 +1,3 @@-import Distribution.Simple+import Distribution.Simple+ main = defaultMain
+ gen/Gogol/AppsReseller.hs view
@@ -0,0 +1,214 @@+{-# 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.AppsReseller+-- 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)+--+-- Perform common functions that are available on the Channel Services console at scale, like placing orders and viewing customer information+--+-- /See:/ <https://developers.google.com/google-apps/reseller/ Google Workspace Reseller API Reference>+module Gogol.AppsReseller+ ( -- * Configuration+ appsResellerService,++ -- * OAuth Scopes+ Apps'Order,+ Apps'Order'Readonly,++ -- * Resources++ -- ** reseller.customers.get+ ResellerCustomersGetResource,+ ResellerCustomersGet (..),+ newResellerCustomersGet,++ -- ** reseller.customers.insert+ ResellerCustomersInsertResource,+ ResellerCustomersInsert (..),+ newResellerCustomersInsert,++ -- ** reseller.customers.patch+ ResellerCustomersPatchResource,+ ResellerCustomersPatch (..),+ newResellerCustomersPatch,++ -- ** reseller.customers.update+ ResellerCustomersUpdateResource,+ ResellerCustomersUpdate (..),+ newResellerCustomersUpdate,++ -- ** reseller.resellernotify.getwatchdetails+ ResellerResellernotifyGetwatchdetailsResource,+ ResellerResellernotifyGetwatchdetails (..),+ newResellerResellernotifyGetwatchdetails,++ -- ** reseller.resellernotify.register+ ResellerResellernotifyRegisterResource,+ ResellerResellernotifyRegister (..),+ newResellerResellernotifyRegister,++ -- ** reseller.resellernotify.unregister+ ResellerResellernotifyUnregisterResource,+ ResellerResellernotifyUnregister (..),+ newResellerResellernotifyUnregister,++ -- ** reseller.subscriptions.activate+ ResellerSubscriptionsActivateResource,+ ResellerSubscriptionsActivate (..),+ newResellerSubscriptionsActivate,++ -- ** reseller.subscriptions.changePlan+ ResellerSubscriptionsChangePlanResource,+ ResellerSubscriptionsChangePlan (..),+ newResellerSubscriptionsChangePlan,++ -- ** reseller.subscriptions.changeRenewalSettings+ ResellerSubscriptionsChangeRenewalSettingsResource,+ ResellerSubscriptionsChangeRenewalSettings (..),+ newResellerSubscriptionsChangeRenewalSettings,++ -- ** reseller.subscriptions.changeSeats+ ResellerSubscriptionsChangeSeatsResource,+ ResellerSubscriptionsChangeSeats (..),+ newResellerSubscriptionsChangeSeats,++ -- ** reseller.subscriptions.delete+ ResellerSubscriptionsDeleteResource,+ ResellerSubscriptionsDelete (..),+ newResellerSubscriptionsDelete,++ -- ** reseller.subscriptions.get+ ResellerSubscriptionsGetResource,+ ResellerSubscriptionsGet (..),+ newResellerSubscriptionsGet,++ -- ** reseller.subscriptions.insert+ ResellerSubscriptionsInsertResource,+ ResellerSubscriptionsInsert (..),+ newResellerSubscriptionsInsert,++ -- ** reseller.subscriptions.list+ ResellerSubscriptionsListResource,+ ResellerSubscriptionsList (..),+ newResellerSubscriptionsList,++ -- ** reseller.subscriptions.startPaidService+ ResellerSubscriptionsStartPaidServiceResource,+ ResellerSubscriptionsStartPaidService (..),+ newResellerSubscriptionsStartPaidService,++ -- ** reseller.subscriptions.suspend+ ResellerSubscriptionsSuspendResource,+ ResellerSubscriptionsSuspend (..),+ newResellerSubscriptionsSuspend,++ -- * Types++ -- ** Xgafv+ Xgafv (..),++ -- ** Address+ Address (..),+ newAddress,++ -- ** ChangePlanRequest+ ChangePlanRequest (..),+ newChangePlanRequest,++ -- ** Customer+ Customer (..),+ newCustomer,++ -- ** Customer_CustomerType+ Customer_CustomerType (..),++ -- ** PrimaryAdmin+ PrimaryAdmin (..),+ newPrimaryAdmin,++ -- ** RenewalSettings+ RenewalSettings (..),+ newRenewalSettings,++ -- ** ResellernotifyGetwatchdetailsResponse+ ResellernotifyGetwatchdetailsResponse (..),+ newResellernotifyGetwatchdetailsResponse,++ -- ** ResellernotifyResource+ ResellernotifyResource (..),+ newResellernotifyResource,++ -- ** Seats+ Seats (..),+ newSeats,++ -- ** Subscription+ Subscription (..),+ newSubscription,++ -- ** Subscription_Plan+ Subscription_Plan (..),+ newSubscription_Plan,++ -- ** Subscription_Plan_CommitmentInterval+ Subscription_Plan_CommitmentInterval (..),+ newSubscription_Plan_CommitmentInterval,++ -- ** Subscription_TransferInfo+ Subscription_TransferInfo (..),+ newSubscription_TransferInfo,++ -- ** Subscription_TrialSettings+ Subscription_TrialSettings (..),+ newSubscription_TrialSettings,++ -- ** Subscriptions+ Subscriptions (..),+ newSubscriptions,++ -- ** SubscriptionsDeleteDeletionType+ SubscriptionsDeleteDeletionType (..),++ -- ** SubscriptionsInsertAction+ SubscriptionsInsertAction (..),+ )+where++import Gogol.AppsReseller.Reseller.Customers.Get+import Gogol.AppsReseller.Reseller.Customers.Insert+import Gogol.AppsReseller.Reseller.Customers.Patch+import Gogol.AppsReseller.Reseller.Customers.Update+import Gogol.AppsReseller.Reseller.Resellernotify.Getwatchdetails+import Gogol.AppsReseller.Reseller.Resellernotify.Register+import Gogol.AppsReseller.Reseller.Resellernotify.Unregister+import Gogol.AppsReseller.Reseller.Subscriptions.Activate+import Gogol.AppsReseller.Reseller.Subscriptions.ChangePlan+import Gogol.AppsReseller.Reseller.Subscriptions.ChangeRenewalSettings+import Gogol.AppsReseller.Reseller.Subscriptions.ChangeSeats+import Gogol.AppsReseller.Reseller.Subscriptions.Delete+import Gogol.AppsReseller.Reseller.Subscriptions.Get+import Gogol.AppsReseller.Reseller.Subscriptions.Insert+import Gogol.AppsReseller.Reseller.Subscriptions.List+import Gogol.AppsReseller.Reseller.Subscriptions.StartPaidService+import Gogol.AppsReseller.Reseller.Subscriptions.Suspend+import Gogol.AppsReseller.Types
+ gen/Gogol/AppsReseller/Internal/Product.hs view
@@ -0,0 +1,813 @@+{-# 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.AppsReseller.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.AppsReseller.Internal.Product+ ( -- * Address+ Address (..),+ newAddress,++ -- * ChangePlanRequest+ ChangePlanRequest (..),+ newChangePlanRequest,++ -- * Customer+ Customer (..),+ newCustomer,++ -- * PrimaryAdmin+ PrimaryAdmin (..),+ newPrimaryAdmin,++ -- * RenewalSettings+ RenewalSettings (..),+ newRenewalSettings,++ -- * ResellernotifyGetwatchdetailsResponse+ ResellernotifyGetwatchdetailsResponse (..),+ newResellernotifyGetwatchdetailsResponse,++ -- * ResellernotifyResource+ ResellernotifyResource (..),+ newResellernotifyResource,++ -- * Seats+ Seats (..),+ newSeats,++ -- * Subscription+ Subscription (..),+ newSubscription,++ -- * Subscription_Plan+ Subscription_Plan (..),+ newSubscription_Plan,++ -- * Subscription_Plan_CommitmentInterval+ Subscription_Plan_CommitmentInterval (..),+ newSubscription_Plan_CommitmentInterval,++ -- * Subscription_TransferInfo+ Subscription_TransferInfo (..),+ newSubscription_TransferInfo,++ -- * Subscription_TrialSettings+ Subscription_TrialSettings (..),+ newSubscription_TrialSettings,++ -- * Subscriptions+ Subscriptions (..),+ newSubscriptions,+ )+where++import Gogol.AppsReseller.Internal.Sum+import Gogol.Prelude qualified as Core++-- | JSON template for address of a customer.+--+-- /See:/ 'newAddress' smart constructor.+data Address = Address+ { -- | A customer\'s physical address. An address can be composed of one to three lines. The @addressline2@ and @addressLine3@ are optional.+ addressLine1 :: (Core.Maybe Core.Text),+ -- | Line 2 of the address.+ addressLine2 :: (Core.Maybe Core.Text),+ -- | Line 3 of the address.+ addressLine3 :: (Core.Maybe Core.Text),+ -- | The customer contact\'s name. This is required.+ contactName :: (Core.Maybe Core.Text),+ -- | For @countryCode@ information, see the ISO 3166 country code elements. Verify that country is approved for resale of Google products. This property is required when creating a new customer.+ countryCode :: (Core.Maybe Core.Text),+ -- | Identifies the resource as a customer address. Value: @customers#address@+ kind :: Core.Text,+ -- | An example of a @locality@ value is the city of @San Francisco@.+ locality :: (Core.Maybe Core.Text),+ -- | The company or company division name. This is required.+ organizationName :: (Core.Maybe Core.Text),+ -- | A @postalCode@ example is a postal zip code such as @94043@. This property is required when creating a new customer.+ postalCode :: (Core.Maybe Core.Text),+ -- | An example of a @region@ value is @CA@ for the state of California.+ region :: (Core.Maybe Core.Text)+ }+ deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Address' with the minimum fields required to make a request.+newAddress ::+ Address+newAddress =+ Address+ { addressLine1 = Core.Nothing,+ addressLine2 = Core.Nothing,+ addressLine3 = Core.Nothing,+ contactName = Core.Nothing,+ countryCode = Core.Nothing,+ kind = "customers#address",+ locality = Core.Nothing,+ organizationName = Core.Nothing,+ postalCode = Core.Nothing,+ region = Core.Nothing+ }++instance Core.FromJSON Address where+ parseJSON =+ Core.withObject+ "Address"+ ( \o ->+ Address+ Core.<$> (o Core..:? "addressLine1")+ Core.<*> (o Core..:? "addressLine2")+ Core.<*> (o Core..:? "addressLine3")+ Core.<*> (o Core..:? "contactName")+ Core.<*> (o Core..:? "countryCode")+ Core.<*> (o Core..:? "kind" Core..!= "customers#address")+ Core.<*> (o Core..:? "locality")+ Core.<*> (o Core..:? "organizationName")+ Core.<*> (o Core..:? "postalCode")+ Core.<*> (o Core..:? "region")+ )++instance Core.ToJSON Address where+ toJSON Address {..} =+ Core.object+ ( Core.catMaybes+ [ ("addressLine1" Core..=) Core.<$> addressLine1,+ ("addressLine2" Core..=) Core.<$> addressLine2,+ ("addressLine3" Core..=) Core.<$> addressLine3,+ ("contactName" Core..=) Core.<$> contactName,+ ("countryCode" Core..=) Core.<$> countryCode,+ Core.Just ("kind" Core..= kind),+ ("locality" Core..=) Core.<$> locality,+ ("organizationName" Core..=) Core.<$> organizationName,+ ("postalCode" Core..=) Core.<$> postalCode,+ ("region" Core..=) Core.<$> region+ ]+ )++-- | JSON template for the ChangePlan rpc request.+--+-- /See:/ 'newChangePlanRequest' smart constructor.+data ChangePlanRequest = ChangePlanRequest+ { -- | Google-issued code (100 char max) for discounted pricing on subscription plans. Deal code must be included in @changePlan@ request in order to receive discounted rate. This property is optional. If a deal code has already been added to a subscription, this property may be left empty and the existing discounted rate will still apply (if not empty, only provide the deal code that is already present on the subscription). If a deal code has never been added to a subscription and this property is left blank, regular pricing will apply.+ dealCode :: (Core.Maybe Core.Text),+ -- | Identifies the resource as a subscription change plan request. Value: @subscriptions#changePlanRequest@+ kind :: Core.Text,+ -- | The @planName@ property is required. This is the name of the subscription\'s payment plan. For more information about the Google payment plans, see API concepts. Possible values are: - @ANNUAL_MONTHLY_PAY@ - The annual commitment plan with monthly payments /Caution: /@ANNUAL_MONTHLY_PAY@ is returned as @ANNUAL@ in all API responses. - @ANNUAL_YEARLY_PAY@ - The annual commitment plan with yearly payments - @FLEXIBLE@ - The flexible plan - @TRIAL@ - The 30-day free trial plan+ planName :: (Core.Maybe Core.Text),+ -- | This is an optional property. This purchase order (PO) information is for resellers to use for their company tracking usage. If a @purchaseOrderId@ value is given it appears in the API responses and shows up in the invoice. The property accepts up to 80 plain text characters.+ purchaseOrderId :: (Core.Maybe Core.Text),+ -- | This is a required property. The seats property is the number of user seat licenses.+ seats :: (Core.Maybe Seats)+ }+ deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ChangePlanRequest' with the minimum fields required to make a request.+newChangePlanRequest ::+ ChangePlanRequest+newChangePlanRequest =+ ChangePlanRequest+ { dealCode = Core.Nothing,+ kind = "subscriptions#changePlanRequest",+ planName = Core.Nothing,+ purchaseOrderId = Core.Nothing,+ seats = Core.Nothing+ }++instance Core.FromJSON ChangePlanRequest where+ parseJSON =+ Core.withObject+ "ChangePlanRequest"+ ( \o ->+ ChangePlanRequest+ Core.<$> (o Core..:? "dealCode")+ Core.<*> (o Core..:? "kind" Core..!= "subscriptions#changePlanRequest")+ Core.<*> (o Core..:? "planName")+ Core.<*> (o Core..:? "purchaseOrderId")+ Core.<*> (o Core..:? "seats")+ )++instance Core.ToJSON ChangePlanRequest where+ toJSON ChangePlanRequest {..} =+ Core.object+ ( Core.catMaybes+ [ ("dealCode" Core..=) Core.<$> dealCode,+ Core.Just ("kind" Core..= kind),+ ("planName" Core..=) Core.<$> planName,+ ("purchaseOrderId" Core..=) Core.<$> purchaseOrderId,+ ("seats" Core..=) Core.<$> seats+ ]+ )++-- | When a Google customer\'s account is registered with a reseller, the customer\'s subscriptions for Google services are managed by this reseller. A customer is described by a primary domain name and a physical address.+--+-- /See:/ 'newCustomer' smart constructor.+data Customer = Customer+ { -- | Like the \"Customer email\" in the reseller tools, this email is the secondary contact used if something happens to the customer\'s service such as service outage or a security issue. This property is required when creating a new \"domain\" customer and should not use the same domain as @customerDomain@. The @alternateEmail@ field is not necessary to create a \"team\" customer.+ alternateEmail :: (Core.Maybe Core.Text),+ -- | The customer\'s primary domain name string. @customerDomain@ is required when creating a new customer. Do not include the @www@ prefix in the domain when adding a customer.+ customerDomain :: (Core.Maybe Core.Text),+ -- | Whether the customer\'s primary domain has been verified.+ customerDomainVerified :: (Core.Maybe Core.Bool),+ -- | This property will always be returned in a response as the unique identifier generated by Google. In a request, this property can be either the primary domain or the unique identifier generated by Google.+ customerId :: (Core.Maybe Core.Text),+ -- | Identifies the type of the customer. Acceptable values include: * @domain@: Implies a domain-verified customer (default). * @team@: Implies an email-verified customer. For more information, see <https://support.google.com/a/users/answer/9939479 managed teams>.+ customerType :: (Core.Maybe Customer_CustomerType),+ -- | Identifies the resource as a customer. Value: @reseller#customer@+ kind :: Core.Text,+ -- | Customer contact phone number. Must start with \"+\" followed by the country code. The rest of the number can be contiguous numbers or respect the phone local format conventions, but it must be a real phone number and not, for example, \"123\". This field is silently ignored if invalid.+ phoneNumber :: (Core.Maybe Core.Text),+ -- | A customer\'s address information. Each field has a limit of 255 charcters.+ postalAddress :: (Core.Maybe Address),+ -- | The first admin details of the customer, present in case of TEAM customer.+ primaryAdmin :: (Core.Maybe PrimaryAdmin),+ -- | URL to customer\'s Admin console dashboard. The read-only URL is generated by the API service. This is used if your client application requires the customer to complete a task in the Admin console.+ resourceUiUrl :: (Core.Maybe Core.Text)+ }+ deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Customer' with the minimum fields required to make a request.+newCustomer ::+ Customer+newCustomer =+ Customer+ { alternateEmail = Core.Nothing,+ customerDomain = Core.Nothing,+ customerDomainVerified = Core.Nothing,+ customerId = Core.Nothing,+ customerType = Core.Nothing,+ kind = "reseller#customer",+ phoneNumber = Core.Nothing,+ postalAddress = Core.Nothing,+ primaryAdmin = Core.Nothing,+ resourceUiUrl = Core.Nothing+ }++instance Core.FromJSON Customer where+ parseJSON =+ Core.withObject+ "Customer"+ ( \o ->+ Customer+ Core.<$> (o Core..:? "alternateEmail")+ Core.<*> (o Core..:? "customerDomain")+ Core.<*> (o Core..:? "customerDomainVerified")+ Core.<*> (o Core..:? "customerId")+ Core.<*> (o Core..:? "customerType")+ Core.<*> (o Core..:? "kind" Core..!= "reseller#customer")+ Core.<*> (o Core..:? "phoneNumber")+ Core.<*> (o Core..:? "postalAddress")+ Core.<*> (o Core..:? "primaryAdmin")+ Core.<*> (o Core..:? "resourceUiUrl")+ )++instance Core.ToJSON Customer where+ toJSON Customer {..} =+ Core.object+ ( Core.catMaybes+ [ ("alternateEmail" Core..=) Core.<$> alternateEmail,+ ("customerDomain" Core..=) Core.<$> customerDomain,+ ("customerDomainVerified" Core..=) Core.<$> customerDomainVerified,+ ("customerId" Core..=) Core.<$> customerId,+ ("customerType" Core..=) Core.<$> customerType,+ Core.Just ("kind" Core..= kind),+ ("phoneNumber" Core..=) Core.<$> phoneNumber,+ ("postalAddress" Core..=) Core.<$> postalAddress,+ ("primaryAdmin" Core..=) Core.<$> primaryAdmin,+ ("resourceUiUrl" Core..=) Core.<$> resourceUiUrl+ ]+ )++-- | JSON template for primary admin in case of TEAM customers+--+-- /See:/ 'newPrimaryAdmin' smart constructor.+newtype PrimaryAdmin = PrimaryAdmin+ { -- | The business email of the primary administrator of the customer. The email verification link is sent to this email address at the time of customer creation. Primary administrators have access to the customer\'s Admin Console, including the ability to invite and evict users and manage the administrative needs of the customer.+ primaryEmail :: (Core.Maybe Core.Text)+ }+ deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PrimaryAdmin' with the minimum fields required to make a request.+newPrimaryAdmin ::+ PrimaryAdmin+newPrimaryAdmin = PrimaryAdmin {primaryEmail = Core.Nothing}++instance Core.FromJSON PrimaryAdmin where+ parseJSON =+ Core.withObject+ "PrimaryAdmin"+ (\o -> PrimaryAdmin Core.<$> (o Core..:? "primaryEmail"))++instance Core.ToJSON PrimaryAdmin where+ toJSON PrimaryAdmin {..} =+ Core.object+ (Core.catMaybes [("primaryEmail" Core..=) Core.<$> primaryEmail])++-- | JSON template for a subscription renewal settings.+--+-- /See:/ 'newRenewalSettings' smart constructor.+data RenewalSettings = RenewalSettings+ { -- | Identifies the resource as a subscription renewal setting. Value: @subscriptions#renewalSettings@+ kind :: Core.Text,+ -- | Renewal settings for the annual commitment plan. For more detailed information, see renewal options in the administrator help center. When renewing a subscription, the @renewalType@ is a required property.+ renewalType :: (Core.Maybe Core.Text)+ }+ deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'RenewalSettings' with the minimum fields required to make a request.+newRenewalSettings ::+ RenewalSettings+newRenewalSettings =+ RenewalSettings+ { kind = "subscriptions#renewalSettings",+ renewalType = Core.Nothing+ }++instance Core.FromJSON RenewalSettings where+ parseJSON =+ Core.withObject+ "RenewalSettings"+ ( \o ->+ RenewalSettings+ Core.<$> (o Core..:? "kind" Core..!= "subscriptions#renewalSettings")+ Core.<*> (o Core..:? "renewalType")+ )++instance Core.ToJSON RenewalSettings where+ toJSON RenewalSettings {..} =+ Core.object+ ( Core.catMaybes+ [ Core.Just ("kind" Core..= kind),+ ("renewalType" Core..=) Core.<$> renewalType+ ]+ )++-- | JSON template for resellernotify getwatchdetails response.+--+-- /See:/ 'newResellernotifyGetwatchdetailsResponse' smart constructor.+data ResellernotifyGetwatchdetailsResponse = ResellernotifyGetwatchdetailsResponse+ { -- | List of registered service accounts.+ serviceAccountEmailAddresses :: (Core.Maybe [Core.Text]),+ -- | Topic name of the PubSub+ topicName :: (Core.Maybe Core.Text)+ }+ deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ResellernotifyGetwatchdetailsResponse' with the minimum fields required to make a request.+newResellernotifyGetwatchdetailsResponse ::+ ResellernotifyGetwatchdetailsResponse+newResellernotifyGetwatchdetailsResponse =+ ResellernotifyGetwatchdetailsResponse+ { serviceAccountEmailAddresses =+ Core.Nothing,+ topicName = Core.Nothing+ }++instance Core.FromJSON ResellernotifyGetwatchdetailsResponse where+ parseJSON =+ Core.withObject+ "ResellernotifyGetwatchdetailsResponse"+ ( \o ->+ ResellernotifyGetwatchdetailsResponse+ Core.<$> (o Core..:? "serviceAccountEmailAddresses")+ Core.<*> (o Core..:? "topicName")+ )++instance Core.ToJSON ResellernotifyGetwatchdetailsResponse where+ toJSON ResellernotifyGetwatchdetailsResponse {..} =+ Core.object+ ( Core.catMaybes+ [ ("serviceAccountEmailAddresses" Core..=)+ Core.<$> serviceAccountEmailAddresses,+ ("topicName" Core..=) Core.<$> topicName+ ]+ )++-- | JSON template for resellernotify response.+--+-- /See:/ 'newResellernotifyResource' smart constructor.+newtype ResellernotifyResource = ResellernotifyResource+ { -- | Topic name of the PubSub+ topicName :: (Core.Maybe Core.Text)+ }+ deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ResellernotifyResource' with the minimum fields required to make a request.+newResellernotifyResource ::+ ResellernotifyResource+newResellernotifyResource =+ ResellernotifyResource {topicName = Core.Nothing}++instance Core.FromJSON ResellernotifyResource where+ parseJSON =+ Core.withObject+ "ResellernotifyResource"+ (\o -> ResellernotifyResource Core.<$> (o Core..:? "topicName"))++instance Core.ToJSON ResellernotifyResource where+ toJSON ResellernotifyResource {..} =+ Core.object+ (Core.catMaybes [("topicName" Core..=) Core.<$> topicName])++-- | JSON template for subscription seats.+--+-- /See:/ 'newSeats' smart constructor.+data Seats = Seats+ { -- | Identifies the resource as a subscription seat setting. Value: @subscriptions#seats@+ kind :: Core.Text,+ -- | Read-only field containing the current number of users that are assigned a license for the product defined in @skuId@. This field\'s value is equivalent to the numerical count of users returned by the Enterprise License Manager API method: </admin-sdk/licensing/v1/reference/licenseAssignments/listForProductAndSku listForProductAndSku>.+ licensedNumberOfSeats :: (Core.Maybe Core.Int32),+ -- | This is a required property and is exclusive to subscriptions with @FLEXIBLE@ or @TRIAL@ plans. This property sets the maximum number of licensed users allowed on a subscription. This quantity can be increased up to the maximum limit defined in the reseller\'s contract. The minimum quantity is the current number of users in the customer account. /Note: /G Suite subscriptions automatically assign a license to every user.+ maximumNumberOfSeats :: (Core.Maybe Core.Int32),+ -- | This is a required property and is exclusive to subscriptions with @ANNUAL_MONTHLY_PAY@ and @ANNUAL_YEARLY_PAY@ plans. This property sets the maximum number of licenses assignable to users on a subscription. The reseller can add more licenses, but once set, the @numberOfSeats@ cannot be reduced until renewal. The reseller is invoiced based on the @numberOfSeats@ value regardless of how many of these user licenses are assigned. /Note: /Google Workspace subscriptions automatically assign a license to every user.+ numberOfSeats :: (Core.Maybe Core.Int32)+ }+ deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Seats' with the minimum fields required to make a request.+newSeats ::+ Seats+newSeats =+ Seats+ { kind = "subscriptions#seats",+ licensedNumberOfSeats = Core.Nothing,+ maximumNumberOfSeats = Core.Nothing,+ numberOfSeats = Core.Nothing+ }++instance Core.FromJSON Seats where+ parseJSON =+ Core.withObject+ "Seats"+ ( \o ->+ Seats+ Core.<$> (o Core..:? "kind" Core..!= "subscriptions#seats")+ Core.<*> (o Core..:? "licensedNumberOfSeats")+ Core.<*> (o Core..:? "maximumNumberOfSeats")+ Core.<*> (o Core..:? "numberOfSeats")+ )++instance Core.ToJSON Seats where+ toJSON Seats {..} =+ Core.object+ ( Core.catMaybes+ [ Core.Just ("kind" Core..= kind),+ ("licensedNumberOfSeats" Core..=) Core.<$> licensedNumberOfSeats,+ ("maximumNumberOfSeats" Core..=) Core.<$> maximumNumberOfSeats,+ ("numberOfSeats" Core..=) Core.<$> numberOfSeats+ ]+ )++-- | JSON template for a subscription.+--+-- /See:/ 'newSubscription' smart constructor.+data Subscription = Subscription+ { -- | Read-only field that returns the current billing method for a subscription.+ billingMethod :: (Core.Maybe Core.Text),+ -- | The @creationTime@ property is the date when subscription was created. It is in milliseconds using the Epoch format. See an example Epoch converter.+ creationTime :: (Core.Maybe Core.Int64),+ -- | Primary domain name of the customer+ customerDomain :: (Core.Maybe Core.Text),+ -- | This property will always be returned in a response as the unique identifier generated by Google. In a request, this property can be either the primary domain or the unique identifier generated by Google.+ customerId :: (Core.Maybe Core.Text),+ -- | Google-issued code (100 char max) for discounted pricing on subscription plans. Deal code must be included in @insert@ requests in order to receive discounted rate. This property is optional, regular pricing applies if left empty.+ dealCode :: (Core.Maybe Core.Text),+ -- | Identifies the resource as a Subscription. Value: @reseller#subscription@+ kind :: Core.Text,+ -- | The @plan@ property is required. In this version of the API, the G Suite plans are the flexible plan, annual commitment plan, and the 30-day free trial plan. For more information about the API\"s payment plans, see the API concepts.+ plan :: (Core.Maybe Subscription_Plan),+ -- | This is an optional property. This purchase order (PO) information is for resellers to use for their company tracking usage. If a @purchaseOrderId@ value is given it appears in the API responses and shows up in the invoice. The property accepts up to 80 plain text characters.+ purchaseOrderId :: (Core.Maybe Core.Text),+ -- | Renewal settings for the annual commitment plan. For more detailed information, see renewal options in the administrator help center.+ renewalSettings :: (Core.Maybe RenewalSettings),+ -- | URL to customer\'s Subscriptions page in the Admin console. The read-only URL is generated by the API service. This is used if your client application requires the customer to complete a task using the Subscriptions page in the Admin console.+ resourceUiUrl :: (Core.Maybe Core.Text),+ -- | This is a required property. The number and limit of user seat licenses in the plan.+ seats :: (Core.Maybe Seats),+ -- | A required property. The @skuId@ is a unique system identifier for a product\'s SKU assigned to a customer in the subscription. For products and SKUs available in this version of the API, see Product and SKU IDs.+ skuId :: (Core.Maybe Core.Text),+ -- | Read-only external display name for a product\'s SKU assigned to a customer in the subscription. SKU names are subject to change at Google\'s discretion. For products and SKUs available in this version of the API, see Product and SKU IDs.+ skuName :: (Core.Maybe Core.Text),+ -- | This is an optional property.+ status :: (Core.Maybe Core.Text),+ -- | The @subscriptionId@ is the subscription identifier and is unique for each customer. This is a required property. Since a @subscriptionId@ changes when a subscription is updated, we recommend not using this ID as a key for persistent data. Use the @subscriptionId@ as described in retrieve all reseller subscriptions.+ subscriptionId :: (Core.Maybe Core.Text),+ -- | Read-only field containing an enumerable of all the current suspension reasons for a subscription. It is possible for a subscription to have many concurrent, overlapping suspension reasons. A subscription\'s @STATUS@ is @SUSPENDED@ until all pending suspensions are removed. Possible options include: - @PENDING_TOS_ACCEPTANCE@ - The customer has not logged in and accepted the G Suite Resold Terms of Services. - @RENEWAL_WITH_TYPE_CANCEL@ - The customer\'s commitment ended and their service was cancelled at the end of their term. - @RESELLER_INITIATED@ - A manual suspension invoked by a Reseller. - @TRIAL_ENDED@ - The customer\'s trial expired without a plan selected. - @OTHER@ - The customer is suspended for an internal Google reason (e.g. abuse or otherwise).+ suspensionReasons :: (Core.Maybe [Core.Text]),+ -- | Read-only transfer related information for the subscription. For more information, see retrieve transferable subscriptions for a customer.+ transferInfo :: (Core.Maybe Subscription_TransferInfo),+ -- | The G Suite annual commitment and flexible payment plans can be in a 30-day free trial. For more information, see the API concepts.+ trialSettings :: (Core.Maybe Subscription_TrialSettings)+ }+ deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Subscription' with the minimum fields required to make a request.+newSubscription ::+ Subscription+newSubscription =+ Subscription+ { billingMethod = Core.Nothing,+ creationTime = Core.Nothing,+ customerDomain = Core.Nothing,+ customerId = Core.Nothing,+ dealCode = Core.Nothing,+ kind = "reseller#subscription",+ plan = Core.Nothing,+ purchaseOrderId = Core.Nothing,+ renewalSettings = Core.Nothing,+ resourceUiUrl = Core.Nothing,+ seats = Core.Nothing,+ skuId = Core.Nothing,+ skuName = Core.Nothing,+ status = Core.Nothing,+ subscriptionId = Core.Nothing,+ suspensionReasons = Core.Nothing,+ transferInfo = Core.Nothing,+ trialSettings = Core.Nothing+ }++instance Core.FromJSON Subscription where+ parseJSON =+ Core.withObject+ "Subscription"+ ( \o ->+ Subscription+ Core.<$> (o Core..:? "billingMethod")+ Core.<*> (o Core..:? "creationTime" Core.<&> Core.fmap Core.fromAsText)+ Core.<*> (o Core..:? "customerDomain")+ Core.<*> (o Core..:? "customerId")+ Core.<*> (o Core..:? "dealCode")+ Core.<*> (o Core..:? "kind" Core..!= "reseller#subscription")+ Core.<*> (o Core..:? "plan")+ Core.<*> (o Core..:? "purchaseOrderId")+ Core.<*> (o Core..:? "renewalSettings")+ Core.<*> (o Core..:? "resourceUiUrl")+ Core.<*> (o Core..:? "seats")+ Core.<*> (o Core..:? "skuId")+ Core.<*> (o Core..:? "skuName")+ Core.<*> (o Core..:? "status")+ Core.<*> (o Core..:? "subscriptionId")+ Core.<*> (o Core..:? "suspensionReasons")+ Core.<*> (o Core..:? "transferInfo")+ Core.<*> (o Core..:? "trialSettings")+ )++instance Core.ToJSON Subscription where+ toJSON Subscription {..} =+ Core.object+ ( Core.catMaybes+ [ ("billingMethod" Core..=) Core.<$> billingMethod,+ ("creationTime" Core..=) Core.. Core.AsText Core.<$> creationTime,+ ("customerDomain" Core..=) Core.<$> customerDomain,+ ("customerId" Core..=) Core.<$> customerId,+ ("dealCode" Core..=) Core.<$> dealCode,+ Core.Just ("kind" Core..= kind),+ ("plan" Core..=) Core.<$> plan,+ ("purchaseOrderId" Core..=) Core.<$> purchaseOrderId,+ ("renewalSettings" Core..=) Core.<$> renewalSettings,+ ("resourceUiUrl" Core..=) Core.<$> resourceUiUrl,+ ("seats" Core..=) Core.<$> seats,+ ("skuId" Core..=) Core.<$> skuId,+ ("skuName" Core..=) Core.<$> skuName,+ ("status" Core..=) Core.<$> status,+ ("subscriptionId" Core..=) Core.<$> subscriptionId,+ ("suspensionReasons" Core..=) Core.<$> suspensionReasons,+ ("transferInfo" Core..=) Core.<$> transferInfo,+ ("trialSettings" Core..=) Core.<$> trialSettings+ ]+ )++-- | The @plan@ property is required. In this version of the API, the G Suite plans are the flexible plan, annual commitment plan, and the 30-day free trial plan. For more information about the API\"s payment plans, see the API concepts.+--+-- /See:/ 'newSubscription_Plan' smart constructor.+data Subscription_Plan = Subscription_Plan+ { -- | In this version of the API, annual commitment plan\'s interval is one year. /Note: /When @billingMethod@ value is @OFFLINE@, the subscription property object @plan.commitmentInterval@ is omitted in all API responses.+ commitmentInterval :: (Core.Maybe Subscription_Plan_CommitmentInterval),+ -- | The @isCommitmentPlan@ property\'s boolean value identifies the plan as an annual commitment plan: - @true@ — The subscription\'s plan is an annual commitment plan. - @false@ — The plan is not an annual commitment plan.+ isCommitmentPlan :: (Core.Maybe Core.Bool),+ -- | The @planName@ property is required. This is the name of the subscription\'s plan. For more information about the Google payment plans, see the API concepts. Possible values are: - @ANNUAL_MONTHLY_PAY@ — The annual commitment plan with monthly payments. /Caution: /@ANNUAL_MONTHLY_PAY@ is returned as @ANNUAL@ in all API responses. - @ANNUAL_YEARLY_PAY@ — The annual commitment plan with yearly payments - @FLEXIBLE@ — The flexible plan - @TRIAL@ — The 30-day free trial plan. A subscription in trial will be suspended after the 30th free day if no payment plan is assigned. Calling @changePlan@ will assign a payment plan to a trial but will not activate the plan. A trial will automatically begin its assigned payment plan after its 30th free day or immediately after calling @startPaidService@. - @FREE@ — The free plan is exclusive to the Cloud Identity SKU and does not incur any billing.+ planName :: (Core.Maybe Core.Text)+ }+ deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Subscription_Plan' with the minimum fields required to make a request.+newSubscription_Plan ::+ Subscription_Plan+newSubscription_Plan =+ Subscription_Plan+ { commitmentInterval = Core.Nothing,+ isCommitmentPlan = Core.Nothing,+ planName = Core.Nothing+ }++instance Core.FromJSON Subscription_Plan where+ parseJSON =+ Core.withObject+ "Subscription_Plan"+ ( \o ->+ Subscription_Plan+ Core.<$> (o Core..:? "commitmentInterval")+ Core.<*> (o Core..:? "isCommitmentPlan")+ Core.<*> (o Core..:? "planName")+ )++instance Core.ToJSON Subscription_Plan where+ toJSON Subscription_Plan {..} =+ Core.object+ ( Core.catMaybes+ [ ("commitmentInterval" Core..=) Core.<$> commitmentInterval,+ ("isCommitmentPlan" Core..=) Core.<$> isCommitmentPlan,+ ("planName" Core..=) Core.<$> planName+ ]+ )++-- | In this version of the API, annual commitment plan\'s interval is one year. /Note: /When @billingMethod@ value is @OFFLINE@, the subscription property object @plan.commitmentInterval@ is omitted in all API responses.+--+-- /See:/ 'newSubscription_Plan_CommitmentInterval' smart constructor.+data Subscription_Plan_CommitmentInterval = Subscription_Plan_CommitmentInterval+ { -- | An annual commitment plan\'s interval\'s @endTime@ in milliseconds using the UNIX Epoch format. See an example Epoch converter.+ endTime :: (Core.Maybe Core.Int64),+ -- | An annual commitment plan\'s interval\'s @startTime@ in milliseconds using UNIX Epoch format. See an example Epoch converter.+ startTime :: (Core.Maybe Core.Int64)+ }+ deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Subscription_Plan_CommitmentInterval' with the minimum fields required to make a request.+newSubscription_Plan_CommitmentInterval ::+ Subscription_Plan_CommitmentInterval+newSubscription_Plan_CommitmentInterval =+ Subscription_Plan_CommitmentInterval+ { endTime = Core.Nothing,+ startTime = Core.Nothing+ }++instance Core.FromJSON Subscription_Plan_CommitmentInterval where+ parseJSON =+ Core.withObject+ "Subscription_Plan_CommitmentInterval"+ ( \o ->+ Subscription_Plan_CommitmentInterval+ Core.<$> (o Core..:? "endTime" Core.<&> Core.fmap Core.fromAsText)+ Core.<*> (o Core..:? "startTime" Core.<&> Core.fmap Core.fromAsText)+ )++instance Core.ToJSON Subscription_Plan_CommitmentInterval where+ toJSON Subscription_Plan_CommitmentInterval {..} =+ Core.object+ ( Core.catMaybes+ [ ("endTime" Core..=) Core.. Core.AsText Core.<$> endTime,+ ("startTime" Core..=) Core.. Core.AsText Core.<$> startTime+ ]+ )++-- | Read-only transfer related information for the subscription. For more information, see retrieve transferable subscriptions for a customer.+--+-- /See:/ 'newSubscription_TransferInfo' smart constructor.+data Subscription_TransferInfo = Subscription_TransferInfo+ { -- | The @skuId@ of the current resold subscription. This is populated only when the customer has a subscription with a legacy SKU and the subscription resource is populated with the @skuId@ of the SKU recommended for the transfer.+ currentLegacySkuId :: (Core.Maybe Core.Text),+ -- | When inserting a subscription, this is the minimum number of seats listed in the transfer order for this product. For example, if the customer has 20 users, the reseller cannot place a transfer order of 15 seats. The minimum is 20 seats.+ minimumTransferableSeats :: (Core.Maybe Core.Int32),+ -- | The time when transfer token or intent to transfer will expire. The time is in milliseconds using UNIX Epoch format.+ transferabilityExpirationTime :: (Core.Maybe Core.Int64)+ }+ deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Subscription_TransferInfo' with the minimum fields required to make a request.+newSubscription_TransferInfo ::+ Subscription_TransferInfo+newSubscription_TransferInfo =+ Subscription_TransferInfo+ { currentLegacySkuId = Core.Nothing,+ minimumTransferableSeats = Core.Nothing,+ transferabilityExpirationTime = Core.Nothing+ }++instance Core.FromJSON Subscription_TransferInfo where+ parseJSON =+ Core.withObject+ "Subscription_TransferInfo"+ ( \o ->+ Subscription_TransferInfo+ Core.<$> (o Core..:? "currentLegacySkuId")+ Core.<*> (o Core..:? "minimumTransferableSeats")+ Core.<*> ( o+ Core..:? "transferabilityExpirationTime"+ Core.<&> Core.fmap Core.fromAsText+ )+ )++instance Core.ToJSON Subscription_TransferInfo where+ toJSON Subscription_TransferInfo {..} =+ Core.object+ ( Core.catMaybes+ [ ("currentLegacySkuId" Core..=) Core.<$> currentLegacySkuId,+ ("minimumTransferableSeats" Core..=)+ Core.<$> minimumTransferableSeats,+ ("transferabilityExpirationTime" Core..=)+ Core.. Core.AsText+ Core.<$> transferabilityExpirationTime+ ]+ )++-- | The G Suite annual commitment and flexible payment plans can be in a 30-day free trial. For more information, see the API concepts.+--+-- /See:/ 'newSubscription_TrialSettings' smart constructor.+data Subscription_TrialSettings = Subscription_TrialSettings+ { -- | Determines if a subscription\'s plan is in a 30-day free trial or not: - @true@ — The plan is in trial. - @false@ — The plan is not in trial.+ isInTrial :: (Core.Maybe Core.Bool),+ -- | Date when the trial ends. The value is in milliseconds using the UNIX Epoch format. See an example Epoch converter.+ trialEndTime :: (Core.Maybe Core.Int64)+ }+ deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Subscription_TrialSettings' with the minimum fields required to make a request.+newSubscription_TrialSettings ::+ Subscription_TrialSettings+newSubscription_TrialSettings =+ Subscription_TrialSettings+ { isInTrial = Core.Nothing,+ trialEndTime = Core.Nothing+ }++instance Core.FromJSON Subscription_TrialSettings where+ parseJSON =+ Core.withObject+ "Subscription_TrialSettings"+ ( \o ->+ Subscription_TrialSettings+ Core.<$> (o Core..:? "isInTrial")+ Core.<*> (o Core..:? "trialEndTime" Core.<&> Core.fmap Core.fromAsText)+ )++instance Core.ToJSON Subscription_TrialSettings where+ toJSON Subscription_TrialSettings {..} =+ Core.object+ ( Core.catMaybes+ [ ("isInTrial" Core..=) Core.<$> isInTrial,+ ("trialEndTime" Core..=) Core.. Core.AsText Core.<$> trialEndTime+ ]+ )++-- | A subscription manages the relationship of a Google customer\'s payment plan with a product\'s SKU, user licenses, 30-day free trial status, and renewal options. A primary role of a reseller is to manage the Google customer\'s subscriptions.+--+-- /See:/ 'newSubscriptions' smart constructor.+data Subscriptions = Subscriptions+ { -- | Identifies the resource as a collection of subscriptions. Value: reseller#subscriptions+ kind :: Core.Text,+ -- | The continuation token, used to page through large result sets. Provide this value in a subsequent request to return the next page of results.+ nextPageToken :: (Core.Maybe Core.Text),+ -- | The subscriptions in this page of results.+ subscriptions :: (Core.Maybe [Subscription])+ }+ deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Subscriptions' with the minimum fields required to make a request.+newSubscriptions ::+ Subscriptions+newSubscriptions =+ Subscriptions+ { kind = "reseller#subscriptions",+ nextPageToken = Core.Nothing,+ subscriptions = Core.Nothing+ }++instance Core.FromJSON Subscriptions where+ parseJSON =+ Core.withObject+ "Subscriptions"+ ( \o ->+ Subscriptions+ Core.<$> (o Core..:? "kind" Core..!= "reseller#subscriptions")+ Core.<*> (o Core..:? "nextPageToken")+ Core.<*> (o Core..:? "subscriptions")+ )++instance Core.ToJSON Subscriptions where+ toJSON Subscriptions {..} =+ Core.object+ ( Core.catMaybes+ [ Core.Just ("kind" Core..= kind),+ ("nextPageToken" Core..=) Core.<$> nextPageToken,+ ("subscriptions" Core..=) Core.<$> subscriptions+ ]+ )
+ gen/Gogol/AppsReseller/Internal/Sum.hs view
@@ -0,0 +1,182 @@+{-# 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.AppsReseller.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.AppsReseller.Internal.Sum+ ( -- * Xgafv+ Xgafv+ ( Xgafv_1,+ Xgafv_2,+ ..+ ),++ -- * Customer_CustomerType+ Customer_CustomerType+ ( Customer_CustomerType_CustomerTypeUnspecified,+ Customer_CustomerType_Domain,+ Customer_CustomerType_Team,+ ..+ ),++ -- * SubscriptionsDeleteDeletionType+ SubscriptionsDeleteDeletionType+ ( SubscriptionsDeleteDeletionType_DeletionTypeUndefined,+ SubscriptionsDeleteDeletionType_Cancel,+ SubscriptionsDeleteDeletionType_TransferToDirect,+ ..+ ),++ -- * SubscriptionsInsertAction+ SubscriptionsInsertAction+ ( SubscriptionsInsertAction_ActionUnspecified,+ SubscriptionsInsertAction_Buy,+ SubscriptionsInsertAction_Switch,+ ..+ ),+ )+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+ #-}++-- | Identifies the type of the customer. Acceptable values include: * @domain@: Implies a domain-verified customer (default). * @team@: Implies an email-verified customer. For more information, see <https://support.google.com/a/users/answer/9939479 managed teams>.+newtype Customer_CustomerType = Customer_CustomerType {fromCustomer_CustomerType :: 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+ )++-- | Customer type not known+pattern Customer_CustomerType_CustomerTypeUnspecified :: Customer_CustomerType+pattern Customer_CustomerType_CustomerTypeUnspecified = Customer_CustomerType "customerTypeUnspecified"++-- | Domained or domain-owning customers+pattern Customer_CustomerType_Domain :: Customer_CustomerType+pattern Customer_CustomerType_Domain = Customer_CustomerType "domain"++-- | Domainless or email-verified customers+pattern Customer_CustomerType_Team :: Customer_CustomerType+pattern Customer_CustomerType_Team = Customer_CustomerType "team"++{-# COMPLETE+ Customer_CustomerType_CustomerTypeUnspecified,+ Customer_CustomerType_Domain,+ Customer_CustomerType_Team,+ Customer_CustomerType+ #-}++-- | The @deletionType@ query string enables the cancellation, downgrade, or suspension of a subscription.+newtype SubscriptionsDeleteDeletionType = SubscriptionsDeleteDeletionType {fromSubscriptionsDeleteDeletionType :: 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+ )++pattern SubscriptionsDeleteDeletionType_DeletionTypeUndefined :: SubscriptionsDeleteDeletionType+pattern SubscriptionsDeleteDeletionType_DeletionTypeUndefined = SubscriptionsDeleteDeletionType "deletion_type_undefined"++-- | Cancels the subscription immediately. This does not apply to a G Suite subscription.+pattern SubscriptionsDeleteDeletionType_Cancel :: SubscriptionsDeleteDeletionType+pattern SubscriptionsDeleteDeletionType_Cancel = SubscriptionsDeleteDeletionType "cancel"++-- | Transfers a subscription directly to Google. The customer is immediately transferred to a direct billing relationship with Google and is given a short amount of time with no service interruption. The customer can then choose to set up billing directly with Google by using a credit card, or they can transfer to another reseller.+pattern SubscriptionsDeleteDeletionType_TransferToDirect :: SubscriptionsDeleteDeletionType+pattern SubscriptionsDeleteDeletionType_TransferToDirect = SubscriptionsDeleteDeletionType "transfer_to_direct"++{-# COMPLETE+ SubscriptionsDeleteDeletionType_DeletionTypeUndefined,+ SubscriptionsDeleteDeletionType_Cancel,+ SubscriptionsDeleteDeletionType_TransferToDirect,+ SubscriptionsDeleteDeletionType+ #-}++-- | The intented insert action. The usage of this field is governed by certain policies which are being developed & tested currently. Hence, these might not work as intended. Once this is fully tested & available to consume, we will share more information about its usage, limitations and policy documentation.+newtype SubscriptionsInsertAction = SubscriptionsInsertAction {fromSubscriptionsInsertAction :: 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+ )++-- | Auto determines whether to create new subscription, upgrade or downagrade existing subscription or transfer the existing subscription+pattern SubscriptionsInsertAction_ActionUnspecified :: SubscriptionsInsertAction+pattern SubscriptionsInsertAction_ActionUnspecified = SubscriptionsInsertAction "actionUnspecified"++-- | Create new subscription+pattern SubscriptionsInsertAction_Buy :: SubscriptionsInsertAction+pattern SubscriptionsInsertAction_Buy = SubscriptionsInsertAction "buy"++-- | Switch existing subscription to another sku (upgrade\/downgrade)+pattern SubscriptionsInsertAction_Switch :: SubscriptionsInsertAction+pattern SubscriptionsInsertAction_Switch = SubscriptionsInsertAction "switch"++{-# COMPLETE+ SubscriptionsInsertAction_ActionUnspecified,+ SubscriptionsInsertAction_Buy,+ SubscriptionsInsertAction_Switch,+ SubscriptionsInsertAction+ #-}
+ gen/Gogol/AppsReseller/Reseller/Customers/Get.hs view
@@ -0,0 +1,112 @@+{-# 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.AppsReseller.Reseller.Customers.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 a customer account. Use this operation to see a customer account already in your reseller management, or to see the minimal account information for an existing customer that you do not manage. For more information about the API response for existing customers, see </admin-sdk/reseller/v1/how-tos/manage_customers#get_customer retrieving a customer account>.+--+-- /See:/ <https://developers.google.com/google-apps/reseller/ Google Workspace Reseller API Reference> for @reseller.customers.get@.+module Gogol.AppsReseller.Reseller.Customers.Get+ ( -- * Resource+ ResellerCustomersGetResource,++ -- ** Constructing a Request+ ResellerCustomersGet (..),+ newResellerCustomersGet,+ )+where++import Gogol.AppsReseller.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @reseller.customers.get@ method which the+-- 'ResellerCustomersGet' request conforms to.+type ResellerCustomersGetResource =+ "apps"+ Core.:> "reseller"+ Core.:> "v1"+ Core.:> "customers"+ Core.:> Core.Capture "customerId" 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] Customer++-- | Gets a customer account. Use this operation to see a customer account already in your reseller management, or to see the minimal account information for an existing customer that you do not manage. For more information about the API response for existing customers, see </admin-sdk/reseller/v1/how-tos/manage_customers#get_customer retrieving a customer account>.+--+-- /See:/ 'newResellerCustomersGet' smart constructor.+data ResellerCustomersGet = ResellerCustomersGet+ { -- | V1 error format.+ xgafv :: (Core.Maybe Xgafv),+ -- | OAuth access token.+ accessToken :: (Core.Maybe Core.Text),+ -- | JSONP+ callback :: (Core.Maybe Core.Text),+ -- | This can be either the customer\'s primary domain name or the customer\'s unique identifier. If the domain name for a customer changes, the old domain name cannot be used to access the customer, but the customer\'s unique identifier (as returned by the API) can always be used. We recommend storing the unique identifier in your systems where applicable.+ customerId :: 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 'ResellerCustomersGet' with the minimum fields required to make a request.+newResellerCustomersGet ::+ -- | This can be either the customer\'s primary domain name or the customer\'s unique identifier. If the domain name for a customer changes, the old domain name cannot be used to access the customer, but the customer\'s unique identifier (as returned by the API) can always be used. We recommend storing the unique identifier in your systems where applicable. See 'customerId'.+ Core.Text ->+ ResellerCustomersGet+newResellerCustomersGet customerId =+ ResellerCustomersGet+ { xgafv = Core.Nothing,+ accessToken = Core.Nothing,+ callback = Core.Nothing,+ customerId = customerId,+ uploadType = Core.Nothing,+ uploadProtocol = Core.Nothing+ }++instance Core.GoogleRequest ResellerCustomersGet where+ type Rs ResellerCustomersGet = Customer+ type+ Scopes ResellerCustomersGet =+ '[Apps'Order, Apps'Order'Readonly]+ requestClient ResellerCustomersGet {..} =+ go+ customerId+ xgafv+ accessToken+ callback+ uploadType+ uploadProtocol+ (Core.Just Core.AltJSON)+ appsResellerService+ where+ go =+ Core.buildClient+ (Core.Proxy :: Core.Proxy ResellerCustomersGetResource)+ Core.mempty
+ gen/Gogol/AppsReseller/Reseller/Customers/Insert.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.AppsReseller.Reseller.Customers.Insert+-- 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)+--+-- Orders a new customer\'s account. Before ordering a new customer account, establish whether the customer account already exists using the </admin-sdk/reseller/v1/reference/customers/get customers.get> If the customer account exists as a direct Google account or as a resold customer account from another reseller, use the @customerAuthToken\\@ as described in </admin-sdk/reseller/v1/how-tos/manage_customers#create_existing_customer order a resold account for an existing customer>. For more information about ordering a new customer account, see </admin-sdk/reseller/v1/how-tos/manage_customers#create_customer order a new customer account>. After creating a new customer account, you must provision a user as an administrator. The customer\'s administrator is required to sign in to the Admin console and sign the G Suite via Reseller agreement to activate the account. Resellers are prohibited from signing the G Suite via Reseller agreement on the customer\'s behalf. For more information, see+-- </admin-sdk/reseller/v1/how-tos/manage_customers#tos order a new customer account>.+--+-- /See:/ <https://developers.google.com/google-apps/reseller/ Google Workspace Reseller API Reference> for @reseller.customers.insert@.+module Gogol.AppsReseller.Reseller.Customers.Insert+ ( -- * Resource+ ResellerCustomersInsertResource,++ -- ** Constructing a Request+ ResellerCustomersInsert (..),+ newResellerCustomersInsert,+ )+where++import Gogol.AppsReseller.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @reseller.customers.insert@ method which the+-- 'ResellerCustomersInsert' request conforms to.+type ResellerCustomersInsertResource =+ "apps"+ Core.:> "reseller"+ Core.:> "v1"+ Core.:> "customers"+ Core.:> Core.QueryParam "$.xgafv" Xgafv+ Core.:> Core.QueryParam "access_token" Core.Text+ Core.:> Core.QueryParam "callback" Core.Text+ Core.:> Core.QueryParam "customerAuthToken" 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] Customer+ Core.:> Core.Post '[Core.JSON] Customer++-- | Orders a new customer\'s account. Before ordering a new customer account, establish whether the customer account already exists using the </admin-sdk/reseller/v1/reference/customers/get customers.get> If the customer account exists as a direct Google account or as a resold customer account from another reseller, use the @customerAuthToken\\@ as described in </admin-sdk/reseller/v1/how-tos/manage_customers#create_existing_customer order a resold account for an existing customer>. For more information about ordering a new customer account, see </admin-sdk/reseller/v1/how-tos/manage_customers#create_customer order a new customer account>. After creating a new customer account, you must provision a user as an administrator. The customer\'s administrator is required to sign in to the Admin console and sign the G Suite via Reseller agreement to activate the account. Resellers are prohibited from signing the G Suite via Reseller agreement on the customer\'s behalf. For more information, see+-- </admin-sdk/reseller/v1/how-tos/manage_customers#tos order a new customer account>.+--+-- /See:/ 'newResellerCustomersInsert' smart constructor.+data ResellerCustomersInsert = ResellerCustomersInsert+ { -- | V1 error format.+ xgafv :: (Core.Maybe Xgafv),+ -- | OAuth access token.+ accessToken :: (Core.Maybe Core.Text),+ -- | JSONP+ callback :: (Core.Maybe Core.Text),+ -- | The @customerAuthToken@ query string is required when creating a resold account that transfers a direct customer\'s subscription or transfers another reseller customer\'s subscription to your reseller management. This is a hexadecimal authentication token needed to complete the subscription transfer. For more information, see the administrator help center.+ customerAuthToken :: (Core.Maybe Core.Text),+ -- | Multipart request metadata.+ payload :: Customer,+ -- | 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 'ResellerCustomersInsert' with the minimum fields required to make a request.+newResellerCustomersInsert ::+ -- | Multipart request metadata. See 'payload'.+ Customer ->+ ResellerCustomersInsert+newResellerCustomersInsert payload =+ ResellerCustomersInsert+ { xgafv = Core.Nothing,+ accessToken = Core.Nothing,+ callback = Core.Nothing,+ customerAuthToken = Core.Nothing,+ payload = payload,+ uploadType = Core.Nothing,+ uploadProtocol = Core.Nothing+ }++instance Core.GoogleRequest ResellerCustomersInsert where+ type Rs ResellerCustomersInsert = Customer+ type Scopes ResellerCustomersInsert = '[Apps'Order]+ requestClient ResellerCustomersInsert {..} =+ go+ xgafv+ accessToken+ callback+ customerAuthToken+ uploadType+ uploadProtocol+ (Core.Just Core.AltJSON)+ payload+ appsResellerService+ where+ go =+ Core.buildClient+ (Core.Proxy :: Core.Proxy ResellerCustomersInsertResource)+ Core.mempty
+ gen/Gogol/AppsReseller/Reseller/Customers/Patch.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.AppsReseller.Reseller.Customers.Patch+-- 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)+--+-- Updates a customer account\'s settings. This method supports patch semantics. You cannot update @customerType@ via the Reseller API, but a @\"team\"@ customer can verify their domain and become @customerType = \"domain\"@. For more information, see <https://support.google.com/a/answer/9122284 Verify your domain to unlock Essentials features>.+--+-- /See:/ <https://developers.google.com/google-apps/reseller/ Google Workspace Reseller API Reference> for @reseller.customers.patch@.+module Gogol.AppsReseller.Reseller.Customers.Patch+ ( -- * Resource+ ResellerCustomersPatchResource,++ -- ** Constructing a Request+ ResellerCustomersPatch (..),+ newResellerCustomersPatch,+ )+where++import Gogol.AppsReseller.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @reseller.customers.patch@ method which the+-- 'ResellerCustomersPatch' request conforms to.+type ResellerCustomersPatchResource =+ "apps"+ Core.:> "reseller"+ Core.:> "v1"+ Core.:> "customers"+ Core.:> Core.Capture "customerId" 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] Customer+ Core.:> Core.Patch '[Core.JSON] Customer++-- | Updates a customer account\'s settings. This method supports patch semantics. You cannot update @customerType@ via the Reseller API, but a @\"team\"@ customer can verify their domain and become @customerType = \"domain\"@. For more information, see <https://support.google.com/a/answer/9122284 Verify your domain to unlock Essentials features>.+--+-- /See:/ 'newResellerCustomersPatch' smart constructor.+data ResellerCustomersPatch = ResellerCustomersPatch+ { -- | V1 error format.+ xgafv :: (Core.Maybe Xgafv),+ -- | OAuth access token.+ accessToken :: (Core.Maybe Core.Text),+ -- | JSONP+ callback :: (Core.Maybe Core.Text),+ -- | This can be either the customer\'s primary domain name or the customer\'s unique identifier. If the domain name for a customer changes, the old domain name cannot be used to access the customer, but the customer\'s unique identifier (as returned by the API) can always be used. We recommend storing the unique identifier in your systems where applicable.+ customerId :: Core.Text,+ -- | Multipart request metadata.+ payload :: Customer,+ -- | 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 'ResellerCustomersPatch' with the minimum fields required to make a request.+newResellerCustomersPatch ::+ -- | This can be either the customer\'s primary domain name or the customer\'s unique identifier. If the domain name for a customer changes, the old domain name cannot be used to access the customer, but the customer\'s unique identifier (as returned by the API) can always be used. We recommend storing the unique identifier in your systems where applicable. See 'customerId'.+ Core.Text ->+ -- | Multipart request metadata. See 'payload'.+ Customer ->+ ResellerCustomersPatch+newResellerCustomersPatch customerId payload =+ ResellerCustomersPatch+ { xgafv = Core.Nothing,+ accessToken = Core.Nothing,+ callback = Core.Nothing,+ customerId = customerId,+ payload = payload,+ uploadType = Core.Nothing,+ uploadProtocol = Core.Nothing+ }++instance Core.GoogleRequest ResellerCustomersPatch where+ type Rs ResellerCustomersPatch = Customer+ type Scopes ResellerCustomersPatch = '[Apps'Order]+ requestClient ResellerCustomersPatch {..} =+ go+ customerId+ xgafv+ accessToken+ callback+ uploadType+ uploadProtocol+ (Core.Just Core.AltJSON)+ payload+ appsResellerService+ where+ go =+ Core.buildClient+ (Core.Proxy :: Core.Proxy ResellerCustomersPatchResource)+ Core.mempty
+ gen/Gogol/AppsReseller/Reseller/Customers/Update.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.AppsReseller.Reseller.Customers.Update+-- 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)+--+-- Updates a customer account\'s settings. You cannot update @customerType@ via the Reseller API, but a @\"team\"@ customer can verify their domain and become @customerType = \"domain\"@. For more information, see </admin-sdk/reseller/v1/how-tos/manage_customers#update_customer update a customer\'s settings>.+--+-- /See:/ <https://developers.google.com/google-apps/reseller/ Google Workspace Reseller API Reference> for @reseller.customers.update@.+module Gogol.AppsReseller.Reseller.Customers.Update+ ( -- * Resource+ ResellerCustomersUpdateResource,++ -- ** Constructing a Request+ ResellerCustomersUpdate (..),+ newResellerCustomersUpdate,+ )+where++import Gogol.AppsReseller.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @reseller.customers.update@ method which the+-- 'ResellerCustomersUpdate' request conforms to.+type ResellerCustomersUpdateResource =+ "apps"+ Core.:> "reseller"+ Core.:> "v1"+ Core.:> "customers"+ Core.:> Core.Capture "customerId" 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] Customer+ Core.:> Core.Put '[Core.JSON] Customer++-- | Updates a customer account\'s settings. You cannot update @customerType@ via the Reseller API, but a @\"team\"@ customer can verify their domain and become @customerType = \"domain\"@. For more information, see </admin-sdk/reseller/v1/how-tos/manage_customers#update_customer update a customer\'s settings>.+--+-- /See:/ 'newResellerCustomersUpdate' smart constructor.+data ResellerCustomersUpdate = ResellerCustomersUpdate+ { -- | V1 error format.+ xgafv :: (Core.Maybe Xgafv),+ -- | OAuth access token.+ accessToken :: (Core.Maybe Core.Text),+ -- | JSONP+ callback :: (Core.Maybe Core.Text),+ -- | This can be either the customer\'s primary domain name or the customer\'s unique identifier. If the domain name for a customer changes, the old domain name cannot be used to access the customer, but the customer\'s unique identifier (as returned by the API) can always be used. We recommend storing the unique identifier in your systems where applicable.+ customerId :: Core.Text,+ -- | Multipart request metadata.+ payload :: Customer,+ -- | 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 'ResellerCustomersUpdate' with the minimum fields required to make a request.+newResellerCustomersUpdate ::+ -- | This can be either the customer\'s primary domain name or the customer\'s unique identifier. If the domain name for a customer changes, the old domain name cannot be used to access the customer, but the customer\'s unique identifier (as returned by the API) can always be used. We recommend storing the unique identifier in your systems where applicable. See 'customerId'.+ Core.Text ->+ -- | Multipart request metadata. See 'payload'.+ Customer ->+ ResellerCustomersUpdate+newResellerCustomersUpdate customerId payload =+ ResellerCustomersUpdate+ { xgafv = Core.Nothing,+ accessToken = Core.Nothing,+ callback = Core.Nothing,+ customerId = customerId,+ payload = payload,+ uploadType = Core.Nothing,+ uploadProtocol = Core.Nothing+ }++instance Core.GoogleRequest ResellerCustomersUpdate where+ type Rs ResellerCustomersUpdate = Customer+ type Scopes ResellerCustomersUpdate = '[Apps'Order]+ requestClient ResellerCustomersUpdate {..} =+ go+ customerId+ xgafv+ accessToken+ callback+ uploadType+ uploadProtocol+ (Core.Just Core.AltJSON)+ payload+ appsResellerService+ where+ go =+ Core.buildClient+ (Core.Proxy :: Core.Proxy ResellerCustomersUpdateResource)+ Core.mempty
+ gen/Gogol/AppsReseller/Reseller/Resellernotify/Getwatchdetails.hs view
@@ -0,0 +1,110 @@+{-# 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.AppsReseller.Reseller.Resellernotify.Getwatchdetails+-- 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)+--+-- Returns all the details of the watch corresponding to the reseller.+--+-- /See:/ <https://developers.google.com/google-apps/reseller/ Google Workspace Reseller API Reference> for @reseller.resellernotify.getwatchdetails@.+module Gogol.AppsReseller.Reseller.Resellernotify.Getwatchdetails+ ( -- * Resource+ ResellerResellernotifyGetwatchdetailsResource,++ -- ** Constructing a Request+ ResellerResellernotifyGetwatchdetails (..),+ newResellerResellernotifyGetwatchdetails,+ )+where++import Gogol.AppsReseller.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @reseller.resellernotify.getwatchdetails@ method which the+-- 'ResellerResellernotifyGetwatchdetails' request conforms to.+type ResellerResellernotifyGetwatchdetailsResource =+ "apps"+ Core.:> "reseller"+ Core.:> "v1"+ Core.:> "resellernotify"+ Core.:> "getwatchdetails"+ 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] ResellernotifyGetwatchdetailsResponse++-- | Returns all the details of the watch corresponding to the reseller.+--+-- /See:/ 'newResellerResellernotifyGetwatchdetails' smart constructor.+data ResellerResellernotifyGetwatchdetails = ResellerResellernotifyGetwatchdetails+ { -- | V1 error format.+ xgafv :: (Core.Maybe Xgafv),+ -- | OAuth access token.+ accessToken :: (Core.Maybe Core.Text),+ -- | JSONP+ callback :: (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 'ResellerResellernotifyGetwatchdetails' with the minimum fields required to make a request.+newResellerResellernotifyGetwatchdetails ::+ ResellerResellernotifyGetwatchdetails+newResellerResellernotifyGetwatchdetails =+ ResellerResellernotifyGetwatchdetails+ { xgafv = Core.Nothing,+ accessToken = Core.Nothing,+ callback = Core.Nothing,+ uploadType = Core.Nothing,+ uploadProtocol = Core.Nothing+ }++instance Core.GoogleRequest ResellerResellernotifyGetwatchdetails where+ type+ Rs ResellerResellernotifyGetwatchdetails =+ ResellernotifyGetwatchdetailsResponse+ type+ Scopes ResellerResellernotifyGetwatchdetails =+ '[Apps'Order, Apps'Order'Readonly]+ requestClient ResellerResellernotifyGetwatchdetails {..} =+ go+ xgafv+ accessToken+ callback+ uploadType+ uploadProtocol+ (Core.Just Core.AltJSON)+ appsResellerService+ where+ go =+ Core.buildClient+ ( Core.Proxy ::+ Core.Proxy ResellerResellernotifyGetwatchdetailsResource+ )+ Core.mempty
+ gen/Gogol/AppsReseller/Reseller/Resellernotify/Register.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.AppsReseller.Reseller.Resellernotify.Register+-- 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)+--+-- Registers a Reseller for receiving notifications.+--+-- /See:/ <https://developers.google.com/google-apps/reseller/ Google Workspace Reseller API Reference> for @reseller.resellernotify.register@.+module Gogol.AppsReseller.Reseller.Resellernotify.Register+ ( -- * Resource+ ResellerResellernotifyRegisterResource,++ -- ** Constructing a Request+ ResellerResellernotifyRegister (..),+ newResellerResellernotifyRegister,+ )+where++import Gogol.AppsReseller.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @reseller.resellernotify.register@ method which the+-- 'ResellerResellernotifyRegister' request conforms to.+type ResellerResellernotifyRegisterResource =+ "apps"+ Core.:> "reseller"+ Core.:> "v1"+ Core.:> "resellernotify"+ Core.:> "register"+ Core.:> Core.QueryParam "$.xgafv" Xgafv+ Core.:> Core.QueryParam "access_token" Core.Text+ Core.:> Core.QueryParam "callback" Core.Text+ Core.:> Core.QueryParam "serviceAccountEmailAddress" 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] ResellernotifyResource++-- | Registers a Reseller for receiving notifications.+--+-- /See:/ 'newResellerResellernotifyRegister' smart constructor.+data ResellerResellernotifyRegister = ResellerResellernotifyRegister+ { -- | V1 error format.+ xgafv :: (Core.Maybe Xgafv),+ -- | OAuth access token.+ accessToken :: (Core.Maybe Core.Text),+ -- | JSONP+ callback :: (Core.Maybe Core.Text),+ -- | The service account which will own the created Cloud-PubSub topic.+ serviceAccountEmailAddress :: (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 'ResellerResellernotifyRegister' with the minimum fields required to make a request.+newResellerResellernotifyRegister ::+ ResellerResellernotifyRegister+newResellerResellernotifyRegister =+ ResellerResellernotifyRegister+ { xgafv = Core.Nothing,+ accessToken = Core.Nothing,+ callback = Core.Nothing,+ serviceAccountEmailAddress = Core.Nothing,+ uploadType = Core.Nothing,+ uploadProtocol = Core.Nothing+ }++instance Core.GoogleRequest ResellerResellernotifyRegister where+ type Rs ResellerResellernotifyRegister = ResellernotifyResource+ type Scopes ResellerResellernotifyRegister = '[Apps'Order]+ requestClient ResellerResellernotifyRegister {..} =+ go+ xgafv+ accessToken+ callback+ serviceAccountEmailAddress+ uploadType+ uploadProtocol+ (Core.Just Core.AltJSON)+ appsResellerService+ where+ go =+ Core.buildClient+ (Core.Proxy :: Core.Proxy ResellerResellernotifyRegisterResource)+ Core.mempty
+ gen/Gogol/AppsReseller/Reseller/Resellernotify/Unregister.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.AppsReseller.Reseller.Resellernotify.Unregister+-- 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)+--+-- Unregisters a Reseller for receiving notifications.+--+-- /See:/ <https://developers.google.com/google-apps/reseller/ Google Workspace Reseller API Reference> for @reseller.resellernotify.unregister@.+module Gogol.AppsReseller.Reseller.Resellernotify.Unregister+ ( -- * Resource+ ResellerResellernotifyUnregisterResource,++ -- ** Constructing a Request+ ResellerResellernotifyUnregister (..),+ newResellerResellernotifyUnregister,+ )+where++import Gogol.AppsReseller.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @reseller.resellernotify.unregister@ method which the+-- 'ResellerResellernotifyUnregister' request conforms to.+type ResellerResellernotifyUnregisterResource =+ "apps"+ Core.:> "reseller"+ Core.:> "v1"+ Core.:> "resellernotify"+ Core.:> "unregister"+ Core.:> Core.QueryParam "$.xgafv" Xgafv+ Core.:> Core.QueryParam "access_token" Core.Text+ Core.:> Core.QueryParam "callback" Core.Text+ Core.:> Core.QueryParam "serviceAccountEmailAddress" 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] ResellernotifyResource++-- | Unregisters a Reseller for receiving notifications.+--+-- /See:/ 'newResellerResellernotifyUnregister' smart constructor.+data ResellerResellernotifyUnregister = ResellerResellernotifyUnregister+ { -- | V1 error format.+ xgafv :: (Core.Maybe Xgafv),+ -- | OAuth access token.+ accessToken :: (Core.Maybe Core.Text),+ -- | JSONP+ callback :: (Core.Maybe Core.Text),+ -- | The service account which owns the Cloud-PubSub topic.+ serviceAccountEmailAddress :: (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 'ResellerResellernotifyUnregister' with the minimum fields required to make a request.+newResellerResellernotifyUnregister ::+ ResellerResellernotifyUnregister+newResellerResellernotifyUnregister =+ ResellerResellernotifyUnregister+ { xgafv = Core.Nothing,+ accessToken = Core.Nothing,+ callback = Core.Nothing,+ serviceAccountEmailAddress = Core.Nothing,+ uploadType = Core.Nothing,+ uploadProtocol = Core.Nothing+ }++instance Core.GoogleRequest ResellerResellernotifyUnregister where+ type Rs ResellerResellernotifyUnregister = ResellernotifyResource+ type Scopes ResellerResellernotifyUnregister = '[Apps'Order]+ requestClient ResellerResellernotifyUnregister {..} =+ go+ xgafv+ accessToken+ callback+ serviceAccountEmailAddress+ uploadType+ uploadProtocol+ (Core.Just Core.AltJSON)+ appsResellerService+ where+ go =+ Core.buildClient+ (Core.Proxy :: Core.Proxy ResellerResellernotifyUnregisterResource)+ Core.mempty
+ gen/Gogol/AppsReseller/Reseller/Subscriptions/Activate.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.AppsReseller.Reseller.Subscriptions.Activate+-- 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)+--+-- Activates a subscription previously suspended by the reseller. If you did not suspend the customer subscription and it is suspended for any other reason, such as for abuse or a pending ToS acceptance, this call will not reactivate the customer subscription.+--+-- /See:/ <https://developers.google.com/google-apps/reseller/ Google Workspace Reseller API Reference> for @reseller.subscriptions.activate@.+module Gogol.AppsReseller.Reseller.Subscriptions.Activate+ ( -- * Resource+ ResellerSubscriptionsActivateResource,++ -- ** Constructing a Request+ ResellerSubscriptionsActivate (..),+ newResellerSubscriptionsActivate,+ )+where++import Gogol.AppsReseller.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @reseller.subscriptions.activate@ method which the+-- 'ResellerSubscriptionsActivate' request conforms to.+type ResellerSubscriptionsActivateResource =+ "apps"+ Core.:> "reseller"+ Core.:> "v1"+ Core.:> "customers"+ Core.:> Core.Capture "customerId" Core.Text+ Core.:> "subscriptions"+ Core.:> Core.Capture "subscriptionId" Core.Text+ Core.:> "activate"+ 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] Subscription++-- | Activates a subscription previously suspended by the reseller. If you did not suspend the customer subscription and it is suspended for any other reason, such as for abuse or a pending ToS acceptance, this call will not reactivate the customer subscription.+--+-- /See:/ 'newResellerSubscriptionsActivate' smart constructor.+data ResellerSubscriptionsActivate = ResellerSubscriptionsActivate+ { -- | V1 error format.+ xgafv :: (Core.Maybe Xgafv),+ -- | OAuth access token.+ accessToken :: (Core.Maybe Core.Text),+ -- | JSONP+ callback :: (Core.Maybe Core.Text),+ -- | This can be either the customer\'s primary domain name or the customer\'s unique identifier. If the domain name for a customer changes, the old domain name cannot be used to access the customer, but the customer\'s unique identifier (as returned by the API) can always be used. We recommend storing the unique identifier in your systems where applicable.+ customerId :: Core.Text,+ -- | This is a required property. The @subscriptionId@ is the subscription identifier and is unique for each customer. Since a @subscriptionId@ changes when a subscription is updated, we recommend to not use this ID as a key for persistent data. And the @subscriptionId@ can be found using the retrieve all reseller subscriptions method.+ subscriptionId :: 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 'ResellerSubscriptionsActivate' with the minimum fields required to make a request.+newResellerSubscriptionsActivate ::+ -- | This can be either the customer\'s primary domain name or the customer\'s unique identifier. If the domain name for a customer changes, the old domain name cannot be used to access the customer, but the customer\'s unique identifier (as returned by the API) can always be used. We recommend storing the unique identifier in your systems where applicable. See 'customerId'.+ Core.Text ->+ -- | This is a required property. The @subscriptionId@ is the subscription identifier and is unique for each customer. Since a @subscriptionId@ changes when a subscription is updated, we recommend to not use this ID as a key for persistent data. And the @subscriptionId@ can be found using the retrieve all reseller subscriptions method. See 'subscriptionId'.+ Core.Text ->+ ResellerSubscriptionsActivate+newResellerSubscriptionsActivate customerId subscriptionId =+ ResellerSubscriptionsActivate+ { xgafv = Core.Nothing,+ accessToken = Core.Nothing,+ callback = Core.Nothing,+ customerId = customerId,+ subscriptionId = subscriptionId,+ uploadType = Core.Nothing,+ uploadProtocol = Core.Nothing+ }++instance Core.GoogleRequest ResellerSubscriptionsActivate where+ type Rs ResellerSubscriptionsActivate = Subscription+ type Scopes ResellerSubscriptionsActivate = '[Apps'Order]+ requestClient ResellerSubscriptionsActivate {..} =+ go+ customerId+ subscriptionId+ xgafv+ accessToken+ callback+ uploadType+ uploadProtocol+ (Core.Just Core.AltJSON)+ appsResellerService+ where+ go =+ Core.buildClient+ (Core.Proxy :: Core.Proxy ResellerSubscriptionsActivateResource)+ Core.mempty
+ gen/Gogol/AppsReseller/Reseller/Subscriptions/ChangePlan.hs view
@@ -0,0 +1,129 @@+{-# 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.AppsReseller.Reseller.Subscriptions.ChangePlan+-- 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)+--+-- Updates a subscription plan. Use this method to update a plan for a 30-day trial or a flexible plan subscription to an annual commitment plan with monthly or yearly payments. How a plan is updated differs depending on the plan and the products. For more information, see the description in </admin-sdk/reseller/v1/how-tos/manage_subscriptions#update_subscription_plan manage subscriptions>.+--+-- /See:/ <https://developers.google.com/google-apps/reseller/ Google Workspace Reseller API Reference> for @reseller.subscriptions.changePlan@.+module Gogol.AppsReseller.Reseller.Subscriptions.ChangePlan+ ( -- * Resource+ ResellerSubscriptionsChangePlanResource,++ -- ** Constructing a Request+ ResellerSubscriptionsChangePlan (..),+ newResellerSubscriptionsChangePlan,+ )+where++import Gogol.AppsReseller.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @reseller.subscriptions.changePlan@ method which the+-- 'ResellerSubscriptionsChangePlan' request conforms to.+type ResellerSubscriptionsChangePlanResource =+ "apps"+ Core.:> "reseller"+ Core.:> "v1"+ Core.:> "customers"+ Core.:> Core.Capture "customerId" Core.Text+ Core.:> "subscriptions"+ Core.:> Core.Capture "subscriptionId" Core.Text+ Core.:> "changePlan"+ 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] ChangePlanRequest+ Core.:> Core.Post '[Core.JSON] Subscription++-- | Updates a subscription plan. Use this method to update a plan for a 30-day trial or a flexible plan subscription to an annual commitment plan with monthly or yearly payments. How a plan is updated differs depending on the plan and the products. For more information, see the description in </admin-sdk/reseller/v1/how-tos/manage_subscriptions#update_subscription_plan manage subscriptions>.+--+-- /See:/ 'newResellerSubscriptionsChangePlan' smart constructor.+data ResellerSubscriptionsChangePlan = ResellerSubscriptionsChangePlan+ { -- | V1 error format.+ xgafv :: (Core.Maybe Xgafv),+ -- | OAuth access token.+ accessToken :: (Core.Maybe Core.Text),+ -- | JSONP+ callback :: (Core.Maybe Core.Text),+ -- | This can be either the customer\'s primary domain name or the customer\'s unique identifier. If the domain name for a customer changes, the old domain name cannot be used to access the customer, but the customer\'s unique identifier (as returned by the API) can always be used. We recommend storing the unique identifier in your systems where applicable.+ customerId :: Core.Text,+ -- | Multipart request metadata.+ payload :: ChangePlanRequest,+ -- | This is a required property. The @subscriptionId@ is the subscription identifier and is unique for each customer. Since a @subscriptionId@ changes when a subscription is updated, we recommend to not use this ID as a key for persistent data. And the @subscriptionId@ can be found using the retrieve all reseller subscriptions method.+ subscriptionId :: 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 'ResellerSubscriptionsChangePlan' with the minimum fields required to make a request.+newResellerSubscriptionsChangePlan ::+ -- | This can be either the customer\'s primary domain name or the customer\'s unique identifier. If the domain name for a customer changes, the old domain name cannot be used to access the customer, but the customer\'s unique identifier (as returned by the API) can always be used. We recommend storing the unique identifier in your systems where applicable. See 'customerId'.+ Core.Text ->+ -- | Multipart request metadata. See 'payload'.+ ChangePlanRequest ->+ -- | This is a required property. The @subscriptionId@ is the subscription identifier and is unique for each customer. Since a @subscriptionId@ changes when a subscription is updated, we recommend to not use this ID as a key for persistent data. And the @subscriptionId@ can be found using the retrieve all reseller subscriptions method. See 'subscriptionId'.+ Core.Text ->+ ResellerSubscriptionsChangePlan+newResellerSubscriptionsChangePlan+ customerId+ payload+ subscriptionId =+ ResellerSubscriptionsChangePlan+ { xgafv = Core.Nothing,+ accessToken = Core.Nothing,+ callback = Core.Nothing,+ customerId = customerId,+ payload = payload,+ subscriptionId = subscriptionId,+ uploadType = Core.Nothing,+ uploadProtocol = Core.Nothing+ }++instance Core.GoogleRequest ResellerSubscriptionsChangePlan where+ type Rs ResellerSubscriptionsChangePlan = Subscription+ type Scopes ResellerSubscriptionsChangePlan = '[Apps'Order]+ requestClient ResellerSubscriptionsChangePlan {..} =+ go+ customerId+ subscriptionId+ xgafv+ accessToken+ callback+ uploadType+ uploadProtocol+ (Core.Just Core.AltJSON)+ payload+ appsResellerService+ where+ go =+ Core.buildClient+ (Core.Proxy :: Core.Proxy ResellerSubscriptionsChangePlanResource)+ Core.mempty
+ gen/Gogol/AppsReseller/Reseller/Subscriptions/ChangeRenewalSettings.hs view
@@ -0,0 +1,136 @@+{-# 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.AppsReseller.Reseller.Subscriptions.ChangeRenewalSettings+-- 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)+--+-- Updates a user license\'s renewal settings. This is applicable for accounts with annual commitment plans only. For more information, see the description in </admin-sdk/reseller/v1/how-tos/manage_subscriptions#update_renewal manage subscriptions>.+--+-- /See:/ <https://developers.google.com/google-apps/reseller/ Google Workspace Reseller API Reference> for @reseller.subscriptions.changeRenewalSettings@.+module Gogol.AppsReseller.Reseller.Subscriptions.ChangeRenewalSettings+ ( -- * Resource+ ResellerSubscriptionsChangeRenewalSettingsResource,++ -- ** Constructing a Request+ ResellerSubscriptionsChangeRenewalSettings (..),+ newResellerSubscriptionsChangeRenewalSettings,+ )+where++import Gogol.AppsReseller.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @reseller.subscriptions.changeRenewalSettings@ method which the+-- 'ResellerSubscriptionsChangeRenewalSettings' request conforms to.+type ResellerSubscriptionsChangeRenewalSettingsResource =+ "apps"+ Core.:> "reseller"+ Core.:> "v1"+ Core.:> "customers"+ Core.:> Core.Capture "customerId" Core.Text+ Core.:> "subscriptions"+ Core.:> Core.Capture "subscriptionId" Core.Text+ Core.:> "changeRenewalSettings"+ 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] RenewalSettings+ Core.:> Core.Post '[Core.JSON] Subscription++-- | Updates a user license\'s renewal settings. This is applicable for accounts with annual commitment plans only. For more information, see the description in </admin-sdk/reseller/v1/how-tos/manage_subscriptions#update_renewal manage subscriptions>.+--+-- /See:/ 'newResellerSubscriptionsChangeRenewalSettings' smart constructor.+data ResellerSubscriptionsChangeRenewalSettings = ResellerSubscriptionsChangeRenewalSettings+ { -- | V1 error format.+ xgafv :: (Core.Maybe Xgafv),+ -- | OAuth access token.+ accessToken :: (Core.Maybe Core.Text),+ -- | JSONP+ callback :: (Core.Maybe Core.Text),+ -- | This can be either the customer\'s primary domain name or the customer\'s unique identifier. If the domain name for a customer changes, the old domain name cannot be used to access the customer, but the customer\'s unique identifier (as returned by the API) can always be used. We recommend storing the unique identifier in your systems where applicable.+ customerId :: Core.Text,+ -- | Multipart request metadata.+ payload :: RenewalSettings,+ -- | This is a required property. The @subscriptionId@ is the subscription identifier and is unique for each customer. Since a @subscriptionId@ changes when a subscription is updated, we recommend to not use this ID as a key for persistent data. And the @subscriptionId@ can be found using the retrieve all reseller subscriptions method.+ subscriptionId :: 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 'ResellerSubscriptionsChangeRenewalSettings' with the minimum fields required to make a request.+newResellerSubscriptionsChangeRenewalSettings ::+ -- | This can be either the customer\'s primary domain name or the customer\'s unique identifier. If the domain name for a customer changes, the old domain name cannot be used to access the customer, but the customer\'s unique identifier (as returned by the API) can always be used. We recommend storing the unique identifier in your systems where applicable. See 'customerId'.+ Core.Text ->+ -- | Multipart request metadata. See 'payload'.+ RenewalSettings ->+ -- | This is a required property. The @subscriptionId@ is the subscription identifier and is unique for each customer. Since a @subscriptionId@ changes when a subscription is updated, we recommend to not use this ID as a key for persistent data. And the @subscriptionId@ can be found using the retrieve all reseller subscriptions method. See 'subscriptionId'.+ Core.Text ->+ ResellerSubscriptionsChangeRenewalSettings+newResellerSubscriptionsChangeRenewalSettings+ customerId+ payload+ subscriptionId =+ ResellerSubscriptionsChangeRenewalSettings+ { xgafv = Core.Nothing,+ accessToken = Core.Nothing,+ callback = Core.Nothing,+ customerId = customerId,+ payload = payload,+ subscriptionId = subscriptionId,+ uploadType = Core.Nothing,+ uploadProtocol = Core.Nothing+ }++instance+ Core.GoogleRequest+ ResellerSubscriptionsChangeRenewalSettings+ where+ type Rs ResellerSubscriptionsChangeRenewalSettings = Subscription+ type+ Scopes ResellerSubscriptionsChangeRenewalSettings =+ '[Apps'Order]+ requestClient ResellerSubscriptionsChangeRenewalSettings {..} =+ go+ customerId+ subscriptionId+ xgafv+ accessToken+ callback+ uploadType+ uploadProtocol+ (Core.Just Core.AltJSON)+ payload+ appsResellerService+ where+ go =+ Core.buildClient+ ( Core.Proxy ::+ Core.Proxy ResellerSubscriptionsChangeRenewalSettingsResource+ )+ Core.mempty
+ gen/Gogol/AppsReseller/Reseller/Subscriptions/ChangeSeats.hs view
@@ -0,0 +1,129 @@+{-# 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.AppsReseller.Reseller.Subscriptions.ChangeSeats+-- 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)+--+-- Updates a subscription\'s user license settings. For more information about updating an annual commitment plan or a flexible plan subscription’s licenses, see </admin-sdk/reseller/v1/how-tos/manage_subscriptions#update_subscription_seat Manage Subscriptions>.+--+-- /See:/ <https://developers.google.com/google-apps/reseller/ Google Workspace Reseller API Reference> for @reseller.subscriptions.changeSeats@.+module Gogol.AppsReseller.Reseller.Subscriptions.ChangeSeats+ ( -- * Resource+ ResellerSubscriptionsChangeSeatsResource,++ -- ** Constructing a Request+ ResellerSubscriptionsChangeSeats (..),+ newResellerSubscriptionsChangeSeats,+ )+where++import Gogol.AppsReseller.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @reseller.subscriptions.changeSeats@ method which the+-- 'ResellerSubscriptionsChangeSeats' request conforms to.+type ResellerSubscriptionsChangeSeatsResource =+ "apps"+ Core.:> "reseller"+ Core.:> "v1"+ Core.:> "customers"+ Core.:> Core.Capture "customerId" Core.Text+ Core.:> "subscriptions"+ Core.:> Core.Capture "subscriptionId" Core.Text+ Core.:> "changeSeats"+ 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] Seats+ Core.:> Core.Post '[Core.JSON] Subscription++-- | Updates a subscription\'s user license settings. For more information about updating an annual commitment plan or a flexible plan subscription’s licenses, see </admin-sdk/reseller/v1/how-tos/manage_subscriptions#update_subscription_seat Manage Subscriptions>.+--+-- /See:/ 'newResellerSubscriptionsChangeSeats' smart constructor.+data ResellerSubscriptionsChangeSeats = ResellerSubscriptionsChangeSeats+ { -- | V1 error format.+ xgafv :: (Core.Maybe Xgafv),+ -- | OAuth access token.+ accessToken :: (Core.Maybe Core.Text),+ -- | JSONP+ callback :: (Core.Maybe Core.Text),+ -- | This can be either the customer\'s primary domain name or the customer\'s unique identifier. If the domain name for a customer changes, the old domain name cannot be used to access the customer, but the customer\'s unique identifier (as returned by the API) can always be used. We recommend storing the unique identifier in your systems where applicable.+ customerId :: Core.Text,+ -- | Multipart request metadata.+ payload :: Seats,+ -- | This is a required property. The @subscriptionId@ is the subscription identifier and is unique for each customer. Since a @subscriptionId@ changes when a subscription is updated, we recommend to not use this ID as a key for persistent data. And the @subscriptionId@ can be found using the retrieve all reseller subscriptions method.+ subscriptionId :: 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 'ResellerSubscriptionsChangeSeats' with the minimum fields required to make a request.+newResellerSubscriptionsChangeSeats ::+ -- | This can be either the customer\'s primary domain name or the customer\'s unique identifier. If the domain name for a customer changes, the old domain name cannot be used to access the customer, but the customer\'s unique identifier (as returned by the API) can always be used. We recommend storing the unique identifier in your systems where applicable. See 'customerId'.+ Core.Text ->+ -- | Multipart request metadata. See 'payload'.+ Seats ->+ -- | This is a required property. The @subscriptionId@ is the subscription identifier and is unique for each customer. Since a @subscriptionId@ changes when a subscription is updated, we recommend to not use this ID as a key for persistent data. And the @subscriptionId@ can be found using the retrieve all reseller subscriptions method. See 'subscriptionId'.+ Core.Text ->+ ResellerSubscriptionsChangeSeats+newResellerSubscriptionsChangeSeats+ customerId+ payload+ subscriptionId =+ ResellerSubscriptionsChangeSeats+ { xgafv = Core.Nothing,+ accessToken = Core.Nothing,+ callback = Core.Nothing,+ customerId = customerId,+ payload = payload,+ subscriptionId = subscriptionId,+ uploadType = Core.Nothing,+ uploadProtocol = Core.Nothing+ }++instance Core.GoogleRequest ResellerSubscriptionsChangeSeats where+ type Rs ResellerSubscriptionsChangeSeats = Subscription+ type Scopes ResellerSubscriptionsChangeSeats = '[Apps'Order]+ requestClient ResellerSubscriptionsChangeSeats {..} =+ go+ customerId+ subscriptionId+ xgafv+ accessToken+ callback+ uploadType+ uploadProtocol+ (Core.Just Core.AltJSON)+ payload+ appsResellerService+ where+ go =+ Core.buildClient+ (Core.Proxy :: Core.Proxy ResellerSubscriptionsChangeSeatsResource)+ Core.mempty
+ gen/Gogol/AppsReseller/Reseller/Subscriptions/Delete.hs view
@@ -0,0 +1,128 @@+{-# 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.AppsReseller.Reseller.Subscriptions.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)+--+-- Cancels, suspends, or transfers a subscription to direct.+--+-- /See:/ <https://developers.google.com/google-apps/reseller/ Google Workspace Reseller API Reference> for @reseller.subscriptions.delete@.+module Gogol.AppsReseller.Reseller.Subscriptions.Delete+ ( -- * Resource+ ResellerSubscriptionsDeleteResource,++ -- ** Constructing a Request+ ResellerSubscriptionsDelete (..),+ newResellerSubscriptionsDelete,+ )+where++import Gogol.AppsReseller.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @reseller.subscriptions.delete@ method which the+-- 'ResellerSubscriptionsDelete' request conforms to.+type ResellerSubscriptionsDeleteResource =+ "apps"+ Core.:> "reseller"+ Core.:> "v1"+ Core.:> "customers"+ Core.:> Core.Capture "customerId" Core.Text+ Core.:> "subscriptions"+ Core.:> Core.Capture "subscriptionId" Core.Text+ Core.:> Core.QueryParam "deletionType" SubscriptionsDeleteDeletionType+ 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] ()++-- | Cancels, suspends, or transfers a subscription to direct.+--+-- /See:/ 'newResellerSubscriptionsDelete' smart constructor.+data ResellerSubscriptionsDelete = ResellerSubscriptionsDelete+ { -- | V1 error format.+ xgafv :: (Core.Maybe Xgafv),+ -- | OAuth access token.+ accessToken :: (Core.Maybe Core.Text),+ -- | JSONP+ callback :: (Core.Maybe Core.Text),+ -- | This can be either the customer\'s primary domain name or the customer\'s unique identifier. If the domain name for a customer changes, the old domain name cannot be used to access the customer, but the customer\'s unique identifier (as returned by the API) can always be used. We recommend storing the unique identifier in your systems where applicable.+ customerId :: Core.Text,+ -- | The @deletionType@ query string enables the cancellation, downgrade, or suspension of a subscription.+ deletionType :: SubscriptionsDeleteDeletionType,+ -- | This is a required property. The @subscriptionId@ is the subscription identifier and is unique for each customer. Since a @subscriptionId@ changes when a subscription is updated, we recommend to not use this ID as a key for persistent data. And the @subscriptionId@ can be found using the retrieve all reseller subscriptions method.+ subscriptionId :: 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 'ResellerSubscriptionsDelete' with the minimum fields required to make a request.+newResellerSubscriptionsDelete ::+ -- | This can be either the customer\'s primary domain name or the customer\'s unique identifier. If the domain name for a customer changes, the old domain name cannot be used to access the customer, but the customer\'s unique identifier (as returned by the API) can always be used. We recommend storing the unique identifier in your systems where applicable. See 'customerId'.+ Core.Text ->+ -- | The @deletionType@ query string enables the cancellation, downgrade, or suspension of a subscription. See 'deletionType'.+ SubscriptionsDeleteDeletionType ->+ -- | This is a required property. The @subscriptionId@ is the subscription identifier and is unique for each customer. Since a @subscriptionId@ changes when a subscription is updated, we recommend to not use this ID as a key for persistent data. And the @subscriptionId@ can be found using the retrieve all reseller subscriptions method. See 'subscriptionId'.+ Core.Text ->+ ResellerSubscriptionsDelete+newResellerSubscriptionsDelete+ customerId+ deletionType+ subscriptionId =+ ResellerSubscriptionsDelete+ { xgafv = Core.Nothing,+ accessToken = Core.Nothing,+ callback = Core.Nothing,+ customerId = customerId,+ deletionType = deletionType,+ subscriptionId = subscriptionId,+ uploadType = Core.Nothing,+ uploadProtocol = Core.Nothing+ }++instance Core.GoogleRequest ResellerSubscriptionsDelete where+ type Rs ResellerSubscriptionsDelete = ()+ type Scopes ResellerSubscriptionsDelete = '[Apps'Order]+ requestClient ResellerSubscriptionsDelete {..} =+ go+ customerId+ subscriptionId+ (Core.Just deletionType)+ xgafv+ accessToken+ callback+ uploadType+ uploadProtocol+ (Core.Just Core.AltJSON)+ appsResellerService+ where+ go =+ Core.buildClient+ (Core.Proxy :: Core.Proxy ResellerSubscriptionsDeleteResource)+ Core.mempty
+ gen/Gogol/AppsReseller/Reseller/Subscriptions/Get.hs view
@@ -0,0 +1,120 @@+{-# 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.AppsReseller.Reseller.Subscriptions.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 a specific subscription. The @subscriptionId@ can be found using the </admin-sdk/reseller/v1/how-tos/manage_subscriptions#get_all_subscriptions Retrieve all reseller subscriptions> method. For more information about retrieving a specific subscription, see the information descrived in </admin-sdk/reseller/v1/how-tos/manage_subscriptions#get_subscription manage subscriptions>.+--+-- /See:/ <https://developers.google.com/google-apps/reseller/ Google Workspace Reseller API Reference> for @reseller.subscriptions.get@.+module Gogol.AppsReseller.Reseller.Subscriptions.Get+ ( -- * Resource+ ResellerSubscriptionsGetResource,++ -- ** Constructing a Request+ ResellerSubscriptionsGet (..),+ newResellerSubscriptionsGet,+ )+where++import Gogol.AppsReseller.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @reseller.subscriptions.get@ method which the+-- 'ResellerSubscriptionsGet' request conforms to.+type ResellerSubscriptionsGetResource =+ "apps"+ Core.:> "reseller"+ Core.:> "v1"+ Core.:> "customers"+ Core.:> Core.Capture "customerId" Core.Text+ Core.:> "subscriptions"+ Core.:> Core.Capture "subscriptionId" 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] Subscription++-- | Gets a specific subscription. The @subscriptionId@ can be found using the </admin-sdk/reseller/v1/how-tos/manage_subscriptions#get_all_subscriptions Retrieve all reseller subscriptions> method. For more information about retrieving a specific subscription, see the information descrived in </admin-sdk/reseller/v1/how-tos/manage_subscriptions#get_subscription manage subscriptions>.+--+-- /See:/ 'newResellerSubscriptionsGet' smart constructor.+data ResellerSubscriptionsGet = ResellerSubscriptionsGet+ { -- | V1 error format.+ xgafv :: (Core.Maybe Xgafv),+ -- | OAuth access token.+ accessToken :: (Core.Maybe Core.Text),+ -- | JSONP+ callback :: (Core.Maybe Core.Text),+ -- | This can be either the customer\'s primary domain name or the customer\'s unique identifier. If the domain name for a customer changes, the old domain name cannot be used to access the customer, but the customer\'s unique identifier (as returned by the API) can always be used. We recommend storing the unique identifier in your systems where applicable.+ customerId :: Core.Text,+ -- | This is a required property. The @subscriptionId@ is the subscription identifier and is unique for each customer. Since a @subscriptionId@ changes when a subscription is updated, we recommend to not use this ID as a key for persistent data. And the @subscriptionId@ can be found using the retrieve all reseller subscriptions method.+ subscriptionId :: 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 'ResellerSubscriptionsGet' with the minimum fields required to make a request.+newResellerSubscriptionsGet ::+ -- | This can be either the customer\'s primary domain name or the customer\'s unique identifier. If the domain name for a customer changes, the old domain name cannot be used to access the customer, but the customer\'s unique identifier (as returned by the API) can always be used. We recommend storing the unique identifier in your systems where applicable. See 'customerId'.+ Core.Text ->+ -- | This is a required property. The @subscriptionId@ is the subscription identifier and is unique for each customer. Since a @subscriptionId@ changes when a subscription is updated, we recommend to not use this ID as a key for persistent data. And the @subscriptionId@ can be found using the retrieve all reseller subscriptions method. See 'subscriptionId'.+ Core.Text ->+ ResellerSubscriptionsGet+newResellerSubscriptionsGet customerId subscriptionId =+ ResellerSubscriptionsGet+ { xgafv = Core.Nothing,+ accessToken = Core.Nothing,+ callback = Core.Nothing,+ customerId = customerId,+ subscriptionId = subscriptionId,+ uploadType = Core.Nothing,+ uploadProtocol = Core.Nothing+ }++instance Core.GoogleRequest ResellerSubscriptionsGet where+ type Rs ResellerSubscriptionsGet = Subscription+ type+ Scopes ResellerSubscriptionsGet =+ '[Apps'Order, Apps'Order'Readonly]+ requestClient ResellerSubscriptionsGet {..} =+ go+ customerId+ subscriptionId+ xgafv+ accessToken+ callback+ uploadType+ uploadProtocol+ (Core.Just Core.AltJSON)+ appsResellerService+ where+ go =+ Core.buildClient+ (Core.Proxy :: Core.Proxy ResellerSubscriptionsGetResource)+ Core.mempty
+ gen/Gogol/AppsReseller/Reseller/Subscriptions/Insert.hs view
@@ -0,0 +1,133 @@+{-# 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.AppsReseller.Reseller.Subscriptions.Insert+-- 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 or transfer a subscription. Create a subscription for a customer\'s account that you ordered using the </admin-sdk/reseller/v1/reference/customers/insert.html Order a new customer account> method. For more information about creating a subscription for different payment plans, see </admin-sdk/reseller/v1/how-tos/manage_subscriptions#create_subscription manage subscriptions>.\\ If you did not order the customer\'s account using the customer insert method, use the customer\'s @customerAuthToken@ when creating a subscription for that customer. If transferring a G Suite subscription with an associated Google Drive or Google Vault subscription, use the </admin-sdk/reseller/v1/how-tos/batch.html batch operation> to transfer all of these subscriptions. For more information, see how to </admin-sdk/reseller/v1/how-tos/manage_subscriptions#transfer_a_subscription transfer subscriptions>.+--+-- /See:/ <https://developers.google.com/google-apps/reseller/ Google Workspace Reseller API Reference> for @reseller.subscriptions.insert@.+module Gogol.AppsReseller.Reseller.Subscriptions.Insert+ ( -- * Resource+ ResellerSubscriptionsInsertResource,++ -- ** Constructing a Request+ ResellerSubscriptionsInsert (..),+ newResellerSubscriptionsInsert,+ )+where++import Gogol.AppsReseller.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @reseller.subscriptions.insert@ method which the+-- 'ResellerSubscriptionsInsert' request conforms to.+type ResellerSubscriptionsInsertResource =+ "apps"+ Core.:> "reseller"+ Core.:> "v1"+ Core.:> "customers"+ Core.:> Core.Capture "customerId" Core.Text+ Core.:> "subscriptions"+ Core.:> Core.QueryParam "$.xgafv" Xgafv+ Core.:> Core.QueryParam "access_token" Core.Text+ Core.:> Core.QueryParam "action" SubscriptionsInsertAction+ Core.:> Core.QueryParam "callback" Core.Text+ Core.:> Core.QueryParam "customerAuthToken" Core.Text+ Core.:> Core.QueryParam "sourceSkuId" 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] Subscription+ Core.:> Core.Post '[Core.JSON] Subscription++-- | Creates or transfer a subscription. Create a subscription for a customer\'s account that you ordered using the </admin-sdk/reseller/v1/reference/customers/insert.html Order a new customer account> method. For more information about creating a subscription for different payment plans, see </admin-sdk/reseller/v1/how-tos/manage_subscriptions#create_subscription manage subscriptions>.\\ If you did not order the customer\'s account using the customer insert method, use the customer\'s @customerAuthToken@ when creating a subscription for that customer. If transferring a G Suite subscription with an associated Google Drive or Google Vault subscription, use the </admin-sdk/reseller/v1/how-tos/batch.html batch operation> to transfer all of these subscriptions. For more information, see how to </admin-sdk/reseller/v1/how-tos/manage_subscriptions#transfer_a_subscription transfer subscriptions>.+--+-- /See:/ 'newResellerSubscriptionsInsert' smart constructor.+data ResellerSubscriptionsInsert = ResellerSubscriptionsInsert+ { -- | V1 error format.+ xgafv :: (Core.Maybe Xgafv),+ -- | OAuth access token.+ accessToken :: (Core.Maybe Core.Text),+ -- | The intented insert action. The usage of this field is governed by certain policies which are being developed & tested currently. Hence, these might not work as intended. Once this is fully tested & available to consume, we will share more information about its usage, limitations and policy documentation.+ action :: (Core.Maybe SubscriptionsInsertAction),+ -- | JSONP+ callback :: (Core.Maybe Core.Text),+ -- | The @customerAuthToken@ query string is required when creating a resold account that transfers a direct customer\'s subscription or transfers another reseller customer\'s subscription to your reseller management. This is a hexadecimal authentication token needed to complete the subscription transfer. For more information, see the administrator help center.+ customerAuthToken :: (Core.Maybe Core.Text),+ -- | This can be either the customer\'s primary domain name or the customer\'s unique identifier. If the domain name for a customer changes, the old domain name cannot be used to access the customer, but the customer\'s unique identifier (as returned by the API) can always be used. We recommend storing the unique identifier in your systems where applicable.+ customerId :: Core.Text,+ -- | Multipart request metadata.+ payload :: Subscription,+ -- | The sku_id of the existing subscription to be upgraded or downgraded. This is required when action is SWITCH. The usage of this field is governed by certain policies which are being developed & tested currently. Hence, these might not work as intended. Once this is fully tested & available to consume, we will share more information about its usage, limitations and policy documentation.+ sourceSkuId :: (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 'ResellerSubscriptionsInsert' with the minimum fields required to make a request.+newResellerSubscriptionsInsert ::+ -- | This can be either the customer\'s primary domain name or the customer\'s unique identifier. If the domain name for a customer changes, the old domain name cannot be used to access the customer, but the customer\'s unique identifier (as returned by the API) can always be used. We recommend storing the unique identifier in your systems where applicable. See 'customerId'.+ Core.Text ->+ -- | Multipart request metadata. See 'payload'.+ Subscription ->+ ResellerSubscriptionsInsert+newResellerSubscriptionsInsert customerId payload =+ ResellerSubscriptionsInsert+ { xgafv = Core.Nothing,+ accessToken = Core.Nothing,+ action = Core.Nothing,+ callback = Core.Nothing,+ customerAuthToken = Core.Nothing,+ customerId = customerId,+ payload = payload,+ sourceSkuId = Core.Nothing,+ uploadType = Core.Nothing,+ uploadProtocol = Core.Nothing+ }++instance Core.GoogleRequest ResellerSubscriptionsInsert where+ type Rs ResellerSubscriptionsInsert = Subscription+ type Scopes ResellerSubscriptionsInsert = '[Apps'Order]+ requestClient ResellerSubscriptionsInsert {..} =+ go+ customerId+ xgafv+ accessToken+ action+ callback+ customerAuthToken+ sourceSkuId+ uploadType+ uploadProtocol+ (Core.Just Core.AltJSON)+ payload+ appsResellerService+ where+ go =+ Core.buildClient+ (Core.Proxy :: Core.Proxy ResellerSubscriptionsInsertResource)+ Core.mempty
+ gen/Gogol/AppsReseller/Reseller/Subscriptions/List.hs view
@@ -0,0 +1,130 @@+{-# 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.AppsReseller.Reseller.Subscriptions.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 of subscriptions managed by the reseller. The list can be all subscriptions, all of a customer\'s subscriptions, or all of a customer\'s transferable subscriptions. Optionally, this method can filter the response by a @customerNamePrefix@. For more information, see </admin-sdk/reseller/v1/how-tos/manage_subscriptions manage subscriptions>.+--+-- /See:/ <https://developers.google.com/google-apps/reseller/ Google Workspace Reseller API Reference> for @reseller.subscriptions.list@.+module Gogol.AppsReseller.Reseller.Subscriptions.List+ ( -- * Resource+ ResellerSubscriptionsListResource,++ -- ** Constructing a Request+ ResellerSubscriptionsList (..),+ newResellerSubscriptionsList,+ )+where++import Gogol.AppsReseller.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @reseller.subscriptions.list@ method which the+-- 'ResellerSubscriptionsList' request conforms to.+type ResellerSubscriptionsListResource =+ "apps"+ Core.:> "reseller"+ Core.:> "v1"+ Core.:> "subscriptions"+ Core.:> Core.QueryParam "$.xgafv" Xgafv+ Core.:> Core.QueryParam "access_token" Core.Text+ Core.:> Core.QueryParam "callback" Core.Text+ Core.:> Core.QueryParam "customerAuthToken" Core.Text+ Core.:> Core.QueryParam "customerId" Core.Text+ Core.:> Core.QueryParam "customerNamePrefix" Core.Text+ Core.:> Core.QueryParam "maxResults" Core.Word32+ 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] Subscriptions++-- | Lists of subscriptions managed by the reseller. The list can be all subscriptions, all of a customer\'s subscriptions, or all of a customer\'s transferable subscriptions. Optionally, this method can filter the response by a @customerNamePrefix@. For more information, see </admin-sdk/reseller/v1/how-tos/manage_subscriptions manage subscriptions>.+--+-- /See:/ 'newResellerSubscriptionsList' smart constructor.+data ResellerSubscriptionsList = ResellerSubscriptionsList+ { -- | V1 error format.+ xgafv :: (Core.Maybe Xgafv),+ -- | OAuth access token.+ accessToken :: (Core.Maybe Core.Text),+ -- | JSONP+ callback :: (Core.Maybe Core.Text),+ -- | The @customerAuthToken@ query string is required when creating a resold account that transfers a direct customer\'s subscription or transfers another reseller customer\'s subscription to your reseller management. This is a hexadecimal authentication token needed to complete the subscription transfer. For more information, see the administrator help center.+ customerAuthToken :: (Core.Maybe Core.Text),+ -- | This can be either the customer\'s primary domain name or the customer\'s unique identifier. If the domain name for a customer changes, the old domain name cannot be used to access the customer, but the customer\'s unique identifier (as returned by the API) can always be used. We recommend storing the unique identifier in your systems where applicable.+ customerId :: (Core.Maybe Core.Text),+ -- | When retrieving all of your subscriptions and filtering for specific customers, you can enter a prefix for a customer name. Using an example customer group that includes @exam.com@, @example20.com@ and @example.com@: - @exa@ -- Returns all customer names that start with \'exa\' which could include @exam.com@, @example20.com@, and @example.com@. A name prefix is similar to using a regular expression\'s asterisk, exa*. - @example@ -- Returns @example20.com@ and @example.com@.+ customerNamePrefix :: (Core.Maybe Core.Text),+ -- | When retrieving a large list, the @maxResults@ is the maximum number of results per page. The @nextPageToken@ value takes you to the next page. The default is 20.+ maxResults :: (Core.Maybe Core.Word32),+ -- | Token to specify next page in the list+ 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 'ResellerSubscriptionsList' with the minimum fields required to make a request.+newResellerSubscriptionsList ::+ ResellerSubscriptionsList+newResellerSubscriptionsList =+ ResellerSubscriptionsList+ { xgafv = Core.Nothing,+ accessToken = Core.Nothing,+ callback = Core.Nothing,+ customerAuthToken = Core.Nothing,+ customerId = Core.Nothing,+ customerNamePrefix = Core.Nothing,+ maxResults = Core.Nothing,+ pageToken = Core.Nothing,+ uploadType = Core.Nothing,+ uploadProtocol = Core.Nothing+ }++instance Core.GoogleRequest ResellerSubscriptionsList where+ type Rs ResellerSubscriptionsList = Subscriptions+ type+ Scopes ResellerSubscriptionsList =+ '[Apps'Order, Apps'Order'Readonly]+ requestClient ResellerSubscriptionsList {..} =+ go+ xgafv+ accessToken+ callback+ customerAuthToken+ customerId+ customerNamePrefix+ maxResults+ pageToken+ uploadType+ uploadProtocol+ (Core.Just Core.AltJSON)+ appsResellerService+ where+ go =+ Core.buildClient+ (Core.Proxy :: Core.Proxy ResellerSubscriptionsListResource)+ Core.mempty
+ gen/Gogol/AppsReseller/Reseller/Subscriptions/StartPaidService.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.AppsReseller.Reseller.Subscriptions.StartPaidService+-- 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)+--+-- Immediately move a 30-day free trial subscription to a paid service subscription. This method is only applicable if a payment plan has already been set up for the 30-day trial subscription. For more information, see </admin-sdk/reseller/v1/how-tos/manage_subscriptions#paid_service manage subscriptions>.+--+-- /See:/ <https://developers.google.com/google-apps/reseller/ Google Workspace Reseller API Reference> for @reseller.subscriptions.startPaidService@.+module Gogol.AppsReseller.Reseller.Subscriptions.StartPaidService+ ( -- * Resource+ ResellerSubscriptionsStartPaidServiceResource,++ -- ** Constructing a Request+ ResellerSubscriptionsStartPaidService (..),+ newResellerSubscriptionsStartPaidService,+ )+where++import Gogol.AppsReseller.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @reseller.subscriptions.startPaidService@ method which the+-- 'ResellerSubscriptionsStartPaidService' request conforms to.+type ResellerSubscriptionsStartPaidServiceResource =+ "apps"+ Core.:> "reseller"+ Core.:> "v1"+ Core.:> "customers"+ Core.:> Core.Capture "customerId" Core.Text+ Core.:> "subscriptions"+ Core.:> Core.Capture "subscriptionId" Core.Text+ Core.:> "startPaidService"+ 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] Subscription++-- | Immediately move a 30-day free trial subscription to a paid service subscription. This method is only applicable if a payment plan has already been set up for the 30-day trial subscription. For more information, see </admin-sdk/reseller/v1/how-tos/manage_subscriptions#paid_service manage subscriptions>.+--+-- /See:/ 'newResellerSubscriptionsStartPaidService' smart constructor.+data ResellerSubscriptionsStartPaidService = ResellerSubscriptionsStartPaidService+ { -- | V1 error format.+ xgafv :: (Core.Maybe Xgafv),+ -- | OAuth access token.+ accessToken :: (Core.Maybe Core.Text),+ -- | JSONP+ callback :: (Core.Maybe Core.Text),+ -- | This can be either the customer\'s primary domain name or the customer\'s unique identifier. If the domain name for a customer changes, the old domain name cannot be used to access the customer, but the customer\'s unique identifier (as returned by the API) can always be used. We recommend storing the unique identifier in your systems where applicable.+ customerId :: Core.Text,+ -- | This is a required property. The @subscriptionId@ is the subscription identifier and is unique for each customer. Since a @subscriptionId@ changes when a subscription is updated, we recommend to not use this ID as a key for persistent data. And the @subscriptionId@ can be found using the retrieve all reseller subscriptions method.+ subscriptionId :: 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 'ResellerSubscriptionsStartPaidService' with the minimum fields required to make a request.+newResellerSubscriptionsStartPaidService ::+ -- | This can be either the customer\'s primary domain name or the customer\'s unique identifier. If the domain name for a customer changes, the old domain name cannot be used to access the customer, but the customer\'s unique identifier (as returned by the API) can always be used. We recommend storing the unique identifier in your systems where applicable. See 'customerId'.+ Core.Text ->+ -- | This is a required property. The @subscriptionId@ is the subscription identifier and is unique for each customer. Since a @subscriptionId@ changes when a subscription is updated, we recommend to not use this ID as a key for persistent data. And the @subscriptionId@ can be found using the retrieve all reseller subscriptions method. See 'subscriptionId'.+ Core.Text ->+ ResellerSubscriptionsStartPaidService+newResellerSubscriptionsStartPaidService customerId subscriptionId =+ ResellerSubscriptionsStartPaidService+ { xgafv = Core.Nothing,+ accessToken = Core.Nothing,+ callback = Core.Nothing,+ customerId = customerId,+ subscriptionId = subscriptionId,+ uploadType = Core.Nothing,+ uploadProtocol = Core.Nothing+ }++instance Core.GoogleRequest ResellerSubscriptionsStartPaidService where+ type Rs ResellerSubscriptionsStartPaidService = Subscription+ type Scopes ResellerSubscriptionsStartPaidService = '[Apps'Order]+ requestClient ResellerSubscriptionsStartPaidService {..} =+ go+ customerId+ subscriptionId+ xgafv+ accessToken+ callback+ uploadType+ uploadProtocol+ (Core.Just Core.AltJSON)+ appsResellerService+ where+ go =+ Core.buildClient+ ( Core.Proxy ::+ Core.Proxy ResellerSubscriptionsStartPaidServiceResource+ )+ Core.mempty
+ gen/Gogol/AppsReseller/Reseller/Subscriptions/Suspend.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.AppsReseller.Reseller.Subscriptions.Suspend+-- 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)+--+-- Suspends an active subscription. You can use this method to suspend a paid subscription that is currently in the @ACTIVE@ state. * For @FLEXIBLE@ subscriptions, billing is paused. * For @ANNUAL_MONTHLY_PAY@ or @ANNUAL_YEARLY_PAY@ subscriptions: * Suspending the subscription does not change the renewal date that was originally committed to. * A suspended subscription does not renew. If you activate the subscription after the original renewal date, a new annual subscription will be created, starting on the day of activation. We strongly encourage you to suspend subscriptions only for short periods of time as suspensions over 60 days may result in the subscription being cancelled.+--+-- /See:/ <https://developers.google.com/google-apps/reseller/ Google Workspace Reseller API Reference> for @reseller.subscriptions.suspend@.+module Gogol.AppsReseller.Reseller.Subscriptions.Suspend+ ( -- * Resource+ ResellerSubscriptionsSuspendResource,++ -- ** Constructing a Request+ ResellerSubscriptionsSuspend (..),+ newResellerSubscriptionsSuspend,+ )+where++import Gogol.AppsReseller.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @reseller.subscriptions.suspend@ method which the+-- 'ResellerSubscriptionsSuspend' request conforms to.+type ResellerSubscriptionsSuspendResource =+ "apps"+ Core.:> "reseller"+ Core.:> "v1"+ Core.:> "customers"+ Core.:> Core.Capture "customerId" Core.Text+ Core.:> "subscriptions"+ Core.:> Core.Capture "subscriptionId" Core.Text+ Core.:> "suspend"+ 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] Subscription++-- | Suspends an active subscription. You can use this method to suspend a paid subscription that is currently in the @ACTIVE@ state. * For @FLEXIBLE@ subscriptions, billing is paused. * For @ANNUAL_MONTHLY_PAY@ or @ANNUAL_YEARLY_PAY@ subscriptions: * Suspending the subscription does not change the renewal date that was originally committed to. * A suspended subscription does not renew. If you activate the subscription after the original renewal date, a new annual subscription will be created, starting on the day of activation. We strongly encourage you to suspend subscriptions only for short periods of time as suspensions over 60 days may result in the subscription being cancelled.+--+-- /See:/ 'newResellerSubscriptionsSuspend' smart constructor.+data ResellerSubscriptionsSuspend = ResellerSubscriptionsSuspend+ { -- | V1 error format.+ xgafv :: (Core.Maybe Xgafv),+ -- | OAuth access token.+ accessToken :: (Core.Maybe Core.Text),+ -- | JSONP+ callback :: (Core.Maybe Core.Text),+ -- | This can be either the customer\'s primary domain name or the customer\'s unique identifier. If the domain name for a customer changes, the old domain name cannot be used to access the customer, but the customer\'s unique identifier (as returned by the API) can always be used. We recommend storing the unique identifier in your systems where applicable.+ customerId :: Core.Text,+ -- | This is a required property. The @subscriptionId@ is the subscription identifier and is unique for each customer. Since a @subscriptionId@ changes when a subscription is updated, we recommend to not use this ID as a key for persistent data. And the @subscriptionId@ can be found using the retrieve all reseller subscriptions method.+ subscriptionId :: 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 'ResellerSubscriptionsSuspend' with the minimum fields required to make a request.+newResellerSubscriptionsSuspend ::+ -- | This can be either the customer\'s primary domain name or the customer\'s unique identifier. If the domain name for a customer changes, the old domain name cannot be used to access the customer, but the customer\'s unique identifier (as returned by the API) can always be used. We recommend storing the unique identifier in your systems where applicable. See 'customerId'.+ Core.Text ->+ -- | This is a required property. The @subscriptionId@ is the subscription identifier and is unique for each customer. Since a @subscriptionId@ changes when a subscription is updated, we recommend to not use this ID as a key for persistent data. And the @subscriptionId@ can be found using the retrieve all reseller subscriptions method. See 'subscriptionId'.+ Core.Text ->+ ResellerSubscriptionsSuspend+newResellerSubscriptionsSuspend customerId subscriptionId =+ ResellerSubscriptionsSuspend+ { xgafv = Core.Nothing,+ accessToken = Core.Nothing,+ callback = Core.Nothing,+ customerId = customerId,+ subscriptionId = subscriptionId,+ uploadType = Core.Nothing,+ uploadProtocol = Core.Nothing+ }++instance Core.GoogleRequest ResellerSubscriptionsSuspend where+ type Rs ResellerSubscriptionsSuspend = Subscription+ type Scopes ResellerSubscriptionsSuspend = '[Apps'Order]+ requestClient ResellerSubscriptionsSuspend {..} =+ go+ customerId+ subscriptionId+ xgafv+ accessToken+ callback+ uploadType+ uploadProtocol+ (Core.Just Core.AltJSON)+ appsResellerService+ where+ go =+ Core.buildClient+ (Core.Proxy :: Core.Proxy ResellerSubscriptionsSuspendResource)+ Core.mempty
+ gen/Gogol/AppsReseller/Types.hs view
@@ -0,0 +1,122 @@+{-# 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.AppsReseller.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.AppsReseller.Types+ ( -- * Configuration+ appsResellerService,++ -- * OAuth Scopes+ Apps'Order,+ Apps'Order'Readonly,++ -- * Types++ -- ** Xgafv+ Xgafv (..),++ -- ** Address+ Address (..),+ newAddress,++ -- ** ChangePlanRequest+ ChangePlanRequest (..),+ newChangePlanRequest,++ -- ** Customer+ Customer (..),+ newCustomer,++ -- ** Customer_CustomerType+ Customer_CustomerType (..),++ -- ** PrimaryAdmin+ PrimaryAdmin (..),+ newPrimaryAdmin,++ -- ** RenewalSettings+ RenewalSettings (..),+ newRenewalSettings,++ -- ** ResellernotifyGetwatchdetailsResponse+ ResellernotifyGetwatchdetailsResponse (..),+ newResellernotifyGetwatchdetailsResponse,++ -- ** ResellernotifyResource+ ResellernotifyResource (..),+ newResellernotifyResource,++ -- ** Seats+ Seats (..),+ newSeats,++ -- ** Subscription+ Subscription (..),+ newSubscription,++ -- ** Subscription_Plan+ Subscription_Plan (..),+ newSubscription_Plan,++ -- ** Subscription_Plan_CommitmentInterval+ Subscription_Plan_CommitmentInterval (..),+ newSubscription_Plan_CommitmentInterval,++ -- ** Subscription_TransferInfo+ Subscription_TransferInfo (..),+ newSubscription_TransferInfo,++ -- ** Subscription_TrialSettings+ Subscription_TrialSettings (..),+ newSubscription_TrialSettings,++ -- ** Subscriptions+ Subscriptions (..),+ newSubscriptions,++ -- ** SubscriptionsDeleteDeletionType+ SubscriptionsDeleteDeletionType (..),++ -- ** SubscriptionsInsertAction+ SubscriptionsInsertAction (..),+ )+where++import Gogol.AppsReseller.Internal.Product+import Gogol.AppsReseller.Internal.Sum+import Gogol.Prelude qualified as Core++-- | Default request referring to version @v1@ of the Google Workspace Reseller API. This contains the host and root path used as a starting point for constructing service requests.+appsResellerService :: Core.ServiceConfig+appsResellerService =+ Core.defaultService+ (Core.ServiceId "reseller:v1")+ "reseller.googleapis.com"++-- | Manage users on your domain+type Apps'Order = "https://www.googleapis.com/auth/apps.order"++-- | Manage users on your domain+type Apps'Order'Readonly =+ "https://www.googleapis.com/auth/apps.order.readonly"
− gen/Network/Google/AppsReseller.hs
@@ -1,245 +0,0 @@-{-# LANGUAGE DataKinds #-}-{-# LANGUAGE NoImplicitPrelude #-}-{-# LANGUAGE TypeOperators #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}---- |--- Module : Network.Google.AppsReseller--- 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)------ Creates and manages your customers and their subscriptions.------ /See:/ <https://developers.google.com/google-apps/reseller/ Enterprise Apps Reseller API Reference>-module Network.Google.AppsReseller- (- -- * Service Configuration- appsResellerService-- -- * OAuth Scopes- , appsOrderReadOnlyScope- , appsOrderScope-- -- * API Declaration- , AppsResellerAPI-- -- * Resources-- -- ** reseller.customers.get- , module Network.Google.Resource.Reseller.Customers.Get-- -- ** reseller.customers.insert- , module Network.Google.Resource.Reseller.Customers.Insert-- -- ** reseller.customers.patch- , module Network.Google.Resource.Reseller.Customers.Patch-- -- ** reseller.customers.update- , module Network.Google.Resource.Reseller.Customers.Update-- -- ** reseller.resellernotify.getwatchdetails- , module Network.Google.Resource.Reseller.Resellernotify.Getwatchdetails-- -- ** reseller.resellernotify.register- , module Network.Google.Resource.Reseller.Resellernotify.Register-- -- ** reseller.resellernotify.unregister- , module Network.Google.Resource.Reseller.Resellernotify.Unregister-- -- ** reseller.subscriptions.activate- , module Network.Google.Resource.Reseller.Subscriptions.Activate-- -- ** reseller.subscriptions.changePlan- , module Network.Google.Resource.Reseller.Subscriptions.ChangePlan-- -- ** reseller.subscriptions.changeRenewalSettings- , module Network.Google.Resource.Reseller.Subscriptions.ChangeRenewalSettings-- -- ** reseller.subscriptions.changeSeats- , module Network.Google.Resource.Reseller.Subscriptions.ChangeSeats-- -- ** reseller.subscriptions.delete- , module Network.Google.Resource.Reseller.Subscriptions.Delete-- -- ** reseller.subscriptions.get- , module Network.Google.Resource.Reseller.Subscriptions.Get-- -- ** reseller.subscriptions.insert- , module Network.Google.Resource.Reseller.Subscriptions.Insert-- -- ** reseller.subscriptions.list- , module Network.Google.Resource.Reseller.Subscriptions.List-- -- ** reseller.subscriptions.startPaidService- , module Network.Google.Resource.Reseller.Subscriptions.StartPaidService-- -- ** reseller.subscriptions.suspend- , module Network.Google.Resource.Reseller.Subscriptions.Suspend-- -- * Types-- -- ** SubscriptionTrialSettings- , SubscriptionTrialSettings- , subscriptionTrialSettings- , stsIsInTrial- , stsTrialEndTime-- -- ** ResellernotifyResource- , ResellernotifyResource- , resellernotifyResource- , rrTopicName-- -- ** ResellernotifyGetwatchdetailsResponse- , ResellernotifyGetwatchdetailsResponse- , resellernotifyGetwatchdetailsResponse- , rgrTopicName- , rgrServiceAccountEmailAddresses-- -- ** Address- , Address- , address- , aOrganizationName- , aKind- , aPostalCode- , aAddressLine1- , aLocality- , aContactName- , aAddressLine2- , aCountryCode- , aRegion- , aAddressLine3-- -- ** Customer- , Customer- , customer- , cCustomerDomainVerified- , cResourceUiURL- , cKind- , cCustomerId- , cAlternateEmail- , cCustomerDomain- , cPhoneNumber- , cPostalAddress-- -- ** ChangePlanRequest- , ChangePlanRequest- , changePlanRequest- , cprKind- , cprDealCode- , cprPlanName- , cprPurchaseOrderId- , cprSeats-- -- ** SubscriptionPlanCommitmentInterval- , SubscriptionPlanCommitmentInterval- , subscriptionPlanCommitmentInterval- , spciStartTime- , spciEndTime-- -- ** SubscriptionsDeleteDeletionType- , SubscriptionsDeleteDeletionType (..)-- -- ** SubscriptionPlan- , SubscriptionPlan- , subscriptionPlan- , spCommitmentInterval- , spIsCommitmentPlan- , spPlanName-- -- ** Subscriptions- , Subscriptions- , subscriptions- , sNextPageToken- , sKind- , sSubscriptions-- -- ** Seats- , Seats- , seats- , seaNumberOfSeats- , seaMaximumNumberOfSeats- , seaLicensedNumberOfSeats- , seaKind-- -- ** RenewalSettings- , RenewalSettings- , renewalSettings- , rsKind- , rsRenewalType-- -- ** Subscription- , Subscription- , subscription- , subCreationTime- , subBillingMethod- , subStatus- , subTrialSettings- , subSKUName- , subResourceUiURL- , subKind- , subSKUId- , subPlan- , subDealCode- , subCustomerId- , subCustomerDomain- , subSuspensionReasons- , subTransferInfo- , subPurchaseOrderId- , subSeats- , subRenewalSettings- , subSubscriptionId-- -- ** SubscriptionTransferInfo- , SubscriptionTransferInfo- , subscriptionTransferInfo- , stiTransferabilityExpirationTime- , stiMinimumTransferableSeats- ) where--import Network.Google.AppsReseller.Types-import Network.Google.Prelude-import Network.Google.Resource.Reseller.Customers.Get-import Network.Google.Resource.Reseller.Customers.Insert-import Network.Google.Resource.Reseller.Customers.Patch-import Network.Google.Resource.Reseller.Customers.Update-import Network.Google.Resource.Reseller.Resellernotify.Getwatchdetails-import Network.Google.Resource.Reseller.Resellernotify.Register-import Network.Google.Resource.Reseller.Resellernotify.Unregister-import Network.Google.Resource.Reseller.Subscriptions.Activate-import Network.Google.Resource.Reseller.Subscriptions.ChangePlan-import Network.Google.Resource.Reseller.Subscriptions.ChangeRenewalSettings-import Network.Google.Resource.Reseller.Subscriptions.ChangeSeats-import Network.Google.Resource.Reseller.Subscriptions.Delete-import Network.Google.Resource.Reseller.Subscriptions.Get-import Network.Google.Resource.Reseller.Subscriptions.Insert-import Network.Google.Resource.Reseller.Subscriptions.List-import Network.Google.Resource.Reseller.Subscriptions.StartPaidService-import Network.Google.Resource.Reseller.Subscriptions.Suspend--{- $resources-TODO--}---- | Represents the entirety of the methods and resources available for the Enterprise Apps Reseller API service.-type AppsResellerAPI =- CustomersInsertResource :<|> CustomersPatchResource- :<|> CustomersGetResource- :<|> CustomersUpdateResource- :<|> ResellernotifyGetwatchdetailsResource- :<|> ResellernotifyRegisterResource- :<|> ResellernotifyUnregisterResource- :<|> SubscriptionsInsertResource- :<|> SubscriptionsListResource- :<|> SubscriptionsChangeRenewalSettingsResource- :<|> SubscriptionsGetResource- :<|> SubscriptionsActivateResource- :<|> SubscriptionsSuspendResource- :<|> SubscriptionsChangePlanResource- :<|> SubscriptionsChangeSeatsResource- :<|> SubscriptionsDeleteResource- :<|> SubscriptionsStartPaidServiceResource
− gen/Network/Google/AppsReseller/Types.hs
@@ -1,160 +0,0 @@-{-# LANGUAGE DataKinds #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE NoImplicitPrelude #-}-{-# LANGUAGE OverloadedStrings #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}---- |--- Module : Network.Google.AppsReseller.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.AppsReseller.Types- (- -- * Service Configuration- appsResellerService-- -- * OAuth Scopes- , appsOrderReadOnlyScope- , appsOrderScope-- -- * SubscriptionTrialSettings- , SubscriptionTrialSettings- , subscriptionTrialSettings- , stsIsInTrial- , stsTrialEndTime-- -- * ResellernotifyResource- , ResellernotifyResource- , resellernotifyResource- , rrTopicName-- -- * ResellernotifyGetwatchdetailsResponse- , ResellernotifyGetwatchdetailsResponse- , resellernotifyGetwatchdetailsResponse- , rgrTopicName- , rgrServiceAccountEmailAddresses-- -- * Address- , Address- , address- , aOrganizationName- , aKind- , aPostalCode- , aAddressLine1- , aLocality- , aContactName- , aAddressLine2- , aCountryCode- , aRegion- , aAddressLine3-- -- * Customer- , Customer- , customer- , cCustomerDomainVerified- , cResourceUiURL- , cKind- , cCustomerId- , cAlternateEmail- , cCustomerDomain- , cPhoneNumber- , cPostalAddress-- -- * ChangePlanRequest- , ChangePlanRequest- , changePlanRequest- , cprKind- , cprDealCode- , cprPlanName- , cprPurchaseOrderId- , cprSeats-- -- * SubscriptionPlanCommitmentInterval- , SubscriptionPlanCommitmentInterval- , subscriptionPlanCommitmentInterval- , spciStartTime- , spciEndTime-- -- * SubscriptionsDeleteDeletionType- , SubscriptionsDeleteDeletionType (..)-- -- * SubscriptionPlan- , SubscriptionPlan- , subscriptionPlan- , spCommitmentInterval- , spIsCommitmentPlan- , spPlanName-- -- * Subscriptions- , Subscriptions- , subscriptions- , sNextPageToken- , sKind- , sSubscriptions-- -- * Seats- , Seats- , seats- , seaNumberOfSeats- , seaMaximumNumberOfSeats- , seaLicensedNumberOfSeats- , seaKind-- -- * RenewalSettings- , RenewalSettings- , renewalSettings- , rsKind- , rsRenewalType-- -- * Subscription- , Subscription- , subscription- , subCreationTime- , subBillingMethod- , subStatus- , subTrialSettings- , subSKUName- , subResourceUiURL- , subKind- , subSKUId- , subPlan- , subDealCode- , subCustomerId- , subCustomerDomain- , subSuspensionReasons- , subTransferInfo- , subPurchaseOrderId- , subSeats- , subRenewalSettings- , subSubscriptionId-- -- * SubscriptionTransferInfo- , SubscriptionTransferInfo- , subscriptionTransferInfo- , stiTransferabilityExpirationTime- , stiMinimumTransferableSeats- ) where--import Network.Google.AppsReseller.Types.Product-import Network.Google.AppsReseller.Types.Sum-import Network.Google.Prelude---- | Default request referring to version 'v1' of the Enterprise Apps Reseller API. This contains the host and root path used as a starting point for constructing service requests.-appsResellerService :: ServiceConfig-appsResellerService- = defaultService (ServiceId "reseller:v1")- "www.googleapis.com"---- | Manage users on your domain-appsOrderReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/apps.order.readonly"]-appsOrderReadOnlyScope = Proxy---- | Manage users on your domain-appsOrderScope :: Proxy '["https://www.googleapis.com/auth/apps.order"]-appsOrderScope = Proxy
− gen/Network/Google/AppsReseller/Types/Product.hs
@@ -1,1253 +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.AppsReseller.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.AppsReseller.Types.Product where--import Network.Google.AppsReseller.Types.Sum-import Network.Google.Prelude---- | The G Suite annual commitment and flexible payment plans can be in a--- 30-day free trial. For more information, see the API concepts.------ /See:/ 'subscriptionTrialSettings' smart constructor.-data SubscriptionTrialSettings =- SubscriptionTrialSettings'- { _stsIsInTrial :: !(Maybe Bool)- , _stsTrialEndTime :: !(Maybe (Textual Int64))- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SubscriptionTrialSettings' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'stsIsInTrial'------ * 'stsTrialEndTime'-subscriptionTrialSettings- :: SubscriptionTrialSettings-subscriptionTrialSettings =- SubscriptionTrialSettings'- {_stsIsInTrial = Nothing, _stsTrialEndTime = Nothing}----- | Determines if a subscription\'s plan is in a 30-day free trial or not: ---- true — The plan is in trial. - false — The plan is not in trial.-stsIsInTrial :: Lens' SubscriptionTrialSettings (Maybe Bool)-stsIsInTrial- = lens _stsIsInTrial (\ s a -> s{_stsIsInTrial = a})---- | Date when the trial ends. The value is in milliseconds using the UNIX--- Epoch format. See an example Epoch converter.-stsTrialEndTime :: Lens' SubscriptionTrialSettings (Maybe Int64)-stsTrialEndTime- = lens _stsTrialEndTime- (\ s a -> s{_stsTrialEndTime = a})- . mapping _Coerce--instance FromJSON SubscriptionTrialSettings where- parseJSON- = withObject "SubscriptionTrialSettings"- (\ o ->- SubscriptionTrialSettings' <$>- (o .:? "isInTrial") <*> (o .:? "trialEndTime"))--instance ToJSON SubscriptionTrialSettings where- toJSON SubscriptionTrialSettings'{..}- = object- (catMaybes- [("isInTrial" .=) <$> _stsIsInTrial,- ("trialEndTime" .=) <$> _stsTrialEndTime])---- | JSON template for resellernotify response.------ /See:/ 'resellernotifyResource' smart constructor.-newtype ResellernotifyResource =- ResellernotifyResource'- { _rrTopicName :: Maybe Text- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ResellernotifyResource' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rrTopicName'-resellernotifyResource- :: ResellernotifyResource-resellernotifyResource = ResellernotifyResource' {_rrTopicName = Nothing}----- | Topic name of the PubSub-rrTopicName :: Lens' ResellernotifyResource (Maybe Text)-rrTopicName- = lens _rrTopicName (\ s a -> s{_rrTopicName = a})--instance FromJSON ResellernotifyResource where- parseJSON- = withObject "ResellernotifyResource"- (\ o ->- ResellernotifyResource' <$> (o .:? "topicName"))--instance ToJSON ResellernotifyResource where- toJSON ResellernotifyResource'{..}- = object- (catMaybes [("topicName" .=) <$> _rrTopicName])---- | JSON template for resellernotify getwatchdetails response.------ /See:/ 'resellernotifyGetwatchdetailsResponse' smart constructor.-data ResellernotifyGetwatchdetailsResponse =- ResellernotifyGetwatchdetailsResponse'- { _rgrTopicName :: !(Maybe Text)- , _rgrServiceAccountEmailAddresses :: !(Maybe [Text])- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ResellernotifyGetwatchdetailsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rgrTopicName'------ * 'rgrServiceAccountEmailAddresses'-resellernotifyGetwatchdetailsResponse- :: ResellernotifyGetwatchdetailsResponse-resellernotifyGetwatchdetailsResponse =- ResellernotifyGetwatchdetailsResponse'- {_rgrTopicName = Nothing, _rgrServiceAccountEmailAddresses = Nothing}----- | Topic name of the PubSub-rgrTopicName :: Lens' ResellernotifyGetwatchdetailsResponse (Maybe Text)-rgrTopicName- = lens _rgrTopicName (\ s a -> s{_rgrTopicName = a})---- | List of registered service accounts.-rgrServiceAccountEmailAddresses :: Lens' ResellernotifyGetwatchdetailsResponse [Text]-rgrServiceAccountEmailAddresses- = lens _rgrServiceAccountEmailAddresses- (\ s a -> s{_rgrServiceAccountEmailAddresses = a})- . _Default- . _Coerce--instance FromJSON- ResellernotifyGetwatchdetailsResponse- where- parseJSON- = withObject "ResellernotifyGetwatchdetailsResponse"- (\ o ->- ResellernotifyGetwatchdetailsResponse' <$>- (o .:? "topicName") <*>- (o .:? "serviceAccountEmailAddresses" .!= mempty))--instance ToJSON ResellernotifyGetwatchdetailsResponse- where- toJSON ResellernotifyGetwatchdetailsResponse'{..}- = object- (catMaybes- [("topicName" .=) <$> _rgrTopicName,- ("serviceAccountEmailAddresses" .=) <$>- _rgrServiceAccountEmailAddresses])---- | JSON template for address of a customer.------ /See:/ 'address' smart constructor.-data Address =- Address'- { _aOrganizationName :: !(Maybe Text)- , _aKind :: !Text- , _aPostalCode :: !(Maybe Text)- , _aAddressLine1 :: !(Maybe Text)- , _aLocality :: !(Maybe Text)- , _aContactName :: !(Maybe Text)- , _aAddressLine2 :: !(Maybe Text)- , _aCountryCode :: !(Maybe Text)- , _aRegion :: !(Maybe Text)- , _aAddressLine3 :: !(Maybe Text)- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Address' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'aOrganizationName'------ * 'aKind'------ * 'aPostalCode'------ * 'aAddressLine1'------ * 'aLocality'------ * 'aContactName'------ * 'aAddressLine2'------ * 'aCountryCode'------ * 'aRegion'------ * 'aAddressLine3'-address- :: Address-address =- Address'- { _aOrganizationName = Nothing- , _aKind = "customers#address"- , _aPostalCode = Nothing- , _aAddressLine1 = Nothing- , _aLocality = Nothing- , _aContactName = Nothing- , _aAddressLine2 = Nothing- , _aCountryCode = Nothing- , _aRegion = Nothing- , _aAddressLine3 = Nothing- }----- | The company or company division name. This is required.-aOrganizationName :: Lens' Address (Maybe Text)-aOrganizationName- = lens _aOrganizationName- (\ s a -> s{_aOrganizationName = a})---- | Identifies the resource as a customer address. Value: customers#address-aKind :: Lens' Address Text-aKind = lens _aKind (\ s a -> s{_aKind = a})---- | A postalCode example is a postal zip code such as 94043. This property--- is required when creating a new customer.-aPostalCode :: Lens' Address (Maybe Text)-aPostalCode- = lens _aPostalCode (\ s a -> s{_aPostalCode = a})---- | A customer\'s physical address. An address can be composed of one to--- three lines. The addressline2 and addressLine3 are optional.-aAddressLine1 :: Lens' Address (Maybe Text)-aAddressLine1- = lens _aAddressLine1- (\ s a -> s{_aAddressLine1 = a})---- | An example of a locality value is the city of San Francisco.-aLocality :: Lens' Address (Maybe Text)-aLocality- = lens _aLocality (\ s a -> s{_aLocality = a})---- | The customer contact\'s name. This is required.-aContactName :: Lens' Address (Maybe Text)-aContactName- = lens _aContactName (\ s a -> s{_aContactName = a})---- | Line 2 of the address.-aAddressLine2 :: Lens' Address (Maybe Text)-aAddressLine2- = lens _aAddressLine2- (\ s a -> s{_aAddressLine2 = a})---- | For countryCode information, see the ISO 3166 country code elements.--- Verify that country is approved for resale of Google products. This--- property is required when creating a new customer.-aCountryCode :: Lens' Address (Maybe Text)-aCountryCode- = lens _aCountryCode (\ s a -> s{_aCountryCode = a})---- | An example of a region value is CA for the state of California.-aRegion :: Lens' Address (Maybe Text)-aRegion = lens _aRegion (\ s a -> s{_aRegion = a})---- | Line 3 of the address.-aAddressLine3 :: Lens' Address (Maybe Text)-aAddressLine3- = lens _aAddressLine3- (\ s a -> s{_aAddressLine3 = a})--instance FromJSON Address where- parseJSON- = withObject "Address"- (\ o ->- Address' <$>- (o .:? "organizationName") <*>- (o .:? "kind" .!= "customers#address")- <*> (o .:? "postalCode")- <*> (o .:? "addressLine1")- <*> (o .:? "locality")- <*> (o .:? "contactName")- <*> (o .:? "addressLine2")- <*> (o .:? "countryCode")- <*> (o .:? "region")- <*> (o .:? "addressLine3"))--instance ToJSON Address where- toJSON Address'{..}- = object- (catMaybes- [("organizationName" .=) <$> _aOrganizationName,- Just ("kind" .= _aKind),- ("postalCode" .=) <$> _aPostalCode,- ("addressLine1" .=) <$> _aAddressLine1,- ("locality" .=) <$> _aLocality,- ("contactName" .=) <$> _aContactName,- ("addressLine2" .=) <$> _aAddressLine2,- ("countryCode" .=) <$> _aCountryCode,- ("region" .=) <$> _aRegion,- ("addressLine3" .=) <$> _aAddressLine3])---- | JSON template for a customer.------ /See:/ 'customer' smart constructor.-data Customer =- Customer'- { _cCustomerDomainVerified :: !(Maybe Bool)- , _cResourceUiURL :: !(Maybe Text)- , _cKind :: !Text- , _cCustomerId :: !(Maybe Text)- , _cAlternateEmail :: !(Maybe Text)- , _cCustomerDomain :: !(Maybe Text)- , _cPhoneNumber :: !(Maybe Text)- , _cPostalAddress :: !(Maybe Address)- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Customer' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cCustomerDomainVerified'------ * 'cResourceUiURL'------ * 'cKind'------ * 'cCustomerId'------ * 'cAlternateEmail'------ * 'cCustomerDomain'------ * 'cPhoneNumber'------ * 'cPostalAddress'-customer- :: Customer-customer =- Customer'- { _cCustomerDomainVerified = Nothing- , _cResourceUiURL = Nothing- , _cKind = "reseller#customer"- , _cCustomerId = Nothing- , _cAlternateEmail = Nothing- , _cCustomerDomain = Nothing- , _cPhoneNumber = Nothing- , _cPostalAddress = Nothing- }----- | Whether the customer\'s primary domain has been verified.-cCustomerDomainVerified :: Lens' Customer (Maybe Bool)-cCustomerDomainVerified- = lens _cCustomerDomainVerified- (\ s a -> s{_cCustomerDomainVerified = a})---- | URL to customer\'s Admin console dashboard. The read-only URL is--- generated by the API service. This is used if your client application--- requires the customer to complete a task in the Admin console.-cResourceUiURL :: Lens' Customer (Maybe Text)-cResourceUiURL- = lens _cResourceUiURL- (\ s a -> s{_cResourceUiURL = a})---- | Identifies the resource as a customer. Value: reseller#customer-cKind :: Lens' Customer Text-cKind = lens _cKind (\ s a -> s{_cKind = a})---- | This property will always be returned in a response as the unique--- identifier generated by Google. In a request, this property can be--- either the primary domain or the unique identifier generated by Google.-cCustomerId :: Lens' Customer (Maybe Text)-cCustomerId- = lens _cCustomerId (\ s a -> s{_cCustomerId = a})---- | Like the \"Customer email\" in the reseller tools, this email is the--- secondary contact used if something happens to the customer\'s service--- such as service outage or a security issue. This property is required--- when creating a new customer and should not use the same domain as--- customerDomain.-cAlternateEmail :: Lens' Customer (Maybe Text)-cAlternateEmail- = lens _cAlternateEmail- (\ s a -> s{_cAlternateEmail = a})---- | The customer\'s primary domain name string. customerDomain is required--- when creating a new customer. Do not include the www prefix in the--- domain when adding a customer.-cCustomerDomain :: Lens' Customer (Maybe Text)-cCustomerDomain- = lens _cCustomerDomain- (\ s a -> s{_cCustomerDomain = a})---- | Customer contact phone number. Must start with \"+\" followed by the--- country code. The rest of the number can be contiguous numbers or--- respect the phone local format conventions, but it must be a real phone--- number and not, for example, \"123\". This field is silently ignored if--- invalid.-cPhoneNumber :: Lens' Customer (Maybe Text)-cPhoneNumber- = lens _cPhoneNumber (\ s a -> s{_cPhoneNumber = a})---- | A customer\'s address information. Each field has a limit of 255--- charcters.-cPostalAddress :: Lens' Customer (Maybe Address)-cPostalAddress- = lens _cPostalAddress- (\ s a -> s{_cPostalAddress = a})--instance FromJSON Customer where- parseJSON- = withObject "Customer"- (\ o ->- Customer' <$>- (o .:? "customerDomainVerified") <*>- (o .:? "resourceUiUrl")- <*> (o .:? "kind" .!= "reseller#customer")- <*> (o .:? "customerId")- <*> (o .:? "alternateEmail")- <*> (o .:? "customerDomain")- <*> (o .:? "phoneNumber")- <*> (o .:? "postalAddress"))--instance ToJSON Customer where- toJSON Customer'{..}- = object- (catMaybes- [("customerDomainVerified" .=) <$>- _cCustomerDomainVerified,- ("resourceUiUrl" .=) <$> _cResourceUiURL,- Just ("kind" .= _cKind),- ("customerId" .=) <$> _cCustomerId,- ("alternateEmail" .=) <$> _cAlternateEmail,- ("customerDomain" .=) <$> _cCustomerDomain,- ("phoneNumber" .=) <$> _cPhoneNumber,- ("postalAddress" .=) <$> _cPostalAddress])---- | JSON template for the ChangePlan rpc request.------ /See:/ 'changePlanRequest' smart constructor.-data ChangePlanRequest =- ChangePlanRequest'- { _cprKind :: !Text- , _cprDealCode :: !(Maybe Text)- , _cprPlanName :: !(Maybe Text)- , _cprPurchaseOrderId :: !(Maybe Text)- , _cprSeats :: !(Maybe Seats)- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ChangePlanRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cprKind'------ * 'cprDealCode'------ * 'cprPlanName'------ * 'cprPurchaseOrderId'------ * 'cprSeats'-changePlanRequest- :: ChangePlanRequest-changePlanRequest =- ChangePlanRequest'- { _cprKind = "subscriptions#changePlanRequest"- , _cprDealCode = Nothing- , _cprPlanName = Nothing- , _cprPurchaseOrderId = Nothing- , _cprSeats = Nothing- }----- | Identifies the resource as a subscription change plan request. Value:--- subscriptions#changePlanRequest-cprKind :: Lens' ChangePlanRequest Text-cprKind = lens _cprKind (\ s a -> s{_cprKind = a})---- | Google-issued code (100 char max) for discounted pricing on subscription--- plans. Deal code must be included in changePlan request in order to--- receive discounted rate. This property is optional. If a deal code has--- already been added to a subscription, this property may be left empty--- and the existing discounted rate will still apply (if not empty, only--- provide the deal code that is already present on the subscription). If a--- deal code has never been added to a subscription and this property is--- left blank, regular pricing will apply.-cprDealCode :: Lens' ChangePlanRequest (Maybe Text)-cprDealCode- = lens _cprDealCode (\ s a -> s{_cprDealCode = a})---- | The planName property is required. This is the name of the--- subscription\'s payment plan. For more information about the Google--- payment plans, see API concepts. Possible values are: ---- ANNUAL_MONTHLY_PAY - The annual commitment plan with monthly payments--- Caution: ANNUAL_MONTHLY_PAY is returned as ANNUAL in all API responses.--- - ANNUAL_YEARLY_PAY - The annual commitment plan with yearly payments ---- FLEXIBLE - The flexible plan - TRIAL - The 30-day free trial plan-cprPlanName :: Lens' ChangePlanRequest (Maybe Text)-cprPlanName- = lens _cprPlanName (\ s a -> s{_cprPlanName = a})---- | This is an optional property. This purchase order (PO) information is--- for resellers to use for their company tracking usage. If a--- purchaseOrderId value is given it appears in the API responses and shows--- up in the invoice. The property accepts up to 80 plain text characters.-cprPurchaseOrderId :: Lens' ChangePlanRequest (Maybe Text)-cprPurchaseOrderId- = lens _cprPurchaseOrderId- (\ s a -> s{_cprPurchaseOrderId = a})---- | This is a required property. The seats property is the number of user--- seat licenses.-cprSeats :: Lens' ChangePlanRequest (Maybe Seats)-cprSeats = lens _cprSeats (\ s a -> s{_cprSeats = a})--instance FromJSON ChangePlanRequest where- parseJSON- = withObject "ChangePlanRequest"- (\ o ->- ChangePlanRequest' <$>- (o .:? "kind" .!= "subscriptions#changePlanRequest")- <*> (o .:? "dealCode")- <*> (o .:? "planName")- <*> (o .:? "purchaseOrderId")- <*> (o .:? "seats"))--instance ToJSON ChangePlanRequest where- toJSON ChangePlanRequest'{..}- = object- (catMaybes- [Just ("kind" .= _cprKind),- ("dealCode" .=) <$> _cprDealCode,- ("planName" .=) <$> _cprPlanName,- ("purchaseOrderId" .=) <$> _cprPurchaseOrderId,- ("seats" .=) <$> _cprSeats])---- | In this version of the API, annual commitment plan\'s interval is one--- year. Note: When billingMethod value is OFFLINE, the subscription--- property object plan.commitmentInterval is omitted in all API responses.------ /See:/ 'subscriptionPlanCommitmentInterval' smart constructor.-data SubscriptionPlanCommitmentInterval =- SubscriptionPlanCommitmentInterval'- { _spciStartTime :: !(Maybe (Textual Int64))- , _spciEndTime :: !(Maybe (Textual Int64))- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SubscriptionPlanCommitmentInterval' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'spciStartTime'------ * 'spciEndTime'-subscriptionPlanCommitmentInterval- :: SubscriptionPlanCommitmentInterval-subscriptionPlanCommitmentInterval =- SubscriptionPlanCommitmentInterval'- {_spciStartTime = Nothing, _spciEndTime = Nothing}----- | An annual commitment plan\'s interval\'s startTime in milliseconds using--- UNIX Epoch format. See an example Epoch converter.-spciStartTime :: Lens' SubscriptionPlanCommitmentInterval (Maybe Int64)-spciStartTime- = lens _spciStartTime- (\ s a -> s{_spciStartTime = a})- . mapping _Coerce---- | An annual commitment plan\'s interval\'s endTime in milliseconds using--- the UNIX Epoch format. See an example Epoch converter.-spciEndTime :: Lens' SubscriptionPlanCommitmentInterval (Maybe Int64)-spciEndTime- = lens _spciEndTime (\ s a -> s{_spciEndTime = a}) .- mapping _Coerce--instance FromJSON SubscriptionPlanCommitmentInterval- where- parseJSON- = withObject "SubscriptionPlanCommitmentInterval"- (\ o ->- SubscriptionPlanCommitmentInterval' <$>- (o .:? "startTime") <*> (o .:? "endTime"))--instance ToJSON SubscriptionPlanCommitmentInterval- where- toJSON SubscriptionPlanCommitmentInterval'{..}- = object- (catMaybes- [("startTime" .=) <$> _spciStartTime,- ("endTime" .=) <$> _spciEndTime])---- | The plan property is required. In this version of the API, the G Suite--- plans are the flexible plan, annual commitment plan, and the 30-day free--- trial plan. For more information about the API\"s payment plans, see the--- API concepts.------ /See:/ 'subscriptionPlan' smart constructor.-data SubscriptionPlan =- SubscriptionPlan'- { _spCommitmentInterval :: !(Maybe SubscriptionPlanCommitmentInterval)- , _spIsCommitmentPlan :: !(Maybe Bool)- , _spPlanName :: !(Maybe Text)- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SubscriptionPlan' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'spCommitmentInterval'------ * 'spIsCommitmentPlan'------ * 'spPlanName'-subscriptionPlan- :: SubscriptionPlan-subscriptionPlan =- SubscriptionPlan'- { _spCommitmentInterval = Nothing- , _spIsCommitmentPlan = Nothing- , _spPlanName = Nothing- }----- | In this version of the API, annual commitment plan\'s interval is one--- year. Note: When billingMethod value is OFFLINE, the subscription--- property object plan.commitmentInterval is omitted in all API responses.-spCommitmentInterval :: Lens' SubscriptionPlan (Maybe SubscriptionPlanCommitmentInterval)-spCommitmentInterval- = lens _spCommitmentInterval- (\ s a -> s{_spCommitmentInterval = a})---- | The isCommitmentPlan property\'s boolean value identifies the plan as an--- annual commitment plan: - true — The subscription\'s plan is an annual--- commitment plan. - false — The plan is not an annual commitment plan.-spIsCommitmentPlan :: Lens' SubscriptionPlan (Maybe Bool)-spIsCommitmentPlan- = lens _spIsCommitmentPlan- (\ s a -> s{_spIsCommitmentPlan = a})---- | The planName property is required. This is the name of the--- subscription\'s plan. For more information about the Google payment--- plans, see the API concepts. Possible values are: - ANNUAL_MONTHLY_PAY —--- The annual commitment plan with monthly payments. Caution:--- ANNUAL_MONTHLY_PAY is returned as ANNUAL in all API responses. ---- ANNUAL_YEARLY_PAY — The annual commitment plan with yearly payments ---- FLEXIBLE — The flexible plan - TRIAL — The 30-day free trial plan. A--- subscription in trial will be suspended after the 30th free day if no--- payment plan is assigned. Calling changePlan will assign a payment plan--- to a trial but will not activate the plan. A trial will automatically--- begin its assigned payment plan after its 30th free day or immediately--- after calling startPaidService. - FREE — The free plan is exclusive to--- the Cloud Identity SKU and does not incur any billing.-spPlanName :: Lens' SubscriptionPlan (Maybe Text)-spPlanName- = lens _spPlanName (\ s a -> s{_spPlanName = a})--instance FromJSON SubscriptionPlan where- parseJSON- = withObject "SubscriptionPlan"- (\ o ->- SubscriptionPlan' <$>- (o .:? "commitmentInterval") <*>- (o .:? "isCommitmentPlan")- <*> (o .:? "planName"))--instance ToJSON SubscriptionPlan where- toJSON SubscriptionPlan'{..}- = object- (catMaybes- [("commitmentInterval" .=) <$> _spCommitmentInterval,- ("isCommitmentPlan" .=) <$> _spIsCommitmentPlan,- ("planName" .=) <$> _spPlanName])---- | JSON template for a subscription list.------ /See:/ 'subscriptions' smart constructor.-data Subscriptions =- Subscriptions'- { _sNextPageToken :: !(Maybe Text)- , _sKind :: !Text- , _sSubscriptions :: !(Maybe [Subscription])- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Subscriptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sNextPageToken'------ * 'sKind'------ * 'sSubscriptions'-subscriptions- :: Subscriptions-subscriptions =- Subscriptions'- { _sNextPageToken = Nothing- , _sKind = "reseller#subscriptions"- , _sSubscriptions = Nothing- }----- | The continuation token, used to page through large result sets. Provide--- this value in a subsequent request to return the next page of results.-sNextPageToken :: Lens' Subscriptions (Maybe Text)-sNextPageToken- = lens _sNextPageToken- (\ s a -> s{_sNextPageToken = a})---- | Identifies the resource as a collection of subscriptions. Value:--- reseller#subscriptions-sKind :: Lens' Subscriptions Text-sKind = lens _sKind (\ s a -> s{_sKind = a})---- | The subscriptions in this page of results.-sSubscriptions :: Lens' Subscriptions [Subscription]-sSubscriptions- = lens _sSubscriptions- (\ s a -> s{_sSubscriptions = a})- . _Default- . _Coerce--instance FromJSON Subscriptions where- parseJSON- = withObject "Subscriptions"- (\ o ->- Subscriptions' <$>- (o .:? "nextPageToken") <*>- (o .:? "kind" .!= "reseller#subscriptions")- <*> (o .:? "subscriptions" .!= mempty))--instance ToJSON Subscriptions where- toJSON Subscriptions'{..}- = object- (catMaybes- [("nextPageToken" .=) <$> _sNextPageToken,- Just ("kind" .= _sKind),- ("subscriptions" .=) <$> _sSubscriptions])---- | JSON template for subscription seats.------ /See:/ 'seats' smart constructor.-data Seats =- Seats'- { _seaNumberOfSeats :: !(Maybe (Textual Int32))- , _seaMaximumNumberOfSeats :: !(Maybe (Textual Int32))- , _seaLicensedNumberOfSeats :: !(Maybe (Textual Int32))- , _seaKind :: !Text- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Seats' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'seaNumberOfSeats'------ * 'seaMaximumNumberOfSeats'------ * 'seaLicensedNumberOfSeats'------ * 'seaKind'-seats- :: Seats-seats =- Seats'- { _seaNumberOfSeats = Nothing- , _seaMaximumNumberOfSeats = Nothing- , _seaLicensedNumberOfSeats = Nothing- , _seaKind = "subscriptions#seats"- }----- | This is a required property and is exclusive to subscriptions with--- ANNUAL_MONTHLY_PAY and ANNUAL_YEARLY_PAY plans. This property sets the--- maximum number of licenses assignable to users on a subscription. The--- reseller can add more licenses, but once set, the numberOfSeats cannot--- be reduced until renewal. The reseller is invoiced based on the--- numberOfSeats value regardless of how many of these user licenses are--- assigned. Note: G Suite subscriptions automatically assign a license to--- every user.-seaNumberOfSeats :: Lens' Seats (Maybe Int32)-seaNumberOfSeats- = lens _seaNumberOfSeats- (\ s a -> s{_seaNumberOfSeats = a})- . mapping _Coerce---- | This is a required property and is exclusive to subscriptions with--- FLEXIBLE or TRIAL plans. This property sets the maximum number of--- licensed users allowed on a subscription. This quantity can be increased--- up to the maximum limit defined in the reseller\'s contract. The minimum--- quantity is the current number of users in the customer account. Note: G--- Suite subscriptions automatically assign a license to every user.-seaMaximumNumberOfSeats :: Lens' Seats (Maybe Int32)-seaMaximumNumberOfSeats- = lens _seaMaximumNumberOfSeats- (\ s a -> s{_seaMaximumNumberOfSeats = a})- . mapping _Coerce---- | Read-only field containing the current number of users that are assigned--- a license for the product defined in skuId. This field\'s value is--- equivalent to the numerical count of users returned by the Enterprise--- License Manager API method: listForProductAndSku-seaLicensedNumberOfSeats :: Lens' Seats (Maybe Int32)-seaLicensedNumberOfSeats- = lens _seaLicensedNumberOfSeats- (\ s a -> s{_seaLicensedNumberOfSeats = a})- . mapping _Coerce---- | Identifies the resource as a subscription seat setting. Value:--- subscriptions#seats-seaKind :: Lens' Seats Text-seaKind = lens _seaKind (\ s a -> s{_seaKind = a})--instance FromJSON Seats where- parseJSON- = withObject "Seats"- (\ o ->- Seats' <$>- (o .:? "numberOfSeats") <*>- (o .:? "maximumNumberOfSeats")- <*> (o .:? "licensedNumberOfSeats")- <*> (o .:? "kind" .!= "subscriptions#seats"))--instance ToJSON Seats where- toJSON Seats'{..}- = object- (catMaybes- [("numberOfSeats" .=) <$> _seaNumberOfSeats,- ("maximumNumberOfSeats" .=) <$>- _seaMaximumNumberOfSeats,- ("licensedNumberOfSeats" .=) <$>- _seaLicensedNumberOfSeats,- Just ("kind" .= _seaKind)])---- | JSON template for a subscription renewal settings.------ /See:/ 'renewalSettings' smart constructor.-data RenewalSettings =- RenewalSettings'- { _rsKind :: !Text- , _rsRenewalType :: !(Maybe Text)- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'RenewalSettings' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rsKind'------ * 'rsRenewalType'-renewalSettings- :: RenewalSettings-renewalSettings =- RenewalSettings'- {_rsKind = "subscriptions#renewalSettings", _rsRenewalType = Nothing}----- | Identifies the resource as a subscription renewal setting. Value:--- subscriptions#renewalSettings-rsKind :: Lens' RenewalSettings Text-rsKind = lens _rsKind (\ s a -> s{_rsKind = a})---- | Renewal settings for the annual commitment plan. For more detailed--- information, see renewal options in the administrator help center. When--- renewing a subscription, the renewalType is a required property.-rsRenewalType :: Lens' RenewalSettings (Maybe Text)-rsRenewalType- = lens _rsRenewalType- (\ s a -> s{_rsRenewalType = a})--instance FromJSON RenewalSettings where- parseJSON- = withObject "RenewalSettings"- (\ o ->- RenewalSettings' <$>- (o .:? "kind" .!= "subscriptions#renewalSettings")- <*> (o .:? "renewalType"))--instance ToJSON RenewalSettings where- toJSON RenewalSettings'{..}- = object- (catMaybes- [Just ("kind" .= _rsKind),- ("renewalType" .=) <$> _rsRenewalType])---- | JSON template for a subscription.------ /See:/ 'subscription' smart constructor.-data Subscription =- Subscription'- { _subCreationTime :: !(Maybe (Textual Int64))- , _subBillingMethod :: !(Maybe Text)- , _subStatus :: !(Maybe Text)- , _subTrialSettings :: !(Maybe SubscriptionTrialSettings)- , _subSKUName :: !(Maybe Text)- , _subResourceUiURL :: !(Maybe Text)- , _subKind :: !Text- , _subSKUId :: !(Maybe Text)- , _subPlan :: !(Maybe SubscriptionPlan)- , _subDealCode :: !(Maybe Text)- , _subCustomerId :: !(Maybe Text)- , _subCustomerDomain :: !(Maybe Text)- , _subSuspensionReasons :: !(Maybe [Text])- , _subTransferInfo :: !(Maybe SubscriptionTransferInfo)- , _subPurchaseOrderId :: !(Maybe Text)- , _subSeats :: !(Maybe Seats)- , _subRenewalSettings :: !(Maybe RenewalSettings)- , _subSubscriptionId :: !(Maybe Text)- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Subscription' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'subCreationTime'------ * 'subBillingMethod'------ * 'subStatus'------ * 'subTrialSettings'------ * 'subSKUName'------ * 'subResourceUiURL'------ * 'subKind'------ * 'subSKUId'------ * 'subPlan'------ * 'subDealCode'------ * 'subCustomerId'------ * 'subCustomerDomain'------ * 'subSuspensionReasons'------ * 'subTransferInfo'------ * 'subPurchaseOrderId'------ * 'subSeats'------ * 'subRenewalSettings'------ * 'subSubscriptionId'-subscription- :: Subscription-subscription =- Subscription'- { _subCreationTime = Nothing- , _subBillingMethod = Nothing- , _subStatus = Nothing- , _subTrialSettings = Nothing- , _subSKUName = Nothing- , _subResourceUiURL = Nothing- , _subKind = "reseller#subscription"- , _subSKUId = Nothing- , _subPlan = Nothing- , _subDealCode = Nothing- , _subCustomerId = Nothing- , _subCustomerDomain = Nothing- , _subSuspensionReasons = Nothing- , _subTransferInfo = Nothing- , _subPurchaseOrderId = Nothing- , _subSeats = Nothing- , _subRenewalSettings = Nothing- , _subSubscriptionId = Nothing- }----- | The creationTime property is the date when subscription was created. It--- is in milliseconds using the Epoch format. See an example Epoch--- converter.-subCreationTime :: Lens' Subscription (Maybe Int64)-subCreationTime- = lens _subCreationTime- (\ s a -> s{_subCreationTime = a})- . mapping _Coerce---- | Read-only field that returns the current billing method for a--- subscription.-subBillingMethod :: Lens' Subscription (Maybe Text)-subBillingMethod- = lens _subBillingMethod- (\ s a -> s{_subBillingMethod = a})---- | This is an optional property.-subStatus :: Lens' Subscription (Maybe Text)-subStatus- = lens _subStatus (\ s a -> s{_subStatus = a})---- | The G Suite annual commitment and flexible payment plans can be in a--- 30-day free trial. For more information, see the API concepts.-subTrialSettings :: Lens' Subscription (Maybe SubscriptionTrialSettings)-subTrialSettings- = lens _subTrialSettings- (\ s a -> s{_subTrialSettings = a})---- | Read-only external display name for a product\'s SKU assigned to a--- customer in the subscription. SKU names are subject to change at--- Google\'s discretion. For products and SKUs available in this version of--- the API, see Product and SKU IDs.-subSKUName :: Lens' Subscription (Maybe Text)-subSKUName- = lens _subSKUName (\ s a -> s{_subSKUName = a})---- | URL to customer\'s Subscriptions page in the Admin console. The--- read-only URL is generated by the API service. This is used if your--- client application requires the customer to complete a task using the--- Subscriptions page in the Admin console.-subResourceUiURL :: Lens' Subscription (Maybe Text)-subResourceUiURL- = lens _subResourceUiURL- (\ s a -> s{_subResourceUiURL = a})---- | Identifies the resource as a Subscription. Value: reseller#subscription-subKind :: Lens' Subscription Text-subKind = lens _subKind (\ s a -> s{_subKind = a})---- | A required property. The skuId is a unique system identifier for a--- product\'s SKU assigned to a customer in the subscription. For products--- and SKUs available in this version of the API, see Product and SKU IDs.-subSKUId :: Lens' Subscription (Maybe Text)-subSKUId = lens _subSKUId (\ s a -> s{_subSKUId = a})---- | The plan property is required. In this version of the API, the G Suite--- plans are the flexible plan, annual commitment plan, and the 30-day free--- trial plan. For more information about the API\"s payment plans, see the--- API concepts.-subPlan :: Lens' Subscription (Maybe SubscriptionPlan)-subPlan = lens _subPlan (\ s a -> s{_subPlan = a})---- | Google-issued code (100 char max) for discounted pricing on subscription--- plans. Deal code must be included in insert requests in order to receive--- discounted rate. This property is optional, regular pricing applies if--- left empty.-subDealCode :: Lens' Subscription (Maybe Text)-subDealCode- = lens _subDealCode (\ s a -> s{_subDealCode = a})---- | This property will always be returned in a response as the unique--- identifier generated by Google. In a request, this property can be--- either the primary domain or the unique identifier generated by Google.-subCustomerId :: Lens' Subscription (Maybe Text)-subCustomerId- = lens _subCustomerId- (\ s a -> s{_subCustomerId = a})---- | Primary domain name of the customer-subCustomerDomain :: Lens' Subscription (Maybe Text)-subCustomerDomain- = lens _subCustomerDomain- (\ s a -> s{_subCustomerDomain = a})---- | Read-only field containing an enumerable of all the current suspension--- reasons for a subscription. It is possible for a subscription to have--- many concurrent, overlapping suspension reasons. A subscription\'s--- STATUS is SUSPENDED until all pending suspensions are removed. Possible--- options include: - PENDING_TOS_ACCEPTANCE - The customer has not logged--- in and accepted the G Suite Resold Terms of Services. ---- RENEWAL_WITH_TYPE_CANCEL - The customer\'s commitment ended and their--- service was cancelled at the end of their term. - RESELLER_INITIATED - A--- manual suspension invoked by a Reseller. - TRIAL_ENDED - The customer\'s--- trial expired without a plan selected. - OTHER - The customer is--- suspended for an internal Google reason (e.g. abuse or otherwise).-subSuspensionReasons :: Lens' Subscription [Text]-subSuspensionReasons- = lens _subSuspensionReasons- (\ s a -> s{_subSuspensionReasons = a})- . _Default- . _Coerce---- | Read-only transfer related information for the subscription. For more--- information, see retrieve transferable subscriptions for a customer.-subTransferInfo :: Lens' Subscription (Maybe SubscriptionTransferInfo)-subTransferInfo- = lens _subTransferInfo- (\ s a -> s{_subTransferInfo = a})---- | This is an optional property. This purchase order (PO) information is--- for resellers to use for their company tracking usage. If a--- purchaseOrderId value is given it appears in the API responses and shows--- up in the invoice. The property accepts up to 80 plain text characters.-subPurchaseOrderId :: Lens' Subscription (Maybe Text)-subPurchaseOrderId- = lens _subPurchaseOrderId- (\ s a -> s{_subPurchaseOrderId = a})---- | This is a required property. The number and limit of user seat licenses--- in the plan.-subSeats :: Lens' Subscription (Maybe Seats)-subSeats = lens _subSeats (\ s a -> s{_subSeats = a})---- | Renewal settings for the annual commitment plan. For more detailed--- information, see renewal options in the administrator help center.-subRenewalSettings :: Lens' Subscription (Maybe RenewalSettings)-subRenewalSettings- = lens _subRenewalSettings- (\ s a -> s{_subRenewalSettings = a})---- | The subscriptionId is the subscription identifier and is unique for each--- customer. This is a required property. Since a subscriptionId changes--- when a subscription is updated, we recommend not using this ID as a key--- for persistent data. Use the subscriptionId as described in retrieve all--- reseller subscriptions.-subSubscriptionId :: Lens' Subscription (Maybe Text)-subSubscriptionId- = lens _subSubscriptionId- (\ s a -> s{_subSubscriptionId = a})--instance FromJSON Subscription where- parseJSON- = withObject "Subscription"- (\ o ->- Subscription' <$>- (o .:? "creationTime") <*> (o .:? "billingMethod")- <*> (o .:? "status")- <*> (o .:? "trialSettings")- <*> (o .:? "skuName")- <*> (o .:? "resourceUiUrl")- <*> (o .:? "kind" .!= "reseller#subscription")- <*> (o .:? "skuId")- <*> (o .:? "plan")- <*> (o .:? "dealCode")- <*> (o .:? "customerId")- <*> (o .:? "customerDomain")- <*> (o .:? "suspensionReasons" .!= mempty)- <*> (o .:? "transferInfo")- <*> (o .:? "purchaseOrderId")- <*> (o .:? "seats")- <*> (o .:? "renewalSettings")- <*> (o .:? "subscriptionId"))--instance ToJSON Subscription where- toJSON Subscription'{..}- = object- (catMaybes- [("creationTime" .=) <$> _subCreationTime,- ("billingMethod" .=) <$> _subBillingMethod,- ("status" .=) <$> _subStatus,- ("trialSettings" .=) <$> _subTrialSettings,- ("skuName" .=) <$> _subSKUName,- ("resourceUiUrl" .=) <$> _subResourceUiURL,- Just ("kind" .= _subKind),- ("skuId" .=) <$> _subSKUId, ("plan" .=) <$> _subPlan,- ("dealCode" .=) <$> _subDealCode,- ("customerId" .=) <$> _subCustomerId,- ("customerDomain" .=) <$> _subCustomerDomain,- ("suspensionReasons" .=) <$> _subSuspensionReasons,- ("transferInfo" .=) <$> _subTransferInfo,- ("purchaseOrderId" .=) <$> _subPurchaseOrderId,- ("seats" .=) <$> _subSeats,- ("renewalSettings" .=) <$> _subRenewalSettings,- ("subscriptionId" .=) <$> _subSubscriptionId])---- | Read-only transfer related information for the subscription. For more--- information, see retrieve transferable subscriptions for a customer.------ /See:/ 'subscriptionTransferInfo' smart constructor.-data SubscriptionTransferInfo =- SubscriptionTransferInfo'- { _stiTransferabilityExpirationTime :: !(Maybe (Textual Int64))- , _stiMinimumTransferableSeats :: !(Maybe (Textual Int32))- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SubscriptionTransferInfo' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'stiTransferabilityExpirationTime'------ * 'stiMinimumTransferableSeats'-subscriptionTransferInfo- :: SubscriptionTransferInfo-subscriptionTransferInfo =- SubscriptionTransferInfo'- { _stiTransferabilityExpirationTime = Nothing- , _stiMinimumTransferableSeats = Nothing- }----- | The time when transfer token or intent to transfer will expire. The time--- is in milliseconds using UNIX Epoch format.-stiTransferabilityExpirationTime :: Lens' SubscriptionTransferInfo (Maybe Int64)-stiTransferabilityExpirationTime- = lens _stiTransferabilityExpirationTime- (\ s a -> s{_stiTransferabilityExpirationTime = a})- . mapping _Coerce---- | When inserting a subscription, this is the minimum number of seats--- listed in the transfer order for this product. For example, if the--- customer has 20 users, the reseller cannot place a transfer order of 15--- seats. The minimum is 20 seats.-stiMinimumTransferableSeats :: Lens' SubscriptionTransferInfo (Maybe Int32)-stiMinimumTransferableSeats- = lens _stiMinimumTransferableSeats- (\ s a -> s{_stiMinimumTransferableSeats = a})- . mapping _Coerce--instance FromJSON SubscriptionTransferInfo where- parseJSON- = withObject "SubscriptionTransferInfo"- (\ o ->- SubscriptionTransferInfo' <$>- (o .:? "transferabilityExpirationTime") <*>- (o .:? "minimumTransferableSeats"))--instance ToJSON SubscriptionTransferInfo where- toJSON SubscriptionTransferInfo'{..}- = object- (catMaybes- [("transferabilityExpirationTime" .=) <$>- _stiTransferabilityExpirationTime,- ("minimumTransferableSeats" .=) <$>- _stiMinimumTransferableSeats])
− gen/Network/Google/AppsReseller/Types/Sum.hs
@@ -1,54 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE LambdaCase #-}-{-# LANGUAGE NoImplicitPrelude #-}-{-# LANGUAGE OverloadedStrings #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}---- |--- Module : Network.Google.AppsReseller.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.AppsReseller.Types.Sum where--import Network.Google.Prelude hiding (Bytes)---- | The deletionType query string enables the cancellation, downgrade, or--- suspension of a subscription.-data SubscriptionsDeleteDeletionType- = Cancel- -- ^ @cancel@- -- Cancels the subscription immediately. This does not apply to a G Suite- -- subscription.- | TransferToDirect- -- ^ @transfer_to_direct@- -- Transfers a subscription directly to Google. The customer is- -- immediately transferred to a direct billing relationship with Google and- -- is given a short amount of time with no service interruption. The- -- customer can then choose to set up billing directly with Google by using- -- a credit card, or they can transfer to another reseller.- deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable SubscriptionsDeleteDeletionType--instance FromHttpApiData SubscriptionsDeleteDeletionType where- parseQueryParam = \case- "cancel" -> Right Cancel- "transfer_to_direct" -> Right TransferToDirect- x -> Left ("Unable to parse SubscriptionsDeleteDeletionType from: " <> x)--instance ToHttpApiData SubscriptionsDeleteDeletionType where- toQueryParam = \case- Cancel -> "cancel"- TransferToDirect -> "transfer_to_direct"--instance FromJSON SubscriptionsDeleteDeletionType where- parseJSON = parseJSONText "SubscriptionsDeleteDeletionType"--instance ToJSON SubscriptionsDeleteDeletionType where- toJSON = toJSONText
− gen/Network/Google/Resource/Reseller/Customers/Get.hs
@@ -1,90 +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.Reseller.Customers.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)------ Get a customer account.------ /See:/ <https://developers.google.com/google-apps/reseller/ Enterprise Apps Reseller API Reference> for @reseller.customers.get@.-module Network.Google.Resource.Reseller.Customers.Get- (- -- * REST Resource- CustomersGetResource-- -- * Creating a Request- , customersGet- , CustomersGet-- -- * Request Lenses- , cgCustomerId- ) where--import Network.Google.AppsReseller.Types-import Network.Google.Prelude---- | A resource alias for @reseller.customers.get@ method which the--- 'CustomersGet' request conforms to.-type CustomersGetResource =- "apps" :>- "reseller" :>- "v1" :>- "customers" :>- Capture "customerId" Text :>- QueryParam "alt" AltJSON :> Get '[JSON] Customer---- | Get a customer account.------ /See:/ 'customersGet' smart constructor.-newtype CustomersGet =- CustomersGet'- { _cgCustomerId :: Text- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CustomersGet' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cgCustomerId'-customersGet- :: Text -- ^ 'cgCustomerId'- -> CustomersGet-customersGet pCgCustomerId_ = CustomersGet' {_cgCustomerId = pCgCustomerId_}----- | Either the customer\'s primary domain name or the customer\'s unique--- identifier. If using the domain name, we do not recommend using a--- customerId as a key for persistent data. If the domain name for a--- customerId is changed, the Google system automatically updates.-cgCustomerId :: Lens' CustomersGet Text-cgCustomerId- = lens _cgCustomerId (\ s a -> s{_cgCustomerId = a})--instance GoogleRequest CustomersGet where- type Rs CustomersGet = Customer- type Scopes CustomersGet =- '["https://www.googleapis.com/auth/apps.order",- "https://www.googleapis.com/auth/apps.order.readonly"]- requestClient CustomersGet'{..}- = go _cgCustomerId (Just AltJSON) appsResellerService- where go- = buildClient (Proxy :: Proxy CustomersGetResource)- mempty
− gen/Network/Google/Resource/Reseller/Customers/Insert.hs
@@ -1,105 +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.Reseller.Customers.Insert--- 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)------ Order a new customer\'s account.------ /See:/ <https://developers.google.com/google-apps/reseller/ Enterprise Apps Reseller API Reference> for @reseller.customers.insert@.-module Network.Google.Resource.Reseller.Customers.Insert- (- -- * REST Resource- CustomersInsertResource-- -- * Creating a Request- , customersInsert- , CustomersInsert-- -- * Request Lenses- , ciPayload- , ciCustomerAuthToken- ) where--import Network.Google.AppsReseller.Types-import Network.Google.Prelude---- | A resource alias for @reseller.customers.insert@ method which the--- 'CustomersInsert' request conforms to.-type CustomersInsertResource =- "apps" :>- "reseller" :>- "v1" :>- "customers" :>- QueryParam "customerAuthToken" Text :>- QueryParam "alt" AltJSON :>- ReqBody '[JSON] Customer :> Post '[JSON] Customer---- | Order a new customer\'s account.------ /See:/ 'customersInsert' smart constructor.-data CustomersInsert =- CustomersInsert'- { _ciPayload :: !Customer- , _ciCustomerAuthToken :: !(Maybe Text)- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CustomersInsert' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ciPayload'------ * 'ciCustomerAuthToken'-customersInsert- :: Customer -- ^ 'ciPayload'- -> CustomersInsert-customersInsert pCiPayload_ =- CustomersInsert' {_ciPayload = pCiPayload_, _ciCustomerAuthToken = Nothing}----- | Multipart request metadata.-ciPayload :: Lens' CustomersInsert Customer-ciPayload- = lens _ciPayload (\ s a -> s{_ciPayload = a})---- | The customerAuthToken query string is required when creating a resold--- account that transfers a direct customer\'s subscription or transfers--- another reseller customer\'s subscription to your reseller management.--- This is a hexadecimal authentication token needed to complete the--- subscription transfer. For more information, see the administrator help--- center.-ciCustomerAuthToken :: Lens' CustomersInsert (Maybe Text)-ciCustomerAuthToken- = lens _ciCustomerAuthToken- (\ s a -> s{_ciCustomerAuthToken = a})--instance GoogleRequest CustomersInsert where- type Rs CustomersInsert = Customer- type Scopes CustomersInsert =- '["https://www.googleapis.com/auth/apps.order"]- requestClient CustomersInsert'{..}- = go _ciCustomerAuthToken (Just AltJSON) _ciPayload- appsResellerService- where go- = buildClient- (Proxy :: Proxy CustomersInsertResource)- mempty
− gen/Network/Google/Resource/Reseller/Customers/Patch.hs
@@ -1,104 +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.Reseller.Customers.Patch--- 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)------ Update a customer account\'s settings. This method supports patch--- semantics.------ /See:/ <https://developers.google.com/google-apps/reseller/ Enterprise Apps Reseller API Reference> for @reseller.customers.patch@.-module Network.Google.Resource.Reseller.Customers.Patch- (- -- * REST Resource- CustomersPatchResource-- -- * Creating a Request- , customersPatch- , CustomersPatch-- -- * Request Lenses- , cpPayload- , cpCustomerId- ) where--import Network.Google.AppsReseller.Types-import Network.Google.Prelude---- | A resource alias for @reseller.customers.patch@ method which the--- 'CustomersPatch' request conforms to.-type CustomersPatchResource =- "apps" :>- "reseller" :>- "v1" :>- "customers" :>- Capture "customerId" Text :>- QueryParam "alt" AltJSON :>- ReqBody '[JSON] Customer :> Patch '[JSON] Customer---- | Update a customer account\'s settings. This method supports patch--- semantics.------ /See:/ 'customersPatch' smart constructor.-data CustomersPatch =- CustomersPatch'- { _cpPayload :: !Customer- , _cpCustomerId :: !Text- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CustomersPatch' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cpPayload'------ * 'cpCustomerId'-customersPatch- :: Customer -- ^ 'cpPayload'- -> Text -- ^ 'cpCustomerId'- -> CustomersPatch-customersPatch pCpPayload_ pCpCustomerId_ =- CustomersPatch' {_cpPayload = pCpPayload_, _cpCustomerId = pCpCustomerId_}----- | Multipart request metadata.-cpPayload :: Lens' CustomersPatch Customer-cpPayload- = lens _cpPayload (\ s a -> s{_cpPayload = a})---- | Either the customer\'s primary domain name or the customer\'s unique--- identifier. If using the domain name, we do not recommend using a--- customerId as a key for persistent data. If the domain name for a--- customerId is changed, the Google system automatically updates.-cpCustomerId :: Lens' CustomersPatch Text-cpCustomerId- = lens _cpCustomerId (\ s a -> s{_cpCustomerId = a})--instance GoogleRequest CustomersPatch where- type Rs CustomersPatch = Customer- type Scopes CustomersPatch =- '["https://www.googleapis.com/auth/apps.order"]- requestClient CustomersPatch'{..}- = go _cpCustomerId (Just AltJSON) _cpPayload- appsResellerService- where go- = buildClient (Proxy :: Proxy CustomersPatchResource)- mempty
− gen/Network/Google/Resource/Reseller/Customers/Update.hs
@@ -1,103 +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.Reseller.Customers.Update--- 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)------ Update a customer account\'s settings.------ /See:/ <https://developers.google.com/google-apps/reseller/ Enterprise Apps Reseller API Reference> for @reseller.customers.update@.-module Network.Google.Resource.Reseller.Customers.Update- (- -- * REST Resource- CustomersUpdateResource-- -- * Creating a Request- , customersUpdate- , CustomersUpdate-- -- * Request Lenses- , cuPayload- , cuCustomerId- ) where--import Network.Google.AppsReseller.Types-import Network.Google.Prelude---- | A resource alias for @reseller.customers.update@ method which the--- 'CustomersUpdate' request conforms to.-type CustomersUpdateResource =- "apps" :>- "reseller" :>- "v1" :>- "customers" :>- Capture "customerId" Text :>- QueryParam "alt" AltJSON :>- ReqBody '[JSON] Customer :> Put '[JSON] Customer---- | Update a customer account\'s settings.------ /See:/ 'customersUpdate' smart constructor.-data CustomersUpdate =- CustomersUpdate'- { _cuPayload :: !Customer- , _cuCustomerId :: !Text- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CustomersUpdate' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cuPayload'------ * 'cuCustomerId'-customersUpdate- :: Customer -- ^ 'cuPayload'- -> Text -- ^ 'cuCustomerId'- -> CustomersUpdate-customersUpdate pCuPayload_ pCuCustomerId_ =- CustomersUpdate' {_cuPayload = pCuPayload_, _cuCustomerId = pCuCustomerId_}----- | Multipart request metadata.-cuPayload :: Lens' CustomersUpdate Customer-cuPayload- = lens _cuPayload (\ s a -> s{_cuPayload = a})---- | Either the customer\'s primary domain name or the customer\'s unique--- identifier. If using the domain name, we do not recommend using a--- customerId as a key for persistent data. If the domain name for a--- customerId is changed, the Google system automatically updates.-cuCustomerId :: Lens' CustomersUpdate Text-cuCustomerId- = lens _cuCustomerId (\ s a -> s{_cuCustomerId = a})--instance GoogleRequest CustomersUpdate where- type Rs CustomersUpdate = Customer- type Scopes CustomersUpdate =- '["https://www.googleapis.com/auth/apps.order"]- requestClient CustomersUpdate'{..}- = go _cuCustomerId (Just AltJSON) _cuPayload- appsResellerService- where go- = buildClient- (Proxy :: Proxy CustomersUpdateResource)- mempty
− gen/Network/Google/Resource/Reseller/Resellernotify/Getwatchdetails.hs
@@ -1,79 +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.Reseller.Resellernotify.Getwatchdetails--- 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)------ Returns all the details of the watch corresponding to the reseller.------ /See:/ <https://developers.google.com/google-apps/reseller/ Enterprise Apps Reseller API Reference> for @reseller.resellernotify.getwatchdetails@.-module Network.Google.Resource.Reseller.Resellernotify.Getwatchdetails- (- -- * REST Resource- ResellernotifyGetwatchdetailsResource-- -- * Creating a Request- , resellernotifyGetwatchdetails- , ResellernotifyGetwatchdetails-- ) where--import Network.Google.AppsReseller.Types-import Network.Google.Prelude---- | A resource alias for @reseller.resellernotify.getwatchdetails@ method which the--- 'ResellernotifyGetwatchdetails' request conforms to.-type ResellernotifyGetwatchdetailsResource =- "apps" :>- "reseller" :>- "v1" :>- "resellernotify" :>- "getwatchdetails" :>- QueryParam "alt" AltJSON :>- Get '[JSON] ResellernotifyGetwatchdetailsResponse---- | Returns all the details of the watch corresponding to the reseller.------ /See:/ 'resellernotifyGetwatchdetails' smart constructor.-data ResellernotifyGetwatchdetails =- ResellernotifyGetwatchdetails'- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ResellernotifyGetwatchdetails' with the minimum fields required to make a request.----resellernotifyGetwatchdetails- :: ResellernotifyGetwatchdetails-resellernotifyGetwatchdetails = ResellernotifyGetwatchdetails'---instance GoogleRequest ResellernotifyGetwatchdetails- where- type Rs ResellernotifyGetwatchdetails =- ResellernotifyGetwatchdetailsResponse- type Scopes ResellernotifyGetwatchdetails =- '["https://www.googleapis.com/auth/apps.order",- "https://www.googleapis.com/auth/apps.order.readonly"]- requestClient ResellernotifyGetwatchdetails'{}- = go (Just AltJSON) appsResellerService- where go- = buildClient- (Proxy ::- Proxy ResellernotifyGetwatchdetailsResource)- mempty
− gen/Network/Google/Resource/Reseller/Resellernotify/Register.hs
@@ -1,92 +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.Reseller.Resellernotify.Register--- 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)------ Registers a Reseller for receiving notifications.------ /See:/ <https://developers.google.com/google-apps/reseller/ Enterprise Apps Reseller API Reference> for @reseller.resellernotify.register@.-module Network.Google.Resource.Reseller.Resellernotify.Register- (- -- * REST Resource- ResellernotifyRegisterResource-- -- * Creating a Request- , resellernotifyRegister- , ResellernotifyRegister-- -- * Request Lenses- , rrServiceAccountEmailAddress- ) where--import Network.Google.AppsReseller.Types-import Network.Google.Prelude---- | A resource alias for @reseller.resellernotify.register@ method which the--- 'ResellernotifyRegister' request conforms to.-type ResellernotifyRegisterResource =- "apps" :>- "reseller" :>- "v1" :>- "resellernotify" :>- "register" :>- QueryParam "serviceAccountEmailAddress" Text :>- QueryParam "alt" AltJSON :>- Post '[JSON] ResellernotifyResource---- | Registers a Reseller for receiving notifications.------ /See:/ 'resellernotifyRegister' smart constructor.-newtype ResellernotifyRegister =- ResellernotifyRegister'- { _rrServiceAccountEmailAddress :: Maybe Text- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ResellernotifyRegister' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rrServiceAccountEmailAddress'-resellernotifyRegister- :: ResellernotifyRegister-resellernotifyRegister =- ResellernotifyRegister' {_rrServiceAccountEmailAddress = Nothing}----- | The service account which will own the created Cloud-PubSub topic.-rrServiceAccountEmailAddress :: Lens' ResellernotifyRegister (Maybe Text)-rrServiceAccountEmailAddress- = lens _rrServiceAccountEmailAddress- (\ s a -> s{_rrServiceAccountEmailAddress = a})--instance GoogleRequest ResellernotifyRegister where- type Rs ResellernotifyRegister =- ResellernotifyResource- type Scopes ResellernotifyRegister =- '["https://www.googleapis.com/auth/apps.order"]- requestClient ResellernotifyRegister'{..}- = go _rrServiceAccountEmailAddress (Just AltJSON)- appsResellerService- where go- = buildClient- (Proxy :: Proxy ResellernotifyRegisterResource)- mempty
− gen/Network/Google/Resource/Reseller/Resellernotify/Unregister.hs
@@ -1,92 +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.Reseller.Resellernotify.Unregister--- 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)------ Unregisters a Reseller for receiving notifications.------ /See:/ <https://developers.google.com/google-apps/reseller/ Enterprise Apps Reseller API Reference> for @reseller.resellernotify.unregister@.-module Network.Google.Resource.Reseller.Resellernotify.Unregister- (- -- * REST Resource- ResellernotifyUnregisterResource-- -- * Creating a Request- , resellernotifyUnregister- , ResellernotifyUnregister-- -- * Request Lenses- , ruServiceAccountEmailAddress- ) where--import Network.Google.AppsReseller.Types-import Network.Google.Prelude---- | A resource alias for @reseller.resellernotify.unregister@ method which the--- 'ResellernotifyUnregister' request conforms to.-type ResellernotifyUnregisterResource =- "apps" :>- "reseller" :>- "v1" :>- "resellernotify" :>- "unregister" :>- QueryParam "serviceAccountEmailAddress" Text :>- QueryParam "alt" AltJSON :>- Post '[JSON] ResellernotifyResource---- | Unregisters a Reseller for receiving notifications.------ /See:/ 'resellernotifyUnregister' smart constructor.-newtype ResellernotifyUnregister =- ResellernotifyUnregister'- { _ruServiceAccountEmailAddress :: Maybe Text- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ResellernotifyUnregister' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ruServiceAccountEmailAddress'-resellernotifyUnregister- :: ResellernotifyUnregister-resellernotifyUnregister =- ResellernotifyUnregister' {_ruServiceAccountEmailAddress = Nothing}----- | The service account which owns the Cloud-PubSub topic.-ruServiceAccountEmailAddress :: Lens' ResellernotifyUnregister (Maybe Text)-ruServiceAccountEmailAddress- = lens _ruServiceAccountEmailAddress- (\ s a -> s{_ruServiceAccountEmailAddress = a})--instance GoogleRequest ResellernotifyUnregister where- type Rs ResellernotifyUnregister =- ResellernotifyResource- type Scopes ResellernotifyUnregister =- '["https://www.googleapis.com/auth/apps.order"]- requestClient ResellernotifyUnregister'{..}- = go _ruServiceAccountEmailAddress (Just AltJSON)- appsResellerService- where go- = buildClient- (Proxy :: Proxy ResellernotifyUnregisterResource)- mempty
− gen/Network/Google/Resource/Reseller/Subscriptions/Activate.hs
@@ -1,111 +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.Reseller.Subscriptions.Activate--- 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)------ Activates a subscription previously suspended by the reseller------ /See:/ <https://developers.google.com/google-apps/reseller/ Enterprise Apps Reseller API Reference> for @reseller.subscriptions.activate@.-module Network.Google.Resource.Reseller.Subscriptions.Activate- (- -- * REST Resource- SubscriptionsActivateResource-- -- * Creating a Request- , subscriptionsActivate- , SubscriptionsActivate-- -- * Request Lenses- , saCustomerId- , saSubscriptionId- ) where--import Network.Google.AppsReseller.Types-import Network.Google.Prelude---- | A resource alias for @reseller.subscriptions.activate@ method which the--- 'SubscriptionsActivate' request conforms to.-type SubscriptionsActivateResource =- "apps" :>- "reseller" :>- "v1" :>- "customers" :>- Capture "customerId" Text :>- "subscriptions" :>- Capture "subscriptionId" Text :>- "activate" :>- QueryParam "alt" AltJSON :> Post '[JSON] Subscription---- | Activates a subscription previously suspended by the reseller------ /See:/ 'subscriptionsActivate' smart constructor.-data SubscriptionsActivate =- SubscriptionsActivate'- { _saCustomerId :: !Text- , _saSubscriptionId :: !Text- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SubscriptionsActivate' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'saCustomerId'------ * 'saSubscriptionId'-subscriptionsActivate- :: Text -- ^ 'saCustomerId'- -> Text -- ^ 'saSubscriptionId'- -> SubscriptionsActivate-subscriptionsActivate pSaCustomerId_ pSaSubscriptionId_ =- SubscriptionsActivate'- {_saCustomerId = pSaCustomerId_, _saSubscriptionId = pSaSubscriptionId_}----- | Either the customer\'s primary domain name or the customer\'s unique--- identifier. If using the domain name, we do not recommend using a--- customerId as a key for persistent data. If the domain name for a--- customerId is changed, the Google system automatically updates.-saCustomerId :: Lens' SubscriptionsActivate Text-saCustomerId- = lens _saCustomerId (\ s a -> s{_saCustomerId = a})---- | This is a required property. The subscriptionId is the subscription--- identifier and is unique for each customer. Since a subscriptionId--- changes when a subscription is updated, we recommend to not use this ID--- as a key for persistent data. And the subscriptionId can be found using--- the retrieve all reseller subscriptions method.-saSubscriptionId :: Lens' SubscriptionsActivate Text-saSubscriptionId- = lens _saSubscriptionId- (\ s a -> s{_saSubscriptionId = a})--instance GoogleRequest SubscriptionsActivate where- type Rs SubscriptionsActivate = Subscription- type Scopes SubscriptionsActivate =- '["https://www.googleapis.com/auth/apps.order"]- requestClient SubscriptionsActivate'{..}- = go _saCustomerId _saSubscriptionId (Just AltJSON)- appsResellerService- where go- = buildClient- (Proxy :: Proxy SubscriptionsActivateResource)- mempty
− gen/Network/Google/Resource/Reseller/Subscriptions/ChangePlan.hs
@@ -1,132 +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.Reseller.Subscriptions.ChangePlan--- 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)------ Update a subscription plan. Use this method to update a plan for a--- 30-day trial or a flexible plan subscription to an annual commitment--- plan with monthly or yearly payments.------ /See:/ <https://developers.google.com/google-apps/reseller/ Enterprise Apps Reseller API Reference> for @reseller.subscriptions.changePlan@.-module Network.Google.Resource.Reseller.Subscriptions.ChangePlan- (- -- * REST Resource- SubscriptionsChangePlanResource-- -- * Creating a Request- , subscriptionsChangePlan- , SubscriptionsChangePlan-- -- * Request Lenses- , scpPayload- , scpCustomerId- , scpSubscriptionId- ) where--import Network.Google.AppsReseller.Types-import Network.Google.Prelude---- | A resource alias for @reseller.subscriptions.changePlan@ method which the--- 'SubscriptionsChangePlan' request conforms to.-type SubscriptionsChangePlanResource =- "apps" :>- "reseller" :>- "v1" :>- "customers" :>- Capture "customerId" Text :>- "subscriptions" :>- Capture "subscriptionId" Text :>- "changePlan" :>- QueryParam "alt" AltJSON :>- ReqBody '[JSON] ChangePlanRequest :>- Post '[JSON] Subscription---- | Update a subscription plan. Use this method to update a plan for a--- 30-day trial or a flexible plan subscription to an annual commitment--- plan with monthly or yearly payments.------ /See:/ 'subscriptionsChangePlan' smart constructor.-data SubscriptionsChangePlan =- SubscriptionsChangePlan'- { _scpPayload :: !ChangePlanRequest- , _scpCustomerId :: !Text- , _scpSubscriptionId :: !Text- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SubscriptionsChangePlan' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'scpPayload'------ * 'scpCustomerId'------ * 'scpSubscriptionId'-subscriptionsChangePlan- :: ChangePlanRequest -- ^ 'scpPayload'- -> Text -- ^ 'scpCustomerId'- -> Text -- ^ 'scpSubscriptionId'- -> SubscriptionsChangePlan-subscriptionsChangePlan pScpPayload_ pScpCustomerId_ pScpSubscriptionId_ =- SubscriptionsChangePlan'- { _scpPayload = pScpPayload_- , _scpCustomerId = pScpCustomerId_- , _scpSubscriptionId = pScpSubscriptionId_- }----- | Multipart request metadata.-scpPayload :: Lens' SubscriptionsChangePlan ChangePlanRequest-scpPayload- = lens _scpPayload (\ s a -> s{_scpPayload = a})---- | Either the customer\'s primary domain name or the customer\'s unique--- identifier. If using the domain name, we do not recommend using a--- customerId as a key for persistent data. If the domain name for a--- customerId is changed, the Google system automatically updates.-scpCustomerId :: Lens' SubscriptionsChangePlan Text-scpCustomerId- = lens _scpCustomerId- (\ s a -> s{_scpCustomerId = a})---- | This is a required property. The subscriptionId is the subscription--- identifier and is unique for each customer. Since a subscriptionId--- changes when a subscription is updated, we recommend to not use this ID--- as a key for persistent data. And the subscriptionId can be found using--- the retrieve all reseller subscriptions method.-scpSubscriptionId :: Lens' SubscriptionsChangePlan Text-scpSubscriptionId- = lens _scpSubscriptionId- (\ s a -> s{_scpSubscriptionId = a})--instance GoogleRequest SubscriptionsChangePlan where- type Rs SubscriptionsChangePlan = Subscription- type Scopes SubscriptionsChangePlan =- '["https://www.googleapis.com/auth/apps.order"]- requestClient SubscriptionsChangePlan'{..}- = go _scpCustomerId _scpSubscriptionId (Just AltJSON)- _scpPayload- appsResellerService- where go- = buildClient- (Proxy :: Proxy SubscriptionsChangePlanResource)- mempty
− gen/Network/Google/Resource/Reseller/Subscriptions/ChangeRenewalSettings.hs
@@ -1,135 +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.Reseller.Subscriptions.ChangeRenewalSettings--- 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)------ Update a user license\'s renewal settings. This is applicable for--- accounts with annual commitment plans only.------ /See:/ <https://developers.google.com/google-apps/reseller/ Enterprise Apps Reseller API Reference> for @reseller.subscriptions.changeRenewalSettings@.-module Network.Google.Resource.Reseller.Subscriptions.ChangeRenewalSettings- (- -- * REST Resource- SubscriptionsChangeRenewalSettingsResource-- -- * Creating a Request- , subscriptionsChangeRenewalSettings- , SubscriptionsChangeRenewalSettings-- -- * Request Lenses- , scrsPayload- , scrsCustomerId- , scrsSubscriptionId- ) where--import Network.Google.AppsReseller.Types-import Network.Google.Prelude---- | A resource alias for @reseller.subscriptions.changeRenewalSettings@ method which the--- 'SubscriptionsChangeRenewalSettings' request conforms to.-type SubscriptionsChangeRenewalSettingsResource =- "apps" :>- "reseller" :>- "v1" :>- "customers" :>- Capture "customerId" Text :>- "subscriptions" :>- Capture "subscriptionId" Text :>- "changeRenewalSettings" :>- QueryParam "alt" AltJSON :>- ReqBody '[JSON] RenewalSettings :>- Post '[JSON] Subscription---- | Update a user license\'s renewal settings. This is applicable for--- accounts with annual commitment plans only.------ /See:/ 'subscriptionsChangeRenewalSettings' smart constructor.-data SubscriptionsChangeRenewalSettings =- SubscriptionsChangeRenewalSettings'- { _scrsPayload :: !RenewalSettings- , _scrsCustomerId :: !Text- , _scrsSubscriptionId :: !Text- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SubscriptionsChangeRenewalSettings' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'scrsPayload'------ * 'scrsCustomerId'------ * 'scrsSubscriptionId'-subscriptionsChangeRenewalSettings- :: RenewalSettings -- ^ 'scrsPayload'- -> Text -- ^ 'scrsCustomerId'- -> Text -- ^ 'scrsSubscriptionId'- -> SubscriptionsChangeRenewalSettings-subscriptionsChangeRenewalSettings pScrsPayload_ pScrsCustomerId_ pScrsSubscriptionId_ =- SubscriptionsChangeRenewalSettings'- { _scrsPayload = pScrsPayload_- , _scrsCustomerId = pScrsCustomerId_- , _scrsSubscriptionId = pScrsSubscriptionId_- }----- | Multipart request metadata.-scrsPayload :: Lens' SubscriptionsChangeRenewalSettings RenewalSettings-scrsPayload- = lens _scrsPayload (\ s a -> s{_scrsPayload = a})---- | Either the customer\'s primary domain name or the customer\'s unique--- identifier. If using the domain name, we do not recommend using a--- customerId as a key for persistent data. If the domain name for a--- customerId is changed, the Google system automatically updates.-scrsCustomerId :: Lens' SubscriptionsChangeRenewalSettings Text-scrsCustomerId- = lens _scrsCustomerId- (\ s a -> s{_scrsCustomerId = a})---- | This is a required property. The subscriptionId is the subscription--- identifier and is unique for each customer. Since a subscriptionId--- changes when a subscription is updated, we recommend to not use this ID--- as a key for persistent data. And the subscriptionId can be found using--- the retrieve all reseller subscriptions method.-scrsSubscriptionId :: Lens' SubscriptionsChangeRenewalSettings Text-scrsSubscriptionId- = lens _scrsSubscriptionId- (\ s a -> s{_scrsSubscriptionId = a})--instance GoogleRequest- SubscriptionsChangeRenewalSettings- where- type Rs SubscriptionsChangeRenewalSettings =- Subscription- type Scopes SubscriptionsChangeRenewalSettings =- '["https://www.googleapis.com/auth/apps.order"]- requestClient SubscriptionsChangeRenewalSettings'{..}- = go _scrsCustomerId _scrsSubscriptionId- (Just AltJSON)- _scrsPayload- appsResellerService- where go- = buildClient- (Proxy ::- Proxy SubscriptionsChangeRenewalSettingsResource)- mempty
− gen/Network/Google/Resource/Reseller/Subscriptions/ChangeSeats.hs
@@ -1,127 +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.Reseller.Subscriptions.ChangeSeats--- 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)------ Update a subscription\'s user license settings.------ /See:/ <https://developers.google.com/google-apps/reseller/ Enterprise Apps Reseller API Reference> for @reseller.subscriptions.changeSeats@.-module Network.Google.Resource.Reseller.Subscriptions.ChangeSeats- (- -- * REST Resource- SubscriptionsChangeSeatsResource-- -- * Creating a Request- , subscriptionsChangeSeats- , SubscriptionsChangeSeats-- -- * Request Lenses- , scsPayload- , scsCustomerId- , scsSubscriptionId- ) where--import Network.Google.AppsReseller.Types-import Network.Google.Prelude---- | A resource alias for @reseller.subscriptions.changeSeats@ method which the--- 'SubscriptionsChangeSeats' request conforms to.-type SubscriptionsChangeSeatsResource =- "apps" :>- "reseller" :>- "v1" :>- "customers" :>- Capture "customerId" Text :>- "subscriptions" :>- Capture "subscriptionId" Text :>- "changeSeats" :>- QueryParam "alt" AltJSON :>- ReqBody '[JSON] Seats :> Post '[JSON] Subscription---- | Update a subscription\'s user license settings.------ /See:/ 'subscriptionsChangeSeats' smart constructor.-data SubscriptionsChangeSeats =- SubscriptionsChangeSeats'- { _scsPayload :: !Seats- , _scsCustomerId :: !Text- , _scsSubscriptionId :: !Text- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SubscriptionsChangeSeats' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'scsPayload'------ * 'scsCustomerId'------ * 'scsSubscriptionId'-subscriptionsChangeSeats- :: Seats -- ^ 'scsPayload'- -> Text -- ^ 'scsCustomerId'- -> Text -- ^ 'scsSubscriptionId'- -> SubscriptionsChangeSeats-subscriptionsChangeSeats pScsPayload_ pScsCustomerId_ pScsSubscriptionId_ =- SubscriptionsChangeSeats'- { _scsPayload = pScsPayload_- , _scsCustomerId = pScsCustomerId_- , _scsSubscriptionId = pScsSubscriptionId_- }----- | Multipart request metadata.-scsPayload :: Lens' SubscriptionsChangeSeats Seats-scsPayload- = lens _scsPayload (\ s a -> s{_scsPayload = a})---- | Either the customer\'s primary domain name or the customer\'s unique--- identifier. If using the domain name, we do not recommend using a--- customerId as a key for persistent data. If the domain name for a--- customerId is changed, the Google system automatically updates.-scsCustomerId :: Lens' SubscriptionsChangeSeats Text-scsCustomerId- = lens _scsCustomerId- (\ s a -> s{_scsCustomerId = a})---- | This is a required property. The subscriptionId is the subscription--- identifier and is unique for each customer. Since a subscriptionId--- changes when a subscription is updated, we recommend to not use this ID--- as a key for persistent data. And the subscriptionId can be found using--- the retrieve all reseller subscriptions method.-scsSubscriptionId :: Lens' SubscriptionsChangeSeats Text-scsSubscriptionId- = lens _scsSubscriptionId- (\ s a -> s{_scsSubscriptionId = a})--instance GoogleRequest SubscriptionsChangeSeats where- type Rs SubscriptionsChangeSeats = Subscription- type Scopes SubscriptionsChangeSeats =- '["https://www.googleapis.com/auth/apps.order"]- requestClient SubscriptionsChangeSeats'{..}- = go _scsCustomerId _scsSubscriptionId (Just AltJSON)- _scsPayload- appsResellerService- where go- = buildClient- (Proxy :: Proxy SubscriptionsChangeSeatsResource)- mempty
− gen/Network/Google/Resource/Reseller/Subscriptions/Delete.hs
@@ -1,129 +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.Reseller.Subscriptions.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)------ Cancel or transfer a subscription to direct.------ /See:/ <https://developers.google.com/google-apps/reseller/ Enterprise Apps Reseller API Reference> for @reseller.subscriptions.delete@.-module Network.Google.Resource.Reseller.Subscriptions.Delete- (- -- * REST Resource- SubscriptionsDeleteResource-- -- * Creating a Request- , subscriptionsDelete- , SubscriptionsDelete-- -- * Request Lenses- , sdCustomerId- , sdDeletionType- , sdSubscriptionId- ) where--import Network.Google.AppsReseller.Types-import Network.Google.Prelude---- | A resource alias for @reseller.subscriptions.delete@ method which the--- 'SubscriptionsDelete' request conforms to.-type SubscriptionsDeleteResource =- "apps" :>- "reseller" :>- "v1" :>- "customers" :>- Capture "customerId" Text :>- "subscriptions" :>- Capture "subscriptionId" Text :>- QueryParam "deletionType"- SubscriptionsDeleteDeletionType- :> QueryParam "alt" AltJSON :> Delete '[JSON] ()---- | Cancel or transfer a subscription to direct.------ /See:/ 'subscriptionsDelete' smart constructor.-data SubscriptionsDelete =- SubscriptionsDelete'- { _sdCustomerId :: !Text- , _sdDeletionType :: !SubscriptionsDeleteDeletionType- , _sdSubscriptionId :: !Text- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SubscriptionsDelete' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sdCustomerId'------ * 'sdDeletionType'------ * 'sdSubscriptionId'-subscriptionsDelete- :: Text -- ^ 'sdCustomerId'- -> SubscriptionsDeleteDeletionType -- ^ 'sdDeletionType'- -> Text -- ^ 'sdSubscriptionId'- -> SubscriptionsDelete-subscriptionsDelete pSdCustomerId_ pSdDeletionType_ pSdSubscriptionId_ =- SubscriptionsDelete'- { _sdCustomerId = pSdCustomerId_- , _sdDeletionType = pSdDeletionType_- , _sdSubscriptionId = pSdSubscriptionId_- }----- | Either the customer\'s primary domain name or the customer\'s unique--- identifier. If using the domain name, we do not recommend using a--- customerId as a key for persistent data. If the domain name for a--- customerId is changed, the Google system automatically updates.-sdCustomerId :: Lens' SubscriptionsDelete Text-sdCustomerId- = lens _sdCustomerId (\ s a -> s{_sdCustomerId = a})---- | The deletionType query string enables the cancellation, downgrade, or--- suspension of a subscription.-sdDeletionType :: Lens' SubscriptionsDelete SubscriptionsDeleteDeletionType-sdDeletionType- = lens _sdDeletionType- (\ s a -> s{_sdDeletionType = a})---- | This is a required property. The subscriptionId is the subscription--- identifier and is unique for each customer. Since a subscriptionId--- changes when a subscription is updated, we recommend to not use this ID--- as a key for persistent data. And the subscriptionId can be found using--- the retrieve all reseller subscriptions method.-sdSubscriptionId :: Lens' SubscriptionsDelete Text-sdSubscriptionId- = lens _sdSubscriptionId- (\ s a -> s{_sdSubscriptionId = a})--instance GoogleRequest SubscriptionsDelete where- type Rs SubscriptionsDelete = ()- type Scopes SubscriptionsDelete =- '["https://www.googleapis.com/auth/apps.order"]- requestClient SubscriptionsDelete'{..}- = go _sdCustomerId _sdSubscriptionId- (Just _sdDeletionType)- (Just AltJSON)- appsResellerService- where go- = buildClient- (Proxy :: Proxy SubscriptionsDeleteResource)- mempty
− gen/Network/Google/Resource/Reseller/Subscriptions/Get.hs
@@ -1,111 +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.Reseller.Subscriptions.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)------ Get a specific subscription.------ /See:/ <https://developers.google.com/google-apps/reseller/ Enterprise Apps Reseller API Reference> for @reseller.subscriptions.get@.-module Network.Google.Resource.Reseller.Subscriptions.Get- (- -- * REST Resource- SubscriptionsGetResource-- -- * Creating a Request- , subscriptionsGet- , SubscriptionsGet-- -- * Request Lenses- , sgCustomerId- , sgSubscriptionId- ) where--import Network.Google.AppsReseller.Types-import Network.Google.Prelude---- | A resource alias for @reseller.subscriptions.get@ method which the--- 'SubscriptionsGet' request conforms to.-type SubscriptionsGetResource =- "apps" :>- "reseller" :>- "v1" :>- "customers" :>- Capture "customerId" Text :>- "subscriptions" :>- Capture "subscriptionId" Text :>- QueryParam "alt" AltJSON :> Get '[JSON] Subscription---- | Get a specific subscription.------ /See:/ 'subscriptionsGet' smart constructor.-data SubscriptionsGet =- SubscriptionsGet'- { _sgCustomerId :: !Text- , _sgSubscriptionId :: !Text- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SubscriptionsGet' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sgCustomerId'------ * 'sgSubscriptionId'-subscriptionsGet- :: Text -- ^ 'sgCustomerId'- -> Text -- ^ 'sgSubscriptionId'- -> SubscriptionsGet-subscriptionsGet pSgCustomerId_ pSgSubscriptionId_ =- SubscriptionsGet'- {_sgCustomerId = pSgCustomerId_, _sgSubscriptionId = pSgSubscriptionId_}----- | Either the customer\'s primary domain name or the customer\'s unique--- identifier. If using the domain name, we do not recommend using a--- customerId as a key for persistent data. If the domain name for a--- customerId is changed, the Google system automatically updates.-sgCustomerId :: Lens' SubscriptionsGet Text-sgCustomerId- = lens _sgCustomerId (\ s a -> s{_sgCustomerId = a})---- | This is a required property. The subscriptionId is the subscription--- identifier and is unique for each customer. Since a subscriptionId--- changes when a subscription is updated, we recommend to not use this ID--- as a key for persistent data. And the subscriptionId can be found using--- the retrieve all reseller subscriptions method.-sgSubscriptionId :: Lens' SubscriptionsGet Text-sgSubscriptionId- = lens _sgSubscriptionId- (\ s a -> s{_sgSubscriptionId = a})--instance GoogleRequest SubscriptionsGet where- type Rs SubscriptionsGet = Subscription- type Scopes SubscriptionsGet =- '["https://www.googleapis.com/auth/apps.order",- "https://www.googleapis.com/auth/apps.order.readonly"]- requestClient SubscriptionsGet'{..}- = go _sgCustomerId _sgSubscriptionId (Just AltJSON)- appsResellerService- where go- = buildClient- (Proxy :: Proxy SubscriptionsGetResource)- mempty
− gen/Network/Google/Resource/Reseller/Subscriptions/Insert.hs
@@ -1,127 +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.Reseller.Subscriptions.Insert--- 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)------ Create or transfer a subscription.------ /See:/ <https://developers.google.com/google-apps/reseller/ Enterprise Apps Reseller API Reference> for @reseller.subscriptions.insert@.-module Network.Google.Resource.Reseller.Subscriptions.Insert- (- -- * REST Resource- SubscriptionsInsertResource-- -- * Creating a Request- , subscriptionsInsert- , SubscriptionsInsert-- -- * Request Lenses- , siPayload- , siCustomerId- , siCustomerAuthToken- ) where--import Network.Google.AppsReseller.Types-import Network.Google.Prelude---- | A resource alias for @reseller.subscriptions.insert@ method which the--- 'SubscriptionsInsert' request conforms to.-type SubscriptionsInsertResource =- "apps" :>- "reseller" :>- "v1" :>- "customers" :>- Capture "customerId" Text :>- "subscriptions" :>- QueryParam "customerAuthToken" Text :>- QueryParam "alt" AltJSON :>- ReqBody '[JSON] Subscription :>- Post '[JSON] Subscription---- | Create or transfer a subscription.------ /See:/ 'subscriptionsInsert' smart constructor.-data SubscriptionsInsert =- SubscriptionsInsert'- { _siPayload :: !Subscription- , _siCustomerId :: !Text- , _siCustomerAuthToken :: !(Maybe Text)- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SubscriptionsInsert' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'siPayload'------ * 'siCustomerId'------ * 'siCustomerAuthToken'-subscriptionsInsert- :: Subscription -- ^ 'siPayload'- -> Text -- ^ 'siCustomerId'- -> SubscriptionsInsert-subscriptionsInsert pSiPayload_ pSiCustomerId_ =- SubscriptionsInsert'- { _siPayload = pSiPayload_- , _siCustomerId = pSiCustomerId_- , _siCustomerAuthToken = Nothing- }----- | Multipart request metadata.-siPayload :: Lens' SubscriptionsInsert Subscription-siPayload- = lens _siPayload (\ s a -> s{_siPayload = a})---- | Either the customer\'s primary domain name or the customer\'s unique--- identifier. If using the domain name, we do not recommend using a--- customerId as a key for persistent data. If the domain name for a--- customerId is changed, the Google system automatically updates.-siCustomerId :: Lens' SubscriptionsInsert Text-siCustomerId- = lens _siCustomerId (\ s a -> s{_siCustomerId = a})---- | The customerAuthToken query string is required when creating a resold--- account that transfers a direct customer\'s subscription or transfers--- another reseller customer\'s subscription to your reseller management.--- This is a hexadecimal authentication token needed to complete the--- subscription transfer. For more information, see the administrator help--- center.-siCustomerAuthToken :: Lens' SubscriptionsInsert (Maybe Text)-siCustomerAuthToken- = lens _siCustomerAuthToken- (\ s a -> s{_siCustomerAuthToken = a})--instance GoogleRequest SubscriptionsInsert where- type Rs SubscriptionsInsert = Subscription- type Scopes SubscriptionsInsert =- '["https://www.googleapis.com/auth/apps.order"]- requestClient SubscriptionsInsert'{..}- = go _siCustomerId _siCustomerAuthToken- (Just AltJSON)- _siPayload- appsResellerService- where go- = buildClient- (Proxy :: Proxy SubscriptionsInsertResource)- mempty
− gen/Network/Google/Resource/Reseller/Subscriptions/List.hs
@@ -1,162 +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.Reseller.Subscriptions.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)------ List of subscriptions managed by the reseller. The list can be all--- subscriptions, all of a customer\'s subscriptions, or all of a--- customer\'s transferable subscriptions.------ /See:/ <https://developers.google.com/google-apps/reseller/ Enterprise Apps Reseller API Reference> for @reseller.subscriptions.list@.-module Network.Google.Resource.Reseller.Subscriptions.List- (- -- * REST Resource- SubscriptionsListResource-- -- * Creating a Request- , subscriptionsList- , SubscriptionsList-- -- * Request Lenses- , slCustomerNamePrefix- , slCustomerId- , slCustomerAuthToken- , slPageToken- , slMaxResults- ) where--import Network.Google.AppsReseller.Types-import Network.Google.Prelude---- | A resource alias for @reseller.subscriptions.list@ method which the--- 'SubscriptionsList' request conforms to.-type SubscriptionsListResource =- "apps" :>- "reseller" :>- "v1" :>- "subscriptions" :>- QueryParam "customerNamePrefix" Text :>- QueryParam "customerId" Text :>- QueryParam "customerAuthToken" Text :>- QueryParam "pageToken" Text :>- QueryParam "maxResults" (Textual Word32) :>- QueryParam "alt" AltJSON :> Get '[JSON] Subscriptions---- | List of subscriptions managed by the reseller. The list can be all--- subscriptions, all of a customer\'s subscriptions, or all of a--- customer\'s transferable subscriptions.------ /See:/ 'subscriptionsList' smart constructor.-data SubscriptionsList =- SubscriptionsList'- { _slCustomerNamePrefix :: !(Maybe Text)- , _slCustomerId :: !(Maybe Text)- , _slCustomerAuthToken :: !(Maybe Text)- , _slPageToken :: !(Maybe Text)- , _slMaxResults :: !(Maybe (Textual Word32))- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SubscriptionsList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'slCustomerNamePrefix'------ * 'slCustomerId'------ * 'slCustomerAuthToken'------ * 'slPageToken'------ * 'slMaxResults'-subscriptionsList- :: SubscriptionsList-subscriptionsList =- SubscriptionsList'- { _slCustomerNamePrefix = Nothing- , _slCustomerId = Nothing- , _slCustomerAuthToken = Nothing- , _slPageToken = Nothing- , _slMaxResults = Nothing- }----- | When retrieving all of your subscriptions and filtering for specific--- customers, you can enter a prefix for a customer name. Using an example--- customer group that includes exam.com, example20.com and example.com: ---- exa -- Returns all customer names that start with \'exa\' which could--- include exam.com, example20.com, and example.com. A name prefix is--- similar to using a regular expression\'s asterisk, exa*. - example ----- Returns example20.com and example.com.-slCustomerNamePrefix :: Lens' SubscriptionsList (Maybe Text)-slCustomerNamePrefix- = lens _slCustomerNamePrefix- (\ s a -> s{_slCustomerNamePrefix = a})---- | Either the customer\'s primary domain name or the customer\'s unique--- identifier. If using the domain name, we do not recommend using a--- customerId as a key for persistent data. If the domain name for a--- customerId is changed, the Google system automatically updates.-slCustomerId :: Lens' SubscriptionsList (Maybe Text)-slCustomerId- = lens _slCustomerId (\ s a -> s{_slCustomerId = a})---- | The customerAuthToken query string is required when creating a resold--- account that transfers a direct customer\'s subscription or transfers--- another reseller customer\'s subscription to your reseller management.--- This is a hexadecimal authentication token needed to complete the--- subscription transfer. For more information, see the administrator help--- center.-slCustomerAuthToken :: Lens' SubscriptionsList (Maybe Text)-slCustomerAuthToken- = lens _slCustomerAuthToken- (\ s a -> s{_slCustomerAuthToken = a})---- | Token to specify next page in the list-slPageToken :: Lens' SubscriptionsList (Maybe Text)-slPageToken- = lens _slPageToken (\ s a -> s{_slPageToken = a})---- | When retrieving a large list, the maxResults is the maximum number of--- results per page. The nextPageToken value takes you to the next page.--- The default is 20.-slMaxResults :: Lens' SubscriptionsList (Maybe Word32)-slMaxResults- = lens _slMaxResults (\ s a -> s{_slMaxResults = a})- . mapping _Coerce--instance GoogleRequest SubscriptionsList where- type Rs SubscriptionsList = Subscriptions- type Scopes SubscriptionsList =- '["https://www.googleapis.com/auth/apps.order",- "https://www.googleapis.com/auth/apps.order.readonly"]- requestClient SubscriptionsList'{..}- = go _slCustomerNamePrefix _slCustomerId- _slCustomerAuthToken- _slPageToken- _slMaxResults- (Just AltJSON)- appsResellerService- where go- = buildClient- (Proxy :: Proxy SubscriptionsListResource)- mempty
− gen/Network/Google/Resource/Reseller/Subscriptions/StartPaidService.hs
@@ -1,119 +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.Reseller.Subscriptions.StartPaidService--- 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)------ Immediately move a 30-day free trial subscription to a paid service--- subscription.------ /See:/ <https://developers.google.com/google-apps/reseller/ Enterprise Apps Reseller API Reference> for @reseller.subscriptions.startPaidService@.-module Network.Google.Resource.Reseller.Subscriptions.StartPaidService- (- -- * REST Resource- SubscriptionsStartPaidServiceResource-- -- * Creating a Request- , subscriptionsStartPaidService- , SubscriptionsStartPaidService-- -- * Request Lenses- , sspsCustomerId- , sspsSubscriptionId- ) where--import Network.Google.AppsReseller.Types-import Network.Google.Prelude---- | A resource alias for @reseller.subscriptions.startPaidService@ method which the--- 'SubscriptionsStartPaidService' request conforms to.-type SubscriptionsStartPaidServiceResource =- "apps" :>- "reseller" :>- "v1" :>- "customers" :>- Capture "customerId" Text :>- "subscriptions" :>- Capture "subscriptionId" Text :>- "startPaidService" :>- QueryParam "alt" AltJSON :> Post '[JSON] Subscription---- | Immediately move a 30-day free trial subscription to a paid service--- subscription.------ /See:/ 'subscriptionsStartPaidService' smart constructor.-data SubscriptionsStartPaidService =- SubscriptionsStartPaidService'- { _sspsCustomerId :: !Text- , _sspsSubscriptionId :: !Text- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SubscriptionsStartPaidService' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sspsCustomerId'------ * 'sspsSubscriptionId'-subscriptionsStartPaidService- :: Text -- ^ 'sspsCustomerId'- -> Text -- ^ 'sspsSubscriptionId'- -> SubscriptionsStartPaidService-subscriptionsStartPaidService pSspsCustomerId_ pSspsSubscriptionId_ =- SubscriptionsStartPaidService'- { _sspsCustomerId = pSspsCustomerId_- , _sspsSubscriptionId = pSspsSubscriptionId_- }----- | Either the customer\'s primary domain name or the customer\'s unique--- identifier. If using the domain name, we do not recommend using a--- customerId as a key for persistent data. If the domain name for a--- customerId is changed, the Google system automatically updates.-sspsCustomerId :: Lens' SubscriptionsStartPaidService Text-sspsCustomerId- = lens _sspsCustomerId- (\ s a -> s{_sspsCustomerId = a})---- | This is a required property. The subscriptionId is the subscription--- identifier and is unique for each customer. Since a subscriptionId--- changes when a subscription is updated, we recommend to not use this ID--- as a key for persistent data. And the subscriptionId can be found using--- the retrieve all reseller subscriptions method.-sspsSubscriptionId :: Lens' SubscriptionsStartPaidService Text-sspsSubscriptionId- = lens _sspsSubscriptionId- (\ s a -> s{_sspsSubscriptionId = a})--instance GoogleRequest SubscriptionsStartPaidService- where- type Rs SubscriptionsStartPaidService = Subscription- type Scopes SubscriptionsStartPaidService =- '["https://www.googleapis.com/auth/apps.order"]- requestClient SubscriptionsStartPaidService'{..}- = go _sspsCustomerId _sspsSubscriptionId- (Just AltJSON)- appsResellerService- where go- = buildClient- (Proxy ::- Proxy SubscriptionsStartPaidServiceResource)- mempty
− gen/Network/Google/Resource/Reseller/Subscriptions/Suspend.hs
@@ -1,111 +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.Reseller.Subscriptions.Suspend--- 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)------ Suspends an active subscription.------ /See:/ <https://developers.google.com/google-apps/reseller/ Enterprise Apps Reseller API Reference> for @reseller.subscriptions.suspend@.-module Network.Google.Resource.Reseller.Subscriptions.Suspend- (- -- * REST Resource- SubscriptionsSuspendResource-- -- * Creating a Request- , subscriptionsSuspend- , SubscriptionsSuspend-- -- * Request Lenses- , ssCustomerId- , ssSubscriptionId- ) where--import Network.Google.AppsReseller.Types-import Network.Google.Prelude---- | A resource alias for @reseller.subscriptions.suspend@ method which the--- 'SubscriptionsSuspend' request conforms to.-type SubscriptionsSuspendResource =- "apps" :>- "reseller" :>- "v1" :>- "customers" :>- Capture "customerId" Text :>- "subscriptions" :>- Capture "subscriptionId" Text :>- "suspend" :>- QueryParam "alt" AltJSON :> Post '[JSON] Subscription---- | Suspends an active subscription.------ /See:/ 'subscriptionsSuspend' smart constructor.-data SubscriptionsSuspend =- SubscriptionsSuspend'- { _ssCustomerId :: !Text- , _ssSubscriptionId :: !Text- }- deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SubscriptionsSuspend' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ssCustomerId'------ * 'ssSubscriptionId'-subscriptionsSuspend- :: Text -- ^ 'ssCustomerId'- -> Text -- ^ 'ssSubscriptionId'- -> SubscriptionsSuspend-subscriptionsSuspend pSsCustomerId_ pSsSubscriptionId_ =- SubscriptionsSuspend'- {_ssCustomerId = pSsCustomerId_, _ssSubscriptionId = pSsSubscriptionId_}----- | Either the customer\'s primary domain name or the customer\'s unique--- identifier. If using the domain name, we do not recommend using a--- customerId as a key for persistent data. If the domain name for a--- customerId is changed, the Google system automatically updates.-ssCustomerId :: Lens' SubscriptionsSuspend Text-ssCustomerId- = lens _ssCustomerId (\ s a -> s{_ssCustomerId = a})---- | This is a required property. The subscriptionId is the subscription--- identifier and is unique for each customer. Since a subscriptionId--- changes when a subscription is updated, we recommend to not use this ID--- as a key for persistent data. And the subscriptionId can be found using--- the retrieve all reseller subscriptions method.-ssSubscriptionId :: Lens' SubscriptionsSuspend Text-ssSubscriptionId- = lens _ssSubscriptionId- (\ s a -> s{_ssSubscriptionId = a})--instance GoogleRequest SubscriptionsSuspend where- type Rs SubscriptionsSuspend = Subscription- type Scopes SubscriptionsSuspend =- '["https://www.googleapis.com/auth/apps.order"]- requestClient SubscriptionsSuspend'{..}- = go _ssCustomerId _ssSubscriptionId (Just AltJSON)- appsResellerService- where go- = buildClient- (Proxy :: Proxy SubscriptionsSuspendResource)- mempty
gogol-apps-reseller.cabal view
@@ -1,66 +1,77 @@-name: gogol-apps-reseller-version: 0.5.0-synopsis: Google Enterprise Apps Reseller 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-apps-reseller+version: 1.0.0+synopsis: Google Workspace Reseller 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:- Creates and manages your customers and their subscriptions.- .- /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.- .- Labels:- .- * Limited Availability+ Perform common functions that are available on the Channel Services console at scale, like placing orders and viewing customer information+ .+ /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-apps-reseller +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.AppsReseller- , Network.Google.AppsReseller.Types- , Network.Google.Resource.Reseller.Customers.Get- , Network.Google.Resource.Reseller.Customers.Insert- , Network.Google.Resource.Reseller.Customers.Patch- , Network.Google.Resource.Reseller.Customers.Update- , Network.Google.Resource.Reseller.Resellernotify.Getwatchdetails- , Network.Google.Resource.Reseller.Resellernotify.Register- , Network.Google.Resource.Reseller.Resellernotify.Unregister- , Network.Google.Resource.Reseller.Subscriptions.Activate- , Network.Google.Resource.Reseller.Subscriptions.ChangePlan- , Network.Google.Resource.Reseller.Subscriptions.ChangeRenewalSettings- , Network.Google.Resource.Reseller.Subscriptions.ChangeSeats- , Network.Google.Resource.Reseller.Subscriptions.Delete- , Network.Google.Resource.Reseller.Subscriptions.Get- , Network.Google.Resource.Reseller.Subscriptions.Insert- , Network.Google.Resource.Reseller.Subscriptions.List- , Network.Google.Resource.Reseller.Subscriptions.StartPaidService- , Network.Google.Resource.Reseller.Subscriptions.Suspend+ exposed-modules:+ Gogol.AppsReseller+ Gogol.AppsReseller.Reseller.Customers.Get+ Gogol.AppsReseller.Reseller.Customers.Insert+ Gogol.AppsReseller.Reseller.Customers.Patch+ Gogol.AppsReseller.Reseller.Customers.Update+ Gogol.AppsReseller.Reseller.Resellernotify.Getwatchdetails+ Gogol.AppsReseller.Reseller.Resellernotify.Register+ Gogol.AppsReseller.Reseller.Resellernotify.Unregister+ Gogol.AppsReseller.Reseller.Subscriptions.Activate+ Gogol.AppsReseller.Reseller.Subscriptions.ChangePlan+ Gogol.AppsReseller.Reseller.Subscriptions.ChangeRenewalSettings+ Gogol.AppsReseller.Reseller.Subscriptions.ChangeSeats+ Gogol.AppsReseller.Reseller.Subscriptions.Delete+ Gogol.AppsReseller.Reseller.Subscriptions.Get+ Gogol.AppsReseller.Reseller.Subscriptions.Insert+ Gogol.AppsReseller.Reseller.Subscriptions.List+ Gogol.AppsReseller.Reseller.Subscriptions.StartPaidService+ Gogol.AppsReseller.Reseller.Subscriptions.Suspend+ Gogol.AppsReseller.Types - other-modules:- Network.Google.AppsReseller.Types.Product- , Network.Google.AppsReseller.Types.Sum+ other-modules:+ Gogol.AppsReseller.Internal.Product+ Gogol.AppsReseller.Internal.Sum - build-depends:- gogol-core == 0.5.0.*- , base >= 4.7 && < 5+ build-depends: gogol-core ^>=1.0.0