packages feed

gogol-adexchange-buyer 0.5.0 → 1.0.0

raw patch · 87 files changed

+9662/−13368 lines, 87 filesdep −basedep ~gogol-coresetup-changed

Dependencies removed: base

Dependency ranges changed: gogol-core

Files

README.md view
@@ -8,7 +8,7 @@  ## Version -`0.5.0`+`1.0.0`   ## Description
Setup.hs view
@@ -1,2 +1,3 @@-import           Distribution.Simple+import Distribution.Simple+ main = defaultMain
+ gen/Gogol/AdExchangeBuyer.hs view
@@ -0,0 +1,611 @@+{-# 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.AdExchangeBuyer+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Accesses your bidding-account information, submits creatives for validation, finds available direct deals, and retrieves performance reports.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference>+module Gogol.AdExchangeBuyer+  ( -- * Configuration+    adExchangeBuyerService,++    -- * OAuth Scopes+    Adexchange'Buyer,++    -- * Resources++    -- ** adexchangebuyer.accounts.get+    AdExchangeBuyerAccountsGetResource,+    AdExchangeBuyerAccountsGet (..),+    newAdExchangeBuyerAccountsGet,++    -- ** adexchangebuyer.accounts.list+    AdExchangeBuyerAccountsListResource,+    AdExchangeBuyerAccountsList (..),+    newAdExchangeBuyerAccountsList,++    -- ** adexchangebuyer.accounts.patch+    AdExchangeBuyerAccountsPatchResource,+    AdExchangeBuyerAccountsPatch (..),+    newAdExchangeBuyerAccountsPatch,++    -- ** adexchangebuyer.accounts.update+    AdExchangeBuyerAccountsUpdateResource,+    AdExchangeBuyerAccountsUpdate (..),+    newAdExchangeBuyerAccountsUpdate,++    -- ** adexchangebuyer.billingInfo.get+    AdExchangeBuyerBillingInfoGetResource,+    AdExchangeBuyerBillingInfoGet (..),+    newAdExchangeBuyerBillingInfoGet,++    -- ** adexchangebuyer.billingInfo.list+    AdExchangeBuyerBillingInfoListResource,+    AdExchangeBuyerBillingInfoList (..),+    newAdExchangeBuyerBillingInfoList,++    -- ** adexchangebuyer.budget.get+    AdExchangeBuyerBudgetGetResource,+    AdExchangeBuyerBudgetGet (..),+    newAdExchangeBuyerBudgetGet,++    -- ** adexchangebuyer.budget.patch+    AdExchangeBuyerBudgetPatchResource,+    AdExchangeBuyerBudgetPatch (..),+    newAdExchangeBuyerBudgetPatch,++    -- ** adexchangebuyer.budget.update+    AdExchangeBuyerBudgetUpdateResource,+    AdExchangeBuyerBudgetUpdate (..),+    newAdExchangeBuyerBudgetUpdate,++    -- ** adexchangebuyer.creatives.addDeal+    AdExchangeBuyerCreativesAddDealResource,+    AdExchangeBuyerCreativesAddDeal (..),+    newAdExchangeBuyerCreativesAddDeal,++    -- ** adexchangebuyer.creatives.get+    AdExchangeBuyerCreativesGetResource,+    AdExchangeBuyerCreativesGet (..),+    newAdExchangeBuyerCreativesGet,++    -- ** adexchangebuyer.creatives.insert+    AdExchangeBuyerCreativesInsertResource,+    AdExchangeBuyerCreativesInsert (..),+    newAdExchangeBuyerCreativesInsert,++    -- ** adexchangebuyer.creatives.list+    AdExchangeBuyerCreativesListResource,+    AdExchangeBuyerCreativesList (..),+    newAdExchangeBuyerCreativesList,++    -- ** adexchangebuyer.creatives.listDeals+    AdExchangeBuyerCreativesListDealsResource,+    AdExchangeBuyerCreativesListDeals (..),+    newAdExchangeBuyerCreativesListDeals,++    -- ** adexchangebuyer.creatives.removeDeal+    AdExchangeBuyerCreativesRemoveDealResource,+    AdExchangeBuyerCreativesRemoveDeal (..),+    newAdExchangeBuyerCreativesRemoveDeal,++    -- ** adexchangebuyer.marketplacedeals.delete+    AdExchangeBuyerMarketplacedealsDeleteResource,+    AdExchangeBuyerMarketplacedealsDelete (..),+    newAdExchangeBuyerMarketplacedealsDelete,++    -- ** adexchangebuyer.marketplacedeals.insert+    AdExchangeBuyerMarketplacedealsInsertResource,+    AdExchangeBuyerMarketplacedealsInsert (..),+    newAdExchangeBuyerMarketplacedealsInsert,++    -- ** adexchangebuyer.marketplacedeals.list+    AdExchangeBuyerMarketplacedealsListResource,+    AdExchangeBuyerMarketplacedealsList (..),+    newAdExchangeBuyerMarketplacedealsList,++    -- ** adexchangebuyer.marketplacedeals.update+    AdExchangeBuyerMarketplacedealsUpdateResource,+    AdExchangeBuyerMarketplacedealsUpdate (..),+    newAdExchangeBuyerMarketplacedealsUpdate,++    -- ** adexchangebuyer.marketplacenotes.insert+    AdExchangeBuyerMarketplacenotesInsertResource,+    AdExchangeBuyerMarketplacenotesInsert (..),+    newAdExchangeBuyerMarketplacenotesInsert,++    -- ** adexchangebuyer.marketplacenotes.list+    AdExchangeBuyerMarketplacenotesListResource,+    AdExchangeBuyerMarketplacenotesList (..),+    newAdExchangeBuyerMarketplacenotesList,++    -- ** adexchangebuyer.marketplaceprivateauction.updateproposal+    AdExchangeBuyerMarketplaceprivateauctionUpdateproposalResource,+    AdExchangeBuyerMarketplaceprivateauctionUpdateproposal (..),+    newAdExchangeBuyerMarketplaceprivateauctionUpdateproposal,++    -- ** adexchangebuyer.performanceReport.list+    AdExchangeBuyerPerformanceReportListResource,+    AdExchangeBuyerPerformanceReportList (..),+    newAdExchangeBuyerPerformanceReportList,++    -- ** adexchangebuyer.pretargetingConfig.delete+    AdExchangeBuyerPretargetingConfigDeleteResource,+    AdExchangeBuyerPretargetingConfigDelete (..),+    newAdExchangeBuyerPretargetingConfigDelete,++    -- ** adexchangebuyer.pretargetingConfig.get+    AdExchangeBuyerPretargetingConfigGetResource,+    AdExchangeBuyerPretargetingConfigGet (..),+    newAdExchangeBuyerPretargetingConfigGet,++    -- ** adexchangebuyer.pretargetingConfig.insert+    AdExchangeBuyerPretargetingConfigInsertResource,+    AdExchangeBuyerPretargetingConfigInsert (..),+    newAdExchangeBuyerPretargetingConfigInsert,++    -- ** adexchangebuyer.pretargetingConfig.list+    AdExchangeBuyerPretargetingConfigListResource,+    AdExchangeBuyerPretargetingConfigList (..),+    newAdExchangeBuyerPretargetingConfigList,++    -- ** adexchangebuyer.pretargetingConfig.patch+    AdExchangeBuyerPretargetingConfigPatchResource,+    AdExchangeBuyerPretargetingConfigPatch (..),+    newAdExchangeBuyerPretargetingConfigPatch,++    -- ** adexchangebuyer.pretargetingConfig.update+    AdExchangeBuyerPretargetingConfigUpdateResource,+    AdExchangeBuyerPretargetingConfigUpdate (..),+    newAdExchangeBuyerPretargetingConfigUpdate,++    -- ** adexchangebuyer.products.get+    AdExchangeBuyerProductsGetResource,+    AdExchangeBuyerProductsGet (..),+    newAdExchangeBuyerProductsGet,++    -- ** adexchangebuyer.products.search+    AdExchangeBuyerProductsSearchResource,+    AdExchangeBuyerProductsSearch (..),+    newAdExchangeBuyerProductsSearch,++    -- ** adexchangebuyer.proposals.get+    AdExchangeBuyerProposalsGetResource,+    AdExchangeBuyerProposalsGet (..),+    newAdExchangeBuyerProposalsGet,++    -- ** adexchangebuyer.proposals.insert+    AdExchangeBuyerProposalsInsertResource,+    AdExchangeBuyerProposalsInsert (..),+    newAdExchangeBuyerProposalsInsert,++    -- ** adexchangebuyer.proposals.patch+    AdExchangeBuyerProposalsPatchResource,+    AdExchangeBuyerProposalsPatch (..),+    newAdExchangeBuyerProposalsPatch,++    -- ** adexchangebuyer.proposals.search+    AdExchangeBuyerProposalsSearchResource,+    AdExchangeBuyerProposalsSearch (..),+    newAdExchangeBuyerProposalsSearch,++    -- ** adexchangebuyer.proposals.setupcomplete+    AdExchangeBuyerProposalsSetupcompleteResource,+    AdExchangeBuyerProposalsSetupcomplete (..),+    newAdExchangeBuyerProposalsSetupcomplete,++    -- ** adexchangebuyer.proposals.update+    AdExchangeBuyerProposalsUpdateResource,+    AdExchangeBuyerProposalsUpdate (..),+    newAdExchangeBuyerProposalsUpdate,++    -- ** adexchangebuyer.pubprofiles.list+    AdExchangeBuyerPubprofilesListResource,+    AdExchangeBuyerPubprofilesList (..),+    newAdExchangeBuyerPubprofilesList,++    -- * Types++    -- ** Account+    Account (..),+    newAccount,++    -- ** Account_BidderLocationItem+    Account_BidderLocationItem (..),+    newAccount_BidderLocationItem,++    -- ** AccountsList+    AccountsList (..),+    newAccountsList,++    -- ** AddOrderDealsRequest+    AddOrderDealsRequest (..),+    newAddOrderDealsRequest,++    -- ** AddOrderDealsResponse+    AddOrderDealsResponse (..),+    newAddOrderDealsResponse,++    -- ** AddOrderNotesRequest+    AddOrderNotesRequest (..),+    newAddOrderNotesRequest,++    -- ** AddOrderNotesResponse+    AddOrderNotesResponse (..),+    newAddOrderNotesResponse,++    -- ** BillingInfo+    BillingInfo (..),+    newBillingInfo,++    -- ** BillingInfoList+    BillingInfoList (..),+    newBillingInfoList,++    -- ** Budget+    Budget (..),+    newBudget,++    -- ** Buyer+    Buyer (..),+    newBuyer,++    -- ** ContactInformation+    ContactInformation (..),+    newContactInformation,++    -- ** CreateOrdersRequest+    CreateOrdersRequest (..),+    newCreateOrdersRequest,++    -- ** CreateOrdersResponse+    CreateOrdersResponse (..),+    newCreateOrdersResponse,++    -- ** Creative+    Creative (..),+    newCreative,++    -- ** Creative_AdTechnologyProviders+    Creative_AdTechnologyProviders (..),+    newCreative_AdTechnologyProviders,++    -- ** Creative_CorrectionsItem+    Creative_CorrectionsItem (..),+    newCreative_CorrectionsItem,++    -- ** Creative_CorrectionsItem_ContextsItem+    Creative_CorrectionsItem_ContextsItem (..),+    newCreative_CorrectionsItem_ContextsItem,++    -- ** Creative_FilteringReasons+    Creative_FilteringReasons (..),+    newCreative_FilteringReasons,++    -- ** Creative_FilteringReasons_ReasonsItem+    Creative_FilteringReasons_ReasonsItem (..),+    newCreative_FilteringReasons_ReasonsItem,++    -- ** Creative_NativeAd+    Creative_NativeAd (..),+    newCreative_NativeAd,++    -- ** Creative_NativeAd_AppIcon+    Creative_NativeAd_AppIcon (..),+    newCreative_NativeAd_AppIcon,++    -- ** Creative_NativeAd_Image+    Creative_NativeAd_Image (..),+    newCreative_NativeAd_Image,++    -- ** Creative_NativeAd_Logo+    Creative_NativeAd_Logo (..),+    newCreative_NativeAd_Logo,++    -- ** Creative_ServingRestrictionsItem+    Creative_ServingRestrictionsItem (..),+    newCreative_ServingRestrictionsItem,++    -- ** Creative_ServingRestrictionsItem_ContextsItem+    Creative_ServingRestrictionsItem_ContextsItem (..),+    newCreative_ServingRestrictionsItem_ContextsItem,++    -- ** Creative_ServingRestrictionsItem_DisapprovalReasonsItem+    Creative_ServingRestrictionsItem_DisapprovalReasonsItem (..),+    newCreative_ServingRestrictionsItem_DisapprovalReasonsItem,++    -- ** CreativeDealIds+    CreativeDealIds (..),+    newCreativeDealIds,++    -- ** CreativeDealIds_DealStatusesItem+    CreativeDealIds_DealStatusesItem (..),+    newCreativeDealIds_DealStatusesItem,++    -- ** CreativesList+    CreativesList (..),+    newCreativesList,++    -- ** DealServingMetadata+    DealServingMetadata (..),+    newDealServingMetadata,++    -- ** DealServingMetadataDealPauseStatus+    DealServingMetadataDealPauseStatus (..),+    newDealServingMetadataDealPauseStatus,++    -- ** DealTerms+    DealTerms (..),+    newDealTerms,++    -- ** DealTermsGuaranteedFixedPriceTerms+    DealTermsGuaranteedFixedPriceTerms (..),+    newDealTermsGuaranteedFixedPriceTerms,++    -- ** DealTermsGuaranteedFixedPriceTermsBillingInfo+    DealTermsGuaranteedFixedPriceTermsBillingInfo (..),+    newDealTermsGuaranteedFixedPriceTermsBillingInfo,++    -- ** DealTermsNonGuaranteedAuctionTerms+    DealTermsNonGuaranteedAuctionTerms (..),+    newDealTermsNonGuaranteedAuctionTerms,++    -- ** DealTermsNonGuaranteedFixedPriceTerms+    DealTermsNonGuaranteedFixedPriceTerms (..),+    newDealTermsNonGuaranteedFixedPriceTerms,++    -- ** DealTermsRubiconNonGuaranteedTerms+    DealTermsRubiconNonGuaranteedTerms (..),+    newDealTermsRubiconNonGuaranteedTerms,++    -- ** DeleteOrderDealsRequest+    DeleteOrderDealsRequest (..),+    newDeleteOrderDealsRequest,++    -- ** DeleteOrderDealsResponse+    DeleteOrderDealsResponse (..),+    newDeleteOrderDealsResponse,++    -- ** DeliveryControl+    DeliveryControl (..),+    newDeliveryControl,++    -- ** DeliveryControlFrequencyCap+    DeliveryControlFrequencyCap (..),+    newDeliveryControlFrequencyCap,++    -- ** Dimension+    Dimension (..),+    newDimension,++    -- ** DimensionDimensionValue+    DimensionDimensionValue (..),+    newDimensionDimensionValue,++    -- ** EditAllOrderDealsRequest+    EditAllOrderDealsRequest (..),+    newEditAllOrderDealsRequest,++    -- ** EditAllOrderDealsResponse+    EditAllOrderDealsResponse (..),+    newEditAllOrderDealsResponse,++    -- ** GetOffersResponse+    GetOffersResponse (..),+    newGetOffersResponse,++    -- ** GetOrderDealsResponse+    GetOrderDealsResponse (..),+    newGetOrderDealsResponse,++    -- ** GetOrderNotesResponse+    GetOrderNotesResponse (..),+    newGetOrderNotesResponse,++    -- ** GetOrdersResponse+    GetOrdersResponse (..),+    newGetOrdersResponse,++    -- ** GetPublisherProfilesByAccountIdResponse+    GetPublisherProfilesByAccountIdResponse (..),+    newGetPublisherProfilesByAccountIdResponse,++    -- ** MarketplaceDeal+    MarketplaceDeal (..),+    newMarketplaceDeal,++    -- ** MarketplaceDealParty+    MarketplaceDealParty (..),+    newMarketplaceDealParty,++    -- ** MarketplaceLabel+    MarketplaceLabel (..),+    newMarketplaceLabel,++    -- ** MarketplaceNote+    MarketplaceNote (..),+    newMarketplaceNote,++    -- ** MobileApplication+    MobileApplication (..),+    newMobileApplication,++    -- ** PerformanceReport+    PerformanceReport (..),+    newPerformanceReport,++    -- ** PerformanceReportList+    PerformanceReportList (..),+    newPerformanceReportList,++    -- ** PretargetingConfig+    PretargetingConfig (..),+    newPretargetingConfig,++    -- ** PretargetingConfig_DimensionsItem+    PretargetingConfig_DimensionsItem (..),+    newPretargetingConfig_DimensionsItem,++    -- ** PretargetingConfig_ExcludedPlacementsItem+    PretargetingConfig_ExcludedPlacementsItem (..),+    newPretargetingConfig_ExcludedPlacementsItem,++    -- ** PretargetingConfig_PlacementsItem+    PretargetingConfig_PlacementsItem (..),+    newPretargetingConfig_PlacementsItem,++    -- ** PretargetingConfig_VideoPlayerSizesItem+    PretargetingConfig_VideoPlayerSizesItem (..),+    newPretargetingConfig_VideoPlayerSizesItem,++    -- ** PretargetingConfigList+    PretargetingConfigList (..),+    newPretargetingConfigList,++    -- ** Price+    Price (..),+    newPrice,++    -- ** PricePerBuyer+    PricePerBuyer (..),+    newPricePerBuyer,++    -- ** PrivateData+    PrivateData (..),+    newPrivateData,++    -- ** Product+    Product (..),+    newProduct,++    -- ** Proposal+    Proposal (..),+    newProposal,++    -- ** PublisherProfileApiProto+    PublisherProfileApiProto (..),+    newPublisherProfileApiProto,++    -- ** PublisherProvidedForecast+    PublisherProvidedForecast (..),+    newPublisherProvidedForecast,++    -- ** Seller+    Seller (..),+    newSeller,++    -- ** SharedTargeting+    SharedTargeting (..),+    newSharedTargeting,++    -- ** TargetingValue+    TargetingValue (..),+    newTargetingValue,++    -- ** TargetingValueCreativeSize+    TargetingValueCreativeSize (..),+    newTargetingValueCreativeSize,++    -- ** TargetingValueDayPartTargeting+    TargetingValueDayPartTargeting (..),+    newTargetingValueDayPartTargeting,++    -- ** TargetingValueDayPartTargetingDayPart+    TargetingValueDayPartTargetingDayPart (..),+    newTargetingValueDayPartTargetingDayPart,++    -- ** TargetingValueDemogAgeCriteria+    TargetingValueDemogAgeCriteria (..),+    newTargetingValueDemogAgeCriteria,++    -- ** TargetingValueDemogGenderCriteria+    TargetingValueDemogGenderCriteria (..),+    newTargetingValueDemogGenderCriteria,++    -- ** TargetingValueRequestPlatformTargeting+    TargetingValueRequestPlatformTargeting (..),+    newTargetingValueRequestPlatformTargeting,++    -- ** TargetingValueSize+    TargetingValueSize (..),+    newTargetingValueSize,++    -- ** UpdatePrivateAuctionProposalRequest+    UpdatePrivateAuctionProposalRequest (..),+    newUpdatePrivateAuctionProposalRequest,++    -- ** CreativesListDealsStatusFilter+    CreativesListDealsStatusFilter (..),++    -- ** CreativesListOpenAuctionStatusFilter+    CreativesListOpenAuctionStatusFilter (..),++    -- ** ProposalsPatchUpdateAction+    ProposalsPatchUpdateAction (..),++    -- ** ProposalsUpdateUpdateAction+    ProposalsUpdateUpdateAction (..),+  )+where++import Gogol.AdExchangeBuyer.Accounts.Get+import Gogol.AdExchangeBuyer.Accounts.List+import Gogol.AdExchangeBuyer.Accounts.Patch+import Gogol.AdExchangeBuyer.Accounts.Update+import Gogol.AdExchangeBuyer.BillingInfo.Get+import Gogol.AdExchangeBuyer.BillingInfo.List+import Gogol.AdExchangeBuyer.Budget.Get+import Gogol.AdExchangeBuyer.Budget.Patch+import Gogol.AdExchangeBuyer.Budget.Update+import Gogol.AdExchangeBuyer.Creatives.AddDeal+import Gogol.AdExchangeBuyer.Creatives.Get+import Gogol.AdExchangeBuyer.Creatives.Insert+import Gogol.AdExchangeBuyer.Creatives.List+import Gogol.AdExchangeBuyer.Creatives.ListDeals+import Gogol.AdExchangeBuyer.Creatives.RemoveDeal+import Gogol.AdExchangeBuyer.Marketplacedeals.Delete+import Gogol.AdExchangeBuyer.Marketplacedeals.Insert+import Gogol.AdExchangeBuyer.Marketplacedeals.List+import Gogol.AdExchangeBuyer.Marketplacedeals.Update+import Gogol.AdExchangeBuyer.Marketplacenotes.Insert+import Gogol.AdExchangeBuyer.Marketplacenotes.List+import Gogol.AdExchangeBuyer.Marketplaceprivateauction.Updateproposal+import Gogol.AdExchangeBuyer.PerformanceReport.List+import Gogol.AdExchangeBuyer.PretargetingConfig.Delete+import Gogol.AdExchangeBuyer.PretargetingConfig.Get+import Gogol.AdExchangeBuyer.PretargetingConfig.Insert+import Gogol.AdExchangeBuyer.PretargetingConfig.List+import Gogol.AdExchangeBuyer.PretargetingConfig.Patch+import Gogol.AdExchangeBuyer.PretargetingConfig.Update+import Gogol.AdExchangeBuyer.Products.Get+import Gogol.AdExchangeBuyer.Products.Search+import Gogol.AdExchangeBuyer.Proposals.Get+import Gogol.AdExchangeBuyer.Proposals.Insert+import Gogol.AdExchangeBuyer.Proposals.Patch+import Gogol.AdExchangeBuyer.Proposals.Search+import Gogol.AdExchangeBuyer.Proposals.Setupcomplete+import Gogol.AdExchangeBuyer.Proposals.Update+import Gogol.AdExchangeBuyer.Pubprofiles.List+import Gogol.AdExchangeBuyer.Types
+ gen/Gogol/AdExchangeBuyer/Accounts/Get.hs view
@@ -0,0 +1,79 @@+{-# 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.AdExchangeBuyer.Accounts.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 one account by ID.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.accounts.get@.+module Gogol.AdExchangeBuyer.Accounts.Get+  ( -- * Resource+    AdExchangeBuyerAccountsGetResource,++    -- ** Constructing a Request+    AdExchangeBuyerAccountsGet (..),+    newAdExchangeBuyerAccountsGet,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.accounts.get@ method which the+-- 'AdExchangeBuyerAccountsGet' request conforms to.+type AdExchangeBuyerAccountsGetResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "accounts"+    Core.:> Core.Capture "id" Core.Int32+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] Account++-- | Gets one account by ID.+--+-- /See:/ 'newAdExchangeBuyerAccountsGet' smart constructor.+newtype AdExchangeBuyerAccountsGet = AdExchangeBuyerAccountsGet+  { -- | The account id+    id :: Core.Int32+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerAccountsGet' with the minimum fields required to make a request.+newAdExchangeBuyerAccountsGet ::+  -- |  The account id See 'id'.+  Core.Int32 ->+  AdExchangeBuyerAccountsGet+newAdExchangeBuyerAccountsGet id =+  AdExchangeBuyerAccountsGet {id = id}++instance Core.GoogleRequest AdExchangeBuyerAccountsGet where+  type Rs AdExchangeBuyerAccountsGet = Account+  type Scopes AdExchangeBuyerAccountsGet = '[Adexchange'Buyer]+  requestClient AdExchangeBuyerAccountsGet {..} =+    go id (Core.Just Core.AltJSON) adExchangeBuyerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy AdExchangeBuyerAccountsGetResource)+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Accounts/List.hs view
@@ -0,0 +1,72 @@+{-# 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.AdExchangeBuyer.Accounts.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)+--+-- Retrieves the authenticated user\'s list of accounts.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.accounts.list@.+module Gogol.AdExchangeBuyer.Accounts.List+  ( -- * Resource+    AdExchangeBuyerAccountsListResource,++    -- ** Constructing a Request+    AdExchangeBuyerAccountsList (..),+    newAdExchangeBuyerAccountsList,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.accounts.list@ method which the+-- 'AdExchangeBuyerAccountsList' request conforms to.+type AdExchangeBuyerAccountsListResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "accounts"+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] AccountsList++-- | Retrieves the authenticated user\'s list of accounts.+--+-- /See:/ 'newAdExchangeBuyerAccountsList' smart constructor.+data AdExchangeBuyerAccountsList = AdExchangeBuyerAccountsList+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerAccountsList' with the minimum fields required to make a request.+newAdExchangeBuyerAccountsList ::+  AdExchangeBuyerAccountsList+newAdExchangeBuyerAccountsList = AdExchangeBuyerAccountsList++instance Core.GoogleRequest AdExchangeBuyerAccountsList where+  type Rs AdExchangeBuyerAccountsList = AccountsList+  type Scopes AdExchangeBuyerAccountsList = '[Adexchange'Buyer]+  requestClient AdExchangeBuyerAccountsList {} =+    go (Core.Just Core.AltJSON) adExchangeBuyerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy AdExchangeBuyerAccountsListResource)+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Accounts/Patch.hs view
@@ -0,0 +1,97 @@+{-# 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.AdExchangeBuyer.Accounts.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 an existing account. This method supports patch semantics.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.accounts.patch@.+module Gogol.AdExchangeBuyer.Accounts.Patch+  ( -- * Resource+    AdExchangeBuyerAccountsPatchResource,++    -- ** Constructing a Request+    AdExchangeBuyerAccountsPatch (..),+    newAdExchangeBuyerAccountsPatch,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.accounts.patch@ method which the+-- 'AdExchangeBuyerAccountsPatch' request conforms to.+type AdExchangeBuyerAccountsPatchResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "accounts"+    Core.:> Core.Capture "id" Core.Int32+    Core.:> Core.QueryParam "confirmUnsafeAccountChange" Core.Bool+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] Account+    Core.:> Core.Patch '[Core.JSON] Account++-- | Updates an existing account. This method supports patch semantics.+--+-- /See:/ 'newAdExchangeBuyerAccountsPatch' smart constructor.+data AdExchangeBuyerAccountsPatch = AdExchangeBuyerAccountsPatch+  { -- | Confirmation for erasing bidder and cookie matching urls.+    confirmUnsafeAccountChange :: (Core.Maybe Core.Bool),+    -- | The account id+    id :: Core.Int32,+    -- | Multipart request metadata.+    payload :: Account+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerAccountsPatch' with the minimum fields required to make a request.+newAdExchangeBuyerAccountsPatch ::+  -- |  The account id See 'id'.+  Core.Int32 ->+  -- |  Multipart request metadata. See 'payload'.+  Account ->+  AdExchangeBuyerAccountsPatch+newAdExchangeBuyerAccountsPatch id payload =+  AdExchangeBuyerAccountsPatch+    { confirmUnsafeAccountChange =+        Core.Nothing,+      id = id,+      payload = payload+    }++instance Core.GoogleRequest AdExchangeBuyerAccountsPatch where+  type Rs AdExchangeBuyerAccountsPatch = Account+  type Scopes AdExchangeBuyerAccountsPatch = '[Adexchange'Buyer]+  requestClient AdExchangeBuyerAccountsPatch {..} =+    go+      id+      confirmUnsafeAccountChange+      (Core.Just Core.AltJSON)+      payload+      adExchangeBuyerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy AdExchangeBuyerAccountsPatchResource)+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Accounts/Update.hs view
@@ -0,0 +1,97 @@+{-# 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.AdExchangeBuyer.Accounts.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 an existing account.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.accounts.update@.+module Gogol.AdExchangeBuyer.Accounts.Update+  ( -- * Resource+    AdExchangeBuyerAccountsUpdateResource,++    -- ** Constructing a Request+    AdExchangeBuyerAccountsUpdate (..),+    newAdExchangeBuyerAccountsUpdate,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.accounts.update@ method which the+-- 'AdExchangeBuyerAccountsUpdate' request conforms to.+type AdExchangeBuyerAccountsUpdateResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "accounts"+    Core.:> Core.Capture "id" Core.Int32+    Core.:> Core.QueryParam "confirmUnsafeAccountChange" Core.Bool+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] Account+    Core.:> Core.Put '[Core.JSON] Account++-- | Updates an existing account.+--+-- /See:/ 'newAdExchangeBuyerAccountsUpdate' smart constructor.+data AdExchangeBuyerAccountsUpdate = AdExchangeBuyerAccountsUpdate+  { -- | Confirmation for erasing bidder and cookie matching urls.+    confirmUnsafeAccountChange :: (Core.Maybe Core.Bool),+    -- | The account id+    id :: Core.Int32,+    -- | Multipart request metadata.+    payload :: Account+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerAccountsUpdate' with the minimum fields required to make a request.+newAdExchangeBuyerAccountsUpdate ::+  -- |  The account id See 'id'.+  Core.Int32 ->+  -- |  Multipart request metadata. See 'payload'.+  Account ->+  AdExchangeBuyerAccountsUpdate+newAdExchangeBuyerAccountsUpdate id payload =+  AdExchangeBuyerAccountsUpdate+    { confirmUnsafeAccountChange =+        Core.Nothing,+      id = id,+      payload = payload+    }++instance Core.GoogleRequest AdExchangeBuyerAccountsUpdate where+  type Rs AdExchangeBuyerAccountsUpdate = Account+  type Scopes AdExchangeBuyerAccountsUpdate = '[Adexchange'Buyer]+  requestClient AdExchangeBuyerAccountsUpdate {..} =+    go+      id+      confirmUnsafeAccountChange+      (Core.Just Core.AltJSON)+      payload+      adExchangeBuyerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy AdExchangeBuyerAccountsUpdateResource)+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/BillingInfo/Get.hs view
@@ -0,0 +1,79 @@+{-# 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.AdExchangeBuyer.BillingInfo.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)+--+-- Returns the billing information for one account specified by account ID.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.billingInfo.get@.+module Gogol.AdExchangeBuyer.BillingInfo.Get+  ( -- * Resource+    AdExchangeBuyerBillingInfoGetResource,++    -- ** Constructing a Request+    AdExchangeBuyerBillingInfoGet (..),+    newAdExchangeBuyerBillingInfoGet,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.billingInfo.get@ method which the+-- 'AdExchangeBuyerBillingInfoGet' request conforms to.+type AdExchangeBuyerBillingInfoGetResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "billinginfo"+    Core.:> Core.Capture "accountId" Core.Int32+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] BillingInfo++-- | Returns the billing information for one account specified by account ID.+--+-- /See:/ 'newAdExchangeBuyerBillingInfoGet' smart constructor.+newtype AdExchangeBuyerBillingInfoGet = AdExchangeBuyerBillingInfoGet+  { -- | The account id.+    accountId :: Core.Int32+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerBillingInfoGet' with the minimum fields required to make a request.+newAdExchangeBuyerBillingInfoGet ::+  -- |  The account id. See 'accountId'.+  Core.Int32 ->+  AdExchangeBuyerBillingInfoGet+newAdExchangeBuyerBillingInfoGet accountId =+  AdExchangeBuyerBillingInfoGet {accountId = accountId}++instance Core.GoogleRequest AdExchangeBuyerBillingInfoGet where+  type Rs AdExchangeBuyerBillingInfoGet = BillingInfo+  type Scopes AdExchangeBuyerBillingInfoGet = '[Adexchange'Buyer]+  requestClient AdExchangeBuyerBillingInfoGet {..} =+    go accountId (Core.Just Core.AltJSON) adExchangeBuyerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy AdExchangeBuyerBillingInfoGetResource)+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/BillingInfo/List.hs view
@@ -0,0 +1,72 @@+{-# 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.AdExchangeBuyer.BillingInfo.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)+--+-- Retrieves a list of billing information for all accounts of the authenticated user.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.billingInfo.list@.+module Gogol.AdExchangeBuyer.BillingInfo.List+  ( -- * Resource+    AdExchangeBuyerBillingInfoListResource,++    -- ** Constructing a Request+    AdExchangeBuyerBillingInfoList (..),+    newAdExchangeBuyerBillingInfoList,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.billingInfo.list@ method which the+-- 'AdExchangeBuyerBillingInfoList' request conforms to.+type AdExchangeBuyerBillingInfoListResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "billinginfo"+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] BillingInfoList++-- | Retrieves a list of billing information for all accounts of the authenticated user.+--+-- /See:/ 'newAdExchangeBuyerBillingInfoList' smart constructor.+data AdExchangeBuyerBillingInfoList = AdExchangeBuyerBillingInfoList+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerBillingInfoList' with the minimum fields required to make a request.+newAdExchangeBuyerBillingInfoList ::+  AdExchangeBuyerBillingInfoList+newAdExchangeBuyerBillingInfoList = AdExchangeBuyerBillingInfoList++instance Core.GoogleRequest AdExchangeBuyerBillingInfoList where+  type Rs AdExchangeBuyerBillingInfoList = BillingInfoList+  type Scopes AdExchangeBuyerBillingInfoList = '[Adexchange'Buyer]+  requestClient AdExchangeBuyerBillingInfoList {} =+    go (Core.Just Core.AltJSON) adExchangeBuyerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy AdExchangeBuyerBillingInfoListResource)+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Budget/Get.hs view
@@ -0,0 +1,91 @@+{-# 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.AdExchangeBuyer.Budget.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)+--+-- Returns the budget information for the adgroup specified by the accountId and billingId.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.budget.get@.+module Gogol.AdExchangeBuyer.Budget.Get+  ( -- * Resource+    AdExchangeBuyerBudgetGetResource,++    -- ** Constructing a Request+    AdExchangeBuyerBudgetGet (..),+    newAdExchangeBuyerBudgetGet,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.budget.get@ method which the+-- 'AdExchangeBuyerBudgetGet' request conforms to.+type AdExchangeBuyerBudgetGetResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "billinginfo"+    Core.:> Core.Capture "accountId" Core.Int64+    Core.:> Core.Capture "billingId" Core.Int64+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] Budget++-- | Returns the budget information for the adgroup specified by the accountId and billingId.+--+-- /See:/ 'newAdExchangeBuyerBudgetGet' smart constructor.+data AdExchangeBuyerBudgetGet = AdExchangeBuyerBudgetGet+  { -- | The account id to get the budget information for.+    accountId :: Core.Int64,+    -- | The billing id to get the budget information for.+    billingId :: Core.Int64+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerBudgetGet' with the minimum fields required to make a request.+newAdExchangeBuyerBudgetGet ::+  -- |  The account id to get the budget information for. See 'accountId'.+  Core.Int64 ->+  -- |  The billing id to get the budget information for. See 'billingId'.+  Core.Int64 ->+  AdExchangeBuyerBudgetGet+newAdExchangeBuyerBudgetGet accountId billingId =+  AdExchangeBuyerBudgetGet+    { accountId = accountId,+      billingId = billingId+    }++instance Core.GoogleRequest AdExchangeBuyerBudgetGet where+  type Rs AdExchangeBuyerBudgetGet = Budget+  type Scopes AdExchangeBuyerBudgetGet = '[Adexchange'Buyer]+  requestClient AdExchangeBuyerBudgetGet {..} =+    go+      accountId+      billingId+      (Core.Just Core.AltJSON)+      adExchangeBuyerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy AdExchangeBuyerBudgetGetResource)+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Budget/Patch.hs view
@@ -0,0 +1,98 @@+{-# 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.AdExchangeBuyer.Budget.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 the budget amount for the budget of the adgroup specified by the accountId and billingId, with the budget amount in the request. This method supports patch semantics.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.budget.patch@.+module Gogol.AdExchangeBuyer.Budget.Patch+  ( -- * Resource+    AdExchangeBuyerBudgetPatchResource,++    -- ** Constructing a Request+    AdExchangeBuyerBudgetPatch (..),+    newAdExchangeBuyerBudgetPatch,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.budget.patch@ method which the+-- 'AdExchangeBuyerBudgetPatch' request conforms to.+type AdExchangeBuyerBudgetPatchResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "billinginfo"+    Core.:> Core.Capture "accountId" Core.Int64+    Core.:> Core.Capture "billingId" Core.Int64+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] Budget+    Core.:> Core.Patch '[Core.JSON] Budget++-- | Updates the budget amount for the budget of the adgroup specified by the accountId and billingId, with the budget amount in the request. This method supports patch semantics.+--+-- /See:/ 'newAdExchangeBuyerBudgetPatch' smart constructor.+data AdExchangeBuyerBudgetPatch = AdExchangeBuyerBudgetPatch+  { -- | The account id associated with the budget being updated.+    accountId :: Core.Int64,+    -- | The billing id associated with the budget being updated.+    billingId :: Core.Int64,+    -- | Multipart request metadata.+    payload :: Budget+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerBudgetPatch' with the minimum fields required to make a request.+newAdExchangeBuyerBudgetPatch ::+  -- |  The account id associated with the budget being updated. See 'accountId'.+  Core.Int64 ->+  -- |  The billing id associated with the budget being updated. See 'billingId'.+  Core.Int64 ->+  -- |  Multipart request metadata. See 'payload'.+  Budget ->+  AdExchangeBuyerBudgetPatch+newAdExchangeBuyerBudgetPatch accountId billingId payload =+  AdExchangeBuyerBudgetPatch+    { accountId = accountId,+      billingId = billingId,+      payload = payload+    }++instance Core.GoogleRequest AdExchangeBuyerBudgetPatch where+  type Rs AdExchangeBuyerBudgetPatch = Budget+  type Scopes AdExchangeBuyerBudgetPatch = '[Adexchange'Buyer]+  requestClient AdExchangeBuyerBudgetPatch {..} =+    go+      accountId+      billingId+      (Core.Just Core.AltJSON)+      payload+      adExchangeBuyerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy AdExchangeBuyerBudgetPatchResource)+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Budget/Update.hs view
@@ -0,0 +1,98 @@+{-# 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.AdExchangeBuyer.Budget.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 the budget amount for the budget of the adgroup specified by the accountId and billingId, with the budget amount in the request.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.budget.update@.+module Gogol.AdExchangeBuyer.Budget.Update+  ( -- * Resource+    AdExchangeBuyerBudgetUpdateResource,++    -- ** Constructing a Request+    AdExchangeBuyerBudgetUpdate (..),+    newAdExchangeBuyerBudgetUpdate,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.budget.update@ method which the+-- 'AdExchangeBuyerBudgetUpdate' request conforms to.+type AdExchangeBuyerBudgetUpdateResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "billinginfo"+    Core.:> Core.Capture "accountId" Core.Int64+    Core.:> Core.Capture "billingId" Core.Int64+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] Budget+    Core.:> Core.Put '[Core.JSON] Budget++-- | Updates the budget amount for the budget of the adgroup specified by the accountId and billingId, with the budget amount in the request.+--+-- /See:/ 'newAdExchangeBuyerBudgetUpdate' smart constructor.+data AdExchangeBuyerBudgetUpdate = AdExchangeBuyerBudgetUpdate+  { -- | The account id associated with the budget being updated.+    accountId :: Core.Int64,+    -- | The billing id associated with the budget being updated.+    billingId :: Core.Int64,+    -- | Multipart request metadata.+    payload :: Budget+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerBudgetUpdate' with the minimum fields required to make a request.+newAdExchangeBuyerBudgetUpdate ::+  -- |  The account id associated with the budget being updated. See 'accountId'.+  Core.Int64 ->+  -- |  The billing id associated with the budget being updated. See 'billingId'.+  Core.Int64 ->+  -- |  Multipart request metadata. See 'payload'.+  Budget ->+  AdExchangeBuyerBudgetUpdate+newAdExchangeBuyerBudgetUpdate accountId billingId payload =+  AdExchangeBuyerBudgetUpdate+    { accountId = accountId,+      billingId = billingId,+      payload = payload+    }++instance Core.GoogleRequest AdExchangeBuyerBudgetUpdate where+  type Rs AdExchangeBuyerBudgetUpdate = Budget+  type Scopes AdExchangeBuyerBudgetUpdate = '[Adexchange'Buyer]+  requestClient AdExchangeBuyerBudgetUpdate {..} =+    go+      accountId+      billingId+      (Core.Just Core.AltJSON)+      payload+      adExchangeBuyerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy AdExchangeBuyerBudgetUpdateResource)+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Creatives/AddDeal.hs view
@@ -0,0 +1,99 @@+{-# 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.AdExchangeBuyer.Creatives.AddDeal+-- 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)+--+-- Add a deal id association for the creative.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.creatives.addDeal@.+module Gogol.AdExchangeBuyer.Creatives.AddDeal+  ( -- * Resource+    AdExchangeBuyerCreativesAddDealResource,++    -- ** Constructing a Request+    AdExchangeBuyerCreativesAddDeal (..),+    newAdExchangeBuyerCreativesAddDeal,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.creatives.addDeal@ method which the+-- 'AdExchangeBuyerCreativesAddDeal' request conforms to.+type AdExchangeBuyerCreativesAddDealResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "creatives"+    Core.:> Core.Capture "accountId" Core.Int32+    Core.:> Core.Capture "buyerCreativeId" Core.Text+    Core.:> "addDeal"+    Core.:> Core.Capture "dealId" Core.Int64+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Post '[Core.JSON] ()++-- | Add a deal id association for the creative.+--+-- /See:/ 'newAdExchangeBuyerCreativesAddDeal' smart constructor.+data AdExchangeBuyerCreativesAddDeal = AdExchangeBuyerCreativesAddDeal+  { -- | The id for the account that will serve this creative.+    accountId :: Core.Int32,+    -- | The buyer-specific id for this creative.+    buyerCreativeId :: Core.Text,+    -- | The id of the deal id to associate with this creative.+    dealId :: Core.Int64+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerCreativesAddDeal' with the minimum fields required to make a request.+newAdExchangeBuyerCreativesAddDeal ::+  -- |  The id for the account that will serve this creative. See 'accountId'.+  Core.Int32 ->+  -- |  The buyer-specific id for this creative. See 'buyerCreativeId'.+  Core.Text ->+  -- |  The id of the deal id to associate with this creative. See 'dealId'.+  Core.Int64 ->+  AdExchangeBuyerCreativesAddDeal+newAdExchangeBuyerCreativesAddDeal accountId buyerCreativeId dealId =+  AdExchangeBuyerCreativesAddDeal+    { accountId = accountId,+      buyerCreativeId = buyerCreativeId,+      dealId = dealId+    }++instance Core.GoogleRequest AdExchangeBuyerCreativesAddDeal where+  type Rs AdExchangeBuyerCreativesAddDeal = ()+  type Scopes AdExchangeBuyerCreativesAddDeal = '[Adexchange'Buyer]+  requestClient AdExchangeBuyerCreativesAddDeal {..} =+    go+      accountId+      buyerCreativeId+      dealId+      (Core.Just Core.AltJSON)+      adExchangeBuyerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy AdExchangeBuyerCreativesAddDealResource)+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Creatives/Get.hs view
@@ -0,0 +1,91 @@+{-# 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.AdExchangeBuyer.Creatives.Get+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Gets the status for a single creative. A creative will be available 30-40 minutes after submission.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.creatives.get@.+module Gogol.AdExchangeBuyer.Creatives.Get+  ( -- * Resource+    AdExchangeBuyerCreativesGetResource,++    -- ** Constructing a Request+    AdExchangeBuyerCreativesGet (..),+    newAdExchangeBuyerCreativesGet,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.creatives.get@ method which the+-- 'AdExchangeBuyerCreativesGet' request conforms to.+type AdExchangeBuyerCreativesGetResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "creatives"+    Core.:> Core.Capture "accountId" Core.Int32+    Core.:> Core.Capture "buyerCreativeId" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] Creative++-- | Gets the status for a single creative. A creative will be available 30-40 minutes after submission.+--+-- /See:/ 'newAdExchangeBuyerCreativesGet' smart constructor.+data AdExchangeBuyerCreativesGet = AdExchangeBuyerCreativesGet+  { -- | The id for the account that will serve this creative.+    accountId :: Core.Int32,+    -- | The buyer-specific id for this creative.+    buyerCreativeId :: Core.Text+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerCreativesGet' with the minimum fields required to make a request.+newAdExchangeBuyerCreativesGet ::+  -- |  The id for the account that will serve this creative. See 'accountId'.+  Core.Int32 ->+  -- |  The buyer-specific id for this creative. See 'buyerCreativeId'.+  Core.Text ->+  AdExchangeBuyerCreativesGet+newAdExchangeBuyerCreativesGet accountId buyerCreativeId =+  AdExchangeBuyerCreativesGet+    { accountId = accountId,+      buyerCreativeId = buyerCreativeId+    }++instance Core.GoogleRequest AdExchangeBuyerCreativesGet where+  type Rs AdExchangeBuyerCreativesGet = Creative+  type Scopes AdExchangeBuyerCreativesGet = '[Adexchange'Buyer]+  requestClient AdExchangeBuyerCreativesGet {..} =+    go+      accountId+      buyerCreativeId+      (Core.Just Core.AltJSON)+      adExchangeBuyerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy AdExchangeBuyerCreativesGetResource)+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Creatives/Insert.hs view
@@ -0,0 +1,79 @@+{-# 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.AdExchangeBuyer.Creatives.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)+--+-- Submit a new creative.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.creatives.insert@.+module Gogol.AdExchangeBuyer.Creatives.Insert+  ( -- * Resource+    AdExchangeBuyerCreativesInsertResource,++    -- ** Constructing a Request+    AdExchangeBuyerCreativesInsert (..),+    newAdExchangeBuyerCreativesInsert,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.creatives.insert@ method which the+-- 'AdExchangeBuyerCreativesInsert' request conforms to.+type AdExchangeBuyerCreativesInsertResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "creatives"+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] Creative+    Core.:> Core.Post '[Core.JSON] Creative++-- | Submit a new creative.+--+-- /See:/ 'newAdExchangeBuyerCreativesInsert' smart constructor.+newtype AdExchangeBuyerCreativesInsert = AdExchangeBuyerCreativesInsert+  { -- | Multipart request metadata.+    payload :: Creative+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerCreativesInsert' with the minimum fields required to make a request.+newAdExchangeBuyerCreativesInsert ::+  -- |  Multipart request metadata. See 'payload'.+  Creative ->+  AdExchangeBuyerCreativesInsert+newAdExchangeBuyerCreativesInsert payload =+  AdExchangeBuyerCreativesInsert {payload = payload}++instance Core.GoogleRequest AdExchangeBuyerCreativesInsert where+  type Rs AdExchangeBuyerCreativesInsert = Creative+  type Scopes AdExchangeBuyerCreativesInsert = '[Adexchange'Buyer]+  requestClient AdExchangeBuyerCreativesInsert {..} =+    go (Core.Just Core.AltJSON) payload adExchangeBuyerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy AdExchangeBuyerCreativesInsertResource)+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Creatives/List.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.AdExchangeBuyer.Creatives.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)+--+-- Retrieves a list of the authenticated user\'s active creatives. A creative will be available 30-40 minutes after submission.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.creatives.list@.+module Gogol.AdExchangeBuyer.Creatives.List+  ( -- * Resource+    AdExchangeBuyerCreativesListResource,++    -- ** Constructing a Request+    AdExchangeBuyerCreativesList (..),+    newAdExchangeBuyerCreativesList,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.creatives.list@ method which the+-- 'AdExchangeBuyerCreativesList' request conforms to.+type AdExchangeBuyerCreativesListResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "creatives"+    Core.:> Core.QueryParams "accountId" Core.Int32+    Core.:> Core.QueryParams "buyerCreativeId" Core.Text+    Core.:> Core.QueryParam "dealsStatusFilter" CreativesListDealsStatusFilter+    Core.:> Core.QueryParam "maxResults" Core.Word32+    Core.:> Core.QueryParam+              "openAuctionStatusFilter"+              CreativesListOpenAuctionStatusFilter+    Core.:> Core.QueryParam "pageToken" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] CreativesList++-- | Retrieves a list of the authenticated user\'s active creatives. A creative will be available 30-40 minutes after submission.+--+-- /See:/ 'newAdExchangeBuyerCreativesList' smart constructor.+data AdExchangeBuyerCreativesList = AdExchangeBuyerCreativesList+  { -- | When specified, only creatives for the given account ids are returned.+    accountId :: (Core.Maybe [Core.Int32]),+    -- | When specified, only creatives for the given buyer creative ids are returned.+    buyerCreativeId :: (Core.Maybe [Core.Text]),+    -- | When specified, only creatives having the given deals status are returned.+    dealsStatusFilter :: (Core.Maybe CreativesListDealsStatusFilter),+    -- | Maximum number of entries returned on one result page. If not set, the default is 100. Optional.+    maxResults :: (Core.Maybe Core.Word32),+    -- | When specified, only creatives having the given open auction status are returned.+    openAuctionStatusFilter :: (Core.Maybe CreativesListOpenAuctionStatusFilter),+    -- | A continuation token, used to page through ad clients. To retrieve the next page, set this parameter to the value of \"nextPageToken\" from the previous response. Optional.+    pageToken :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerCreativesList' with the minimum fields required to make a request.+newAdExchangeBuyerCreativesList ::+  AdExchangeBuyerCreativesList+newAdExchangeBuyerCreativesList =+  AdExchangeBuyerCreativesList+    { accountId = Core.Nothing,+      buyerCreativeId = Core.Nothing,+      dealsStatusFilter = Core.Nothing,+      maxResults = Core.Nothing,+      openAuctionStatusFilter = Core.Nothing,+      pageToken = Core.Nothing+    }++instance Core.GoogleRequest AdExchangeBuyerCreativesList where+  type Rs AdExchangeBuyerCreativesList = CreativesList+  type Scopes AdExchangeBuyerCreativesList = '[Adexchange'Buyer]+  requestClient AdExchangeBuyerCreativesList {..} =+    go+      (accountId Core.^. Core._Default)+      (buyerCreativeId Core.^. Core._Default)+      dealsStatusFilter+      maxResults+      openAuctionStatusFilter+      pageToken+      (Core.Just Core.AltJSON)+      adExchangeBuyerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy AdExchangeBuyerCreativesListResource)+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Creatives/ListDeals.hs view
@@ -0,0 +1,94 @@+{-# 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.AdExchangeBuyer.Creatives.ListDeals+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists the external deal ids associated with the creative.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.creatives.listDeals@.+module Gogol.AdExchangeBuyer.Creatives.ListDeals+  ( -- * Resource+    AdExchangeBuyerCreativesListDealsResource,++    -- ** Constructing a Request+    AdExchangeBuyerCreativesListDeals (..),+    newAdExchangeBuyerCreativesListDeals,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.creatives.listDeals@ method which the+-- 'AdExchangeBuyerCreativesListDeals' request conforms to.+type AdExchangeBuyerCreativesListDealsResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "creatives"+    Core.:> Core.Capture "accountId" Core.Int32+    Core.:> Core.Capture "buyerCreativeId" Core.Text+    Core.:> "listDeals"+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] CreativeDealIds++-- | Lists the external deal ids associated with the creative.+--+-- /See:/ 'newAdExchangeBuyerCreativesListDeals' smart constructor.+data AdExchangeBuyerCreativesListDeals = AdExchangeBuyerCreativesListDeals+  { -- | The id for the account that will serve this creative.+    accountId :: Core.Int32,+    -- | The buyer-specific id for this creative.+    buyerCreativeId :: Core.Text+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerCreativesListDeals' with the minimum fields required to make a request.+newAdExchangeBuyerCreativesListDeals ::+  -- |  The id for the account that will serve this creative. See 'accountId'.+  Core.Int32 ->+  -- |  The buyer-specific id for this creative. See 'buyerCreativeId'.+  Core.Text ->+  AdExchangeBuyerCreativesListDeals+newAdExchangeBuyerCreativesListDeals accountId buyerCreativeId =+  AdExchangeBuyerCreativesListDeals+    { accountId = accountId,+      buyerCreativeId = buyerCreativeId+    }++instance Core.GoogleRequest AdExchangeBuyerCreativesListDeals where+  type Rs AdExchangeBuyerCreativesListDeals = CreativeDealIds+  type Scopes AdExchangeBuyerCreativesListDeals = '[Adexchange'Buyer]+  requestClient AdExchangeBuyerCreativesListDeals {..} =+    go+      accountId+      buyerCreativeId+      (Core.Just Core.AltJSON)+      adExchangeBuyerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy AdExchangeBuyerCreativesListDealsResource+          )+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Creatives/RemoveDeal.hs view
@@ -0,0 +1,106 @@+{-# 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.AdExchangeBuyer.Creatives.RemoveDeal+-- 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)+--+-- Remove a deal id associated with the creative.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.creatives.removeDeal@.+module Gogol.AdExchangeBuyer.Creatives.RemoveDeal+  ( -- * Resource+    AdExchangeBuyerCreativesRemoveDealResource,++    -- ** Constructing a Request+    AdExchangeBuyerCreativesRemoveDeal (..),+    newAdExchangeBuyerCreativesRemoveDeal,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.creatives.removeDeal@ method which the+-- 'AdExchangeBuyerCreativesRemoveDeal' request conforms to.+type AdExchangeBuyerCreativesRemoveDealResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "creatives"+    Core.:> Core.Capture "accountId" Core.Int32+    Core.:> Core.Capture "buyerCreativeId" Core.Text+    Core.:> "removeDeal"+    Core.:> Core.Capture "dealId" Core.Int64+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Post '[Core.JSON] ()++-- | Remove a deal id associated with the creative.+--+-- /See:/ 'newAdExchangeBuyerCreativesRemoveDeal' smart constructor.+data AdExchangeBuyerCreativesRemoveDeal = AdExchangeBuyerCreativesRemoveDeal+  { -- | The id for the account that will serve this creative.+    accountId :: Core.Int32,+    -- | The buyer-specific id for this creative.+    buyerCreativeId :: Core.Text,+    -- | The id of the deal id to disassociate with this creative.+    dealId :: Core.Int64+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerCreativesRemoveDeal' with the minimum fields required to make a request.+newAdExchangeBuyerCreativesRemoveDeal ::+  -- |  The id for the account that will serve this creative. See 'accountId'.+  Core.Int32 ->+  -- |  The buyer-specific id for this creative. See 'buyerCreativeId'.+  Core.Text ->+  -- |  The id of the deal id to disassociate with this creative. See 'dealId'.+  Core.Int64 ->+  AdExchangeBuyerCreativesRemoveDeal+newAdExchangeBuyerCreativesRemoveDeal+  accountId+  buyerCreativeId+  dealId =+    AdExchangeBuyerCreativesRemoveDeal+      { accountId = accountId,+        buyerCreativeId = buyerCreativeId,+        dealId = dealId+      }++instance Core.GoogleRequest AdExchangeBuyerCreativesRemoveDeal where+  type Rs AdExchangeBuyerCreativesRemoveDeal = ()+  type+    Scopes AdExchangeBuyerCreativesRemoveDeal =+      '[Adexchange'Buyer]+  requestClient AdExchangeBuyerCreativesRemoveDeal {..} =+    go+      accountId+      buyerCreativeId+      dealId+      (Core.Just Core.AltJSON)+      adExchangeBuyerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy AdExchangeBuyerCreativesRemoveDealResource+          )+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Internal/Product.hs view
@@ -0,0 +1,4817 @@+{-# 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.AdExchangeBuyer.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.AdExchangeBuyer.Internal.Product+  ( -- * Account+    Account (..),+    newAccount,++    -- * Account_BidderLocationItem+    Account_BidderLocationItem (..),+    newAccount_BidderLocationItem,++    -- * AccountsList+    AccountsList (..),+    newAccountsList,++    -- * AddOrderDealsRequest+    AddOrderDealsRequest (..),+    newAddOrderDealsRequest,++    -- * AddOrderDealsResponse+    AddOrderDealsResponse (..),+    newAddOrderDealsResponse,++    -- * AddOrderNotesRequest+    AddOrderNotesRequest (..),+    newAddOrderNotesRequest,++    -- * AddOrderNotesResponse+    AddOrderNotesResponse (..),+    newAddOrderNotesResponse,++    -- * BillingInfo+    BillingInfo (..),+    newBillingInfo,++    -- * BillingInfoList+    BillingInfoList (..),+    newBillingInfoList,++    -- * Budget+    Budget (..),+    newBudget,++    -- * Buyer+    Buyer (..),+    newBuyer,++    -- * ContactInformation+    ContactInformation (..),+    newContactInformation,++    -- * CreateOrdersRequest+    CreateOrdersRequest (..),+    newCreateOrdersRequest,++    -- * CreateOrdersResponse+    CreateOrdersResponse (..),+    newCreateOrdersResponse,++    -- * Creative+    Creative (..),+    newCreative,++    -- * Creative_AdTechnologyProviders+    Creative_AdTechnologyProviders (..),+    newCreative_AdTechnologyProviders,++    -- * Creative_CorrectionsItem+    Creative_CorrectionsItem (..),+    newCreative_CorrectionsItem,++    -- * Creative_CorrectionsItem_ContextsItem+    Creative_CorrectionsItem_ContextsItem (..),+    newCreative_CorrectionsItem_ContextsItem,++    -- * Creative_FilteringReasons+    Creative_FilteringReasons (..),+    newCreative_FilteringReasons,++    -- * Creative_FilteringReasons_ReasonsItem+    Creative_FilteringReasons_ReasonsItem (..),+    newCreative_FilteringReasons_ReasonsItem,++    -- * Creative_NativeAd+    Creative_NativeAd (..),+    newCreative_NativeAd,++    -- * Creative_NativeAd_AppIcon+    Creative_NativeAd_AppIcon (..),+    newCreative_NativeAd_AppIcon,++    -- * Creative_NativeAd_Image+    Creative_NativeAd_Image (..),+    newCreative_NativeAd_Image,++    -- * Creative_NativeAd_Logo+    Creative_NativeAd_Logo (..),+    newCreative_NativeAd_Logo,++    -- * Creative_ServingRestrictionsItem+    Creative_ServingRestrictionsItem (..),+    newCreative_ServingRestrictionsItem,++    -- * Creative_ServingRestrictionsItem_ContextsItem+    Creative_ServingRestrictionsItem_ContextsItem (..),+    newCreative_ServingRestrictionsItem_ContextsItem,++    -- * Creative_ServingRestrictionsItem_DisapprovalReasonsItem+    Creative_ServingRestrictionsItem_DisapprovalReasonsItem (..),+    newCreative_ServingRestrictionsItem_DisapprovalReasonsItem,++    -- * CreativeDealIds+    CreativeDealIds (..),+    newCreativeDealIds,++    -- * CreativeDealIds_DealStatusesItem+    CreativeDealIds_DealStatusesItem (..),+    newCreativeDealIds_DealStatusesItem,++    -- * CreativesList+    CreativesList (..),+    newCreativesList,++    -- * DealServingMetadata+    DealServingMetadata (..),+    newDealServingMetadata,++    -- * DealServingMetadataDealPauseStatus+    DealServingMetadataDealPauseStatus (..),+    newDealServingMetadataDealPauseStatus,++    -- * DealTerms+    DealTerms (..),+    newDealTerms,++    -- * DealTermsGuaranteedFixedPriceTerms+    DealTermsGuaranteedFixedPriceTerms (..),+    newDealTermsGuaranteedFixedPriceTerms,++    -- * DealTermsGuaranteedFixedPriceTermsBillingInfo+    DealTermsGuaranteedFixedPriceTermsBillingInfo (..),+    newDealTermsGuaranteedFixedPriceTermsBillingInfo,++    -- * DealTermsNonGuaranteedAuctionTerms+    DealTermsNonGuaranteedAuctionTerms (..),+    newDealTermsNonGuaranteedAuctionTerms,++    -- * DealTermsNonGuaranteedFixedPriceTerms+    DealTermsNonGuaranteedFixedPriceTerms (..),+    newDealTermsNonGuaranteedFixedPriceTerms,++    -- * DealTermsRubiconNonGuaranteedTerms+    DealTermsRubiconNonGuaranteedTerms (..),+    newDealTermsRubiconNonGuaranteedTerms,++    -- * DeleteOrderDealsRequest+    DeleteOrderDealsRequest (..),+    newDeleteOrderDealsRequest,++    -- * DeleteOrderDealsResponse+    DeleteOrderDealsResponse (..),+    newDeleteOrderDealsResponse,++    -- * DeliveryControl+    DeliveryControl (..),+    newDeliveryControl,++    -- * DeliveryControlFrequencyCap+    DeliveryControlFrequencyCap (..),+    newDeliveryControlFrequencyCap,++    -- * Dimension+    Dimension (..),+    newDimension,++    -- * DimensionDimensionValue+    DimensionDimensionValue (..),+    newDimensionDimensionValue,++    -- * EditAllOrderDealsRequest+    EditAllOrderDealsRequest (..),+    newEditAllOrderDealsRequest,++    -- * EditAllOrderDealsResponse+    EditAllOrderDealsResponse (..),+    newEditAllOrderDealsResponse,++    -- * GetOffersResponse+    GetOffersResponse (..),+    newGetOffersResponse,++    -- * GetOrderDealsResponse+    GetOrderDealsResponse (..),+    newGetOrderDealsResponse,++    -- * GetOrderNotesResponse+    GetOrderNotesResponse (..),+    newGetOrderNotesResponse,++    -- * GetOrdersResponse+    GetOrdersResponse (..),+    newGetOrdersResponse,++    -- * GetPublisherProfilesByAccountIdResponse+    GetPublisherProfilesByAccountIdResponse (..),+    newGetPublisherProfilesByAccountIdResponse,++    -- * MarketplaceDeal+    MarketplaceDeal (..),+    newMarketplaceDeal,++    -- * MarketplaceDealParty+    MarketplaceDealParty (..),+    newMarketplaceDealParty,++    -- * MarketplaceLabel+    MarketplaceLabel (..),+    newMarketplaceLabel,++    -- * MarketplaceNote+    MarketplaceNote (..),+    newMarketplaceNote,++    -- * MobileApplication+    MobileApplication (..),+    newMobileApplication,++    -- * PerformanceReport+    PerformanceReport (..),+    newPerformanceReport,++    -- * PerformanceReportList+    PerformanceReportList (..),+    newPerformanceReportList,++    -- * PretargetingConfig+    PretargetingConfig (..),+    newPretargetingConfig,++    -- * PretargetingConfig_DimensionsItem+    PretargetingConfig_DimensionsItem (..),+    newPretargetingConfig_DimensionsItem,++    -- * PretargetingConfig_ExcludedPlacementsItem+    PretargetingConfig_ExcludedPlacementsItem (..),+    newPretargetingConfig_ExcludedPlacementsItem,++    -- * PretargetingConfig_PlacementsItem+    PretargetingConfig_PlacementsItem (..),+    newPretargetingConfig_PlacementsItem,++    -- * PretargetingConfig_VideoPlayerSizesItem+    PretargetingConfig_VideoPlayerSizesItem (..),+    newPretargetingConfig_VideoPlayerSizesItem,++    -- * PretargetingConfigList+    PretargetingConfigList (..),+    newPretargetingConfigList,++    -- * Price+    Price (..),+    newPrice,++    -- * PricePerBuyer+    PricePerBuyer (..),+    newPricePerBuyer,++    -- * PrivateData+    PrivateData (..),+    newPrivateData,++    -- * Product+    Product (..),+    newProduct,++    -- * Proposal+    Proposal (..),+    newProposal,++    -- * PublisherProfileApiProto+    PublisherProfileApiProto (..),+    newPublisherProfileApiProto,++    -- * PublisherProvidedForecast+    PublisherProvidedForecast (..),+    newPublisherProvidedForecast,++    -- * Seller+    Seller (..),+    newSeller,++    -- * SharedTargeting+    SharedTargeting (..),+    newSharedTargeting,++    -- * TargetingValue+    TargetingValue (..),+    newTargetingValue,++    -- * TargetingValueCreativeSize+    TargetingValueCreativeSize (..),+    newTargetingValueCreativeSize,++    -- * TargetingValueDayPartTargeting+    TargetingValueDayPartTargeting (..),+    newTargetingValueDayPartTargeting,++    -- * TargetingValueDayPartTargetingDayPart+    TargetingValueDayPartTargetingDayPart (..),+    newTargetingValueDayPartTargetingDayPart,++    -- * TargetingValueDemogAgeCriteria+    TargetingValueDemogAgeCriteria (..),+    newTargetingValueDemogAgeCriteria,++    -- * TargetingValueDemogGenderCriteria+    TargetingValueDemogGenderCriteria (..),+    newTargetingValueDemogGenderCriteria,++    -- * TargetingValueRequestPlatformTargeting+    TargetingValueRequestPlatformTargeting (..),+    newTargetingValueRequestPlatformTargeting,++    -- * TargetingValueSize+    TargetingValueSize (..),+    newTargetingValueSize,++    -- * UpdatePrivateAuctionProposalRequest+    UpdatePrivateAuctionProposalRequest (..),+    newUpdatePrivateAuctionProposalRequest,+  )+where++import Gogol.AdExchangeBuyer.Internal.Sum+import Gogol.Prelude qualified as Core++-- | Configuration data for an Ad Exchange buyer account.+--+-- /See:/ 'newAccount' smart constructor.+data Account = Account+  { -- | When this is false, bid requests that include a deal ID for a private auction or preferred deal are always sent to your bidder. When true, all active pretargeting configs will be applied to private auctions and preferred deals. Programmatic Guaranteed deals (when enabled) are always sent to your bidder.+    applyPretargetingToNonGuaranteedDeals :: (Core.Maybe Core.Bool),+    -- | Your bidder locations that have distinct URLs.+    bidderLocation :: (Core.Maybe [Account_BidderLocationItem]),+    -- | The nid parameter value used in cookie match requests. Please contact your technical account manager if you need to change this.+    cookieMatchingNid :: (Core.Maybe Core.Text),+    -- | The base URL used in cookie match requests.+    cookieMatchingUrl :: (Core.Maybe Core.Text),+    -- | Account id.+    id :: (Core.Maybe Core.Int32),+    -- | Resource type.+    kind :: Core.Text,+    -- | The maximum number of active creatives that an account can have, where a creative is active if it was inserted or bid with in the last 30 days. Please contact your technical account manager if you need to change this.+    maximumActiveCreatives :: (Core.Maybe Core.Int32),+    -- | The sum of all bidderLocation.maximumQps values cannot exceed this. Please contact your technical account manager if you need to change this.+    maximumTotalQps :: (Core.Maybe Core.Int32),+    -- | The number of creatives that this account inserted or bid with in the last 30 days.+    numberActiveCreatives :: (Core.Maybe Core.Int32)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Account' with the minimum fields required to make a request.+newAccount ::+  Account+newAccount =+  Account+    { applyPretargetingToNonGuaranteedDeals = Core.Nothing,+      bidderLocation = Core.Nothing,+      cookieMatchingNid = Core.Nothing,+      cookieMatchingUrl = Core.Nothing,+      id = Core.Nothing,+      kind = "adexchangebuyer#account",+      maximumActiveCreatives = Core.Nothing,+      maximumTotalQps = Core.Nothing,+      numberActiveCreatives = Core.Nothing+    }++instance Core.FromJSON Account where+  parseJSON =+    Core.withObject+      "Account"+      ( \o ->+          Account+            Core.<$> (o Core..:? "applyPretargetingToNonGuaranteedDeals")+            Core.<*> (o Core..:? "bidderLocation")+            Core.<*> (o Core..:? "cookieMatchingNid")+            Core.<*> (o Core..:? "cookieMatchingUrl")+            Core.<*> (o Core..:? "id")+            Core.<*> (o Core..:? "kind" Core..!= "adexchangebuyer#account")+            Core.<*> (o Core..:? "maximumActiveCreatives")+            Core.<*> (o Core..:? "maximumTotalQps")+            Core.<*> (o Core..:? "numberActiveCreatives")+      )++instance Core.ToJSON Account where+  toJSON Account {..} =+    Core.object+      ( Core.catMaybes+          [ ("applyPretargetingToNonGuaranteedDeals" Core..=)+              Core.<$> applyPretargetingToNonGuaranteedDeals,+            ("bidderLocation" Core..=) Core.<$> bidderLocation,+            ("cookieMatchingNid" Core..=) Core.<$> cookieMatchingNid,+            ("cookieMatchingUrl" Core..=) Core.<$> cookieMatchingUrl,+            ("id" Core..=) Core.<$> id,+            Core.Just ("kind" Core..= kind),+            ("maximumActiveCreatives" Core..=) Core.<$> maximumActiveCreatives,+            ("maximumTotalQps" Core..=) Core.<$> maximumTotalQps,+            ("numberActiveCreatives" Core..=) Core.<$> numberActiveCreatives+          ]+      )++--+-- /See:/ 'newAccount_BidderLocationItem' smart constructor.+data Account_BidderLocationItem = Account_BidderLocationItem+  { -- | The protocol that the bidder endpoint is using. OpenRTB protocols with prefix PROTOCOL/OPENRTB/PROTOBUF use proto buffer, otherwise use JSON. Allowed values:+    -- - PROTOCOL/ADX - PROTOCOL/OPENRTB/2/2 - PROTOCOL/OPENRTB/2/3 - PROTOCOL/OPENRTB/2/4 - PROTOCOL/OPENRTB/2/5 - PROTOCOL/OPENRTB/PROTOBUF/2/3 - PROTOCOL/OPENRTB/PROTOBUF/2/4 - PROTOCOL/OPENRTB/PROTOBUF/2_5+    bidProtocol :: (Core.Maybe Core.Text),+    -- | The maximum queries per second the Ad Exchange will send.+    maximumQps :: (Core.Maybe Core.Int32),+    -- | The geographical region the Ad Exchange should send requests from. Only used by some quota systems, but always setting the value is recommended. Allowed values:+    -- - ASIA - EUROPE - US/EAST - US/WEST+    region :: (Core.Maybe Core.Text),+    -- | The URL to which the Ad Exchange will send bid requests.+    url :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Account_BidderLocationItem' with the minimum fields required to make a request.+newAccount_BidderLocationItem ::+  Account_BidderLocationItem+newAccount_BidderLocationItem =+  Account_BidderLocationItem+    { bidProtocol = Core.Nothing,+      maximumQps = Core.Nothing,+      region = Core.Nothing,+      url = Core.Nothing+    }++instance Core.FromJSON Account_BidderLocationItem where+  parseJSON =+    Core.withObject+      "Account_BidderLocationItem"+      ( \o ->+          Account_BidderLocationItem+            Core.<$> (o Core..:? "bidProtocol")+            Core.<*> (o Core..:? "maximumQps")+            Core.<*> (o Core..:? "region")+            Core.<*> (o Core..:? "url")+      )++instance Core.ToJSON Account_BidderLocationItem where+  toJSON Account_BidderLocationItem {..} =+    Core.object+      ( Core.catMaybes+          [ ("bidProtocol" Core..=) Core.<$> bidProtocol,+            ("maximumQps" Core..=) Core.<$> maximumQps,+            ("region" Core..=) Core.<$> region,+            ("url" Core..=) Core.<$> url+          ]+      )++-- | An account feed lists Ad Exchange buyer accounts that the user has access to. Each entry in the feed corresponds to a single buyer account.+--+-- /See:/ 'newAccountsList' smart constructor.+data AccountsList = AccountsList+  { -- | A list of accounts.+    items :: (Core.Maybe [Account]),+    -- | Resource type.+    kind :: Core.Text+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AccountsList' with the minimum fields required to make a request.+newAccountsList ::+  AccountsList+newAccountsList =+  AccountsList+    { items = Core.Nothing,+      kind = "adexchangebuyer#accountsList"+    }++instance Core.FromJSON AccountsList where+  parseJSON =+    Core.withObject+      "AccountsList"+      ( \o ->+          AccountsList+            Core.<$> (o Core..:? "items")+            Core.<*> (o Core..:? "kind" Core..!= "adexchangebuyer#accountsList")+      )++instance Core.ToJSON AccountsList where+  toJSON AccountsList {..} =+    Core.object+      ( Core.catMaybes+          [ ("items" Core..=) Core.<$> items,+            Core.Just ("kind" Core..= kind)+          ]+      )++--+-- /See:/ 'newAddOrderDealsRequest' smart constructor.+data AddOrderDealsRequest = AddOrderDealsRequest+  { -- | The list of deals to add+    deals :: (Core.Maybe [MarketplaceDeal]),+    -- | The last known proposal revision number.+    proposalRevisionNumber :: (Core.Maybe Core.Int64),+    -- | Indicates an optional action to take on the proposal+    updateAction :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AddOrderDealsRequest' with the minimum fields required to make a request.+newAddOrderDealsRequest ::+  AddOrderDealsRequest+newAddOrderDealsRequest =+  AddOrderDealsRequest+    { deals = Core.Nothing,+      proposalRevisionNumber = Core.Nothing,+      updateAction = Core.Nothing+    }++instance Core.FromJSON AddOrderDealsRequest where+  parseJSON =+    Core.withObject+      "AddOrderDealsRequest"+      ( \o ->+          AddOrderDealsRequest+            Core.<$> (o Core..:? "deals")+            Core.<*> ( o+                         Core..:? "proposalRevisionNumber"+                         Core.<&> Core.fmap Core.fromAsText+                     )+            Core.<*> (o Core..:? "updateAction")+      )++instance Core.ToJSON AddOrderDealsRequest where+  toJSON AddOrderDealsRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("deals" Core..=) Core.<$> deals,+            ("proposalRevisionNumber" Core..=)+              Core.. Core.AsText+              Core.<$> proposalRevisionNumber,+            ("updateAction" Core..=) Core.<$> updateAction+          ]+      )++--+-- /See:/ 'newAddOrderDealsResponse' smart constructor.+data AddOrderDealsResponse = AddOrderDealsResponse+  { -- | List of deals added (in the same proposal as passed in the request)+    deals :: (Core.Maybe [MarketplaceDeal]),+    -- | The updated revision number for the proposal.+    proposalRevisionNumber :: (Core.Maybe Core.Int64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AddOrderDealsResponse' with the minimum fields required to make a request.+newAddOrderDealsResponse ::+  AddOrderDealsResponse+newAddOrderDealsResponse =+  AddOrderDealsResponse+    { deals = Core.Nothing,+      proposalRevisionNumber = Core.Nothing+    }++instance Core.FromJSON AddOrderDealsResponse where+  parseJSON =+    Core.withObject+      "AddOrderDealsResponse"+      ( \o ->+          AddOrderDealsResponse+            Core.<$> (o Core..:? "deals")+            Core.<*> ( o+                         Core..:? "proposalRevisionNumber"+                         Core.<&> Core.fmap Core.fromAsText+                     )+      )++instance Core.ToJSON AddOrderDealsResponse where+  toJSON AddOrderDealsResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("deals" Core..=) Core.<$> deals,+            ("proposalRevisionNumber" Core..=)+              Core.. Core.AsText+              Core.<$> proposalRevisionNumber+          ]+      )++--+-- /See:/ 'newAddOrderNotesRequest' smart constructor.+newtype AddOrderNotesRequest = AddOrderNotesRequest+  { -- | The list of notes to add.+    notes :: (Core.Maybe [MarketplaceNote])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AddOrderNotesRequest' with the minimum fields required to make a request.+newAddOrderNotesRequest ::+  AddOrderNotesRequest+newAddOrderNotesRequest =+  AddOrderNotesRequest {notes = Core.Nothing}++instance Core.FromJSON AddOrderNotesRequest where+  parseJSON =+    Core.withObject+      "AddOrderNotesRequest"+      (\o -> AddOrderNotesRequest Core.<$> (o Core..:? "notes"))++instance Core.ToJSON AddOrderNotesRequest where+  toJSON AddOrderNotesRequest {..} =+    Core.object (Core.catMaybes [("notes" Core..=) Core.<$> notes])++--+-- /See:/ 'newAddOrderNotesResponse' smart constructor.+newtype AddOrderNotesResponse = AddOrderNotesResponse+  { notes :: (Core.Maybe [MarketplaceNote])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AddOrderNotesResponse' with the minimum fields required to make a request.+newAddOrderNotesResponse ::+  AddOrderNotesResponse+newAddOrderNotesResponse =+  AddOrderNotesResponse {notes = Core.Nothing}++instance Core.FromJSON AddOrderNotesResponse where+  parseJSON =+    Core.withObject+      "AddOrderNotesResponse"+      (\o -> AddOrderNotesResponse Core.<$> (o Core..:? "notes"))++instance Core.ToJSON AddOrderNotesResponse where+  toJSON AddOrderNotesResponse {..} =+    Core.object (Core.catMaybes [("notes" Core..=) Core.<$> notes])++-- | The configuration data for an Ad Exchange billing info.+--+-- /See:/ 'newBillingInfo' smart constructor.+data BillingInfo = BillingInfo+  { -- | Account id.+    accountId :: (Core.Maybe Core.Int32),+    -- | Account name.+    accountName :: (Core.Maybe Core.Text),+    -- | A list of adgroup IDs associated with this particular account. These IDs may show up as part of a realtime bidding BidRequest, which indicates a bid request for this account.+    billingId :: (Core.Maybe [Core.Text]),+    -- | Resource type.+    kind :: Core.Text+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'BillingInfo' with the minimum fields required to make a request.+newBillingInfo ::+  BillingInfo+newBillingInfo =+  BillingInfo+    { accountId = Core.Nothing,+      accountName = Core.Nothing,+      billingId = Core.Nothing,+      kind = "adexchangebuyer#billingInfo"+    }++instance Core.FromJSON BillingInfo where+  parseJSON =+    Core.withObject+      "BillingInfo"+      ( \o ->+          BillingInfo+            Core.<$> (o Core..:? "accountId")+            Core.<*> (o Core..:? "accountName")+            Core.<*> (o Core..:? "billingId")+            Core.<*> (o Core..:? "kind" Core..!= "adexchangebuyer#billingInfo")+      )++instance Core.ToJSON BillingInfo where+  toJSON BillingInfo {..} =+    Core.object+      ( Core.catMaybes+          [ ("accountId" Core..=) Core.<$> accountId,+            ("accountName" Core..=) Core.<$> accountName,+            ("billingId" Core..=) Core.<$> billingId,+            Core.Just ("kind" Core..= kind)+          ]+      )++-- | A billing info feed lists Billing Info the Ad Exchange buyer account has access to. Each entry in the feed corresponds to a single billing info.+--+-- /See:/ 'newBillingInfoList' smart constructor.+data BillingInfoList = BillingInfoList+  { -- | A list of billing info relevant for your account.+    items :: (Core.Maybe [BillingInfo]),+    -- | Resource type.+    kind :: Core.Text+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'BillingInfoList' with the minimum fields required to make a request.+newBillingInfoList ::+  BillingInfoList+newBillingInfoList =+  BillingInfoList+    { items = Core.Nothing,+      kind = "adexchangebuyer#billingInfoList"+    }++instance Core.FromJSON BillingInfoList where+  parseJSON =+    Core.withObject+      "BillingInfoList"+      ( \o ->+          BillingInfoList+            Core.<$> (o Core..:? "items")+            Core.<*> (o Core..:? "kind" Core..!= "adexchangebuyer#billingInfoList")+      )++instance Core.ToJSON BillingInfoList where+  toJSON BillingInfoList {..} =+    Core.object+      ( Core.catMaybes+          [ ("items" Core..=) Core.<$> items,+            Core.Just ("kind" Core..= kind)+          ]+      )++-- | The configuration data for Ad Exchange RTB - Budget API.+--+-- /See:/ 'newBudget' smart constructor.+data Budget = Budget+  { -- | The id of the account. This is required for get and update requests.+    accountId :: (Core.Maybe Core.Int64),+    -- | The billing id to determine which adgroup to provide budget information for. This is required for get and update requests.+    billingId :: (Core.Maybe Core.Int64),+    -- | The daily budget amount in unit amount of the account currency to apply for the billingId provided. This is required for update requests.+    budgetAmount :: (Core.Maybe Core.Int64),+    -- | The currency code for the buyer. This cannot be altered here.+    currencyCode :: (Core.Maybe Core.Text),+    -- | The unique id that describes this item.+    id :: (Core.Maybe Core.Text),+    -- | The kind of the resource, i.e. \"adexchangebuyer#budget\".+    kind :: Core.Text+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Budget' with the minimum fields required to make a request.+newBudget ::+  Budget+newBudget =+  Budget+    { accountId = Core.Nothing,+      billingId = Core.Nothing,+      budgetAmount = Core.Nothing,+      currencyCode = Core.Nothing,+      id = Core.Nothing,+      kind = "adexchangebuyer#budget"+    }++instance Core.FromJSON Budget where+  parseJSON =+    Core.withObject+      "Budget"+      ( \o ->+          Budget+            Core.<$> (o Core..:? "accountId" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "billingId" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "budgetAmount" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "currencyCode")+            Core.<*> (o Core..:? "id")+            Core.<*> (o Core..:? "kind" Core..!= "adexchangebuyer#budget")+      )++instance Core.ToJSON Budget where+  toJSON Budget {..} =+    Core.object+      ( Core.catMaybes+          [ ("accountId" Core..=) Core.. Core.AsText Core.<$> accountId,+            ("billingId" Core..=) Core.. Core.AsText Core.<$> billingId,+            ("budgetAmount" Core..=) Core.. Core.AsText Core.<$> budgetAmount,+            ("currencyCode" Core..=) Core.<$> currencyCode,+            ("id" Core..=) Core.<$> id,+            Core.Just ("kind" Core..= kind)+          ]+      )++--+-- /See:/ 'newBuyer' smart constructor.+newtype Buyer = Buyer+  { -- | Adx account id of the buyer.+    accountId :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Buyer' with the minimum fields required to make a request.+newBuyer ::+  Buyer+newBuyer = Buyer {accountId = Core.Nothing}++instance Core.FromJSON Buyer where+  parseJSON =+    Core.withObject+      "Buyer"+      (\o -> Buyer Core.<$> (o Core..:? "accountId"))++instance Core.ToJSON Buyer where+  toJSON Buyer {..} =+    Core.object+      (Core.catMaybes [("accountId" Core..=) Core.<$> accountId])++--+-- /See:/ 'newContactInformation' smart constructor.+data ContactInformation = ContactInformation+  { -- | Email address of the contact.+    email :: (Core.Maybe Core.Text),+    -- | The name of the contact.+    name :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ContactInformation' with the minimum fields required to make a request.+newContactInformation ::+  ContactInformation+newContactInformation =+  ContactInformation {email = Core.Nothing, name = Core.Nothing}++instance Core.FromJSON ContactInformation where+  parseJSON =+    Core.withObject+      "ContactInformation"+      ( \o ->+          ContactInformation+            Core.<$> (o Core..:? "email")+            Core.<*> (o Core..:? "name")+      )++instance Core.ToJSON ContactInformation where+  toJSON ContactInformation {..} =+    Core.object+      ( Core.catMaybes+          [("email" Core..=) Core.<$> email, ("name" Core..=) Core.<$> name]+      )++--+-- /See:/ 'newCreateOrdersRequest' smart constructor.+data CreateOrdersRequest = CreateOrdersRequest+  { -- | The list of proposals to create.+    proposals :: (Core.Maybe [Proposal]),+    -- | Web property id of the seller creating these orders+    webPropertyCode :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CreateOrdersRequest' with the minimum fields required to make a request.+newCreateOrdersRequest ::+  CreateOrdersRequest+newCreateOrdersRequest =+  CreateOrdersRequest+    { proposals = Core.Nothing,+      webPropertyCode = Core.Nothing+    }++instance Core.FromJSON CreateOrdersRequest where+  parseJSON =+    Core.withObject+      "CreateOrdersRequest"+      ( \o ->+          CreateOrdersRequest+            Core.<$> (o Core..:? "proposals")+            Core.<*> (o Core..:? "webPropertyCode")+      )++instance Core.ToJSON CreateOrdersRequest where+  toJSON CreateOrdersRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("proposals" Core..=) Core.<$> proposals,+            ("webPropertyCode" Core..=) Core.<$> webPropertyCode+          ]+      )++--+-- /See:/ 'newCreateOrdersResponse' smart constructor.+newtype CreateOrdersResponse = CreateOrdersResponse+  { -- | The list of proposals successfully created.+    proposals :: (Core.Maybe [Proposal])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CreateOrdersResponse' with the minimum fields required to make a request.+newCreateOrdersResponse ::+  CreateOrdersResponse+newCreateOrdersResponse =+  CreateOrdersResponse {proposals = Core.Nothing}++instance Core.FromJSON CreateOrdersResponse where+  parseJSON =+    Core.withObject+      "CreateOrdersResponse"+      (\o -> CreateOrdersResponse Core.<$> (o Core..:? "proposals"))++instance Core.ToJSON CreateOrdersResponse where+  toJSON CreateOrdersResponse {..} =+    Core.object+      (Core.catMaybes [("proposals" Core..=) Core.<$> proposals])++-- | A creative and its classification data.+--+-- /See:/ 'newCreative' smart constructor.+data Creative = Creative+  { -- | The HTML snippet that displays the ad when inserted in the web page. If set, videoURL, videoVastXML, and nativeAd should not be set.+    hTMLSnippet :: (Core.Maybe Core.Text),+    -- | Account id.+    accountId :: (Core.Maybe Core.Int32),+    -- | The link to the Ad Preferences page. This is only supported for native ads.+    adChoicesDestinationUrl :: (Core.Maybe Core.Text),+    adTechnologyProviders :: (Core.Maybe Creative_AdTechnologyProviders),+    -- | Detected advertiser id, if any. Read-only. This field should not be set in requests.+    advertiserId :: (Core.Maybe [Core.Int64]),+    -- | The name of the company being advertised in the creative. A list of advertisers is provided in the advertisers.txt file.+    advertiserName :: (Core.Maybe Core.Text),+    -- | The agency id for this creative.+    agencyId :: (Core.Maybe Core.Int64),+    -- | The last upload timestamp of this creative if it was uploaded via API. Read-only. The value of this field is generated, and will be ignored for uploads. (formatted RFC 3339 timestamp).+    apiUploadTimestamp :: (Core.Maybe Core.DateTime),+    -- | List of buyer selectable attributes for the ads that may be shown from this snippet. Each attribute is represented by an integer as defined in buyer-declarable-creative-attributes.txt.+    attribute :: (Core.Maybe [Core.Int32]),+    -- | A buyer-specific id identifying the creative in this ad.+    buyerCreativeId :: (Core.Maybe Core.Text),+    -- | The set of destination urls for the snippet.+    clickThroughUrl :: (Core.Maybe [Core.Text]),+    -- | Shows any corrections that were applied to this creative. Read-only. This field should not be set in requests.+    corrections :: (Core.Maybe [Creative_CorrectionsItem]),+    -- | Creative status identity type that the creative item applies to. Ad Exchange real-time bidding is migrating to the sizeless creative verification. Originally, Ad Exchange assigned creative verification status to a unique combination of a buyer creative ID and creative dimensions. Post-migration, a single verification status will be assigned at the buyer creative ID level. This field allows to distinguish whether a given creative status applies to a unique combination of a buyer creative ID and creative dimensions, or to a buyer creative ID as a whole.+    creativeStatusIdentityType :: (Core.Maybe Core.Text),+    -- | Top-level deals status. Read-only. This field should not be set in requests. If disapproved, an entry for auctionType=DIRECT_DEALS (or ALL) in servingRestrictions will also exist. Note that this may be nuanced with other contextual restrictions, in which case it may be preferable to read from servingRestrictions directly.+    dealsStatus :: (Core.Maybe Core.Text),+    -- | Detected domains for this creative. Read-only. This field should not be set in requests.+    detectedDomains :: (Core.Maybe [Core.Text]),+    -- | The filtering reasons for the creative. Read-only. This field should not be set in requests.+    filteringReasons :: (Core.Maybe Creative_FilteringReasons),+    -- | Ad height.+    height :: (Core.Maybe Core.Int32),+    -- | The set of urls to be called to record an impression.+    impressionTrackingUrl :: (Core.Maybe [Core.Text]),+    -- | Resource type.+    kind :: Core.Text,+    -- | Detected languages for this creative. Read-only. This field should not be set in requests.+    languages :: (Core.Maybe [Core.Text]),+    -- | If nativeAd is set, HTMLSnippet, videoVastXML, and the videoURL outside of nativeAd should not be set. (The videoURL inside nativeAd can be set.)+    nativeAd :: (Core.Maybe Creative_NativeAd),+    -- | Top-level open auction status. Read-only. This field should not be set in requests. If disapproved, an entry for auctionType=OPEN_AUCTION (or ALL) in servingRestrictions will also exist. Note that this may be nuanced with other contextual restrictions, in which case it may be preferable to read from ServingRestrictions directly.+    openAuctionStatus :: (Core.Maybe Core.Text),+    -- | Detected product categories, if any. Each category is represented by an integer as defined in ad-product-categories.txt. Read-only. This field should not be set in requests.+    productCategories :: (Core.Maybe [Core.Int32]),+    -- | All restricted categories for the ads that may be shown from this snippet. Each category is represented by an integer as defined in the ad-restricted-categories.txt.+    restrictedCategories :: (Core.Maybe [Core.Int32]),+    -- | Detected sensitive categories, if any. Each category is represented by an integer as defined in ad-sensitive-categories.txt. Read-only. This field should not be set in requests.+    sensitiveCategories :: (Core.Maybe [Core.Int32]),+    -- | The granular status of this ad in specific contexts. A context here relates to where something ultimately serves (for example, a physical location, a platform, an HTTPS vs HTTP request, or the type of auction). Read-only. This field should not be set in requests. See the examples in the Creatives guide for more details.+    servingRestrictions :: (Core.Maybe [Creative_ServingRestrictionsItem]),+    -- | List of vendor types for the ads that may be shown from this snippet. Each vendor type is represented by an integer as defined in vendors.txt.+    vendorType :: (Core.Maybe [Core.Int32]),+    -- | The version for this creative. Read-only. This field should not be set in requests.+    version :: (Core.Maybe Core.Int32),+    -- | The URL to fetch a video ad. If set, HTMLSnippet, videoVastXML, and nativeAd should not be set. Note, this is different from resource.native/ad.video/url above.+    videoURL :: (Core.Maybe Core.Text),+    -- | The contents of a VAST document for a video ad. This document should conform to the VAST 2.0 or 3.0 standard. If set, HTMLSnippet, videoURL, and nativeAd and should not be set.+    videoVastXML :: (Core.Maybe Core.Text),+    -- | Ad width.+    width :: (Core.Maybe Core.Int32)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Creative' with the minimum fields required to make a request.+newCreative ::+  Creative+newCreative =+  Creative+    { hTMLSnippet = Core.Nothing,+      accountId = Core.Nothing,+      adChoicesDestinationUrl = Core.Nothing,+      adTechnologyProviders = Core.Nothing,+      advertiserId = Core.Nothing,+      advertiserName = Core.Nothing,+      agencyId = Core.Nothing,+      apiUploadTimestamp = Core.Nothing,+      attribute = Core.Nothing,+      buyerCreativeId = Core.Nothing,+      clickThroughUrl = Core.Nothing,+      corrections = Core.Nothing,+      creativeStatusIdentityType = Core.Nothing,+      dealsStatus = Core.Nothing,+      detectedDomains = Core.Nothing,+      filteringReasons = Core.Nothing,+      height = Core.Nothing,+      impressionTrackingUrl = Core.Nothing,+      kind = "adexchangebuyer#creative",+      languages = Core.Nothing,+      nativeAd = Core.Nothing,+      openAuctionStatus = Core.Nothing,+      productCategories = Core.Nothing,+      restrictedCategories = Core.Nothing,+      sensitiveCategories = Core.Nothing,+      servingRestrictions = Core.Nothing,+      vendorType = Core.Nothing,+      version = Core.Nothing,+      videoURL = Core.Nothing,+      videoVastXML = Core.Nothing,+      width = Core.Nothing+    }++instance Core.FromJSON Creative where+  parseJSON =+    Core.withObject+      "Creative"+      ( \o ->+          Creative+            Core.<$> (o Core..:? "HTMLSnippet")+            Core.<*> (o Core..:? "accountId")+            Core.<*> (o Core..:? "adChoicesDestinationUrl")+            Core.<*> (o Core..:? "adTechnologyProviders")+            Core.<*> ( o+                         Core..:? "advertiserId"+                         Core.<&> Core.fmap (Core.fmap Core.fromAsText)+                     )+            Core.<*> (o Core..:? "advertiserName")+            Core.<*> (o Core..:? "agencyId" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "apiUploadTimestamp")+            Core.<*> (o Core..:? "attribute")+            Core.<*> (o Core..:? "buyerCreativeId")+            Core.<*> (o Core..:? "clickThroughUrl")+            Core.<*> (o Core..:? "corrections")+            Core.<*> (o Core..:? "creativeStatusIdentityType")+            Core.<*> (o Core..:? "dealsStatus")+            Core.<*> (o Core..:? "detectedDomains")+            Core.<*> (o Core..:? "filteringReasons")+            Core.<*> (o Core..:? "height")+            Core.<*> (o Core..:? "impressionTrackingUrl")+            Core.<*> (o Core..:? "kind" Core..!= "adexchangebuyer#creative")+            Core.<*> (o Core..:? "languages")+            Core.<*> (o Core..:? "nativeAd")+            Core.<*> (o Core..:? "openAuctionStatus")+            Core.<*> (o Core..:? "productCategories")+            Core.<*> (o Core..:? "restrictedCategories")+            Core.<*> (o Core..:? "sensitiveCategories")+            Core.<*> (o Core..:? "servingRestrictions")+            Core.<*> (o Core..:? "vendorType")+            Core.<*> (o Core..:? "version")+            Core.<*> (o Core..:? "videoURL")+            Core.<*> (o Core..:? "videoVastXML")+            Core.<*> (o Core..:? "width")+      )++instance Core.ToJSON Creative where+  toJSON Creative {..} =+    Core.object+      ( Core.catMaybes+          [ ("HTMLSnippet" Core..=) Core.<$> hTMLSnippet,+            ("accountId" Core..=) Core.<$> accountId,+            ("adChoicesDestinationUrl" Core..=)+              Core.<$> adChoicesDestinationUrl,+            ("adTechnologyProviders" Core..=) Core.<$> adTechnologyProviders,+            ("advertiserId" Core..=)+              Core.. Core.fmap Core.AsText+              Core.<$> advertiserId,+            ("advertiserName" Core..=) Core.<$> advertiserName,+            ("agencyId" Core..=) Core.. Core.AsText Core.<$> agencyId,+            ("apiUploadTimestamp" Core..=) Core.<$> apiUploadTimestamp,+            ("attribute" Core..=) Core.<$> attribute,+            ("buyerCreativeId" Core..=) Core.<$> buyerCreativeId,+            ("clickThroughUrl" Core..=) Core.<$> clickThroughUrl,+            ("corrections" Core..=) Core.<$> corrections,+            ("creativeStatusIdentityType" Core..=)+              Core.<$> creativeStatusIdentityType,+            ("dealsStatus" Core..=) Core.<$> dealsStatus,+            ("detectedDomains" Core..=) Core.<$> detectedDomains,+            ("filteringReasons" Core..=) Core.<$> filteringReasons,+            ("height" Core..=) Core.<$> height,+            ("impressionTrackingUrl" Core..=) Core.<$> impressionTrackingUrl,+            Core.Just ("kind" Core..= kind),+            ("languages" Core..=) Core.<$> languages,+            ("nativeAd" Core..=) Core.<$> nativeAd,+            ("openAuctionStatus" Core..=) Core.<$> openAuctionStatus,+            ("productCategories" Core..=) Core.<$> productCategories,+            ("restrictedCategories" Core..=) Core.<$> restrictedCategories,+            ("sensitiveCategories" Core..=) Core.<$> sensitiveCategories,+            ("servingRestrictions" Core..=) Core.<$> servingRestrictions,+            ("vendorType" Core..=) Core.<$> vendorType,+            ("version" Core..=) Core.<$> version,+            ("videoURL" Core..=) Core.<$> videoURL,+            ("videoVastXML" Core..=) Core.<$> videoVastXML,+            ("width" Core..=) Core.<$> width+          ]+      )++--+-- /See:/ 'newCreative_AdTechnologyProviders' smart constructor.+data Creative_AdTechnologyProviders = Creative_AdTechnologyProviders+  { -- | The detected ad technology provider IDs for this creative. See https:\/\/storage.googleapis.com\/adx-rtb-dictionaries\/providers.csv for mapping of provider ID to provided name, a privacy policy URL, and a list of domains which can be attributed to the provider. If this creative contains provider IDs that are outside of those listed in the @BidRequest.adslot.consented_providers_settings.consented_providers@ field on the Authorized Buyers Real-Time Bidding protocol or the @BidRequest.user.ext.consented_providers_settings.consented_providers@ field on the OpenRTB protocol, a bid submitted for a European Economic Area (EEA) user with this creative is not compliant with the GDPR policies as mentioned in the \"Third-party Ad Technology Vendors\" section of Authorized Buyers Program Guidelines.+    detectedProviderIds :: (Core.Maybe [Core.Int64]),+    -- | Whether the creative contains an unidentified ad technology provider. If true, a bid submitted for a European Economic Area (EEA) user with this creative is not compliant with the GDPR policies as mentioned in the \"Third-party Ad Technology Vendors\" section of Authorized Buyers Program Guidelines.+    hasUnidentifiedProvider :: (Core.Maybe Core.Bool)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Creative_AdTechnologyProviders' with the minimum fields required to make a request.+newCreative_AdTechnologyProviders ::+  Creative_AdTechnologyProviders+newCreative_AdTechnologyProviders =+  Creative_AdTechnologyProviders+    { detectedProviderIds =+        Core.Nothing,+      hasUnidentifiedProvider = Core.Nothing+    }++instance Core.FromJSON Creative_AdTechnologyProviders where+  parseJSON =+    Core.withObject+      "Creative_AdTechnologyProviders"+      ( \o ->+          Creative_AdTechnologyProviders+            Core.<$> ( o+                         Core..:? "detectedProviderIds"+                         Core.<&> Core.fmap (Core.fmap Core.fromAsText)+                     )+            Core.<*> (o Core..:? "hasUnidentifiedProvider")+      )++instance Core.ToJSON Creative_AdTechnologyProviders where+  toJSON Creative_AdTechnologyProviders {..} =+    Core.object+      ( Core.catMaybes+          [ ("detectedProviderIds" Core..=)+              Core.. Core.fmap Core.AsText+              Core.<$> detectedProviderIds,+            ("hasUnidentifiedProvider" Core..=)+              Core.<$> hasUnidentifiedProvider+          ]+      )++--+-- /See:/ 'newCreative_CorrectionsItem' smart constructor.+data Creative_CorrectionsItem = Creative_CorrectionsItem+  { -- | All known serving contexts containing serving status information.+    contexts :: (Core.Maybe [Creative_CorrectionsItem_ContextsItem]),+    -- | Additional details about the correction.+    details :: (Core.Maybe [Core.Text]),+    -- | The type of correction that was applied to the creative.+    reason :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Creative_CorrectionsItem' with the minimum fields required to make a request.+newCreative_CorrectionsItem ::+  Creative_CorrectionsItem+newCreative_CorrectionsItem =+  Creative_CorrectionsItem+    { contexts = Core.Nothing,+      details = Core.Nothing,+      reason = Core.Nothing+    }++instance Core.FromJSON Creative_CorrectionsItem where+  parseJSON =+    Core.withObject+      "Creative_CorrectionsItem"+      ( \o ->+          Creative_CorrectionsItem+            Core.<$> (o Core..:? "contexts")+            Core.<*> (o Core..:? "details")+            Core.<*> (o Core..:? "reason")+      )++instance Core.ToJSON Creative_CorrectionsItem where+  toJSON Creative_CorrectionsItem {..} =+    Core.object+      ( Core.catMaybes+          [ ("contexts" Core..=) Core.<$> contexts,+            ("details" Core..=) Core.<$> details,+            ("reason" Core..=) Core.<$> reason+          ]+      )++--+-- /See:/ 'newCreative_CorrectionsItem_ContextsItem' smart constructor.+data Creative_CorrectionsItem_ContextsItem = Creative_CorrectionsItem_ContextsItem+  { -- | Only set when contextType=AUCTION_TYPE. Represents the auction types this correction applies to.+    auctionType :: (Core.Maybe [Core.Text]),+    -- | The type of context (e.g., location, platform, auction type, SSL-ness).+    contextType :: (Core.Maybe Core.Text),+    -- | Only set when contextType=LOCATION. Represents the geo criterias this correction applies to.+    geoCriteriaId :: (Core.Maybe [Core.Int32]),+    -- | Only set when contextType=PLATFORM. Represents the platforms this correction applies to.+    platform :: (Core.Maybe [Core.Text])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Creative_CorrectionsItem_ContextsItem' with the minimum fields required to make a request.+newCreative_CorrectionsItem_ContextsItem ::+  Creative_CorrectionsItem_ContextsItem+newCreative_CorrectionsItem_ContextsItem =+  Creative_CorrectionsItem_ContextsItem+    { auctionType = Core.Nothing,+      contextType = Core.Nothing,+      geoCriteriaId = Core.Nothing,+      platform = Core.Nothing+    }++instance Core.FromJSON Creative_CorrectionsItem_ContextsItem where+  parseJSON =+    Core.withObject+      "Creative_CorrectionsItem_ContextsItem"+      ( \o ->+          Creative_CorrectionsItem_ContextsItem+            Core.<$> (o Core..:? "auctionType")+            Core.<*> (o Core..:? "contextType")+            Core.<*> (o Core..:? "geoCriteriaId")+            Core.<*> (o Core..:? "platform")+      )++instance Core.ToJSON Creative_CorrectionsItem_ContextsItem where+  toJSON Creative_CorrectionsItem_ContextsItem {..} =+    Core.object+      ( Core.catMaybes+          [ ("auctionType" Core..=) Core.<$> auctionType,+            ("contextType" Core..=) Core.<$> contextType,+            ("geoCriteriaId" Core..=) Core.<$> geoCriteriaId,+            ("platform" Core..=) Core.<$> platform+          ]+      )++-- | The filtering reasons for the creative. Read-only. This field should not be set in requests.+--+-- /See:/ 'newCreative_FilteringReasons' smart constructor.+data Creative_FilteringReasons = Creative_FilteringReasons+  { -- | The date in ISO 8601 format for the data. The data is collected from 00:00:00 to 23:59:59 in PST.+    date :: (Core.Maybe Core.Text),+    -- | The filtering reasons.+    reasons :: (Core.Maybe [Creative_FilteringReasons_ReasonsItem])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Creative_FilteringReasons' with the minimum fields required to make a request.+newCreative_FilteringReasons ::+  Creative_FilteringReasons+newCreative_FilteringReasons =+  Creative_FilteringReasons+    { date = Core.Nothing,+      reasons = Core.Nothing+    }++instance Core.FromJSON Creative_FilteringReasons where+  parseJSON =+    Core.withObject+      "Creative_FilteringReasons"+      ( \o ->+          Creative_FilteringReasons+            Core.<$> (o Core..:? "date")+            Core.<*> (o Core..:? "reasons")+      )++instance Core.ToJSON Creative_FilteringReasons where+  toJSON Creative_FilteringReasons {..} =+    Core.object+      ( Core.catMaybes+          [ ("date" Core..=) Core.<$> date,+            ("reasons" Core..=) Core.<$> reasons+          ]+      )++--+-- /See:/ 'newCreative_FilteringReasons_ReasonsItem' smart constructor.+data Creative_FilteringReasons_ReasonsItem = Creative_FilteringReasons_ReasonsItem+  { -- | The number of times the creative was filtered for the status. The count is aggregated across all publishers on the exchange.+    filteringCount :: (Core.Maybe Core.Int64),+    -- | The filtering status code as defined in creative-status-codes.txt.+    filteringStatus :: (Core.Maybe Core.Int32)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Creative_FilteringReasons_ReasonsItem' with the minimum fields required to make a request.+newCreative_FilteringReasons_ReasonsItem ::+  Creative_FilteringReasons_ReasonsItem+newCreative_FilteringReasons_ReasonsItem =+  Creative_FilteringReasons_ReasonsItem+    { filteringCount =+        Core.Nothing,+      filteringStatus = Core.Nothing+    }++instance Core.FromJSON Creative_FilteringReasons_ReasonsItem where+  parseJSON =+    Core.withObject+      "Creative_FilteringReasons_ReasonsItem"+      ( \o ->+          Creative_FilteringReasons_ReasonsItem+            Core.<$> (o Core..:? "filteringCount" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "filteringStatus")+      )++instance Core.ToJSON Creative_FilteringReasons_ReasonsItem where+  toJSON Creative_FilteringReasons_ReasonsItem {..} =+    Core.object+      ( Core.catMaybes+          [ ("filteringCount" Core..=)+              Core.. Core.AsText+              Core.<$> filteringCount,+            ("filteringStatus" Core..=) Core.<$> filteringStatus+          ]+      )++-- | If nativeAd is set, HTMLSnippet, videoVastXML, and the videoURL outside of nativeAd should not be set. (The videoURL inside nativeAd can be set.)+--+-- /See:/ 'newCreative_NativeAd' smart constructor.+data Creative_NativeAd = Creative_NativeAd+  { advertiser :: (Core.Maybe Core.Text),+    -- | The app icon, for app download ads.+    appIcon :: (Core.Maybe Creative_NativeAd_AppIcon),+    -- | A long description of the ad.+    body :: (Core.Maybe Core.Text),+    -- | A label for the button that the user is supposed to click.+    callToAction :: (Core.Maybe Core.Text),+    -- | The URL that the browser\/SDK will load when the user clicks the ad.+    clickLinkUrl :: (Core.Maybe Core.Text),+    -- | The URL to use for click tracking.+    clickTrackingUrl :: (Core.Maybe Core.Text),+    -- | A short title for the ad.+    headline :: (Core.Maybe Core.Text),+    -- | A large image.+    image :: (Core.Maybe Creative_NativeAd_Image),+    -- | The URLs are called when the impression is rendered.+    impressionTrackingUrl :: (Core.Maybe [Core.Text]),+    -- | A smaller image, for the advertiser logo.+    logo :: (Core.Maybe Creative_NativeAd_Logo),+    -- | The price of the promoted app including the currency info.+    price :: (Core.Maybe Core.Text),+    -- | The app rating in the app store. Must be in the range [0-5].+    starRating :: (Core.Maybe Core.Double),+    -- | The URL of the XML VAST for a native ad. Note this is a separate field from resource.video_url.+    videoURL :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Creative_NativeAd' with the minimum fields required to make a request.+newCreative_NativeAd ::+  Creative_NativeAd+newCreative_NativeAd =+  Creative_NativeAd+    { advertiser = Core.Nothing,+      appIcon = Core.Nothing,+      body = Core.Nothing,+      callToAction = Core.Nothing,+      clickLinkUrl = Core.Nothing,+      clickTrackingUrl = Core.Nothing,+      headline = Core.Nothing,+      image = Core.Nothing,+      impressionTrackingUrl = Core.Nothing,+      logo = Core.Nothing,+      price = Core.Nothing,+      starRating = Core.Nothing,+      videoURL = Core.Nothing+    }++instance Core.FromJSON Creative_NativeAd where+  parseJSON =+    Core.withObject+      "Creative_NativeAd"+      ( \o ->+          Creative_NativeAd+            Core.<$> (o Core..:? "advertiser")+            Core.<*> (o Core..:? "appIcon")+            Core.<*> (o Core..:? "body")+            Core.<*> (o Core..:? "callToAction")+            Core.<*> (o Core..:? "clickLinkUrl")+            Core.<*> (o Core..:? "clickTrackingUrl")+            Core.<*> (o Core..:? "headline")+            Core.<*> (o Core..:? "image")+            Core.<*> (o Core..:? "impressionTrackingUrl")+            Core.<*> (o Core..:? "logo")+            Core.<*> (o Core..:? "price")+            Core.<*> (o Core..:? "starRating")+            Core.<*> (o Core..:? "videoURL")+      )++instance Core.ToJSON Creative_NativeAd where+  toJSON Creative_NativeAd {..} =+    Core.object+      ( Core.catMaybes+          [ ("advertiser" Core..=) Core.<$> advertiser,+            ("appIcon" Core..=) Core.<$> appIcon,+            ("body" Core..=) Core.<$> body,+            ("callToAction" Core..=) Core.<$> callToAction,+            ("clickLinkUrl" Core..=) Core.<$> clickLinkUrl,+            ("clickTrackingUrl" Core..=) Core.<$> clickTrackingUrl,+            ("headline" Core..=) Core.<$> headline,+            ("image" Core..=) Core.<$> image,+            ("impressionTrackingUrl" Core..=) Core.<$> impressionTrackingUrl,+            ("logo" Core..=) Core.<$> logo,+            ("price" Core..=) Core.<$> price,+            ("starRating" Core..=) Core.<$> starRating,+            ("videoURL" Core..=) Core.<$> videoURL+          ]+      )++-- | The app icon, for app download ads.+--+-- /See:/ 'newCreative_NativeAd_AppIcon' smart constructor.+data Creative_NativeAd_AppIcon = Creative_NativeAd_AppIcon+  { height :: (Core.Maybe Core.Int32),+    url :: (Core.Maybe Core.Text),+    width :: (Core.Maybe Core.Int32)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Creative_NativeAd_AppIcon' with the minimum fields required to make a request.+newCreative_NativeAd_AppIcon ::+  Creative_NativeAd_AppIcon+newCreative_NativeAd_AppIcon =+  Creative_NativeAd_AppIcon+    { height = Core.Nothing,+      url = Core.Nothing,+      width = Core.Nothing+    }++instance Core.FromJSON Creative_NativeAd_AppIcon where+  parseJSON =+    Core.withObject+      "Creative_NativeAd_AppIcon"+      ( \o ->+          Creative_NativeAd_AppIcon+            Core.<$> (o Core..:? "height")+            Core.<*> (o Core..:? "url")+            Core.<*> (o Core..:? "width")+      )++instance Core.ToJSON Creative_NativeAd_AppIcon where+  toJSON Creative_NativeAd_AppIcon {..} =+    Core.object+      ( Core.catMaybes+          [ ("height" Core..=) Core.<$> height,+            ("url" Core..=) Core.<$> url,+            ("width" Core..=) Core.<$> width+          ]+      )++-- | A large image.+--+-- /See:/ 'newCreative_NativeAd_Image' smart constructor.+data Creative_NativeAd_Image = Creative_NativeAd_Image+  { height :: (Core.Maybe Core.Int32),+    url :: (Core.Maybe Core.Text),+    width :: (Core.Maybe Core.Int32)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Creative_NativeAd_Image' with the minimum fields required to make a request.+newCreative_NativeAd_Image ::+  Creative_NativeAd_Image+newCreative_NativeAd_Image =+  Creative_NativeAd_Image+    { height = Core.Nothing,+      url = Core.Nothing,+      width = Core.Nothing+    }++instance Core.FromJSON Creative_NativeAd_Image where+  parseJSON =+    Core.withObject+      "Creative_NativeAd_Image"+      ( \o ->+          Creative_NativeAd_Image+            Core.<$> (o Core..:? "height")+            Core.<*> (o Core..:? "url")+            Core.<*> (o Core..:? "width")+      )++instance Core.ToJSON Creative_NativeAd_Image where+  toJSON Creative_NativeAd_Image {..} =+    Core.object+      ( Core.catMaybes+          [ ("height" Core..=) Core.<$> height,+            ("url" Core..=) Core.<$> url,+            ("width" Core..=) Core.<$> width+          ]+      )++-- | A smaller image, for the advertiser logo.+--+-- /See:/ 'newCreative_NativeAd_Logo' smart constructor.+data Creative_NativeAd_Logo = Creative_NativeAd_Logo+  { height :: (Core.Maybe Core.Int32),+    url :: (Core.Maybe Core.Text),+    width :: (Core.Maybe Core.Int32)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Creative_NativeAd_Logo' with the minimum fields required to make a request.+newCreative_NativeAd_Logo ::+  Creative_NativeAd_Logo+newCreative_NativeAd_Logo =+  Creative_NativeAd_Logo+    { height = Core.Nothing,+      url = Core.Nothing,+      width = Core.Nothing+    }++instance Core.FromJSON Creative_NativeAd_Logo where+  parseJSON =+    Core.withObject+      "Creative_NativeAd_Logo"+      ( \o ->+          Creative_NativeAd_Logo+            Core.<$> (o Core..:? "height")+            Core.<*> (o Core..:? "url")+            Core.<*> (o Core..:? "width")+      )++instance Core.ToJSON Creative_NativeAd_Logo where+  toJSON Creative_NativeAd_Logo {..} =+    Core.object+      ( Core.catMaybes+          [ ("height" Core..=) Core.<$> height,+            ("url" Core..=) Core.<$> url,+            ("width" Core..=) Core.<$> width+          ]+      )++--+-- /See:/ 'newCreative_ServingRestrictionsItem' smart constructor.+data Creative_ServingRestrictionsItem = Creative_ServingRestrictionsItem+  { -- | All known contexts\/restrictions.+    contexts :: (Core.Maybe [Creative_ServingRestrictionsItem_ContextsItem]),+    -- | The reasons for disapproval within this restriction, if any. Note that not all disapproval reasons may be categorized, so it is possible for the creative to have a status of DISAPPROVED or CONDITIONALLY/APPROVED with an empty list for disapproval/reasons. In this case, please reach out to your TAM to help debug the issue.+    disapprovalReasons ::+      ( Core.Maybe+          [Creative_ServingRestrictionsItem_DisapprovalReasonsItem]+      ),+    -- | Why the creative is ineligible to serve in this context (e.g., it has been explicitly disapproved or is pending review).+    reason :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Creative_ServingRestrictionsItem' with the minimum fields required to make a request.+newCreative_ServingRestrictionsItem ::+  Creative_ServingRestrictionsItem+newCreative_ServingRestrictionsItem =+  Creative_ServingRestrictionsItem+    { contexts = Core.Nothing,+      disapprovalReasons = Core.Nothing,+      reason = Core.Nothing+    }++instance Core.FromJSON Creative_ServingRestrictionsItem where+  parseJSON =+    Core.withObject+      "Creative_ServingRestrictionsItem"+      ( \o ->+          Creative_ServingRestrictionsItem+            Core.<$> (o Core..:? "contexts")+            Core.<*> (o Core..:? "disapprovalReasons")+            Core.<*> (o Core..:? "reason")+      )++instance Core.ToJSON Creative_ServingRestrictionsItem where+  toJSON Creative_ServingRestrictionsItem {..} =+    Core.object+      ( Core.catMaybes+          [ ("contexts" Core..=) Core.<$> contexts,+            ("disapprovalReasons" Core..=) Core.<$> disapprovalReasons,+            ("reason" Core..=) Core.<$> reason+          ]+      )++--+-- /See:/ 'newCreative_ServingRestrictionsItem_ContextsItem' smart constructor.+data Creative_ServingRestrictionsItem_ContextsItem = Creative_ServingRestrictionsItem_ContextsItem+  { -- | Only set when contextType=AUCTION_TYPE. Represents the auction types this restriction applies to.+    auctionType :: (Core.Maybe [Core.Text]),+    -- | The type of context (e.g., location, platform, auction type, SSL-ness).+    contextType :: (Core.Maybe Core.Text),+    -- | Only set when contextType=LOCATION. Represents the geo criterias this restriction applies to. Impressions are considered to match a context if either the user location or publisher location matches a given geoCriteriaId.+    geoCriteriaId :: (Core.Maybe [Core.Int32]),+    -- | Only set when contextType=PLATFORM. Represents the platforms this restriction applies to.+    platform :: (Core.Maybe [Core.Text])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Creative_ServingRestrictionsItem_ContextsItem' with the minimum fields required to make a request.+newCreative_ServingRestrictionsItem_ContextsItem ::+  Creative_ServingRestrictionsItem_ContextsItem+newCreative_ServingRestrictionsItem_ContextsItem =+  Creative_ServingRestrictionsItem_ContextsItem+    { auctionType =+        Core.Nothing,+      contextType = Core.Nothing,+      geoCriteriaId = Core.Nothing,+      platform = Core.Nothing+    }++instance+  Core.FromJSON+    Creative_ServingRestrictionsItem_ContextsItem+  where+  parseJSON =+    Core.withObject+      "Creative_ServingRestrictionsItem_ContextsItem"+      ( \o ->+          Creative_ServingRestrictionsItem_ContextsItem+            Core.<$> (o Core..:? "auctionType")+            Core.<*> (o Core..:? "contextType")+            Core.<*> (o Core..:? "geoCriteriaId")+            Core.<*> (o Core..:? "platform")+      )++instance Core.ToJSON Creative_ServingRestrictionsItem_ContextsItem where+  toJSON Creative_ServingRestrictionsItem_ContextsItem {..} =+    Core.object+      ( Core.catMaybes+          [ ("auctionType" Core..=) Core.<$> auctionType,+            ("contextType" Core..=) Core.<$> contextType,+            ("geoCriteriaId" Core..=) Core.<$> geoCriteriaId,+            ("platform" Core..=) Core.<$> platform+          ]+      )++--+-- /See:/ 'newCreative_ServingRestrictionsItem_DisapprovalReasonsItem' smart constructor.+data Creative_ServingRestrictionsItem_DisapprovalReasonsItem = Creative_ServingRestrictionsItem_DisapprovalReasonsItem+  { -- | Additional details about the reason for disapproval.+    details :: (Core.Maybe [Core.Text]),+    -- | The categorized reason for disapproval.+    reason :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Creative_ServingRestrictionsItem_DisapprovalReasonsItem' with the minimum fields required to make a request.+newCreative_ServingRestrictionsItem_DisapprovalReasonsItem ::+  Creative_ServingRestrictionsItem_DisapprovalReasonsItem+newCreative_ServingRestrictionsItem_DisapprovalReasonsItem =+  Creative_ServingRestrictionsItem_DisapprovalReasonsItem+    { details =+        Core.Nothing,+      reason = Core.Nothing+    }++instance+  Core.FromJSON+    Creative_ServingRestrictionsItem_DisapprovalReasonsItem+  where+  parseJSON =+    Core.withObject+      "Creative_ServingRestrictionsItem_DisapprovalReasonsItem"+      ( \o ->+          Creative_ServingRestrictionsItem_DisapprovalReasonsItem+            Core.<$> (o Core..:? "details")+            Core.<*> (o Core..:? "reason")+      )++instance+  Core.ToJSON+    Creative_ServingRestrictionsItem_DisapprovalReasonsItem+  where+  toJSON Creative_ServingRestrictionsItem_DisapprovalReasonsItem {..} =+    Core.object+      ( Core.catMaybes+          [ ("details" Core..=) Core.<$> details,+            ("reason" Core..=) Core.<$> reason+          ]+      )++-- | The external deal ids associated with a creative.+--+-- /See:/ 'newCreativeDealIds' smart constructor.+data CreativeDealIds = CreativeDealIds+  { -- | A list of external deal ids and ARC approval status.+    dealStatuses :: (Core.Maybe [CreativeDealIds_DealStatusesItem]),+    -- | Resource type.+    kind :: Core.Text+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CreativeDealIds' with the minimum fields required to make a request.+newCreativeDealIds ::+  CreativeDealIds+newCreativeDealIds =+  CreativeDealIds+    { dealStatuses = Core.Nothing,+      kind = "adexchangebuyer#creativeDealIds"+    }++instance Core.FromJSON CreativeDealIds where+  parseJSON =+    Core.withObject+      "CreativeDealIds"+      ( \o ->+          CreativeDealIds+            Core.<$> (o Core..:? "dealStatuses")+            Core.<*> (o Core..:? "kind" Core..!= "adexchangebuyer#creativeDealIds")+      )++instance Core.ToJSON CreativeDealIds where+  toJSON CreativeDealIds {..} =+    Core.object+      ( Core.catMaybes+          [ ("dealStatuses" Core..=) Core.<$> dealStatuses,+            Core.Just ("kind" Core..= kind)+          ]+      )++--+-- /See:/ 'newCreativeDealIds_DealStatusesItem' smart constructor.+data CreativeDealIds_DealStatusesItem = CreativeDealIds_DealStatusesItem+  { -- | ARC approval status.+    arcStatus :: (Core.Maybe Core.Text),+    -- | External deal ID.+    dealId :: (Core.Maybe Core.Int64),+    -- | Publisher ID.+    webPropertyId :: (Core.Maybe Core.Int32)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CreativeDealIds_DealStatusesItem' with the minimum fields required to make a request.+newCreativeDealIds_DealStatusesItem ::+  CreativeDealIds_DealStatusesItem+newCreativeDealIds_DealStatusesItem =+  CreativeDealIds_DealStatusesItem+    { arcStatus = Core.Nothing,+      dealId = Core.Nothing,+      webPropertyId = Core.Nothing+    }++instance Core.FromJSON CreativeDealIds_DealStatusesItem where+  parseJSON =+    Core.withObject+      "CreativeDealIds_DealStatusesItem"+      ( \o ->+          CreativeDealIds_DealStatusesItem+            Core.<$> (o Core..:? "arcStatus")+            Core.<*> (o Core..:? "dealId" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "webPropertyId")+      )++instance Core.ToJSON CreativeDealIds_DealStatusesItem where+  toJSON CreativeDealIds_DealStatusesItem {..} =+    Core.object+      ( Core.catMaybes+          [ ("arcStatus" Core..=) Core.<$> arcStatus,+            ("dealId" Core..=) Core.. Core.AsText Core.<$> dealId,+            ("webPropertyId" Core..=) Core.<$> webPropertyId+          ]+      )++-- | The creatives feed lists the active creatives for the Ad Exchange buyer accounts that the user has access to. Each entry in the feed corresponds to a single creative.+--+-- /See:/ 'newCreativesList' smart constructor.+data CreativesList = CreativesList+  { -- | A list of creatives.+    items :: (Core.Maybe [Creative]),+    -- | Resource type.+    kind :: Core.Text,+    -- | Continuation token used to page through creatives. To retrieve the next page of results, set the next request\'s \"pageToken\" value to this.+    nextPageToken :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CreativesList' with the minimum fields required to make a request.+newCreativesList ::+  CreativesList+newCreativesList =+  CreativesList+    { items = Core.Nothing,+      kind = "adexchangebuyer#creativesList",+      nextPageToken = Core.Nothing+    }++instance Core.FromJSON CreativesList where+  parseJSON =+    Core.withObject+      "CreativesList"+      ( \o ->+          CreativesList+            Core.<$> (o Core..:? "items")+            Core.<*> (o Core..:? "kind" Core..!= "adexchangebuyer#creativesList")+            Core.<*> (o Core..:? "nextPageToken")+      )++instance Core.ToJSON CreativesList where+  toJSON CreativesList {..} =+    Core.object+      ( Core.catMaybes+          [ ("items" Core..=) Core.<$> items,+            Core.Just ("kind" Core..= kind),+            ("nextPageToken" Core..=) Core.<$> nextPageToken+          ]+      )++--+-- /See:/ 'newDealServingMetadata' smart constructor.+data DealServingMetadata = DealServingMetadata+  { -- | True if alcohol ads are allowed for this deal (read-only). This field is only populated when querying for finalized orders using the method GetFinalizedOrderDeals+    alcoholAdsAllowed :: (Core.Maybe Core.Bool),+    -- | Tracks which parties (if any) have paused a deal. (readonly, except via PauseResumeOrderDeals action)+    dealPauseStatus :: (Core.Maybe DealServingMetadataDealPauseStatus)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DealServingMetadata' with the minimum fields required to make a request.+newDealServingMetadata ::+  DealServingMetadata+newDealServingMetadata =+  DealServingMetadata+    { alcoholAdsAllowed = Core.Nothing,+      dealPauseStatus = Core.Nothing+    }++instance Core.FromJSON DealServingMetadata where+  parseJSON =+    Core.withObject+      "DealServingMetadata"+      ( \o ->+          DealServingMetadata+            Core.<$> (o Core..:? "alcoholAdsAllowed")+            Core.<*> (o Core..:? "dealPauseStatus")+      )++instance Core.ToJSON DealServingMetadata where+  toJSON DealServingMetadata {..} =+    Core.object+      ( Core.catMaybes+          [ ("alcoholAdsAllowed" Core..=) Core.<$> alcoholAdsAllowed,+            ("dealPauseStatus" Core..=) Core.<$> dealPauseStatus+          ]+      )++-- | Tracks which parties (if any) have paused a deal. The deal is considered paused if has/buyer/paused || has/seller/paused. Each of the has/buyer/paused or the has/seller/paused bits can be set independently.+--+-- /See:/ 'newDealServingMetadataDealPauseStatus' smart constructor.+data DealServingMetadataDealPauseStatus = DealServingMetadataDealPauseStatus+  { buyerPauseReason :: (Core.Maybe Core.Text),+    -- | If the deal is paused, records which party paused the deal first.+    firstPausedBy :: (Core.Maybe Core.Text),+    hasBuyerPaused :: (Core.Maybe Core.Bool),+    hasSellerPaused :: (Core.Maybe Core.Bool),+    sellerPauseReason :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DealServingMetadataDealPauseStatus' with the minimum fields required to make a request.+newDealServingMetadataDealPauseStatus ::+  DealServingMetadataDealPauseStatus+newDealServingMetadataDealPauseStatus =+  DealServingMetadataDealPauseStatus+    { buyerPauseReason =+        Core.Nothing,+      firstPausedBy = Core.Nothing,+      hasBuyerPaused = Core.Nothing,+      hasSellerPaused = Core.Nothing,+      sellerPauseReason = Core.Nothing+    }++instance Core.FromJSON DealServingMetadataDealPauseStatus where+  parseJSON =+    Core.withObject+      "DealServingMetadataDealPauseStatus"+      ( \o ->+          DealServingMetadataDealPauseStatus+            Core.<$> (o Core..:? "buyerPauseReason")+            Core.<*> (o Core..:? "firstPausedBy")+            Core.<*> (o Core..:? "hasBuyerPaused")+            Core.<*> (o Core..:? "hasSellerPaused")+            Core.<*> (o Core..:? "sellerPauseReason")+      )++instance Core.ToJSON DealServingMetadataDealPauseStatus where+  toJSON DealServingMetadataDealPauseStatus {..} =+    Core.object+      ( Core.catMaybes+          [ ("buyerPauseReason" Core..=) Core.<$> buyerPauseReason,+            ("firstPausedBy" Core..=) Core.<$> firstPausedBy,+            ("hasBuyerPaused" Core..=) Core.<$> hasBuyerPaused,+            ("hasSellerPaused" Core..=) Core.<$> hasSellerPaused,+            ("sellerPauseReason" Core..=) Core.<$> sellerPauseReason+          ]+      )++--+-- /See:/ 'newDealTerms' smart constructor.+data DealTerms = DealTerms+  { -- | Visibility of the URL in bid requests.+    brandingType :: (Core.Maybe Core.Text),+    -- | Indicates that this ExternalDealId exists under at least two different AdxInventoryDeals. Currently, the only case that the same ExternalDealId will exist is programmatic cross sell case.+    crossListedExternalDealIdType :: (Core.Maybe Core.Text),+    -- | Description for the proposed terms of the deal.+    description :: (Core.Maybe Core.Text),+    -- | Non-binding estimate of the estimated gross spend for this deal Can be set by buyer or seller.+    estimatedGrossSpend :: (Core.Maybe Price),+    -- | Non-binding estimate of the impressions served per day Can be set by buyer or seller.+    estimatedImpressionsPerDay :: (Core.Maybe Core.Int64),+    -- | The terms for guaranteed fixed price deals.+    guaranteedFixedPriceTerms :: (Core.Maybe DealTermsGuaranteedFixedPriceTerms),+    -- | The terms for non-guaranteed auction deals.+    nonGuaranteedAuctionTerms :: (Core.Maybe DealTermsNonGuaranteedAuctionTerms),+    -- | The terms for non-guaranteed fixed price deals.+    nonGuaranteedFixedPriceTerms :: (Core.Maybe DealTermsNonGuaranteedFixedPriceTerms),+    -- | The terms for rubicon non-guaranteed deals.+    rubiconNonGuaranteedTerms :: (Core.Maybe DealTermsRubiconNonGuaranteedTerms),+    -- | For deals with Cost Per Day billing, defines the timezone used to mark the boundaries of a day (buyer-readonly)+    sellerTimeZone :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DealTerms' with the minimum fields required to make a request.+newDealTerms ::+  DealTerms+newDealTerms =+  DealTerms+    { brandingType = Core.Nothing,+      crossListedExternalDealIdType = Core.Nothing,+      description = Core.Nothing,+      estimatedGrossSpend = Core.Nothing,+      estimatedImpressionsPerDay = Core.Nothing,+      guaranteedFixedPriceTerms = Core.Nothing,+      nonGuaranteedAuctionTerms = Core.Nothing,+      nonGuaranteedFixedPriceTerms = Core.Nothing,+      rubiconNonGuaranteedTerms = Core.Nothing,+      sellerTimeZone = Core.Nothing+    }++instance Core.FromJSON DealTerms where+  parseJSON =+    Core.withObject+      "DealTerms"+      ( \o ->+          DealTerms+            Core.<$> (o Core..:? "brandingType")+            Core.<*> (o Core..:? "crossListedExternalDealIdType")+            Core.<*> (o Core..:? "description")+            Core.<*> (o Core..:? "estimatedGrossSpend")+            Core.<*> ( o+                         Core..:? "estimatedImpressionsPerDay"+                         Core.<&> Core.fmap Core.fromAsText+                     )+            Core.<*> (o Core..:? "guaranteedFixedPriceTerms")+            Core.<*> (o Core..:? "nonGuaranteedAuctionTerms")+            Core.<*> (o Core..:? "nonGuaranteedFixedPriceTerms")+            Core.<*> (o Core..:? "rubiconNonGuaranteedTerms")+            Core.<*> (o Core..:? "sellerTimeZone")+      )++instance Core.ToJSON DealTerms where+  toJSON DealTerms {..} =+    Core.object+      ( Core.catMaybes+          [ ("brandingType" Core..=) Core.<$> brandingType,+            ("crossListedExternalDealIdType" Core..=)+              Core.<$> crossListedExternalDealIdType,+            ("description" Core..=) Core.<$> description,+            ("estimatedGrossSpend" Core..=) Core.<$> estimatedGrossSpend,+            ("estimatedImpressionsPerDay" Core..=)+              Core.. Core.AsText+              Core.<$> estimatedImpressionsPerDay,+            ("guaranteedFixedPriceTerms" Core..=)+              Core.<$> guaranteedFixedPriceTerms,+            ("nonGuaranteedAuctionTerms" Core..=)+              Core.<$> nonGuaranteedAuctionTerms,+            ("nonGuaranteedFixedPriceTerms" Core..=)+              Core.<$> nonGuaranteedFixedPriceTerms,+            ("rubiconNonGuaranteedTerms" Core..=)+              Core.<$> rubiconNonGuaranteedTerms,+            ("sellerTimeZone" Core..=) Core.<$> sellerTimeZone+          ]+      )++--+-- /See:/ 'newDealTermsGuaranteedFixedPriceTerms' smart constructor.+data DealTermsGuaranteedFixedPriceTerms = DealTermsGuaranteedFixedPriceTerms+  { -- | External billing info for this Deal. This field is relevant when external billing info such as price has a different currency code than DFP\/AdX.+    billingInfo :: (Core.Maybe DealTermsGuaranteedFixedPriceTermsBillingInfo),+    -- | Fixed price for the specified buyer.+    fixedPrices :: (Core.Maybe [PricePerBuyer]),+    -- | Guaranteed impressions as a percentage. This is the percentage of guaranteed looks that the buyer is guaranteeing to buy.+    guaranteedImpressions :: (Core.Maybe Core.Int64),+    -- | Count of guaranteed looks. Required for deal, optional for product. For CPD deals, buyer changes to guaranteed_looks will be ignored.+    guaranteedLooks :: (Core.Maybe Core.Int64),+    -- | Count of minimum daily looks for a CPD deal. For CPD deals, buyer should negotiate on this field instead of guaranteed_looks.+    minimumDailyLooks :: (Core.Maybe Core.Int64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DealTermsGuaranteedFixedPriceTerms' with the minimum fields required to make a request.+newDealTermsGuaranteedFixedPriceTerms ::+  DealTermsGuaranteedFixedPriceTerms+newDealTermsGuaranteedFixedPriceTerms =+  DealTermsGuaranteedFixedPriceTerms+    { billingInfo = Core.Nothing,+      fixedPrices = Core.Nothing,+      guaranteedImpressions = Core.Nothing,+      guaranteedLooks = Core.Nothing,+      minimumDailyLooks = Core.Nothing+    }++instance Core.FromJSON DealTermsGuaranteedFixedPriceTerms where+  parseJSON =+    Core.withObject+      "DealTermsGuaranteedFixedPriceTerms"+      ( \o ->+          DealTermsGuaranteedFixedPriceTerms+            Core.<$> (o Core..:? "billingInfo")+            Core.<*> (o Core..:? "fixedPrices")+            Core.<*> ( o+                         Core..:? "guaranteedImpressions"+                         Core.<&> Core.fmap Core.fromAsText+                     )+            Core.<*> (o Core..:? "guaranteedLooks" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> ( o+                         Core..:? "minimumDailyLooks"+                         Core.<&> Core.fmap Core.fromAsText+                     )+      )++instance Core.ToJSON DealTermsGuaranteedFixedPriceTerms where+  toJSON DealTermsGuaranteedFixedPriceTerms {..} =+    Core.object+      ( Core.catMaybes+          [ ("billingInfo" Core..=) Core.<$> billingInfo,+            ("fixedPrices" Core..=) Core.<$> fixedPrices,+            ("guaranteedImpressions" Core..=)+              Core.. Core.AsText+              Core.<$> guaranteedImpressions,+            ("guaranteedLooks" Core..=)+              Core.. Core.AsText+              Core.<$> guaranteedLooks,+            ("minimumDailyLooks" Core..=)+              Core.. Core.AsText+              Core.<$> minimumDailyLooks+          ]+      )++--+-- /See:/ 'newDealTermsGuaranteedFixedPriceTermsBillingInfo' smart constructor.+data DealTermsGuaranteedFixedPriceTermsBillingInfo = DealTermsGuaranteedFixedPriceTermsBillingInfo+  { -- | The timestamp (in ms since epoch) when the original reservation price for the deal was first converted to DFP currency. This is used to convert the contracted price into buyer\'s currency without discrepancy.+    currencyConversionTimeMs :: (Core.Maybe Core.Int64),+    -- | The DFP line item id associated with this deal. For features like CPD, buyers can retrieve the DFP line item for billing reconciliation.+    dfpLineItemId :: (Core.Maybe Core.Int64),+    -- | The original contracted quantity (# impressions) for this deal. To ensure delivery, sometimes the publisher will book the deal with a impression buffer, such that guaranteed_looks is greater than the contracted quantity. However clients are billed using the original contracted quantity.+    originalContractedQuantity :: (Core.Maybe Core.Int64),+    -- | The original reservation price for the deal, if the currency code is different from the one used in negotiation.+    price :: (Core.Maybe Price)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DealTermsGuaranteedFixedPriceTermsBillingInfo' with the minimum fields required to make a request.+newDealTermsGuaranteedFixedPriceTermsBillingInfo ::+  DealTermsGuaranteedFixedPriceTermsBillingInfo+newDealTermsGuaranteedFixedPriceTermsBillingInfo =+  DealTermsGuaranteedFixedPriceTermsBillingInfo+    { currencyConversionTimeMs =+        Core.Nothing,+      dfpLineItemId = Core.Nothing,+      originalContractedQuantity = Core.Nothing,+      price = Core.Nothing+    }++instance+  Core.FromJSON+    DealTermsGuaranteedFixedPriceTermsBillingInfo+  where+  parseJSON =+    Core.withObject+      "DealTermsGuaranteedFixedPriceTermsBillingInfo"+      ( \o ->+          DealTermsGuaranteedFixedPriceTermsBillingInfo+            Core.<$> ( o+                         Core..:? "currencyConversionTimeMs"+                         Core.<&> Core.fmap Core.fromAsText+                     )+            Core.<*> (o Core..:? "dfpLineItemId" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> ( o+                         Core..:? "originalContractedQuantity"+                         Core.<&> Core.fmap Core.fromAsText+                     )+            Core.<*> (o Core..:? "price")+      )++instance Core.ToJSON DealTermsGuaranteedFixedPriceTermsBillingInfo where+  toJSON DealTermsGuaranteedFixedPriceTermsBillingInfo {..} =+    Core.object+      ( Core.catMaybes+          [ ("currencyConversionTimeMs" Core..=)+              Core.. Core.AsText+              Core.<$> currencyConversionTimeMs,+            ("dfpLineItemId" Core..=)+              Core.. Core.AsText+              Core.<$> dfpLineItemId,+            ("originalContractedQuantity" Core..=)+              Core.. Core.AsText+              Core.<$> originalContractedQuantity,+            ("price" Core..=) Core.<$> price+          ]+      )++--+-- /See:/ 'newDealTermsNonGuaranteedAuctionTerms' smart constructor.+data DealTermsNonGuaranteedAuctionTerms = DealTermsNonGuaranteedAuctionTerms+  { -- | True if open auction buyers are allowed to compete with invited buyers in this private auction (buyer-readonly).+    autoOptimizePrivateAuction :: (Core.Maybe Core.Bool),+    -- | Reserve price for the specified buyer.+    reservePricePerBuyers :: (Core.Maybe [PricePerBuyer])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DealTermsNonGuaranteedAuctionTerms' with the minimum fields required to make a request.+newDealTermsNonGuaranteedAuctionTerms ::+  DealTermsNonGuaranteedAuctionTerms+newDealTermsNonGuaranteedAuctionTerms =+  DealTermsNonGuaranteedAuctionTerms+    { autoOptimizePrivateAuction =+        Core.Nothing,+      reservePricePerBuyers = Core.Nothing+    }++instance Core.FromJSON DealTermsNonGuaranteedAuctionTerms where+  parseJSON =+    Core.withObject+      "DealTermsNonGuaranteedAuctionTerms"+      ( \o ->+          DealTermsNonGuaranteedAuctionTerms+            Core.<$> (o Core..:? "autoOptimizePrivateAuction")+            Core.<*> (o Core..:? "reservePricePerBuyers")+      )++instance Core.ToJSON DealTermsNonGuaranteedAuctionTerms where+  toJSON DealTermsNonGuaranteedAuctionTerms {..} =+    Core.object+      ( Core.catMaybes+          [ ("autoOptimizePrivateAuction" Core..=)+              Core.<$> autoOptimizePrivateAuction,+            ("reservePricePerBuyers" Core..=) Core.<$> reservePricePerBuyers+          ]+      )++--+-- /See:/ 'newDealTermsNonGuaranteedFixedPriceTerms' smart constructor.+newtype DealTermsNonGuaranteedFixedPriceTerms = DealTermsNonGuaranteedFixedPriceTerms+  { -- | Fixed price for the specified buyer.+    fixedPrices :: (Core.Maybe [PricePerBuyer])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DealTermsNonGuaranteedFixedPriceTerms' with the minimum fields required to make a request.+newDealTermsNonGuaranteedFixedPriceTerms ::+  DealTermsNonGuaranteedFixedPriceTerms+newDealTermsNonGuaranteedFixedPriceTerms =+  DealTermsNonGuaranteedFixedPriceTerms {fixedPrices = Core.Nothing}++instance Core.FromJSON DealTermsNonGuaranteedFixedPriceTerms where+  parseJSON =+    Core.withObject+      "DealTermsNonGuaranteedFixedPriceTerms"+      ( \o ->+          DealTermsNonGuaranteedFixedPriceTerms+            Core.<$> (o Core..:? "fixedPrices")+      )++instance Core.ToJSON DealTermsNonGuaranteedFixedPriceTerms where+  toJSON DealTermsNonGuaranteedFixedPriceTerms {..} =+    Core.object+      (Core.catMaybes [("fixedPrices" Core..=) Core.<$> fixedPrices])++--+-- /See:/ 'newDealTermsRubiconNonGuaranteedTerms' smart constructor.+data DealTermsRubiconNonGuaranteedTerms = DealTermsRubiconNonGuaranteedTerms+  { -- | Optional price for Rubicon priority access in the auction.+    priorityPrice :: (Core.Maybe Price),+    -- | Optional price for Rubicon standard access in the auction.+    standardPrice :: (Core.Maybe Price)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DealTermsRubiconNonGuaranteedTerms' with the minimum fields required to make a request.+newDealTermsRubiconNonGuaranteedTerms ::+  DealTermsRubiconNonGuaranteedTerms+newDealTermsRubiconNonGuaranteedTerms =+  DealTermsRubiconNonGuaranteedTerms+    { priorityPrice = Core.Nothing,+      standardPrice = Core.Nothing+    }++instance Core.FromJSON DealTermsRubiconNonGuaranteedTerms where+  parseJSON =+    Core.withObject+      "DealTermsRubiconNonGuaranteedTerms"+      ( \o ->+          DealTermsRubiconNonGuaranteedTerms+            Core.<$> (o Core..:? "priorityPrice")+            Core.<*> (o Core..:? "standardPrice")+      )++instance Core.ToJSON DealTermsRubiconNonGuaranteedTerms where+  toJSON DealTermsRubiconNonGuaranteedTerms {..} =+    Core.object+      ( Core.catMaybes+          [ ("priorityPrice" Core..=) Core.<$> priorityPrice,+            ("standardPrice" Core..=) Core.<$> standardPrice+          ]+      )++--+-- /See:/ 'newDeleteOrderDealsRequest' smart constructor.+data DeleteOrderDealsRequest = DeleteOrderDealsRequest+  { -- | List of deals to delete for a given proposal+    dealIds :: (Core.Maybe [Core.Text]),+    -- | The last known proposal revision number.+    proposalRevisionNumber :: (Core.Maybe Core.Int64),+    -- | Indicates an optional action to take on the proposal+    updateAction :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DeleteOrderDealsRequest' with the minimum fields required to make a request.+newDeleteOrderDealsRequest ::+  DeleteOrderDealsRequest+newDeleteOrderDealsRequest =+  DeleteOrderDealsRequest+    { dealIds = Core.Nothing,+      proposalRevisionNumber = Core.Nothing,+      updateAction = Core.Nothing+    }++instance Core.FromJSON DeleteOrderDealsRequest where+  parseJSON =+    Core.withObject+      "DeleteOrderDealsRequest"+      ( \o ->+          DeleteOrderDealsRequest+            Core.<$> (o Core..:? "dealIds")+            Core.<*> ( o+                         Core..:? "proposalRevisionNumber"+                         Core.<&> Core.fmap Core.fromAsText+                     )+            Core.<*> (o Core..:? "updateAction")+      )++instance Core.ToJSON DeleteOrderDealsRequest where+  toJSON DeleteOrderDealsRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("dealIds" Core..=) Core.<$> dealIds,+            ("proposalRevisionNumber" Core..=)+              Core.. Core.AsText+              Core.<$> proposalRevisionNumber,+            ("updateAction" Core..=) Core.<$> updateAction+          ]+      )++--+-- /See:/ 'newDeleteOrderDealsResponse' smart constructor.+data DeleteOrderDealsResponse = DeleteOrderDealsResponse+  { -- | List of deals deleted (in the same proposal as passed in the request)+    deals :: (Core.Maybe [MarketplaceDeal]),+    -- | The updated revision number for the proposal.+    proposalRevisionNumber :: (Core.Maybe Core.Int64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DeleteOrderDealsResponse' with the minimum fields required to make a request.+newDeleteOrderDealsResponse ::+  DeleteOrderDealsResponse+newDeleteOrderDealsResponse =+  DeleteOrderDealsResponse+    { deals = Core.Nothing,+      proposalRevisionNumber = Core.Nothing+    }++instance Core.FromJSON DeleteOrderDealsResponse where+  parseJSON =+    Core.withObject+      "DeleteOrderDealsResponse"+      ( \o ->+          DeleteOrderDealsResponse+            Core.<$> (o Core..:? "deals")+            Core.<*> ( o+                         Core..:? "proposalRevisionNumber"+                         Core.<&> Core.fmap Core.fromAsText+                     )+      )++instance Core.ToJSON DeleteOrderDealsResponse where+  toJSON DeleteOrderDealsResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("deals" Core..=) Core.<$> deals,+            ("proposalRevisionNumber" Core..=)+              Core.. Core.AsText+              Core.<$> proposalRevisionNumber+          ]+      )++--+-- /See:/ 'newDeliveryControl' smart constructor.+data DeliveryControl = DeliveryControl+  { creativeBlockingLevel :: (Core.Maybe Core.Text),+    deliveryRateType :: (Core.Maybe Core.Text),+    frequencyCaps :: (Core.Maybe [DeliveryControlFrequencyCap])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DeliveryControl' with the minimum fields required to make a request.+newDeliveryControl ::+  DeliveryControl+newDeliveryControl =+  DeliveryControl+    { creativeBlockingLevel = Core.Nothing,+      deliveryRateType = Core.Nothing,+      frequencyCaps = Core.Nothing+    }++instance Core.FromJSON DeliveryControl where+  parseJSON =+    Core.withObject+      "DeliveryControl"+      ( \o ->+          DeliveryControl+            Core.<$> (o Core..:? "creativeBlockingLevel")+            Core.<*> (o Core..:? "deliveryRateType")+            Core.<*> (o Core..:? "frequencyCaps")+      )++instance Core.ToJSON DeliveryControl where+  toJSON DeliveryControl {..} =+    Core.object+      ( Core.catMaybes+          [ ("creativeBlockingLevel" Core..=) Core.<$> creativeBlockingLevel,+            ("deliveryRateType" Core..=) Core.<$> deliveryRateType,+            ("frequencyCaps" Core..=) Core.<$> frequencyCaps+          ]+      )++--+-- /See:/ 'newDeliveryControlFrequencyCap' smart constructor.+data DeliveryControlFrequencyCap = DeliveryControlFrequencyCap+  { maxImpressions :: (Core.Maybe Core.Int32),+    numTimeUnits :: (Core.Maybe Core.Int32),+    timeUnitType :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DeliveryControlFrequencyCap' with the minimum fields required to make a request.+newDeliveryControlFrequencyCap ::+  DeliveryControlFrequencyCap+newDeliveryControlFrequencyCap =+  DeliveryControlFrequencyCap+    { maxImpressions = Core.Nothing,+      numTimeUnits = Core.Nothing,+      timeUnitType = Core.Nothing+    }++instance Core.FromJSON DeliveryControlFrequencyCap where+  parseJSON =+    Core.withObject+      "DeliveryControlFrequencyCap"+      ( \o ->+          DeliveryControlFrequencyCap+            Core.<$> (o Core..:? "maxImpressions")+            Core.<*> (o Core..:? "numTimeUnits")+            Core.<*> (o Core..:? "timeUnitType")+      )++instance Core.ToJSON DeliveryControlFrequencyCap where+  toJSON DeliveryControlFrequencyCap {..} =+    Core.object+      ( Core.catMaybes+          [ ("maxImpressions" Core..=) Core.<$> maxImpressions,+            ("numTimeUnits" Core..=) Core.<$> numTimeUnits,+            ("timeUnitType" Core..=) Core.<$> timeUnitType+          ]+      )++-- | This message carries publisher provided breakdown. E.g. {dimension/type: \'COUNTRY\', [{dimension/value: {id: 1, name: \'US\'}}, {dimension_value: {id: 2, name: \'UK\'}}]}+--+-- /See:/ 'newDimension' smart constructor.+data Dimension = Dimension+  { dimensionType :: (Core.Maybe Core.Text),+    dimensionValues :: (Core.Maybe [DimensionDimensionValue])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Dimension' with the minimum fields required to make a request.+newDimension ::+  Dimension+newDimension =+  Dimension+    { dimensionType = Core.Nothing,+      dimensionValues = Core.Nothing+    }++instance Core.FromJSON Dimension where+  parseJSON =+    Core.withObject+      "Dimension"+      ( \o ->+          Dimension+            Core.<$> (o Core..:? "dimensionType")+            Core.<*> (o Core..:? "dimensionValues")+      )++instance Core.ToJSON Dimension where+  toJSON Dimension {..} =+    Core.object+      ( Core.catMaybes+          [ ("dimensionType" Core..=) Core.<$> dimensionType,+            ("dimensionValues" Core..=) Core.<$> dimensionValues+          ]+      )++-- | Value of the dimension.+--+-- /See:/ 'newDimensionDimensionValue' smart constructor.+data DimensionDimensionValue = DimensionDimensionValue+  { -- | Id of the dimension.+    id :: (Core.Maybe Core.Int32),+    -- | Name of the dimension mainly for debugging purposes, except for the case of CREATIVE/SIZE. For CREATIVE/SIZE, strings are used instead of ids.+    name :: (Core.Maybe Core.Text),+    -- | Percent of total impressions for a dimension type. e.g. {dimension/type: \'GENDER\', [{dimension/value: {id: 1, name: \'MALE\', percentage: 60}}]} Gender MALE is 60% of all impressions which have gender.+    percentage :: (Core.Maybe Core.Int32)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DimensionDimensionValue' with the minimum fields required to make a request.+newDimensionDimensionValue ::+  DimensionDimensionValue+newDimensionDimensionValue =+  DimensionDimensionValue+    { id = Core.Nothing,+      name = Core.Nothing,+      percentage = Core.Nothing+    }++instance Core.FromJSON DimensionDimensionValue where+  parseJSON =+    Core.withObject+      "DimensionDimensionValue"+      ( \o ->+          DimensionDimensionValue+            Core.<$> (o Core..:? "id")+            Core.<*> (o Core..:? "name")+            Core.<*> (o Core..:? "percentage")+      )++instance Core.ToJSON DimensionDimensionValue where+  toJSON DimensionDimensionValue {..} =+    Core.object+      ( Core.catMaybes+          [ ("id" Core..=) Core.<$> id,+            ("name" Core..=) Core.<$> name,+            ("percentage" Core..=) Core.<$> percentage+          ]+      )++--+-- /See:/ 'newEditAllOrderDealsRequest' smart constructor.+data EditAllOrderDealsRequest = EditAllOrderDealsRequest+  { -- | List of deals to edit. Service may perform 3 different operations based on comparison of deals in this list vs deals already persisted in database: 1. Add new deal to proposal If a deal in this list does not exist in the proposal, the service will create a new deal and add it to the proposal. Validation will follow AddOrderDealsRequest. 2. Update existing deal in the proposal If a deal in this list already exist in the proposal, the service will update that existing deal to this new deal in the request. Validation will follow UpdateOrderDealsRequest. 3. Delete deals from the proposal (just need the id) If a existing deal in the proposal is not present in this list, the service will delete that deal from the proposal. Validation will follow DeleteOrderDealsRequest.+    deals :: (Core.Maybe [MarketplaceDeal]),+    -- | If specified, also updates the proposal in the batch transaction. This is useful when the proposal and the deals need to be updated in one transaction.+    proposal :: (Core.Maybe Proposal),+    -- | The last known revision number for the proposal.+    proposalRevisionNumber :: (Core.Maybe Core.Int64),+    -- | Indicates an optional action to take on the proposal+    updateAction :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EditAllOrderDealsRequest' with the minimum fields required to make a request.+newEditAllOrderDealsRequest ::+  EditAllOrderDealsRequest+newEditAllOrderDealsRequest =+  EditAllOrderDealsRequest+    { deals = Core.Nothing,+      proposal = Core.Nothing,+      proposalRevisionNumber = Core.Nothing,+      updateAction = Core.Nothing+    }++instance Core.FromJSON EditAllOrderDealsRequest where+  parseJSON =+    Core.withObject+      "EditAllOrderDealsRequest"+      ( \o ->+          EditAllOrderDealsRequest+            Core.<$> (o Core..:? "deals")+            Core.<*> (o Core..:? "proposal")+            Core.<*> ( o+                         Core..:? "proposalRevisionNumber"+                         Core.<&> Core.fmap Core.fromAsText+                     )+            Core.<*> (o Core..:? "updateAction")+      )++instance Core.ToJSON EditAllOrderDealsRequest where+  toJSON EditAllOrderDealsRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("deals" Core..=) Core.<$> deals,+            ("proposal" Core..=) Core.<$> proposal,+            ("proposalRevisionNumber" Core..=)+              Core.. Core.AsText+              Core.<$> proposalRevisionNumber,+            ("updateAction" Core..=) Core.<$> updateAction+          ]+      )++--+-- /See:/ 'newEditAllOrderDealsResponse' smart constructor.+data EditAllOrderDealsResponse = EditAllOrderDealsResponse+  { -- | List of all deals in the proposal after edit.+    deals :: (Core.Maybe [MarketplaceDeal]),+    -- | The latest revision number after the update has been applied.+    orderRevisionNumber :: (Core.Maybe Core.Int64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EditAllOrderDealsResponse' with the minimum fields required to make a request.+newEditAllOrderDealsResponse ::+  EditAllOrderDealsResponse+newEditAllOrderDealsResponse =+  EditAllOrderDealsResponse+    { deals = Core.Nothing,+      orderRevisionNumber = Core.Nothing+    }++instance Core.FromJSON EditAllOrderDealsResponse where+  parseJSON =+    Core.withObject+      "EditAllOrderDealsResponse"+      ( \o ->+          EditAllOrderDealsResponse+            Core.<$> (o Core..:? "deals")+            Core.<*> ( o+                         Core..:? "orderRevisionNumber"+                         Core.<&> Core.fmap Core.fromAsText+                     )+      )++instance Core.ToJSON EditAllOrderDealsResponse where+  toJSON EditAllOrderDealsResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("deals" Core..=) Core.<$> deals,+            ("orderRevisionNumber" Core..=)+              Core.. Core.AsText+              Core.<$> orderRevisionNumber+          ]+      )++--+-- /See:/ 'newGetOffersResponse' smart constructor.+newtype GetOffersResponse = GetOffersResponse+  { -- | The returned list of products.+    products :: (Core.Maybe [Product])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GetOffersResponse' with the minimum fields required to make a request.+newGetOffersResponse ::+  GetOffersResponse+newGetOffersResponse = GetOffersResponse {products = Core.Nothing}++instance Core.FromJSON GetOffersResponse where+  parseJSON =+    Core.withObject+      "GetOffersResponse"+      (\o -> GetOffersResponse Core.<$> (o Core..:? "products"))++instance Core.ToJSON GetOffersResponse where+  toJSON GetOffersResponse {..} =+    Core.object+      (Core.catMaybes [("products" Core..=) Core.<$> products])++--+-- /See:/ 'newGetOrderDealsResponse' smart constructor.+newtype GetOrderDealsResponse = GetOrderDealsResponse+  { -- | List of deals for the proposal+    deals :: (Core.Maybe [MarketplaceDeal])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GetOrderDealsResponse' with the minimum fields required to make a request.+newGetOrderDealsResponse ::+  GetOrderDealsResponse+newGetOrderDealsResponse =+  GetOrderDealsResponse {deals = Core.Nothing}++instance Core.FromJSON GetOrderDealsResponse where+  parseJSON =+    Core.withObject+      "GetOrderDealsResponse"+      (\o -> GetOrderDealsResponse Core.<$> (o Core..:? "deals"))++instance Core.ToJSON GetOrderDealsResponse where+  toJSON GetOrderDealsResponse {..} =+    Core.object (Core.catMaybes [("deals" Core..=) Core.<$> deals])++--+-- /See:/ 'newGetOrderNotesResponse' smart constructor.+newtype GetOrderNotesResponse = GetOrderNotesResponse+  { -- | The list of matching notes. The notes for a proposal are ordered from oldest to newest. If the notes span multiple proposals, they will be grouped by proposal, with the notes for the most recently modified proposal appearing first.+    notes :: (Core.Maybe [MarketplaceNote])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GetOrderNotesResponse' with the minimum fields required to make a request.+newGetOrderNotesResponse ::+  GetOrderNotesResponse+newGetOrderNotesResponse =+  GetOrderNotesResponse {notes = Core.Nothing}++instance Core.FromJSON GetOrderNotesResponse where+  parseJSON =+    Core.withObject+      "GetOrderNotesResponse"+      (\o -> GetOrderNotesResponse Core.<$> (o Core..:? "notes"))++instance Core.ToJSON GetOrderNotesResponse where+  toJSON GetOrderNotesResponse {..} =+    Core.object (Core.catMaybes [("notes" Core..=) Core.<$> notes])++--+-- /See:/ 'newGetOrdersResponse' smart constructor.+newtype GetOrdersResponse = GetOrdersResponse+  { -- | The list of matching proposals.+    proposals :: (Core.Maybe [Proposal])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GetOrdersResponse' with the minimum fields required to make a request.+newGetOrdersResponse ::+  GetOrdersResponse+newGetOrdersResponse = GetOrdersResponse {proposals = Core.Nothing}++instance Core.FromJSON GetOrdersResponse where+  parseJSON =+    Core.withObject+      "GetOrdersResponse"+      (\o -> GetOrdersResponse Core.<$> (o Core..:? "proposals"))++instance Core.ToJSON GetOrdersResponse where+  toJSON GetOrdersResponse {..} =+    Core.object+      (Core.catMaybes [("proposals" Core..=) Core.<$> proposals])++--+-- /See:/ 'newGetPublisherProfilesByAccountIdResponse' smart constructor.+newtype GetPublisherProfilesByAccountIdResponse = GetPublisherProfilesByAccountIdResponse+  { -- | Profiles for the requested publisher+    profiles :: (Core.Maybe [PublisherProfileApiProto])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GetPublisherProfilesByAccountIdResponse' with the minimum fields required to make a request.+newGetPublisherProfilesByAccountIdResponse ::+  GetPublisherProfilesByAccountIdResponse+newGetPublisherProfilesByAccountIdResponse =+  GetPublisherProfilesByAccountIdResponse {profiles = Core.Nothing}++instance Core.FromJSON GetPublisherProfilesByAccountIdResponse where+  parseJSON =+    Core.withObject+      "GetPublisherProfilesByAccountIdResponse"+      ( \o ->+          GetPublisherProfilesByAccountIdResponse+            Core.<$> (o Core..:? "profiles")+      )++instance Core.ToJSON GetPublisherProfilesByAccountIdResponse where+  toJSON GetPublisherProfilesByAccountIdResponse {..} =+    Core.object+      (Core.catMaybes [("profiles" Core..=) Core.<$> profiles])++-- | A proposal can contain multiple deals. A deal contains the terms and targeting information that is used for serving.+--+-- /See:/ 'newMarketplaceDeal' smart constructor.+data MarketplaceDeal = MarketplaceDeal+  { -- | Buyer private data (hidden from seller).+    buyerPrivateData :: (Core.Maybe PrivateData),+    -- | The time (ms since epoch) of the deal creation. (readonly)+    creationTimeMs :: (Core.Maybe Core.Int64),+    -- | Specifies the creative pre-approval policy (buyer-readonly)+    creativePreApprovalPolicy :: (Core.Maybe Core.Text),+    -- | Specifies whether the creative is safeFrame compatible (buyer-readonly)+    creativeSafeFrameCompatibility :: (Core.Maybe Core.Text),+    -- | A unique deal-id for the deal (readonly).+    dealId :: (Core.Maybe Core.Text),+    -- | Metadata about the serving status of this deal (readonly, writes via custom actions)+    dealServingMetadata :: (Core.Maybe DealServingMetadata),+    -- | The set of fields around delivery control that are interesting for a buyer to see but are non-negotiable. These are set by the publisher. This message is assigned an id of 100 since some day we would want to model this as a protobuf extension.+    deliveryControl :: (Core.Maybe DeliveryControl),+    -- | The external deal id assigned to this deal once the deal is finalized. This is the deal-id that shows up in serving\/reporting etc. (readonly)+    externalDealId :: (Core.Maybe Core.Text),+    -- | Proposed flight end time of the deal (ms since epoch) This will generally be stored in a granularity of a second. (updatable)+    flightEndTimeMs :: (Core.Maybe Core.Int64),+    -- | Proposed flight start time of the deal (ms since epoch) This will generally be stored in a granularity of a second. (updatable)+    flightStartTimeMs :: (Core.Maybe Core.Int64),+    -- | Description for the deal terms. (buyer-readonly)+    inventoryDescription :: (Core.Maybe Core.Text),+    -- | Indicates whether the current deal is a RFP template. RFP template is created by buyer and not based on seller created products.+    isRfpTemplate :: (Core.Maybe Core.Bool),+    -- | True, if the buyside inventory setup is complete for this deal. (readonly, except via OrderSetupCompleted action)+    isSetupComplete :: (Core.Maybe Core.Bool),+    -- | Identifies what kind of resource this is. Value: the fixed string \"adexchangebuyer#marketplaceDeal\".+    kind :: Core.Text,+    -- | The time (ms since epoch) when the deal was last updated. (readonly)+    lastUpdateTimeMs :: (Core.Maybe Core.Int64),+    makegoodRequestedReason :: (Core.Maybe Core.Text),+    -- | The name of the deal. (updatable)+    name :: (Core.Maybe Core.Text),+    -- | The product-id from which this deal was created. (readonly, except on create)+    productId :: (Core.Maybe Core.Text),+    -- | The revision number of the product that the deal was created from (readonly, except on create)+    productRevisionNumber :: (Core.Maybe Core.Int64),+    -- | Specifies the creative source for programmatic deals, PUBLISHER means creative is provided by seller and ADVERTISR means creative is provided by buyer. (buyer-readonly)+    programmaticCreativeSource :: (Core.Maybe Core.Text),+    proposalId :: (Core.Maybe Core.Text),+    -- | Optional Seller contact information for the deal (buyer-readonly)+    sellerContacts :: (Core.Maybe [ContactInformation]),+    -- | The shared targeting visible to buyers and sellers. Each shared targeting entity is AND\'d together. (updatable)+    sharedTargetings :: (Core.Maybe [SharedTargeting]),+    -- | The syndication product associated with the deal. (readonly, except on create)+    syndicationProduct :: (Core.Maybe Core.Text),+    -- | The negotiable terms of the deal. (updatable)+    terms :: (Core.Maybe DealTerms),+    webPropertyCode :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'MarketplaceDeal' with the minimum fields required to make a request.+newMarketplaceDeal ::+  MarketplaceDeal+newMarketplaceDeal =+  MarketplaceDeal+    { buyerPrivateData = Core.Nothing,+      creationTimeMs = Core.Nothing,+      creativePreApprovalPolicy = Core.Nothing,+      creativeSafeFrameCompatibility = Core.Nothing,+      dealId = Core.Nothing,+      dealServingMetadata = Core.Nothing,+      deliveryControl = Core.Nothing,+      externalDealId = Core.Nothing,+      flightEndTimeMs = Core.Nothing,+      flightStartTimeMs = Core.Nothing,+      inventoryDescription = Core.Nothing,+      isRfpTemplate = Core.Nothing,+      isSetupComplete = Core.Nothing,+      kind = "adexchangebuyer#marketplaceDeal",+      lastUpdateTimeMs = Core.Nothing,+      makegoodRequestedReason = Core.Nothing,+      name = Core.Nothing,+      productId = Core.Nothing,+      productRevisionNumber = Core.Nothing,+      programmaticCreativeSource = Core.Nothing,+      proposalId = Core.Nothing,+      sellerContacts = Core.Nothing,+      sharedTargetings = Core.Nothing,+      syndicationProduct = Core.Nothing,+      terms = Core.Nothing,+      webPropertyCode = Core.Nothing+    }++instance Core.FromJSON MarketplaceDeal where+  parseJSON =+    Core.withObject+      "MarketplaceDeal"+      ( \o ->+          MarketplaceDeal+            Core.<$> (o Core..:? "buyerPrivateData")+            Core.<*> (o Core..:? "creationTimeMs" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "creativePreApprovalPolicy")+            Core.<*> (o Core..:? "creativeSafeFrameCompatibility")+            Core.<*> (o Core..:? "dealId")+            Core.<*> (o Core..:? "dealServingMetadata")+            Core.<*> (o Core..:? "deliveryControl")+            Core.<*> (o Core..:? "externalDealId")+            Core.<*> (o Core..:? "flightEndTimeMs" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "flightStartTimeMs" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "inventoryDescription")+            Core.<*> (o Core..:? "isRfpTemplate")+            Core.<*> (o Core..:? "isSetupComplete")+            Core.<*> (o Core..:? "kind" Core..!= "adexchangebuyer#marketplaceDeal")+            Core.<*> (o Core..:? "lastUpdateTimeMs" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "makegoodRequestedReason")+            Core.<*> (o Core..:? "name")+            Core.<*> (o Core..:? "productId")+            Core.<*> ( o+                         Core..:? "productRevisionNumber"+                         Core.<&> Core.fmap Core.fromAsText+                     )+            Core.<*> (o Core..:? "programmaticCreativeSource")+            Core.<*> (o Core..:? "proposalId")+            Core.<*> (o Core..:? "sellerContacts")+            Core.<*> (o Core..:? "sharedTargetings")+            Core.<*> (o Core..:? "syndicationProduct")+            Core.<*> (o Core..:? "terms")+            Core.<*> (o Core..:? "webPropertyCode")+      )++instance Core.ToJSON MarketplaceDeal where+  toJSON MarketplaceDeal {..} =+    Core.object+      ( Core.catMaybes+          [ ("buyerPrivateData" Core..=) Core.<$> buyerPrivateData,+            ("creationTimeMs" Core..=)+              Core.. Core.AsText+              Core.<$> creationTimeMs,+            ("creativePreApprovalPolicy" Core..=)+              Core.<$> creativePreApprovalPolicy,+            ("creativeSafeFrameCompatibility" Core..=)+              Core.<$> creativeSafeFrameCompatibility,+            ("dealId" Core..=) Core.<$> dealId,+            ("dealServingMetadata" Core..=) Core.<$> dealServingMetadata,+            ("deliveryControl" Core..=) Core.<$> deliveryControl,+            ("externalDealId" Core..=) Core.<$> externalDealId,+            ("flightEndTimeMs" Core..=)+              Core.. Core.AsText+              Core.<$> flightEndTimeMs,+            ("flightStartTimeMs" Core..=)+              Core.. Core.AsText+              Core.<$> flightStartTimeMs,+            ("inventoryDescription" Core..=) Core.<$> inventoryDescription,+            ("isRfpTemplate" Core..=) Core.<$> isRfpTemplate,+            ("isSetupComplete" Core..=) Core.<$> isSetupComplete,+            Core.Just ("kind" Core..= kind),+            ("lastUpdateTimeMs" Core..=)+              Core.. Core.AsText+              Core.<$> lastUpdateTimeMs,+            ("makegoodRequestedReason" Core..=)+              Core.<$> makegoodRequestedReason,+            ("name" Core..=) Core.<$> name,+            ("productId" Core..=) Core.<$> productId,+            ("productRevisionNumber" Core..=)+              Core.. Core.AsText+              Core.<$> productRevisionNumber,+            ("programmaticCreativeSource" Core..=)+              Core.<$> programmaticCreativeSource,+            ("proposalId" Core..=) Core.<$> proposalId,+            ("sellerContacts" Core..=) Core.<$> sellerContacts,+            ("sharedTargetings" Core..=) Core.<$> sharedTargetings,+            ("syndicationProduct" Core..=) Core.<$> syndicationProduct,+            ("terms" Core..=) Core.<$> terms,+            ("webPropertyCode" Core..=) Core.<$> webPropertyCode+          ]+      )++--+-- /See:/ 'newMarketplaceDealParty' smart constructor.+data MarketplaceDealParty = MarketplaceDealParty+  { -- | The buyer\/seller associated with the deal. One of buyer\/seller is specified for a deal-party.+    buyer :: (Core.Maybe Buyer),+    -- | The buyer\/seller associated with the deal. One of buyer\/seller is specified for a deal party.+    seller :: (Core.Maybe Seller)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'MarketplaceDealParty' with the minimum fields required to make a request.+newMarketplaceDealParty ::+  MarketplaceDealParty+newMarketplaceDealParty =+  MarketplaceDealParty {buyer = Core.Nothing, seller = Core.Nothing}++instance Core.FromJSON MarketplaceDealParty where+  parseJSON =+    Core.withObject+      "MarketplaceDealParty"+      ( \o ->+          MarketplaceDealParty+            Core.<$> (o Core..:? "buyer")+            Core.<*> (o Core..:? "seller")+      )++instance Core.ToJSON MarketplaceDealParty where+  toJSON MarketplaceDealParty {..} =+    Core.object+      ( Core.catMaybes+          [ ("buyer" Core..=) Core.<$> buyer,+            ("seller" Core..=) Core.<$> seller+          ]+      )++--+-- /See:/ 'newMarketplaceLabel' smart constructor.+data MarketplaceLabel = MarketplaceLabel+  { -- | The accountId of the party that created the label.+    accountId :: (Core.Maybe Core.Text),+    -- | The creation time (in ms since epoch) for the label.+    createTimeMs :: (Core.Maybe Core.Int64),+    -- | Information about the party that created the label.+    deprecatedMarketplaceDealParty :: (Core.Maybe MarketplaceDealParty),+    -- | The label to use.+    label :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'MarketplaceLabel' with the minimum fields required to make a request.+newMarketplaceLabel ::+  MarketplaceLabel+newMarketplaceLabel =+  MarketplaceLabel+    { accountId = Core.Nothing,+      createTimeMs = Core.Nothing,+      deprecatedMarketplaceDealParty = Core.Nothing,+      label = Core.Nothing+    }++instance Core.FromJSON MarketplaceLabel where+  parseJSON =+    Core.withObject+      "MarketplaceLabel"+      ( \o ->+          MarketplaceLabel+            Core.<$> (o Core..:? "accountId")+            Core.<*> (o Core..:? "createTimeMs" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "deprecatedMarketplaceDealParty")+            Core.<*> (o Core..:? "label")+      )++instance Core.ToJSON MarketplaceLabel where+  toJSON MarketplaceLabel {..} =+    Core.object+      ( Core.catMaybes+          [ ("accountId" Core..=) Core.<$> accountId,+            ("createTimeMs" Core..=) Core.. Core.AsText Core.<$> createTimeMs,+            ("deprecatedMarketplaceDealParty" Core..=)+              Core.<$> deprecatedMarketplaceDealParty,+            ("label" Core..=) Core.<$> label+          ]+      )++-- | A proposal is associated with a bunch of notes which may optionally be associated with a deal and\/or revision number.+--+-- /See:/ 'newMarketplaceNote' smart constructor.+data MarketplaceNote = MarketplaceNote+  { -- | The role of the person (buyer\/seller) creating the note. (readonly)+    creatorRole :: (Core.Maybe Core.Text),+    -- | Notes can optionally be associated with a deal. (readonly, except on create)+    dealId :: (Core.Maybe Core.Text),+    -- | Identifies what kind of resource this is. Value: the fixed string \"adexchangebuyer#marketplaceNote\".+    kind :: Core.Text,+    -- | The actual note to attach. (readonly, except on create)+    note :: (Core.Maybe Core.Text),+    -- | The unique id for the note. (readonly)+    noteId :: (Core.Maybe Core.Text),+    -- | The proposalId that a note is attached to. (readonly)+    proposalId :: (Core.Maybe Core.Text),+    -- | If the note is associated with a proposal revision number, then store that here. (readonly, except on create)+    proposalRevisionNumber :: (Core.Maybe Core.Int64),+    -- | The timestamp (ms since epoch) that this note was created. (readonly)+    timestampMs :: (Core.Maybe Core.Int64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'MarketplaceNote' with the minimum fields required to make a request.+newMarketplaceNote ::+  MarketplaceNote+newMarketplaceNote =+  MarketplaceNote+    { creatorRole = Core.Nothing,+      dealId = Core.Nothing,+      kind = "adexchangebuyer#marketplaceNote",+      note = Core.Nothing,+      noteId = Core.Nothing,+      proposalId = Core.Nothing,+      proposalRevisionNumber = Core.Nothing,+      timestampMs = Core.Nothing+    }++instance Core.FromJSON MarketplaceNote where+  parseJSON =+    Core.withObject+      "MarketplaceNote"+      ( \o ->+          MarketplaceNote+            Core.<$> (o Core..:? "creatorRole")+            Core.<*> (o Core..:? "dealId")+            Core.<*> (o Core..:? "kind" Core..!= "adexchangebuyer#marketplaceNote")+            Core.<*> (o Core..:? "note")+            Core.<*> (o Core..:? "noteId")+            Core.<*> (o Core..:? "proposalId")+            Core.<*> ( o+                         Core..:? "proposalRevisionNumber"+                         Core.<&> Core.fmap Core.fromAsText+                     )+            Core.<*> (o Core..:? "timestampMs" Core.<&> Core.fmap Core.fromAsText)+      )++instance Core.ToJSON MarketplaceNote where+  toJSON MarketplaceNote {..} =+    Core.object+      ( Core.catMaybes+          [ ("creatorRole" Core..=) Core.<$> creatorRole,+            ("dealId" Core..=) Core.<$> dealId,+            Core.Just ("kind" Core..= kind),+            ("note" Core..=) Core.<$> note,+            ("noteId" Core..=) Core.<$> noteId,+            ("proposalId" Core..=) Core.<$> proposalId,+            ("proposalRevisionNumber" Core..=)+              Core.. Core.AsText+              Core.<$> proposalRevisionNumber,+            ("timestampMs" Core..=) Core.. Core.AsText Core.<$> timestampMs+          ]+      )++--+-- /See:/ 'newMobileApplication' smart constructor.+data MobileApplication = MobileApplication+  { appStore :: (Core.Maybe Core.Text),+    externalAppId :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'MobileApplication' with the minimum fields required to make a request.+newMobileApplication ::+  MobileApplication+newMobileApplication =+  MobileApplication+    { appStore = Core.Nothing,+      externalAppId = Core.Nothing+    }++instance Core.FromJSON MobileApplication where+  parseJSON =+    Core.withObject+      "MobileApplication"+      ( \o ->+          MobileApplication+            Core.<$> (o Core..:? "appStore")+            Core.<*> (o Core..:? "externalAppId")+      )++instance Core.ToJSON MobileApplication where+  toJSON MobileApplication {..} =+    Core.object+      ( Core.catMaybes+          [ ("appStore" Core..=) Core.<$> appStore,+            ("externalAppId" Core..=) Core.<$> externalAppId+          ]+      )++-- | The configuration data for an Ad Exchange performance report list.+--+-- /See:/ 'newPerformanceReport' smart constructor.+data PerformanceReport = PerformanceReport+  { -- | The number of bid responses with an ad.+    bidRate :: (Core.Maybe Core.Double),+    -- | The number of bid requests sent to your bidder.+    bidRequestRate :: (Core.Maybe Core.Double),+    -- | Rate of various prefiltering statuses per match. Please refer to the callout-status-codes.txt file for different statuses.+    calloutStatusRate :: (Core.Maybe [Core.Value]),+    -- | Average QPS for cookie matcher operations.+    cookieMatcherStatusRate :: (Core.Maybe [Core.Value]),+    -- | Rate of ads with a given status. Please refer to the creative-status-codes.txt file for different statuses.+    creativeStatusRate :: (Core.Maybe [Core.Value]),+    -- | The number of bid responses that were filtered due to a policy violation or other errors.+    filteredBidRate :: (Core.Maybe Core.Double),+    -- | Average QPS for hosted match operations.+    hostedMatchStatusRate :: (Core.Maybe [Core.Value]),+    -- | The number of potential queries based on your pretargeting settings.+    inventoryMatchRate :: (Core.Maybe Core.Double),+    -- | Resource type.+    kind :: Core.Text,+    -- | The 50th percentile round trip latency(ms) as perceived from Google servers for the duration period covered by the report.+    latency50thPercentile :: (Core.Maybe Core.Double),+    -- | The 85th percentile round trip latency(ms) as perceived from Google servers for the duration period covered by the report.+    latency85thPercentile :: (Core.Maybe Core.Double),+    -- | The 95th percentile round trip latency(ms) as perceived from Google servers for the duration period covered by the report.+    latency95thPercentile :: (Core.Maybe Core.Double),+    -- | Rate of various quota account statuses per quota check.+    noQuotaInRegion :: (Core.Maybe Core.Double),+    -- | Rate of various quota account statuses per quota check.+    outOfQuota :: (Core.Maybe Core.Double),+    -- | Average QPS for pixel match requests from clients.+    pixelMatchRequests :: (Core.Maybe Core.Double),+    -- | Average QPS for pixel match responses from clients.+    pixelMatchResponses :: (Core.Maybe Core.Double),+    -- | The configured quota limits for this account.+    quotaConfiguredLimit :: (Core.Maybe Core.Double),+    -- | The throttled quota limits for this account.+    quotaThrottledLimit :: (Core.Maybe Core.Double),+    -- | The trading location of this data.+    region :: (Core.Maybe Core.Text),+    -- | The number of properly formed bid responses received by our servers within the deadline.+    successfulRequestRate :: (Core.Maybe Core.Double),+    -- | The unix timestamp of the starting time of this performance data.+    timestamp :: (Core.Maybe Core.Int64),+    -- | The number of bid responses that were unsuccessful due to timeouts, incorrect formatting, etc.+    unsuccessfulRequestRate :: (Core.Maybe Core.Double)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PerformanceReport' with the minimum fields required to make a request.+newPerformanceReport ::+  PerformanceReport+newPerformanceReport =+  PerformanceReport+    { bidRate = Core.Nothing,+      bidRequestRate = Core.Nothing,+      calloutStatusRate = Core.Nothing,+      cookieMatcherStatusRate = Core.Nothing,+      creativeStatusRate = Core.Nothing,+      filteredBidRate = Core.Nothing,+      hostedMatchStatusRate = Core.Nothing,+      inventoryMatchRate = Core.Nothing,+      kind = "adexchangebuyer#performanceReport",+      latency50thPercentile = Core.Nothing,+      latency85thPercentile = Core.Nothing,+      latency95thPercentile = Core.Nothing,+      noQuotaInRegion = Core.Nothing,+      outOfQuota = Core.Nothing,+      pixelMatchRequests = Core.Nothing,+      pixelMatchResponses = Core.Nothing,+      quotaConfiguredLimit = Core.Nothing,+      quotaThrottledLimit = Core.Nothing,+      region = Core.Nothing,+      successfulRequestRate = Core.Nothing,+      timestamp = Core.Nothing,+      unsuccessfulRequestRate = Core.Nothing+    }++instance Core.FromJSON PerformanceReport where+  parseJSON =+    Core.withObject+      "PerformanceReport"+      ( \o ->+          PerformanceReport+            Core.<$> (o Core..:? "bidRate")+            Core.<*> (o Core..:? "bidRequestRate")+            Core.<*> (o Core..:? "calloutStatusRate")+            Core.<*> (o Core..:? "cookieMatcherStatusRate")+            Core.<*> (o Core..:? "creativeStatusRate")+            Core.<*> (o Core..:? "filteredBidRate")+            Core.<*> (o Core..:? "hostedMatchStatusRate")+            Core.<*> (o Core..:? "inventoryMatchRate")+            Core.<*> (o Core..:? "kind" Core..!= "adexchangebuyer#performanceReport")+            Core.<*> (o Core..:? "latency50thPercentile")+            Core.<*> (o Core..:? "latency85thPercentile")+            Core.<*> (o Core..:? "latency95thPercentile")+            Core.<*> (o Core..:? "noQuotaInRegion")+            Core.<*> (o Core..:? "outOfQuota")+            Core.<*> (o Core..:? "pixelMatchRequests")+            Core.<*> (o Core..:? "pixelMatchResponses")+            Core.<*> (o Core..:? "quotaConfiguredLimit")+            Core.<*> (o Core..:? "quotaThrottledLimit")+            Core.<*> (o Core..:? "region")+            Core.<*> (o Core..:? "successfulRequestRate")+            Core.<*> (o Core..:? "timestamp" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "unsuccessfulRequestRate")+      )++instance Core.ToJSON PerformanceReport where+  toJSON PerformanceReport {..} =+    Core.object+      ( Core.catMaybes+          [ ("bidRate" Core..=) Core.<$> bidRate,+            ("bidRequestRate" Core..=) Core.<$> bidRequestRate,+            ("calloutStatusRate" Core..=) Core.<$> calloutStatusRate,+            ("cookieMatcherStatusRate" Core..=)+              Core.<$> cookieMatcherStatusRate,+            ("creativeStatusRate" Core..=) Core.<$> creativeStatusRate,+            ("filteredBidRate" Core..=) Core.<$> filteredBidRate,+            ("hostedMatchStatusRate" Core..=) Core.<$> hostedMatchStatusRate,+            ("inventoryMatchRate" Core..=) Core.<$> inventoryMatchRate,+            Core.Just ("kind" Core..= kind),+            ("latency50thPercentile" Core..=) Core.<$> latency50thPercentile,+            ("latency85thPercentile" Core..=) Core.<$> latency85thPercentile,+            ("latency95thPercentile" Core..=) Core.<$> latency95thPercentile,+            ("noQuotaInRegion" Core..=) Core.<$> noQuotaInRegion,+            ("outOfQuota" Core..=) Core.<$> outOfQuota,+            ("pixelMatchRequests" Core..=) Core.<$> pixelMatchRequests,+            ("pixelMatchResponses" Core..=) Core.<$> pixelMatchResponses,+            ("quotaConfiguredLimit" Core..=) Core.<$> quotaConfiguredLimit,+            ("quotaThrottledLimit" Core..=) Core.<$> quotaThrottledLimit,+            ("region" Core..=) Core.<$> region,+            ("successfulRequestRate" Core..=) Core.<$> successfulRequestRate,+            ("timestamp" Core..=) Core.. Core.AsText Core.<$> timestamp,+            ("unsuccessfulRequestRate" Core..=)+              Core.<$> unsuccessfulRequestRate+          ]+      )++-- | The configuration data for an Ad Exchange performance report list.+--+-- /See:/ 'newPerformanceReportList' smart constructor.+data PerformanceReportList = PerformanceReportList+  { -- | Resource type.+    kind :: Core.Text,+    -- | A list of performance reports relevant for the account.+    performanceReport :: (Core.Maybe [PerformanceReport])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PerformanceReportList' with the minimum fields required to make a request.+newPerformanceReportList ::+  PerformanceReportList+newPerformanceReportList =+  PerformanceReportList+    { kind =+        "adexchangebuyer#performanceReportList",+      performanceReport = Core.Nothing+    }++instance Core.FromJSON PerformanceReportList where+  parseJSON =+    Core.withObject+      "PerformanceReportList"+      ( \o ->+          PerformanceReportList+            Core.<$> ( o+                         Core..:? "kind"+                         Core..!= "adexchangebuyer#performanceReportList"+                     )+            Core.<*> (o Core..:? "performanceReport")+      )++instance Core.ToJSON PerformanceReportList where+  toJSON PerformanceReportList {..} =+    Core.object+      ( Core.catMaybes+          [ Core.Just ("kind" Core..= kind),+            ("performanceReport" Core..=) Core.<$> performanceReport+          ]+      )++--+-- /See:/ 'newPretargetingConfig' smart constructor.+data PretargetingConfig = PretargetingConfig+  { -- | The id for billing purposes, provided for reference. Leave this field blank for insert requests; the id will be generated automatically.+    billingId :: (Core.Maybe Core.Int64),+    -- | The config id; generated automatically. Leave this field blank for insert requests.+    configId :: (Core.Maybe Core.Int64),+    -- | The name of the config. Must be unique. Required for all requests.+    configName :: (Core.Maybe Core.Text),+    -- | List must contain exactly one of PRETARGETING/CREATIVE/TYPE/HTML or PRETARGETING/CREATIVE/TYPE/VIDEO.+    creativeType :: (Core.Maybe [Core.Text]),+    -- | Requests which allow one of these (width, height) pairs will match. All pairs must be supported ad dimensions.+    dimensions :: (Core.Maybe [PretargetingConfig_DimensionsItem]),+    -- | Requests with any of these content labels will not match. Values are from content-labels.txt in the downloadable files section.+    excludedContentLabels :: (Core.Maybe [Core.Int64]),+    -- | Requests containing any of these geo criteria ids will not match.+    excludedGeoCriteriaIds :: (Core.Maybe [Core.Int64]),+    -- | Requests containing any of these placements will not match.+    excludedPlacements :: (Core.Maybe [PretargetingConfig_ExcludedPlacementsItem]),+    -- | Requests containing any of these users list ids will not match.+    excludedUserLists :: (Core.Maybe [Core.Int64]),+    -- | Requests containing any of these vertical ids will not match. Values are from the publisher-verticals.txt file in the downloadable files section.+    excludedVerticals :: (Core.Maybe [Core.Int64]),+    -- | Requests containing any of these geo criteria ids will match.+    geoCriteriaIds :: (Core.Maybe [Core.Int64]),+    -- | Whether this config is active. Required for all requests.+    isActive :: (Core.Maybe Core.Bool),+    -- | The kind of the resource, i.e. \"adexchangebuyer#pretargetingConfig\".+    kind :: Core.Text,+    -- | Request containing any of these language codes will match.+    languages :: (Core.Maybe [Core.Text]),+    -- | The maximum QPS allocated to this pretargeting configuration, used for pretargeting-level QPS limits. By default, this is not set, which indicates that there is no QPS limit at the configuration level (a global or account-level limit may still be imposed).+    maximumQps :: (Core.Maybe Core.Int64),+    -- | Requests where the predicted viewability is below the specified decile will not match. E.g. if the buyer sets this value to 5, requests from slots where the predicted viewability is below 50% will not match. If the predicted viewability is unknown this field will be ignored.+    minimumViewabilityDecile :: (Core.Maybe Core.Int32),+    -- | Requests containing any of these mobile carrier ids will match. Values are from mobile-carriers.csv in the downloadable files section.+    mobileCarriers :: (Core.Maybe [Core.Int64]),+    -- | Requests containing any of these mobile device ids will match. Values are from mobile-devices.csv in the downloadable files section.+    mobileDevices :: (Core.Maybe [Core.Int64]),+    -- | Requests containing any of these mobile operating system version ids will match. Values are from mobile-os.csv in the downloadable files section.+    mobileOperatingSystemVersions :: (Core.Maybe [Core.Int64]),+    -- | Requests containing any of these placements will match.+    placements :: (Core.Maybe [PretargetingConfig_PlacementsItem]),+    -- | Requests matching any of these platforms will match. Possible values are PRETARGETING/PLATFORM/MOBILE, PRETARGETING/PLATFORM/DESKTOP, and PRETARGETING/PLATFORM/TABLET.+    platforms :: (Core.Maybe [Core.Text]),+    -- | Creative attributes should be declared here if all creatives corresponding to this pretargeting configuration have that creative attribute. Values are from pretargetable-creative-attributes.txt in the downloadable files section.+    supportedCreativeAttributes :: (Core.Maybe [Core.Int64]),+    -- | Requests containing the specified type of user data will match. Possible values are HOSTED/MATCH/DATA, which means the request is cookie-targetable and has a match in the buyer\'s hosted match table, and COOKIE/OR/IDFA, which means the request has either a targetable cookie or an iOS IDFA.+    userIdentifierDataRequired :: (Core.Maybe [Core.Text]),+    -- | Requests containing any of these user list ids will match.+    userLists :: (Core.Maybe [Core.Int64]),+    -- | Requests that allow any of these vendor ids will match. Values are from vendors.txt in the downloadable files section.+    vendorTypes :: (Core.Maybe [Core.Int64]),+    -- | Requests containing any of these vertical ids will match.+    verticals :: (Core.Maybe [Core.Int64]),+    -- | Video requests satisfying any of these player size constraints will match.+    videoPlayerSizes :: (Core.Maybe [PretargetingConfig_VideoPlayerSizesItem])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PretargetingConfig' with the minimum fields required to make a request.+newPretargetingConfig ::+  PretargetingConfig+newPretargetingConfig =+  PretargetingConfig+    { billingId = Core.Nothing,+      configId = Core.Nothing,+      configName = Core.Nothing,+      creativeType = Core.Nothing,+      dimensions = Core.Nothing,+      excludedContentLabels = Core.Nothing,+      excludedGeoCriteriaIds = Core.Nothing,+      excludedPlacements = Core.Nothing,+      excludedUserLists = Core.Nothing,+      excludedVerticals = Core.Nothing,+      geoCriteriaIds = Core.Nothing,+      isActive = Core.Nothing,+      kind = "adexchangebuyer#pretargetingConfig",+      languages = Core.Nothing,+      maximumQps = Core.Nothing,+      minimumViewabilityDecile = Core.Nothing,+      mobileCarriers = Core.Nothing,+      mobileDevices = Core.Nothing,+      mobileOperatingSystemVersions = Core.Nothing,+      placements = Core.Nothing,+      platforms = Core.Nothing,+      supportedCreativeAttributes = Core.Nothing,+      userIdentifierDataRequired = Core.Nothing,+      userLists = Core.Nothing,+      vendorTypes = Core.Nothing,+      verticals = Core.Nothing,+      videoPlayerSizes = Core.Nothing+    }++instance Core.FromJSON PretargetingConfig where+  parseJSON =+    Core.withObject+      "PretargetingConfig"+      ( \o ->+          PretargetingConfig+            Core.<$> (o Core..:? "billingId" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "configId" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "configName")+            Core.<*> (o Core..:? "creativeType")+            Core.<*> (o Core..:? "dimensions")+            Core.<*> ( o+                         Core..:? "excludedContentLabels"+                         Core.<&> Core.fmap (Core.fmap Core.fromAsText)+                     )+            Core.<*> ( o+                         Core..:? "excludedGeoCriteriaIds"+                         Core.<&> Core.fmap (Core.fmap Core.fromAsText)+                     )+            Core.<*> (o Core..:? "excludedPlacements")+            Core.<*> ( o+                         Core..:? "excludedUserLists"+                         Core.<&> Core.fmap (Core.fmap Core.fromAsText)+                     )+            Core.<*> ( o+                         Core..:? "excludedVerticals"+                         Core.<&> Core.fmap (Core.fmap Core.fromAsText)+                     )+            Core.<*> ( o+                         Core..:? "geoCriteriaIds"+                         Core.<&> Core.fmap (Core.fmap Core.fromAsText)+                     )+            Core.<*> (o Core..:? "isActive")+            Core.<*> (o Core..:? "kind" Core..!= "adexchangebuyer#pretargetingConfig")+            Core.<*> (o Core..:? "languages")+            Core.<*> (o Core..:? "maximumQps" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "minimumViewabilityDecile")+            Core.<*> ( o+                         Core..:? "mobileCarriers"+                         Core.<&> Core.fmap (Core.fmap Core.fromAsText)+                     )+            Core.<*> ( o+                         Core..:? "mobileDevices"+                         Core.<&> Core.fmap (Core.fmap Core.fromAsText)+                     )+            Core.<*> ( o+                         Core..:? "mobileOperatingSystemVersions"+                         Core.<&> Core.fmap (Core.fmap Core.fromAsText)+                     )+            Core.<*> (o Core..:? "placements")+            Core.<*> (o Core..:? "platforms")+            Core.<*> ( o+                         Core..:? "supportedCreativeAttributes"+                         Core.<&> Core.fmap (Core.fmap Core.fromAsText)+                     )+            Core.<*> (o Core..:? "userIdentifierDataRequired")+            Core.<*> ( o+                         Core..:? "userLists"+                         Core.<&> Core.fmap (Core.fmap Core.fromAsText)+                     )+            Core.<*> ( o+                         Core..:? "vendorTypes"+                         Core.<&> Core.fmap (Core.fmap Core.fromAsText)+                     )+            Core.<*> ( o+                         Core..:? "verticals"+                         Core.<&> Core.fmap (Core.fmap Core.fromAsText)+                     )+            Core.<*> (o Core..:? "videoPlayerSizes")+      )++instance Core.ToJSON PretargetingConfig where+  toJSON PretargetingConfig {..} =+    Core.object+      ( Core.catMaybes+          [ ("billingId" Core..=) Core.. Core.AsText Core.<$> billingId,+            ("configId" Core..=) Core.. Core.AsText Core.<$> configId,+            ("configName" Core..=) Core.<$> configName,+            ("creativeType" Core..=) Core.<$> creativeType,+            ("dimensions" Core..=) Core.<$> dimensions,+            ("excludedContentLabels" Core..=)+              Core.. Core.fmap Core.AsText+              Core.<$> excludedContentLabels,+            ("excludedGeoCriteriaIds" Core..=)+              Core.. Core.fmap Core.AsText+              Core.<$> excludedGeoCriteriaIds,+            ("excludedPlacements" Core..=) Core.<$> excludedPlacements,+            ("excludedUserLists" Core..=)+              Core.. Core.fmap Core.AsText+              Core.<$> excludedUserLists,+            ("excludedVerticals" Core..=)+              Core.. Core.fmap Core.AsText+              Core.<$> excludedVerticals,+            ("geoCriteriaIds" Core..=)+              Core.. Core.fmap Core.AsText+              Core.<$> geoCriteriaIds,+            ("isActive" Core..=) Core.<$> isActive,+            Core.Just ("kind" Core..= kind),+            ("languages" Core..=) Core.<$> languages,+            ("maximumQps" Core..=) Core.. Core.AsText Core.<$> maximumQps,+            ("minimumViewabilityDecile" Core..=)+              Core.<$> minimumViewabilityDecile,+            ("mobileCarriers" Core..=)+              Core.. Core.fmap Core.AsText+              Core.<$> mobileCarriers,+            ("mobileDevices" Core..=)+              Core.. Core.fmap Core.AsText+              Core.<$> mobileDevices,+            ("mobileOperatingSystemVersions" Core..=)+              Core.. Core.fmap Core.AsText+              Core.<$> mobileOperatingSystemVersions,+            ("placements" Core..=) Core.<$> placements,+            ("platforms" Core..=) Core.<$> platforms,+            ("supportedCreativeAttributes" Core..=)+              Core.. Core.fmap Core.AsText+              Core.<$> supportedCreativeAttributes,+            ("userIdentifierDataRequired" Core..=)+              Core.<$> userIdentifierDataRequired,+            ("userLists" Core..=)+              Core.. Core.fmap Core.AsText+              Core.<$> userLists,+            ("vendorTypes" Core..=)+              Core.. Core.fmap Core.AsText+              Core.<$> vendorTypes,+            ("verticals" Core..=)+              Core.. Core.fmap Core.AsText+              Core.<$> verticals,+            ("videoPlayerSizes" Core..=) Core.<$> videoPlayerSizes+          ]+      )++--+-- /See:/ 'newPretargetingConfig_DimensionsItem' smart constructor.+data PretargetingConfig_DimensionsItem = PretargetingConfig_DimensionsItem+  { -- | Height in pixels.+    height :: (Core.Maybe Core.Int64),+    -- | Width in pixels.+    width :: (Core.Maybe Core.Int64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PretargetingConfig_DimensionsItem' with the minimum fields required to make a request.+newPretargetingConfig_DimensionsItem ::+  PretargetingConfig_DimensionsItem+newPretargetingConfig_DimensionsItem =+  PretargetingConfig_DimensionsItem+    { height = Core.Nothing,+      width = Core.Nothing+    }++instance Core.FromJSON PretargetingConfig_DimensionsItem where+  parseJSON =+    Core.withObject+      "PretargetingConfig_DimensionsItem"+      ( \o ->+          PretargetingConfig_DimensionsItem+            Core.<$> (o Core..:? "height" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "width" Core.<&> Core.fmap Core.fromAsText)+      )++instance Core.ToJSON PretargetingConfig_DimensionsItem where+  toJSON PretargetingConfig_DimensionsItem {..} =+    Core.object+      ( Core.catMaybes+          [ ("height" Core..=) Core.. Core.AsText Core.<$> height,+            ("width" Core..=) Core.. Core.AsText Core.<$> width+          ]+      )++--+-- /See:/ 'newPretargetingConfig_ExcludedPlacementsItem' smart constructor.+data PretargetingConfig_ExcludedPlacementsItem = PretargetingConfig_ExcludedPlacementsItem+  { -- | The value of the placement. Interpretation depends on the placement type, e.g. URL for a site placement, channel name for a channel placement, app id for a mobile app placement.+    token :: (Core.Maybe Core.Text),+    -- | The type of the placement.+    type' :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PretargetingConfig_ExcludedPlacementsItem' with the minimum fields required to make a request.+newPretargetingConfig_ExcludedPlacementsItem ::+  PretargetingConfig_ExcludedPlacementsItem+newPretargetingConfig_ExcludedPlacementsItem =+  PretargetingConfig_ExcludedPlacementsItem+    { token = Core.Nothing,+      type' = Core.Nothing+    }++instance Core.FromJSON PretargetingConfig_ExcludedPlacementsItem where+  parseJSON =+    Core.withObject+      "PretargetingConfig_ExcludedPlacementsItem"+      ( \o ->+          PretargetingConfig_ExcludedPlacementsItem+            Core.<$> (o Core..:? "token")+            Core.<*> (o Core..:? "type")+      )++instance Core.ToJSON PretargetingConfig_ExcludedPlacementsItem where+  toJSON PretargetingConfig_ExcludedPlacementsItem {..} =+    Core.object+      ( Core.catMaybes+          [ ("token" Core..=) Core.<$> token,+            ("type" Core..=) Core.<$> type'+          ]+      )++--+-- /See:/ 'newPretargetingConfig_PlacementsItem' smart constructor.+data PretargetingConfig_PlacementsItem = PretargetingConfig_PlacementsItem+  { -- | The value of the placement. Interpretation depends on the placement type, e.g. URL for a site placement, channel name for a channel placement, app id for a mobile app placement.+    token :: (Core.Maybe Core.Text),+    -- | The type of the placement.+    type' :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PretargetingConfig_PlacementsItem' with the minimum fields required to make a request.+newPretargetingConfig_PlacementsItem ::+  PretargetingConfig_PlacementsItem+newPretargetingConfig_PlacementsItem =+  PretargetingConfig_PlacementsItem+    { token = Core.Nothing,+      type' = Core.Nothing+    }++instance Core.FromJSON PretargetingConfig_PlacementsItem where+  parseJSON =+    Core.withObject+      "PretargetingConfig_PlacementsItem"+      ( \o ->+          PretargetingConfig_PlacementsItem+            Core.<$> (o Core..:? "token")+            Core.<*> (o Core..:? "type")+      )++instance Core.ToJSON PretargetingConfig_PlacementsItem where+  toJSON PretargetingConfig_PlacementsItem {..} =+    Core.object+      ( Core.catMaybes+          [ ("token" Core..=) Core.<$> token,+            ("type" Core..=) Core.<$> type'+          ]+      )++--+-- /See:/ 'newPretargetingConfig_VideoPlayerSizesItem' smart constructor.+data PretargetingConfig_VideoPlayerSizesItem = PretargetingConfig_VideoPlayerSizesItem+  { -- | The type of aspect ratio. Leave this field blank to match all aspect ratios.+    aspectRatio :: (Core.Maybe Core.Text),+    -- | The minimum player height in pixels. Leave this field blank to match any player height.+    minHeight :: (Core.Maybe Core.Int64),+    -- | The minimum player width in pixels. Leave this field blank to match any player width.+    minWidth :: (Core.Maybe Core.Int64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PretargetingConfig_VideoPlayerSizesItem' with the minimum fields required to make a request.+newPretargetingConfig_VideoPlayerSizesItem ::+  PretargetingConfig_VideoPlayerSizesItem+newPretargetingConfig_VideoPlayerSizesItem =+  PretargetingConfig_VideoPlayerSizesItem+    { aspectRatio =+        Core.Nothing,+      minHeight = Core.Nothing,+      minWidth = Core.Nothing+    }++instance Core.FromJSON PretargetingConfig_VideoPlayerSizesItem where+  parseJSON =+    Core.withObject+      "PretargetingConfig_VideoPlayerSizesItem"+      ( \o ->+          PretargetingConfig_VideoPlayerSizesItem+            Core.<$> (o Core..:? "aspectRatio")+            Core.<*> (o Core..:? "minHeight" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "minWidth" Core.<&> Core.fmap Core.fromAsText)+      )++instance Core.ToJSON PretargetingConfig_VideoPlayerSizesItem where+  toJSON PretargetingConfig_VideoPlayerSizesItem {..} =+    Core.object+      ( Core.catMaybes+          [ ("aspectRatio" Core..=) Core.<$> aspectRatio,+            ("minHeight" Core..=) Core.. Core.AsText Core.<$> minHeight,+            ("minWidth" Core..=) Core.. Core.AsText Core.<$> minWidth+          ]+      )++--+-- /See:/ 'newPretargetingConfigList' smart constructor.+data PretargetingConfigList = PretargetingConfigList+  { -- | A list of pretargeting configs+    items :: (Core.Maybe [PretargetingConfig]),+    -- | Resource type.+    kind :: Core.Text+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PretargetingConfigList' with the minimum fields required to make a request.+newPretargetingConfigList ::+  PretargetingConfigList+newPretargetingConfigList =+  PretargetingConfigList+    { items = Core.Nothing,+      kind = "adexchangebuyer#pretargetingConfigList"+    }++instance Core.FromJSON PretargetingConfigList where+  parseJSON =+    Core.withObject+      "PretargetingConfigList"+      ( \o ->+          PretargetingConfigList+            Core.<$> (o Core..:? "items")+            Core.<*> ( o+                         Core..:? "kind"+                         Core..!= "adexchangebuyer#pretargetingConfigList"+                     )+      )++instance Core.ToJSON PretargetingConfigList where+  toJSON PretargetingConfigList {..} =+    Core.object+      ( Core.catMaybes+          [ ("items" Core..=) Core.<$> items,+            Core.Just ("kind" Core..= kind)+          ]+      )++--+-- /See:/ 'newPrice' smart constructor.+data Price = Price+  { -- | The price value in micros.+    amountMicros :: (Core.Maybe Core.Double),+    -- | The currency code for the price.+    currencyCode :: (Core.Maybe Core.Text),+    -- | In case of CPD deals, the expected CPM in micros.+    expectedCpmMicros :: (Core.Maybe Core.Double),+    -- | The pricing type for the deal\/product.+    pricingType :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Price' with the minimum fields required to make a request.+newPrice ::+  Price+newPrice =+  Price+    { amountMicros = Core.Nothing,+      currencyCode = Core.Nothing,+      expectedCpmMicros = Core.Nothing,+      pricingType = Core.Nothing+    }++instance Core.FromJSON Price where+  parseJSON =+    Core.withObject+      "Price"+      ( \o ->+          Price+            Core.<$> (o Core..:? "amountMicros")+            Core.<*> (o Core..:? "currencyCode")+            Core.<*> (o Core..:? "expectedCpmMicros")+            Core.<*> (o Core..:? "pricingType")+      )++instance Core.ToJSON Price where+  toJSON Price {..} =+    Core.object+      ( Core.catMaybes+          [ ("amountMicros" Core..=) Core.<$> amountMicros,+            ("currencyCode" Core..=) Core.<$> currencyCode,+            ("expectedCpmMicros" Core..=) Core.<$> expectedCpmMicros,+            ("pricingType" Core..=) Core.<$> pricingType+          ]+      )++-- | Used to specify pricing rules for buyers. Each PricePerBuyer in a product can become [0,1] deals. To check if there is a PricePerBuyer for a particular buyer we look for the most specific matching rule - we first look for a rule matching the buyer and otherwise look for a matching rule where no buyer is set.+--+-- /See:/ 'newPricePerBuyer' smart constructor.+data PricePerBuyer = PricePerBuyer+  { -- | Optional access type for this buyer.+    auctionTier :: (Core.Maybe Core.Text),+    -- | Reference to the buyer that will get billed.+    billedBuyer :: (Core.Maybe Buyer),+    -- | The buyer who will pay this price. If unset, all buyers can pay this price (if the advertisers match, and there\'s no more specific rule matching the buyer).+    buyer :: (Core.Maybe Buyer),+    -- | The specified price+    price :: (Core.Maybe Price)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PricePerBuyer' with the minimum fields required to make a request.+newPricePerBuyer ::+  PricePerBuyer+newPricePerBuyer =+  PricePerBuyer+    { auctionTier = Core.Nothing,+      billedBuyer = Core.Nothing,+      buyer = Core.Nothing,+      price = Core.Nothing+    }++instance Core.FromJSON PricePerBuyer where+  parseJSON =+    Core.withObject+      "PricePerBuyer"+      ( \o ->+          PricePerBuyer+            Core.<$> (o Core..:? "auctionTier")+            Core.<*> (o Core..:? "billedBuyer")+            Core.<*> (o Core..:? "buyer")+            Core.<*> (o Core..:? "price")+      )++instance Core.ToJSON PricePerBuyer where+  toJSON PricePerBuyer {..} =+    Core.object+      ( Core.catMaybes+          [ ("auctionTier" Core..=) Core.<$> auctionTier,+            ("billedBuyer" Core..=) Core.<$> billedBuyer,+            ("buyer" Core..=) Core.<$> buyer,+            ("price" Core..=) Core.<$> price+          ]+      )++--+-- /See:/ 'newPrivateData' smart constructor.+data PrivateData = PrivateData+  { referenceId :: (Core.Maybe Core.Text),+    referencePayload :: (Core.Maybe Core.Base64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PrivateData' with the minimum fields required to make a request.+newPrivateData ::+  PrivateData+newPrivateData =+  PrivateData+    { referenceId = Core.Nothing,+      referencePayload = Core.Nothing+    }++instance Core.FromJSON PrivateData where+  parseJSON =+    Core.withObject+      "PrivateData"+      ( \o ->+          PrivateData+            Core.<$> (o Core..:? "referenceId")+            Core.<*> (o Core..:? "referencePayload")+      )++instance Core.ToJSON PrivateData where+  toJSON PrivateData {..} =+    Core.object+      ( Core.catMaybes+          [ ("referenceId" Core..=) Core.<$> referenceId,+            ("referencePayload" Core..=) Core.<$> referencePayload+          ]+      )++-- | A product is segment of inventory that a seller wishes to sell. It is associated with certain terms and targeting information which helps buyer know more about the inventory. Each field in a product can have one of the following setting:+--+-- (readonly) - It is an error to try and set this field. (buyer-readonly) - Only the seller can set this field. (seller-readonly) - Only the buyer can set this field. (updatable) - The field is updatable at all times by either buyer or the seller.+--+-- /See:/ 'newProduct' smart constructor.+data Product = Product+  { -- | The billed buyer corresponding to the buyer that created the offer. (readonly, except on create)+    billedBuyer :: (Core.Maybe Buyer),+    -- | The buyer that created the offer if this is a buyer initiated offer (readonly, except on create)+    buyer :: (Core.Maybe Buyer),+    -- | Creation time in ms. since epoch (readonly)+    creationTimeMs :: (Core.Maybe Core.Int64),+    -- | Optional contact information for the creator of this product. (buyer-readonly)+    creatorContacts :: (Core.Maybe [ContactInformation]),+    -- | The role that created the offer. Set to BUYER for buyer initiated offers.+    creatorRole :: (Core.Maybe Core.Text),+    -- | The set of fields around delivery control that are interesting for a buyer to see but are non-negotiable. These are set by the publisher. This message is assigned an id of 100 since some day we would want to model this as a protobuf extension.+    deliveryControl :: (Core.Maybe DeliveryControl),+    -- | The proposed end time for the deal (ms since epoch) (buyer-readonly)+    flightEndTimeMs :: (Core.Maybe Core.Int64),+    -- | Inventory availability dates. (times are in ms since epoch) The granularity is generally in the order of seconds. (buyer-readonly)+    flightStartTimeMs :: (Core.Maybe Core.Int64),+    -- | If the creator has already signed off on the product, then the buyer can finalize the deal by accepting the product as is. When copying to a proposal, if any of the terms are changed, then auto_finalize is automatically set to false.+    hasCreatorSignedOff :: (Core.Maybe Core.Bool),+    -- | What exchange will provide this inventory (readonly, except on create).+    inventorySource :: (Core.Maybe Core.Text),+    -- | Identifies what kind of resource this is. Value: the fixed string \"adexchangebuyer#product\".+    kind :: Core.Text,+    -- | Optional List of labels for the product (optional, buyer-readonly).+    labels :: (Core.Maybe [MarketplaceLabel]),+    -- | Time of last update in ms. since epoch (readonly)+    lastUpdateTimeMs :: (Core.Maybe Core.Int64),+    -- | Optional legacy offer id if this offer is a preferred deal offer.+    legacyOfferId :: (Core.Maybe Core.Text),+    -- | Marketplace publisher profile Id. This Id differs from the regular publisher/profile/id in that 1. This is a new id, the old Id will be deprecated in 2017. 2. This id uniquely identifies a publisher profile by itself.+    marketplacePublisherProfileId :: (Core.Maybe Core.Text),+    -- | The name for this product as set by the seller. (buyer-readonly)+    name :: (Core.Maybe Core.Text),+    -- | Optional private auction id if this offer is a private auction offer.+    privateAuctionId :: (Core.Maybe Core.Text),+    -- | The unique id for the product (readonly)+    productId :: (Core.Maybe Core.Text),+    -- | Id of the publisher profile for a given seller. A (seller.account/id, publisher/profile_id) pair uniquely identifies a publisher profile. Buyers can call the PublisherProfiles::List endpoint to get a list of publisher profiles for a given seller.+    publisherProfileId :: (Core.Maybe Core.Text),+    -- | Publisher self-provided forecast information.+    publisherProvidedForecast :: (Core.Maybe PublisherProvidedForecast),+    -- | The revision number of the product. (readonly)+    revisionNumber :: (Core.Maybe Core.Int64),+    -- | Information about the seller that created this product (readonly, except on create)+    seller :: (Core.Maybe Seller),+    -- | Targeting that is shared between the buyer and the seller. Each targeting criteria has a specified key and for each key there is a list of inclusion value or exclusion values. (buyer-readonly)+    sharedTargetings :: (Core.Maybe [SharedTargeting]),+    -- | The state of the product. (buyer-readonly)+    state :: (Core.Maybe Core.Text),+    -- | The syndication product associated with the deal. (readonly, except on create)+    syndicationProduct :: (Core.Maybe Core.Text),+    -- | The negotiable terms of the deal (buyer-readonly)+    terms :: (Core.Maybe DealTerms),+    -- | The web property code for the seller. This field is meant to be copied over as is when creating deals.+    webPropertyCode :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Product' with the minimum fields required to make a request.+newProduct ::+  Product+newProduct =+  Product+    { billedBuyer = Core.Nothing,+      buyer = Core.Nothing,+      creationTimeMs = Core.Nothing,+      creatorContacts = Core.Nothing,+      creatorRole = Core.Nothing,+      deliveryControl = Core.Nothing,+      flightEndTimeMs = Core.Nothing,+      flightStartTimeMs = Core.Nothing,+      hasCreatorSignedOff = Core.Nothing,+      inventorySource = Core.Nothing,+      kind = "adexchangebuyer#product",+      labels = Core.Nothing,+      lastUpdateTimeMs = Core.Nothing,+      legacyOfferId = Core.Nothing,+      marketplacePublisherProfileId = Core.Nothing,+      name = Core.Nothing,+      privateAuctionId = Core.Nothing,+      productId = Core.Nothing,+      publisherProfileId = Core.Nothing,+      publisherProvidedForecast = Core.Nothing,+      revisionNumber = Core.Nothing,+      seller = Core.Nothing,+      sharedTargetings = Core.Nothing,+      state = Core.Nothing,+      syndicationProduct = Core.Nothing,+      terms = Core.Nothing,+      webPropertyCode = Core.Nothing+    }++instance Core.FromJSON Product where+  parseJSON =+    Core.withObject+      "Product"+      ( \o ->+          Product+            Core.<$> (o Core..:? "billedBuyer")+            Core.<*> (o Core..:? "buyer")+            Core.<*> (o Core..:? "creationTimeMs" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "creatorContacts")+            Core.<*> (o Core..:? "creatorRole")+            Core.<*> (o Core..:? "deliveryControl")+            Core.<*> (o Core..:? "flightEndTimeMs" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "flightStartTimeMs" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "hasCreatorSignedOff")+            Core.<*> (o Core..:? "inventorySource")+            Core.<*> (o Core..:? "kind" Core..!= "adexchangebuyer#product")+            Core.<*> (o Core..:? "labels")+            Core.<*> (o Core..:? "lastUpdateTimeMs" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "legacyOfferId")+            Core.<*> (o Core..:? "marketplacePublisherProfileId")+            Core.<*> (o Core..:? "name")+            Core.<*> (o Core..:? "privateAuctionId")+            Core.<*> (o Core..:? "productId")+            Core.<*> (o Core..:? "publisherProfileId")+            Core.<*> (o Core..:? "publisherProvidedForecast")+            Core.<*> (o Core..:? "revisionNumber" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "seller")+            Core.<*> (o Core..:? "sharedTargetings")+            Core.<*> (o Core..:? "state")+            Core.<*> (o Core..:? "syndicationProduct")+            Core.<*> (o Core..:? "terms")+            Core.<*> (o Core..:? "webPropertyCode")+      )++instance Core.ToJSON Product where+  toJSON Product {..} =+    Core.object+      ( Core.catMaybes+          [ ("billedBuyer" Core..=) Core.<$> billedBuyer,+            ("buyer" Core..=) Core.<$> buyer,+            ("creationTimeMs" Core..=)+              Core.. Core.AsText+              Core.<$> creationTimeMs,+            ("creatorContacts" Core..=) Core.<$> creatorContacts,+            ("creatorRole" Core..=) Core.<$> creatorRole,+            ("deliveryControl" Core..=) Core.<$> deliveryControl,+            ("flightEndTimeMs" Core..=)+              Core.. Core.AsText+              Core.<$> flightEndTimeMs,+            ("flightStartTimeMs" Core..=)+              Core.. Core.AsText+              Core.<$> flightStartTimeMs,+            ("hasCreatorSignedOff" Core..=) Core.<$> hasCreatorSignedOff,+            ("inventorySource" Core..=) Core.<$> inventorySource,+            Core.Just ("kind" Core..= kind),+            ("labels" Core..=) Core.<$> labels,+            ("lastUpdateTimeMs" Core..=)+              Core.. Core.AsText+              Core.<$> lastUpdateTimeMs,+            ("legacyOfferId" Core..=) Core.<$> legacyOfferId,+            ("marketplacePublisherProfileId" Core..=)+              Core.<$> marketplacePublisherProfileId,+            ("name" Core..=) Core.<$> name,+            ("privateAuctionId" Core..=) Core.<$> privateAuctionId,+            ("productId" Core..=) Core.<$> productId,+            ("publisherProfileId" Core..=) Core.<$> publisherProfileId,+            ("publisherProvidedForecast" Core..=)+              Core.<$> publisherProvidedForecast,+            ("revisionNumber" Core..=)+              Core.. Core.AsText+              Core.<$> revisionNumber,+            ("seller" Core..=) Core.<$> seller,+            ("sharedTargetings" Core..=) Core.<$> sharedTargetings,+            ("state" Core..=) Core.<$> state,+            ("syndicationProduct" Core..=) Core.<$> syndicationProduct,+            ("terms" Core..=) Core.<$> terms,+            ("webPropertyCode" Core..=) Core.<$> webPropertyCode+          ]+      )++-- | Represents a proposal in the marketplace. A proposal is the unit of negotiation between a seller and a buyer and contains deals which are served. Each field in a proposal can have one of the following setting:+--+-- (readonly) - It is an error to try and set this field. (buyer-readonly) - Only the seller can set this field. (seller-readonly) - Only the buyer can set this field. (updatable) - The field is updatable at all times by either buyer or the seller.+--+-- /See:/ 'newProposal' smart constructor.+data Proposal = Proposal+  { -- | Reference to the buyer that will get billed for this proposal. (readonly)+    billedBuyer :: (Core.Maybe Buyer),+    -- | Reference to the buyer on the proposal. (readonly, except on create)+    buyer :: (Core.Maybe Buyer),+    -- | Optional contact information of the buyer. (seller-readonly)+    buyerContacts :: (Core.Maybe [ContactInformation]),+    -- | Private data for buyer. (hidden from seller).+    buyerPrivateData :: (Core.Maybe PrivateData),+    -- | IDs of DBM advertisers permission to this proposal.+    dbmAdvertiserIds :: (Core.Maybe [Core.Text]),+    -- | When an proposal is in an accepted state, indicates whether the buyer has signed off. Once both sides have signed off on a deal, the proposal can be finalized by the seller. (seller-readonly)+    hasBuyerSignedOff :: (Core.Maybe Core.Bool),+    -- | When an proposal is in an accepted state, indicates whether the buyer has signed off Once both sides have signed off on a deal, the proposal can be finalized by the seller. (buyer-readonly)+    hasSellerSignedOff :: (Core.Maybe Core.Bool),+    -- | What exchange will provide this inventory (readonly, except on create).+    inventorySource :: (Core.Maybe Core.Text),+    -- | True if the proposal is being renegotiated (readonly).+    isRenegotiating :: (Core.Maybe Core.Bool),+    -- | True, if the buyside inventory setup is complete for this proposal. (readonly, except via OrderSetupCompleted action) Deprecated in favor of deal level setup complete flag.+    isSetupComplete :: (Core.Maybe Core.Bool),+    -- | Identifies what kind of resource this is. Value: the fixed string \"adexchangebuyer#proposal\".+    kind :: Core.Text,+    -- | List of labels associated with the proposal. (readonly)+    labels :: (Core.Maybe [MarketplaceLabel]),+    -- | The role of the last user that either updated the proposal or left a comment. (readonly)+    lastUpdaterOrCommentorRole :: (Core.Maybe Core.Text),+    -- | The name for the proposal (updatable)+    name :: (Core.Maybe Core.Text),+    -- | Optional negotiation id if this proposal is a preferred deal proposal.+    negotiationId :: (Core.Maybe Core.Text),+    -- | Indicates whether the buyer\/seller created the proposal.(readonly)+    originatorRole :: (Core.Maybe Core.Text),+    -- | Optional private auction id if this proposal is a private auction proposal.+    privateAuctionId :: (Core.Maybe Core.Text),+    -- | The unique id of the proposal. (readonly).+    proposalId :: (Core.Maybe Core.Text),+    -- | The current state of the proposal. (readonly)+    proposalState :: (Core.Maybe Core.Text),+    -- | The revision number for the proposal (readonly).+    revisionNumber :: (Core.Maybe Core.Int64),+    -- | The time (ms since epoch) when the proposal was last revised (readonly).+    revisionTimeMs :: (Core.Maybe Core.Int64),+    -- | Reference to the seller on the proposal. (readonly, except on create)+    seller :: (Core.Maybe Seller),+    -- | Optional contact information of the seller (buyer-readonly).+    sellerContacts :: (Core.Maybe [ContactInformation])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Proposal' with the minimum fields required to make a request.+newProposal ::+  Proposal+newProposal =+  Proposal+    { billedBuyer = Core.Nothing,+      buyer = Core.Nothing,+      buyerContacts = Core.Nothing,+      buyerPrivateData = Core.Nothing,+      dbmAdvertiserIds = Core.Nothing,+      hasBuyerSignedOff = Core.Nothing,+      hasSellerSignedOff = Core.Nothing,+      inventorySource = Core.Nothing,+      isRenegotiating = Core.Nothing,+      isSetupComplete = Core.Nothing,+      kind = "adexchangebuyer#proposal",+      labels = Core.Nothing,+      lastUpdaterOrCommentorRole = Core.Nothing,+      name = Core.Nothing,+      negotiationId = Core.Nothing,+      originatorRole = Core.Nothing,+      privateAuctionId = Core.Nothing,+      proposalId = Core.Nothing,+      proposalState = Core.Nothing,+      revisionNumber = Core.Nothing,+      revisionTimeMs = Core.Nothing,+      seller = Core.Nothing,+      sellerContacts = Core.Nothing+    }++instance Core.FromJSON Proposal where+  parseJSON =+    Core.withObject+      "Proposal"+      ( \o ->+          Proposal+            Core.<$> (o Core..:? "billedBuyer")+            Core.<*> (o Core..:? "buyer")+            Core.<*> (o Core..:? "buyerContacts")+            Core.<*> (o Core..:? "buyerPrivateData")+            Core.<*> (o Core..:? "dbmAdvertiserIds")+            Core.<*> (o Core..:? "hasBuyerSignedOff")+            Core.<*> (o Core..:? "hasSellerSignedOff")+            Core.<*> (o Core..:? "inventorySource")+            Core.<*> (o Core..:? "isRenegotiating")+            Core.<*> (o Core..:? "isSetupComplete")+            Core.<*> (o Core..:? "kind" Core..!= "adexchangebuyer#proposal")+            Core.<*> (o Core..:? "labels")+            Core.<*> (o Core..:? "lastUpdaterOrCommentorRole")+            Core.<*> (o Core..:? "name")+            Core.<*> (o Core..:? "negotiationId")+            Core.<*> (o Core..:? "originatorRole")+            Core.<*> (o Core..:? "privateAuctionId")+            Core.<*> (o Core..:? "proposalId")+            Core.<*> (o Core..:? "proposalState")+            Core.<*> (o Core..:? "revisionNumber" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "revisionTimeMs" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "seller")+            Core.<*> (o Core..:? "sellerContacts")+      )++instance Core.ToJSON Proposal where+  toJSON Proposal {..} =+    Core.object+      ( Core.catMaybes+          [ ("billedBuyer" Core..=) Core.<$> billedBuyer,+            ("buyer" Core..=) Core.<$> buyer,+            ("buyerContacts" Core..=) Core.<$> buyerContacts,+            ("buyerPrivateData" Core..=) Core.<$> buyerPrivateData,+            ("dbmAdvertiserIds" Core..=) Core.<$> dbmAdvertiserIds,+            ("hasBuyerSignedOff" Core..=) Core.<$> hasBuyerSignedOff,+            ("hasSellerSignedOff" Core..=) Core.<$> hasSellerSignedOff,+            ("inventorySource" Core..=) Core.<$> inventorySource,+            ("isRenegotiating" Core..=) Core.<$> isRenegotiating,+            ("isSetupComplete" Core..=) Core.<$> isSetupComplete,+            Core.Just ("kind" Core..= kind),+            ("labels" Core..=) Core.<$> labels,+            ("lastUpdaterOrCommentorRole" Core..=)+              Core.<$> lastUpdaterOrCommentorRole,+            ("name" Core..=) Core.<$> name,+            ("negotiationId" Core..=) Core.<$> negotiationId,+            ("originatorRole" Core..=) Core.<$> originatorRole,+            ("privateAuctionId" Core..=) Core.<$> privateAuctionId,+            ("proposalId" Core..=) Core.<$> proposalId,+            ("proposalState" Core..=) Core.<$> proposalState,+            ("revisionNumber" Core..=)+              Core.. Core.AsText+              Core.<$> revisionNumber,+            ("revisionTimeMs" Core..=)+              Core.. Core.AsText+              Core.<$> revisionTimeMs,+            ("seller" Core..=) Core.<$> seller,+            ("sellerContacts" Core..=) Core.<$> sellerContacts+          ]+      )++--+-- /See:/ 'newPublisherProfileApiProto' smart constructor.+data PublisherProfileApiProto = PublisherProfileApiProto+  { -- | Publisher provided info on its audience.+    audience :: (Core.Maybe Core.Text),+    -- | A pitch statement for the buyer+    buyerPitchStatement :: (Core.Maybe Core.Text),+    -- | Direct contact for the publisher profile.+    directContact :: (Core.Maybe Core.Text),+    -- | Exchange where this publisher profile is from. E.g. AdX, Rubicon etc...+    exchange :: (Core.Maybe Core.Text),+    forecastInventory :: (Core.Maybe Core.Text),+    -- | Link to publisher\'s Google+ page.+    googlePlusLink :: (Core.Maybe Core.Text),+    -- | True, if this is the parent profile, which represents all domains owned by the publisher.+    isParent :: (Core.Maybe Core.Bool),+    -- | True, if this profile is published. Deprecated for state.+    isPublished :: (Core.Maybe Core.Bool),+    -- | Identifies what kind of resource this is. Value: the fixed string \"adexchangebuyer#publisherProfileApiProto\".+    kind :: Core.Text,+    -- | The url to the logo for the publisher.+    logoUrl :: (Core.Maybe Core.Text),+    -- | The url for additional marketing and sales materials.+    mediaKitLink :: (Core.Maybe Core.Text),+    name :: (Core.Maybe Core.Text),+    -- | Publisher provided overview.+    overview :: (Core.Maybe Core.Text),+    -- | The pair of (seller.account/id, profile/id) uniquely identifies a publisher profile for a given publisher.+    profileId :: (Core.Maybe Core.Int32),+    -- | Programmatic contact for the publisher profile.+    programmaticContact :: (Core.Maybe Core.Text),+    -- | The list of app IDs represented in this publisher profile. Empty if this is a parent profile. Deprecated in favor of publisher_app.+    publisherAppIds :: (Core.Maybe [Core.Int64]),+    -- | The list of apps represented in this publisher profile. Empty if this is a parent profile.+    publisherApps :: (Core.Maybe [MobileApplication]),+    -- | The list of domains represented in this publisher profile. Empty if this is a parent profile.+    publisherDomains :: (Core.Maybe [Core.Text]),+    -- | Unique Id for publisher profile.+    publisherProfileId :: (Core.Maybe Core.Text),+    -- | Publisher provided forecasting information.+    publisherProvidedForecast :: (Core.Maybe PublisherProvidedForecast),+    -- | Link to publisher rate card+    rateCardInfoLink :: (Core.Maybe Core.Text),+    -- | Link for a sample content page.+    samplePageLink :: (Core.Maybe Core.Text),+    -- | Seller of the publisher profile.+    seller :: (Core.Maybe Seller),+    -- | State of the publisher profile.+    state :: (Core.Maybe Core.Text),+    -- | Publisher provided key metrics and rankings.+    topHeadlines :: (Core.Maybe [Core.Text])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PublisherProfileApiProto' with the minimum fields required to make a request.+newPublisherProfileApiProto ::+  PublisherProfileApiProto+newPublisherProfileApiProto =+  PublisherProfileApiProto+    { audience = Core.Nothing,+      buyerPitchStatement = Core.Nothing,+      directContact = Core.Nothing,+      exchange = Core.Nothing,+      forecastInventory = Core.Nothing,+      googlePlusLink = Core.Nothing,+      isParent = Core.Nothing,+      isPublished = Core.Nothing,+      kind = "adexchangebuyer#publisherProfileApiProto",+      logoUrl = Core.Nothing,+      mediaKitLink = Core.Nothing,+      name = Core.Nothing,+      overview = Core.Nothing,+      profileId = Core.Nothing,+      programmaticContact = Core.Nothing,+      publisherAppIds = Core.Nothing,+      publisherApps = Core.Nothing,+      publisherDomains = Core.Nothing,+      publisherProfileId = Core.Nothing,+      publisherProvidedForecast = Core.Nothing,+      rateCardInfoLink = Core.Nothing,+      samplePageLink = Core.Nothing,+      seller = Core.Nothing,+      state = Core.Nothing,+      topHeadlines = Core.Nothing+    }++instance Core.FromJSON PublisherProfileApiProto where+  parseJSON =+    Core.withObject+      "PublisherProfileApiProto"+      ( \o ->+          PublisherProfileApiProto+            Core.<$> (o Core..:? "audience")+            Core.<*> (o Core..:? "buyerPitchStatement")+            Core.<*> (o Core..:? "directContact")+            Core.<*> (o Core..:? "exchange")+            Core.<*> (o Core..:? "forecastInventory")+            Core.<*> (o Core..:? "googlePlusLink")+            Core.<*> (o Core..:? "isParent")+            Core.<*> (o Core..:? "isPublished")+            Core.<*> ( o+                         Core..:? "kind"+                         Core..!= "adexchangebuyer#publisherProfileApiProto"+                     )+            Core.<*> (o Core..:? "logoUrl")+            Core.<*> (o Core..:? "mediaKitLink")+            Core.<*> (o Core..:? "name")+            Core.<*> (o Core..:? "overview")+            Core.<*> (o Core..:? "profileId")+            Core.<*> (o Core..:? "programmaticContact")+            Core.<*> ( o+                         Core..:? "publisherAppIds"+                         Core.<&> Core.fmap (Core.fmap Core.fromAsText)+                     )+            Core.<*> (o Core..:? "publisherApps")+            Core.<*> (o Core..:? "publisherDomains")+            Core.<*> (o Core..:? "publisherProfileId")+            Core.<*> (o Core..:? "publisherProvidedForecast")+            Core.<*> (o Core..:? "rateCardInfoLink")+            Core.<*> (o Core..:? "samplePageLink")+            Core.<*> (o Core..:? "seller")+            Core.<*> (o Core..:? "state")+            Core.<*> (o Core..:? "topHeadlines")+      )++instance Core.ToJSON PublisherProfileApiProto where+  toJSON PublisherProfileApiProto {..} =+    Core.object+      ( Core.catMaybes+          [ ("audience" Core..=) Core.<$> audience,+            ("buyerPitchStatement" Core..=) Core.<$> buyerPitchStatement,+            ("directContact" Core..=) Core.<$> directContact,+            ("exchange" Core..=) Core.<$> exchange,+            ("forecastInventory" Core..=) Core.<$> forecastInventory,+            ("googlePlusLink" Core..=) Core.<$> googlePlusLink,+            ("isParent" Core..=) Core.<$> isParent,+            ("isPublished" Core..=) Core.<$> isPublished,+            Core.Just ("kind" Core..= kind),+            ("logoUrl" Core..=) Core.<$> logoUrl,+            ("mediaKitLink" Core..=) Core.<$> mediaKitLink,+            ("name" Core..=) Core.<$> name,+            ("overview" Core..=) Core.<$> overview,+            ("profileId" Core..=) Core.<$> profileId,+            ("programmaticContact" Core..=) Core.<$> programmaticContact,+            ("publisherAppIds" Core..=)+              Core.. Core.fmap Core.AsText+              Core.<$> publisherAppIds,+            ("publisherApps" Core..=) Core.<$> publisherApps,+            ("publisherDomains" Core..=) Core.<$> publisherDomains,+            ("publisherProfileId" Core..=) Core.<$> publisherProfileId,+            ("publisherProvidedForecast" Core..=)+              Core.<$> publisherProvidedForecast,+            ("rateCardInfoLink" Core..=) Core.<$> rateCardInfoLink,+            ("samplePageLink" Core..=) Core.<$> samplePageLink,+            ("seller" Core..=) Core.<$> seller,+            ("state" Core..=) Core.<$> state,+            ("topHeadlines" Core..=) Core.<$> topHeadlines+          ]+      )++-- | This message carries publisher provided forecasting information.+--+-- /See:/ 'newPublisherProvidedForecast' smart constructor.+data PublisherProvidedForecast = PublisherProvidedForecast+  { -- | Publisher provided dimensions. E.g. geo, sizes etc...+    dimensions :: (Core.Maybe [Dimension]),+    -- | Publisher provided weekly impressions.+    weeklyImpressions :: (Core.Maybe Core.Int64),+    -- | Publisher provided weekly uniques.+    weeklyUniques :: (Core.Maybe Core.Int64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PublisherProvidedForecast' with the minimum fields required to make a request.+newPublisherProvidedForecast ::+  PublisherProvidedForecast+newPublisherProvidedForecast =+  PublisherProvidedForecast+    { dimensions = Core.Nothing,+      weeklyImpressions = Core.Nothing,+      weeklyUniques = Core.Nothing+    }++instance Core.FromJSON PublisherProvidedForecast where+  parseJSON =+    Core.withObject+      "PublisherProvidedForecast"+      ( \o ->+          PublisherProvidedForecast+            Core.<$> (o Core..:? "dimensions")+            Core.<*> (o Core..:? "weeklyImpressions" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "weeklyUniques" Core.<&> Core.fmap Core.fromAsText)+      )++instance Core.ToJSON PublisherProvidedForecast where+  toJSON PublisherProvidedForecast {..} =+    Core.object+      ( Core.catMaybes+          [ ("dimensions" Core..=) Core.<$> dimensions,+            ("weeklyImpressions" Core..=)+              Core.. Core.AsText+              Core.<$> weeklyImpressions,+            ("weeklyUniques" Core..=)+              Core.. Core.AsText+              Core.<$> weeklyUniques+          ]+      )++--+-- /See:/ 'newSeller' smart constructor.+data Seller = Seller+  { -- | The unique id for the seller. The seller fills in this field. The seller account id is then available to buyer in the product.+    accountId :: (Core.Maybe Core.Text),+    -- | Optional sub-account id for the seller.+    subAccountId :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Seller' with the minimum fields required to make a request.+newSeller ::+  Seller+newSeller =+  Seller {accountId = Core.Nothing, subAccountId = Core.Nothing}++instance Core.FromJSON Seller where+  parseJSON =+    Core.withObject+      "Seller"+      ( \o ->+          Seller+            Core.<$> (o Core..:? "accountId")+            Core.<*> (o Core..:? "subAccountId")+      )++instance Core.ToJSON Seller where+  toJSON Seller {..} =+    Core.object+      ( Core.catMaybes+          [ ("accountId" Core..=) Core.<$> accountId,+            ("subAccountId" Core..=) Core.<$> subAccountId+          ]+      )++--+-- /See:/ 'newSharedTargeting' smart constructor.+data SharedTargeting = SharedTargeting+  { -- | The list of values to exclude from targeting. Each value is AND\'d together.+    exclusions :: (Core.Maybe [TargetingValue]),+    -- | The list of value to include as part of the targeting. Each value is OR\'d together.+    inclusions :: (Core.Maybe [TargetingValue]),+    -- | The key representing the shared targeting criterion.+    key :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SharedTargeting' with the minimum fields required to make a request.+newSharedTargeting ::+  SharedTargeting+newSharedTargeting =+  SharedTargeting+    { exclusions = Core.Nothing,+      inclusions = Core.Nothing,+      key = Core.Nothing+    }++instance Core.FromJSON SharedTargeting where+  parseJSON =+    Core.withObject+      "SharedTargeting"+      ( \o ->+          SharedTargeting+            Core.<$> (o Core..:? "exclusions")+            Core.<*> (o Core..:? "inclusions")+            Core.<*> (o Core..:? "key")+      )++instance Core.ToJSON SharedTargeting where+  toJSON SharedTargeting {..} =+    Core.object+      ( Core.catMaybes+          [ ("exclusions" Core..=) Core.<$> exclusions,+            ("inclusions" Core..=) Core.<$> inclusions,+            ("key" Core..=) Core.<$> key+          ]+      )++--+-- /See:/ 'newTargetingValue' smart constructor.+data TargetingValue = TargetingValue+  { -- | The creative size value to exclude\/include.+    creativeSizeValue :: (Core.Maybe TargetingValueCreativeSize),+    -- | The daypart targeting to include \/ exclude. Filled in when the key is GOOG/DAYPART/TARGETING.+    dayPartTargetingValue :: (Core.Maybe TargetingValueDayPartTargeting),+    demogAgeCriteriaValue :: (Core.Maybe TargetingValueDemogAgeCriteria),+    demogGenderCriteriaValue :: (Core.Maybe TargetingValueDemogGenderCriteria),+    -- | The long value to exclude\/include.+    longValue :: (Core.Maybe Core.Int64),+    requestPlatformTargetingValue :: (Core.Maybe TargetingValueRequestPlatformTargeting),+    -- | The string value to exclude\/include.+    stringValue :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TargetingValue' with the minimum fields required to make a request.+newTargetingValue ::+  TargetingValue+newTargetingValue =+  TargetingValue+    { creativeSizeValue = Core.Nothing,+      dayPartTargetingValue = Core.Nothing,+      demogAgeCriteriaValue = Core.Nothing,+      demogGenderCriteriaValue = Core.Nothing,+      longValue = Core.Nothing,+      requestPlatformTargetingValue = Core.Nothing,+      stringValue = Core.Nothing+    }++instance Core.FromJSON TargetingValue where+  parseJSON =+    Core.withObject+      "TargetingValue"+      ( \o ->+          TargetingValue+            Core.<$> (o Core..:? "creativeSizeValue")+            Core.<*> (o Core..:? "dayPartTargetingValue")+            Core.<*> (o Core..:? "demogAgeCriteriaValue")+            Core.<*> (o Core..:? "demogGenderCriteriaValue")+            Core.<*> (o Core..:? "longValue" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "requestPlatformTargetingValue")+            Core.<*> (o Core..:? "stringValue")+      )++instance Core.ToJSON TargetingValue where+  toJSON TargetingValue {..} =+    Core.object+      ( Core.catMaybes+          [ ("creativeSizeValue" Core..=) Core.<$> creativeSizeValue,+            ("dayPartTargetingValue" Core..=) Core.<$> dayPartTargetingValue,+            ("demogAgeCriteriaValue" Core..=) Core.<$> demogAgeCriteriaValue,+            ("demogGenderCriteriaValue" Core..=)+              Core.<$> demogGenderCriteriaValue,+            ("longValue" Core..=) Core.. Core.AsText Core.<$> longValue,+            ("requestPlatformTargetingValue" Core..=)+              Core.<$> requestPlatformTargetingValue,+            ("stringValue" Core..=) Core.<$> stringValue+          ]+      )++-- | Next Id: 7+--+-- /See:/ 'newTargetingValueCreativeSize' smart constructor.+data TargetingValueCreativeSize = TargetingValueCreativeSize+  { -- | The formats allowed by the publisher.+    allowedFormats :: (Core.Maybe [Core.Text]),+    -- | For video size type, the list of companion sizes.+    companionSizes :: (Core.Maybe [TargetingValueSize]),+    -- | The Creative size type.+    creativeSizeType :: (Core.Maybe Core.Text),+    -- | The native template for native ad.+    nativeTemplate :: (Core.Maybe Core.Text),+    -- | For regular or video creative size type, specifies the size of the creative.+    size :: (Core.Maybe TargetingValueSize),+    -- | The skippable ad type for video size.+    skippableAdType :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TargetingValueCreativeSize' with the minimum fields required to make a request.+newTargetingValueCreativeSize ::+  TargetingValueCreativeSize+newTargetingValueCreativeSize =+  TargetingValueCreativeSize+    { allowedFormats = Core.Nothing,+      companionSizes = Core.Nothing,+      creativeSizeType = Core.Nothing,+      nativeTemplate = Core.Nothing,+      size = Core.Nothing,+      skippableAdType = Core.Nothing+    }++instance Core.FromJSON TargetingValueCreativeSize where+  parseJSON =+    Core.withObject+      "TargetingValueCreativeSize"+      ( \o ->+          TargetingValueCreativeSize+            Core.<$> (o Core..:? "allowedFormats")+            Core.<*> (o Core..:? "companionSizes")+            Core.<*> (o Core..:? "creativeSizeType")+            Core.<*> (o Core..:? "nativeTemplate")+            Core.<*> (o Core..:? "size")+            Core.<*> (o Core..:? "skippableAdType")+      )++instance Core.ToJSON TargetingValueCreativeSize where+  toJSON TargetingValueCreativeSize {..} =+    Core.object+      ( Core.catMaybes+          [ ("allowedFormats" Core..=) Core.<$> allowedFormats,+            ("companionSizes" Core..=) Core.<$> companionSizes,+            ("creativeSizeType" Core..=) Core.<$> creativeSizeType,+            ("nativeTemplate" Core..=) Core.<$> nativeTemplate,+            ("size" Core..=) Core.<$> size,+            ("skippableAdType" Core..=) Core.<$> skippableAdType+          ]+      )++--+-- /See:/ 'newTargetingValueDayPartTargeting' smart constructor.+data TargetingValueDayPartTargeting = TargetingValueDayPartTargeting+  { dayParts :: (Core.Maybe [TargetingValueDayPartTargetingDayPart]),+    timeZoneType :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TargetingValueDayPartTargeting' with the minimum fields required to make a request.+newTargetingValueDayPartTargeting ::+  TargetingValueDayPartTargeting+newTargetingValueDayPartTargeting =+  TargetingValueDayPartTargeting+    { dayParts = Core.Nothing,+      timeZoneType = Core.Nothing+    }++instance Core.FromJSON TargetingValueDayPartTargeting where+  parseJSON =+    Core.withObject+      "TargetingValueDayPartTargeting"+      ( \o ->+          TargetingValueDayPartTargeting+            Core.<$> (o Core..:? "dayParts")+            Core.<*> (o Core..:? "timeZoneType")+      )++instance Core.ToJSON TargetingValueDayPartTargeting where+  toJSON TargetingValueDayPartTargeting {..} =+    Core.object+      ( Core.catMaybes+          [ ("dayParts" Core..=) Core.<$> dayParts,+            ("timeZoneType" Core..=) Core.<$> timeZoneType+          ]+      )++--+-- /See:/ 'newTargetingValueDayPartTargetingDayPart' smart constructor.+data TargetingValueDayPartTargetingDayPart = TargetingValueDayPartTargetingDayPart+  { dayOfWeek :: (Core.Maybe Core.Text),+    endHour :: (Core.Maybe Core.Int32),+    endMinute :: (Core.Maybe Core.Int32),+    startHour :: (Core.Maybe Core.Int32),+    startMinute :: (Core.Maybe Core.Int32)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TargetingValueDayPartTargetingDayPart' with the minimum fields required to make a request.+newTargetingValueDayPartTargetingDayPart ::+  TargetingValueDayPartTargetingDayPart+newTargetingValueDayPartTargetingDayPart =+  TargetingValueDayPartTargetingDayPart+    { dayOfWeek = Core.Nothing,+      endHour = Core.Nothing,+      endMinute = Core.Nothing,+      startHour = Core.Nothing,+      startMinute = Core.Nothing+    }++instance Core.FromJSON TargetingValueDayPartTargetingDayPart where+  parseJSON =+    Core.withObject+      "TargetingValueDayPartTargetingDayPart"+      ( \o ->+          TargetingValueDayPartTargetingDayPart+            Core.<$> (o Core..:? "dayOfWeek")+            Core.<*> (o Core..:? "endHour")+            Core.<*> (o Core..:? "endMinute")+            Core.<*> (o Core..:? "startHour")+            Core.<*> (o Core..:? "startMinute")+      )++instance Core.ToJSON TargetingValueDayPartTargetingDayPart where+  toJSON TargetingValueDayPartTargetingDayPart {..} =+    Core.object+      ( Core.catMaybes+          [ ("dayOfWeek" Core..=) Core.<$> dayOfWeek,+            ("endHour" Core..=) Core.<$> endHour,+            ("endMinute" Core..=) Core.<$> endMinute,+            ("startHour" Core..=) Core.<$> startHour,+            ("startMinute" Core..=) Core.<$> startMinute+          ]+      )++--+-- /See:/ 'newTargetingValueDemogAgeCriteria' smart constructor.+newtype TargetingValueDemogAgeCriteria = TargetingValueDemogAgeCriteria+  { demogAgeCriteriaIds :: (Core.Maybe [Core.Text])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TargetingValueDemogAgeCriteria' with the minimum fields required to make a request.+newTargetingValueDemogAgeCriteria ::+  TargetingValueDemogAgeCriteria+newTargetingValueDemogAgeCriteria =+  TargetingValueDemogAgeCriteria+    { demogAgeCriteriaIds =+        Core.Nothing+    }++instance Core.FromJSON TargetingValueDemogAgeCriteria where+  parseJSON =+    Core.withObject+      "TargetingValueDemogAgeCriteria"+      ( \o ->+          TargetingValueDemogAgeCriteria+            Core.<$> (o Core..:? "demogAgeCriteriaIds")+      )++instance Core.ToJSON TargetingValueDemogAgeCriteria where+  toJSON TargetingValueDemogAgeCriteria {..} =+    Core.object+      ( Core.catMaybes+          [("demogAgeCriteriaIds" Core..=) Core.<$> demogAgeCriteriaIds]+      )++--+-- /See:/ 'newTargetingValueDemogGenderCriteria' smart constructor.+newtype TargetingValueDemogGenderCriteria = TargetingValueDemogGenderCriteria+  { demogGenderCriteriaIds :: (Core.Maybe [Core.Text])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TargetingValueDemogGenderCriteria' with the minimum fields required to make a request.+newTargetingValueDemogGenderCriteria ::+  TargetingValueDemogGenderCriteria+newTargetingValueDemogGenderCriteria =+  TargetingValueDemogGenderCriteria+    { demogGenderCriteriaIds =+        Core.Nothing+    }++instance Core.FromJSON TargetingValueDemogGenderCriteria where+  parseJSON =+    Core.withObject+      "TargetingValueDemogGenderCriteria"+      ( \o ->+          TargetingValueDemogGenderCriteria+            Core.<$> (o Core..:? "demogGenderCriteriaIds")+      )++instance Core.ToJSON TargetingValueDemogGenderCriteria where+  toJSON TargetingValueDemogGenderCriteria {..} =+    Core.object+      ( Core.catMaybes+          [ ("demogGenderCriteriaIds" Core..=)+              Core.<$> demogGenderCriteriaIds+          ]+      )++--+-- /See:/ 'newTargetingValueRequestPlatformTargeting' smart constructor.+newtype TargetingValueRequestPlatformTargeting = TargetingValueRequestPlatformTargeting+  { requestPlatforms :: (Core.Maybe [Core.Text])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TargetingValueRequestPlatformTargeting' with the minimum fields required to make a request.+newTargetingValueRequestPlatformTargeting ::+  TargetingValueRequestPlatformTargeting+newTargetingValueRequestPlatformTargeting =+  TargetingValueRequestPlatformTargeting+    { requestPlatforms =+        Core.Nothing+    }++instance Core.FromJSON TargetingValueRequestPlatformTargeting where+  parseJSON =+    Core.withObject+      "TargetingValueRequestPlatformTargeting"+      ( \o ->+          TargetingValueRequestPlatformTargeting+            Core.<$> (o Core..:? "requestPlatforms")+      )++instance Core.ToJSON TargetingValueRequestPlatformTargeting where+  toJSON TargetingValueRequestPlatformTargeting {..} =+    Core.object+      ( Core.catMaybes+          [("requestPlatforms" Core..=) Core.<$> requestPlatforms]+      )++--+-- /See:/ 'newTargetingValueSize' smart constructor.+data TargetingValueSize = TargetingValueSize+  { -- | The height of the creative.+    height :: (Core.Maybe Core.Int32),+    -- | The width of the creative.+    width :: (Core.Maybe Core.Int32)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TargetingValueSize' with the minimum fields required to make a request.+newTargetingValueSize ::+  TargetingValueSize+newTargetingValueSize =+  TargetingValueSize {height = Core.Nothing, width = Core.Nothing}++instance Core.FromJSON TargetingValueSize where+  parseJSON =+    Core.withObject+      "TargetingValueSize"+      ( \o ->+          TargetingValueSize+            Core.<$> (o Core..:? "height")+            Core.<*> (o Core..:? "width")+      )++instance Core.ToJSON TargetingValueSize where+  toJSON TargetingValueSize {..} =+    Core.object+      ( Core.catMaybes+          [ ("height" Core..=) Core.<$> height,+            ("width" Core..=) Core.<$> width+          ]+      )++--+-- /See:/ 'newUpdatePrivateAuctionProposalRequest' smart constructor.+data UpdatePrivateAuctionProposalRequest = UpdatePrivateAuctionProposalRequest+  { -- | The externalDealId of the deal to be updated.+    externalDealId :: (Core.Maybe Core.Text),+    -- | Optional note to be added.+    note :: (Core.Maybe MarketplaceNote),+    -- | The current revision number of the proposal to be updated.+    proposalRevisionNumber :: (Core.Maybe Core.Int64),+    -- | The proposed action on the private auction proposal.+    updateAction :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'UpdatePrivateAuctionProposalRequest' with the minimum fields required to make a request.+newUpdatePrivateAuctionProposalRequest ::+  UpdatePrivateAuctionProposalRequest+newUpdatePrivateAuctionProposalRequest =+  UpdatePrivateAuctionProposalRequest+    { externalDealId =+        Core.Nothing,+      note = Core.Nothing,+      proposalRevisionNumber = Core.Nothing,+      updateAction = Core.Nothing+    }++instance Core.FromJSON UpdatePrivateAuctionProposalRequest where+  parseJSON =+    Core.withObject+      "UpdatePrivateAuctionProposalRequest"+      ( \o ->+          UpdatePrivateAuctionProposalRequest+            Core.<$> (o Core..:? "externalDealId")+            Core.<*> (o Core..:? "note")+            Core.<*> ( o+                         Core..:? "proposalRevisionNumber"+                         Core.<&> Core.fmap Core.fromAsText+                     )+            Core.<*> (o Core..:? "updateAction")+      )++instance Core.ToJSON UpdatePrivateAuctionProposalRequest where+  toJSON UpdatePrivateAuctionProposalRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("externalDealId" Core..=) Core.<$> externalDealId,+            ("note" Core..=) Core.<$> note,+            ("proposalRevisionNumber" Core..=)+              Core.. Core.AsText+              Core.<$> proposalRevisionNumber,+            ("updateAction" Core..=) Core.<$> updateAction+          ]+      )
+ gen/Gogol/AdExchangeBuyer/Internal/Sum.hs view
@@ -0,0 +1,225 @@+{-# 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.AdExchangeBuyer.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.AdExchangeBuyer.Internal.Sum+  ( -- * CreativesListDealsStatusFilter+    CreativesListDealsStatusFilter+      ( CreativesListDealsStatusFilter_Approved,+        CreativesListDealsStatusFilter_ConditionallyApproved,+        CreativesListDealsStatusFilter_Disapproved,+        CreativesListDealsStatusFilter_NotChecked,+        ..+      ),++    -- * CreativesListOpenAuctionStatusFilter+    CreativesListOpenAuctionStatusFilter+      ( CreativesListOpenAuctionStatusFilter_Approved,+        CreativesListOpenAuctionStatusFilter_ConditionallyApproved,+        CreativesListOpenAuctionStatusFilter_Disapproved,+        CreativesListOpenAuctionStatusFilter_NotChecked,+        ..+      ),++    -- * ProposalsPatchUpdateAction+    ProposalsPatchUpdateAction+      ( ProposalsPatchUpdateAction_Accept,+        ProposalsPatchUpdateAction_Cancel,+        ProposalsPatchUpdateAction_Propose,+        ProposalsPatchUpdateAction_ProposeAndAccept,+        ProposalsPatchUpdateAction_UnknownAction,+        ProposalsPatchUpdateAction_UpdateNonTerms,+        ..+      ),++    -- * ProposalsUpdateUpdateAction+    ProposalsUpdateUpdateAction+      ( ProposalsUpdateUpdateAction_Accept,+        ProposalsUpdateUpdateAction_Cancel,+        ProposalsUpdateUpdateAction_Propose,+        ProposalsUpdateUpdateAction_ProposeAndAccept,+        ProposalsUpdateUpdateAction_UnknownAction,+        ProposalsUpdateUpdateAction_UpdateNonTerms,+        ..+      ),+  )+where++import Gogol.Prelude qualified as Core++-- | When specified, only creatives having the given deals status are returned.+newtype CreativesListDealsStatusFilter = CreativesListDealsStatusFilter {fromCreativesListDealsStatusFilter :: 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+    )++-- | Creatives which have been approved for serving on deals.+pattern CreativesListDealsStatusFilter_Approved :: CreativesListDealsStatusFilter+pattern CreativesListDealsStatusFilter_Approved = CreativesListDealsStatusFilter "approved"++-- | Creatives which have been conditionally approved for serving on deals.+pattern CreativesListDealsStatusFilter_ConditionallyApproved :: CreativesListDealsStatusFilter+pattern CreativesListDealsStatusFilter_ConditionallyApproved = CreativesListDealsStatusFilter "conditionally_approved"++-- | Creatives which have been disapproved for serving on deals.+pattern CreativesListDealsStatusFilter_Disapproved :: CreativesListDealsStatusFilter+pattern CreativesListDealsStatusFilter_Disapproved = CreativesListDealsStatusFilter "disapproved"++-- | Creatives whose deals status is not yet checked.+pattern CreativesListDealsStatusFilter_NotChecked :: CreativesListDealsStatusFilter+pattern CreativesListDealsStatusFilter_NotChecked = CreativesListDealsStatusFilter "not_checked"++{-# COMPLETE+  CreativesListDealsStatusFilter_Approved,+  CreativesListDealsStatusFilter_ConditionallyApproved,+  CreativesListDealsStatusFilter_Disapproved,+  CreativesListDealsStatusFilter_NotChecked,+  CreativesListDealsStatusFilter+  #-}++-- | When specified, only creatives having the given open auction status are returned.+newtype CreativesListOpenAuctionStatusFilter = CreativesListOpenAuctionStatusFilter {fromCreativesListOpenAuctionStatusFilter :: 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+    )++-- | Creatives which have been approved for serving on the open auction.+pattern CreativesListOpenAuctionStatusFilter_Approved :: CreativesListOpenAuctionStatusFilter+pattern CreativesListOpenAuctionStatusFilter_Approved = CreativesListOpenAuctionStatusFilter "approved"++-- | Creatives which have been conditionally approved for serving on the open auction.+pattern CreativesListOpenAuctionStatusFilter_ConditionallyApproved :: CreativesListOpenAuctionStatusFilter+pattern CreativesListOpenAuctionStatusFilter_ConditionallyApproved = CreativesListOpenAuctionStatusFilter "conditionally_approved"++-- | Creatives which have been disapproved for serving on the open auction.+pattern CreativesListOpenAuctionStatusFilter_Disapproved :: CreativesListOpenAuctionStatusFilter+pattern CreativesListOpenAuctionStatusFilter_Disapproved = CreativesListOpenAuctionStatusFilter "disapproved"++-- | Creatives whose open auction status is not yet checked.+pattern CreativesListOpenAuctionStatusFilter_NotChecked :: CreativesListOpenAuctionStatusFilter+pattern CreativesListOpenAuctionStatusFilter_NotChecked = CreativesListOpenAuctionStatusFilter "not_checked"++{-# COMPLETE+  CreativesListOpenAuctionStatusFilter_Approved,+  CreativesListOpenAuctionStatusFilter_ConditionallyApproved,+  CreativesListOpenAuctionStatusFilter_Disapproved,+  CreativesListOpenAuctionStatusFilter_NotChecked,+  CreativesListOpenAuctionStatusFilter+  #-}++-- | The proposed action to take on the proposal. This field is required and it must be set when updating a proposal.+newtype ProposalsPatchUpdateAction = ProposalsPatchUpdateAction {fromProposalsPatchUpdateAction :: 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 ProposalsPatchUpdateAction_Accept :: ProposalsPatchUpdateAction+pattern ProposalsPatchUpdateAction_Accept = ProposalsPatchUpdateAction "accept"++pattern ProposalsPatchUpdateAction_Cancel :: ProposalsPatchUpdateAction+pattern ProposalsPatchUpdateAction_Cancel = ProposalsPatchUpdateAction "cancel"++pattern ProposalsPatchUpdateAction_Propose :: ProposalsPatchUpdateAction+pattern ProposalsPatchUpdateAction_Propose = ProposalsPatchUpdateAction "propose"++pattern ProposalsPatchUpdateAction_ProposeAndAccept :: ProposalsPatchUpdateAction+pattern ProposalsPatchUpdateAction_ProposeAndAccept = ProposalsPatchUpdateAction "proposeAndAccept"++pattern ProposalsPatchUpdateAction_UnknownAction :: ProposalsPatchUpdateAction+pattern ProposalsPatchUpdateAction_UnknownAction = ProposalsPatchUpdateAction "unknownAction"++pattern ProposalsPatchUpdateAction_UpdateNonTerms :: ProposalsPatchUpdateAction+pattern ProposalsPatchUpdateAction_UpdateNonTerms = ProposalsPatchUpdateAction "updateNonTerms"++{-# COMPLETE+  ProposalsPatchUpdateAction_Accept,+  ProposalsPatchUpdateAction_Cancel,+  ProposalsPatchUpdateAction_Propose,+  ProposalsPatchUpdateAction_ProposeAndAccept,+  ProposalsPatchUpdateAction_UnknownAction,+  ProposalsPatchUpdateAction_UpdateNonTerms,+  ProposalsPatchUpdateAction+  #-}++-- | The proposed action to take on the proposal. This field is required and it must be set when updating a proposal.+newtype ProposalsUpdateUpdateAction = ProposalsUpdateUpdateAction {fromProposalsUpdateUpdateAction :: 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 ProposalsUpdateUpdateAction_Accept :: ProposalsUpdateUpdateAction+pattern ProposalsUpdateUpdateAction_Accept = ProposalsUpdateUpdateAction "accept"++pattern ProposalsUpdateUpdateAction_Cancel :: ProposalsUpdateUpdateAction+pattern ProposalsUpdateUpdateAction_Cancel = ProposalsUpdateUpdateAction "cancel"++pattern ProposalsUpdateUpdateAction_Propose :: ProposalsUpdateUpdateAction+pattern ProposalsUpdateUpdateAction_Propose = ProposalsUpdateUpdateAction "propose"++pattern ProposalsUpdateUpdateAction_ProposeAndAccept :: ProposalsUpdateUpdateAction+pattern ProposalsUpdateUpdateAction_ProposeAndAccept = ProposalsUpdateUpdateAction "proposeAndAccept"++pattern ProposalsUpdateUpdateAction_UnknownAction :: ProposalsUpdateUpdateAction+pattern ProposalsUpdateUpdateAction_UnknownAction = ProposalsUpdateUpdateAction "unknownAction"++pattern ProposalsUpdateUpdateAction_UpdateNonTerms :: ProposalsUpdateUpdateAction+pattern ProposalsUpdateUpdateAction_UpdateNonTerms = ProposalsUpdateUpdateAction "updateNonTerms"++{-# COMPLETE+  ProposalsUpdateUpdateAction_Accept,+  ProposalsUpdateUpdateAction_Cancel,+  ProposalsUpdateUpdateAction_Propose,+  ProposalsUpdateUpdateAction_ProposeAndAccept,+  ProposalsUpdateUpdateAction_UnknownAction,+  ProposalsUpdateUpdateAction_UpdateNonTerms,+  ProposalsUpdateUpdateAction+  #-}
+ gen/Gogol/AdExchangeBuyer/Marketplacedeals/Delete.hs view
@@ -0,0 +1,99 @@+{-# 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.AdExchangeBuyer.Marketplacedeals.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)+--+-- Delete the specified deals from the proposal+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.marketplacedeals.delete@.+module Gogol.AdExchangeBuyer.Marketplacedeals.Delete+  ( -- * Resource+    AdExchangeBuyerMarketplacedealsDeleteResource,++    -- ** Constructing a Request+    AdExchangeBuyerMarketplacedealsDelete (..),+    newAdExchangeBuyerMarketplacedealsDelete,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.marketplacedeals.delete@ method which the+-- 'AdExchangeBuyerMarketplacedealsDelete' request conforms to.+type AdExchangeBuyerMarketplacedealsDeleteResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "proposals"+    Core.:> Core.Capture "proposalId" Core.Text+    Core.:> "deals"+    Core.:> "delete"+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] DeleteOrderDealsRequest+    Core.:> Core.Post '[Core.JSON] DeleteOrderDealsResponse++-- | Delete the specified deals from the proposal+--+-- /See:/ 'newAdExchangeBuyerMarketplacedealsDelete' smart constructor.+data AdExchangeBuyerMarketplacedealsDelete = AdExchangeBuyerMarketplacedealsDelete+  { -- | Multipart request metadata.+    payload :: DeleteOrderDealsRequest,+    -- | The proposalId to delete deals from.+    proposalId :: Core.Text+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerMarketplacedealsDelete' with the minimum fields required to make a request.+newAdExchangeBuyerMarketplacedealsDelete ::+  -- |  Multipart request metadata. See 'payload'.+  DeleteOrderDealsRequest ->+  -- |  The proposalId to delete deals from. See 'proposalId'.+  Core.Text ->+  AdExchangeBuyerMarketplacedealsDelete+newAdExchangeBuyerMarketplacedealsDelete payload proposalId =+  AdExchangeBuyerMarketplacedealsDelete+    { payload = payload,+      proposalId = proposalId+    }++instance Core.GoogleRequest AdExchangeBuyerMarketplacedealsDelete where+  type+    Rs AdExchangeBuyerMarketplacedealsDelete =+      DeleteOrderDealsResponse+  type+    Scopes AdExchangeBuyerMarketplacedealsDelete =+      '[Adexchange'Buyer]+  requestClient AdExchangeBuyerMarketplacedealsDelete {..} =+    go+      proposalId+      (Core.Just Core.AltJSON)+      payload+      adExchangeBuyerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy AdExchangeBuyerMarketplacedealsDeleteResource+          )+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Marketplacedeals/Insert.hs view
@@ -0,0 +1,99 @@+{-# 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.AdExchangeBuyer.Marketplacedeals.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)+--+-- Add new deals for the specified proposal+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.marketplacedeals.insert@.+module Gogol.AdExchangeBuyer.Marketplacedeals.Insert+  ( -- * Resource+    AdExchangeBuyerMarketplacedealsInsertResource,++    -- ** Constructing a Request+    AdExchangeBuyerMarketplacedealsInsert (..),+    newAdExchangeBuyerMarketplacedealsInsert,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.marketplacedeals.insert@ method which the+-- 'AdExchangeBuyerMarketplacedealsInsert' request conforms to.+type AdExchangeBuyerMarketplacedealsInsertResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "proposals"+    Core.:> Core.Capture "proposalId" Core.Text+    Core.:> "deals"+    Core.:> "insert"+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] AddOrderDealsRequest+    Core.:> Core.Post '[Core.JSON] AddOrderDealsResponse++-- | Add new deals for the specified proposal+--+-- /See:/ 'newAdExchangeBuyerMarketplacedealsInsert' smart constructor.+data AdExchangeBuyerMarketplacedealsInsert = AdExchangeBuyerMarketplacedealsInsert+  { -- | Multipart request metadata.+    payload :: AddOrderDealsRequest,+    -- | proposalId for which deals need to be added.+    proposalId :: Core.Text+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerMarketplacedealsInsert' with the minimum fields required to make a request.+newAdExchangeBuyerMarketplacedealsInsert ::+  -- |  Multipart request metadata. See 'payload'.+  AddOrderDealsRequest ->+  -- |  proposalId for which deals need to be added. See 'proposalId'.+  Core.Text ->+  AdExchangeBuyerMarketplacedealsInsert+newAdExchangeBuyerMarketplacedealsInsert payload proposalId =+  AdExchangeBuyerMarketplacedealsInsert+    { payload = payload,+      proposalId = proposalId+    }++instance Core.GoogleRequest AdExchangeBuyerMarketplacedealsInsert where+  type+    Rs AdExchangeBuyerMarketplacedealsInsert =+      AddOrderDealsResponse+  type+    Scopes AdExchangeBuyerMarketplacedealsInsert =+      '[Adexchange'Buyer]+  requestClient AdExchangeBuyerMarketplacedealsInsert {..} =+    go+      proposalId+      (Core.Just Core.AltJSON)+      payload+      adExchangeBuyerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy AdExchangeBuyerMarketplacedealsInsertResource+          )+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Marketplacedeals/List.hs view
@@ -0,0 +1,94 @@+{-# 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.AdExchangeBuyer.Marketplacedeals.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)+--+-- List all the deals for a given proposal+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.marketplacedeals.list@.+module Gogol.AdExchangeBuyer.Marketplacedeals.List+  ( -- * Resource+    AdExchangeBuyerMarketplacedealsListResource,++    -- ** Constructing a Request+    AdExchangeBuyerMarketplacedealsList (..),+    newAdExchangeBuyerMarketplacedealsList,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.marketplacedeals.list@ method which the+-- 'AdExchangeBuyerMarketplacedealsList' request conforms to.+type AdExchangeBuyerMarketplacedealsListResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "proposals"+    Core.:> Core.Capture "proposalId" Core.Text+    Core.:> "deals"+    Core.:> Core.QueryParam "pqlQuery" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] GetOrderDealsResponse++-- | List all the deals for a given proposal+--+-- /See:/ 'newAdExchangeBuyerMarketplacedealsList' smart constructor.+data AdExchangeBuyerMarketplacedealsList = AdExchangeBuyerMarketplacedealsList+  { -- | Query string to retrieve specific deals.+    pqlQuery :: (Core.Maybe Core.Text),+    -- | The proposalId to get deals for. To search across all proposals specify order_id = \'-\' as part of the URL.+    proposalId :: Core.Text+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerMarketplacedealsList' with the minimum fields required to make a request.+newAdExchangeBuyerMarketplacedealsList ::+  -- |  The proposalId to get deals for. To search across all proposals specify order_id = \'-\' as part of the URL. See 'proposalId'.+  Core.Text ->+  AdExchangeBuyerMarketplacedealsList+newAdExchangeBuyerMarketplacedealsList proposalId =+  AdExchangeBuyerMarketplacedealsList+    { pqlQuery = Core.Nothing,+      proposalId = proposalId+    }++instance Core.GoogleRequest AdExchangeBuyerMarketplacedealsList where+  type Rs AdExchangeBuyerMarketplacedealsList = GetOrderDealsResponse+  type+    Scopes AdExchangeBuyerMarketplacedealsList =+      '[Adexchange'Buyer]+  requestClient AdExchangeBuyerMarketplacedealsList {..} =+    go+      proposalId+      pqlQuery+      (Core.Just Core.AltJSON)+      adExchangeBuyerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy AdExchangeBuyerMarketplacedealsListResource+          )+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Marketplacedeals/Update.hs view
@@ -0,0 +1,99 @@+{-# 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.AdExchangeBuyer.Marketplacedeals.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)+--+-- Replaces all the deals in the proposal with the passed in deals+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.marketplacedeals.update@.+module Gogol.AdExchangeBuyer.Marketplacedeals.Update+  ( -- * Resource+    AdExchangeBuyerMarketplacedealsUpdateResource,++    -- ** Constructing a Request+    AdExchangeBuyerMarketplacedealsUpdate (..),+    newAdExchangeBuyerMarketplacedealsUpdate,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.marketplacedeals.update@ method which the+-- 'AdExchangeBuyerMarketplacedealsUpdate' request conforms to.+type AdExchangeBuyerMarketplacedealsUpdateResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "proposals"+    Core.:> Core.Capture "proposalId" Core.Text+    Core.:> "deals"+    Core.:> "update"+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] EditAllOrderDealsRequest+    Core.:> Core.Post '[Core.JSON] EditAllOrderDealsResponse++-- | Replaces all the deals in the proposal with the passed in deals+--+-- /See:/ 'newAdExchangeBuyerMarketplacedealsUpdate' smart constructor.+data AdExchangeBuyerMarketplacedealsUpdate = AdExchangeBuyerMarketplacedealsUpdate+  { -- | Multipart request metadata.+    payload :: EditAllOrderDealsRequest,+    -- | The proposalId to edit deals on.+    proposalId :: Core.Text+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerMarketplacedealsUpdate' with the minimum fields required to make a request.+newAdExchangeBuyerMarketplacedealsUpdate ::+  -- |  Multipart request metadata. See 'payload'.+  EditAllOrderDealsRequest ->+  -- |  The proposalId to edit deals on. See 'proposalId'.+  Core.Text ->+  AdExchangeBuyerMarketplacedealsUpdate+newAdExchangeBuyerMarketplacedealsUpdate payload proposalId =+  AdExchangeBuyerMarketplacedealsUpdate+    { payload = payload,+      proposalId = proposalId+    }++instance Core.GoogleRequest AdExchangeBuyerMarketplacedealsUpdate where+  type+    Rs AdExchangeBuyerMarketplacedealsUpdate =+      EditAllOrderDealsResponse+  type+    Scopes AdExchangeBuyerMarketplacedealsUpdate =+      '[Adexchange'Buyer]+  requestClient AdExchangeBuyerMarketplacedealsUpdate {..} =+    go+      proposalId+      (Core.Just Core.AltJSON)+      payload+      adExchangeBuyerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy AdExchangeBuyerMarketplacedealsUpdateResource+          )+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Marketplacenotes/Insert.hs view
@@ -0,0 +1,99 @@+{-# 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.AdExchangeBuyer.Marketplacenotes.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)+--+-- Add notes to the proposal+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.marketplacenotes.insert@.+module Gogol.AdExchangeBuyer.Marketplacenotes.Insert+  ( -- * Resource+    AdExchangeBuyerMarketplacenotesInsertResource,++    -- ** Constructing a Request+    AdExchangeBuyerMarketplacenotesInsert (..),+    newAdExchangeBuyerMarketplacenotesInsert,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.marketplacenotes.insert@ method which the+-- 'AdExchangeBuyerMarketplacenotesInsert' request conforms to.+type AdExchangeBuyerMarketplacenotesInsertResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "proposals"+    Core.:> Core.Capture "proposalId" Core.Text+    Core.:> "notes"+    Core.:> "insert"+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] AddOrderNotesRequest+    Core.:> Core.Post '[Core.JSON] AddOrderNotesResponse++-- | Add notes to the proposal+--+-- /See:/ 'newAdExchangeBuyerMarketplacenotesInsert' smart constructor.+data AdExchangeBuyerMarketplacenotesInsert = AdExchangeBuyerMarketplacenotesInsert+  { -- | Multipart request metadata.+    payload :: AddOrderNotesRequest,+    -- | The proposalId to add notes for.+    proposalId :: Core.Text+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerMarketplacenotesInsert' with the minimum fields required to make a request.+newAdExchangeBuyerMarketplacenotesInsert ::+  -- |  Multipart request metadata. See 'payload'.+  AddOrderNotesRequest ->+  -- |  The proposalId to add notes for. See 'proposalId'.+  Core.Text ->+  AdExchangeBuyerMarketplacenotesInsert+newAdExchangeBuyerMarketplacenotesInsert payload proposalId =+  AdExchangeBuyerMarketplacenotesInsert+    { payload = payload,+      proposalId = proposalId+    }++instance Core.GoogleRequest AdExchangeBuyerMarketplacenotesInsert where+  type+    Rs AdExchangeBuyerMarketplacenotesInsert =+      AddOrderNotesResponse+  type+    Scopes AdExchangeBuyerMarketplacenotesInsert =+      '[Adexchange'Buyer]+  requestClient AdExchangeBuyerMarketplacenotesInsert {..} =+    go+      proposalId+      (Core.Just Core.AltJSON)+      payload+      adExchangeBuyerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy AdExchangeBuyerMarketplacenotesInsertResource+          )+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Marketplacenotes/List.hs view
@@ -0,0 +1,94 @@+{-# 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.AdExchangeBuyer.Marketplacenotes.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)+--+-- Get all the notes associated with a proposal+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.marketplacenotes.list@.+module Gogol.AdExchangeBuyer.Marketplacenotes.List+  ( -- * Resource+    AdExchangeBuyerMarketplacenotesListResource,++    -- ** Constructing a Request+    AdExchangeBuyerMarketplacenotesList (..),+    newAdExchangeBuyerMarketplacenotesList,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.marketplacenotes.list@ method which the+-- 'AdExchangeBuyerMarketplacenotesList' request conforms to.+type AdExchangeBuyerMarketplacenotesListResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "proposals"+    Core.:> Core.Capture "proposalId" Core.Text+    Core.:> "notes"+    Core.:> Core.QueryParam "pqlQuery" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] GetOrderNotesResponse++-- | Get all the notes associated with a proposal+--+-- /See:/ 'newAdExchangeBuyerMarketplacenotesList' smart constructor.+data AdExchangeBuyerMarketplacenotesList = AdExchangeBuyerMarketplacenotesList+  { -- | Query string to retrieve specific notes. To search the text contents of notes, please use syntax like \"WHERE note.note = \"foo\" or \"WHERE note.note LIKE \"%bar%\"+    pqlQuery :: (Core.Maybe Core.Text),+    -- | The proposalId to get notes for. To search across all proposals specify order_id = \'-\' as part of the URL.+    proposalId :: Core.Text+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerMarketplacenotesList' with the minimum fields required to make a request.+newAdExchangeBuyerMarketplacenotesList ::+  -- |  The proposalId to get notes for. To search across all proposals specify order_id = \'-\' as part of the URL. See 'proposalId'.+  Core.Text ->+  AdExchangeBuyerMarketplacenotesList+newAdExchangeBuyerMarketplacenotesList proposalId =+  AdExchangeBuyerMarketplacenotesList+    { pqlQuery = Core.Nothing,+      proposalId = proposalId+    }++instance Core.GoogleRequest AdExchangeBuyerMarketplacenotesList where+  type Rs AdExchangeBuyerMarketplacenotesList = GetOrderNotesResponse+  type+    Scopes AdExchangeBuyerMarketplacenotesList =+      '[Adexchange'Buyer]+  requestClient AdExchangeBuyerMarketplacenotesList {..} =+    go+      proposalId+      pqlQuery+      (Core.Just Core.AltJSON)+      adExchangeBuyerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy AdExchangeBuyerMarketplacenotesListResource+          )+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Marketplaceprivateauction/Updateproposal.hs view
@@ -0,0 +1,104 @@+{-# 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.AdExchangeBuyer.Marketplaceprivateauction.Updateproposal+-- 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)+--+-- Update a given private auction proposal+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.marketplaceprivateauction.updateproposal@.+module Gogol.AdExchangeBuyer.Marketplaceprivateauction.Updateproposal+  ( -- * Resource+    AdExchangeBuyerMarketplaceprivateauctionUpdateproposalResource,++    -- ** Constructing a Request+    AdExchangeBuyerMarketplaceprivateauctionUpdateproposal (..),+    newAdExchangeBuyerMarketplaceprivateauctionUpdateproposal,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.marketplaceprivateauction.updateproposal@ method which the+-- 'AdExchangeBuyerMarketplaceprivateauctionUpdateproposal' request conforms to.+type AdExchangeBuyerMarketplaceprivateauctionUpdateproposalResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "privateauction"+    Core.:> Core.Capture "privateAuctionId" Core.Text+    Core.:> "updateproposal"+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] UpdatePrivateAuctionProposalRequest+    Core.:> Core.Post '[Core.JSON] ()++-- | Update a given private auction proposal+--+-- /See:/ 'newAdExchangeBuyerMarketplaceprivateauctionUpdateproposal' smart constructor.+data AdExchangeBuyerMarketplaceprivateauctionUpdateproposal = AdExchangeBuyerMarketplaceprivateauctionUpdateproposal+  { -- | Multipart request metadata.+    payload :: UpdatePrivateAuctionProposalRequest,+    -- | The private auction id to be updated.+    privateAuctionId :: Core.Text+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerMarketplaceprivateauctionUpdateproposal' with the minimum fields required to make a request.+newAdExchangeBuyerMarketplaceprivateauctionUpdateproposal ::+  -- |  Multipart request metadata. See 'payload'.+  UpdatePrivateAuctionProposalRequest ->+  -- |  The private auction id to be updated. See 'privateAuctionId'.+  Core.Text ->+  AdExchangeBuyerMarketplaceprivateauctionUpdateproposal+newAdExchangeBuyerMarketplaceprivateauctionUpdateproposal+  payload+  privateAuctionId =+    AdExchangeBuyerMarketplaceprivateauctionUpdateproposal+      { payload =+          payload,+        privateAuctionId = privateAuctionId+      }++instance+  Core.GoogleRequest+    AdExchangeBuyerMarketplaceprivateauctionUpdateproposal+  where+  type Rs AdExchangeBuyerMarketplaceprivateauctionUpdateproposal = ()+  type+    Scopes AdExchangeBuyerMarketplaceprivateauctionUpdateproposal =+      '[Adexchange'Buyer]+  requestClient+    AdExchangeBuyerMarketplaceprivateauctionUpdateproposal {..} =+      go+        privateAuctionId+        (Core.Just Core.AltJSON)+        payload+        adExchangeBuyerService+      where+        go =+          Core.buildClient+            ( Core.Proxy ::+                Core.Proxy+                  AdExchangeBuyerMarketplaceprivateauctionUpdateproposalResource+            )+            Core.mempty
+ gen/Gogol/AdExchangeBuyer/PerformanceReport/List.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.AdExchangeBuyer.PerformanceReport.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)+--+-- Retrieves the authenticated user\'s list of performance metrics.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.performanceReport.list@.+module Gogol.AdExchangeBuyer.PerformanceReport.List+  ( -- * Resource+    AdExchangeBuyerPerformanceReportListResource,++    -- ** Constructing a Request+    AdExchangeBuyerPerformanceReportList (..),+    newAdExchangeBuyerPerformanceReportList,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.performanceReport.list@ method which the+-- 'AdExchangeBuyerPerformanceReportList' request conforms to.+type AdExchangeBuyerPerformanceReportListResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "performancereport"+    Core.:> Core.QueryParam "accountId" Core.Int64+    Core.:> Core.QueryParam "endDateTime" Core.Text+    Core.:> Core.QueryParam "startDateTime" Core.Text+    Core.:> Core.QueryParam "maxResults" Core.Word32+    Core.:> Core.QueryParam "pageToken" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] PerformanceReportList++-- | Retrieves the authenticated user\'s list of performance metrics.+--+-- /See:/ 'newAdExchangeBuyerPerformanceReportList' smart constructor.+data AdExchangeBuyerPerformanceReportList = AdExchangeBuyerPerformanceReportList+  { -- | The account id to get the reports.+    accountId :: Core.Int64,+    -- | The end time of the report in ISO 8601 timestamp format using UTC.+    endDateTime :: Core.Text,+    -- | Maximum number of entries returned on one result page. If not set, the default is 100. Optional.+    maxResults :: (Core.Maybe Core.Word32),+    -- | A continuation token, used to page through performance reports. To retrieve the next page, set this parameter to the value of \"nextPageToken\" from the previous response. Optional.+    pageToken :: (Core.Maybe Core.Text),+    -- | The start time of the report in ISO 8601 timestamp format using UTC.+    startDateTime :: Core.Text+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerPerformanceReportList' with the minimum fields required to make a request.+newAdExchangeBuyerPerformanceReportList ::+  -- |  The account id to get the reports. See 'accountId'.+  Core.Int64 ->+  -- |  The end time of the report in ISO 8601 timestamp format using UTC. See 'endDateTime'.+  Core.Text ->+  -- |  The start time of the report in ISO 8601 timestamp format using UTC. See 'startDateTime'.+  Core.Text ->+  AdExchangeBuyerPerformanceReportList+newAdExchangeBuyerPerformanceReportList+  accountId+  endDateTime+  startDateTime =+    AdExchangeBuyerPerformanceReportList+      { accountId = accountId,+        endDateTime = endDateTime,+        maxResults = Core.Nothing,+        pageToken = Core.Nothing,+        startDateTime = startDateTime+      }++instance Core.GoogleRequest AdExchangeBuyerPerformanceReportList where+  type+    Rs AdExchangeBuyerPerformanceReportList =+      PerformanceReportList+  type+    Scopes AdExchangeBuyerPerformanceReportList =+      '[Adexchange'Buyer]+  requestClient AdExchangeBuyerPerformanceReportList {..} =+    go+      (Core.Just accountId)+      (Core.Just endDateTime)+      (Core.Just startDateTime)+      maxResults+      pageToken+      (Core.Just Core.AltJSON)+      adExchangeBuyerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy AdExchangeBuyerPerformanceReportListResource+          )+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/PretargetingConfig/Delete.hs view
@@ -0,0 +1,95 @@+{-# 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.AdExchangeBuyer.PretargetingConfig.Delete+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes an existing pretargeting config.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.pretargetingConfig.delete@.+module Gogol.AdExchangeBuyer.PretargetingConfig.Delete+  ( -- * Resource+    AdExchangeBuyerPretargetingConfigDeleteResource,++    -- ** Constructing a Request+    AdExchangeBuyerPretargetingConfigDelete (..),+    newAdExchangeBuyerPretargetingConfigDelete,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.pretargetingConfig.delete@ method which the+-- 'AdExchangeBuyerPretargetingConfigDelete' request conforms to.+type AdExchangeBuyerPretargetingConfigDeleteResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "pretargetingconfigs"+    Core.:> Core.Capture "accountId" Core.Int64+    Core.:> Core.Capture "configId" Core.Int64+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Delete '[Core.JSON] ()++-- | Deletes an existing pretargeting config.+--+-- /See:/ 'newAdExchangeBuyerPretargetingConfigDelete' smart constructor.+data AdExchangeBuyerPretargetingConfigDelete = AdExchangeBuyerPretargetingConfigDelete+  { -- | The account id to delete the pretargeting config for.+    accountId :: Core.Int64,+    -- | The specific id of the configuration to delete.+    configId :: Core.Int64+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerPretargetingConfigDelete' with the minimum fields required to make a request.+newAdExchangeBuyerPretargetingConfigDelete ::+  -- |  The account id to delete the pretargeting config for. See 'accountId'.+  Core.Int64 ->+  -- |  The specific id of the configuration to delete. See 'configId'.+  Core.Int64 ->+  AdExchangeBuyerPretargetingConfigDelete+newAdExchangeBuyerPretargetingConfigDelete accountId configId =+  AdExchangeBuyerPretargetingConfigDelete+    { accountId = accountId,+      configId = configId+    }++instance Core.GoogleRequest AdExchangeBuyerPretargetingConfigDelete where+  type Rs AdExchangeBuyerPretargetingConfigDelete = ()+  type+    Scopes AdExchangeBuyerPretargetingConfigDelete =+      '[Adexchange'Buyer]+  requestClient AdExchangeBuyerPretargetingConfigDelete {..} =+    go+      accountId+      configId+      (Core.Just Core.AltJSON)+      adExchangeBuyerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy AdExchangeBuyerPretargetingConfigDeleteResource+          )+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/PretargetingConfig/Get.hs view
@@ -0,0 +1,95 @@+{-# 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.AdExchangeBuyer.PretargetingConfig.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 pretargeting configuration+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.pretargetingConfig.get@.+module Gogol.AdExchangeBuyer.PretargetingConfig.Get+  ( -- * Resource+    AdExchangeBuyerPretargetingConfigGetResource,++    -- ** Constructing a Request+    AdExchangeBuyerPretargetingConfigGet (..),+    newAdExchangeBuyerPretargetingConfigGet,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.pretargetingConfig.get@ method which the+-- 'AdExchangeBuyerPretargetingConfigGet' request conforms to.+type AdExchangeBuyerPretargetingConfigGetResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "pretargetingconfigs"+    Core.:> Core.Capture "accountId" Core.Int64+    Core.:> Core.Capture "configId" Core.Int64+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] PretargetingConfig++-- | Gets a specific pretargeting configuration+--+-- /See:/ 'newAdExchangeBuyerPretargetingConfigGet' smart constructor.+data AdExchangeBuyerPretargetingConfigGet = AdExchangeBuyerPretargetingConfigGet+  { -- | The account id to get the pretargeting config for.+    accountId :: Core.Int64,+    -- | The specific id of the configuration to retrieve.+    configId :: Core.Int64+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerPretargetingConfigGet' with the minimum fields required to make a request.+newAdExchangeBuyerPretargetingConfigGet ::+  -- |  The account id to get the pretargeting config for. See 'accountId'.+  Core.Int64 ->+  -- |  The specific id of the configuration to retrieve. See 'configId'.+  Core.Int64 ->+  AdExchangeBuyerPretargetingConfigGet+newAdExchangeBuyerPretargetingConfigGet accountId configId =+  AdExchangeBuyerPretargetingConfigGet+    { accountId = accountId,+      configId = configId+    }++instance Core.GoogleRequest AdExchangeBuyerPretargetingConfigGet where+  type Rs AdExchangeBuyerPretargetingConfigGet = PretargetingConfig+  type+    Scopes AdExchangeBuyerPretargetingConfigGet =+      '[Adexchange'Buyer]+  requestClient AdExchangeBuyerPretargetingConfigGet {..} =+    go+      accountId+      configId+      (Core.Just Core.AltJSON)+      adExchangeBuyerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy AdExchangeBuyerPretargetingConfigGetResource+          )+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/PretargetingConfig/Insert.hs view
@@ -0,0 +1,97 @@+{-# 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.AdExchangeBuyer.PretargetingConfig.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)+--+-- Inserts a new pretargeting configuration.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.pretargetingConfig.insert@.+module Gogol.AdExchangeBuyer.PretargetingConfig.Insert+  ( -- * Resource+    AdExchangeBuyerPretargetingConfigInsertResource,++    -- ** Constructing a Request+    AdExchangeBuyerPretargetingConfigInsert (..),+    newAdExchangeBuyerPretargetingConfigInsert,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.pretargetingConfig.insert@ method which the+-- 'AdExchangeBuyerPretargetingConfigInsert' request conforms to.+type AdExchangeBuyerPretargetingConfigInsertResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "pretargetingconfigs"+    Core.:> Core.Capture "accountId" Core.Int64+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] PretargetingConfig+    Core.:> Core.Post '[Core.JSON] PretargetingConfig++-- | Inserts a new pretargeting configuration.+--+-- /See:/ 'newAdExchangeBuyerPretargetingConfigInsert' smart constructor.+data AdExchangeBuyerPretargetingConfigInsert = AdExchangeBuyerPretargetingConfigInsert+  { -- | The account id to insert the pretargeting config for.+    accountId :: Core.Int64,+    -- | Multipart request metadata.+    payload :: PretargetingConfig+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerPretargetingConfigInsert' with the minimum fields required to make a request.+newAdExchangeBuyerPretargetingConfigInsert ::+  -- |  The account id to insert the pretargeting config for. See 'accountId'.+  Core.Int64 ->+  -- |  Multipart request metadata. See 'payload'.+  PretargetingConfig ->+  AdExchangeBuyerPretargetingConfigInsert+newAdExchangeBuyerPretargetingConfigInsert accountId payload =+  AdExchangeBuyerPretargetingConfigInsert+    { accountId = accountId,+      payload = payload+    }++instance Core.GoogleRequest AdExchangeBuyerPretargetingConfigInsert where+  type+    Rs AdExchangeBuyerPretargetingConfigInsert =+      PretargetingConfig+  type+    Scopes AdExchangeBuyerPretargetingConfigInsert =+      '[Adexchange'Buyer]+  requestClient AdExchangeBuyerPretargetingConfigInsert {..} =+    go+      accountId+      (Core.Just Core.AltJSON)+      payload+      adExchangeBuyerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy AdExchangeBuyerPretargetingConfigInsertResource+          )+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/PretargetingConfig/List.hs view
@@ -0,0 +1,85 @@+{-# 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.AdExchangeBuyer.PretargetingConfig.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)+--+-- Retrieves a list of the authenticated user\'s pretargeting configurations.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.pretargetingConfig.list@.+module Gogol.AdExchangeBuyer.PretargetingConfig.List+  ( -- * Resource+    AdExchangeBuyerPretargetingConfigListResource,++    -- ** Constructing a Request+    AdExchangeBuyerPretargetingConfigList (..),+    newAdExchangeBuyerPretargetingConfigList,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.pretargetingConfig.list@ method which the+-- 'AdExchangeBuyerPretargetingConfigList' request conforms to.+type AdExchangeBuyerPretargetingConfigListResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "pretargetingconfigs"+    Core.:> Core.Capture "accountId" Core.Int64+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] PretargetingConfigList++-- | Retrieves a list of the authenticated user\'s pretargeting configurations.+--+-- /See:/ 'newAdExchangeBuyerPretargetingConfigList' smart constructor.+newtype AdExchangeBuyerPretargetingConfigList = AdExchangeBuyerPretargetingConfigList+  { -- | The account id to get the pretargeting configs for.+    accountId :: Core.Int64+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerPretargetingConfigList' with the minimum fields required to make a request.+newAdExchangeBuyerPretargetingConfigList ::+  -- |  The account id to get the pretargeting configs for. See 'accountId'.+  Core.Int64 ->+  AdExchangeBuyerPretargetingConfigList+newAdExchangeBuyerPretargetingConfigList accountId =+  AdExchangeBuyerPretargetingConfigList {accountId = accountId}++instance Core.GoogleRequest AdExchangeBuyerPretargetingConfigList where+  type+    Rs AdExchangeBuyerPretargetingConfigList =+      PretargetingConfigList+  type+    Scopes AdExchangeBuyerPretargetingConfigList =+      '[Adexchange'Buyer]+  requestClient AdExchangeBuyerPretargetingConfigList {..} =+    go accountId (Core.Just Core.AltJSON) adExchangeBuyerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy AdExchangeBuyerPretargetingConfigListResource+          )+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/PretargetingConfig/Patch.hs view
@@ -0,0 +1,105 @@+{-# 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.AdExchangeBuyer.PretargetingConfig.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 an existing pretargeting config. This method supports patch semantics.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.pretargetingConfig.patch@.+module Gogol.AdExchangeBuyer.PretargetingConfig.Patch+  ( -- * Resource+    AdExchangeBuyerPretargetingConfigPatchResource,++    -- ** Constructing a Request+    AdExchangeBuyerPretargetingConfigPatch (..),+    newAdExchangeBuyerPretargetingConfigPatch,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.pretargetingConfig.patch@ method which the+-- 'AdExchangeBuyerPretargetingConfigPatch' request conforms to.+type AdExchangeBuyerPretargetingConfigPatchResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "pretargetingconfigs"+    Core.:> Core.Capture "accountId" Core.Int64+    Core.:> Core.Capture "configId" Core.Int64+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] PretargetingConfig+    Core.:> Core.Patch '[Core.JSON] PretargetingConfig++-- | Updates an existing pretargeting config. This method supports patch semantics.+--+-- /See:/ 'newAdExchangeBuyerPretargetingConfigPatch' smart constructor.+data AdExchangeBuyerPretargetingConfigPatch = AdExchangeBuyerPretargetingConfigPatch+  { -- | The account id to update the pretargeting config for.+    accountId :: Core.Int64,+    -- | The specific id of the configuration to update.+    configId :: Core.Int64,+    -- | Multipart request metadata.+    payload :: PretargetingConfig+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerPretargetingConfigPatch' with the minimum fields required to make a request.+newAdExchangeBuyerPretargetingConfigPatch ::+  -- |  The account id to update the pretargeting config for. See 'accountId'.+  Core.Int64 ->+  -- |  The specific id of the configuration to update. See 'configId'.+  Core.Int64 ->+  -- |  Multipart request metadata. See 'payload'.+  PretargetingConfig ->+  AdExchangeBuyerPretargetingConfigPatch+newAdExchangeBuyerPretargetingConfigPatch+  accountId+  configId+  payload =+    AdExchangeBuyerPretargetingConfigPatch+      { accountId = accountId,+        configId = configId,+        payload = payload+      }++instance Core.GoogleRequest AdExchangeBuyerPretargetingConfigPatch where+  type Rs AdExchangeBuyerPretargetingConfigPatch = PretargetingConfig+  type+    Scopes AdExchangeBuyerPretargetingConfigPatch =+      '[Adexchange'Buyer]+  requestClient AdExchangeBuyerPretargetingConfigPatch {..} =+    go+      accountId+      configId+      (Core.Just Core.AltJSON)+      payload+      adExchangeBuyerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy AdExchangeBuyerPretargetingConfigPatchResource+          )+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/PretargetingConfig/Update.hs view
@@ -0,0 +1,107 @@+{-# 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.AdExchangeBuyer.PretargetingConfig.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 an existing pretargeting config.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.pretargetingConfig.update@.+module Gogol.AdExchangeBuyer.PretargetingConfig.Update+  ( -- * Resource+    AdExchangeBuyerPretargetingConfigUpdateResource,++    -- ** Constructing a Request+    AdExchangeBuyerPretargetingConfigUpdate (..),+    newAdExchangeBuyerPretargetingConfigUpdate,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.pretargetingConfig.update@ method which the+-- 'AdExchangeBuyerPretargetingConfigUpdate' request conforms to.+type AdExchangeBuyerPretargetingConfigUpdateResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "pretargetingconfigs"+    Core.:> Core.Capture "accountId" Core.Int64+    Core.:> Core.Capture "configId" Core.Int64+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] PretargetingConfig+    Core.:> Core.Put '[Core.JSON] PretargetingConfig++-- | Updates an existing pretargeting config.+--+-- /See:/ 'newAdExchangeBuyerPretargetingConfigUpdate' smart constructor.+data AdExchangeBuyerPretargetingConfigUpdate = AdExchangeBuyerPretargetingConfigUpdate+  { -- | The account id to update the pretargeting config for.+    accountId :: Core.Int64,+    -- | The specific id of the configuration to update.+    configId :: Core.Int64,+    -- | Multipart request metadata.+    payload :: PretargetingConfig+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerPretargetingConfigUpdate' with the minimum fields required to make a request.+newAdExchangeBuyerPretargetingConfigUpdate ::+  -- |  The account id to update the pretargeting config for. See 'accountId'.+  Core.Int64 ->+  -- |  The specific id of the configuration to update. See 'configId'.+  Core.Int64 ->+  -- |  Multipart request metadata. See 'payload'.+  PretargetingConfig ->+  AdExchangeBuyerPretargetingConfigUpdate+newAdExchangeBuyerPretargetingConfigUpdate+  accountId+  configId+  payload =+    AdExchangeBuyerPretargetingConfigUpdate+      { accountId = accountId,+        configId = configId,+        payload = payload+      }++instance Core.GoogleRequest AdExchangeBuyerPretargetingConfigUpdate where+  type+    Rs AdExchangeBuyerPretargetingConfigUpdate =+      PretargetingConfig+  type+    Scopes AdExchangeBuyerPretargetingConfigUpdate =+      '[Adexchange'Buyer]+  requestClient AdExchangeBuyerPretargetingConfigUpdate {..} =+    go+      accountId+      configId+      (Core.Just Core.AltJSON)+      payload+      adExchangeBuyerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy AdExchangeBuyerPretargetingConfigUpdateResource+          )+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Products/Get.hs view
@@ -0,0 +1,79 @@+{-# 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.AdExchangeBuyer.Products.Get+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Gets the requested product by id.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.products.get@.+module Gogol.AdExchangeBuyer.Products.Get+  ( -- * Resource+    AdExchangeBuyerProductsGetResource,++    -- ** Constructing a Request+    AdExchangeBuyerProductsGet (..),+    newAdExchangeBuyerProductsGet,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.products.get@ method which the+-- 'AdExchangeBuyerProductsGet' request conforms to.+type AdExchangeBuyerProductsGetResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "products"+    Core.:> Core.Capture "productId" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] Product++-- | Gets the requested product by id.+--+-- /See:/ 'newAdExchangeBuyerProductsGet' smart constructor.+newtype AdExchangeBuyerProductsGet = AdExchangeBuyerProductsGet+  { -- | The id for the product to get the head revision for.+    productId :: Core.Text+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerProductsGet' with the minimum fields required to make a request.+newAdExchangeBuyerProductsGet ::+  -- |  The id for the product to get the head revision for. See 'productId'.+  Core.Text ->+  AdExchangeBuyerProductsGet+newAdExchangeBuyerProductsGet productId =+  AdExchangeBuyerProductsGet {productId = productId}++instance Core.GoogleRequest AdExchangeBuyerProductsGet where+  type Rs AdExchangeBuyerProductsGet = Product+  type Scopes AdExchangeBuyerProductsGet = '[Adexchange'Buyer]+  requestClient AdExchangeBuyerProductsGet {..} =+    go productId (Core.Just Core.AltJSON) adExchangeBuyerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy AdExchangeBuyerProductsGetResource)+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Products/Search.hs view
@@ -0,0 +1,78 @@+{-# 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.AdExchangeBuyer.Products.Search+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Gets the requested product.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.products.search@.+module Gogol.AdExchangeBuyer.Products.Search+  ( -- * Resource+    AdExchangeBuyerProductsSearchResource,++    -- ** Constructing a Request+    AdExchangeBuyerProductsSearch (..),+    newAdExchangeBuyerProductsSearch,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.products.search@ method which the+-- 'AdExchangeBuyerProductsSearch' request conforms to.+type AdExchangeBuyerProductsSearchResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "products"+    Core.:> "search"+    Core.:> Core.QueryParam "pqlQuery" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] GetOffersResponse++-- | Gets the requested product.+--+-- /See:/ 'newAdExchangeBuyerProductsSearch' smart constructor.+newtype AdExchangeBuyerProductsSearch = AdExchangeBuyerProductsSearch+  { -- | The pql query used to query for products.+    pqlQuery :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerProductsSearch' with the minimum fields required to make a request.+newAdExchangeBuyerProductsSearch ::+  AdExchangeBuyerProductsSearch+newAdExchangeBuyerProductsSearch =+  AdExchangeBuyerProductsSearch {pqlQuery = Core.Nothing}++instance Core.GoogleRequest AdExchangeBuyerProductsSearch where+  type Rs AdExchangeBuyerProductsSearch = GetOffersResponse+  type Scopes AdExchangeBuyerProductsSearch = '[Adexchange'Buyer]+  requestClient AdExchangeBuyerProductsSearch {..} =+    go pqlQuery (Core.Just Core.AltJSON) adExchangeBuyerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy AdExchangeBuyerProductsSearchResource)+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Proposals/Get.hs view
@@ -0,0 +1,79 @@+{-# 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.AdExchangeBuyer.Proposals.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)+--+-- Get a proposal given its id+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.proposals.get@.+module Gogol.AdExchangeBuyer.Proposals.Get+  ( -- * Resource+    AdExchangeBuyerProposalsGetResource,++    -- ** Constructing a Request+    AdExchangeBuyerProposalsGet (..),+    newAdExchangeBuyerProposalsGet,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.proposals.get@ method which the+-- 'AdExchangeBuyerProposalsGet' request conforms to.+type AdExchangeBuyerProposalsGetResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "proposals"+    Core.:> Core.Capture "proposalId" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] Proposal++-- | Get a proposal given its id+--+-- /See:/ 'newAdExchangeBuyerProposalsGet' smart constructor.+newtype AdExchangeBuyerProposalsGet = AdExchangeBuyerProposalsGet+  { -- | Id of the proposal to retrieve.+    proposalId :: Core.Text+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerProposalsGet' with the minimum fields required to make a request.+newAdExchangeBuyerProposalsGet ::+  -- |  Id of the proposal to retrieve. See 'proposalId'.+  Core.Text ->+  AdExchangeBuyerProposalsGet+newAdExchangeBuyerProposalsGet proposalId =+  AdExchangeBuyerProposalsGet {proposalId = proposalId}++instance Core.GoogleRequest AdExchangeBuyerProposalsGet where+  type Rs AdExchangeBuyerProposalsGet = Proposal+  type Scopes AdExchangeBuyerProposalsGet = '[Adexchange'Buyer]+  requestClient AdExchangeBuyerProposalsGet {..} =+    go proposalId (Core.Just Core.AltJSON) adExchangeBuyerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy AdExchangeBuyerProposalsGetResource)+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Proposals/Insert.hs view
@@ -0,0 +1,80 @@+{-# 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.AdExchangeBuyer.Proposals.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)+--+-- Create the given list of proposals+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.proposals.insert@.+module Gogol.AdExchangeBuyer.Proposals.Insert+  ( -- * Resource+    AdExchangeBuyerProposalsInsertResource,++    -- ** Constructing a Request+    AdExchangeBuyerProposalsInsert (..),+    newAdExchangeBuyerProposalsInsert,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.proposals.insert@ method which the+-- 'AdExchangeBuyerProposalsInsert' request conforms to.+type AdExchangeBuyerProposalsInsertResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "proposals"+    Core.:> "insert"+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] CreateOrdersRequest+    Core.:> Core.Post '[Core.JSON] CreateOrdersResponse++-- | Create the given list of proposals+--+-- /See:/ 'newAdExchangeBuyerProposalsInsert' smart constructor.+newtype AdExchangeBuyerProposalsInsert = AdExchangeBuyerProposalsInsert+  { -- | Multipart request metadata.+    payload :: CreateOrdersRequest+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerProposalsInsert' with the minimum fields required to make a request.+newAdExchangeBuyerProposalsInsert ::+  -- |  Multipart request metadata. See 'payload'.+  CreateOrdersRequest ->+  AdExchangeBuyerProposalsInsert+newAdExchangeBuyerProposalsInsert payload =+  AdExchangeBuyerProposalsInsert {payload = payload}++instance Core.GoogleRequest AdExchangeBuyerProposalsInsert where+  type Rs AdExchangeBuyerProposalsInsert = CreateOrdersResponse+  type Scopes AdExchangeBuyerProposalsInsert = '[Adexchange'Buyer]+  requestClient AdExchangeBuyerProposalsInsert {..} =+    go (Core.Just Core.AltJSON) payload adExchangeBuyerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy AdExchangeBuyerProposalsInsertResource)+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Proposals/Patch.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.AdExchangeBuyer.Proposals.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)+--+-- Update the given proposal. This method supports patch semantics.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.proposals.patch@.+module Gogol.AdExchangeBuyer.Proposals.Patch+  ( -- * Resource+    AdExchangeBuyerProposalsPatchResource,++    -- ** Constructing a Request+    AdExchangeBuyerProposalsPatch (..),+    newAdExchangeBuyerProposalsPatch,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.proposals.patch@ method which the+-- 'AdExchangeBuyerProposalsPatch' request conforms to.+type AdExchangeBuyerProposalsPatchResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "proposals"+    Core.:> Core.Capture "proposalId" Core.Text+    Core.:> Core.Capture "revisionNumber" Core.Int64+    Core.:> Core.Capture "updateAction" ProposalsPatchUpdateAction+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] Proposal+    Core.:> Core.Patch '[Core.JSON] Proposal++-- | Update the given proposal. This method supports patch semantics.+--+-- /See:/ 'newAdExchangeBuyerProposalsPatch' smart constructor.+data AdExchangeBuyerProposalsPatch = AdExchangeBuyerProposalsPatch+  { -- | Multipart request metadata.+    payload :: Proposal,+    -- | The proposal id to update.+    proposalId :: Core.Text,+    -- | The last known revision number to update. If the head revision in the marketplace database has since changed, an error will be thrown. The caller should then fetch the latest proposal at head revision and retry the update at that revision.+    revisionNumber :: Core.Int64,+    -- | The proposed action to take on the proposal. This field is required and it must be set when updating a proposal.+    updateAction :: ProposalsPatchUpdateAction+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerProposalsPatch' with the minimum fields required to make a request.+newAdExchangeBuyerProposalsPatch ::+  -- |  Multipart request metadata. See 'payload'.+  Proposal ->+  -- |  The proposal id to update. See 'proposalId'.+  Core.Text ->+  -- |  The last known revision number to update. If the head revision in the marketplace database has since changed, an error will be thrown. The caller should then fetch the latest proposal at head revision and retry the update at that revision. See 'revisionNumber'.+  Core.Int64 ->+  -- |  The proposed action to take on the proposal. This field is required and it must be set when updating a proposal. See 'updateAction'.+  ProposalsPatchUpdateAction ->+  AdExchangeBuyerProposalsPatch+newAdExchangeBuyerProposalsPatch+  payload+  proposalId+  revisionNumber+  updateAction =+    AdExchangeBuyerProposalsPatch+      { payload = payload,+        proposalId = proposalId,+        revisionNumber = revisionNumber,+        updateAction = updateAction+      }++instance Core.GoogleRequest AdExchangeBuyerProposalsPatch where+  type Rs AdExchangeBuyerProposalsPatch = Proposal+  type Scopes AdExchangeBuyerProposalsPatch = '[Adexchange'Buyer]+  requestClient AdExchangeBuyerProposalsPatch {..} =+    go+      proposalId+      revisionNumber+      updateAction+      (Core.Just Core.AltJSON)+      payload+      adExchangeBuyerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy AdExchangeBuyerProposalsPatchResource)+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Proposals/Search.hs view
@@ -0,0 +1,78 @@+{-# 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.AdExchangeBuyer.Proposals.Search+-- 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)+--+-- Search for proposals using pql query+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.proposals.search@.+module Gogol.AdExchangeBuyer.Proposals.Search+  ( -- * Resource+    AdExchangeBuyerProposalsSearchResource,++    -- ** Constructing a Request+    AdExchangeBuyerProposalsSearch (..),+    newAdExchangeBuyerProposalsSearch,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.proposals.search@ method which the+-- 'AdExchangeBuyerProposalsSearch' request conforms to.+type AdExchangeBuyerProposalsSearchResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "proposals"+    Core.:> "search"+    Core.:> Core.QueryParam "pqlQuery" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] GetOrdersResponse++-- | Search for proposals using pql query+--+-- /See:/ 'newAdExchangeBuyerProposalsSearch' smart constructor.+newtype AdExchangeBuyerProposalsSearch = AdExchangeBuyerProposalsSearch+  { -- | Query string to retrieve specific proposals.+    pqlQuery :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerProposalsSearch' with the minimum fields required to make a request.+newAdExchangeBuyerProposalsSearch ::+  AdExchangeBuyerProposalsSearch+newAdExchangeBuyerProposalsSearch =+  AdExchangeBuyerProposalsSearch {pqlQuery = Core.Nothing}++instance Core.GoogleRequest AdExchangeBuyerProposalsSearch where+  type Rs AdExchangeBuyerProposalsSearch = GetOrdersResponse+  type Scopes AdExchangeBuyerProposalsSearch = '[Adexchange'Buyer]+  requestClient AdExchangeBuyerProposalsSearch {..} =+    go pqlQuery (Core.Just Core.AltJSON) adExchangeBuyerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy AdExchangeBuyerProposalsSearchResource)+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Proposals/Setupcomplete.hs view
@@ -0,0 +1,84 @@+{-# 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.AdExchangeBuyer.Proposals.Setupcomplete+-- 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)+--+-- Update the given proposal to indicate that setup has been completed.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.proposals.setupcomplete@.+module Gogol.AdExchangeBuyer.Proposals.Setupcomplete+  ( -- * Resource+    AdExchangeBuyerProposalsSetupcompleteResource,++    -- ** Constructing a Request+    AdExchangeBuyerProposalsSetupcomplete (..),+    newAdExchangeBuyerProposalsSetupcomplete,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.proposals.setupcomplete@ method which the+-- 'AdExchangeBuyerProposalsSetupcomplete' request conforms to.+type AdExchangeBuyerProposalsSetupcompleteResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "proposals"+    Core.:> Core.Capture "proposalId" Core.Text+    Core.:> "setupcomplete"+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Post '[Core.JSON] ()++-- | Update the given proposal to indicate that setup has been completed.+--+-- /See:/ 'newAdExchangeBuyerProposalsSetupcomplete' smart constructor.+newtype AdExchangeBuyerProposalsSetupcomplete = AdExchangeBuyerProposalsSetupcomplete+  { -- | The proposal id for which the setup is complete+    proposalId :: Core.Text+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerProposalsSetupcomplete' with the minimum fields required to make a request.+newAdExchangeBuyerProposalsSetupcomplete ::+  -- |  The proposal id for which the setup is complete See 'proposalId'.+  Core.Text ->+  AdExchangeBuyerProposalsSetupcomplete+newAdExchangeBuyerProposalsSetupcomplete proposalId =+  AdExchangeBuyerProposalsSetupcomplete {proposalId = proposalId}++instance Core.GoogleRequest AdExchangeBuyerProposalsSetupcomplete where+  type Rs AdExchangeBuyerProposalsSetupcomplete = ()+  type+    Scopes AdExchangeBuyerProposalsSetupcomplete =+      '[Adexchange'Buyer]+  requestClient AdExchangeBuyerProposalsSetupcomplete {..} =+    go proposalId (Core.Just Core.AltJSON) adExchangeBuyerService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy AdExchangeBuyerProposalsSetupcompleteResource+          )+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Proposals/Update.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.AdExchangeBuyer.Proposals.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)+--+-- Update the given proposal+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.proposals.update@.+module Gogol.AdExchangeBuyer.Proposals.Update+  ( -- * Resource+    AdExchangeBuyerProposalsUpdateResource,++    -- ** Constructing a Request+    AdExchangeBuyerProposalsUpdate (..),+    newAdExchangeBuyerProposalsUpdate,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.proposals.update@ method which the+-- 'AdExchangeBuyerProposalsUpdate' request conforms to.+type AdExchangeBuyerProposalsUpdateResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "proposals"+    Core.:> Core.Capture "proposalId" Core.Text+    Core.:> Core.Capture "revisionNumber" Core.Int64+    Core.:> Core.Capture "updateAction" ProposalsUpdateUpdateAction+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] Proposal+    Core.:> Core.Put '[Core.JSON] Proposal++-- | Update the given proposal+--+-- /See:/ 'newAdExchangeBuyerProposalsUpdate' smart constructor.+data AdExchangeBuyerProposalsUpdate = AdExchangeBuyerProposalsUpdate+  { -- | Multipart request metadata.+    payload :: Proposal,+    -- | The proposal id to update.+    proposalId :: Core.Text,+    -- | The last known revision number to update. If the head revision in the marketplace database has since changed, an error will be thrown. The caller should then fetch the latest proposal at head revision and retry the update at that revision.+    revisionNumber :: Core.Int64,+    -- | The proposed action to take on the proposal. This field is required and it must be set when updating a proposal.+    updateAction :: ProposalsUpdateUpdateAction+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerProposalsUpdate' with the minimum fields required to make a request.+newAdExchangeBuyerProposalsUpdate ::+  -- |  Multipart request metadata. See 'payload'.+  Proposal ->+  -- |  The proposal id to update. See 'proposalId'.+  Core.Text ->+  -- |  The last known revision number to update. If the head revision in the marketplace database has since changed, an error will be thrown. The caller should then fetch the latest proposal at head revision and retry the update at that revision. See 'revisionNumber'.+  Core.Int64 ->+  -- |  The proposed action to take on the proposal. This field is required and it must be set when updating a proposal. See 'updateAction'.+  ProposalsUpdateUpdateAction ->+  AdExchangeBuyerProposalsUpdate+newAdExchangeBuyerProposalsUpdate+  payload+  proposalId+  revisionNumber+  updateAction =+    AdExchangeBuyerProposalsUpdate+      { payload = payload,+        proposalId = proposalId,+        revisionNumber = revisionNumber,+        updateAction = updateAction+      }++instance Core.GoogleRequest AdExchangeBuyerProposalsUpdate where+  type Rs AdExchangeBuyerProposalsUpdate = Proposal+  type Scopes AdExchangeBuyerProposalsUpdate = '[Adexchange'Buyer]+  requestClient AdExchangeBuyerProposalsUpdate {..} =+    go+      proposalId+      revisionNumber+      updateAction+      (Core.Just Core.AltJSON)+      payload+      adExchangeBuyerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy AdExchangeBuyerProposalsUpdateResource)+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Pubprofiles/List.hs view
@@ -0,0 +1,82 @@+{-# 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.AdExchangeBuyer.Pubprofiles.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)+--+-- Gets the requested publisher profile(s) by publisher accountId.+--+-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.pubprofiles.list@.+module Gogol.AdExchangeBuyer.Pubprofiles.List+  ( -- * Resource+    AdExchangeBuyerPubprofilesListResource,++    -- ** Constructing a Request+    AdExchangeBuyerPubprofilesList (..),+    newAdExchangeBuyerPubprofilesList,+  )+where++import Gogol.AdExchangeBuyer.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @adexchangebuyer.pubprofiles.list@ method which the+-- 'AdExchangeBuyerPubprofilesList' request conforms to.+type AdExchangeBuyerPubprofilesListResource =+  "adexchangebuyer"+    Core.:> "v1.4"+    Core.:> "publisher"+    Core.:> Core.Capture "accountId" Core.Int32+    Core.:> "profiles"+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] GetPublisherProfilesByAccountIdResponse++-- | Gets the requested publisher profile(s) by publisher accountId.+--+-- /See:/ 'newAdExchangeBuyerPubprofilesList' smart constructor.+newtype AdExchangeBuyerPubprofilesList = AdExchangeBuyerPubprofilesList+  { -- | The accountId of the publisher to get profiles for.+    accountId :: Core.Int32+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AdExchangeBuyerPubprofilesList' with the minimum fields required to make a request.+newAdExchangeBuyerPubprofilesList ::+  -- |  The accountId of the publisher to get profiles for. See 'accountId'.+  Core.Int32 ->+  AdExchangeBuyerPubprofilesList+newAdExchangeBuyerPubprofilesList accountId =+  AdExchangeBuyerPubprofilesList {accountId = accountId}++instance Core.GoogleRequest AdExchangeBuyerPubprofilesList where+  type+    Rs AdExchangeBuyerPubprofilesList =+      GetPublisherProfilesByAccountIdResponse+  type Scopes AdExchangeBuyerPubprofilesList = '[Adexchange'Buyer]+  requestClient AdExchangeBuyerPubprofilesList {..} =+    go accountId (Core.Just Core.AltJSON) adExchangeBuyerService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy AdExchangeBuyerPubprofilesListResource)+          Core.mempty
+ gen/Gogol/AdExchangeBuyer/Types.hs view
@@ -0,0 +1,390 @@+{-# 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.AdExchangeBuyer.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.AdExchangeBuyer.Types+  ( -- * Configuration+    adExchangeBuyerService,++    -- * OAuth Scopes+    Adexchange'Buyer,++    -- * Types++    -- ** Account+    Account (..),+    newAccount,++    -- ** Account_BidderLocationItem+    Account_BidderLocationItem (..),+    newAccount_BidderLocationItem,++    -- ** AccountsList+    AccountsList (..),+    newAccountsList,++    -- ** AddOrderDealsRequest+    AddOrderDealsRequest (..),+    newAddOrderDealsRequest,++    -- ** AddOrderDealsResponse+    AddOrderDealsResponse (..),+    newAddOrderDealsResponse,++    -- ** AddOrderNotesRequest+    AddOrderNotesRequest (..),+    newAddOrderNotesRequest,++    -- ** AddOrderNotesResponse+    AddOrderNotesResponse (..),+    newAddOrderNotesResponse,++    -- ** BillingInfo+    BillingInfo (..),+    newBillingInfo,++    -- ** BillingInfoList+    BillingInfoList (..),+    newBillingInfoList,++    -- ** Budget+    Budget (..),+    newBudget,++    -- ** Buyer+    Buyer (..),+    newBuyer,++    -- ** ContactInformation+    ContactInformation (..),+    newContactInformation,++    -- ** CreateOrdersRequest+    CreateOrdersRequest (..),+    newCreateOrdersRequest,++    -- ** CreateOrdersResponse+    CreateOrdersResponse (..),+    newCreateOrdersResponse,++    -- ** Creative+    Creative (..),+    newCreative,++    -- ** Creative_AdTechnologyProviders+    Creative_AdTechnologyProviders (..),+    newCreative_AdTechnologyProviders,++    -- ** Creative_CorrectionsItem+    Creative_CorrectionsItem (..),+    newCreative_CorrectionsItem,++    -- ** Creative_CorrectionsItem_ContextsItem+    Creative_CorrectionsItem_ContextsItem (..),+    newCreative_CorrectionsItem_ContextsItem,++    -- ** Creative_FilteringReasons+    Creative_FilteringReasons (..),+    newCreative_FilteringReasons,++    -- ** Creative_FilteringReasons_ReasonsItem+    Creative_FilteringReasons_ReasonsItem (..),+    newCreative_FilteringReasons_ReasonsItem,++    -- ** Creative_NativeAd+    Creative_NativeAd (..),+    newCreative_NativeAd,++    -- ** Creative_NativeAd_AppIcon+    Creative_NativeAd_AppIcon (..),+    newCreative_NativeAd_AppIcon,++    -- ** Creative_NativeAd_Image+    Creative_NativeAd_Image (..),+    newCreative_NativeAd_Image,++    -- ** Creative_NativeAd_Logo+    Creative_NativeAd_Logo (..),+    newCreative_NativeAd_Logo,++    -- ** Creative_ServingRestrictionsItem+    Creative_ServingRestrictionsItem (..),+    newCreative_ServingRestrictionsItem,++    -- ** Creative_ServingRestrictionsItem_ContextsItem+    Creative_ServingRestrictionsItem_ContextsItem (..),+    newCreative_ServingRestrictionsItem_ContextsItem,++    -- ** Creative_ServingRestrictionsItem_DisapprovalReasonsItem+    Creative_ServingRestrictionsItem_DisapprovalReasonsItem (..),+    newCreative_ServingRestrictionsItem_DisapprovalReasonsItem,++    -- ** CreativeDealIds+    CreativeDealIds (..),+    newCreativeDealIds,++    -- ** CreativeDealIds_DealStatusesItem+    CreativeDealIds_DealStatusesItem (..),+    newCreativeDealIds_DealStatusesItem,++    -- ** CreativesList+    CreativesList (..),+    newCreativesList,++    -- ** DealServingMetadata+    DealServingMetadata (..),+    newDealServingMetadata,++    -- ** DealServingMetadataDealPauseStatus+    DealServingMetadataDealPauseStatus (..),+    newDealServingMetadataDealPauseStatus,++    -- ** DealTerms+    DealTerms (..),+    newDealTerms,++    -- ** DealTermsGuaranteedFixedPriceTerms+    DealTermsGuaranteedFixedPriceTerms (..),+    newDealTermsGuaranteedFixedPriceTerms,++    -- ** DealTermsGuaranteedFixedPriceTermsBillingInfo+    DealTermsGuaranteedFixedPriceTermsBillingInfo (..),+    newDealTermsGuaranteedFixedPriceTermsBillingInfo,++    -- ** DealTermsNonGuaranteedAuctionTerms+    DealTermsNonGuaranteedAuctionTerms (..),+    newDealTermsNonGuaranteedAuctionTerms,++    -- ** DealTermsNonGuaranteedFixedPriceTerms+    DealTermsNonGuaranteedFixedPriceTerms (..),+    newDealTermsNonGuaranteedFixedPriceTerms,++    -- ** DealTermsRubiconNonGuaranteedTerms+    DealTermsRubiconNonGuaranteedTerms (..),+    newDealTermsRubiconNonGuaranteedTerms,++    -- ** DeleteOrderDealsRequest+    DeleteOrderDealsRequest (..),+    newDeleteOrderDealsRequest,++    -- ** DeleteOrderDealsResponse+    DeleteOrderDealsResponse (..),+    newDeleteOrderDealsResponse,++    -- ** DeliveryControl+    DeliveryControl (..),+    newDeliveryControl,++    -- ** DeliveryControlFrequencyCap+    DeliveryControlFrequencyCap (..),+    newDeliveryControlFrequencyCap,++    -- ** Dimension+    Dimension (..),+    newDimension,++    -- ** DimensionDimensionValue+    DimensionDimensionValue (..),+    newDimensionDimensionValue,++    -- ** EditAllOrderDealsRequest+    EditAllOrderDealsRequest (..),+    newEditAllOrderDealsRequest,++    -- ** EditAllOrderDealsResponse+    EditAllOrderDealsResponse (..),+    newEditAllOrderDealsResponse,++    -- ** GetOffersResponse+    GetOffersResponse (..),+    newGetOffersResponse,++    -- ** GetOrderDealsResponse+    GetOrderDealsResponse (..),+    newGetOrderDealsResponse,++    -- ** GetOrderNotesResponse+    GetOrderNotesResponse (..),+    newGetOrderNotesResponse,++    -- ** GetOrdersResponse+    GetOrdersResponse (..),+    newGetOrdersResponse,++    -- ** GetPublisherProfilesByAccountIdResponse+    GetPublisherProfilesByAccountIdResponse (..),+    newGetPublisherProfilesByAccountIdResponse,++    -- ** MarketplaceDeal+    MarketplaceDeal (..),+    newMarketplaceDeal,++    -- ** MarketplaceDealParty+    MarketplaceDealParty (..),+    newMarketplaceDealParty,++    -- ** MarketplaceLabel+    MarketplaceLabel (..),+    newMarketplaceLabel,++    -- ** MarketplaceNote+    MarketplaceNote (..),+    newMarketplaceNote,++    -- ** MobileApplication+    MobileApplication (..),+    newMobileApplication,++    -- ** PerformanceReport+    PerformanceReport (..),+    newPerformanceReport,++    -- ** PerformanceReportList+    PerformanceReportList (..),+    newPerformanceReportList,++    -- ** PretargetingConfig+    PretargetingConfig (..),+    newPretargetingConfig,++    -- ** PretargetingConfig_DimensionsItem+    PretargetingConfig_DimensionsItem (..),+    newPretargetingConfig_DimensionsItem,++    -- ** PretargetingConfig_ExcludedPlacementsItem+    PretargetingConfig_ExcludedPlacementsItem (..),+    newPretargetingConfig_ExcludedPlacementsItem,++    -- ** PretargetingConfig_PlacementsItem+    PretargetingConfig_PlacementsItem (..),+    newPretargetingConfig_PlacementsItem,++    -- ** PretargetingConfig_VideoPlayerSizesItem+    PretargetingConfig_VideoPlayerSizesItem (..),+    newPretargetingConfig_VideoPlayerSizesItem,++    -- ** PretargetingConfigList+    PretargetingConfigList (..),+    newPretargetingConfigList,++    -- ** Price+    Price (..),+    newPrice,++    -- ** PricePerBuyer+    PricePerBuyer (..),+    newPricePerBuyer,++    -- ** PrivateData+    PrivateData (..),+    newPrivateData,++    -- ** Product+    Product (..),+    newProduct,++    -- ** Proposal+    Proposal (..),+    newProposal,++    -- ** PublisherProfileApiProto+    PublisherProfileApiProto (..),+    newPublisherProfileApiProto,++    -- ** PublisherProvidedForecast+    PublisherProvidedForecast (..),+    newPublisherProvidedForecast,++    -- ** Seller+    Seller (..),+    newSeller,++    -- ** SharedTargeting+    SharedTargeting (..),+    newSharedTargeting,++    -- ** TargetingValue+    TargetingValue (..),+    newTargetingValue,++    -- ** TargetingValueCreativeSize+    TargetingValueCreativeSize (..),+    newTargetingValueCreativeSize,++    -- ** TargetingValueDayPartTargeting+    TargetingValueDayPartTargeting (..),+    newTargetingValueDayPartTargeting,++    -- ** TargetingValueDayPartTargetingDayPart+    TargetingValueDayPartTargetingDayPart (..),+    newTargetingValueDayPartTargetingDayPart,++    -- ** TargetingValueDemogAgeCriteria+    TargetingValueDemogAgeCriteria (..),+    newTargetingValueDemogAgeCriteria,++    -- ** TargetingValueDemogGenderCriteria+    TargetingValueDemogGenderCriteria (..),+    newTargetingValueDemogGenderCriteria,++    -- ** TargetingValueRequestPlatformTargeting+    TargetingValueRequestPlatformTargeting (..),+    newTargetingValueRequestPlatformTargeting,++    -- ** TargetingValueSize+    TargetingValueSize (..),+    newTargetingValueSize,++    -- ** UpdatePrivateAuctionProposalRequest+    UpdatePrivateAuctionProposalRequest (..),+    newUpdatePrivateAuctionProposalRequest,++    -- ** CreativesListDealsStatusFilter+    CreativesListDealsStatusFilter (..),++    -- ** CreativesListOpenAuctionStatusFilter+    CreativesListOpenAuctionStatusFilter (..),++    -- ** ProposalsPatchUpdateAction+    ProposalsPatchUpdateAction (..),++    -- ** ProposalsUpdateUpdateAction+    ProposalsUpdateUpdateAction (..),+  )+where++import Gogol.AdExchangeBuyer.Internal.Product+import Gogol.AdExchangeBuyer.Internal.Sum+import Gogol.Prelude qualified as Core++-- | Default request referring to version @v1.4@ of the Ad Exchange Buyer API. This contains the host and root path used as a starting point for constructing service requests.+adExchangeBuyerService :: Core.ServiceConfig+adExchangeBuyerService =+  Core.defaultService+    (Core.ServiceId "adexchangebuyer:v1.4")+    "www.googleapis.com"++-- | Manage your Ad Exchange buyer account configuration+type Adexchange'Buyer =+  "https://www.googleapis.com/auth/adexchange.buyer"
− gen/Network/Google/AdExchangeBuyer.hs
@@ -1,959 +0,0 @@-{-# LANGUAGE DataKinds         #-}-{-# LANGUAGE NoImplicitPrelude #-}-{-# LANGUAGE TypeOperators     #-}--{-# OPTIONS_GHC -fno-warn-unused-imports    #-}-{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}---- |--- Module      : Network.Google.AdExchangeBuyer--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Accesses your bidding-account information, submits creatives for--- validation, finds available direct deals, and retrieves performance--- reports.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference>-module Network.Google.AdExchangeBuyer-    (-    -- * Service Configuration-      adExchangeBuyerService--    -- * OAuth Scopes-    , adExchangeBuyerScope--    -- * API Declaration-    , AdExchangeBuyerAPI--    -- * Resources--    -- ** adexchangebuyer.accounts.get-    , module Network.Google.Resource.AdExchangeBuyer.Accounts.Get--    -- ** adexchangebuyer.accounts.list-    , module Network.Google.Resource.AdExchangeBuyer.Accounts.List--    -- ** adexchangebuyer.accounts.patch-    , module Network.Google.Resource.AdExchangeBuyer.Accounts.Patch--    -- ** adexchangebuyer.accounts.update-    , module Network.Google.Resource.AdExchangeBuyer.Accounts.Update--    -- ** adexchangebuyer.billingInfo.get-    , module Network.Google.Resource.AdExchangeBuyer.BillingInfo.Get--    -- ** adexchangebuyer.billingInfo.list-    , module Network.Google.Resource.AdExchangeBuyer.BillingInfo.List--    -- ** adexchangebuyer.budget.get-    , module Network.Google.Resource.AdExchangeBuyer.Budget.Get--    -- ** adexchangebuyer.budget.patch-    , module Network.Google.Resource.AdExchangeBuyer.Budget.Patch--    -- ** adexchangebuyer.budget.update-    , module Network.Google.Resource.AdExchangeBuyer.Budget.Update--    -- ** adexchangebuyer.creatives.addDeal-    , module Network.Google.Resource.AdExchangeBuyer.Creatives.AddDeal--    -- ** adexchangebuyer.creatives.get-    , module Network.Google.Resource.AdExchangeBuyer.Creatives.Get--    -- ** adexchangebuyer.creatives.insert-    , module Network.Google.Resource.AdExchangeBuyer.Creatives.Insert--    -- ** adexchangebuyer.creatives.list-    , module Network.Google.Resource.AdExchangeBuyer.Creatives.List--    -- ** adexchangebuyer.creatives.listDeals-    , module Network.Google.Resource.AdExchangeBuyer.Creatives.ListDeals--    -- ** adexchangebuyer.creatives.removeDeal-    , module Network.Google.Resource.AdExchangeBuyer.Creatives.RemoveDeal--    -- ** adexchangebuyer.marketplacedeals.delete-    , module Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.Delete--    -- ** adexchangebuyer.marketplacedeals.insert-    , module Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.Insert--    -- ** adexchangebuyer.marketplacedeals.list-    , module Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.List--    -- ** adexchangebuyer.marketplacedeals.update-    , module Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.Update--    -- ** adexchangebuyer.marketplacenotes.insert-    , module Network.Google.Resource.AdExchangeBuyer.MarketplaceNotes.Insert--    -- ** adexchangebuyer.marketplacenotes.list-    , module Network.Google.Resource.AdExchangeBuyer.MarketplaceNotes.List--    -- ** adexchangebuyer.marketplaceprivateauction.updateproposal-    , module Network.Google.Resource.AdExchangeBuyer.Marketplaceprivateauction.Updateproposal--    -- ** adexchangebuyer.performanceReport.list-    , module Network.Google.Resource.AdExchangeBuyer.PerformanceReport.List--    -- ** adexchangebuyer.pretargetingConfig.delete-    , module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Delete--    -- ** adexchangebuyer.pretargetingConfig.get-    , module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Get--    -- ** adexchangebuyer.pretargetingConfig.insert-    , module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Insert--    -- ** adexchangebuyer.pretargetingConfig.list-    , module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.List--    -- ** adexchangebuyer.pretargetingConfig.patch-    , module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Patch--    -- ** adexchangebuyer.pretargetingConfig.update-    , module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Update--    -- ** adexchangebuyer.products.get-    , module Network.Google.Resource.AdExchangeBuyer.Products.Get--    -- ** adexchangebuyer.products.search-    , module Network.Google.Resource.AdExchangeBuyer.Products.Search--    -- ** adexchangebuyer.proposals.get-    , module Network.Google.Resource.AdExchangeBuyer.Proposals.Get--    -- ** adexchangebuyer.proposals.insert-    , module Network.Google.Resource.AdExchangeBuyer.Proposals.Insert--    -- ** adexchangebuyer.proposals.patch-    , module Network.Google.Resource.AdExchangeBuyer.Proposals.Patch--    -- ** adexchangebuyer.proposals.search-    , module Network.Google.Resource.AdExchangeBuyer.Proposals.Search--    -- ** adexchangebuyer.proposals.setupcomplete-    , module Network.Google.Resource.AdExchangeBuyer.Proposals.Setupcomplete--    -- ** adexchangebuyer.proposals.update-    , module Network.Google.Resource.AdExchangeBuyer.Proposals.Update--    -- ** adexchangebuyer.pubprofiles.list-    , module Network.Google.Resource.AdExchangeBuyer.PubproFiles.List--    -- * Types--    -- ** MarketplaceNote-    , MarketplaceNote-    , marketplaceNote-    , mnNote-    , mnKind-    , mnTimestampMs-    , mnProposalId-    , mnDealId-    , mnProposalRevisionNumber-    , mnNoteId-    , mnCreatorRole--    -- ** CreativeNATiveAd-    , CreativeNATiveAd-    , creativeNATiveAd-    , cnataImage-    , cnataAppIcon-    , cnataClickTrackingURL-    , cnataClickLinkURL-    , cnataBody-    , cnataHeadline-    , cnataImpressionTrackingURL-    , cnataCallToAction-    , cnataStore-    , cnataVideoURL-    , cnataPrice-    , cnataAdvertiser-    , cnataStarRating-    , cnataLogo--    -- ** EditAllOrderDealsResponse-    , EditAllOrderDealsResponse-    , editAllOrderDealsResponse-    , eaodrDeals-    , eaodrOrderRevisionNumber--    -- ** TargetingValueDemogGenderCriteria-    , TargetingValueDemogGenderCriteria-    , targetingValueDemogGenderCriteria-    , tvdgcDemogGenderCriteriaIds--    -- ** CreativesList-    , CreativesList-    , creativesList-    , clNextPageToken-    , clKind-    , clItems--    -- ** CreativeDealIdsDealStatusesItem-    , CreativeDealIdsDealStatusesItem-    , creativeDealIdsDealStatusesItem-    , cdidsiArcStatus-    , cdidsiWebPropertyId-    , cdidsiDealId--    -- ** CreativeServingRestrictionsItemContextsItem-    , CreativeServingRestrictionsItemContextsItem-    , creativeServingRestrictionsItemContextsItem-    , csriciPlatform-    , csriciContextType-    , csriciAuctionType-    , csriciGeoCriteriaId--    -- ** CreateOrdersResponse-    , CreateOrdersResponse-    , createOrdersResponse-    , corProposals--    -- ** AccountBidderLocationItem-    , AccountBidderLocationItem-    , accountBidderLocationItem-    , abliURL-    , abliMaximumQps-    , abliRegion-    , abliBidProtocol--    -- ** PrivateData-    , PrivateData-    , privateData-    , pdReferencePayload-    , pdReferenceId--    -- ** Budget-    , Budget-    , budget-    , bCurrencyCode-    , bKind-    , bBudgetAmount-    , bAccountId-    , bId-    , bBillingId--    -- ** AddOrderNotesRequest-    , AddOrderNotesRequest-    , addOrderNotesRequest-    , aonrNotes--    -- ** DeliveryControlFrequencyCap-    , DeliveryControlFrequencyCap-    , deliveryControlFrequencyCap-    , dcfcMaxImpressions-    , dcfcNumTimeUnits-    , dcfcTimeUnitType--    -- ** MarketplaceDealParty-    , MarketplaceDealParty-    , marketplaceDealParty-    , mdpSeller-    , mdpBuyer--    -- ** GetOrderNotesResponse-    , GetOrderNotesResponse-    , getOrderNotesResponse-    , gonrNotes--    -- ** GetOrdersResponse-    , GetOrdersResponse-    , getOrdersResponse-    , gorProposals--    -- ** CreativeServingRestrictionsItemDisApprovalReasonsItem-    , CreativeServingRestrictionsItemDisApprovalReasonsItem-    , creativeServingRestrictionsItemDisApprovalReasonsItem-    , csridariReason-    , csridariDetails--    -- ** AccountsList-    , AccountsList-    , accountsList-    , alKind-    , alItems--    -- ** Dimension-    , Dimension-    , dimension-    , dDimensionValues-    , dDimensionType--    -- ** CreateOrdersRequest-    , CreateOrdersRequest-    , createOrdersRequest-    , cProposals-    , cWebPropertyCode--    -- ** CreativeCorrectionsItem-    , CreativeCorrectionsItem-    , creativeCorrectionsItem-    , cciContexts-    , cciReason-    , cciDetails--    -- ** DealTermsRubiconNonGuaranteedTerms-    , DealTermsRubiconNonGuaranteedTerms-    , dealTermsRubiconNonGuaranteedTerms-    , dtrngtPriorityPrice-    , dtrngtStandardPrice--    -- ** DealServingMetadata-    , DealServingMetadata-    , dealServingMetadata-    , dsmDealPauseStatus-    , dsmAlcoholAdsAllowed--    -- ** AddOrderDealsResponse-    , AddOrderDealsResponse-    , addOrderDealsResponse-    , aodrDeals-    , aodrProposalRevisionNumber--    -- ** DeliveryControl-    , DeliveryControl-    , deliveryControl-    , dcCreativeBlockingLevel-    , dcFrequencyCaps-    , dcDeliveryRateType--    -- ** PricePerBuyer-    , PricePerBuyer-    , pricePerBuyer-    , ppbBilledBuyer-    , ppbPrice-    , ppbAuctionTier-    , ppbBuyer--    -- ** Creative-    , Creative-    , creative-    , cAttribute-    , cNATiveAd-    , cHeight-    , cBuyerCreativeId-    , cAdvertiserName-    , cAdChoicesDestinationURL-    , cAgencyId-    , cCorrections-    , cProductCategories-    , cVideoVastXML-    , cKind-    , cHTMLSnippet-    , cAdvertiserId-    , cRestrictedCategories-    , cDealsStatus-    , cWidth-    , cClickThroughURL-    , cLanguages-    , cVendorType-    , cAccountId-    , cImpressionTrackingURL-    , cFilteringReasons-    , cVersion-    , cSensitiveCategories-    , cVideoURL-    , cAPIUploadTimestamp-    , cServingRestrictions-    , cDetectedDomains-    , cOpenAuctionStatus-    , cCreativeStatusIdentityType--    -- ** TargetingValueDayPartTargetingDayPart-    , TargetingValueDayPartTargetingDayPart-    , targetingValueDayPartTargetingDayPart-    , tvdptdpEndHour-    , tvdptdpStartHour-    , tvdptdpStartMinute-    , tvdptdpDayOfWeek-    , tvdptdpEndMinute--    -- ** DimensionDimensionValue-    , DimensionDimensionValue-    , dimensionDimensionValue-    , ddvName-    , ddvId-    , ddvPercentage--    -- ** PretargetingConfigList-    , PretargetingConfigList-    , pretargetingConfigList-    , pclKind-    , pclItems--    -- ** TargetingValueDemogAgeCriteria-    , TargetingValueDemogAgeCriteria-    , targetingValueDemogAgeCriteria-    , tvdacDemogAgeCriteriaIds--    -- ** DealTermsNonGuaranteedFixedPriceTerms-    , DealTermsNonGuaranteedFixedPriceTerms-    , dealTermsNonGuaranteedFixedPriceTerms-    , dtngfptFixedPrices--    -- ** PerformanceReport-    , PerformanceReport-    , performanceReport-    , prFilteredBidRate-    , prKind-    , prLatency95thPercentile-    , prCookieMatcherStatusRate-    , prHostedMatchStatusRate-    , prUnsuccessfulRequestRate-    , prBidRequestRate-    , prQuotaThrottledLimit-    , prQuotaConfiguredLimit-    , prSuccessfulRequestRate-    , prLatency85thPercentile-    , prCalloutStatusRate-    , prLatency50thPercentile-    , prBidRate-    , prCreativeStatusRate-    , prNoQuotaInRegion-    , prRegion-    , prInventoryMatchRate-    , prPixelMatchResponses-    , prTimestamp-    , prPixelMatchRequests-    , prOutOfQuota--    -- ** PretargetingConfigExcludedPlacementsItem-    , PretargetingConfigExcludedPlacementsItem-    , pretargetingConfigExcludedPlacementsItem-    , pcepiToken-    , pcepiType--    -- ** Seller-    , Seller-    , seller-    , sAccountId-    , sSubAccountId--    -- ** Account-    , Account-    , account-    , aApplyPretargetingToNonGuaranteedDeals-    , aMaximumTotalQps-    , aKind-    , aCookieMatchingURL-    , aMaximumActiveCreatives-    , aCookieMatchingNid-    , aNumberActiveCreatives-    , aId-    , aBidderLocation--    -- ** DeleteOrderDealsRequest-    , DeleteOrderDealsRequest-    , deleteOrderDealsRequest-    , dodrUpdateAction-    , dodrDealIds-    , dodrProposalRevisionNumber--    -- ** CreativesListOpenAuctionStatusFilter-    , CreativesListOpenAuctionStatusFilter (..)--    -- ** ContactInformation-    , ContactInformation-    , contactInformation-    , ciEmail-    , ciName--    -- ** CreativeNATiveAdLogo-    , CreativeNATiveAdLogo-    , creativeNATiveAdLogo-    , cnatalHeight-    , cnatalURL-    , cnatalWidth--    -- ** GetOrderDealsResponse-    , GetOrderDealsResponse-    , getOrderDealsResponse-    , godrDeals--    -- ** PerformanceReportList-    , PerformanceReportList-    , performanceReportList-    , prlKind-    , prlPerformanceReport--    -- ** PretargetingConfig-    , PretargetingConfig-    , pretargetingConfig-    , pcPlatforms-    , pcMobileCarriers-    , pcVendorTypes-    , pcExcludedGeoCriteriaIds-    , pcSupportedCreativeAttributes-    , pcUserLists-    , pcKind-    , pcExcludedPlacements-    , pcUserIdentifierDataRequired-    , pcMinimumViewabilityDecile-    , pcMobileDevices-    , pcLanguages-    , pcVerticals-    , pcVideoPlayerSizes-    , pcConfigId-    , pcPlacements-    , pcExcludedUserLists-    , pcConfigName-    , pcGeoCriteriaIds-    , pcDimensions-    , pcExcludedVerticals-    , pcCreativeType-    , pcIsActive-    , pcExcludedContentLabels-    , pcBillingId-    , pcMobileOperatingSystemVersions--    -- ** CreativeFilteringReasons-    , CreativeFilteringReasons-    , creativeFilteringReasons-    , cfrReasons-    , cfrDate--    -- ** TargetingValueCreativeSize-    , TargetingValueCreativeSize-    , targetingValueCreativeSize-    , tvcsSize-    , tvcsCompanionSizes-    , tvcsSkippableAdType-    , tvcsCreativeSizeType-    , tvcsAllowedFormats-    , tvcsNATiveTemplate--    -- ** DealTermsGuaranteedFixedPriceTermsBillingInfo-    , DealTermsGuaranteedFixedPriceTermsBillingInfo-    , dealTermsGuaranteedFixedPriceTermsBillingInfo-    , dtgfptbiCurrencyConversionTimeMs-    , dtgfptbiDfpLineItemId-    , dtgfptbiPrice-    , dtgfptbiOriginalContractedQuantity--    -- ** GetPublisherProFilesByAccountIdResponse-    , GetPublisherProFilesByAccountIdResponse-    , getPublisherProFilesByAccountIdResponse-    , gppfbairProFiles--    -- ** Proposal-    , Proposal-    , proposal-    , pBuyerPrivateData-    , pIsSetupComplete-    , pInventorySource-    , pBuyerContacts-    , pKind-    , pOriginatorRole-    , pDBmAdvertiserIds-    , pRevisionNumber-    , pBilledBuyer-    , pPrivateAuctionId-    , pIsRenegotiating-    , pHasSellerSignedOff-    , pSeller-    , pProposalId-    , pName-    , pSellerContacts-    , pLabels-    , pRevisionTimeMs-    , pProposalState-    , pLastUpdaterOrCommentorRole-    , pNegotiationId-    , pHasBuyerSignedOff-    , pBuyer--    -- ** BillingInfoList-    , BillingInfoList-    , billingInfoList-    , bilKind-    , bilItems--    -- ** AddOrderNotesResponse-    , AddOrderNotesResponse-    , addOrderNotesResponse-    , aNotes--    -- ** TargetingValueSize-    , TargetingValueSize-    , targetingValueSize-    , tvsHeight-    , tvsWidth--    -- ** UpdatePrivateAuctionProposalRequest-    , UpdatePrivateAuctionProposalRequest-    , updatePrivateAuctionProposalRequest-    , upaprExternalDealId-    , upaprUpdateAction-    , upaprNote-    , upaprProposalRevisionNumber--    -- ** PretargetingConfigDimensionsItem-    , PretargetingConfigDimensionsItem-    , pretargetingConfigDimensionsItem-    , pcdiHeight-    , pcdiWidth--    -- ** CreativeCorrectionsItemContextsItem-    , CreativeCorrectionsItemContextsItem-    , creativeCorrectionsItemContextsItem-    , cciciPlatform-    , cciciContextType-    , cciciAuctionType-    , cciciGeoCriteriaId--    -- ** PublisherProvidedForecast-    , PublisherProvidedForecast-    , publisherProvidedForecast-    , ppfWeeklyImpressions-    , ppfWeeklyUniques-    , ppfDimensions--    -- ** TargetingValue-    , TargetingValue-    , targetingValue-    , tvDemogAgeCriteriaValue-    , tvCreativeSizeValue-    , tvStringValue-    , tvLongValue-    , tvDayPartTargetingValue-    , tvDemogGenderCriteriaValue--    -- ** CreativeNATiveAdAppIcon-    , CreativeNATiveAdAppIcon-    , creativeNATiveAdAppIcon-    , cnataaiHeight-    , cnataaiURL-    , cnataaiWidth--    -- ** Price-    , Price-    , price-    , pCurrencyCode-    , pAmountMicros-    , pPricingType-    , pExpectedCpmMicros--    -- ** PretargetingConfigVideoPlayerSizesItem-    , PretargetingConfigVideoPlayerSizesItem-    , pretargetingConfigVideoPlayerSizesItem-    , pcvpsiMinWidth-    , pcvpsiAspectRatio-    , pcvpsiMinHeight--    -- ** EditAllOrderDealsRequest-    , EditAllOrderDealsRequest-    , editAllOrderDealsRequest-    , eUpdateAction-    , eDeals-    , eProposalRevisionNumber-    , eProposal--    -- ** BillingInfo-    , BillingInfo-    , billingInfo-    , biKind-    , biAccountName-    , biAccountId-    , biBillingId--    -- ** TargetingValueDayPartTargeting-    , TargetingValueDayPartTargeting-    , targetingValueDayPartTargeting-    , tvdptTimeZoneType-    , tvdptDayParts--    -- ** SharedTargeting-    , SharedTargeting-    , sharedTargeting-    , stKey-    , stExclusions-    , stInclusions--    -- ** CreativeNATiveAdImage-    , CreativeNATiveAdImage-    , creativeNATiveAdImage-    , cnataiHeight-    , cnataiURL-    , cnataiWidth--    -- ** Product-    , Product-    , product-    , proState-    , proInventorySource-    , proWebPropertyCode-    , proCreationTimeMs-    , proTerms-    , proLastUpdateTimeMs-    , proKind-    , proRevisionNumber-    , proBilledBuyer-    , proPrivateAuctionId-    , proDeliveryControl-    , proHasCreatorSignedOff-    , proFlightStartTimeMs-    , proSharedTargetings-    , proSeller-    , proSyndicationProduct-    , proFlightEndTimeMs-    , proName-    , proCreatorContacts-    , proMarketplacePublisherProFileId-    , proPublisherProvidedForecast-    , proLabels-    , proCreatorRole-    , proPublisherProFileId-    , proLegacyOfferId-    , proProductId-    , proBuyer--    -- ** CreativeServingRestrictionsItem-    , CreativeServingRestrictionsItem-    , creativeServingRestrictionsItem-    , csriContexts-    , csriReason-    , csriDisApprovalReasons--    -- ** DeleteOrderDealsResponse-    , DeleteOrderDealsResponse-    , deleteOrderDealsResponse-    , dDeals-    , dProposalRevisionNumber--    -- ** PretargetingConfigPlacementsItem-    , PretargetingConfigPlacementsItem-    , pretargetingConfigPlacementsItem-    , pcpiToken-    , pcpiType--    -- ** PublisherProFileAPIProto-    , PublisherProFileAPIProto-    , publisherProFileAPIProto-    , ppfapAudience-    , ppfapState-    , ppfapMediaKitLink-    , ppfapDirectContact-    , ppfapSamplePageLink-    , ppfapLogoURL-    , ppfapKind-    , ppfapExchange-    , ppfapOverview-    , ppfapGooglePlusLink-    , ppfapProFileId-    , ppfapIsParent-    , ppfapSeller-    , ppfapName-    , ppfapBuyerPitchStatement-    , ppfapPublisherProvidedForecast-    , ppfapIsPublished-    , ppfapPublisherDomains-    , ppfapPublisherProFileId-    , ppfapRateCardInfoLink-    , ppfapTopHeadlines-    , ppfapProgrammaticContact--    -- ** MarketplaceDeal-    , MarketplaceDeal-    , marketplaceDeal-    , mdExternalDealId-    , mdBuyerPrivateData-    , mdIsSetupComplete-    , mdWebPropertyCode-    , mdCreationTimeMs-    , mdTerms-    , mdLastUpdateTimeMs-    , mdKind-    , mdDeliveryControl-    , mdDealServingMetadata-    , mdFlightStartTimeMs-    , mdSharedTargetings-    , mdIsRfpTemplate-    , mdProposalId-    , mdDealId-    , mdInventoryDescription-    , mdSyndicationProduct-    , mdFlightEndTimeMs-    , mdName-    , mdSellerContacts-    , mdProgrammaticCreativeSource-    , mdCreativePreApprovalPolicy-    , mdProductRevisionNumber-    , mdProductId-    , mdCreativeSafeFrameCompatibility--    -- ** GetOffersResponse-    , GetOffersResponse-    , getOffersResponse-    , gorProducts--    -- ** DealTermsNonGuaranteedAuctionTerms-    , DealTermsNonGuaranteedAuctionTerms-    , dealTermsNonGuaranteedAuctionTerms-    , dtngatReservePricePerBuyers-    , dtngatAutoOptimizePrivateAuction--    -- ** CreativeFilteringReasonsReasonsItem-    , CreativeFilteringReasonsReasonsItem-    , creativeFilteringReasonsReasonsItem-    , cfrriFilteringStatus-    , cfrriFilteringCount--    -- ** ProposalsPatchUpdateAction-    , ProposalsPatchUpdateAction (..)--    -- ** CreativesListDealsStatusFilter-    , CreativesListDealsStatusFilter (..)--    -- ** DealTerms-    , DealTerms-    , dealTerms-    , dtEstimatedGrossSpend-    , dtNonGuaranteedFixedPriceTerms-    , dtNonGuaranteedAuctionTerms-    , dtRubiconNonGuaranteedTerms-    , dtBrandingType-    , dtCrossListedExternalDealIdType-    , dtEstimatedImpressionsPerDay-    , dtSellerTimeZone-    , dtGuaranteedFixedPriceTerms-    , dtDescription--    -- ** CreativeDealIds-    , CreativeDealIds-    , creativeDealIds-    , cdiKind-    , cdiDealStatuses--    -- ** MarketplaceLabel-    , MarketplaceLabel-    , marketplaceLabel-    , mlDeprecatedMarketplaceDealParty-    , mlAccountId-    , mlCreateTimeMs-    , mlLabel--    -- ** Buyer-    , Buyer-    , buyer-    , buyAccountId--    -- ** ProposalsUpdateUpdateAction-    , ProposalsUpdateUpdateAction (..)--    -- ** AddOrderDealsRequest-    , AddOrderDealsRequest-    , addOrderDealsRequest-    , aUpdateAction-    , aDeals-    , aProposalRevisionNumber--    -- ** DealServingMetadataDealPauseStatus-    , DealServingMetadataDealPauseStatus-    , dealServingMetadataDealPauseStatus-    , dsmdpsFirstPausedBy-    , dsmdpsBuyerPauseReason-    , dsmdpsHasBuyerPaused-    , dsmdpsSellerPauseReason-    , dsmdpsHasSellerPaused--    -- ** DealTermsGuaranteedFixedPriceTerms-    , DealTermsGuaranteedFixedPriceTerms-    , dealTermsGuaranteedFixedPriceTerms-    , dtgfptGuaranteedLooks-    , dtgfptGuaranteedImpressions-    , dtgfptBillingInfo-    , dtgfptFixedPrices-    , dtgfptMinimumDailyLooks-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude-import           Network.Google.Resource.AdExchangeBuyer.Accounts.Get-import           Network.Google.Resource.AdExchangeBuyer.Accounts.List-import           Network.Google.Resource.AdExchangeBuyer.Accounts.Patch-import           Network.Google.Resource.AdExchangeBuyer.Accounts.Update-import           Network.Google.Resource.AdExchangeBuyer.BillingInfo.Get-import           Network.Google.Resource.AdExchangeBuyer.BillingInfo.List-import           Network.Google.Resource.AdExchangeBuyer.Budget.Get-import           Network.Google.Resource.AdExchangeBuyer.Budget.Patch-import           Network.Google.Resource.AdExchangeBuyer.Budget.Update-import           Network.Google.Resource.AdExchangeBuyer.Creatives.AddDeal-import           Network.Google.Resource.AdExchangeBuyer.Creatives.Get-import           Network.Google.Resource.AdExchangeBuyer.Creatives.Insert-import           Network.Google.Resource.AdExchangeBuyer.Creatives.List-import           Network.Google.Resource.AdExchangeBuyer.Creatives.ListDeals-import           Network.Google.Resource.AdExchangeBuyer.Creatives.RemoveDeal-import           Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.Delete-import           Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.Insert-import           Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.List-import           Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.Update-import           Network.Google.Resource.AdExchangeBuyer.MarketplaceNotes.Insert-import           Network.Google.Resource.AdExchangeBuyer.MarketplaceNotes.List-import           Network.Google.Resource.AdExchangeBuyer.Marketplaceprivateauction.Updateproposal-import           Network.Google.Resource.AdExchangeBuyer.PerformanceReport.List-import           Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Delete-import           Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Get-import           Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Insert-import           Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.List-import           Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Patch-import           Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Update-import           Network.Google.Resource.AdExchangeBuyer.Products.Get-import           Network.Google.Resource.AdExchangeBuyer.Products.Search-import           Network.Google.Resource.AdExchangeBuyer.Proposals.Get-import           Network.Google.Resource.AdExchangeBuyer.Proposals.Insert-import           Network.Google.Resource.AdExchangeBuyer.Proposals.Patch-import           Network.Google.Resource.AdExchangeBuyer.Proposals.Search-import           Network.Google.Resource.AdExchangeBuyer.Proposals.Setupcomplete-import           Network.Google.Resource.AdExchangeBuyer.Proposals.Update-import           Network.Google.Resource.AdExchangeBuyer.PubproFiles.List--{- $resources-TODO--}---- | Represents the entirety of the methods and resources available for the Ad Exchange Buyer API service.-type AdExchangeBuyerAPI =-     MarketplaceNotesInsertResource :<|>-       MarketplaceNotesListResource-       :<|> ProposalsInsertResource-       :<|> ProposalsPatchResource-       :<|> ProposalsSetupcompleteResource-       :<|> ProposalsGetResource-       :<|> ProposalsSearchResource-       :<|> ProposalsUpdateResource-       :<|> AccountsListResource-       :<|> AccountsPatchResource-       :<|> AccountsGetResource-       :<|> AccountsUpdateResource-       :<|> BudgetPatchResource-       :<|> BudgetGetResource-       :<|> BudgetUpdateResource-       :<|> CreativesInsertResource-       :<|> CreativesRemoveDealResource-       :<|> CreativesListResource-       :<|> CreativesListDealsResource-       :<|> CreativesGetResource-       :<|> CreativesAddDealResource-       :<|> PerformanceReportListResource-       :<|> PretargetingConfigInsertResource-       :<|> PretargetingConfigListResource-       :<|> PretargetingConfigPatchResource-       :<|> PretargetingConfigGetResource-       :<|> PretargetingConfigDeleteResource-       :<|> PretargetingConfigUpdateResource-       :<|> PubproFilesListResource-       :<|> BillingInfoListResource-       :<|> BillingInfoGetResource-       :<|> ProductsGetResource-       :<|> ProductsSearchResource-       :<|> MarketplaceDealsInsertResource-       :<|> MarketplaceDealsListResource-       :<|> MarketplaceDealsDeleteResource-       :<|> MarketplaceDealsUpdateResource-       :<|> MarketplaceprivateauctionUpdateproposalResource
− gen/Network/Google/AdExchangeBuyer/Types.hs
@@ -1,762 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}---- |--- Module      : Network.Google.AdExchangeBuyer.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.AdExchangeBuyer.Types-    (-    -- * Service Configuration-      adExchangeBuyerService--    -- * OAuth Scopes-    , adExchangeBuyerScope--    -- * MarketplaceNote-    , MarketplaceNote-    , marketplaceNote-    , mnNote-    , mnKind-    , mnTimestampMs-    , mnProposalId-    , mnDealId-    , mnProposalRevisionNumber-    , mnNoteId-    , mnCreatorRole--    -- * CreativeNATiveAd-    , CreativeNATiveAd-    , creativeNATiveAd-    , cnataImage-    , cnataAppIcon-    , cnataClickTrackingURL-    , cnataClickLinkURL-    , cnataBody-    , cnataHeadline-    , cnataImpressionTrackingURL-    , cnataCallToAction-    , cnataStore-    , cnataVideoURL-    , cnataPrice-    , cnataAdvertiser-    , cnataStarRating-    , cnataLogo--    -- * EditAllOrderDealsResponse-    , EditAllOrderDealsResponse-    , editAllOrderDealsResponse-    , eaodrDeals-    , eaodrOrderRevisionNumber--    -- * TargetingValueDemogGenderCriteria-    , TargetingValueDemogGenderCriteria-    , targetingValueDemogGenderCriteria-    , tvdgcDemogGenderCriteriaIds--    -- * CreativesList-    , CreativesList-    , creativesList-    , clNextPageToken-    , clKind-    , clItems--    -- * CreativeDealIdsDealStatusesItem-    , CreativeDealIdsDealStatusesItem-    , creativeDealIdsDealStatusesItem-    , cdidsiArcStatus-    , cdidsiWebPropertyId-    , cdidsiDealId--    -- * CreativeServingRestrictionsItemContextsItem-    , CreativeServingRestrictionsItemContextsItem-    , creativeServingRestrictionsItemContextsItem-    , csriciPlatform-    , csriciContextType-    , csriciAuctionType-    , csriciGeoCriteriaId--    -- * CreateOrdersResponse-    , CreateOrdersResponse-    , createOrdersResponse-    , corProposals--    -- * AccountBidderLocationItem-    , AccountBidderLocationItem-    , accountBidderLocationItem-    , abliURL-    , abliMaximumQps-    , abliRegion-    , abliBidProtocol--    -- * PrivateData-    , PrivateData-    , privateData-    , pdReferencePayload-    , pdReferenceId--    -- * Budget-    , Budget-    , budget-    , bCurrencyCode-    , bKind-    , bBudgetAmount-    , bAccountId-    , bId-    , bBillingId--    -- * AddOrderNotesRequest-    , AddOrderNotesRequest-    , addOrderNotesRequest-    , aonrNotes--    -- * DeliveryControlFrequencyCap-    , DeliveryControlFrequencyCap-    , deliveryControlFrequencyCap-    , dcfcMaxImpressions-    , dcfcNumTimeUnits-    , dcfcTimeUnitType--    -- * MarketplaceDealParty-    , MarketplaceDealParty-    , marketplaceDealParty-    , mdpSeller-    , mdpBuyer--    -- * GetOrderNotesResponse-    , GetOrderNotesResponse-    , getOrderNotesResponse-    , gonrNotes--    -- * GetOrdersResponse-    , GetOrdersResponse-    , getOrdersResponse-    , gorProposals--    -- * CreativeServingRestrictionsItemDisApprovalReasonsItem-    , CreativeServingRestrictionsItemDisApprovalReasonsItem-    , creativeServingRestrictionsItemDisApprovalReasonsItem-    , csridariReason-    , csridariDetails--    -- * AccountsList-    , AccountsList-    , accountsList-    , alKind-    , alItems--    -- * Dimension-    , Dimension-    , dimension-    , dDimensionValues-    , dDimensionType--    -- * CreateOrdersRequest-    , CreateOrdersRequest-    , createOrdersRequest-    , cProposals-    , cWebPropertyCode--    -- * CreativeCorrectionsItem-    , CreativeCorrectionsItem-    , creativeCorrectionsItem-    , cciContexts-    , cciReason-    , cciDetails--    -- * DealTermsRubiconNonGuaranteedTerms-    , DealTermsRubiconNonGuaranteedTerms-    , dealTermsRubiconNonGuaranteedTerms-    , dtrngtPriorityPrice-    , dtrngtStandardPrice--    -- * DealServingMetadata-    , DealServingMetadata-    , dealServingMetadata-    , dsmDealPauseStatus-    , dsmAlcoholAdsAllowed--    -- * AddOrderDealsResponse-    , AddOrderDealsResponse-    , addOrderDealsResponse-    , aodrDeals-    , aodrProposalRevisionNumber--    -- * DeliveryControl-    , DeliveryControl-    , deliveryControl-    , dcCreativeBlockingLevel-    , dcFrequencyCaps-    , dcDeliveryRateType--    -- * PricePerBuyer-    , PricePerBuyer-    , pricePerBuyer-    , ppbBilledBuyer-    , ppbPrice-    , ppbAuctionTier-    , ppbBuyer--    -- * Creative-    , Creative-    , creative-    , cAttribute-    , cNATiveAd-    , cHeight-    , cBuyerCreativeId-    , cAdvertiserName-    , cAdChoicesDestinationURL-    , cAgencyId-    , cCorrections-    , cProductCategories-    , cVideoVastXML-    , cKind-    , cHTMLSnippet-    , cAdvertiserId-    , cRestrictedCategories-    , cDealsStatus-    , cWidth-    , cClickThroughURL-    , cLanguages-    , cVendorType-    , cAccountId-    , cImpressionTrackingURL-    , cFilteringReasons-    , cVersion-    , cSensitiveCategories-    , cVideoURL-    , cAPIUploadTimestamp-    , cServingRestrictions-    , cDetectedDomains-    , cOpenAuctionStatus-    , cCreativeStatusIdentityType--    -- * TargetingValueDayPartTargetingDayPart-    , TargetingValueDayPartTargetingDayPart-    , targetingValueDayPartTargetingDayPart-    , tvdptdpEndHour-    , tvdptdpStartHour-    , tvdptdpStartMinute-    , tvdptdpDayOfWeek-    , tvdptdpEndMinute--    -- * DimensionDimensionValue-    , DimensionDimensionValue-    , dimensionDimensionValue-    , ddvName-    , ddvId-    , ddvPercentage--    -- * PretargetingConfigList-    , PretargetingConfigList-    , pretargetingConfigList-    , pclKind-    , pclItems--    -- * TargetingValueDemogAgeCriteria-    , TargetingValueDemogAgeCriteria-    , targetingValueDemogAgeCriteria-    , tvdacDemogAgeCriteriaIds--    -- * DealTermsNonGuaranteedFixedPriceTerms-    , DealTermsNonGuaranteedFixedPriceTerms-    , dealTermsNonGuaranteedFixedPriceTerms-    , dtngfptFixedPrices--    -- * PerformanceReport-    , PerformanceReport-    , performanceReport-    , prFilteredBidRate-    , prKind-    , prLatency95thPercentile-    , prCookieMatcherStatusRate-    , prHostedMatchStatusRate-    , prUnsuccessfulRequestRate-    , prBidRequestRate-    , prQuotaThrottledLimit-    , prQuotaConfiguredLimit-    , prSuccessfulRequestRate-    , prLatency85thPercentile-    , prCalloutStatusRate-    , prLatency50thPercentile-    , prBidRate-    , prCreativeStatusRate-    , prNoQuotaInRegion-    , prRegion-    , prInventoryMatchRate-    , prPixelMatchResponses-    , prTimestamp-    , prPixelMatchRequests-    , prOutOfQuota--    -- * PretargetingConfigExcludedPlacementsItem-    , PretargetingConfigExcludedPlacementsItem-    , pretargetingConfigExcludedPlacementsItem-    , pcepiToken-    , pcepiType--    -- * Seller-    , Seller-    , seller-    , sAccountId-    , sSubAccountId--    -- * Account-    , Account-    , account-    , aApplyPretargetingToNonGuaranteedDeals-    , aMaximumTotalQps-    , aKind-    , aCookieMatchingURL-    , aMaximumActiveCreatives-    , aCookieMatchingNid-    , aNumberActiveCreatives-    , aId-    , aBidderLocation--    -- * DeleteOrderDealsRequest-    , DeleteOrderDealsRequest-    , deleteOrderDealsRequest-    , dodrUpdateAction-    , dodrDealIds-    , dodrProposalRevisionNumber--    -- * CreativesListOpenAuctionStatusFilter-    , CreativesListOpenAuctionStatusFilter (..)--    -- * ContactInformation-    , ContactInformation-    , contactInformation-    , ciEmail-    , ciName--    -- * CreativeNATiveAdLogo-    , CreativeNATiveAdLogo-    , creativeNATiveAdLogo-    , cnatalHeight-    , cnatalURL-    , cnatalWidth--    -- * GetOrderDealsResponse-    , GetOrderDealsResponse-    , getOrderDealsResponse-    , godrDeals--    -- * PerformanceReportList-    , PerformanceReportList-    , performanceReportList-    , prlKind-    , prlPerformanceReport--    -- * PretargetingConfig-    , PretargetingConfig-    , pretargetingConfig-    , pcPlatforms-    , pcMobileCarriers-    , pcVendorTypes-    , pcExcludedGeoCriteriaIds-    , pcSupportedCreativeAttributes-    , pcUserLists-    , pcKind-    , pcExcludedPlacements-    , pcUserIdentifierDataRequired-    , pcMinimumViewabilityDecile-    , pcMobileDevices-    , pcLanguages-    , pcVerticals-    , pcVideoPlayerSizes-    , pcConfigId-    , pcPlacements-    , pcExcludedUserLists-    , pcConfigName-    , pcGeoCriteriaIds-    , pcDimensions-    , pcExcludedVerticals-    , pcCreativeType-    , pcIsActive-    , pcExcludedContentLabels-    , pcBillingId-    , pcMobileOperatingSystemVersions--    -- * CreativeFilteringReasons-    , CreativeFilteringReasons-    , creativeFilteringReasons-    , cfrReasons-    , cfrDate--    -- * TargetingValueCreativeSize-    , TargetingValueCreativeSize-    , targetingValueCreativeSize-    , tvcsSize-    , tvcsCompanionSizes-    , tvcsSkippableAdType-    , tvcsCreativeSizeType-    , tvcsAllowedFormats-    , tvcsNATiveTemplate--    -- * DealTermsGuaranteedFixedPriceTermsBillingInfo-    , DealTermsGuaranteedFixedPriceTermsBillingInfo-    , dealTermsGuaranteedFixedPriceTermsBillingInfo-    , dtgfptbiCurrencyConversionTimeMs-    , dtgfptbiDfpLineItemId-    , dtgfptbiPrice-    , dtgfptbiOriginalContractedQuantity--    -- * GetPublisherProFilesByAccountIdResponse-    , GetPublisherProFilesByAccountIdResponse-    , getPublisherProFilesByAccountIdResponse-    , gppfbairProFiles--    -- * Proposal-    , Proposal-    , proposal-    , pBuyerPrivateData-    , pIsSetupComplete-    , pInventorySource-    , pBuyerContacts-    , pKind-    , pOriginatorRole-    , pDBmAdvertiserIds-    , pRevisionNumber-    , pBilledBuyer-    , pPrivateAuctionId-    , pIsRenegotiating-    , pHasSellerSignedOff-    , pSeller-    , pProposalId-    , pName-    , pSellerContacts-    , pLabels-    , pRevisionTimeMs-    , pProposalState-    , pLastUpdaterOrCommentorRole-    , pNegotiationId-    , pHasBuyerSignedOff-    , pBuyer--    -- * BillingInfoList-    , BillingInfoList-    , billingInfoList-    , bilKind-    , bilItems--    -- * AddOrderNotesResponse-    , AddOrderNotesResponse-    , addOrderNotesResponse-    , aNotes--    -- * TargetingValueSize-    , TargetingValueSize-    , targetingValueSize-    , tvsHeight-    , tvsWidth--    -- * UpdatePrivateAuctionProposalRequest-    , UpdatePrivateAuctionProposalRequest-    , updatePrivateAuctionProposalRequest-    , upaprExternalDealId-    , upaprUpdateAction-    , upaprNote-    , upaprProposalRevisionNumber--    -- * PretargetingConfigDimensionsItem-    , PretargetingConfigDimensionsItem-    , pretargetingConfigDimensionsItem-    , pcdiHeight-    , pcdiWidth--    -- * CreativeCorrectionsItemContextsItem-    , CreativeCorrectionsItemContextsItem-    , creativeCorrectionsItemContextsItem-    , cciciPlatform-    , cciciContextType-    , cciciAuctionType-    , cciciGeoCriteriaId--    -- * PublisherProvidedForecast-    , PublisherProvidedForecast-    , publisherProvidedForecast-    , ppfWeeklyImpressions-    , ppfWeeklyUniques-    , ppfDimensions--    -- * TargetingValue-    , TargetingValue-    , targetingValue-    , tvDemogAgeCriteriaValue-    , tvCreativeSizeValue-    , tvStringValue-    , tvLongValue-    , tvDayPartTargetingValue-    , tvDemogGenderCriteriaValue--    -- * CreativeNATiveAdAppIcon-    , CreativeNATiveAdAppIcon-    , creativeNATiveAdAppIcon-    , cnataaiHeight-    , cnataaiURL-    , cnataaiWidth--    -- * Price-    , Price-    , price-    , pCurrencyCode-    , pAmountMicros-    , pPricingType-    , pExpectedCpmMicros--    -- * PretargetingConfigVideoPlayerSizesItem-    , PretargetingConfigVideoPlayerSizesItem-    , pretargetingConfigVideoPlayerSizesItem-    , pcvpsiMinWidth-    , pcvpsiAspectRatio-    , pcvpsiMinHeight--    -- * EditAllOrderDealsRequest-    , EditAllOrderDealsRequest-    , editAllOrderDealsRequest-    , eUpdateAction-    , eDeals-    , eProposalRevisionNumber-    , eProposal--    -- * BillingInfo-    , BillingInfo-    , billingInfo-    , biKind-    , biAccountName-    , biAccountId-    , biBillingId--    -- * TargetingValueDayPartTargeting-    , TargetingValueDayPartTargeting-    , targetingValueDayPartTargeting-    , tvdptTimeZoneType-    , tvdptDayParts--    -- * SharedTargeting-    , SharedTargeting-    , sharedTargeting-    , stKey-    , stExclusions-    , stInclusions--    -- * CreativeNATiveAdImage-    , CreativeNATiveAdImage-    , creativeNATiveAdImage-    , cnataiHeight-    , cnataiURL-    , cnataiWidth--    -- * Product-    , Product-    , product-    , proState-    , proInventorySource-    , proWebPropertyCode-    , proCreationTimeMs-    , proTerms-    , proLastUpdateTimeMs-    , proKind-    , proRevisionNumber-    , proBilledBuyer-    , proPrivateAuctionId-    , proDeliveryControl-    , proHasCreatorSignedOff-    , proFlightStartTimeMs-    , proSharedTargetings-    , proSeller-    , proSyndicationProduct-    , proFlightEndTimeMs-    , proName-    , proCreatorContacts-    , proMarketplacePublisherProFileId-    , proPublisherProvidedForecast-    , proLabels-    , proCreatorRole-    , proPublisherProFileId-    , proLegacyOfferId-    , proProductId-    , proBuyer--    -- * CreativeServingRestrictionsItem-    , CreativeServingRestrictionsItem-    , creativeServingRestrictionsItem-    , csriContexts-    , csriReason-    , csriDisApprovalReasons--    -- * DeleteOrderDealsResponse-    , DeleteOrderDealsResponse-    , deleteOrderDealsResponse-    , dDeals-    , dProposalRevisionNumber--    -- * PretargetingConfigPlacementsItem-    , PretargetingConfigPlacementsItem-    , pretargetingConfigPlacementsItem-    , pcpiToken-    , pcpiType--    -- * PublisherProFileAPIProto-    , PublisherProFileAPIProto-    , publisherProFileAPIProto-    , ppfapAudience-    , ppfapState-    , ppfapMediaKitLink-    , ppfapDirectContact-    , ppfapSamplePageLink-    , ppfapLogoURL-    , ppfapKind-    , ppfapExchange-    , ppfapOverview-    , ppfapGooglePlusLink-    , ppfapProFileId-    , ppfapIsParent-    , ppfapSeller-    , ppfapName-    , ppfapBuyerPitchStatement-    , ppfapPublisherProvidedForecast-    , ppfapIsPublished-    , ppfapPublisherDomains-    , ppfapPublisherProFileId-    , ppfapRateCardInfoLink-    , ppfapTopHeadlines-    , ppfapProgrammaticContact--    -- * MarketplaceDeal-    , MarketplaceDeal-    , marketplaceDeal-    , mdExternalDealId-    , mdBuyerPrivateData-    , mdIsSetupComplete-    , mdWebPropertyCode-    , mdCreationTimeMs-    , mdTerms-    , mdLastUpdateTimeMs-    , mdKind-    , mdDeliveryControl-    , mdDealServingMetadata-    , mdFlightStartTimeMs-    , mdSharedTargetings-    , mdIsRfpTemplate-    , mdProposalId-    , mdDealId-    , mdInventoryDescription-    , mdSyndicationProduct-    , mdFlightEndTimeMs-    , mdName-    , mdSellerContacts-    , mdProgrammaticCreativeSource-    , mdCreativePreApprovalPolicy-    , mdProductRevisionNumber-    , mdProductId-    , mdCreativeSafeFrameCompatibility--    -- * GetOffersResponse-    , GetOffersResponse-    , getOffersResponse-    , gorProducts--    -- * DealTermsNonGuaranteedAuctionTerms-    , DealTermsNonGuaranteedAuctionTerms-    , dealTermsNonGuaranteedAuctionTerms-    , dtngatReservePricePerBuyers-    , dtngatAutoOptimizePrivateAuction--    -- * CreativeFilteringReasonsReasonsItem-    , CreativeFilteringReasonsReasonsItem-    , creativeFilteringReasonsReasonsItem-    , cfrriFilteringStatus-    , cfrriFilteringCount--    -- * ProposalsPatchUpdateAction-    , ProposalsPatchUpdateAction (..)--    -- * CreativesListDealsStatusFilter-    , CreativesListDealsStatusFilter (..)--    -- * DealTerms-    , DealTerms-    , dealTerms-    , dtEstimatedGrossSpend-    , dtNonGuaranteedFixedPriceTerms-    , dtNonGuaranteedAuctionTerms-    , dtRubiconNonGuaranteedTerms-    , dtBrandingType-    , dtCrossListedExternalDealIdType-    , dtEstimatedImpressionsPerDay-    , dtSellerTimeZone-    , dtGuaranteedFixedPriceTerms-    , dtDescription--    -- * CreativeDealIds-    , CreativeDealIds-    , creativeDealIds-    , cdiKind-    , cdiDealStatuses--    -- * MarketplaceLabel-    , MarketplaceLabel-    , marketplaceLabel-    , mlDeprecatedMarketplaceDealParty-    , mlAccountId-    , mlCreateTimeMs-    , mlLabel--    -- * Buyer-    , Buyer-    , buyer-    , buyAccountId--    -- * ProposalsUpdateUpdateAction-    , ProposalsUpdateUpdateAction (..)--    -- * AddOrderDealsRequest-    , AddOrderDealsRequest-    , addOrderDealsRequest-    , aUpdateAction-    , aDeals-    , aProposalRevisionNumber--    -- * DealServingMetadataDealPauseStatus-    , DealServingMetadataDealPauseStatus-    , dealServingMetadataDealPauseStatus-    , dsmdpsFirstPausedBy-    , dsmdpsBuyerPauseReason-    , dsmdpsHasBuyerPaused-    , dsmdpsSellerPauseReason-    , dsmdpsHasSellerPaused--    -- * DealTermsGuaranteedFixedPriceTerms-    , DealTermsGuaranteedFixedPriceTerms-    , dealTermsGuaranteedFixedPriceTerms-    , dtgfptGuaranteedLooks-    , dtgfptGuaranteedImpressions-    , dtgfptBillingInfo-    , dtgfptFixedPrices-    , dtgfptMinimumDailyLooks-    ) where--import           Network.Google.AdExchangeBuyer.Types.Product-import           Network.Google.AdExchangeBuyer.Types.Sum-import           Network.Google.Prelude---- | Default request referring to version 'v1.4' of the Ad Exchange Buyer API. This contains the host and root path used as a starting point for constructing service requests.-adExchangeBuyerService :: ServiceConfig-adExchangeBuyerService-  = defaultService (ServiceId "adexchangebuyer:v1.4")-      "www.googleapis.com"---- | Manage your Ad Exchange buyer account configuration-adExchangeBuyerScope :: Proxy '["https://www.googleapis.com/auth/adexchange.buyer"]-adExchangeBuyerScope = Proxy
− gen/Network/Google/AdExchangeBuyer/Types/Product.hs
@@ -1,7376 +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.AdExchangeBuyer.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.AdExchangeBuyer.Types.Product where--import           Network.Google.AdExchangeBuyer.Types.Sum-import           Network.Google.Prelude---- | A proposal is associated with a bunch of notes which may optionally be--- associated with a deal and\/or revision number.------ /See:/ 'marketplaceNote' smart constructor.-data MarketplaceNote =-  MarketplaceNote'-    { _mnNote                   :: !(Maybe Text)-    , _mnKind                   :: !Text-    , _mnTimestampMs            :: !(Maybe (Textual Int64))-    , _mnProposalId             :: !(Maybe Text)-    , _mnDealId                 :: !(Maybe Text)-    , _mnProposalRevisionNumber :: !(Maybe (Textual Int64))-    , _mnNoteId                 :: !(Maybe Text)-    , _mnCreatorRole            :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'MarketplaceNote' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mnNote'------ * 'mnKind'------ * 'mnTimestampMs'------ * 'mnProposalId'------ * 'mnDealId'------ * 'mnProposalRevisionNumber'------ * 'mnNoteId'------ * 'mnCreatorRole'-marketplaceNote-    :: MarketplaceNote-marketplaceNote =-  MarketplaceNote'-    { _mnNote = Nothing-    , _mnKind = "adexchangebuyer#marketplaceNote"-    , _mnTimestampMs = Nothing-    , _mnProposalId = Nothing-    , _mnDealId = Nothing-    , _mnProposalRevisionNumber = Nothing-    , _mnNoteId = Nothing-    , _mnCreatorRole = Nothing-    }----- | The actual note to attach. (readonly, except on create)-mnNote :: Lens' MarketplaceNote (Maybe Text)-mnNote = lens _mnNote (\ s a -> s{_mnNote = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"adexchangebuyer#marketplaceNote\".-mnKind :: Lens' MarketplaceNote Text-mnKind = lens _mnKind (\ s a -> s{_mnKind = a})---- | The timestamp (ms since epoch) that this note was created. (readonly)-mnTimestampMs :: Lens' MarketplaceNote (Maybe Int64)-mnTimestampMs-  = lens _mnTimestampMs-      (\ s a -> s{_mnTimestampMs = a})-      . mapping _Coerce---- | The proposalId that a note is attached to. (readonly)-mnProposalId :: Lens' MarketplaceNote (Maybe Text)-mnProposalId-  = lens _mnProposalId (\ s a -> s{_mnProposalId = a})---- | Notes can optionally be associated with a deal. (readonly, except on--- create)-mnDealId :: Lens' MarketplaceNote (Maybe Text)-mnDealId = lens _mnDealId (\ s a -> s{_mnDealId = a})---- | If the note is associated with a proposal revision number, then store--- that here. (readonly, except on create)-mnProposalRevisionNumber :: Lens' MarketplaceNote (Maybe Int64)-mnProposalRevisionNumber-  = lens _mnProposalRevisionNumber-      (\ s a -> s{_mnProposalRevisionNumber = a})-      . mapping _Coerce---- | The unique id for the note. (readonly)-mnNoteId :: Lens' MarketplaceNote (Maybe Text)-mnNoteId = lens _mnNoteId (\ s a -> s{_mnNoteId = a})---- | The role of the person (buyer\/seller) creating the note. (readonly)-mnCreatorRole :: Lens' MarketplaceNote (Maybe Text)-mnCreatorRole-  = lens _mnCreatorRole-      (\ s a -> s{_mnCreatorRole = a})--instance FromJSON MarketplaceNote where-        parseJSON-          = withObject "MarketplaceNote"-              (\ o ->-                 MarketplaceNote' <$>-                   (o .:? "note") <*>-                     (o .:? "kind" .!= "adexchangebuyer#marketplaceNote")-                     <*> (o .:? "timestampMs")-                     <*> (o .:? "proposalId")-                     <*> (o .:? "dealId")-                     <*> (o .:? "proposalRevisionNumber")-                     <*> (o .:? "noteId")-                     <*> (o .:? "creatorRole"))--instance ToJSON MarketplaceNote where-        toJSON MarketplaceNote'{..}-          = object-              (catMaybes-                 [("note" .=) <$> _mnNote, Just ("kind" .= _mnKind),-                  ("timestampMs" .=) <$> _mnTimestampMs,-                  ("proposalId" .=) <$> _mnProposalId,-                  ("dealId" .=) <$> _mnDealId,-                  ("proposalRevisionNumber" .=) <$>-                    _mnProposalRevisionNumber,-                  ("noteId" .=) <$> _mnNoteId,-                  ("creatorRole" .=) <$> _mnCreatorRole])---- | If nativeAd is set, HTMLSnippet, videoVastXML, and the videoURL outside--- of nativeAd should not be set. (The videoURL inside nativeAd can be--- set.)------ /See:/ 'creativeNATiveAd' smart constructor.-data CreativeNATiveAd =-  CreativeNATiveAd'-    { _cnataImage                 :: !(Maybe CreativeNATiveAdImage)-    , _cnataAppIcon               :: !(Maybe CreativeNATiveAdAppIcon)-    , _cnataClickTrackingURL      :: !(Maybe Text)-    , _cnataClickLinkURL          :: !(Maybe Text)-    , _cnataBody                  :: !(Maybe Text)-    , _cnataHeadline              :: !(Maybe Text)-    , _cnataImpressionTrackingURL :: !(Maybe [Text])-    , _cnataCallToAction          :: !(Maybe Text)-    , _cnataStore                 :: !(Maybe Text)-    , _cnataVideoURL              :: !(Maybe Text)-    , _cnataPrice                 :: !(Maybe Text)-    , _cnataAdvertiser            :: !(Maybe Text)-    , _cnataStarRating            :: !(Maybe (Textual Double))-    , _cnataLogo                  :: !(Maybe CreativeNATiveAdLogo)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CreativeNATiveAd' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cnataImage'------ * 'cnataAppIcon'------ * 'cnataClickTrackingURL'------ * 'cnataClickLinkURL'------ * 'cnataBody'------ * 'cnataHeadline'------ * 'cnataImpressionTrackingURL'------ * 'cnataCallToAction'------ * 'cnataStore'------ * 'cnataVideoURL'------ * 'cnataPrice'------ * 'cnataAdvertiser'------ * 'cnataStarRating'------ * 'cnataLogo'-creativeNATiveAd-    :: CreativeNATiveAd-creativeNATiveAd =-  CreativeNATiveAd'-    { _cnataImage = Nothing-    , _cnataAppIcon = Nothing-    , _cnataClickTrackingURL = Nothing-    , _cnataClickLinkURL = Nothing-    , _cnataBody = Nothing-    , _cnataHeadline = Nothing-    , _cnataImpressionTrackingURL = Nothing-    , _cnataCallToAction = Nothing-    , _cnataStore = Nothing-    , _cnataVideoURL = Nothing-    , _cnataPrice = Nothing-    , _cnataAdvertiser = Nothing-    , _cnataStarRating = Nothing-    , _cnataLogo = Nothing-    }----- | A large image.-cnataImage :: Lens' CreativeNATiveAd (Maybe CreativeNATiveAdImage)-cnataImage-  = lens _cnataImage (\ s a -> s{_cnataImage = a})---- | The app icon, for app download ads.-cnataAppIcon :: Lens' CreativeNATiveAd (Maybe CreativeNATiveAdAppIcon)-cnataAppIcon-  = lens _cnataAppIcon (\ s a -> s{_cnataAppIcon = a})---- | The URL to use for click tracking.-cnataClickTrackingURL :: Lens' CreativeNATiveAd (Maybe Text)-cnataClickTrackingURL-  = lens _cnataClickTrackingURL-      (\ s a -> s{_cnataClickTrackingURL = a})---- | The URL that the browser\/SDK will load when the user clicks the ad.-cnataClickLinkURL :: Lens' CreativeNATiveAd (Maybe Text)-cnataClickLinkURL-  = lens _cnataClickLinkURL-      (\ s a -> s{_cnataClickLinkURL = a})---- | A long description of the ad.-cnataBody :: Lens' CreativeNATiveAd (Maybe Text)-cnataBody-  = lens _cnataBody (\ s a -> s{_cnataBody = a})---- | A short title for the ad.-cnataHeadline :: Lens' CreativeNATiveAd (Maybe Text)-cnataHeadline-  = lens _cnataHeadline-      (\ s a -> s{_cnataHeadline = a})---- | The URLs are called when the impression is rendered.-cnataImpressionTrackingURL :: Lens' CreativeNATiveAd [Text]-cnataImpressionTrackingURL-  = lens _cnataImpressionTrackingURL-      (\ s a -> s{_cnataImpressionTrackingURL = a})-      . _Default-      . _Coerce---- | A label for the button that the user is supposed to click.-cnataCallToAction :: Lens' CreativeNATiveAd (Maybe Text)-cnataCallToAction-  = lens _cnataCallToAction-      (\ s a -> s{_cnataCallToAction = a})---- | The URL to the app store to purchase\/download the promoted app.-cnataStore :: Lens' CreativeNATiveAd (Maybe Text)-cnataStore-  = lens _cnataStore (\ s a -> s{_cnataStore = a})---- | The URL of the XML VAST for a native ad. Note this is a separate field--- from resource.video_url.-cnataVideoURL :: Lens' CreativeNATiveAd (Maybe Text)-cnataVideoURL-  = lens _cnataVideoURL-      (\ s a -> s{_cnataVideoURL = a})---- | The price of the promoted app including the currency info.-cnataPrice :: Lens' CreativeNATiveAd (Maybe Text)-cnataPrice-  = lens _cnataPrice (\ s a -> s{_cnataPrice = a})--cnataAdvertiser :: Lens' CreativeNATiveAd (Maybe Text)-cnataAdvertiser-  = lens _cnataAdvertiser-      (\ s a -> s{_cnataAdvertiser = a})---- | The app rating in the app store. Must be in the range [0-5].-cnataStarRating :: Lens' CreativeNATiveAd (Maybe Double)-cnataStarRating-  = lens _cnataStarRating-      (\ s a -> s{_cnataStarRating = a})-      . mapping _Coerce---- | A smaller image, for the advertiser logo.-cnataLogo :: Lens' CreativeNATiveAd (Maybe CreativeNATiveAdLogo)-cnataLogo-  = lens _cnataLogo (\ s a -> s{_cnataLogo = a})--instance FromJSON CreativeNATiveAd where-        parseJSON-          = withObject "CreativeNATiveAd"-              (\ o ->-                 CreativeNATiveAd' <$>-                   (o .:? "image") <*> (o .:? "appIcon") <*>-                     (o .:? "clickTrackingUrl")-                     <*> (o .:? "clickLinkUrl")-                     <*> (o .:? "body")-                     <*> (o .:? "headline")-                     <*> (o .:? "impressionTrackingUrl" .!= mempty)-                     <*> (o .:? "callToAction")-                     <*> (o .:? "store")-                     <*> (o .:? "videoURL")-                     <*> (o .:? "price")-                     <*> (o .:? "advertiser")-                     <*> (o .:? "starRating")-                     <*> (o .:? "logo"))--instance ToJSON CreativeNATiveAd where-        toJSON CreativeNATiveAd'{..}-          = object-              (catMaybes-                 [("image" .=) <$> _cnataImage,-                  ("appIcon" .=) <$> _cnataAppIcon,-                  ("clickTrackingUrl" .=) <$> _cnataClickTrackingURL,-                  ("clickLinkUrl" .=) <$> _cnataClickLinkURL,-                  ("body" .=) <$> _cnataBody,-                  ("headline" .=) <$> _cnataHeadline,-                  ("impressionTrackingUrl" .=) <$>-                    _cnataImpressionTrackingURL,-                  ("callToAction" .=) <$> _cnataCallToAction,-                  ("store" .=) <$> _cnataStore,-                  ("videoURL" .=) <$> _cnataVideoURL,-                  ("price" .=) <$> _cnataPrice,-                  ("advertiser" .=) <$> _cnataAdvertiser,-                  ("starRating" .=) <$> _cnataStarRating,-                  ("logo" .=) <$> _cnataLogo])------- /See:/ 'editAllOrderDealsResponse' smart constructor.-data EditAllOrderDealsResponse =-  EditAllOrderDealsResponse'-    { _eaodrDeals               :: !(Maybe [MarketplaceDeal])-    , _eaodrOrderRevisionNumber :: !(Maybe (Textual Int64))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'EditAllOrderDealsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'eaodrDeals'------ * 'eaodrOrderRevisionNumber'-editAllOrderDealsResponse-    :: EditAllOrderDealsResponse-editAllOrderDealsResponse =-  EditAllOrderDealsResponse'-    {_eaodrDeals = Nothing, _eaodrOrderRevisionNumber = Nothing}----- | List of all deals in the proposal after edit.-eaodrDeals :: Lens' EditAllOrderDealsResponse [MarketplaceDeal]-eaodrDeals-  = lens _eaodrDeals (\ s a -> s{_eaodrDeals = a}) .-      _Default-      . _Coerce---- | The latest revision number after the update has been applied.-eaodrOrderRevisionNumber :: Lens' EditAllOrderDealsResponse (Maybe Int64)-eaodrOrderRevisionNumber-  = lens _eaodrOrderRevisionNumber-      (\ s a -> s{_eaodrOrderRevisionNumber = a})-      . mapping _Coerce--instance FromJSON EditAllOrderDealsResponse where-        parseJSON-          = withObject "EditAllOrderDealsResponse"-              (\ o ->-                 EditAllOrderDealsResponse' <$>-                   (o .:? "deals" .!= mempty) <*>-                     (o .:? "orderRevisionNumber"))--instance ToJSON EditAllOrderDealsResponse where-        toJSON EditAllOrderDealsResponse'{..}-          = object-              (catMaybes-                 [("deals" .=) <$> _eaodrDeals,-                  ("orderRevisionNumber" .=) <$>-                    _eaodrOrderRevisionNumber])------- /See:/ 'targetingValueDemogGenderCriteria' smart constructor.-newtype TargetingValueDemogGenderCriteria =-  TargetingValueDemogGenderCriteria'-    { _tvdgcDemogGenderCriteriaIds :: Maybe [Text]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TargetingValueDemogGenderCriteria' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tvdgcDemogGenderCriteriaIds'-targetingValueDemogGenderCriteria-    :: TargetingValueDemogGenderCriteria-targetingValueDemogGenderCriteria =-  TargetingValueDemogGenderCriteria' {_tvdgcDemogGenderCriteriaIds = Nothing}---tvdgcDemogGenderCriteriaIds :: Lens' TargetingValueDemogGenderCriteria [Text]-tvdgcDemogGenderCriteriaIds-  = lens _tvdgcDemogGenderCriteriaIds-      (\ s a -> s{_tvdgcDemogGenderCriteriaIds = a})-      . _Default-      . _Coerce--instance FromJSON TargetingValueDemogGenderCriteria-         where-        parseJSON-          = withObject "TargetingValueDemogGenderCriteria"-              (\ o ->-                 TargetingValueDemogGenderCriteria' <$>-                   (o .:? "demogGenderCriteriaIds" .!= mempty))--instance ToJSON TargetingValueDemogGenderCriteria-         where-        toJSON TargetingValueDemogGenderCriteria'{..}-          = object-              (catMaybes-                 [("demogGenderCriteriaIds" .=) <$>-                    _tvdgcDemogGenderCriteriaIds])---- | The creatives feed lists the active creatives for the Ad Exchange buyer--- accounts that the user has access to. Each entry in the feed corresponds--- to a single creative.------ /See:/ 'creativesList' smart constructor.-data CreativesList =-  CreativesList'-    { _clNextPageToken :: !(Maybe Text)-    , _clKind          :: !Text-    , _clItems         :: !(Maybe [Creative])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CreativesList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'clNextPageToken'------ * 'clKind'------ * 'clItems'-creativesList-    :: CreativesList-creativesList =-  CreativesList'-    { _clNextPageToken = Nothing-    , _clKind = "adexchangebuyer#creativesList"-    , _clItems = Nothing-    }----- | Continuation token used to page through creatives. To retrieve the next--- page of results, set the next request\'s \"pageToken\" value to this.-clNextPageToken :: Lens' CreativesList (Maybe Text)-clNextPageToken-  = lens _clNextPageToken-      (\ s a -> s{_clNextPageToken = a})---- | Resource type.-clKind :: Lens' CreativesList Text-clKind = lens _clKind (\ s a -> s{_clKind = a})---- | A list of creatives.-clItems :: Lens' CreativesList [Creative]-clItems-  = lens _clItems (\ s a -> s{_clItems = a}) . _Default-      . _Coerce--instance FromJSON CreativesList where-        parseJSON-          = withObject "CreativesList"-              (\ o ->-                 CreativesList' <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "kind" .!= "adexchangebuyer#creativesList")-                     <*> (o .:? "items" .!= mempty))--instance ToJSON CreativesList where-        toJSON CreativesList'{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _clNextPageToken,-                  Just ("kind" .= _clKind), ("items" .=) <$> _clItems])------- /See:/ 'creativeDealIdsDealStatusesItem' smart constructor.-data CreativeDealIdsDealStatusesItem =-  CreativeDealIdsDealStatusesItem'-    { _cdidsiArcStatus     :: !(Maybe Text)-    , _cdidsiWebPropertyId :: !(Maybe (Textual Int32))-    , _cdidsiDealId        :: !(Maybe (Textual Int64))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CreativeDealIdsDealStatusesItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cdidsiArcStatus'------ * 'cdidsiWebPropertyId'------ * 'cdidsiDealId'-creativeDealIdsDealStatusesItem-    :: CreativeDealIdsDealStatusesItem-creativeDealIdsDealStatusesItem =-  CreativeDealIdsDealStatusesItem'-    { _cdidsiArcStatus = Nothing-    , _cdidsiWebPropertyId = Nothing-    , _cdidsiDealId = Nothing-    }----- | ARC approval status.-cdidsiArcStatus :: Lens' CreativeDealIdsDealStatusesItem (Maybe Text)-cdidsiArcStatus-  = lens _cdidsiArcStatus-      (\ s a -> s{_cdidsiArcStatus = a})---- | Publisher ID.-cdidsiWebPropertyId :: Lens' CreativeDealIdsDealStatusesItem (Maybe Int32)-cdidsiWebPropertyId-  = lens _cdidsiWebPropertyId-      (\ s a -> s{_cdidsiWebPropertyId = a})-      . mapping _Coerce---- | External deal ID.-cdidsiDealId :: Lens' CreativeDealIdsDealStatusesItem (Maybe Int64)-cdidsiDealId-  = lens _cdidsiDealId (\ s a -> s{_cdidsiDealId = a})-      . mapping _Coerce--instance FromJSON CreativeDealIdsDealStatusesItem-         where-        parseJSON-          = withObject "CreativeDealIdsDealStatusesItem"-              (\ o ->-                 CreativeDealIdsDealStatusesItem' <$>-                   (o .:? "arcStatus") <*> (o .:? "webPropertyId") <*>-                     (o .:? "dealId"))--instance ToJSON CreativeDealIdsDealStatusesItem where-        toJSON CreativeDealIdsDealStatusesItem'{..}-          = object-              (catMaybes-                 [("arcStatus" .=) <$> _cdidsiArcStatus,-                  ("webPropertyId" .=) <$> _cdidsiWebPropertyId,-                  ("dealId" .=) <$> _cdidsiDealId])------- /See:/ 'creativeServingRestrictionsItemContextsItem' smart constructor.-data CreativeServingRestrictionsItemContextsItem =-  CreativeServingRestrictionsItemContextsItem'-    { _csriciPlatform      :: !(Maybe [Text])-    , _csriciContextType   :: !(Maybe Text)-    , _csriciAuctionType   :: !(Maybe [Text])-    , _csriciGeoCriteriaId :: !(Maybe [Textual Int32])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CreativeServingRestrictionsItemContextsItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'csriciPlatform'------ * 'csriciContextType'------ * 'csriciAuctionType'------ * 'csriciGeoCriteriaId'-creativeServingRestrictionsItemContextsItem-    :: CreativeServingRestrictionsItemContextsItem-creativeServingRestrictionsItemContextsItem =-  CreativeServingRestrictionsItemContextsItem'-    { _csriciPlatform = Nothing-    , _csriciContextType = Nothing-    , _csriciAuctionType = Nothing-    , _csriciGeoCriteriaId = Nothing-    }----- | Only set when contextType=PLATFORM. Represents the platforms this--- restriction applies to.-csriciPlatform :: Lens' CreativeServingRestrictionsItemContextsItem [Text]-csriciPlatform-  = lens _csriciPlatform-      (\ s a -> s{_csriciPlatform = a})-      . _Default-      . _Coerce---- | The type of context (e.g., location, platform, auction type, SSL-ness).-csriciContextType :: Lens' CreativeServingRestrictionsItemContextsItem (Maybe Text)-csriciContextType-  = lens _csriciContextType-      (\ s a -> s{_csriciContextType = a})---- | Only set when contextType=AUCTION_TYPE. Represents the auction types--- this restriction applies to.-csriciAuctionType :: Lens' CreativeServingRestrictionsItemContextsItem [Text]-csriciAuctionType-  = lens _csriciAuctionType-      (\ s a -> s{_csriciAuctionType = a})-      . _Default-      . _Coerce---- | Only set when contextType=LOCATION. Represents the geo criterias this--- restriction applies to. Impressions are considered to match a context if--- either the user location or publisher location matches a given--- geoCriteriaId.-csriciGeoCriteriaId :: Lens' CreativeServingRestrictionsItemContextsItem [Int32]-csriciGeoCriteriaId-  = lens _csriciGeoCriteriaId-      (\ s a -> s{_csriciGeoCriteriaId = a})-      . _Default-      . _Coerce--instance FromJSON-           CreativeServingRestrictionsItemContextsItem-         where-        parseJSON-          = withObject-              "CreativeServingRestrictionsItemContextsItem"-              (\ o ->-                 CreativeServingRestrictionsItemContextsItem' <$>-                   (o .:? "platform" .!= mempty) <*>-                     (o .:? "contextType")-                     <*> (o .:? "auctionType" .!= mempty)-                     <*> (o .:? "geoCriteriaId" .!= mempty))--instance ToJSON-           CreativeServingRestrictionsItemContextsItem-         where-        toJSON-          CreativeServingRestrictionsItemContextsItem'{..}-          = object-              (catMaybes-                 [("platform" .=) <$> _csriciPlatform,-                  ("contextType" .=) <$> _csriciContextType,-                  ("auctionType" .=) <$> _csriciAuctionType,-                  ("geoCriteriaId" .=) <$> _csriciGeoCriteriaId])------- /See:/ 'createOrdersResponse' smart constructor.-newtype CreateOrdersResponse =-  CreateOrdersResponse'-    { _corProposals :: Maybe [Proposal]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CreateOrdersResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'corProposals'-createOrdersResponse-    :: CreateOrdersResponse-createOrdersResponse = CreateOrdersResponse' {_corProposals = Nothing}----- | The list of proposals successfully created.-corProposals :: Lens' CreateOrdersResponse [Proposal]-corProposals-  = lens _corProposals (\ s a -> s{_corProposals = a})-      . _Default-      . _Coerce--instance FromJSON CreateOrdersResponse where-        parseJSON-          = withObject "CreateOrdersResponse"-              (\ o ->-                 CreateOrdersResponse' <$>-                   (o .:? "proposals" .!= mempty))--instance ToJSON CreateOrdersResponse where-        toJSON CreateOrdersResponse'{..}-          = object-              (catMaybes [("proposals" .=) <$> _corProposals])------- /See:/ 'accountBidderLocationItem' smart constructor.-data AccountBidderLocationItem =-  AccountBidderLocationItem'-    { _abliURL         :: !(Maybe Text)-    , _abliMaximumQps  :: !(Maybe (Textual Int32))-    , _abliRegion      :: !(Maybe Text)-    , _abliBidProtocol :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'AccountBidderLocationItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'abliURL'------ * 'abliMaximumQps'------ * 'abliRegion'------ * 'abliBidProtocol'-accountBidderLocationItem-    :: AccountBidderLocationItem-accountBidderLocationItem =-  AccountBidderLocationItem'-    { _abliURL = Nothing-    , _abliMaximumQps = Nothing-    , _abliRegion = Nothing-    , _abliBidProtocol = Nothing-    }----- | The URL to which the Ad Exchange will send bid requests.-abliURL :: Lens' AccountBidderLocationItem (Maybe Text)-abliURL = lens _abliURL (\ s a -> s{_abliURL = a})---- | The maximum queries per second the Ad Exchange will send.-abliMaximumQps :: Lens' AccountBidderLocationItem (Maybe Int32)-abliMaximumQps-  = lens _abliMaximumQps-      (\ s a -> s{_abliMaximumQps = a})-      . mapping _Coerce---- | The geographical region the Ad Exchange should send requests from. Only--- used by some quota systems, but always setting the value is recommended.--- Allowed values: - ASIA - EUROPE - US_EAST - US_WEST-abliRegion :: Lens' AccountBidderLocationItem (Maybe Text)-abliRegion-  = lens _abliRegion (\ s a -> s{_abliRegion = a})---- | The protocol that the bidder endpoint is using. OpenRTB protocols with--- prefix PROTOCOL_OPENRTB_PROTOBUF use proto buffer, otherwise use JSON.--- Allowed values: - PROTOCOL_ADX - PROTOCOL_OPENRTB_2_2 ---- PROTOCOL_OPENRTB_2_3 - PROTOCOL_OPENRTB_2_4 - PROTOCOL_OPENRTB_2_5 ---- PROTOCOL_OPENRTB_PROTOBUF_2_3 - PROTOCOL_OPENRTB_PROTOBUF_2_4 ---- PROTOCOL_OPENRTB_PROTOBUF_2_5-abliBidProtocol :: Lens' AccountBidderLocationItem (Maybe Text)-abliBidProtocol-  = lens _abliBidProtocol-      (\ s a -> s{_abliBidProtocol = a})--instance FromJSON AccountBidderLocationItem where-        parseJSON-          = withObject "AccountBidderLocationItem"-              (\ o ->-                 AccountBidderLocationItem' <$>-                   (o .:? "url") <*> (o .:? "maximumQps") <*>-                     (o .:? "region")-                     <*> (o .:? "bidProtocol"))--instance ToJSON AccountBidderLocationItem where-        toJSON AccountBidderLocationItem'{..}-          = object-              (catMaybes-                 [("url" .=) <$> _abliURL,-                  ("maximumQps" .=) <$> _abliMaximumQps,-                  ("region" .=) <$> _abliRegion,-                  ("bidProtocol" .=) <$> _abliBidProtocol])------- /See:/ 'privateData' smart constructor.-data PrivateData =-  PrivateData'-    { _pdReferencePayload :: !(Maybe Bytes)-    , _pdReferenceId      :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PrivateData' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pdReferencePayload'------ * 'pdReferenceId'-privateData-    :: PrivateData-privateData =-  PrivateData' {_pdReferencePayload = Nothing, _pdReferenceId = Nothing}---pdReferencePayload :: Lens' PrivateData (Maybe ByteString)-pdReferencePayload-  = lens _pdReferencePayload-      (\ s a -> s{_pdReferencePayload = a})-      . mapping _Bytes--pdReferenceId :: Lens' PrivateData (Maybe Text)-pdReferenceId-  = lens _pdReferenceId-      (\ s a -> s{_pdReferenceId = a})--instance FromJSON PrivateData where-        parseJSON-          = withObject "PrivateData"-              (\ o ->-                 PrivateData' <$>-                   (o .:? "referencePayload") <*> (o .:? "referenceId"))--instance ToJSON PrivateData where-        toJSON PrivateData'{..}-          = object-              (catMaybes-                 [("referencePayload" .=) <$> _pdReferencePayload,-                  ("referenceId" .=) <$> _pdReferenceId])---- | The configuration data for Ad Exchange RTB - Budget API.------ /See:/ 'budget' smart constructor.-data Budget =-  Budget'-    { _bCurrencyCode :: !(Maybe Text)-    , _bKind         :: !Text-    , _bBudgetAmount :: !(Maybe (Textual Int64))-    , _bAccountId    :: !(Maybe (Textual Int64))-    , _bId           :: !(Maybe Text)-    , _bBillingId    :: !(Maybe (Textual Int64))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Budget' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'bCurrencyCode'------ * 'bKind'------ * 'bBudgetAmount'------ * 'bAccountId'------ * 'bId'------ * 'bBillingId'-budget-    :: Budget-budget =-  Budget'-    { _bCurrencyCode = Nothing-    , _bKind = "adexchangebuyer#budget"-    , _bBudgetAmount = Nothing-    , _bAccountId = Nothing-    , _bId = Nothing-    , _bBillingId = Nothing-    }----- | The currency code for the buyer. This cannot be altered here.-bCurrencyCode :: Lens' Budget (Maybe Text)-bCurrencyCode-  = lens _bCurrencyCode-      (\ s a -> s{_bCurrencyCode = a})---- | The kind of the resource, i.e. \"adexchangebuyer#budget\".-bKind :: Lens' Budget Text-bKind = lens _bKind (\ s a -> s{_bKind = a})---- | The daily budget amount in unit amount of the account currency to apply--- for the billingId provided. This is required for update requests.-bBudgetAmount :: Lens' Budget (Maybe Int64)-bBudgetAmount-  = lens _bBudgetAmount-      (\ s a -> s{_bBudgetAmount = a})-      . mapping _Coerce---- | The id of the account. This is required for get and update requests.-bAccountId :: Lens' Budget (Maybe Int64)-bAccountId-  = lens _bAccountId (\ s a -> s{_bAccountId = a}) .-      mapping _Coerce---- | The unique id that describes this item.-bId :: Lens' Budget (Maybe Text)-bId = lens _bId (\ s a -> s{_bId = a})---- | The billing id to determine which adgroup to provide budget information--- for. This is required for get and update requests.-bBillingId :: Lens' Budget (Maybe Int64)-bBillingId-  = lens _bBillingId (\ s a -> s{_bBillingId = a}) .-      mapping _Coerce--instance FromJSON Budget where-        parseJSON-          = withObject "Budget"-              (\ o ->-                 Budget' <$>-                   (o .:? "currencyCode") <*>-                     (o .:? "kind" .!= "adexchangebuyer#budget")-                     <*> (o .:? "budgetAmount")-                     <*> (o .:? "accountId")-                     <*> (o .:? "id")-                     <*> (o .:? "billingId"))--instance ToJSON Budget where-        toJSON Budget'{..}-          = object-              (catMaybes-                 [("currencyCode" .=) <$> _bCurrencyCode,-                  Just ("kind" .= _bKind),-                  ("budgetAmount" .=) <$> _bBudgetAmount,-                  ("accountId" .=) <$> _bAccountId, ("id" .=) <$> _bId,-                  ("billingId" .=) <$> _bBillingId])------- /See:/ 'addOrderNotesRequest' smart constructor.-newtype AddOrderNotesRequest =-  AddOrderNotesRequest'-    { _aonrNotes :: Maybe [MarketplaceNote]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'AddOrderNotesRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'aonrNotes'-addOrderNotesRequest-    :: AddOrderNotesRequest-addOrderNotesRequest = AddOrderNotesRequest' {_aonrNotes = Nothing}----- | The list of notes to add.-aonrNotes :: Lens' AddOrderNotesRequest [MarketplaceNote]-aonrNotes-  = lens _aonrNotes (\ s a -> s{_aonrNotes = a}) .-      _Default-      . _Coerce--instance FromJSON AddOrderNotesRequest where-        parseJSON-          = withObject "AddOrderNotesRequest"-              (\ o ->-                 AddOrderNotesRequest' <$> (o .:? "notes" .!= mempty))--instance ToJSON AddOrderNotesRequest where-        toJSON AddOrderNotesRequest'{..}-          = object (catMaybes [("notes" .=) <$> _aonrNotes])------- /See:/ 'deliveryControlFrequencyCap' smart constructor.-data DeliveryControlFrequencyCap =-  DeliveryControlFrequencyCap'-    { _dcfcMaxImpressions :: !(Maybe (Textual Int32))-    , _dcfcNumTimeUnits   :: !(Maybe (Textual Int32))-    , _dcfcTimeUnitType   :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DeliveryControlFrequencyCap' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dcfcMaxImpressions'------ * 'dcfcNumTimeUnits'------ * 'dcfcTimeUnitType'-deliveryControlFrequencyCap-    :: DeliveryControlFrequencyCap-deliveryControlFrequencyCap =-  DeliveryControlFrequencyCap'-    { _dcfcMaxImpressions = Nothing-    , _dcfcNumTimeUnits = Nothing-    , _dcfcTimeUnitType = Nothing-    }---dcfcMaxImpressions :: Lens' DeliveryControlFrequencyCap (Maybe Int32)-dcfcMaxImpressions-  = lens _dcfcMaxImpressions-      (\ s a -> s{_dcfcMaxImpressions = a})-      . mapping _Coerce--dcfcNumTimeUnits :: Lens' DeliveryControlFrequencyCap (Maybe Int32)-dcfcNumTimeUnits-  = lens _dcfcNumTimeUnits-      (\ s a -> s{_dcfcNumTimeUnits = a})-      . mapping _Coerce--dcfcTimeUnitType :: Lens' DeliveryControlFrequencyCap (Maybe Text)-dcfcTimeUnitType-  = lens _dcfcTimeUnitType-      (\ s a -> s{_dcfcTimeUnitType = a})--instance FromJSON DeliveryControlFrequencyCap where-        parseJSON-          = withObject "DeliveryControlFrequencyCap"-              (\ o ->-                 DeliveryControlFrequencyCap' <$>-                   (o .:? "maxImpressions") <*> (o .:? "numTimeUnits")-                     <*> (o .:? "timeUnitType"))--instance ToJSON DeliveryControlFrequencyCap where-        toJSON DeliveryControlFrequencyCap'{..}-          = object-              (catMaybes-                 [("maxImpressions" .=) <$> _dcfcMaxImpressions,-                  ("numTimeUnits" .=) <$> _dcfcNumTimeUnits,-                  ("timeUnitType" .=) <$> _dcfcTimeUnitType])------- /See:/ 'marketplaceDealParty' smart constructor.-data MarketplaceDealParty =-  MarketplaceDealParty'-    { _mdpSeller :: !(Maybe Seller)-    , _mdpBuyer  :: !(Maybe Buyer)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'MarketplaceDealParty' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mdpSeller'------ * 'mdpBuyer'-marketplaceDealParty-    :: MarketplaceDealParty-marketplaceDealParty =-  MarketplaceDealParty' {_mdpSeller = Nothing, _mdpBuyer = Nothing}----- | The buyer\/seller associated with the deal. One of buyer\/seller is--- specified for a deal party.-mdpSeller :: Lens' MarketplaceDealParty (Maybe Seller)-mdpSeller-  = lens _mdpSeller (\ s a -> s{_mdpSeller = a})---- | The buyer\/seller associated with the deal. One of buyer\/seller is--- specified for a deal-party.-mdpBuyer :: Lens' MarketplaceDealParty (Maybe Buyer)-mdpBuyer = lens _mdpBuyer (\ s a -> s{_mdpBuyer = a})--instance FromJSON MarketplaceDealParty where-        parseJSON-          = withObject "MarketplaceDealParty"-              (\ o ->-                 MarketplaceDealParty' <$>-                   (o .:? "seller") <*> (o .:? "buyer"))--instance ToJSON MarketplaceDealParty where-        toJSON MarketplaceDealParty'{..}-          = object-              (catMaybes-                 [("seller" .=) <$> _mdpSeller,-                  ("buyer" .=) <$> _mdpBuyer])------- /See:/ 'getOrderNotesResponse' smart constructor.-newtype GetOrderNotesResponse =-  GetOrderNotesResponse'-    { _gonrNotes :: Maybe [MarketplaceNote]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GetOrderNotesResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gonrNotes'-getOrderNotesResponse-    :: GetOrderNotesResponse-getOrderNotesResponse = GetOrderNotesResponse' {_gonrNotes = Nothing}----- | The list of matching notes. The notes for a proposal are ordered from--- oldest to newest. If the notes span multiple proposals, they will be--- grouped by proposal, with the notes for the most recently modified--- proposal appearing first.-gonrNotes :: Lens' GetOrderNotesResponse [MarketplaceNote]-gonrNotes-  = lens _gonrNotes (\ s a -> s{_gonrNotes = a}) .-      _Default-      . _Coerce--instance FromJSON GetOrderNotesResponse where-        parseJSON-          = withObject "GetOrderNotesResponse"-              (\ o ->-                 GetOrderNotesResponse' <$>-                   (o .:? "notes" .!= mempty))--instance ToJSON GetOrderNotesResponse where-        toJSON GetOrderNotesResponse'{..}-          = object (catMaybes [("notes" .=) <$> _gonrNotes])------- /See:/ 'getOrdersResponse' smart constructor.-newtype GetOrdersResponse =-  GetOrdersResponse'-    { _gorProposals :: Maybe [Proposal]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GetOrdersResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gorProposals'-getOrdersResponse-    :: GetOrdersResponse-getOrdersResponse = GetOrdersResponse' {_gorProposals = Nothing}----- | The list of matching proposals.-gorProposals :: Lens' GetOrdersResponse [Proposal]-gorProposals-  = lens _gorProposals (\ s a -> s{_gorProposals = a})-      . _Default-      . _Coerce--instance FromJSON GetOrdersResponse where-        parseJSON-          = withObject "GetOrdersResponse"-              (\ o ->-                 GetOrdersResponse' <$>-                   (o .:? "proposals" .!= mempty))--instance ToJSON GetOrdersResponse where-        toJSON GetOrdersResponse'{..}-          = object-              (catMaybes [("proposals" .=) <$> _gorProposals])------- /See:/ 'creativeServingRestrictionsItemDisApprovalReasonsItem' smart constructor.-data CreativeServingRestrictionsItemDisApprovalReasonsItem =-  CreativeServingRestrictionsItemDisApprovalReasonsItem'-    { _csridariReason  :: !(Maybe Text)-    , _csridariDetails :: !(Maybe [Text])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CreativeServingRestrictionsItemDisApprovalReasonsItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'csridariReason'------ * 'csridariDetails'-creativeServingRestrictionsItemDisApprovalReasonsItem-    :: CreativeServingRestrictionsItemDisApprovalReasonsItem-creativeServingRestrictionsItemDisApprovalReasonsItem =-  CreativeServingRestrictionsItemDisApprovalReasonsItem'-    {_csridariReason = Nothing, _csridariDetails = Nothing}----- | The categorized reason for disapproval.-csridariReason :: Lens' CreativeServingRestrictionsItemDisApprovalReasonsItem (Maybe Text)-csridariReason-  = lens _csridariReason-      (\ s a -> s{_csridariReason = a})---- | Additional details about the reason for disapproval.-csridariDetails :: Lens' CreativeServingRestrictionsItemDisApprovalReasonsItem [Text]-csridariDetails-  = lens _csridariDetails-      (\ s a -> s{_csridariDetails = a})-      . _Default-      . _Coerce--instance FromJSON-           CreativeServingRestrictionsItemDisApprovalReasonsItem-         where-        parseJSON-          = withObject-              "CreativeServingRestrictionsItemDisApprovalReasonsItem"-              (\ o ->-                 CreativeServingRestrictionsItemDisApprovalReasonsItem'-                   <$>-                   (o .:? "reason") <*> (o .:? "details" .!= mempty))--instance ToJSON-           CreativeServingRestrictionsItemDisApprovalReasonsItem-         where-        toJSON-          CreativeServingRestrictionsItemDisApprovalReasonsItem'{..}-          = object-              (catMaybes-                 [("reason" .=) <$> _csridariReason,-                  ("details" .=) <$> _csridariDetails])---- | An account feed lists Ad Exchange buyer accounts that the user has--- access to. Each entry in the feed corresponds to a single buyer account.------ /See:/ 'accountsList' smart constructor.-data AccountsList =-  AccountsList'-    { _alKind  :: !Text-    , _alItems :: !(Maybe [Account])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'AccountsList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'alKind'------ * 'alItems'-accountsList-    :: AccountsList-accountsList =-  AccountsList' {_alKind = "adexchangebuyer#accountsList", _alItems = Nothing}----- | Resource type.-alKind :: Lens' AccountsList Text-alKind = lens _alKind (\ s a -> s{_alKind = a})---- | A list of accounts.-alItems :: Lens' AccountsList [Account]-alItems-  = lens _alItems (\ s a -> s{_alItems = a}) . _Default-      . _Coerce--instance FromJSON AccountsList where-        parseJSON-          = withObject "AccountsList"-              (\ o ->-                 AccountsList' <$>-                   (o .:? "kind" .!= "adexchangebuyer#accountsList") <*>-                     (o .:? "items" .!= mempty))--instance ToJSON AccountsList where-        toJSON AccountsList'{..}-          = object-              (catMaybes-                 [Just ("kind" .= _alKind),-                  ("items" .=) <$> _alItems])---- | This message carries publisher provided breakdown. E.g. {dimension_type:--- \'COUNTRY\', [{dimension_value: {id: 1, name: \'US\'}},--- {dimension_value: {id: 2, name: \'UK\'}}]}------ /See:/ 'dimension' smart constructor.-data Dimension =-  Dimension'-    { _dDimensionValues :: !(Maybe [DimensionDimensionValue])-    , _dDimensionType   :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Dimension' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dDimensionValues'------ * 'dDimensionType'-dimension-    :: Dimension-dimension = Dimension' {_dDimensionValues = Nothing, _dDimensionType = Nothing}---dDimensionValues :: Lens' Dimension [DimensionDimensionValue]-dDimensionValues-  = lens _dDimensionValues-      (\ s a -> s{_dDimensionValues = a})-      . _Default-      . _Coerce--dDimensionType :: Lens' Dimension (Maybe Text)-dDimensionType-  = lens _dDimensionType-      (\ s a -> s{_dDimensionType = a})--instance FromJSON Dimension where-        parseJSON-          = withObject "Dimension"-              (\ o ->-                 Dimension' <$>-                   (o .:? "dimensionValues" .!= mempty) <*>-                     (o .:? "dimensionType"))--instance ToJSON Dimension where-        toJSON Dimension'{..}-          = object-              (catMaybes-                 [("dimensionValues" .=) <$> _dDimensionValues,-                  ("dimensionType" .=) <$> _dDimensionType])------- /See:/ 'createOrdersRequest' smart constructor.-data CreateOrdersRequest =-  CreateOrdersRequest'-    { _cProposals       :: !(Maybe [Proposal])-    , _cWebPropertyCode :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CreateOrdersRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cProposals'------ * 'cWebPropertyCode'-createOrdersRequest-    :: CreateOrdersRequest-createOrdersRequest =-  CreateOrdersRequest' {_cProposals = Nothing, _cWebPropertyCode = Nothing}----- | The list of proposals to create.-cProposals :: Lens' CreateOrdersRequest [Proposal]-cProposals-  = lens _cProposals (\ s a -> s{_cProposals = a}) .-      _Default-      . _Coerce---- | Web property id of the seller creating these orders-cWebPropertyCode :: Lens' CreateOrdersRequest (Maybe Text)-cWebPropertyCode-  = lens _cWebPropertyCode-      (\ s a -> s{_cWebPropertyCode = a})--instance FromJSON CreateOrdersRequest where-        parseJSON-          = withObject "CreateOrdersRequest"-              (\ o ->-                 CreateOrdersRequest' <$>-                   (o .:? "proposals" .!= mempty) <*>-                     (o .:? "webPropertyCode"))--instance ToJSON CreateOrdersRequest where-        toJSON CreateOrdersRequest'{..}-          = object-              (catMaybes-                 [("proposals" .=) <$> _cProposals,-                  ("webPropertyCode" .=) <$> _cWebPropertyCode])------- /See:/ 'creativeCorrectionsItem' smart constructor.-data CreativeCorrectionsItem =-  CreativeCorrectionsItem'-    { _cciContexts :: !(Maybe [CreativeCorrectionsItemContextsItem])-    , _cciReason   :: !(Maybe Text)-    , _cciDetails  :: !(Maybe [Text])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CreativeCorrectionsItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cciContexts'------ * 'cciReason'------ * 'cciDetails'-creativeCorrectionsItem-    :: CreativeCorrectionsItem-creativeCorrectionsItem =-  CreativeCorrectionsItem'-    {_cciContexts = Nothing, _cciReason = Nothing, _cciDetails = Nothing}----- | All known serving contexts containing serving status information.-cciContexts :: Lens' CreativeCorrectionsItem [CreativeCorrectionsItemContextsItem]-cciContexts-  = lens _cciContexts (\ s a -> s{_cciContexts = a}) .-      _Default-      . _Coerce---- | The type of correction that was applied to the creative.-cciReason :: Lens' CreativeCorrectionsItem (Maybe Text)-cciReason-  = lens _cciReason (\ s a -> s{_cciReason = a})---- | Additional details about the correction.-cciDetails :: Lens' CreativeCorrectionsItem [Text]-cciDetails-  = lens _cciDetails (\ s a -> s{_cciDetails = a}) .-      _Default-      . _Coerce--instance FromJSON CreativeCorrectionsItem where-        parseJSON-          = withObject "CreativeCorrectionsItem"-              (\ o ->-                 CreativeCorrectionsItem' <$>-                   (o .:? "contexts" .!= mempty) <*> (o .:? "reason")-                     <*> (o .:? "details" .!= mempty))--instance ToJSON CreativeCorrectionsItem where-        toJSON CreativeCorrectionsItem'{..}-          = object-              (catMaybes-                 [("contexts" .=) <$> _cciContexts,-                  ("reason" .=) <$> _cciReason,-                  ("details" .=) <$> _cciDetails])------- /See:/ 'dealTermsRubiconNonGuaranteedTerms' smart constructor.-data DealTermsRubiconNonGuaranteedTerms =-  DealTermsRubiconNonGuaranteedTerms'-    { _dtrngtPriorityPrice :: !(Maybe Price)-    , _dtrngtStandardPrice :: !(Maybe Price)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DealTermsRubiconNonGuaranteedTerms' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dtrngtPriorityPrice'------ * 'dtrngtStandardPrice'-dealTermsRubiconNonGuaranteedTerms-    :: DealTermsRubiconNonGuaranteedTerms-dealTermsRubiconNonGuaranteedTerms =-  DealTermsRubiconNonGuaranteedTerms'-    {_dtrngtPriorityPrice = Nothing, _dtrngtStandardPrice = Nothing}----- | Optional price for Rubicon priority access in the auction.-dtrngtPriorityPrice :: Lens' DealTermsRubiconNonGuaranteedTerms (Maybe Price)-dtrngtPriorityPrice-  = lens _dtrngtPriorityPrice-      (\ s a -> s{_dtrngtPriorityPrice = a})---- | Optional price for Rubicon standard access in the auction.-dtrngtStandardPrice :: Lens' DealTermsRubiconNonGuaranteedTerms (Maybe Price)-dtrngtStandardPrice-  = lens _dtrngtStandardPrice-      (\ s a -> s{_dtrngtStandardPrice = a})--instance FromJSON DealTermsRubiconNonGuaranteedTerms-         where-        parseJSON-          = withObject "DealTermsRubiconNonGuaranteedTerms"-              (\ o ->-                 DealTermsRubiconNonGuaranteedTerms' <$>-                   (o .:? "priorityPrice") <*> (o .:? "standardPrice"))--instance ToJSON DealTermsRubiconNonGuaranteedTerms-         where-        toJSON DealTermsRubiconNonGuaranteedTerms'{..}-          = object-              (catMaybes-                 [("priorityPrice" .=) <$> _dtrngtPriorityPrice,-                  ("standardPrice" .=) <$> _dtrngtStandardPrice])------- /See:/ 'dealServingMetadata' smart constructor.-data DealServingMetadata =-  DealServingMetadata'-    { _dsmDealPauseStatus   :: !(Maybe DealServingMetadataDealPauseStatus)-    , _dsmAlcoholAdsAllowed :: !(Maybe Bool)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DealServingMetadata' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dsmDealPauseStatus'------ * 'dsmAlcoholAdsAllowed'-dealServingMetadata-    :: DealServingMetadata-dealServingMetadata =-  DealServingMetadata'-    {_dsmDealPauseStatus = Nothing, _dsmAlcoholAdsAllowed = Nothing}----- | Tracks which parties (if any) have paused a deal. (readonly, except via--- PauseResumeOrderDeals action)-dsmDealPauseStatus :: Lens' DealServingMetadata (Maybe DealServingMetadataDealPauseStatus)-dsmDealPauseStatus-  = lens _dsmDealPauseStatus-      (\ s a -> s{_dsmDealPauseStatus = a})---- | True if alcohol ads are allowed for this deal (read-only). This field is--- only populated when querying for finalized orders using the method--- GetFinalizedOrderDeals-dsmAlcoholAdsAllowed :: Lens' DealServingMetadata (Maybe Bool)-dsmAlcoholAdsAllowed-  = lens _dsmAlcoholAdsAllowed-      (\ s a -> s{_dsmAlcoholAdsAllowed = a})--instance FromJSON DealServingMetadata where-        parseJSON-          = withObject "DealServingMetadata"-              (\ o ->-                 DealServingMetadata' <$>-                   (o .:? "dealPauseStatus") <*>-                     (o .:? "alcoholAdsAllowed"))--instance ToJSON DealServingMetadata where-        toJSON DealServingMetadata'{..}-          = object-              (catMaybes-                 [("dealPauseStatus" .=) <$> _dsmDealPauseStatus,-                  ("alcoholAdsAllowed" .=) <$> _dsmAlcoholAdsAllowed])------- /See:/ 'addOrderDealsResponse' smart constructor.-data AddOrderDealsResponse =-  AddOrderDealsResponse'-    { _aodrDeals                  :: !(Maybe [MarketplaceDeal])-    , _aodrProposalRevisionNumber :: !(Maybe (Textual Int64))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'AddOrderDealsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'aodrDeals'------ * 'aodrProposalRevisionNumber'-addOrderDealsResponse-    :: AddOrderDealsResponse-addOrderDealsResponse =-  AddOrderDealsResponse'-    {_aodrDeals = Nothing, _aodrProposalRevisionNumber = Nothing}----- | List of deals added (in the same proposal as passed in the request)-aodrDeals :: Lens' AddOrderDealsResponse [MarketplaceDeal]-aodrDeals-  = lens _aodrDeals (\ s a -> s{_aodrDeals = a}) .-      _Default-      . _Coerce---- | The updated revision number for the proposal.-aodrProposalRevisionNumber :: Lens' AddOrderDealsResponse (Maybe Int64)-aodrProposalRevisionNumber-  = lens _aodrProposalRevisionNumber-      (\ s a -> s{_aodrProposalRevisionNumber = a})-      . mapping _Coerce--instance FromJSON AddOrderDealsResponse where-        parseJSON-          = withObject "AddOrderDealsResponse"-              (\ o ->-                 AddOrderDealsResponse' <$>-                   (o .:? "deals" .!= mempty) <*>-                     (o .:? "proposalRevisionNumber"))--instance ToJSON AddOrderDealsResponse where-        toJSON AddOrderDealsResponse'{..}-          = object-              (catMaybes-                 [("deals" .=) <$> _aodrDeals,-                  ("proposalRevisionNumber" .=) <$>-                    _aodrProposalRevisionNumber])------- /See:/ 'deliveryControl' smart constructor.-data DeliveryControl =-  DeliveryControl'-    { _dcCreativeBlockingLevel :: !(Maybe Text)-    , _dcFrequencyCaps         :: !(Maybe [DeliveryControlFrequencyCap])-    , _dcDeliveryRateType      :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DeliveryControl' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dcCreativeBlockingLevel'------ * 'dcFrequencyCaps'------ * 'dcDeliveryRateType'-deliveryControl-    :: DeliveryControl-deliveryControl =-  DeliveryControl'-    { _dcCreativeBlockingLevel = Nothing-    , _dcFrequencyCaps = Nothing-    , _dcDeliveryRateType = Nothing-    }---dcCreativeBlockingLevel :: Lens' DeliveryControl (Maybe Text)-dcCreativeBlockingLevel-  = lens _dcCreativeBlockingLevel-      (\ s a -> s{_dcCreativeBlockingLevel = a})--dcFrequencyCaps :: Lens' DeliveryControl [DeliveryControlFrequencyCap]-dcFrequencyCaps-  = lens _dcFrequencyCaps-      (\ s a -> s{_dcFrequencyCaps = a})-      . _Default-      . _Coerce--dcDeliveryRateType :: Lens' DeliveryControl (Maybe Text)-dcDeliveryRateType-  = lens _dcDeliveryRateType-      (\ s a -> s{_dcDeliveryRateType = a})--instance FromJSON DeliveryControl where-        parseJSON-          = withObject "DeliveryControl"-              (\ o ->-                 DeliveryControl' <$>-                   (o .:? "creativeBlockingLevel") <*>-                     (o .:? "frequencyCaps" .!= mempty)-                     <*> (o .:? "deliveryRateType"))--instance ToJSON DeliveryControl where-        toJSON DeliveryControl'{..}-          = object-              (catMaybes-                 [("creativeBlockingLevel" .=) <$>-                    _dcCreativeBlockingLevel,-                  ("frequencyCaps" .=) <$> _dcFrequencyCaps,-                  ("deliveryRateType" .=) <$> _dcDeliveryRateType])---- | Used to specify pricing rules for buyers. Each PricePerBuyer in a--- product can become [0,1] deals. To check if there is a PricePerBuyer for--- a particular buyer we look for the most specific matching rule - we--- first look for a rule matching the buyer and otherwise look for a--- matching rule where no buyer is set.------ /See:/ 'pricePerBuyer' smart constructor.-data PricePerBuyer =-  PricePerBuyer'-    { _ppbBilledBuyer :: !(Maybe Buyer)-    , _ppbPrice       :: !(Maybe Price)-    , _ppbAuctionTier :: !(Maybe Text)-    , _ppbBuyer       :: !(Maybe Buyer)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PricePerBuyer' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ppbBilledBuyer'------ * 'ppbPrice'------ * 'ppbAuctionTier'------ * 'ppbBuyer'-pricePerBuyer-    :: PricePerBuyer-pricePerBuyer =-  PricePerBuyer'-    { _ppbBilledBuyer = Nothing-    , _ppbPrice = Nothing-    , _ppbAuctionTier = Nothing-    , _ppbBuyer = Nothing-    }----- | Reference to the buyer that will get billed.-ppbBilledBuyer :: Lens' PricePerBuyer (Maybe Buyer)-ppbBilledBuyer-  = lens _ppbBilledBuyer-      (\ s a -> s{_ppbBilledBuyer = a})---- | The specified price-ppbPrice :: Lens' PricePerBuyer (Maybe Price)-ppbPrice = lens _ppbPrice (\ s a -> s{_ppbPrice = a})---- | Optional access type for this buyer.-ppbAuctionTier :: Lens' PricePerBuyer (Maybe Text)-ppbAuctionTier-  = lens _ppbAuctionTier-      (\ s a -> s{_ppbAuctionTier = a})---- | The buyer who will pay this price. If unset, all buyers can pay this--- price (if the advertisers match, and there\'s no more specific rule--- matching the buyer).-ppbBuyer :: Lens' PricePerBuyer (Maybe Buyer)-ppbBuyer = lens _ppbBuyer (\ s a -> s{_ppbBuyer = a})--instance FromJSON PricePerBuyer where-        parseJSON-          = withObject "PricePerBuyer"-              (\ o ->-                 PricePerBuyer' <$>-                   (o .:? "billedBuyer") <*> (o .:? "price") <*>-                     (o .:? "auctionTier")-                     <*> (o .:? "buyer"))--instance ToJSON PricePerBuyer where-        toJSON PricePerBuyer'{..}-          = object-              (catMaybes-                 [("billedBuyer" .=) <$> _ppbBilledBuyer,-                  ("price" .=) <$> _ppbPrice,-                  ("auctionTier" .=) <$> _ppbAuctionTier,-                  ("buyer" .=) <$> _ppbBuyer])---- | A creative and its classification data.------ /See:/ 'creative' smart constructor.-data Creative =-  Creative'-    { _cAttribute                  :: !(Maybe [Textual Int32])-    , _cNATiveAd                   :: !(Maybe CreativeNATiveAd)-    , _cHeight                     :: !(Maybe (Textual Int32))-    , _cBuyerCreativeId            :: !(Maybe Text)-    , _cAdvertiserName             :: !(Maybe Text)-    , _cAdChoicesDestinationURL    :: !(Maybe Text)-    , _cAgencyId                   :: !(Maybe (Textual Int64))-    , _cCorrections                :: !(Maybe [CreativeCorrectionsItem])-    , _cProductCategories          :: !(Maybe [Textual Int32])-    , _cVideoVastXML               :: !(Maybe Text)-    , _cKind                       :: !Text-    , _cHTMLSnippet                :: !(Maybe Text)-    , _cAdvertiserId               :: !(Maybe [Textual Int64])-    , _cRestrictedCategories       :: !(Maybe [Textual Int32])-    , _cDealsStatus                :: !(Maybe Text)-    , _cWidth                      :: !(Maybe (Textual Int32))-    , _cClickThroughURL            :: !(Maybe [Text])-    , _cLanguages                  :: !(Maybe [Text])-    , _cVendorType                 :: !(Maybe [Textual Int32])-    , _cAccountId                  :: !(Maybe (Textual Int32))-    , _cImpressionTrackingURL      :: !(Maybe [Text])-    , _cFilteringReasons           :: !(Maybe CreativeFilteringReasons)-    , _cVersion                    :: !(Maybe (Textual Int32))-    , _cSensitiveCategories        :: !(Maybe [Textual Int32])-    , _cVideoURL                   :: !(Maybe Text)-    , _cAPIUploadTimestamp         :: !(Maybe DateTime')-    , _cServingRestrictions        :: !(Maybe [CreativeServingRestrictionsItem])-    , _cDetectedDomains            :: !(Maybe [Text])-    , _cOpenAuctionStatus          :: !(Maybe Text)-    , _cCreativeStatusIdentityType :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Creative' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cAttribute'------ * 'cNATiveAd'------ * 'cHeight'------ * 'cBuyerCreativeId'------ * 'cAdvertiserName'------ * 'cAdChoicesDestinationURL'------ * 'cAgencyId'------ * 'cCorrections'------ * 'cProductCategories'------ * 'cVideoVastXML'------ * 'cKind'------ * 'cHTMLSnippet'------ * 'cAdvertiserId'------ * 'cRestrictedCategories'------ * 'cDealsStatus'------ * 'cWidth'------ * 'cClickThroughURL'------ * 'cLanguages'------ * 'cVendorType'------ * 'cAccountId'------ * 'cImpressionTrackingURL'------ * 'cFilteringReasons'------ * 'cVersion'------ * 'cSensitiveCategories'------ * 'cVideoURL'------ * 'cAPIUploadTimestamp'------ * 'cServingRestrictions'------ * 'cDetectedDomains'------ * 'cOpenAuctionStatus'------ * 'cCreativeStatusIdentityType'-creative-    :: Creative-creative =-  Creative'-    { _cAttribute = Nothing-    , _cNATiveAd = Nothing-    , _cHeight = Nothing-    , _cBuyerCreativeId = Nothing-    , _cAdvertiserName = Nothing-    , _cAdChoicesDestinationURL = Nothing-    , _cAgencyId = Nothing-    , _cCorrections = Nothing-    , _cProductCategories = Nothing-    , _cVideoVastXML = Nothing-    , _cKind = "adexchangebuyer#creative"-    , _cHTMLSnippet = Nothing-    , _cAdvertiserId = Nothing-    , _cRestrictedCategories = Nothing-    , _cDealsStatus = Nothing-    , _cWidth = Nothing-    , _cClickThroughURL = Nothing-    , _cLanguages = Nothing-    , _cVendorType = Nothing-    , _cAccountId = Nothing-    , _cImpressionTrackingURL = Nothing-    , _cFilteringReasons = Nothing-    , _cVersion = Nothing-    , _cSensitiveCategories = Nothing-    , _cVideoURL = Nothing-    , _cAPIUploadTimestamp = Nothing-    , _cServingRestrictions = Nothing-    , _cDetectedDomains = Nothing-    , _cOpenAuctionStatus = Nothing-    , _cCreativeStatusIdentityType = Nothing-    }----- | List of buyer selectable attributes for the ads that may be shown from--- this snippet. Each attribute is represented by an integer as defined in--- buyer-declarable-creative-attributes.txt.-cAttribute :: Lens' Creative [Int32]-cAttribute-  = lens _cAttribute (\ s a -> s{_cAttribute = a}) .-      _Default-      . _Coerce---- | If nativeAd is set, HTMLSnippet, videoVastXML, and the videoURL outside--- of nativeAd should not be set. (The videoURL inside nativeAd can be--- set.)-cNATiveAd :: Lens' Creative (Maybe CreativeNATiveAd)-cNATiveAd-  = lens _cNATiveAd (\ s a -> s{_cNATiveAd = a})---- | Ad height.-cHeight :: Lens' Creative (Maybe Int32)-cHeight-  = lens _cHeight (\ s a -> s{_cHeight = a}) .-      mapping _Coerce---- | A buyer-specific id identifying the creative in this ad.-cBuyerCreativeId :: Lens' Creative (Maybe Text)-cBuyerCreativeId-  = lens _cBuyerCreativeId-      (\ s a -> s{_cBuyerCreativeId = a})---- | The name of the company being advertised in the creative. The value--- provided must exist in the advertisers.txt file.-cAdvertiserName :: Lens' Creative (Maybe Text)-cAdvertiserName-  = lens _cAdvertiserName-      (\ s a -> s{_cAdvertiserName = a})---- | The link to the Ad Preferences page. This is only supported for native--- ads.-cAdChoicesDestinationURL :: Lens' Creative (Maybe Text)-cAdChoicesDestinationURL-  = lens _cAdChoicesDestinationURL-      (\ s a -> s{_cAdChoicesDestinationURL = a})---- | The agency id for this creative.-cAgencyId :: Lens' Creative (Maybe Int64)-cAgencyId-  = lens _cAgencyId (\ s a -> s{_cAgencyId = a}) .-      mapping _Coerce---- | Shows any corrections that were applied to this creative. Read-only.--- This field should not be set in requests.-cCorrections :: Lens' Creative [CreativeCorrectionsItem]-cCorrections-  = lens _cCorrections (\ s a -> s{_cCorrections = a})-      . _Default-      . _Coerce---- | Detected product categories, if any. Each category is represented by an--- integer as defined in ad-product-categories.txt. Read-only. This field--- should not be set in requests.-cProductCategories :: Lens' Creative [Int32]-cProductCategories-  = lens _cProductCategories-      (\ s a -> s{_cProductCategories = a})-      . _Default-      . _Coerce---- | The contents of a VAST document for a video ad. This document should--- conform to the VAST 2.0 or 3.0 standard. If set, HTMLSnippet, videoURL,--- and nativeAd and should not be set.-cVideoVastXML :: Lens' Creative (Maybe Text)-cVideoVastXML-  = lens _cVideoVastXML-      (\ s a -> s{_cVideoVastXML = a})---- | Resource type.-cKind :: Lens' Creative Text-cKind = lens _cKind (\ s a -> s{_cKind = a})---- | The HTML snippet that displays the ad when inserted in the web page. If--- set, videoURL, videoVastXML, and nativeAd should not be set.-cHTMLSnippet :: Lens' Creative (Maybe Text)-cHTMLSnippet-  = lens _cHTMLSnippet (\ s a -> s{_cHTMLSnippet = a})---- | Detected advertiser id, if any. Read-only. This field should not be set--- in requests.-cAdvertiserId :: Lens' Creative [Int64]-cAdvertiserId-  = lens _cAdvertiserId-      (\ s a -> s{_cAdvertiserId = a})-      . _Default-      . _Coerce---- | All restricted categories for the ads that may be shown from this--- snippet. Each category is represented by an integer as defined in the--- ad-restricted-categories.txt.-cRestrictedCategories :: Lens' Creative [Int32]-cRestrictedCategories-  = lens _cRestrictedCategories-      (\ s a -> s{_cRestrictedCategories = a})-      . _Default-      . _Coerce---- | Top-level deals status. Read-only. This field should not be set in--- requests. If disapproved, an entry for auctionType=DIRECT_DEALS (or ALL)--- in servingRestrictions will also exist. Note that this may be nuanced--- with other contextual restrictions, in which case it may be preferable--- to read from servingRestrictions directly.-cDealsStatus :: Lens' Creative (Maybe Text)-cDealsStatus-  = lens _cDealsStatus (\ s a -> s{_cDealsStatus = a})---- | Ad width.-cWidth :: Lens' Creative (Maybe Int32)-cWidth-  = lens _cWidth (\ s a -> s{_cWidth = a}) .-      mapping _Coerce---- | The set of destination urls for the snippet.-cClickThroughURL :: Lens' Creative [Text]-cClickThroughURL-  = lens _cClickThroughURL-      (\ s a -> s{_cClickThroughURL = a})-      . _Default-      . _Coerce---- | Detected languages for this creative. Read-only. This field should not--- be set in requests.-cLanguages :: Lens' Creative [Text]-cLanguages-  = lens _cLanguages (\ s a -> s{_cLanguages = a}) .-      _Default-      . _Coerce---- | List of vendor types for the ads that may be shown from this snippet.--- Each vendor type is represented by an integer as defined in vendors.txt.-cVendorType :: Lens' Creative [Int32]-cVendorType-  = lens _cVendorType (\ s a -> s{_cVendorType = a}) .-      _Default-      . _Coerce---- | Account id.-cAccountId :: Lens' Creative (Maybe Int32)-cAccountId-  = lens _cAccountId (\ s a -> s{_cAccountId = a}) .-      mapping _Coerce---- | The set of urls to be called to record an impression.-cImpressionTrackingURL :: Lens' Creative [Text]-cImpressionTrackingURL-  = lens _cImpressionTrackingURL-      (\ s a -> s{_cImpressionTrackingURL = a})-      . _Default-      . _Coerce---- | The filtering reasons for the creative. Read-only. This field should not--- be set in requests.-cFilteringReasons :: Lens' Creative (Maybe CreativeFilteringReasons)-cFilteringReasons-  = lens _cFilteringReasons-      (\ s a -> s{_cFilteringReasons = a})---- | The version for this creative. Read-only. This field should not be set--- in requests.-cVersion :: Lens' Creative (Maybe Int32)-cVersion-  = lens _cVersion (\ s a -> s{_cVersion = a}) .-      mapping _Coerce---- | Detected sensitive categories, if any. Each category is represented by--- an integer as defined in ad-sensitive-categories.txt. Read-only. This--- field should not be set in requests.-cSensitiveCategories :: Lens' Creative [Int32]-cSensitiveCategories-  = lens _cSensitiveCategories-      (\ s a -> s{_cSensitiveCategories = a})-      . _Default-      . _Coerce---- | The URL to fetch a video ad. If set, HTMLSnippet, videoVastXML, and--- nativeAd should not be set. Note, this is different from--- resource.native_ad.video_url above.-cVideoURL :: Lens' Creative (Maybe Text)-cVideoURL-  = lens _cVideoURL (\ s a -> s{_cVideoURL = a})---- | The last upload timestamp of this creative if it was uploaded via API.--- Read-only. The value of this field is generated, and will be ignored for--- uploads. (formatted RFC 3339 timestamp).-cAPIUploadTimestamp :: Lens' Creative (Maybe UTCTime)-cAPIUploadTimestamp-  = lens _cAPIUploadTimestamp-      (\ s a -> s{_cAPIUploadTimestamp = a})-      . mapping _DateTime---- | The granular status of this ad in specific contexts. A context here--- relates to where something ultimately serves (for example, a physical--- location, a platform, an HTTPS vs HTTP request, or the type of auction).--- Read-only. This field should not be set in requests. See the examples in--- the Creatives guide for more details.-cServingRestrictions :: Lens' Creative [CreativeServingRestrictionsItem]-cServingRestrictions-  = lens _cServingRestrictions-      (\ s a -> s{_cServingRestrictions = a})-      . _Default-      . _Coerce---- | Detected domains for this creative. Read-only. This field should not be--- set in requests.-cDetectedDomains :: Lens' Creative [Text]-cDetectedDomains-  = lens _cDetectedDomains-      (\ s a -> s{_cDetectedDomains = a})-      . _Default-      . _Coerce---- | Top-level open auction status. Read-only. This field should not be set--- in requests. If disapproved, an entry for auctionType=OPEN_AUCTION (or--- ALL) in servingRestrictions will also exist. Note that this may be--- nuanced with other contextual restrictions, in which case it may be--- preferable to read from ServingRestrictions directly.-cOpenAuctionStatus :: Lens' Creative (Maybe Text)-cOpenAuctionStatus-  = lens _cOpenAuctionStatus-      (\ s a -> s{_cOpenAuctionStatus = a})---- | Creative status identity type that the creative item applies to. Ad--- Exchange real-time bidding is migrating to the sizeless creative--- verification. Originally, Ad Exchange assigned creative verification--- status to a unique combination of a buyer creative ID and creative--- dimensions. Post-migration, a single verification status will be--- assigned at the buyer creative ID level. This field allows to--- distinguish whether a given creative status applies to a unique--- combination of a buyer creative ID and creative dimensions, or to a--- buyer creative ID as a whole.-cCreativeStatusIdentityType :: Lens' Creative (Maybe Text)-cCreativeStatusIdentityType-  = lens _cCreativeStatusIdentityType-      (\ s a -> s{_cCreativeStatusIdentityType = a})--instance FromJSON Creative where-        parseJSON-          = withObject "Creative"-              (\ o ->-                 Creative' <$>-                   (o .:? "attribute" .!= mempty) <*> (o .:? "nativeAd")-                     <*> (o .:? "height")-                     <*> (o .:? "buyerCreativeId")-                     <*> (o .:? "advertiserName")-                     <*> (o .:? "adChoicesDestinationUrl")-                     <*> (o .:? "agencyId")-                     <*> (o .:? "corrections" .!= mempty)-                     <*> (o .:? "productCategories" .!= mempty)-                     <*> (o .:? "videoVastXML")-                     <*> (o .:? "kind" .!= "adexchangebuyer#creative")-                     <*> (o .:? "HTMLSnippet")-                     <*> (o .:? "advertiserId" .!= mempty)-                     <*> (o .:? "restrictedCategories" .!= mempty)-                     <*> (o .:? "dealsStatus")-                     <*> (o .:? "width")-                     <*> (o .:? "clickThroughUrl" .!= mempty)-                     <*> (o .:? "languages" .!= mempty)-                     <*> (o .:? "vendorType" .!= mempty)-                     <*> (o .:? "accountId")-                     <*> (o .:? "impressionTrackingUrl" .!= mempty)-                     <*> (o .:? "filteringReasons")-                     <*> (o .:? "version")-                     <*> (o .:? "sensitiveCategories" .!= mempty)-                     <*> (o .:? "videoURL")-                     <*> (o .:? "apiUploadTimestamp")-                     <*> (o .:? "servingRestrictions" .!= mempty)-                     <*> (o .:? "detectedDomains" .!= mempty)-                     <*> (o .:? "openAuctionStatus")-                     <*> (o .:? "creativeStatusIdentityType"))--instance ToJSON Creative where-        toJSON Creative'{..}-          = object-              (catMaybes-                 [("attribute" .=) <$> _cAttribute,-                  ("nativeAd" .=) <$> _cNATiveAd,-                  ("height" .=) <$> _cHeight,-                  ("buyerCreativeId" .=) <$> _cBuyerCreativeId,-                  ("advertiserName" .=) <$> _cAdvertiserName,-                  ("adChoicesDestinationUrl" .=) <$>-                    _cAdChoicesDestinationURL,-                  ("agencyId" .=) <$> _cAgencyId,-                  ("corrections" .=) <$> _cCorrections,-                  ("productCategories" .=) <$> _cProductCategories,-                  ("videoVastXML" .=) <$> _cVideoVastXML,-                  Just ("kind" .= _cKind),-                  ("HTMLSnippet" .=) <$> _cHTMLSnippet,-                  ("advertiserId" .=) <$> _cAdvertiserId,-                  ("restrictedCategories" .=) <$>-                    _cRestrictedCategories,-                  ("dealsStatus" .=) <$> _cDealsStatus,-                  ("width" .=) <$> _cWidth,-                  ("clickThroughUrl" .=) <$> _cClickThroughURL,-                  ("languages" .=) <$> _cLanguages,-                  ("vendorType" .=) <$> _cVendorType,-                  ("accountId" .=) <$> _cAccountId,-                  ("impressionTrackingUrl" .=) <$>-                    _cImpressionTrackingURL,-                  ("filteringReasons" .=) <$> _cFilteringReasons,-                  ("version" .=) <$> _cVersion,-                  ("sensitiveCategories" .=) <$> _cSensitiveCategories,-                  ("videoURL" .=) <$> _cVideoURL,-                  ("apiUploadTimestamp" .=) <$> _cAPIUploadTimestamp,-                  ("servingRestrictions" .=) <$> _cServingRestrictions,-                  ("detectedDomains" .=) <$> _cDetectedDomains,-                  ("openAuctionStatus" .=) <$> _cOpenAuctionStatus,-                  ("creativeStatusIdentityType" .=) <$>-                    _cCreativeStatusIdentityType])------- /See:/ 'targetingValueDayPartTargetingDayPart' smart constructor.-data TargetingValueDayPartTargetingDayPart =-  TargetingValueDayPartTargetingDayPart'-    { _tvdptdpEndHour     :: !(Maybe (Textual Int32))-    , _tvdptdpStartHour   :: !(Maybe (Textual Int32))-    , _tvdptdpStartMinute :: !(Maybe (Textual Int32))-    , _tvdptdpDayOfWeek   :: !(Maybe Text)-    , _tvdptdpEndMinute   :: !(Maybe (Textual Int32))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TargetingValueDayPartTargetingDayPart' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tvdptdpEndHour'------ * 'tvdptdpStartHour'------ * 'tvdptdpStartMinute'------ * 'tvdptdpDayOfWeek'------ * 'tvdptdpEndMinute'-targetingValueDayPartTargetingDayPart-    :: TargetingValueDayPartTargetingDayPart-targetingValueDayPartTargetingDayPart =-  TargetingValueDayPartTargetingDayPart'-    { _tvdptdpEndHour = Nothing-    , _tvdptdpStartHour = Nothing-    , _tvdptdpStartMinute = Nothing-    , _tvdptdpDayOfWeek = Nothing-    , _tvdptdpEndMinute = Nothing-    }---tvdptdpEndHour :: Lens' TargetingValueDayPartTargetingDayPart (Maybe Int32)-tvdptdpEndHour-  = lens _tvdptdpEndHour-      (\ s a -> s{_tvdptdpEndHour = a})-      . mapping _Coerce--tvdptdpStartHour :: Lens' TargetingValueDayPartTargetingDayPart (Maybe Int32)-tvdptdpStartHour-  = lens _tvdptdpStartHour-      (\ s a -> s{_tvdptdpStartHour = a})-      . mapping _Coerce--tvdptdpStartMinute :: Lens' TargetingValueDayPartTargetingDayPart (Maybe Int32)-tvdptdpStartMinute-  = lens _tvdptdpStartMinute-      (\ s a -> s{_tvdptdpStartMinute = a})-      . mapping _Coerce--tvdptdpDayOfWeek :: Lens' TargetingValueDayPartTargetingDayPart (Maybe Text)-tvdptdpDayOfWeek-  = lens _tvdptdpDayOfWeek-      (\ s a -> s{_tvdptdpDayOfWeek = a})--tvdptdpEndMinute :: Lens' TargetingValueDayPartTargetingDayPart (Maybe Int32)-tvdptdpEndMinute-  = lens _tvdptdpEndMinute-      (\ s a -> s{_tvdptdpEndMinute = a})-      . mapping _Coerce--instance FromJSON-           TargetingValueDayPartTargetingDayPart-         where-        parseJSON-          = withObject "TargetingValueDayPartTargetingDayPart"-              (\ o ->-                 TargetingValueDayPartTargetingDayPart' <$>-                   (o .:? "endHour") <*> (o .:? "startHour") <*>-                     (o .:? "startMinute")-                     <*> (o .:? "dayOfWeek")-                     <*> (o .:? "endMinute"))--instance ToJSON TargetingValueDayPartTargetingDayPart-         where-        toJSON TargetingValueDayPartTargetingDayPart'{..}-          = object-              (catMaybes-                 [("endHour" .=) <$> _tvdptdpEndHour,-                  ("startHour" .=) <$> _tvdptdpStartHour,-                  ("startMinute" .=) <$> _tvdptdpStartMinute,-                  ("dayOfWeek" .=) <$> _tvdptdpDayOfWeek,-                  ("endMinute" .=) <$> _tvdptdpEndMinute])---- | Value of the dimension.------ /See:/ 'dimensionDimensionValue' smart constructor.-data DimensionDimensionValue =-  DimensionDimensionValue'-    { _ddvName       :: !(Maybe Text)-    , _ddvId         :: !(Maybe (Textual Int32))-    , _ddvPercentage :: !(Maybe (Textual Int32))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DimensionDimensionValue' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ddvName'------ * 'ddvId'------ * 'ddvPercentage'-dimensionDimensionValue-    :: DimensionDimensionValue-dimensionDimensionValue =-  DimensionDimensionValue'-    {_ddvName = Nothing, _ddvId = Nothing, _ddvPercentage = Nothing}----- | Name of the dimension mainly for debugging purposes, except for the case--- of CREATIVE_SIZE. For CREATIVE_SIZE, strings are used instead of ids.-ddvName :: Lens' DimensionDimensionValue (Maybe Text)-ddvName = lens _ddvName (\ s a -> s{_ddvName = a})---- | Id of the dimension.-ddvId :: Lens' DimensionDimensionValue (Maybe Int32)-ddvId-  = lens _ddvId (\ s a -> s{_ddvId = a}) .-      mapping _Coerce---- | Percent of total impressions for a dimension type. e.g. {dimension_type:--- \'GENDER\', [{dimension_value: {id: 1, name: \'MALE\', percentage:--- 60}}]} Gender MALE is 60% of all impressions which have gender.-ddvPercentage :: Lens' DimensionDimensionValue (Maybe Int32)-ddvPercentage-  = lens _ddvPercentage-      (\ s a -> s{_ddvPercentage = a})-      . mapping _Coerce--instance FromJSON DimensionDimensionValue where-        parseJSON-          = withObject "DimensionDimensionValue"-              (\ o ->-                 DimensionDimensionValue' <$>-                   (o .:? "name") <*> (o .:? "id") <*>-                     (o .:? "percentage"))--instance ToJSON DimensionDimensionValue where-        toJSON DimensionDimensionValue'{..}-          = object-              (catMaybes-                 [("name" .=) <$> _ddvName, ("id" .=) <$> _ddvId,-                  ("percentage" .=) <$> _ddvPercentage])------- /See:/ 'pretargetingConfigList' smart constructor.-data PretargetingConfigList =-  PretargetingConfigList'-    { _pclKind  :: !Text-    , _pclItems :: !(Maybe [PretargetingConfig])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PretargetingConfigList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pclKind'------ * 'pclItems'-pretargetingConfigList-    :: PretargetingConfigList-pretargetingConfigList =-  PretargetingConfigList'-    {_pclKind = "adexchangebuyer#pretargetingConfigList", _pclItems = Nothing}----- | Resource type.-pclKind :: Lens' PretargetingConfigList Text-pclKind = lens _pclKind (\ s a -> s{_pclKind = a})---- | A list of pretargeting configs-pclItems :: Lens' PretargetingConfigList [PretargetingConfig]-pclItems-  = lens _pclItems (\ s a -> s{_pclItems = a}) .-      _Default-      . _Coerce--instance FromJSON PretargetingConfigList where-        parseJSON-          = withObject "PretargetingConfigList"-              (\ o ->-                 PretargetingConfigList' <$>-                   (o .:? "kind" .!=-                      "adexchangebuyer#pretargetingConfigList")-                     <*> (o .:? "items" .!= mempty))--instance ToJSON PretargetingConfigList where-        toJSON PretargetingConfigList'{..}-          = object-              (catMaybes-                 [Just ("kind" .= _pclKind),-                  ("items" .=) <$> _pclItems])------- /See:/ 'targetingValueDemogAgeCriteria' smart constructor.-newtype TargetingValueDemogAgeCriteria =-  TargetingValueDemogAgeCriteria'-    { _tvdacDemogAgeCriteriaIds :: Maybe [Text]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TargetingValueDemogAgeCriteria' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tvdacDemogAgeCriteriaIds'-targetingValueDemogAgeCriteria-    :: TargetingValueDemogAgeCriteria-targetingValueDemogAgeCriteria =-  TargetingValueDemogAgeCriteria' {_tvdacDemogAgeCriteriaIds = Nothing}---tvdacDemogAgeCriteriaIds :: Lens' TargetingValueDemogAgeCriteria [Text]-tvdacDemogAgeCriteriaIds-  = lens _tvdacDemogAgeCriteriaIds-      (\ s a -> s{_tvdacDemogAgeCriteriaIds = a})-      . _Default-      . _Coerce--instance FromJSON TargetingValueDemogAgeCriteria-         where-        parseJSON-          = withObject "TargetingValueDemogAgeCriteria"-              (\ o ->-                 TargetingValueDemogAgeCriteria' <$>-                   (o .:? "demogAgeCriteriaIds" .!= mempty))--instance ToJSON TargetingValueDemogAgeCriteria where-        toJSON TargetingValueDemogAgeCriteria'{..}-          = object-              (catMaybes-                 [("demogAgeCriteriaIds" .=) <$>-                    _tvdacDemogAgeCriteriaIds])------- /See:/ 'dealTermsNonGuaranteedFixedPriceTerms' smart constructor.-newtype DealTermsNonGuaranteedFixedPriceTerms =-  DealTermsNonGuaranteedFixedPriceTerms'-    { _dtngfptFixedPrices :: Maybe [PricePerBuyer]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DealTermsNonGuaranteedFixedPriceTerms' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dtngfptFixedPrices'-dealTermsNonGuaranteedFixedPriceTerms-    :: DealTermsNonGuaranteedFixedPriceTerms-dealTermsNonGuaranteedFixedPriceTerms =-  DealTermsNonGuaranteedFixedPriceTerms' {_dtngfptFixedPrices = Nothing}----- | Fixed price for the specified buyer.-dtngfptFixedPrices :: Lens' DealTermsNonGuaranteedFixedPriceTerms [PricePerBuyer]-dtngfptFixedPrices-  = lens _dtngfptFixedPrices-      (\ s a -> s{_dtngfptFixedPrices = a})-      . _Default-      . _Coerce--instance FromJSON-           DealTermsNonGuaranteedFixedPriceTerms-         where-        parseJSON-          = withObject "DealTermsNonGuaranteedFixedPriceTerms"-              (\ o ->-                 DealTermsNonGuaranteedFixedPriceTerms' <$>-                   (o .:? "fixedPrices" .!= mempty))--instance ToJSON DealTermsNonGuaranteedFixedPriceTerms-         where-        toJSON DealTermsNonGuaranteedFixedPriceTerms'{..}-          = object-              (catMaybes-                 [("fixedPrices" .=) <$> _dtngfptFixedPrices])---- | The configuration data for an Ad Exchange performance report list.------ /See:/ 'performanceReport' smart constructor.-data PerformanceReport =-  PerformanceReport'-    { _prFilteredBidRate         :: !(Maybe (Textual Double))-    , _prKind                    :: !Text-    , _prLatency95thPercentile   :: !(Maybe (Textual Double))-    , _prCookieMatcherStatusRate :: !(Maybe [JSONValue])-    , _prHostedMatchStatusRate   :: !(Maybe [JSONValue])-    , _prUnsuccessfulRequestRate :: !(Maybe (Textual Double))-    , _prBidRequestRate          :: !(Maybe (Textual Double))-    , _prQuotaThrottledLimit     :: !(Maybe (Textual Double))-    , _prQuotaConfiguredLimit    :: !(Maybe (Textual Double))-    , _prSuccessfulRequestRate   :: !(Maybe (Textual Double))-    , _prLatency85thPercentile   :: !(Maybe (Textual Double))-    , _prCalloutStatusRate       :: !(Maybe [JSONValue])-    , _prLatency50thPercentile   :: !(Maybe (Textual Double))-    , _prBidRate                 :: !(Maybe (Textual Double))-    , _prCreativeStatusRate      :: !(Maybe [JSONValue])-    , _prNoQuotaInRegion         :: !(Maybe (Textual Double))-    , _prRegion                  :: !(Maybe Text)-    , _prInventoryMatchRate      :: !(Maybe (Textual Double))-    , _prPixelMatchResponses     :: !(Maybe (Textual Double))-    , _prTimestamp               :: !(Maybe (Textual Int64))-    , _prPixelMatchRequests      :: !(Maybe (Textual Double))-    , _prOutOfQuota              :: !(Maybe (Textual Double))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PerformanceReport' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'prFilteredBidRate'------ * 'prKind'------ * 'prLatency95thPercentile'------ * 'prCookieMatcherStatusRate'------ * 'prHostedMatchStatusRate'------ * 'prUnsuccessfulRequestRate'------ * 'prBidRequestRate'------ * 'prQuotaThrottledLimit'------ * 'prQuotaConfiguredLimit'------ * 'prSuccessfulRequestRate'------ * 'prLatency85thPercentile'------ * 'prCalloutStatusRate'------ * 'prLatency50thPercentile'------ * 'prBidRate'------ * 'prCreativeStatusRate'------ * 'prNoQuotaInRegion'------ * 'prRegion'------ * 'prInventoryMatchRate'------ * 'prPixelMatchResponses'------ * 'prTimestamp'------ * 'prPixelMatchRequests'------ * 'prOutOfQuota'-performanceReport-    :: PerformanceReport-performanceReport =-  PerformanceReport'-    { _prFilteredBidRate = Nothing-    , _prKind = "adexchangebuyer#performanceReport"-    , _prLatency95thPercentile = Nothing-    , _prCookieMatcherStatusRate = Nothing-    , _prHostedMatchStatusRate = Nothing-    , _prUnsuccessfulRequestRate = Nothing-    , _prBidRequestRate = Nothing-    , _prQuotaThrottledLimit = Nothing-    , _prQuotaConfiguredLimit = Nothing-    , _prSuccessfulRequestRate = Nothing-    , _prLatency85thPercentile = Nothing-    , _prCalloutStatusRate = Nothing-    , _prLatency50thPercentile = Nothing-    , _prBidRate = Nothing-    , _prCreativeStatusRate = Nothing-    , _prNoQuotaInRegion = Nothing-    , _prRegion = Nothing-    , _prInventoryMatchRate = Nothing-    , _prPixelMatchResponses = Nothing-    , _prTimestamp = Nothing-    , _prPixelMatchRequests = Nothing-    , _prOutOfQuota = Nothing-    }----- | The number of bid responses that were filtered due to a policy violation--- or other errors.-prFilteredBidRate :: Lens' PerformanceReport (Maybe Double)-prFilteredBidRate-  = lens _prFilteredBidRate-      (\ s a -> s{_prFilteredBidRate = a})-      . mapping _Coerce---- | Resource type.-prKind :: Lens' PerformanceReport Text-prKind = lens _prKind (\ s a -> s{_prKind = a})---- | The 95th percentile round trip latency(ms) as perceived from Google--- servers for the duration period covered by the report.-prLatency95thPercentile :: Lens' PerformanceReport (Maybe Double)-prLatency95thPercentile-  = lens _prLatency95thPercentile-      (\ s a -> s{_prLatency95thPercentile = a})-      . mapping _Coerce---- | Average QPS for cookie matcher operations.-prCookieMatcherStatusRate :: Lens' PerformanceReport [JSONValue]-prCookieMatcherStatusRate-  = lens _prCookieMatcherStatusRate-      (\ s a -> s{_prCookieMatcherStatusRate = a})-      . _Default-      . _Coerce---- | Average QPS for hosted match operations.-prHostedMatchStatusRate :: Lens' PerformanceReport [JSONValue]-prHostedMatchStatusRate-  = lens _prHostedMatchStatusRate-      (\ s a -> s{_prHostedMatchStatusRate = a})-      . _Default-      . _Coerce---- | The number of bid responses that were unsuccessful due to timeouts,--- incorrect formatting, etc.-prUnsuccessfulRequestRate :: Lens' PerformanceReport (Maybe Double)-prUnsuccessfulRequestRate-  = lens _prUnsuccessfulRequestRate-      (\ s a -> s{_prUnsuccessfulRequestRate = a})-      . mapping _Coerce---- | The number of bid requests sent to your bidder.-prBidRequestRate :: Lens' PerformanceReport (Maybe Double)-prBidRequestRate-  = lens _prBidRequestRate-      (\ s a -> s{_prBidRequestRate = a})-      . mapping _Coerce---- | The throttled quota limits for this account.-prQuotaThrottledLimit :: Lens' PerformanceReport (Maybe Double)-prQuotaThrottledLimit-  = lens _prQuotaThrottledLimit-      (\ s a -> s{_prQuotaThrottledLimit = a})-      . mapping _Coerce---- | The configured quota limits for this account.-prQuotaConfiguredLimit :: Lens' PerformanceReport (Maybe Double)-prQuotaConfiguredLimit-  = lens _prQuotaConfiguredLimit-      (\ s a -> s{_prQuotaConfiguredLimit = a})-      . mapping _Coerce---- | The number of properly formed bid responses received by our servers--- within the deadline.-prSuccessfulRequestRate :: Lens' PerformanceReport (Maybe Double)-prSuccessfulRequestRate-  = lens _prSuccessfulRequestRate-      (\ s a -> s{_prSuccessfulRequestRate = a})-      . mapping _Coerce---- | The 85th percentile round trip latency(ms) as perceived from Google--- servers for the duration period covered by the report.-prLatency85thPercentile :: Lens' PerformanceReport (Maybe Double)-prLatency85thPercentile-  = lens _prLatency85thPercentile-      (\ s a -> s{_prLatency85thPercentile = a})-      . mapping _Coerce---- | Rate of various prefiltering statuses per match. Please refer to the--- callout-status-codes.txt file for different statuses.-prCalloutStatusRate :: Lens' PerformanceReport [JSONValue]-prCalloutStatusRate-  = lens _prCalloutStatusRate-      (\ s a -> s{_prCalloutStatusRate = a})-      . _Default-      . _Coerce---- | The 50th percentile round trip latency(ms) as perceived from Google--- servers for the duration period covered by the report.-prLatency50thPercentile :: Lens' PerformanceReport (Maybe Double)-prLatency50thPercentile-  = lens _prLatency50thPercentile-      (\ s a -> s{_prLatency50thPercentile = a})-      . mapping _Coerce---- | The number of bid responses with an ad.-prBidRate :: Lens' PerformanceReport (Maybe Double)-prBidRate-  = lens _prBidRate (\ s a -> s{_prBidRate = a}) .-      mapping _Coerce---- | Rate of ads with a given status. Please refer to the--- creative-status-codes.txt file for different statuses.-prCreativeStatusRate :: Lens' PerformanceReport [JSONValue]-prCreativeStatusRate-  = lens _prCreativeStatusRate-      (\ s a -> s{_prCreativeStatusRate = a})-      . _Default-      . _Coerce---- | Rate of various quota account statuses per quota check.-prNoQuotaInRegion :: Lens' PerformanceReport (Maybe Double)-prNoQuotaInRegion-  = lens _prNoQuotaInRegion-      (\ s a -> s{_prNoQuotaInRegion = a})-      . mapping _Coerce---- | The trading location of this data.-prRegion :: Lens' PerformanceReport (Maybe Text)-prRegion = lens _prRegion (\ s a -> s{_prRegion = a})---- | The number of potential queries based on your pretargeting settings.-prInventoryMatchRate :: Lens' PerformanceReport (Maybe Double)-prInventoryMatchRate-  = lens _prInventoryMatchRate-      (\ s a -> s{_prInventoryMatchRate = a})-      . mapping _Coerce---- | Average QPS for pixel match responses from clients.-prPixelMatchResponses :: Lens' PerformanceReport (Maybe Double)-prPixelMatchResponses-  = lens _prPixelMatchResponses-      (\ s a -> s{_prPixelMatchResponses = a})-      . mapping _Coerce---- | The unix timestamp of the starting time of this performance data.-prTimestamp :: Lens' PerformanceReport (Maybe Int64)-prTimestamp-  = lens _prTimestamp (\ s a -> s{_prTimestamp = a}) .-      mapping _Coerce---- | Average QPS for pixel match requests from clients.-prPixelMatchRequests :: Lens' PerformanceReport (Maybe Double)-prPixelMatchRequests-  = lens _prPixelMatchRequests-      (\ s a -> s{_prPixelMatchRequests = a})-      . mapping _Coerce---- | Rate of various quota account statuses per quota check.-prOutOfQuota :: Lens' PerformanceReport (Maybe Double)-prOutOfQuota-  = lens _prOutOfQuota (\ s a -> s{_prOutOfQuota = a})-      . mapping _Coerce--instance FromJSON PerformanceReport where-        parseJSON-          = withObject "PerformanceReport"-              (\ o ->-                 PerformanceReport' <$>-                   (o .:? "filteredBidRate") <*>-                     (o .:? "kind" .!=-                        "adexchangebuyer#performanceReport")-                     <*> (o .:? "latency95thPercentile")-                     <*> (o .:? "cookieMatcherStatusRate" .!= mempty)-                     <*> (o .:? "hostedMatchStatusRate" .!= mempty)-                     <*> (o .:? "unsuccessfulRequestRate")-                     <*> (o .:? "bidRequestRate")-                     <*> (o .:? "quotaThrottledLimit")-                     <*> (o .:? "quotaConfiguredLimit")-                     <*> (o .:? "successfulRequestRate")-                     <*> (o .:? "latency85thPercentile")-                     <*> (o .:? "calloutStatusRate" .!= mempty)-                     <*> (o .:? "latency50thPercentile")-                     <*> (o .:? "bidRate")-                     <*> (o .:? "creativeStatusRate" .!= mempty)-                     <*> (o .:? "noQuotaInRegion")-                     <*> (o .:? "region")-                     <*> (o .:? "inventoryMatchRate")-                     <*> (o .:? "pixelMatchResponses")-                     <*> (o .:? "timestamp")-                     <*> (o .:? "pixelMatchRequests")-                     <*> (o .:? "outOfQuota"))--instance ToJSON PerformanceReport where-        toJSON PerformanceReport'{..}-          = object-              (catMaybes-                 [("filteredBidRate" .=) <$> _prFilteredBidRate,-                  Just ("kind" .= _prKind),-                  ("latency95thPercentile" .=) <$>-                    _prLatency95thPercentile,-                  ("cookieMatcherStatusRate" .=) <$>-                    _prCookieMatcherStatusRate,-                  ("hostedMatchStatusRate" .=) <$>-                    _prHostedMatchStatusRate,-                  ("unsuccessfulRequestRate" .=) <$>-                    _prUnsuccessfulRequestRate,-                  ("bidRequestRate" .=) <$> _prBidRequestRate,-                  ("quotaThrottledLimit" .=) <$>-                    _prQuotaThrottledLimit,-                  ("quotaConfiguredLimit" .=) <$>-                    _prQuotaConfiguredLimit,-                  ("successfulRequestRate" .=) <$>-                    _prSuccessfulRequestRate,-                  ("latency85thPercentile" .=) <$>-                    _prLatency85thPercentile,-                  ("calloutStatusRate" .=) <$> _prCalloutStatusRate,-                  ("latency50thPercentile" .=) <$>-                    _prLatency50thPercentile,-                  ("bidRate" .=) <$> _prBidRate,-                  ("creativeStatusRate" .=) <$> _prCreativeStatusRate,-                  ("noQuotaInRegion" .=) <$> _prNoQuotaInRegion,-                  ("region" .=) <$> _prRegion,-                  ("inventoryMatchRate" .=) <$> _prInventoryMatchRate,-                  ("pixelMatchResponses" .=) <$>-                    _prPixelMatchResponses,-                  ("timestamp" .=) <$> _prTimestamp,-                  ("pixelMatchRequests" .=) <$> _prPixelMatchRequests,-                  ("outOfQuota" .=) <$> _prOutOfQuota])------- /See:/ 'pretargetingConfigExcludedPlacementsItem' smart constructor.-data PretargetingConfigExcludedPlacementsItem =-  PretargetingConfigExcludedPlacementsItem'-    { _pcepiToken :: !(Maybe Text)-    , _pcepiType  :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PretargetingConfigExcludedPlacementsItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pcepiToken'------ * 'pcepiType'-pretargetingConfigExcludedPlacementsItem-    :: PretargetingConfigExcludedPlacementsItem-pretargetingConfigExcludedPlacementsItem =-  PretargetingConfigExcludedPlacementsItem'-    {_pcepiToken = Nothing, _pcepiType = Nothing}----- | The value of the placement. Interpretation depends on the placement--- type, e.g. URL for a site placement, channel name for a channel--- placement, app id for a mobile app placement.-pcepiToken :: Lens' PretargetingConfigExcludedPlacementsItem (Maybe Text)-pcepiToken-  = lens _pcepiToken (\ s a -> s{_pcepiToken = a})---- | The type of the placement.-pcepiType :: Lens' PretargetingConfigExcludedPlacementsItem (Maybe Text)-pcepiType-  = lens _pcepiType (\ s a -> s{_pcepiType = a})--instance FromJSON-           PretargetingConfigExcludedPlacementsItem-         where-        parseJSON-          = withObject-              "PretargetingConfigExcludedPlacementsItem"-              (\ o ->-                 PretargetingConfigExcludedPlacementsItem' <$>-                   (o .:? "token") <*> (o .:? "type"))--instance ToJSON-           PretargetingConfigExcludedPlacementsItem-         where-        toJSON PretargetingConfigExcludedPlacementsItem'{..}-          = object-              (catMaybes-                 [("token" .=) <$> _pcepiToken,-                  ("type" .=) <$> _pcepiType])------- /See:/ 'seller' smart constructor.-data Seller =-  Seller'-    { _sAccountId    :: !(Maybe Text)-    , _sSubAccountId :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Seller' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sAccountId'------ * 'sSubAccountId'-seller-    :: Seller-seller = Seller' {_sAccountId = Nothing, _sSubAccountId = Nothing}----- | The unique id for the seller. The seller fills in this field. The seller--- account id is then available to buyer in the product.-sAccountId :: Lens' Seller (Maybe Text)-sAccountId-  = lens _sAccountId (\ s a -> s{_sAccountId = a})---- | Optional sub-account id for the seller.-sSubAccountId :: Lens' Seller (Maybe Text)-sSubAccountId-  = lens _sSubAccountId-      (\ s a -> s{_sSubAccountId = a})--instance FromJSON Seller where-        parseJSON-          = withObject "Seller"-              (\ o ->-                 Seller' <$>-                   (o .:? "accountId") <*> (o .:? "subAccountId"))--instance ToJSON Seller where-        toJSON Seller'{..}-          = object-              (catMaybes-                 [("accountId" .=) <$> _sAccountId,-                  ("subAccountId" .=) <$> _sSubAccountId])---- | Configuration data for an Ad Exchange buyer account.------ /See:/ 'account' smart constructor.-data Account =-  Account'-    { _aApplyPretargetingToNonGuaranteedDeals :: !(Maybe Bool)-    , _aMaximumTotalQps                       :: !(Maybe (Textual Int32))-    , _aKind                                  :: !Text-    , _aCookieMatchingURL                     :: !(Maybe Text)-    , _aMaximumActiveCreatives                :: !(Maybe (Textual Int32))-    , _aCookieMatchingNid                     :: !(Maybe Text)-    , _aNumberActiveCreatives                 :: !(Maybe (Textual Int32))-    , _aId                                    :: !(Maybe (Textual Int32))-    , _aBidderLocation                        :: !(Maybe [AccountBidderLocationItem])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Account' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'aApplyPretargetingToNonGuaranteedDeals'------ * 'aMaximumTotalQps'------ * 'aKind'------ * 'aCookieMatchingURL'------ * 'aMaximumActiveCreatives'------ * 'aCookieMatchingNid'------ * 'aNumberActiveCreatives'------ * 'aId'------ * 'aBidderLocation'-account-    :: Account-account =-  Account'-    { _aApplyPretargetingToNonGuaranteedDeals = Nothing-    , _aMaximumTotalQps = Nothing-    , _aKind = "adexchangebuyer#account"-    , _aCookieMatchingURL = Nothing-    , _aMaximumActiveCreatives = Nothing-    , _aCookieMatchingNid = Nothing-    , _aNumberActiveCreatives = Nothing-    , _aId = Nothing-    , _aBidderLocation = Nothing-    }----- | When this is false, bid requests that include a deal ID for a private--- auction or preferred deal are always sent to your bidder. When true, all--- active pretargeting configs will be applied to private auctions and--- preferred deals. Programmatic Guaranteed deals (when enabled) are always--- sent to your bidder.-aApplyPretargetingToNonGuaranteedDeals :: Lens' Account (Maybe Bool)-aApplyPretargetingToNonGuaranteedDeals-  = lens _aApplyPretargetingToNonGuaranteedDeals-      (\ s a ->-         s{_aApplyPretargetingToNonGuaranteedDeals = a})---- | The sum of all bidderLocation.maximumQps values cannot exceed this.--- Please contact your technical account manager if you need to change--- this.-aMaximumTotalQps :: Lens' Account (Maybe Int32)-aMaximumTotalQps-  = lens _aMaximumTotalQps-      (\ s a -> s{_aMaximumTotalQps = a})-      . mapping _Coerce---- | Resource type.-aKind :: Lens' Account Text-aKind = lens _aKind (\ s a -> s{_aKind = a})---- | The base URL used in cookie match requests.-aCookieMatchingURL :: Lens' Account (Maybe Text)-aCookieMatchingURL-  = lens _aCookieMatchingURL-      (\ s a -> s{_aCookieMatchingURL = a})---- | The maximum number of active creatives that an account can have, where a--- creative is active if it was inserted or bid with in the last 30 days.--- Please contact your technical account manager if you need to change--- this.-aMaximumActiveCreatives :: Lens' Account (Maybe Int32)-aMaximumActiveCreatives-  = lens _aMaximumActiveCreatives-      (\ s a -> s{_aMaximumActiveCreatives = a})-      . mapping _Coerce---- | The nid parameter value used in cookie match requests. Please contact--- your technical account manager if you need to change this.-aCookieMatchingNid :: Lens' Account (Maybe Text)-aCookieMatchingNid-  = lens _aCookieMatchingNid-      (\ s a -> s{_aCookieMatchingNid = a})---- | The number of creatives that this account inserted or bid with in the--- last 30 days.-aNumberActiveCreatives :: Lens' Account (Maybe Int32)-aNumberActiveCreatives-  = lens _aNumberActiveCreatives-      (\ s a -> s{_aNumberActiveCreatives = a})-      . mapping _Coerce---- | Account id.-aId :: Lens' Account (Maybe Int32)-aId-  = lens _aId (\ s a -> s{_aId = a}) . mapping _Coerce---- | Your bidder locations that have distinct URLs.-aBidderLocation :: Lens' Account [AccountBidderLocationItem]-aBidderLocation-  = lens _aBidderLocation-      (\ s a -> s{_aBidderLocation = a})-      . _Default-      . _Coerce--instance FromJSON Account where-        parseJSON-          = withObject "Account"-              (\ o ->-                 Account' <$>-                   (o .:? "applyPretargetingToNonGuaranteedDeals") <*>-                     (o .:? "maximumTotalQps")-                     <*> (o .:? "kind" .!= "adexchangebuyer#account")-                     <*> (o .:? "cookieMatchingUrl")-                     <*> (o .:? "maximumActiveCreatives")-                     <*> (o .:? "cookieMatchingNid")-                     <*> (o .:? "numberActiveCreatives")-                     <*> (o .:? "id")-                     <*> (o .:? "bidderLocation" .!= mempty))--instance ToJSON Account where-        toJSON Account'{..}-          = object-              (catMaybes-                 [("applyPretargetingToNonGuaranteedDeals" .=) <$>-                    _aApplyPretargetingToNonGuaranteedDeals,-                  ("maximumTotalQps" .=) <$> _aMaximumTotalQps,-                  Just ("kind" .= _aKind),-                  ("cookieMatchingUrl" .=) <$> _aCookieMatchingURL,-                  ("maximumActiveCreatives" .=) <$>-                    _aMaximumActiveCreatives,-                  ("cookieMatchingNid" .=) <$> _aCookieMatchingNid,-                  ("numberActiveCreatives" .=) <$>-                    _aNumberActiveCreatives,-                  ("id" .=) <$> _aId,-                  ("bidderLocation" .=) <$> _aBidderLocation])------- /See:/ 'deleteOrderDealsRequest' smart constructor.-data DeleteOrderDealsRequest =-  DeleteOrderDealsRequest'-    { _dodrUpdateAction           :: !(Maybe Text)-    , _dodrDealIds                :: !(Maybe [Text])-    , _dodrProposalRevisionNumber :: !(Maybe (Textual Int64))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteOrderDealsRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dodrUpdateAction'------ * 'dodrDealIds'------ * 'dodrProposalRevisionNumber'-deleteOrderDealsRequest-    :: DeleteOrderDealsRequest-deleteOrderDealsRequest =-  DeleteOrderDealsRequest'-    { _dodrUpdateAction = Nothing-    , _dodrDealIds = Nothing-    , _dodrProposalRevisionNumber = Nothing-    }----- | Indicates an optional action to take on the proposal-dodrUpdateAction :: Lens' DeleteOrderDealsRequest (Maybe Text)-dodrUpdateAction-  = lens _dodrUpdateAction-      (\ s a -> s{_dodrUpdateAction = a})---- | List of deals to delete for a given proposal-dodrDealIds :: Lens' DeleteOrderDealsRequest [Text]-dodrDealIds-  = lens _dodrDealIds (\ s a -> s{_dodrDealIds = a}) .-      _Default-      . _Coerce---- | The last known proposal revision number.-dodrProposalRevisionNumber :: Lens' DeleteOrderDealsRequest (Maybe Int64)-dodrProposalRevisionNumber-  = lens _dodrProposalRevisionNumber-      (\ s a -> s{_dodrProposalRevisionNumber = a})-      . mapping _Coerce--instance FromJSON DeleteOrderDealsRequest where-        parseJSON-          = withObject "DeleteOrderDealsRequest"-              (\ o ->-                 DeleteOrderDealsRequest' <$>-                   (o .:? "updateAction") <*>-                     (o .:? "dealIds" .!= mempty)-                     <*> (o .:? "proposalRevisionNumber"))--instance ToJSON DeleteOrderDealsRequest where-        toJSON DeleteOrderDealsRequest'{..}-          = object-              (catMaybes-                 [("updateAction" .=) <$> _dodrUpdateAction,-                  ("dealIds" .=) <$> _dodrDealIds,-                  ("proposalRevisionNumber" .=) <$>-                    _dodrProposalRevisionNumber])------- /See:/ 'contactInformation' smart constructor.-data ContactInformation =-  ContactInformation'-    { _ciEmail :: !(Maybe Text)-    , _ciName  :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ContactInformation' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ciEmail'------ * 'ciName'-contactInformation-    :: ContactInformation-contactInformation = ContactInformation' {_ciEmail = Nothing, _ciName = Nothing}----- | Email address of the contact.-ciEmail :: Lens' ContactInformation (Maybe Text)-ciEmail = lens _ciEmail (\ s a -> s{_ciEmail = a})---- | The name of the contact.-ciName :: Lens' ContactInformation (Maybe Text)-ciName = lens _ciName (\ s a -> s{_ciName = a})--instance FromJSON ContactInformation where-        parseJSON-          = withObject "ContactInformation"-              (\ o ->-                 ContactInformation' <$>-                   (o .:? "email") <*> (o .:? "name"))--instance ToJSON ContactInformation where-        toJSON ContactInformation'{..}-          = object-              (catMaybes-                 [("email" .=) <$> _ciEmail, ("name" .=) <$> _ciName])---- | A smaller image, for the advertiser logo.------ /See:/ 'creativeNATiveAdLogo' smart constructor.-data CreativeNATiveAdLogo =-  CreativeNATiveAdLogo'-    { _cnatalHeight :: !(Maybe (Textual Int32))-    , _cnatalURL    :: !(Maybe Text)-    , _cnatalWidth  :: !(Maybe (Textual Int32))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CreativeNATiveAdLogo' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cnatalHeight'------ * 'cnatalURL'------ * 'cnatalWidth'-creativeNATiveAdLogo-    :: CreativeNATiveAdLogo-creativeNATiveAdLogo =-  CreativeNATiveAdLogo'-    {_cnatalHeight = Nothing, _cnatalURL = Nothing, _cnatalWidth = Nothing}---cnatalHeight :: Lens' CreativeNATiveAdLogo (Maybe Int32)-cnatalHeight-  = lens _cnatalHeight (\ s a -> s{_cnatalHeight = a})-      . mapping _Coerce--cnatalURL :: Lens' CreativeNATiveAdLogo (Maybe Text)-cnatalURL-  = lens _cnatalURL (\ s a -> s{_cnatalURL = a})--cnatalWidth :: Lens' CreativeNATiveAdLogo (Maybe Int32)-cnatalWidth-  = lens _cnatalWidth (\ s a -> s{_cnatalWidth = a}) .-      mapping _Coerce--instance FromJSON CreativeNATiveAdLogo where-        parseJSON-          = withObject "CreativeNATiveAdLogo"-              (\ o ->-                 CreativeNATiveAdLogo' <$>-                   (o .:? "height") <*> (o .:? "url") <*>-                     (o .:? "width"))--instance ToJSON CreativeNATiveAdLogo where-        toJSON CreativeNATiveAdLogo'{..}-          = object-              (catMaybes-                 [("height" .=) <$> _cnatalHeight,-                  ("url" .=) <$> _cnatalURL,-                  ("width" .=) <$> _cnatalWidth])------- /See:/ 'getOrderDealsResponse' smart constructor.-newtype GetOrderDealsResponse =-  GetOrderDealsResponse'-    { _godrDeals :: Maybe [MarketplaceDeal]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GetOrderDealsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'godrDeals'-getOrderDealsResponse-    :: GetOrderDealsResponse-getOrderDealsResponse = GetOrderDealsResponse' {_godrDeals = Nothing}----- | List of deals for the proposal-godrDeals :: Lens' GetOrderDealsResponse [MarketplaceDeal]-godrDeals-  = lens _godrDeals (\ s a -> s{_godrDeals = a}) .-      _Default-      . _Coerce--instance FromJSON GetOrderDealsResponse where-        parseJSON-          = withObject "GetOrderDealsResponse"-              (\ o ->-                 GetOrderDealsResponse' <$>-                   (o .:? "deals" .!= mempty))--instance ToJSON GetOrderDealsResponse where-        toJSON GetOrderDealsResponse'{..}-          = object (catMaybes [("deals" .=) <$> _godrDeals])---- | The configuration data for an Ad Exchange performance report list.------ /See:/ 'performanceReportList' smart constructor.-data PerformanceReportList =-  PerformanceReportList'-    { _prlKind              :: !Text-    , _prlPerformanceReport :: !(Maybe [PerformanceReport])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PerformanceReportList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'prlKind'------ * 'prlPerformanceReport'-performanceReportList-    :: PerformanceReportList-performanceReportList =-  PerformanceReportList'-    { _prlKind = "adexchangebuyer#performanceReportList"-    , _prlPerformanceReport = Nothing-    }----- | Resource type.-prlKind :: Lens' PerformanceReportList Text-prlKind = lens _prlKind (\ s a -> s{_prlKind = a})---- | A list of performance reports relevant for the account.-prlPerformanceReport :: Lens' PerformanceReportList [PerformanceReport]-prlPerformanceReport-  = lens _prlPerformanceReport-      (\ s a -> s{_prlPerformanceReport = a})-      . _Default-      . _Coerce--instance FromJSON PerformanceReportList where-        parseJSON-          = withObject "PerformanceReportList"-              (\ o ->-                 PerformanceReportList' <$>-                   (o .:? "kind" .!=-                      "adexchangebuyer#performanceReportList")-                     <*> (o .:? "performanceReport" .!= mempty))--instance ToJSON PerformanceReportList where-        toJSON PerformanceReportList'{..}-          = object-              (catMaybes-                 [Just ("kind" .= _prlKind),-                  ("performanceReport" .=) <$> _prlPerformanceReport])------- /See:/ 'pretargetingConfig' smart constructor.-data PretargetingConfig =-  PretargetingConfig'-    { _pcPlatforms                     :: !(Maybe [Text])-    , _pcMobileCarriers                :: !(Maybe [Textual Int64])-    , _pcVendorTypes                   :: !(Maybe [Textual Int64])-    , _pcExcludedGeoCriteriaIds        :: !(Maybe [Textual Int64])-    , _pcSupportedCreativeAttributes   :: !(Maybe [Textual Int64])-    , _pcUserLists                     :: !(Maybe [Textual Int64])-    , _pcKind                          :: !Text-    , _pcExcludedPlacements            :: !(Maybe [PretargetingConfigExcludedPlacementsItem])-    , _pcUserIdentifierDataRequired    :: !(Maybe [Text])-    , _pcMinimumViewabilityDecile      :: !(Maybe (Textual Int32))-    , _pcMobileDevices                 :: !(Maybe [Textual Int64])-    , _pcLanguages                     :: !(Maybe [Text])-    , _pcVerticals                     :: !(Maybe [Textual Int64])-    , _pcVideoPlayerSizes              :: !(Maybe [PretargetingConfigVideoPlayerSizesItem])-    , _pcConfigId                      :: !(Maybe (Textual Int64))-    , _pcPlacements                    :: !(Maybe [PretargetingConfigPlacementsItem])-    , _pcExcludedUserLists             :: !(Maybe [Textual Int64])-    , _pcConfigName                    :: !(Maybe Text)-    , _pcGeoCriteriaIds                :: !(Maybe [Textual Int64])-    , _pcDimensions                    :: !(Maybe [PretargetingConfigDimensionsItem])-    , _pcExcludedVerticals             :: !(Maybe [Textual Int64])-    , _pcCreativeType                  :: !(Maybe [Text])-    , _pcIsActive                      :: !(Maybe Bool)-    , _pcExcludedContentLabels         :: !(Maybe [Textual Int64])-    , _pcBillingId                     :: !(Maybe (Textual Int64))-    , _pcMobileOperatingSystemVersions :: !(Maybe [Textual Int64])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PretargetingConfig' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pcPlatforms'------ * 'pcMobileCarriers'------ * 'pcVendorTypes'------ * 'pcExcludedGeoCriteriaIds'------ * 'pcSupportedCreativeAttributes'------ * 'pcUserLists'------ * 'pcKind'------ * 'pcExcludedPlacements'------ * 'pcUserIdentifierDataRequired'------ * 'pcMinimumViewabilityDecile'------ * 'pcMobileDevices'------ * 'pcLanguages'------ * 'pcVerticals'------ * 'pcVideoPlayerSizes'------ * 'pcConfigId'------ * 'pcPlacements'------ * 'pcExcludedUserLists'------ * 'pcConfigName'------ * 'pcGeoCriteriaIds'------ * 'pcDimensions'------ * 'pcExcludedVerticals'------ * 'pcCreativeType'------ * 'pcIsActive'------ * 'pcExcludedContentLabels'------ * 'pcBillingId'------ * 'pcMobileOperatingSystemVersions'-pretargetingConfig-    :: PretargetingConfig-pretargetingConfig =-  PretargetingConfig'-    { _pcPlatforms = Nothing-    , _pcMobileCarriers = Nothing-    , _pcVendorTypes = Nothing-    , _pcExcludedGeoCriteriaIds = Nothing-    , _pcSupportedCreativeAttributes = Nothing-    , _pcUserLists = Nothing-    , _pcKind = "adexchangebuyer#pretargetingConfig"-    , _pcExcludedPlacements = Nothing-    , _pcUserIdentifierDataRequired = Nothing-    , _pcMinimumViewabilityDecile = Nothing-    , _pcMobileDevices = Nothing-    , _pcLanguages = Nothing-    , _pcVerticals = Nothing-    , _pcVideoPlayerSizes = Nothing-    , _pcConfigId = Nothing-    , _pcPlacements = Nothing-    , _pcExcludedUserLists = Nothing-    , _pcConfigName = Nothing-    , _pcGeoCriteriaIds = Nothing-    , _pcDimensions = Nothing-    , _pcExcludedVerticals = Nothing-    , _pcCreativeType = Nothing-    , _pcIsActive = Nothing-    , _pcExcludedContentLabels = Nothing-    , _pcBillingId = Nothing-    , _pcMobileOperatingSystemVersions = Nothing-    }----- | Requests matching any of these platforms will match. Possible values are--- PRETARGETING_PLATFORM_MOBILE, PRETARGETING_PLATFORM_DESKTOP, and--- PRETARGETING_PLATFORM_TABLET.-pcPlatforms :: Lens' PretargetingConfig [Text]-pcPlatforms-  = lens _pcPlatforms (\ s a -> s{_pcPlatforms = a}) .-      _Default-      . _Coerce---- | Requests containing any of these mobile carrier ids will match. Values--- are from mobile-carriers.csv in the downloadable files section.-pcMobileCarriers :: Lens' PretargetingConfig [Int64]-pcMobileCarriers-  = lens _pcMobileCarriers-      (\ s a -> s{_pcMobileCarriers = a})-      . _Default-      . _Coerce---- | Requests that allow any of these vendor ids will match. Values are from--- vendors.txt in the downloadable files section.-pcVendorTypes :: Lens' PretargetingConfig [Int64]-pcVendorTypes-  = lens _pcVendorTypes-      (\ s a -> s{_pcVendorTypes = a})-      . _Default-      . _Coerce---- | Requests containing any of these geo criteria ids will not match.-pcExcludedGeoCriteriaIds :: Lens' PretargetingConfig [Int64]-pcExcludedGeoCriteriaIds-  = lens _pcExcludedGeoCriteriaIds-      (\ s a -> s{_pcExcludedGeoCriteriaIds = a})-      . _Default-      . _Coerce---- | Creative attributes should be declared here if all creatives--- corresponding to this pretargeting configuration have that creative--- attribute. Values are from pretargetable-creative-attributes.txt in the--- downloadable files section.-pcSupportedCreativeAttributes :: Lens' PretargetingConfig [Int64]-pcSupportedCreativeAttributes-  = lens _pcSupportedCreativeAttributes-      (\ s a -> s{_pcSupportedCreativeAttributes = a})-      . _Default-      . _Coerce---- | Requests containing any of these user list ids will match.-pcUserLists :: Lens' PretargetingConfig [Int64]-pcUserLists-  = lens _pcUserLists (\ s a -> s{_pcUserLists = a}) .-      _Default-      . _Coerce---- | The kind of the resource, i.e. \"adexchangebuyer#pretargetingConfig\".-pcKind :: Lens' PretargetingConfig Text-pcKind = lens _pcKind (\ s a -> s{_pcKind = a})---- | Requests containing any of these placements will not match.-pcExcludedPlacements :: Lens' PretargetingConfig [PretargetingConfigExcludedPlacementsItem]-pcExcludedPlacements-  = lens _pcExcludedPlacements-      (\ s a -> s{_pcExcludedPlacements = a})-      . _Default-      . _Coerce---- | Requests containing the specified type of user data will match. Possible--- values are HOSTED_MATCH_DATA, which means the request is--- cookie-targetable and has a match in the buyer\'s hosted match table,--- and COOKIE_OR_IDFA, which means the request has either a targetable--- cookie or an iOS IDFA.-pcUserIdentifierDataRequired :: Lens' PretargetingConfig [Text]-pcUserIdentifierDataRequired-  = lens _pcUserIdentifierDataRequired-      (\ s a -> s{_pcUserIdentifierDataRequired = a})-      . _Default-      . _Coerce---- | Requests where the predicted viewability is below the specified decile--- will not match. E.g. if the buyer sets this value to 5, requests from--- slots where the predicted viewability is below 50% will not match. If--- the predicted viewability is unknown this field will be ignored.-pcMinimumViewabilityDecile :: Lens' PretargetingConfig (Maybe Int32)-pcMinimumViewabilityDecile-  = lens _pcMinimumViewabilityDecile-      (\ s a -> s{_pcMinimumViewabilityDecile = a})-      . mapping _Coerce---- | Requests containing any of these mobile device ids will match. Values--- are from mobile-devices.csv in the downloadable files section.-pcMobileDevices :: Lens' PretargetingConfig [Int64]-pcMobileDevices-  = lens _pcMobileDevices-      (\ s a -> s{_pcMobileDevices = a})-      . _Default-      . _Coerce---- | Request containing any of these language codes will match.-pcLanguages :: Lens' PretargetingConfig [Text]-pcLanguages-  = lens _pcLanguages (\ s a -> s{_pcLanguages = a}) .-      _Default-      . _Coerce---- | Requests containing any of these vertical ids will match.-pcVerticals :: Lens' PretargetingConfig [Int64]-pcVerticals-  = lens _pcVerticals (\ s a -> s{_pcVerticals = a}) .-      _Default-      . _Coerce---- | Video requests satisfying any of these player size constraints will--- match.-pcVideoPlayerSizes :: Lens' PretargetingConfig [PretargetingConfigVideoPlayerSizesItem]-pcVideoPlayerSizes-  = lens _pcVideoPlayerSizes-      (\ s a -> s{_pcVideoPlayerSizes = a})-      . _Default-      . _Coerce---- | The config id; generated automatically. Leave this field blank for--- insert requests.-pcConfigId :: Lens' PretargetingConfig (Maybe Int64)-pcConfigId-  = lens _pcConfigId (\ s a -> s{_pcConfigId = a}) .-      mapping _Coerce---- | Requests containing any of these placements will match.-pcPlacements :: Lens' PretargetingConfig [PretargetingConfigPlacementsItem]-pcPlacements-  = lens _pcPlacements (\ s a -> s{_pcPlacements = a})-      . _Default-      . _Coerce---- | Requests containing any of these users list ids will not match.-pcExcludedUserLists :: Lens' PretargetingConfig [Int64]-pcExcludedUserLists-  = lens _pcExcludedUserLists-      (\ s a -> s{_pcExcludedUserLists = a})-      . _Default-      . _Coerce---- | The name of the config. Must be unique. Required for all requests.-pcConfigName :: Lens' PretargetingConfig (Maybe Text)-pcConfigName-  = lens _pcConfigName (\ s a -> s{_pcConfigName = a})---- | Requests containing any of these geo criteria ids will match.-pcGeoCriteriaIds :: Lens' PretargetingConfig [Int64]-pcGeoCriteriaIds-  = lens _pcGeoCriteriaIds-      (\ s a -> s{_pcGeoCriteriaIds = a})-      . _Default-      . _Coerce---- | Requests which allow one of these (width, height) pairs will match. All--- pairs must be supported ad dimensions.-pcDimensions :: Lens' PretargetingConfig [PretargetingConfigDimensionsItem]-pcDimensions-  = lens _pcDimensions (\ s a -> s{_pcDimensions = a})-      . _Default-      . _Coerce---- | Requests containing any of these vertical ids will not match. Values are--- from the publisher-verticals.txt file in the downloadable files section.-pcExcludedVerticals :: Lens' PretargetingConfig [Int64]-pcExcludedVerticals-  = lens _pcExcludedVerticals-      (\ s a -> s{_pcExcludedVerticals = a})-      . _Default-      . _Coerce---- | List must contain exactly one of PRETARGETING_CREATIVE_TYPE_HTML or--- PRETARGETING_CREATIVE_TYPE_VIDEO.-pcCreativeType :: Lens' PretargetingConfig [Text]-pcCreativeType-  = lens _pcCreativeType-      (\ s a -> s{_pcCreativeType = a})-      . _Default-      . _Coerce---- | Whether this config is active. Required for all requests.-pcIsActive :: Lens' PretargetingConfig (Maybe Bool)-pcIsActive-  = lens _pcIsActive (\ s a -> s{_pcIsActive = a})---- | Requests with any of these content labels will not match. Values are--- from content-labels.txt in the downloadable files section.-pcExcludedContentLabels :: Lens' PretargetingConfig [Int64]-pcExcludedContentLabels-  = lens _pcExcludedContentLabels-      (\ s a -> s{_pcExcludedContentLabels = a})-      . _Default-      . _Coerce---- | The id for billing purposes, provided for reference. Leave this field--- blank for insert requests; the id will be generated automatically.-pcBillingId :: Lens' PretargetingConfig (Maybe Int64)-pcBillingId-  = lens _pcBillingId (\ s a -> s{_pcBillingId = a}) .-      mapping _Coerce---- | Requests containing any of these mobile operating system version ids--- will match. Values are from mobile-os.csv in the downloadable files--- section.-pcMobileOperatingSystemVersions :: Lens' PretargetingConfig [Int64]-pcMobileOperatingSystemVersions-  = lens _pcMobileOperatingSystemVersions-      (\ s a -> s{_pcMobileOperatingSystemVersions = a})-      . _Default-      . _Coerce--instance FromJSON PretargetingConfig where-        parseJSON-          = withObject "PretargetingConfig"-              (\ o ->-                 PretargetingConfig' <$>-                   (o .:? "platforms" .!= mempty) <*>-                     (o .:? "mobileCarriers" .!= mempty)-                     <*> (o .:? "vendorTypes" .!= mempty)-                     <*> (o .:? "excludedGeoCriteriaIds" .!= mempty)-                     <*> (o .:? "supportedCreativeAttributes" .!= mempty)-                     <*> (o .:? "userLists" .!= mempty)-                     <*>-                     (o .:? "kind" .!=-                        "adexchangebuyer#pretargetingConfig")-                     <*> (o .:? "excludedPlacements" .!= mempty)-                     <*> (o .:? "userIdentifierDataRequired" .!= mempty)-                     <*> (o .:? "minimumViewabilityDecile")-                     <*> (o .:? "mobileDevices" .!= mempty)-                     <*> (o .:? "languages" .!= mempty)-                     <*> (o .:? "verticals" .!= mempty)-                     <*> (o .:? "videoPlayerSizes" .!= mempty)-                     <*> (o .:? "configId")-                     <*> (o .:? "placements" .!= mempty)-                     <*> (o .:? "excludedUserLists" .!= mempty)-                     <*> (o .:? "configName")-                     <*> (o .:? "geoCriteriaIds" .!= mempty)-                     <*> (o .:? "dimensions" .!= mempty)-                     <*> (o .:? "excludedVerticals" .!= mempty)-                     <*> (o .:? "creativeType" .!= mempty)-                     <*> (o .:? "isActive")-                     <*> (o .:? "excludedContentLabels" .!= mempty)-                     <*> (o .:? "billingId")-                     <*>-                     (o .:? "mobileOperatingSystemVersions" .!= mempty))--instance ToJSON PretargetingConfig where-        toJSON PretargetingConfig'{..}-          = object-              (catMaybes-                 [("platforms" .=) <$> _pcPlatforms,-                  ("mobileCarriers" .=) <$> _pcMobileCarriers,-                  ("vendorTypes" .=) <$> _pcVendorTypes,-                  ("excludedGeoCriteriaIds" .=) <$>-                    _pcExcludedGeoCriteriaIds,-                  ("supportedCreativeAttributes" .=) <$>-                    _pcSupportedCreativeAttributes,-                  ("userLists" .=) <$> _pcUserLists,-                  Just ("kind" .= _pcKind),-                  ("excludedPlacements" .=) <$> _pcExcludedPlacements,-                  ("userIdentifierDataRequired" .=) <$>-                    _pcUserIdentifierDataRequired,-                  ("minimumViewabilityDecile" .=) <$>-                    _pcMinimumViewabilityDecile,-                  ("mobileDevices" .=) <$> _pcMobileDevices,-                  ("languages" .=) <$> _pcLanguages,-                  ("verticals" .=) <$> _pcVerticals,-                  ("videoPlayerSizes" .=) <$> _pcVideoPlayerSizes,-                  ("configId" .=) <$> _pcConfigId,-                  ("placements" .=) <$> _pcPlacements,-                  ("excludedUserLists" .=) <$> _pcExcludedUserLists,-                  ("configName" .=) <$> _pcConfigName,-                  ("geoCriteriaIds" .=) <$> _pcGeoCriteriaIds,-                  ("dimensions" .=) <$> _pcDimensions,-                  ("excludedVerticals" .=) <$> _pcExcludedVerticals,-                  ("creativeType" .=) <$> _pcCreativeType,-                  ("isActive" .=) <$> _pcIsActive,-                  ("excludedContentLabels" .=) <$>-                    _pcExcludedContentLabels,-                  ("billingId" .=) <$> _pcBillingId,-                  ("mobileOperatingSystemVersions" .=) <$>-                    _pcMobileOperatingSystemVersions])---- | The filtering reasons for the creative. Read-only. This field should not--- be set in requests.------ /See:/ 'creativeFilteringReasons' smart constructor.-data CreativeFilteringReasons =-  CreativeFilteringReasons'-    { _cfrReasons :: !(Maybe [CreativeFilteringReasonsReasonsItem])-    , _cfrDate    :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CreativeFilteringReasons' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cfrReasons'------ * 'cfrDate'-creativeFilteringReasons-    :: CreativeFilteringReasons-creativeFilteringReasons =-  CreativeFilteringReasons' {_cfrReasons = Nothing, _cfrDate = Nothing}----- | The filtering reasons.-cfrReasons :: Lens' CreativeFilteringReasons [CreativeFilteringReasonsReasonsItem]-cfrReasons-  = lens _cfrReasons (\ s a -> s{_cfrReasons = a}) .-      _Default-      . _Coerce---- | The date in ISO 8601 format for the data. The data is collected from--- 00:00:00 to 23:59:59 in PST.-cfrDate :: Lens' CreativeFilteringReasons (Maybe Text)-cfrDate = lens _cfrDate (\ s a -> s{_cfrDate = a})--instance FromJSON CreativeFilteringReasons where-        parseJSON-          = withObject "CreativeFilteringReasons"-              (\ o ->-                 CreativeFilteringReasons' <$>-                   (o .:? "reasons" .!= mempty) <*> (o .:? "date"))--instance ToJSON CreativeFilteringReasons where-        toJSON CreativeFilteringReasons'{..}-          = object-              (catMaybes-                 [("reasons" .=) <$> _cfrReasons,-                  ("date" .=) <$> _cfrDate])---- | Next Id: 7------ /See:/ 'targetingValueCreativeSize' smart constructor.-data TargetingValueCreativeSize =-  TargetingValueCreativeSize'-    { _tvcsSize             :: !(Maybe TargetingValueSize)-    , _tvcsCompanionSizes   :: !(Maybe [TargetingValueSize])-    , _tvcsSkippableAdType  :: !(Maybe Text)-    , _tvcsCreativeSizeType :: !(Maybe Text)-    , _tvcsAllowedFormats   :: !(Maybe [Text])-    , _tvcsNATiveTemplate   :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TargetingValueCreativeSize' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tvcsSize'------ * 'tvcsCompanionSizes'------ * 'tvcsSkippableAdType'------ * 'tvcsCreativeSizeType'------ * 'tvcsAllowedFormats'------ * 'tvcsNATiveTemplate'-targetingValueCreativeSize-    :: TargetingValueCreativeSize-targetingValueCreativeSize =-  TargetingValueCreativeSize'-    { _tvcsSize = Nothing-    , _tvcsCompanionSizes = Nothing-    , _tvcsSkippableAdType = Nothing-    , _tvcsCreativeSizeType = Nothing-    , _tvcsAllowedFormats = Nothing-    , _tvcsNATiveTemplate = Nothing-    }----- | For regular or video creative size type, specifies the size of the--- creative.-tvcsSize :: Lens' TargetingValueCreativeSize (Maybe TargetingValueSize)-tvcsSize = lens _tvcsSize (\ s a -> s{_tvcsSize = a})---- | For video size type, the list of companion sizes.-tvcsCompanionSizes :: Lens' TargetingValueCreativeSize [TargetingValueSize]-tvcsCompanionSizes-  = lens _tvcsCompanionSizes-      (\ s a -> s{_tvcsCompanionSizes = a})-      . _Default-      . _Coerce---- | The skippable ad type for video size.-tvcsSkippableAdType :: Lens' TargetingValueCreativeSize (Maybe Text)-tvcsSkippableAdType-  = lens _tvcsSkippableAdType-      (\ s a -> s{_tvcsSkippableAdType = a})---- | The Creative size type.-tvcsCreativeSizeType :: Lens' TargetingValueCreativeSize (Maybe Text)-tvcsCreativeSizeType-  = lens _tvcsCreativeSizeType-      (\ s a -> s{_tvcsCreativeSizeType = a})---- | The formats allowed by the publisher.-tvcsAllowedFormats :: Lens' TargetingValueCreativeSize [Text]-tvcsAllowedFormats-  = lens _tvcsAllowedFormats-      (\ s a -> s{_tvcsAllowedFormats = a})-      . _Default-      . _Coerce---- | The native template for native ad.-tvcsNATiveTemplate :: Lens' TargetingValueCreativeSize (Maybe Text)-tvcsNATiveTemplate-  = lens _tvcsNATiveTemplate-      (\ s a -> s{_tvcsNATiveTemplate = a})--instance FromJSON TargetingValueCreativeSize where-        parseJSON-          = withObject "TargetingValueCreativeSize"-              (\ o ->-                 TargetingValueCreativeSize' <$>-                   (o .:? "size") <*>-                     (o .:? "companionSizes" .!= mempty)-                     <*> (o .:? "skippableAdType")-                     <*> (o .:? "creativeSizeType")-                     <*> (o .:? "allowedFormats" .!= mempty)-                     <*> (o .:? "nativeTemplate"))--instance ToJSON TargetingValueCreativeSize where-        toJSON TargetingValueCreativeSize'{..}-          = object-              (catMaybes-                 [("size" .=) <$> _tvcsSize,-                  ("companionSizes" .=) <$> _tvcsCompanionSizes,-                  ("skippableAdType" .=) <$> _tvcsSkippableAdType,-                  ("creativeSizeType" .=) <$> _tvcsCreativeSizeType,-                  ("allowedFormats" .=) <$> _tvcsAllowedFormats,-                  ("nativeTemplate" .=) <$> _tvcsNATiveTemplate])------- /See:/ 'dealTermsGuaranteedFixedPriceTermsBillingInfo' smart constructor.-data DealTermsGuaranteedFixedPriceTermsBillingInfo =-  DealTermsGuaranteedFixedPriceTermsBillingInfo'-    { _dtgfptbiCurrencyConversionTimeMs   :: !(Maybe (Textual Int64))-    , _dtgfptbiDfpLineItemId              :: !(Maybe (Textual Int64))-    , _dtgfptbiPrice                      :: !(Maybe Price)-    , _dtgfptbiOriginalContractedQuantity :: !(Maybe (Textual Int64))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DealTermsGuaranteedFixedPriceTermsBillingInfo' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dtgfptbiCurrencyConversionTimeMs'------ * 'dtgfptbiDfpLineItemId'------ * 'dtgfptbiPrice'------ * 'dtgfptbiOriginalContractedQuantity'-dealTermsGuaranteedFixedPriceTermsBillingInfo-    :: DealTermsGuaranteedFixedPriceTermsBillingInfo-dealTermsGuaranteedFixedPriceTermsBillingInfo =-  DealTermsGuaranteedFixedPriceTermsBillingInfo'-    { _dtgfptbiCurrencyConversionTimeMs = Nothing-    , _dtgfptbiDfpLineItemId = Nothing-    , _dtgfptbiPrice = Nothing-    , _dtgfptbiOriginalContractedQuantity = Nothing-    }----- | The timestamp (in ms since epoch) when the original reservation price--- for the deal was first converted to DFP currency. This is used to--- convert the contracted price into buyer\'s currency without discrepancy.-dtgfptbiCurrencyConversionTimeMs :: Lens' DealTermsGuaranteedFixedPriceTermsBillingInfo (Maybe Int64)-dtgfptbiCurrencyConversionTimeMs-  = lens _dtgfptbiCurrencyConversionTimeMs-      (\ s a -> s{_dtgfptbiCurrencyConversionTimeMs = a})-      . mapping _Coerce---- | The DFP line item id associated with this deal. For features like CPD,--- buyers can retrieve the DFP line item for billing reconciliation.-dtgfptbiDfpLineItemId :: Lens' DealTermsGuaranteedFixedPriceTermsBillingInfo (Maybe Int64)-dtgfptbiDfpLineItemId-  = lens _dtgfptbiDfpLineItemId-      (\ s a -> s{_dtgfptbiDfpLineItemId = a})-      . mapping _Coerce---- | The original reservation price for the deal, if the currency code is--- different from the one used in negotiation.-dtgfptbiPrice :: Lens' DealTermsGuaranteedFixedPriceTermsBillingInfo (Maybe Price)-dtgfptbiPrice-  = lens _dtgfptbiPrice-      (\ s a -> s{_dtgfptbiPrice = a})---- | The original contracted quantity (# impressions) for this deal. To--- ensure delivery, sometimes the publisher will book the deal with a--- impression buffer, such that guaranteed_looks is greater than the--- contracted quantity. However clients are billed using the original--- contracted quantity.-dtgfptbiOriginalContractedQuantity :: Lens' DealTermsGuaranteedFixedPriceTermsBillingInfo (Maybe Int64)-dtgfptbiOriginalContractedQuantity-  = lens _dtgfptbiOriginalContractedQuantity-      (\ s a -> s{_dtgfptbiOriginalContractedQuantity = a})-      . mapping _Coerce--instance FromJSON-           DealTermsGuaranteedFixedPriceTermsBillingInfo-         where-        parseJSON-          = withObject-              "DealTermsGuaranteedFixedPriceTermsBillingInfo"-              (\ o ->-                 DealTermsGuaranteedFixedPriceTermsBillingInfo' <$>-                   (o .:? "currencyConversionTimeMs") <*>-                     (o .:? "dfpLineItemId")-                     <*> (o .:? "price")-                     <*> (o .:? "originalContractedQuantity"))--instance ToJSON-           DealTermsGuaranteedFixedPriceTermsBillingInfo-         where-        toJSON-          DealTermsGuaranteedFixedPriceTermsBillingInfo'{..}-          = object-              (catMaybes-                 [("currencyConversionTimeMs" .=) <$>-                    _dtgfptbiCurrencyConversionTimeMs,-                  ("dfpLineItemId" .=) <$> _dtgfptbiDfpLineItemId,-                  ("price" .=) <$> _dtgfptbiPrice,-                  ("originalContractedQuantity" .=) <$>-                    _dtgfptbiOriginalContractedQuantity])------- /See:/ 'getPublisherProFilesByAccountIdResponse' smart constructor.-newtype GetPublisherProFilesByAccountIdResponse =-  GetPublisherProFilesByAccountIdResponse'-    { _gppfbairProFiles :: Maybe [PublisherProFileAPIProto]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GetPublisherProFilesByAccountIdResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gppfbairProFiles'-getPublisherProFilesByAccountIdResponse-    :: GetPublisherProFilesByAccountIdResponse-getPublisherProFilesByAccountIdResponse =-  GetPublisherProFilesByAccountIdResponse' {_gppfbairProFiles = Nothing}----- | Profiles for the requested publisher-gppfbairProFiles :: Lens' GetPublisherProFilesByAccountIdResponse [PublisherProFileAPIProto]-gppfbairProFiles-  = lens _gppfbairProFiles-      (\ s a -> s{_gppfbairProFiles = a})-      . _Default-      . _Coerce--instance FromJSON-           GetPublisherProFilesByAccountIdResponse-         where-        parseJSON-          = withObject-              "GetPublisherProFilesByAccountIdResponse"-              (\ o ->-                 GetPublisherProFilesByAccountIdResponse' <$>-                   (o .:? "profiles" .!= mempty))--instance ToJSON-           GetPublisherProFilesByAccountIdResponse-         where-        toJSON GetPublisherProFilesByAccountIdResponse'{..}-          = object-              (catMaybes [("profiles" .=) <$> _gppfbairProFiles])---- | Represents a proposal in the marketplace. A proposal is the unit of--- negotiation between a seller and a buyer and contains deals which are--- served. Each field in a proposal can have one of the following setting:--- (readonly) - It is an error to try and set this field. (buyer-readonly)--- - Only the seller can set this field. (seller-readonly) - Only the buyer--- can set this field. (updatable) - The field is updatable at all times by--- either buyer or the seller.------ /See:/ 'proposal' smart constructor.-data Proposal =-  Proposal'-    { _pBuyerPrivateData           :: !(Maybe PrivateData)-    , _pIsSetupComplete            :: !(Maybe Bool)-    , _pInventorySource            :: !(Maybe Text)-    , _pBuyerContacts              :: !(Maybe [ContactInformation])-    , _pKind                       :: !Text-    , _pOriginatorRole             :: !(Maybe Text)-    , _pDBmAdvertiserIds           :: !(Maybe [Text])-    , _pRevisionNumber             :: !(Maybe (Textual Int64))-    , _pBilledBuyer                :: !(Maybe Buyer)-    , _pPrivateAuctionId           :: !(Maybe Text)-    , _pIsRenegotiating            :: !(Maybe Bool)-    , _pHasSellerSignedOff         :: !(Maybe Bool)-    , _pSeller                     :: !(Maybe Seller)-    , _pProposalId                 :: !(Maybe Text)-    , _pName                       :: !(Maybe Text)-    , _pSellerContacts             :: !(Maybe [ContactInformation])-    , _pLabels                     :: !(Maybe [MarketplaceLabel])-    , _pRevisionTimeMs             :: !(Maybe (Textual Int64))-    , _pProposalState              :: !(Maybe Text)-    , _pLastUpdaterOrCommentorRole :: !(Maybe Text)-    , _pNegotiationId              :: !(Maybe Text)-    , _pHasBuyerSignedOff          :: !(Maybe Bool)-    , _pBuyer                      :: !(Maybe Buyer)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Proposal' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pBuyerPrivateData'------ * 'pIsSetupComplete'------ * 'pInventorySource'------ * 'pBuyerContacts'------ * 'pKind'------ * 'pOriginatorRole'------ * 'pDBmAdvertiserIds'------ * 'pRevisionNumber'------ * 'pBilledBuyer'------ * 'pPrivateAuctionId'------ * 'pIsRenegotiating'------ * 'pHasSellerSignedOff'------ * 'pSeller'------ * 'pProposalId'------ * 'pName'------ * 'pSellerContacts'------ * 'pLabels'------ * 'pRevisionTimeMs'------ * 'pProposalState'------ * 'pLastUpdaterOrCommentorRole'------ * 'pNegotiationId'------ * 'pHasBuyerSignedOff'------ * 'pBuyer'-proposal-    :: Proposal-proposal =-  Proposal'-    { _pBuyerPrivateData = Nothing-    , _pIsSetupComplete = Nothing-    , _pInventorySource = Nothing-    , _pBuyerContacts = Nothing-    , _pKind = "adexchangebuyer#proposal"-    , _pOriginatorRole = Nothing-    , _pDBmAdvertiserIds = Nothing-    , _pRevisionNumber = Nothing-    , _pBilledBuyer = Nothing-    , _pPrivateAuctionId = Nothing-    , _pIsRenegotiating = Nothing-    , _pHasSellerSignedOff = Nothing-    , _pSeller = Nothing-    , _pProposalId = Nothing-    , _pName = Nothing-    , _pSellerContacts = Nothing-    , _pLabels = Nothing-    , _pRevisionTimeMs = Nothing-    , _pProposalState = Nothing-    , _pLastUpdaterOrCommentorRole = Nothing-    , _pNegotiationId = Nothing-    , _pHasBuyerSignedOff = Nothing-    , _pBuyer = Nothing-    }----- | Private data for buyer. (hidden from seller).-pBuyerPrivateData :: Lens' Proposal (Maybe PrivateData)-pBuyerPrivateData-  = lens _pBuyerPrivateData-      (\ s a -> s{_pBuyerPrivateData = a})---- | True, if the buyside inventory setup is complete for this proposal.--- (readonly, except via OrderSetupCompleted action) Deprecated in favor of--- deal level setup complete flag.-pIsSetupComplete :: Lens' Proposal (Maybe Bool)-pIsSetupComplete-  = lens _pIsSetupComplete-      (\ s a -> s{_pIsSetupComplete = a})---- | What exchange will provide this inventory (readonly, except on create).-pInventorySource :: Lens' Proposal (Maybe Text)-pInventorySource-  = lens _pInventorySource-      (\ s a -> s{_pInventorySource = a})---- | Optional contact information of the buyer. (seller-readonly)-pBuyerContacts :: Lens' Proposal [ContactInformation]-pBuyerContacts-  = lens _pBuyerContacts-      (\ s a -> s{_pBuyerContacts = a})-      . _Default-      . _Coerce---- | Identifies what kind of resource this is. Value: the fixed string--- \"adexchangebuyer#proposal\".-pKind :: Lens' Proposal Text-pKind = lens _pKind (\ s a -> s{_pKind = a})---- | Indicates whether the buyer\/seller created the proposal.(readonly)-pOriginatorRole :: Lens' Proposal (Maybe Text)-pOriginatorRole-  = lens _pOriginatorRole-      (\ s a -> s{_pOriginatorRole = a})---- | IDs of DBM advertisers permission to this proposal.-pDBmAdvertiserIds :: Lens' Proposal [Text]-pDBmAdvertiserIds-  = lens _pDBmAdvertiserIds-      (\ s a -> s{_pDBmAdvertiserIds = a})-      . _Default-      . _Coerce---- | The revision number for the proposal (readonly).-pRevisionNumber :: Lens' Proposal (Maybe Int64)-pRevisionNumber-  = lens _pRevisionNumber-      (\ s a -> s{_pRevisionNumber = a})-      . mapping _Coerce---- | Reference to the buyer that will get billed for this proposal.--- (readonly)-pBilledBuyer :: Lens' Proposal (Maybe Buyer)-pBilledBuyer-  = lens _pBilledBuyer (\ s a -> s{_pBilledBuyer = a})---- | Optional private auction id if this proposal is a private auction--- proposal.-pPrivateAuctionId :: Lens' Proposal (Maybe Text)-pPrivateAuctionId-  = lens _pPrivateAuctionId-      (\ s a -> s{_pPrivateAuctionId = a})---- | True if the proposal is being renegotiated (readonly).-pIsRenegotiating :: Lens' Proposal (Maybe Bool)-pIsRenegotiating-  = lens _pIsRenegotiating-      (\ s a -> s{_pIsRenegotiating = a})---- | When an proposal is in an accepted state, indicates whether the buyer--- has signed off Once both sides have signed off on a deal, the proposal--- can be finalized by the seller. (buyer-readonly)-pHasSellerSignedOff :: Lens' Proposal (Maybe Bool)-pHasSellerSignedOff-  = lens _pHasSellerSignedOff-      (\ s a -> s{_pHasSellerSignedOff = a})---- | Reference to the seller on the proposal. (readonly, except on create)-pSeller :: Lens' Proposal (Maybe Seller)-pSeller = lens _pSeller (\ s a -> s{_pSeller = a})---- | The unique id of the proposal. (readonly).-pProposalId :: Lens' Proposal (Maybe Text)-pProposalId-  = lens _pProposalId (\ s a -> s{_pProposalId = a})---- | The name for the proposal (updatable)-pName :: Lens' Proposal (Maybe Text)-pName = lens _pName (\ s a -> s{_pName = a})---- | Optional contact information of the seller (buyer-readonly).-pSellerContacts :: Lens' Proposal [ContactInformation]-pSellerContacts-  = lens _pSellerContacts-      (\ s a -> s{_pSellerContacts = a})-      . _Default-      . _Coerce---- | List of labels associated with the proposal. (readonly)-pLabels :: Lens' Proposal [MarketplaceLabel]-pLabels-  = lens _pLabels (\ s a -> s{_pLabels = a}) . _Default-      . _Coerce---- | The time (ms since epoch) when the proposal was last revised (readonly).-pRevisionTimeMs :: Lens' Proposal (Maybe Int64)-pRevisionTimeMs-  = lens _pRevisionTimeMs-      (\ s a -> s{_pRevisionTimeMs = a})-      . mapping _Coerce---- | The current state of the proposal. (readonly)-pProposalState :: Lens' Proposal (Maybe Text)-pProposalState-  = lens _pProposalState-      (\ s a -> s{_pProposalState = a})---- | The role of the last user that either updated the proposal or left a--- comment. (readonly)-pLastUpdaterOrCommentorRole :: Lens' Proposal (Maybe Text)-pLastUpdaterOrCommentorRole-  = lens _pLastUpdaterOrCommentorRole-      (\ s a -> s{_pLastUpdaterOrCommentorRole = a})---- | Optional negotiation id if this proposal is a preferred deal proposal.-pNegotiationId :: Lens' Proposal (Maybe Text)-pNegotiationId-  = lens _pNegotiationId-      (\ s a -> s{_pNegotiationId = a})---- | When an proposal is in an accepted state, indicates whether the buyer--- has signed off. Once both sides have signed off on a deal, the proposal--- can be finalized by the seller. (seller-readonly)-pHasBuyerSignedOff :: Lens' Proposal (Maybe Bool)-pHasBuyerSignedOff-  = lens _pHasBuyerSignedOff-      (\ s a -> s{_pHasBuyerSignedOff = a})---- | Reference to the buyer on the proposal. (readonly, except on create)-pBuyer :: Lens' Proposal (Maybe Buyer)-pBuyer = lens _pBuyer (\ s a -> s{_pBuyer = a})--instance FromJSON Proposal where-        parseJSON-          = withObject "Proposal"-              (\ o ->-                 Proposal' <$>-                   (o .:? "buyerPrivateData") <*>-                     (o .:? "isSetupComplete")-                     <*> (o .:? "inventorySource")-                     <*> (o .:? "buyerContacts" .!= mempty)-                     <*> (o .:? "kind" .!= "adexchangebuyer#proposal")-                     <*> (o .:? "originatorRole")-                     <*> (o .:? "dbmAdvertiserIds" .!= mempty)-                     <*> (o .:? "revisionNumber")-                     <*> (o .:? "billedBuyer")-                     <*> (o .:? "privateAuctionId")-                     <*> (o .:? "isRenegotiating")-                     <*> (o .:? "hasSellerSignedOff")-                     <*> (o .:? "seller")-                     <*> (o .:? "proposalId")-                     <*> (o .:? "name")-                     <*> (o .:? "sellerContacts" .!= mempty)-                     <*> (o .:? "labels" .!= mempty)-                     <*> (o .:? "revisionTimeMs")-                     <*> (o .:? "proposalState")-                     <*> (o .:? "lastUpdaterOrCommentorRole")-                     <*> (o .:? "negotiationId")-                     <*> (o .:? "hasBuyerSignedOff")-                     <*> (o .:? "buyer"))--instance ToJSON Proposal where-        toJSON Proposal'{..}-          = object-              (catMaybes-                 [("buyerPrivateData" .=) <$> _pBuyerPrivateData,-                  ("isSetupComplete" .=) <$> _pIsSetupComplete,-                  ("inventorySource" .=) <$> _pInventorySource,-                  ("buyerContacts" .=) <$> _pBuyerContacts,-                  Just ("kind" .= _pKind),-                  ("originatorRole" .=) <$> _pOriginatorRole,-                  ("dbmAdvertiserIds" .=) <$> _pDBmAdvertiserIds,-                  ("revisionNumber" .=) <$> _pRevisionNumber,-                  ("billedBuyer" .=) <$> _pBilledBuyer,-                  ("privateAuctionId" .=) <$> _pPrivateAuctionId,-                  ("isRenegotiating" .=) <$> _pIsRenegotiating,-                  ("hasSellerSignedOff" .=) <$> _pHasSellerSignedOff,-                  ("seller" .=) <$> _pSeller,-                  ("proposalId" .=) <$> _pProposalId,-                  ("name" .=) <$> _pName,-                  ("sellerContacts" .=) <$> _pSellerContacts,-                  ("labels" .=) <$> _pLabels,-                  ("revisionTimeMs" .=) <$> _pRevisionTimeMs,-                  ("proposalState" .=) <$> _pProposalState,-                  ("lastUpdaterOrCommentorRole" .=) <$>-                    _pLastUpdaterOrCommentorRole,-                  ("negotiationId" .=) <$> _pNegotiationId,-                  ("hasBuyerSignedOff" .=) <$> _pHasBuyerSignedOff,-                  ("buyer" .=) <$> _pBuyer])---- | A billing info feed lists Billing Info the Ad Exchange buyer account has--- access to. Each entry in the feed corresponds to a single billing info.------ /See:/ 'billingInfoList' smart constructor.-data BillingInfoList =-  BillingInfoList'-    { _bilKind  :: !Text-    , _bilItems :: !(Maybe [BillingInfo])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'BillingInfoList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'bilKind'------ * 'bilItems'-billingInfoList-    :: BillingInfoList-billingInfoList =-  BillingInfoList'-    {_bilKind = "adexchangebuyer#billingInfoList", _bilItems = Nothing}----- | Resource type.-bilKind :: Lens' BillingInfoList Text-bilKind = lens _bilKind (\ s a -> s{_bilKind = a})---- | A list of billing info relevant for your account.-bilItems :: Lens' BillingInfoList [BillingInfo]-bilItems-  = lens _bilItems (\ s a -> s{_bilItems = a}) .-      _Default-      . _Coerce--instance FromJSON BillingInfoList where-        parseJSON-          = withObject "BillingInfoList"-              (\ o ->-                 BillingInfoList' <$>-                   (o .:? "kind" .!= "adexchangebuyer#billingInfoList")-                     <*> (o .:? "items" .!= mempty))--instance ToJSON BillingInfoList where-        toJSON BillingInfoList'{..}-          = object-              (catMaybes-                 [Just ("kind" .= _bilKind),-                  ("items" .=) <$> _bilItems])------- /See:/ 'addOrderNotesResponse' smart constructor.-newtype AddOrderNotesResponse =-  AddOrderNotesResponse'-    { _aNotes :: Maybe [MarketplaceNote]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'AddOrderNotesResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'aNotes'-addOrderNotesResponse-    :: AddOrderNotesResponse-addOrderNotesResponse = AddOrderNotesResponse' {_aNotes = Nothing}---aNotes :: Lens' AddOrderNotesResponse [MarketplaceNote]-aNotes-  = lens _aNotes (\ s a -> s{_aNotes = a}) . _Default .-      _Coerce--instance FromJSON AddOrderNotesResponse where-        parseJSON-          = withObject "AddOrderNotesResponse"-              (\ o ->-                 AddOrderNotesResponse' <$>-                   (o .:? "notes" .!= mempty))--instance ToJSON AddOrderNotesResponse where-        toJSON AddOrderNotesResponse'{..}-          = object (catMaybes [("notes" .=) <$> _aNotes])------- /See:/ 'targetingValueSize' smart constructor.-data TargetingValueSize =-  TargetingValueSize'-    { _tvsHeight :: !(Maybe (Textual Int32))-    , _tvsWidth  :: !(Maybe (Textual Int32))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TargetingValueSize' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tvsHeight'------ * 'tvsWidth'-targetingValueSize-    :: TargetingValueSize-targetingValueSize =-  TargetingValueSize' {_tvsHeight = Nothing, _tvsWidth = Nothing}----- | The height of the creative.-tvsHeight :: Lens' TargetingValueSize (Maybe Int32)-tvsHeight-  = lens _tvsHeight (\ s a -> s{_tvsHeight = a}) .-      mapping _Coerce---- | The width of the creative.-tvsWidth :: Lens' TargetingValueSize (Maybe Int32)-tvsWidth-  = lens _tvsWidth (\ s a -> s{_tvsWidth = a}) .-      mapping _Coerce--instance FromJSON TargetingValueSize where-        parseJSON-          = withObject "TargetingValueSize"-              (\ o ->-                 TargetingValueSize' <$>-                   (o .:? "height") <*> (o .:? "width"))--instance ToJSON TargetingValueSize where-        toJSON TargetingValueSize'{..}-          = object-              (catMaybes-                 [("height" .=) <$> _tvsHeight,-                  ("width" .=) <$> _tvsWidth])------- /See:/ 'updatePrivateAuctionProposalRequest' smart constructor.-data UpdatePrivateAuctionProposalRequest =-  UpdatePrivateAuctionProposalRequest'-    { _upaprExternalDealId         :: !(Maybe Text)-    , _upaprUpdateAction           :: !(Maybe Text)-    , _upaprNote                   :: !(Maybe MarketplaceNote)-    , _upaprProposalRevisionNumber :: !(Maybe (Textual Int64))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'UpdatePrivateAuctionProposalRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'upaprExternalDealId'------ * 'upaprUpdateAction'------ * 'upaprNote'------ * 'upaprProposalRevisionNumber'-updatePrivateAuctionProposalRequest-    :: UpdatePrivateAuctionProposalRequest-updatePrivateAuctionProposalRequest =-  UpdatePrivateAuctionProposalRequest'-    { _upaprExternalDealId = Nothing-    , _upaprUpdateAction = Nothing-    , _upaprNote = Nothing-    , _upaprProposalRevisionNumber = Nothing-    }----- | The externalDealId of the deal to be updated.-upaprExternalDealId :: Lens' UpdatePrivateAuctionProposalRequest (Maybe Text)-upaprExternalDealId-  = lens _upaprExternalDealId-      (\ s a -> s{_upaprExternalDealId = a})---- | The proposed action on the private auction proposal.-upaprUpdateAction :: Lens' UpdatePrivateAuctionProposalRequest (Maybe Text)-upaprUpdateAction-  = lens _upaprUpdateAction-      (\ s a -> s{_upaprUpdateAction = a})---- | Optional note to be added.-upaprNote :: Lens' UpdatePrivateAuctionProposalRequest (Maybe MarketplaceNote)-upaprNote-  = lens _upaprNote (\ s a -> s{_upaprNote = a})---- | The current revision number of the proposal to be updated.-upaprProposalRevisionNumber :: Lens' UpdatePrivateAuctionProposalRequest (Maybe Int64)-upaprProposalRevisionNumber-  = lens _upaprProposalRevisionNumber-      (\ s a -> s{_upaprProposalRevisionNumber = a})-      . mapping _Coerce--instance FromJSON UpdatePrivateAuctionProposalRequest-         where-        parseJSON-          = withObject "UpdatePrivateAuctionProposalRequest"-              (\ o ->-                 UpdatePrivateAuctionProposalRequest' <$>-                   (o .:? "externalDealId") <*> (o .:? "updateAction")-                     <*> (o .:? "note")-                     <*> (o .:? "proposalRevisionNumber"))--instance ToJSON UpdatePrivateAuctionProposalRequest-         where-        toJSON UpdatePrivateAuctionProposalRequest'{..}-          = object-              (catMaybes-                 [("externalDealId" .=) <$> _upaprExternalDealId,-                  ("updateAction" .=) <$> _upaprUpdateAction,-                  ("note" .=) <$> _upaprNote,-                  ("proposalRevisionNumber" .=) <$>-                    _upaprProposalRevisionNumber])------- /See:/ 'pretargetingConfigDimensionsItem' smart constructor.-data PretargetingConfigDimensionsItem =-  PretargetingConfigDimensionsItem'-    { _pcdiHeight :: !(Maybe (Textual Int64))-    , _pcdiWidth  :: !(Maybe (Textual Int64))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PretargetingConfigDimensionsItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pcdiHeight'------ * 'pcdiWidth'-pretargetingConfigDimensionsItem-    :: PretargetingConfigDimensionsItem-pretargetingConfigDimensionsItem =-  PretargetingConfigDimensionsItem'-    {_pcdiHeight = Nothing, _pcdiWidth = Nothing}----- | Height in pixels.-pcdiHeight :: Lens' PretargetingConfigDimensionsItem (Maybe Int64)-pcdiHeight-  = lens _pcdiHeight (\ s a -> s{_pcdiHeight = a}) .-      mapping _Coerce---- | Width in pixels.-pcdiWidth :: Lens' PretargetingConfigDimensionsItem (Maybe Int64)-pcdiWidth-  = lens _pcdiWidth (\ s a -> s{_pcdiWidth = a}) .-      mapping _Coerce--instance FromJSON PretargetingConfigDimensionsItem-         where-        parseJSON-          = withObject "PretargetingConfigDimensionsItem"-              (\ o ->-                 PretargetingConfigDimensionsItem' <$>-                   (o .:? "height") <*> (o .:? "width"))--instance ToJSON PretargetingConfigDimensionsItem-         where-        toJSON PretargetingConfigDimensionsItem'{..}-          = object-              (catMaybes-                 [("height" .=) <$> _pcdiHeight,-                  ("width" .=) <$> _pcdiWidth])------- /See:/ 'creativeCorrectionsItemContextsItem' smart constructor.-data CreativeCorrectionsItemContextsItem =-  CreativeCorrectionsItemContextsItem'-    { _cciciPlatform      :: !(Maybe [Text])-    , _cciciContextType   :: !(Maybe Text)-    , _cciciAuctionType   :: !(Maybe [Text])-    , _cciciGeoCriteriaId :: !(Maybe [Textual Int32])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CreativeCorrectionsItemContextsItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cciciPlatform'------ * 'cciciContextType'------ * 'cciciAuctionType'------ * 'cciciGeoCriteriaId'-creativeCorrectionsItemContextsItem-    :: CreativeCorrectionsItemContextsItem-creativeCorrectionsItemContextsItem =-  CreativeCorrectionsItemContextsItem'-    { _cciciPlatform = Nothing-    , _cciciContextType = Nothing-    , _cciciAuctionType = Nothing-    , _cciciGeoCriteriaId = Nothing-    }----- | Only set when contextType=PLATFORM. Represents the platforms this--- correction applies to.-cciciPlatform :: Lens' CreativeCorrectionsItemContextsItem [Text]-cciciPlatform-  = lens _cciciPlatform-      (\ s a -> s{_cciciPlatform = a})-      . _Default-      . _Coerce---- | The type of context (e.g., location, platform, auction type, SSL-ness).-cciciContextType :: Lens' CreativeCorrectionsItemContextsItem (Maybe Text)-cciciContextType-  = lens _cciciContextType-      (\ s a -> s{_cciciContextType = a})---- | Only set when contextType=AUCTION_TYPE. Represents the auction types--- this correction applies to.-cciciAuctionType :: Lens' CreativeCorrectionsItemContextsItem [Text]-cciciAuctionType-  = lens _cciciAuctionType-      (\ s a -> s{_cciciAuctionType = a})-      . _Default-      . _Coerce---- | Only set when contextType=LOCATION. Represents the geo criterias this--- correction applies to.-cciciGeoCriteriaId :: Lens' CreativeCorrectionsItemContextsItem [Int32]-cciciGeoCriteriaId-  = lens _cciciGeoCriteriaId-      (\ s a -> s{_cciciGeoCriteriaId = a})-      . _Default-      . _Coerce--instance FromJSON CreativeCorrectionsItemContextsItem-         where-        parseJSON-          = withObject "CreativeCorrectionsItemContextsItem"-              (\ o ->-                 CreativeCorrectionsItemContextsItem' <$>-                   (o .:? "platform" .!= mempty) <*>-                     (o .:? "contextType")-                     <*> (o .:? "auctionType" .!= mempty)-                     <*> (o .:? "geoCriteriaId" .!= mempty))--instance ToJSON CreativeCorrectionsItemContextsItem-         where-        toJSON CreativeCorrectionsItemContextsItem'{..}-          = object-              (catMaybes-                 [("platform" .=) <$> _cciciPlatform,-                  ("contextType" .=) <$> _cciciContextType,-                  ("auctionType" .=) <$> _cciciAuctionType,-                  ("geoCriteriaId" .=) <$> _cciciGeoCriteriaId])---- | This message carries publisher provided forecasting information.------ /See:/ 'publisherProvidedForecast' smart constructor.-data PublisherProvidedForecast =-  PublisherProvidedForecast'-    { _ppfWeeklyImpressions :: !(Maybe (Textual Int64))-    , _ppfWeeklyUniques     :: !(Maybe (Textual Int64))-    , _ppfDimensions        :: !(Maybe [Dimension])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PublisherProvidedForecast' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ppfWeeklyImpressions'------ * 'ppfWeeklyUniques'------ * 'ppfDimensions'-publisherProvidedForecast-    :: PublisherProvidedForecast-publisherProvidedForecast =-  PublisherProvidedForecast'-    { _ppfWeeklyImpressions = Nothing-    , _ppfWeeklyUniques = Nothing-    , _ppfDimensions = Nothing-    }----- | Publisher provided weekly impressions.-ppfWeeklyImpressions :: Lens' PublisherProvidedForecast (Maybe Int64)-ppfWeeklyImpressions-  = lens _ppfWeeklyImpressions-      (\ s a -> s{_ppfWeeklyImpressions = a})-      . mapping _Coerce---- | Publisher provided weekly uniques.-ppfWeeklyUniques :: Lens' PublisherProvidedForecast (Maybe Int64)-ppfWeeklyUniques-  = lens _ppfWeeklyUniques-      (\ s a -> s{_ppfWeeklyUniques = a})-      . mapping _Coerce---- | Publisher provided dimensions. E.g. geo, sizes etc...-ppfDimensions :: Lens' PublisherProvidedForecast [Dimension]-ppfDimensions-  = lens _ppfDimensions-      (\ s a -> s{_ppfDimensions = a})-      . _Default-      . _Coerce--instance FromJSON PublisherProvidedForecast where-        parseJSON-          = withObject "PublisherProvidedForecast"-              (\ o ->-                 PublisherProvidedForecast' <$>-                   (o .:? "weeklyImpressions") <*>-                     (o .:? "weeklyUniques")-                     <*> (o .:? "dimensions" .!= mempty))--instance ToJSON PublisherProvidedForecast where-        toJSON PublisherProvidedForecast'{..}-          = object-              (catMaybes-                 [("weeklyImpressions" .=) <$> _ppfWeeklyImpressions,-                  ("weeklyUniques" .=) <$> _ppfWeeklyUniques,-                  ("dimensions" .=) <$> _ppfDimensions])------- /See:/ 'targetingValue' smart constructor.-data TargetingValue =-  TargetingValue'-    { _tvDemogAgeCriteriaValue    :: !(Maybe TargetingValueDemogAgeCriteria)-    , _tvCreativeSizeValue        :: !(Maybe TargetingValueCreativeSize)-    , _tvStringValue              :: !(Maybe Text)-    , _tvLongValue                :: !(Maybe (Textual Int64))-    , _tvDayPartTargetingValue    :: !(Maybe TargetingValueDayPartTargeting)-    , _tvDemogGenderCriteriaValue :: !(Maybe TargetingValueDemogGenderCriteria)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TargetingValue' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tvDemogAgeCriteriaValue'------ * 'tvCreativeSizeValue'------ * 'tvStringValue'------ * 'tvLongValue'------ * 'tvDayPartTargetingValue'------ * 'tvDemogGenderCriteriaValue'-targetingValue-    :: TargetingValue-targetingValue =-  TargetingValue'-    { _tvDemogAgeCriteriaValue = Nothing-    , _tvCreativeSizeValue = Nothing-    , _tvStringValue = Nothing-    , _tvLongValue = Nothing-    , _tvDayPartTargetingValue = Nothing-    , _tvDemogGenderCriteriaValue = Nothing-    }---tvDemogAgeCriteriaValue :: Lens' TargetingValue (Maybe TargetingValueDemogAgeCriteria)-tvDemogAgeCriteriaValue-  = lens _tvDemogAgeCriteriaValue-      (\ s a -> s{_tvDemogAgeCriteriaValue = a})---- | The creative size value to exclude\/include.-tvCreativeSizeValue :: Lens' TargetingValue (Maybe TargetingValueCreativeSize)-tvCreativeSizeValue-  = lens _tvCreativeSizeValue-      (\ s a -> s{_tvCreativeSizeValue = a})---- | The string value to exclude\/include.-tvStringValue :: Lens' TargetingValue (Maybe Text)-tvStringValue-  = lens _tvStringValue-      (\ s a -> s{_tvStringValue = a})---- | The long value to exclude\/include.-tvLongValue :: Lens' TargetingValue (Maybe Int64)-tvLongValue-  = lens _tvLongValue (\ s a -> s{_tvLongValue = a}) .-      mapping _Coerce---- | The daypart targeting to include \/ exclude. Filled in when the key is--- GOOG_DAYPART_TARGETING.-tvDayPartTargetingValue :: Lens' TargetingValue (Maybe TargetingValueDayPartTargeting)-tvDayPartTargetingValue-  = lens _tvDayPartTargetingValue-      (\ s a -> s{_tvDayPartTargetingValue = a})--tvDemogGenderCriteriaValue :: Lens' TargetingValue (Maybe TargetingValueDemogGenderCriteria)-tvDemogGenderCriteriaValue-  = lens _tvDemogGenderCriteriaValue-      (\ s a -> s{_tvDemogGenderCriteriaValue = a})--instance FromJSON TargetingValue where-        parseJSON-          = withObject "TargetingValue"-              (\ o ->-                 TargetingValue' <$>-                   (o .:? "demogAgeCriteriaValue") <*>-                     (o .:? "creativeSizeValue")-                     <*> (o .:? "stringValue")-                     <*> (o .:? "longValue")-                     <*> (o .:? "dayPartTargetingValue")-                     <*> (o .:? "demogGenderCriteriaValue"))--instance ToJSON TargetingValue where-        toJSON TargetingValue'{..}-          = object-              (catMaybes-                 [("demogAgeCriteriaValue" .=) <$>-                    _tvDemogAgeCriteriaValue,-                  ("creativeSizeValue" .=) <$> _tvCreativeSizeValue,-                  ("stringValue" .=) <$> _tvStringValue,-                  ("longValue" .=) <$> _tvLongValue,-                  ("dayPartTargetingValue" .=) <$>-                    _tvDayPartTargetingValue,-                  ("demogGenderCriteriaValue" .=) <$>-                    _tvDemogGenderCriteriaValue])---- | The app icon, for app download ads.------ /See:/ 'creativeNATiveAdAppIcon' smart constructor.-data CreativeNATiveAdAppIcon =-  CreativeNATiveAdAppIcon'-    { _cnataaiHeight :: !(Maybe (Textual Int32))-    , _cnataaiURL    :: !(Maybe Text)-    , _cnataaiWidth  :: !(Maybe (Textual Int32))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CreativeNATiveAdAppIcon' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cnataaiHeight'------ * 'cnataaiURL'------ * 'cnataaiWidth'-creativeNATiveAdAppIcon-    :: CreativeNATiveAdAppIcon-creativeNATiveAdAppIcon =-  CreativeNATiveAdAppIcon'-    {_cnataaiHeight = Nothing, _cnataaiURL = Nothing, _cnataaiWidth = Nothing}---cnataaiHeight :: Lens' CreativeNATiveAdAppIcon (Maybe Int32)-cnataaiHeight-  = lens _cnataaiHeight-      (\ s a -> s{_cnataaiHeight = a})-      . mapping _Coerce--cnataaiURL :: Lens' CreativeNATiveAdAppIcon (Maybe Text)-cnataaiURL-  = lens _cnataaiURL (\ s a -> s{_cnataaiURL = a})--cnataaiWidth :: Lens' CreativeNATiveAdAppIcon (Maybe Int32)-cnataaiWidth-  = lens _cnataaiWidth (\ s a -> s{_cnataaiWidth = a})-      . mapping _Coerce--instance FromJSON CreativeNATiveAdAppIcon where-        parseJSON-          = withObject "CreativeNATiveAdAppIcon"-              (\ o ->-                 CreativeNATiveAdAppIcon' <$>-                   (o .:? "height") <*> (o .:? "url") <*>-                     (o .:? "width"))--instance ToJSON CreativeNATiveAdAppIcon where-        toJSON CreativeNATiveAdAppIcon'{..}-          = object-              (catMaybes-                 [("height" .=) <$> _cnataaiHeight,-                  ("url" .=) <$> _cnataaiURL,-                  ("width" .=) <$> _cnataaiWidth])------- /See:/ 'price' smart constructor.-data Price =-  Price'-    { _pCurrencyCode      :: !(Maybe Text)-    , _pAmountMicros      :: !(Maybe (Textual Double))-    , _pPricingType       :: !(Maybe Text)-    , _pExpectedCpmMicros :: !(Maybe (Textual Double))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Price' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pCurrencyCode'------ * 'pAmountMicros'------ * 'pPricingType'------ * 'pExpectedCpmMicros'-price-    :: Price-price =-  Price'-    { _pCurrencyCode = Nothing-    , _pAmountMicros = Nothing-    , _pPricingType = Nothing-    , _pExpectedCpmMicros = Nothing-    }----- | The currency code for the price.-pCurrencyCode :: Lens' Price (Maybe Text)-pCurrencyCode-  = lens _pCurrencyCode-      (\ s a -> s{_pCurrencyCode = a})---- | The price value in micros.-pAmountMicros :: Lens' Price (Maybe Double)-pAmountMicros-  = lens _pAmountMicros-      (\ s a -> s{_pAmountMicros = a})-      . mapping _Coerce---- | The pricing type for the deal\/product.-pPricingType :: Lens' Price (Maybe Text)-pPricingType-  = lens _pPricingType (\ s a -> s{_pPricingType = a})---- | In case of CPD deals, the expected CPM in micros.-pExpectedCpmMicros :: Lens' Price (Maybe Double)-pExpectedCpmMicros-  = lens _pExpectedCpmMicros-      (\ s a -> s{_pExpectedCpmMicros = a})-      . mapping _Coerce--instance FromJSON Price where-        parseJSON-          = withObject "Price"-              (\ o ->-                 Price' <$>-                   (o .:? "currencyCode") <*> (o .:? "amountMicros") <*>-                     (o .:? "pricingType")-                     <*> (o .:? "expectedCpmMicros"))--instance ToJSON Price where-        toJSON Price'{..}-          = object-              (catMaybes-                 [("currencyCode" .=) <$> _pCurrencyCode,-                  ("amountMicros" .=) <$> _pAmountMicros,-                  ("pricingType" .=) <$> _pPricingType,-                  ("expectedCpmMicros" .=) <$> _pExpectedCpmMicros])------- /See:/ 'pretargetingConfigVideoPlayerSizesItem' smart constructor.-data PretargetingConfigVideoPlayerSizesItem =-  PretargetingConfigVideoPlayerSizesItem'-    { _pcvpsiMinWidth    :: !(Maybe (Textual Int64))-    , _pcvpsiAspectRatio :: !(Maybe Text)-    , _pcvpsiMinHeight   :: !(Maybe (Textual Int64))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PretargetingConfigVideoPlayerSizesItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pcvpsiMinWidth'------ * 'pcvpsiAspectRatio'------ * 'pcvpsiMinHeight'-pretargetingConfigVideoPlayerSizesItem-    :: PretargetingConfigVideoPlayerSizesItem-pretargetingConfigVideoPlayerSizesItem =-  PretargetingConfigVideoPlayerSizesItem'-    { _pcvpsiMinWidth = Nothing-    , _pcvpsiAspectRatio = Nothing-    , _pcvpsiMinHeight = Nothing-    }----- | The minimum player width in pixels. Leave this field blank to match any--- player width.-pcvpsiMinWidth :: Lens' PretargetingConfigVideoPlayerSizesItem (Maybe Int64)-pcvpsiMinWidth-  = lens _pcvpsiMinWidth-      (\ s a -> s{_pcvpsiMinWidth = a})-      . mapping _Coerce---- | The type of aspect ratio. Leave this field blank to match all aspect--- ratios.-pcvpsiAspectRatio :: Lens' PretargetingConfigVideoPlayerSizesItem (Maybe Text)-pcvpsiAspectRatio-  = lens _pcvpsiAspectRatio-      (\ s a -> s{_pcvpsiAspectRatio = a})---- | The minimum player height in pixels. Leave this field blank to match any--- player height.-pcvpsiMinHeight :: Lens' PretargetingConfigVideoPlayerSizesItem (Maybe Int64)-pcvpsiMinHeight-  = lens _pcvpsiMinHeight-      (\ s a -> s{_pcvpsiMinHeight = a})-      . mapping _Coerce--instance FromJSON-           PretargetingConfigVideoPlayerSizesItem-         where-        parseJSON-          = withObject "PretargetingConfigVideoPlayerSizesItem"-              (\ o ->-                 PretargetingConfigVideoPlayerSizesItem' <$>-                   (o .:? "minWidth") <*> (o .:? "aspectRatio") <*>-                     (o .:? "minHeight"))--instance ToJSON-           PretargetingConfigVideoPlayerSizesItem-         where-        toJSON PretargetingConfigVideoPlayerSizesItem'{..}-          = object-              (catMaybes-                 [("minWidth" .=) <$> _pcvpsiMinWidth,-                  ("aspectRatio" .=) <$> _pcvpsiAspectRatio,-                  ("minHeight" .=) <$> _pcvpsiMinHeight])------- /See:/ 'editAllOrderDealsRequest' smart constructor.-data EditAllOrderDealsRequest =-  EditAllOrderDealsRequest'-    { _eUpdateAction           :: !(Maybe Text)-    , _eDeals                  :: !(Maybe [MarketplaceDeal])-    , _eProposalRevisionNumber :: !(Maybe (Textual Int64))-    , _eProposal               :: !(Maybe Proposal)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'EditAllOrderDealsRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'eUpdateAction'------ * 'eDeals'------ * 'eProposalRevisionNumber'------ * 'eProposal'-editAllOrderDealsRequest-    :: EditAllOrderDealsRequest-editAllOrderDealsRequest =-  EditAllOrderDealsRequest'-    { _eUpdateAction = Nothing-    , _eDeals = Nothing-    , _eProposalRevisionNumber = Nothing-    , _eProposal = Nothing-    }----- | Indicates an optional action to take on the proposal-eUpdateAction :: Lens' EditAllOrderDealsRequest (Maybe Text)-eUpdateAction-  = lens _eUpdateAction-      (\ s a -> s{_eUpdateAction = a})---- | List of deals to edit. Service may perform 3 different operations based--- on comparison of deals in this list vs deals already persisted in--- database: 1. Add new deal to proposal If a deal in this list does not--- exist in the proposal, the service will create a new deal and add it to--- the proposal. Validation will follow AddOrderDealsRequest. 2. Update--- existing deal in the proposal If a deal in this list already exist in--- the proposal, the service will update that existing deal to this new--- deal in the request. Validation will follow UpdateOrderDealsRequest. 3.--- Delete deals from the proposal (just need the id) If a existing deal in--- the proposal is not present in this list, the service will delete that--- deal from the proposal. Validation will follow DeleteOrderDealsRequest.-eDeals :: Lens' EditAllOrderDealsRequest [MarketplaceDeal]-eDeals-  = lens _eDeals (\ s a -> s{_eDeals = a}) . _Default .-      _Coerce---- | The last known revision number for the proposal.-eProposalRevisionNumber :: Lens' EditAllOrderDealsRequest (Maybe Int64)-eProposalRevisionNumber-  = lens _eProposalRevisionNumber-      (\ s a -> s{_eProposalRevisionNumber = a})-      . mapping _Coerce---- | If specified, also updates the proposal in the batch transaction. This--- is useful when the proposal and the deals need to be updated in one--- transaction.-eProposal :: Lens' EditAllOrderDealsRequest (Maybe Proposal)-eProposal-  = lens _eProposal (\ s a -> s{_eProposal = a})--instance FromJSON EditAllOrderDealsRequest where-        parseJSON-          = withObject "EditAllOrderDealsRequest"-              (\ o ->-                 EditAllOrderDealsRequest' <$>-                   (o .:? "updateAction") <*> (o .:? "deals" .!= mempty)-                     <*> (o .:? "proposalRevisionNumber")-                     <*> (o .:? "proposal"))--instance ToJSON EditAllOrderDealsRequest where-        toJSON EditAllOrderDealsRequest'{..}-          = object-              (catMaybes-                 [("updateAction" .=) <$> _eUpdateAction,-                  ("deals" .=) <$> _eDeals,-                  ("proposalRevisionNumber" .=) <$>-                    _eProposalRevisionNumber,-                  ("proposal" .=) <$> _eProposal])---- | The configuration data for an Ad Exchange billing info.------ /See:/ 'billingInfo' smart constructor.-data BillingInfo =-  BillingInfo'-    { _biKind        :: !Text-    , _biAccountName :: !(Maybe Text)-    , _biAccountId   :: !(Maybe (Textual Int32))-    , _biBillingId   :: !(Maybe [Text])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'BillingInfo' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'biKind'------ * 'biAccountName'------ * 'biAccountId'------ * 'biBillingId'-billingInfo-    :: BillingInfo-billingInfo =-  BillingInfo'-    { _biKind = "adexchangebuyer#billingInfo"-    , _biAccountName = Nothing-    , _biAccountId = Nothing-    , _biBillingId = Nothing-    }----- | Resource type.-biKind :: Lens' BillingInfo Text-biKind = lens _biKind (\ s a -> s{_biKind = a})---- | Account name.-biAccountName :: Lens' BillingInfo (Maybe Text)-biAccountName-  = lens _biAccountName-      (\ s a -> s{_biAccountName = a})---- | Account id.-biAccountId :: Lens' BillingInfo (Maybe Int32)-biAccountId-  = lens _biAccountId (\ s a -> s{_biAccountId = a}) .-      mapping _Coerce---- | A list of adgroup IDs associated with this particular account. These IDs--- may show up as part of a realtime bidding BidRequest, which indicates a--- bid request for this account.-biBillingId :: Lens' BillingInfo [Text]-biBillingId-  = lens _biBillingId (\ s a -> s{_biBillingId = a}) .-      _Default-      . _Coerce--instance FromJSON BillingInfo where-        parseJSON-          = withObject "BillingInfo"-              (\ o ->-                 BillingInfo' <$>-                   (o .:? "kind" .!= "adexchangebuyer#billingInfo") <*>-                     (o .:? "accountName")-                     <*> (o .:? "accountId")-                     <*> (o .:? "billingId" .!= mempty))--instance ToJSON BillingInfo where-        toJSON BillingInfo'{..}-          = object-              (catMaybes-                 [Just ("kind" .= _biKind),-                  ("accountName" .=) <$> _biAccountName,-                  ("accountId" .=) <$> _biAccountId,-                  ("billingId" .=) <$> _biBillingId])------- /See:/ 'targetingValueDayPartTargeting' smart constructor.-data TargetingValueDayPartTargeting =-  TargetingValueDayPartTargeting'-    { _tvdptTimeZoneType :: !(Maybe Text)-    , _tvdptDayParts     :: !(Maybe [TargetingValueDayPartTargetingDayPart])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TargetingValueDayPartTargeting' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tvdptTimeZoneType'------ * 'tvdptDayParts'-targetingValueDayPartTargeting-    :: TargetingValueDayPartTargeting-targetingValueDayPartTargeting =-  TargetingValueDayPartTargeting'-    {_tvdptTimeZoneType = Nothing, _tvdptDayParts = Nothing}---tvdptTimeZoneType :: Lens' TargetingValueDayPartTargeting (Maybe Text)-tvdptTimeZoneType-  = lens _tvdptTimeZoneType-      (\ s a -> s{_tvdptTimeZoneType = a})--tvdptDayParts :: Lens' TargetingValueDayPartTargeting [TargetingValueDayPartTargetingDayPart]-tvdptDayParts-  = lens _tvdptDayParts-      (\ s a -> s{_tvdptDayParts = a})-      . _Default-      . _Coerce--instance FromJSON TargetingValueDayPartTargeting-         where-        parseJSON-          = withObject "TargetingValueDayPartTargeting"-              (\ o ->-                 TargetingValueDayPartTargeting' <$>-                   (o .:? "timeZoneType") <*>-                     (o .:? "dayParts" .!= mempty))--instance ToJSON TargetingValueDayPartTargeting where-        toJSON TargetingValueDayPartTargeting'{..}-          = object-              (catMaybes-                 [("timeZoneType" .=) <$> _tvdptTimeZoneType,-                  ("dayParts" .=) <$> _tvdptDayParts])------- /See:/ 'sharedTargeting' smart constructor.-data SharedTargeting =-  SharedTargeting'-    { _stKey        :: !(Maybe Text)-    , _stExclusions :: !(Maybe [TargetingValue])-    , _stInclusions :: !(Maybe [TargetingValue])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SharedTargeting' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'stKey'------ * 'stExclusions'------ * 'stInclusions'-sharedTargeting-    :: SharedTargeting-sharedTargeting =-  SharedTargeting'-    {_stKey = Nothing, _stExclusions = Nothing, _stInclusions = Nothing}----- | The key representing the shared targeting criterion.-stKey :: Lens' SharedTargeting (Maybe Text)-stKey = lens _stKey (\ s a -> s{_stKey = a})---- | The list of values to exclude from targeting. Each value is AND\'d--- together.-stExclusions :: Lens' SharedTargeting [TargetingValue]-stExclusions-  = lens _stExclusions (\ s a -> s{_stExclusions = a})-      . _Default-      . _Coerce---- | The list of value to include as part of the targeting. Each value is--- OR\'d together.-stInclusions :: Lens' SharedTargeting [TargetingValue]-stInclusions-  = lens _stInclusions (\ s a -> s{_stInclusions = a})-      . _Default-      . _Coerce--instance FromJSON SharedTargeting where-        parseJSON-          = withObject "SharedTargeting"-              (\ o ->-                 SharedTargeting' <$>-                   (o .:? "key") <*> (o .:? "exclusions" .!= mempty) <*>-                     (o .:? "inclusions" .!= mempty))--instance ToJSON SharedTargeting where-        toJSON SharedTargeting'{..}-          = object-              (catMaybes-                 [("key" .=) <$> _stKey,-                  ("exclusions" .=) <$> _stExclusions,-                  ("inclusions" .=) <$> _stInclusions])---- | A large image.------ /See:/ 'creativeNATiveAdImage' smart constructor.-data CreativeNATiveAdImage =-  CreativeNATiveAdImage'-    { _cnataiHeight :: !(Maybe (Textual Int32))-    , _cnataiURL    :: !(Maybe Text)-    , _cnataiWidth  :: !(Maybe (Textual Int32))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CreativeNATiveAdImage' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cnataiHeight'------ * 'cnataiURL'------ * 'cnataiWidth'-creativeNATiveAdImage-    :: CreativeNATiveAdImage-creativeNATiveAdImage =-  CreativeNATiveAdImage'-    {_cnataiHeight = Nothing, _cnataiURL = Nothing, _cnataiWidth = Nothing}---cnataiHeight :: Lens' CreativeNATiveAdImage (Maybe Int32)-cnataiHeight-  = lens _cnataiHeight (\ s a -> s{_cnataiHeight = a})-      . mapping _Coerce--cnataiURL :: Lens' CreativeNATiveAdImage (Maybe Text)-cnataiURL-  = lens _cnataiURL (\ s a -> s{_cnataiURL = a})--cnataiWidth :: Lens' CreativeNATiveAdImage (Maybe Int32)-cnataiWidth-  = lens _cnataiWidth (\ s a -> s{_cnataiWidth = a}) .-      mapping _Coerce--instance FromJSON CreativeNATiveAdImage where-        parseJSON-          = withObject "CreativeNATiveAdImage"-              (\ o ->-                 CreativeNATiveAdImage' <$>-                   (o .:? "height") <*> (o .:? "url") <*>-                     (o .:? "width"))--instance ToJSON CreativeNATiveAdImage where-        toJSON CreativeNATiveAdImage'{..}-          = object-              (catMaybes-                 [("height" .=) <$> _cnataiHeight,-                  ("url" .=) <$> _cnataiURL,-                  ("width" .=) <$> _cnataiWidth])---- | A product is segment of inventory that a seller wishes to sell. It is--- associated with certain terms and targeting information which helps--- buyer know more about the inventory. Each field in a product can have--- one of the following setting: (readonly) - It is an error to try and set--- this field. (buyer-readonly) - Only the seller can set this field.--- (seller-readonly) - Only the buyer can set this field. (updatable) - The--- field is updatable at all times by either buyer or the seller.------ /See:/ 'product' smart constructor.-data Product =-  Product'-    { _proState                         :: !(Maybe Text)-    , _proInventorySource               :: !(Maybe Text)-    , _proWebPropertyCode               :: !(Maybe Text)-    , _proCreationTimeMs                :: !(Maybe (Textual Int64))-    , _proTerms                         :: !(Maybe DealTerms)-    , _proLastUpdateTimeMs              :: !(Maybe (Textual Int64))-    , _proKind                          :: !Text-    , _proRevisionNumber                :: !(Maybe (Textual Int64))-    , _proBilledBuyer                   :: !(Maybe Buyer)-    , _proPrivateAuctionId              :: !(Maybe Text)-    , _proDeliveryControl               :: !(Maybe DeliveryControl)-    , _proHasCreatorSignedOff           :: !(Maybe Bool)-    , _proFlightStartTimeMs             :: !(Maybe (Textual Int64))-    , _proSharedTargetings              :: !(Maybe [SharedTargeting])-    , _proSeller                        :: !(Maybe Seller)-    , _proSyndicationProduct            :: !(Maybe Text)-    , _proFlightEndTimeMs               :: !(Maybe (Textual Int64))-    , _proName                          :: !(Maybe Text)-    , _proCreatorContacts               :: !(Maybe [ContactInformation])-    , _proMarketplacePublisherProFileId :: !(Maybe Text)-    , _proPublisherProvidedForecast     :: !(Maybe PublisherProvidedForecast)-    , _proLabels                        :: !(Maybe [MarketplaceLabel])-    , _proCreatorRole                   :: !(Maybe Text)-    , _proPublisherProFileId            :: !(Maybe Text)-    , _proLegacyOfferId                 :: !(Maybe Text)-    , _proProductId                     :: !(Maybe Text)-    , _proBuyer                         :: !(Maybe Buyer)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Product' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'proState'------ * 'proInventorySource'------ * 'proWebPropertyCode'------ * 'proCreationTimeMs'------ * 'proTerms'------ * 'proLastUpdateTimeMs'------ * 'proKind'------ * 'proRevisionNumber'------ * 'proBilledBuyer'------ * 'proPrivateAuctionId'------ * 'proDeliveryControl'------ * 'proHasCreatorSignedOff'------ * 'proFlightStartTimeMs'------ * 'proSharedTargetings'------ * 'proSeller'------ * 'proSyndicationProduct'------ * 'proFlightEndTimeMs'------ * 'proName'------ * 'proCreatorContacts'------ * 'proMarketplacePublisherProFileId'------ * 'proPublisherProvidedForecast'------ * 'proLabels'------ * 'proCreatorRole'------ * 'proPublisherProFileId'------ * 'proLegacyOfferId'------ * 'proProductId'------ * 'proBuyer'-product-    :: Product-product =-  Product'-    { _proState = Nothing-    , _proInventorySource = Nothing-    , _proWebPropertyCode = Nothing-    , _proCreationTimeMs = Nothing-    , _proTerms = Nothing-    , _proLastUpdateTimeMs = Nothing-    , _proKind = "adexchangebuyer#product"-    , _proRevisionNumber = Nothing-    , _proBilledBuyer = Nothing-    , _proPrivateAuctionId = Nothing-    , _proDeliveryControl = Nothing-    , _proHasCreatorSignedOff = Nothing-    , _proFlightStartTimeMs = Nothing-    , _proSharedTargetings = Nothing-    , _proSeller = Nothing-    , _proSyndicationProduct = Nothing-    , _proFlightEndTimeMs = Nothing-    , _proName = Nothing-    , _proCreatorContacts = Nothing-    , _proMarketplacePublisherProFileId = Nothing-    , _proPublisherProvidedForecast = Nothing-    , _proLabels = Nothing-    , _proCreatorRole = Nothing-    , _proPublisherProFileId = Nothing-    , _proLegacyOfferId = Nothing-    , _proProductId = Nothing-    , _proBuyer = Nothing-    }----- | The state of the product. (buyer-readonly)-proState :: Lens' Product (Maybe Text)-proState = lens _proState (\ s a -> s{_proState = a})---- | What exchange will provide this inventory (readonly, except on create).-proInventorySource :: Lens' Product (Maybe Text)-proInventorySource-  = lens _proInventorySource-      (\ s a -> s{_proInventorySource = a})---- | The web property code for the seller. This field is meant to be copied--- over as is when creating deals.-proWebPropertyCode :: Lens' Product (Maybe Text)-proWebPropertyCode-  = lens _proWebPropertyCode-      (\ s a -> s{_proWebPropertyCode = a})---- | Creation time in ms. since epoch (readonly)-proCreationTimeMs :: Lens' Product (Maybe Int64)-proCreationTimeMs-  = lens _proCreationTimeMs-      (\ s a -> s{_proCreationTimeMs = a})-      . mapping _Coerce---- | The negotiable terms of the deal (buyer-readonly)-proTerms :: Lens' Product (Maybe DealTerms)-proTerms = lens _proTerms (\ s a -> s{_proTerms = a})---- | Time of last update in ms. since epoch (readonly)-proLastUpdateTimeMs :: Lens' Product (Maybe Int64)-proLastUpdateTimeMs-  = lens _proLastUpdateTimeMs-      (\ s a -> s{_proLastUpdateTimeMs = a})-      . mapping _Coerce---- | Identifies what kind of resource this is. Value: the fixed string--- \"adexchangebuyer#product\".-proKind :: Lens' Product Text-proKind = lens _proKind (\ s a -> s{_proKind = a})---- | The revision number of the product. (readonly)-proRevisionNumber :: Lens' Product (Maybe Int64)-proRevisionNumber-  = lens _proRevisionNumber-      (\ s a -> s{_proRevisionNumber = a})-      . mapping _Coerce---- | The billed buyer corresponding to the buyer that created the offer.--- (readonly, except on create)-proBilledBuyer :: Lens' Product (Maybe Buyer)-proBilledBuyer-  = lens _proBilledBuyer-      (\ s a -> s{_proBilledBuyer = a})---- | Optional private auction id if this offer is a private auction offer.-proPrivateAuctionId :: Lens' Product (Maybe Text)-proPrivateAuctionId-  = lens _proPrivateAuctionId-      (\ s a -> s{_proPrivateAuctionId = a})---- | The set of fields around delivery control that are interesting for a--- buyer to see but are non-negotiable. These are set by the publisher.--- This message is assigned an id of 100 since some day we would want to--- model this as a protobuf extension.-proDeliveryControl :: Lens' Product (Maybe DeliveryControl)-proDeliveryControl-  = lens _proDeliveryControl-      (\ s a -> s{_proDeliveryControl = a})---- | If the creator has already signed off on the product, then the buyer can--- finalize the deal by accepting the product as is. When copying to a--- proposal, if any of the terms are changed, then auto_finalize is--- automatically set to false.-proHasCreatorSignedOff :: Lens' Product (Maybe Bool)-proHasCreatorSignedOff-  = lens _proHasCreatorSignedOff-      (\ s a -> s{_proHasCreatorSignedOff = a})---- | Inventory availability dates. (times are in ms since epoch) The--- granularity is generally in the order of seconds. (buyer-readonly)-proFlightStartTimeMs :: Lens' Product (Maybe Int64)-proFlightStartTimeMs-  = lens _proFlightStartTimeMs-      (\ s a -> s{_proFlightStartTimeMs = a})-      . mapping _Coerce---- | Targeting that is shared between the buyer and the seller. Each--- targeting criteria has a specified key and for each key there is a list--- of inclusion value or exclusion values. (buyer-readonly)-proSharedTargetings :: Lens' Product [SharedTargeting]-proSharedTargetings-  = lens _proSharedTargetings-      (\ s a -> s{_proSharedTargetings = a})-      . _Default-      . _Coerce---- | Information about the seller that created this product (readonly, except--- on create)-proSeller :: Lens' Product (Maybe Seller)-proSeller-  = lens _proSeller (\ s a -> s{_proSeller = a})---- | The syndication product associated with the deal. (readonly, except on--- create)-proSyndicationProduct :: Lens' Product (Maybe Text)-proSyndicationProduct-  = lens _proSyndicationProduct-      (\ s a -> s{_proSyndicationProduct = a})---- | The proposed end time for the deal (ms since epoch) (buyer-readonly)-proFlightEndTimeMs :: Lens' Product (Maybe Int64)-proFlightEndTimeMs-  = lens _proFlightEndTimeMs-      (\ s a -> s{_proFlightEndTimeMs = a})-      . mapping _Coerce---- | The name for this product as set by the seller. (buyer-readonly)-proName :: Lens' Product (Maybe Text)-proName = lens _proName (\ s a -> s{_proName = a})---- | Optional contact information for the creator of this product.--- (buyer-readonly)-proCreatorContacts :: Lens' Product [ContactInformation]-proCreatorContacts-  = lens _proCreatorContacts-      (\ s a -> s{_proCreatorContacts = a})-      . _Default-      . _Coerce---- | Marketplace publisher profile Id. This Id differs from the regular--- publisher_profile_id in that 1. This is a new id, the old Id will be--- deprecated in 2017. 2. This id uniquely identifies a publisher profile--- by itself.-proMarketplacePublisherProFileId :: Lens' Product (Maybe Text)-proMarketplacePublisherProFileId-  = lens _proMarketplacePublisherProFileId-      (\ s a -> s{_proMarketplacePublisherProFileId = a})---- | Publisher self-provided forecast information.-proPublisherProvidedForecast :: Lens' Product (Maybe PublisherProvidedForecast)-proPublisherProvidedForecast-  = lens _proPublisherProvidedForecast-      (\ s a -> s{_proPublisherProvidedForecast = a})---- | Optional List of labels for the product (optional, buyer-readonly).-proLabels :: Lens' Product [MarketplaceLabel]-proLabels-  = lens _proLabels (\ s a -> s{_proLabels = a}) .-      _Default-      . _Coerce---- | The role that created the offer. Set to BUYER for buyer initiated--- offers.-proCreatorRole :: Lens' Product (Maybe Text)-proCreatorRole-  = lens _proCreatorRole-      (\ s a -> s{_proCreatorRole = a})---- | Id of the publisher profile for a given seller. A (seller.account_id,--- publisher_profile_id) pair uniquely identifies a publisher profile.--- Buyers can call the PublisherProfiles::List endpoint to get a list of--- publisher profiles for a given seller.-proPublisherProFileId :: Lens' Product (Maybe Text)-proPublisherProFileId-  = lens _proPublisherProFileId-      (\ s a -> s{_proPublisherProFileId = a})---- | Optional legacy offer id if this offer is a preferred deal offer.-proLegacyOfferId :: Lens' Product (Maybe Text)-proLegacyOfferId-  = lens _proLegacyOfferId-      (\ s a -> s{_proLegacyOfferId = a})---- | The unique id for the product (readonly)-proProductId :: Lens' Product (Maybe Text)-proProductId-  = lens _proProductId (\ s a -> s{_proProductId = a})---- | The buyer that created the offer if this is a buyer initiated offer--- (readonly, except on create)-proBuyer :: Lens' Product (Maybe Buyer)-proBuyer = lens _proBuyer (\ s a -> s{_proBuyer = a})--instance FromJSON Product where-        parseJSON-          = withObject "Product"-              (\ o ->-                 Product' <$>-                   (o .:? "state") <*> (o .:? "inventorySource") <*>-                     (o .:? "webPropertyCode")-                     <*> (o .:? "creationTimeMs")-                     <*> (o .:? "terms")-                     <*> (o .:? "lastUpdateTimeMs")-                     <*> (o .:? "kind" .!= "adexchangebuyer#product")-                     <*> (o .:? "revisionNumber")-                     <*> (o .:? "billedBuyer")-                     <*> (o .:? "privateAuctionId")-                     <*> (o .:? "deliveryControl")-                     <*> (o .:? "hasCreatorSignedOff")-                     <*> (o .:? "flightStartTimeMs")-                     <*> (o .:? "sharedTargetings" .!= mempty)-                     <*> (o .:? "seller")-                     <*> (o .:? "syndicationProduct")-                     <*> (o .:? "flightEndTimeMs")-                     <*> (o .:? "name")-                     <*> (o .:? "creatorContacts" .!= mempty)-                     <*> (o .:? "marketplacePublisherProfileId")-                     <*> (o .:? "publisherProvidedForecast")-                     <*> (o .:? "labels" .!= mempty)-                     <*> (o .:? "creatorRole")-                     <*> (o .:? "publisherProfileId")-                     <*> (o .:? "legacyOfferId")-                     <*> (o .:? "productId")-                     <*> (o .:? "buyer"))--instance ToJSON Product where-        toJSON Product'{..}-          = object-              (catMaybes-                 [("state" .=) <$> _proState,-                  ("inventorySource" .=) <$> _proInventorySource,-                  ("webPropertyCode" .=) <$> _proWebPropertyCode,-                  ("creationTimeMs" .=) <$> _proCreationTimeMs,-                  ("terms" .=) <$> _proTerms,-                  ("lastUpdateTimeMs" .=) <$> _proLastUpdateTimeMs,-                  Just ("kind" .= _proKind),-                  ("revisionNumber" .=) <$> _proRevisionNumber,-                  ("billedBuyer" .=) <$> _proBilledBuyer,-                  ("privateAuctionId" .=) <$> _proPrivateAuctionId,-                  ("deliveryControl" .=) <$> _proDeliveryControl,-                  ("hasCreatorSignedOff" .=) <$>-                    _proHasCreatorSignedOff,-                  ("flightStartTimeMs" .=) <$> _proFlightStartTimeMs,-                  ("sharedTargetings" .=) <$> _proSharedTargetings,-                  ("seller" .=) <$> _proSeller,-                  ("syndicationProduct" .=) <$> _proSyndicationProduct,-                  ("flightEndTimeMs" .=) <$> _proFlightEndTimeMs,-                  ("name" .=) <$> _proName,-                  ("creatorContacts" .=) <$> _proCreatorContacts,-                  ("marketplacePublisherProfileId" .=) <$>-                    _proMarketplacePublisherProFileId,-                  ("publisherProvidedForecast" .=) <$>-                    _proPublisherProvidedForecast,-                  ("labels" .=) <$> _proLabels,-                  ("creatorRole" .=) <$> _proCreatorRole,-                  ("publisherProfileId" .=) <$> _proPublisherProFileId,-                  ("legacyOfferId" .=) <$> _proLegacyOfferId,-                  ("productId" .=) <$> _proProductId,-                  ("buyer" .=) <$> _proBuyer])------- /See:/ 'creativeServingRestrictionsItem' smart constructor.-data CreativeServingRestrictionsItem =-  CreativeServingRestrictionsItem'-    { _csriContexts           :: !(Maybe [CreativeServingRestrictionsItemContextsItem])-    , _csriReason             :: !(Maybe Text)-    , _csriDisApprovalReasons :: !(Maybe [CreativeServingRestrictionsItemDisApprovalReasonsItem])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CreativeServingRestrictionsItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'csriContexts'------ * 'csriReason'------ * 'csriDisApprovalReasons'-creativeServingRestrictionsItem-    :: CreativeServingRestrictionsItem-creativeServingRestrictionsItem =-  CreativeServingRestrictionsItem'-    { _csriContexts = Nothing-    , _csriReason = Nothing-    , _csriDisApprovalReasons = Nothing-    }----- | All known contexts\/restrictions.-csriContexts :: Lens' CreativeServingRestrictionsItem [CreativeServingRestrictionsItemContextsItem]-csriContexts-  = lens _csriContexts (\ s a -> s{_csriContexts = a})-      . _Default-      . _Coerce---- | Why the creative is ineligible to serve in this context (e.g., it has--- been explicitly disapproved or is pending review).-csriReason :: Lens' CreativeServingRestrictionsItem (Maybe Text)-csriReason-  = lens _csriReason (\ s a -> s{_csriReason = a})---- | The reasons for disapproval within this restriction, if any. Note that--- not all disapproval reasons may be categorized, so it is possible for--- the creative to have a status of DISAPPROVED or CONDITIONALLY_APPROVED--- with an empty list for disapproval_reasons. In this case, please reach--- out to your TAM to help debug the issue.-csriDisApprovalReasons :: Lens' CreativeServingRestrictionsItem [CreativeServingRestrictionsItemDisApprovalReasonsItem]-csriDisApprovalReasons-  = lens _csriDisApprovalReasons-      (\ s a -> s{_csriDisApprovalReasons = a})-      . _Default-      . _Coerce--instance FromJSON CreativeServingRestrictionsItem-         where-        parseJSON-          = withObject "CreativeServingRestrictionsItem"-              (\ o ->-                 CreativeServingRestrictionsItem' <$>-                   (o .:? "contexts" .!= mempty) <*> (o .:? "reason")-                     <*> (o .:? "disapprovalReasons" .!= mempty))--instance ToJSON CreativeServingRestrictionsItem where-        toJSON CreativeServingRestrictionsItem'{..}-          = object-              (catMaybes-                 [("contexts" .=) <$> _csriContexts,-                  ("reason" .=) <$> _csriReason,-                  ("disapprovalReasons" .=) <$>-                    _csriDisApprovalReasons])------- /See:/ 'deleteOrderDealsResponse' smart constructor.-data DeleteOrderDealsResponse =-  DeleteOrderDealsResponse'-    { _dDeals                  :: !(Maybe [MarketplaceDeal])-    , _dProposalRevisionNumber :: !(Maybe (Textual Int64))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteOrderDealsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dDeals'------ * 'dProposalRevisionNumber'-deleteOrderDealsResponse-    :: DeleteOrderDealsResponse-deleteOrderDealsResponse =-  DeleteOrderDealsResponse'-    {_dDeals = Nothing, _dProposalRevisionNumber = Nothing}----- | List of deals deleted (in the same proposal as passed in the request)-dDeals :: Lens' DeleteOrderDealsResponse [MarketplaceDeal]-dDeals-  = lens _dDeals (\ s a -> s{_dDeals = a}) . _Default .-      _Coerce---- | The updated revision number for the proposal.-dProposalRevisionNumber :: Lens' DeleteOrderDealsResponse (Maybe Int64)-dProposalRevisionNumber-  = lens _dProposalRevisionNumber-      (\ s a -> s{_dProposalRevisionNumber = a})-      . mapping _Coerce--instance FromJSON DeleteOrderDealsResponse where-        parseJSON-          = withObject "DeleteOrderDealsResponse"-              (\ o ->-                 DeleteOrderDealsResponse' <$>-                   (o .:? "deals" .!= mempty) <*>-                     (o .:? "proposalRevisionNumber"))--instance ToJSON DeleteOrderDealsResponse where-        toJSON DeleteOrderDealsResponse'{..}-          = object-              (catMaybes-                 [("deals" .=) <$> _dDeals,-                  ("proposalRevisionNumber" .=) <$>-                    _dProposalRevisionNumber])------- /See:/ 'pretargetingConfigPlacementsItem' smart constructor.-data PretargetingConfigPlacementsItem =-  PretargetingConfigPlacementsItem'-    { _pcpiToken :: !(Maybe Text)-    , _pcpiType  :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PretargetingConfigPlacementsItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pcpiToken'------ * 'pcpiType'-pretargetingConfigPlacementsItem-    :: PretargetingConfigPlacementsItem-pretargetingConfigPlacementsItem =-  PretargetingConfigPlacementsItem' {_pcpiToken = Nothing, _pcpiType = Nothing}----- | The value of the placement. Interpretation depends on the placement--- type, e.g. URL for a site placement, channel name for a channel--- placement, app id for a mobile app placement.-pcpiToken :: Lens' PretargetingConfigPlacementsItem (Maybe Text)-pcpiToken-  = lens _pcpiToken (\ s a -> s{_pcpiToken = a})---- | The type of the placement.-pcpiType :: Lens' PretargetingConfigPlacementsItem (Maybe Text)-pcpiType = lens _pcpiType (\ s a -> s{_pcpiType = a})--instance FromJSON PretargetingConfigPlacementsItem-         where-        parseJSON-          = withObject "PretargetingConfigPlacementsItem"-              (\ o ->-                 PretargetingConfigPlacementsItem' <$>-                   (o .:? "token") <*> (o .:? "type"))--instance ToJSON PretargetingConfigPlacementsItem-         where-        toJSON PretargetingConfigPlacementsItem'{..}-          = object-              (catMaybes-                 [("token" .=) <$> _pcpiToken,-                  ("type" .=) <$> _pcpiType])------- /See:/ 'publisherProFileAPIProto' smart constructor.-data PublisherProFileAPIProto =-  PublisherProFileAPIProto'-    { _ppfapAudience                  :: !(Maybe Text)-    , _ppfapState                     :: !(Maybe Text)-    , _ppfapMediaKitLink              :: !(Maybe Text)-    , _ppfapDirectContact             :: !(Maybe Text)-    , _ppfapSamplePageLink            :: !(Maybe Text)-    , _ppfapLogoURL                   :: !(Maybe Text)-    , _ppfapKind                      :: !Text-    , _ppfapExchange                  :: !(Maybe Text)-    , _ppfapOverview                  :: !(Maybe Text)-    , _ppfapGooglePlusLink            :: !(Maybe Text)-    , _ppfapProFileId                 :: !(Maybe (Textual Int32))-    , _ppfapIsParent                  :: !(Maybe Bool)-    , _ppfapSeller                    :: !(Maybe Seller)-    , _ppfapName                      :: !(Maybe Text)-    , _ppfapBuyerPitchStatement       :: !(Maybe Text)-    , _ppfapPublisherProvidedForecast :: !(Maybe PublisherProvidedForecast)-    , _ppfapIsPublished               :: !(Maybe Bool)-    , _ppfapPublisherDomains          :: !(Maybe [Text])-    , _ppfapPublisherProFileId        :: !(Maybe Text)-    , _ppfapRateCardInfoLink          :: !(Maybe Text)-    , _ppfapTopHeadlines              :: !(Maybe [Text])-    , _ppfapProgrammaticContact       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PublisherProFileAPIProto' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ppfapAudience'------ * 'ppfapState'------ * 'ppfapMediaKitLink'------ * 'ppfapDirectContact'------ * 'ppfapSamplePageLink'------ * 'ppfapLogoURL'------ * 'ppfapKind'------ * 'ppfapExchange'------ * 'ppfapOverview'------ * 'ppfapGooglePlusLink'------ * 'ppfapProFileId'------ * 'ppfapIsParent'------ * 'ppfapSeller'------ * 'ppfapName'------ * 'ppfapBuyerPitchStatement'------ * 'ppfapPublisherProvidedForecast'------ * 'ppfapIsPublished'------ * 'ppfapPublisherDomains'------ * 'ppfapPublisherProFileId'------ * 'ppfapRateCardInfoLink'------ * 'ppfapTopHeadlines'------ * 'ppfapProgrammaticContact'-publisherProFileAPIProto-    :: PublisherProFileAPIProto-publisherProFileAPIProto =-  PublisherProFileAPIProto'-    { _ppfapAudience = Nothing-    , _ppfapState = Nothing-    , _ppfapMediaKitLink = Nothing-    , _ppfapDirectContact = Nothing-    , _ppfapSamplePageLink = Nothing-    , _ppfapLogoURL = Nothing-    , _ppfapKind = "adexchangebuyer#publisherProfileApiProto"-    , _ppfapExchange = Nothing-    , _ppfapOverview = Nothing-    , _ppfapGooglePlusLink = Nothing-    , _ppfapProFileId = Nothing-    , _ppfapIsParent = Nothing-    , _ppfapSeller = Nothing-    , _ppfapName = Nothing-    , _ppfapBuyerPitchStatement = Nothing-    , _ppfapPublisherProvidedForecast = Nothing-    , _ppfapIsPublished = Nothing-    , _ppfapPublisherDomains = Nothing-    , _ppfapPublisherProFileId = Nothing-    , _ppfapRateCardInfoLink = Nothing-    , _ppfapTopHeadlines = Nothing-    , _ppfapProgrammaticContact = Nothing-    }----- | Publisher provided info on its audience.-ppfapAudience :: Lens' PublisherProFileAPIProto (Maybe Text)-ppfapAudience-  = lens _ppfapAudience-      (\ s a -> s{_ppfapAudience = a})---- | State of the publisher profile.-ppfapState :: Lens' PublisherProFileAPIProto (Maybe Text)-ppfapState-  = lens _ppfapState (\ s a -> s{_ppfapState = a})---- | The url for additional marketing and sales materials.-ppfapMediaKitLink :: Lens' PublisherProFileAPIProto (Maybe Text)-ppfapMediaKitLink-  = lens _ppfapMediaKitLink-      (\ s a -> s{_ppfapMediaKitLink = a})---- | Direct contact for the publisher profile.-ppfapDirectContact :: Lens' PublisherProFileAPIProto (Maybe Text)-ppfapDirectContact-  = lens _ppfapDirectContact-      (\ s a -> s{_ppfapDirectContact = a})---- | Link for a sample content page.-ppfapSamplePageLink :: Lens' PublisherProFileAPIProto (Maybe Text)-ppfapSamplePageLink-  = lens _ppfapSamplePageLink-      (\ s a -> s{_ppfapSamplePageLink = a})---- | The url to the logo for the publisher.-ppfapLogoURL :: Lens' PublisherProFileAPIProto (Maybe Text)-ppfapLogoURL-  = lens _ppfapLogoURL (\ s a -> s{_ppfapLogoURL = a})---- | Identifies what kind of resource this is. Value: the fixed string--- \"adexchangebuyer#publisherProfileApiProto\".-ppfapKind :: Lens' PublisherProFileAPIProto Text-ppfapKind-  = lens _ppfapKind (\ s a -> s{_ppfapKind = a})---- | Exchange where this publisher profile is from. E.g. AdX, Rubicon etc...-ppfapExchange :: Lens' PublisherProFileAPIProto (Maybe Text)-ppfapExchange-  = lens _ppfapExchange-      (\ s a -> s{_ppfapExchange = a})---- | Publisher provided overview.-ppfapOverview :: Lens' PublisherProFileAPIProto (Maybe Text)-ppfapOverview-  = lens _ppfapOverview-      (\ s a -> s{_ppfapOverview = a})---- | Link to publisher\'s Google+ page.-ppfapGooglePlusLink :: Lens' PublisherProFileAPIProto (Maybe Text)-ppfapGooglePlusLink-  = lens _ppfapGooglePlusLink-      (\ s a -> s{_ppfapGooglePlusLink = a})---- | The pair of (seller.account_id, profile_id) uniquely identifies a--- publisher profile for a given publisher.-ppfapProFileId :: Lens' PublisherProFileAPIProto (Maybe Int32)-ppfapProFileId-  = lens _ppfapProFileId-      (\ s a -> s{_ppfapProFileId = a})-      . mapping _Coerce---- | True, if this is the parent profile, which represents all domains owned--- by the publisher.-ppfapIsParent :: Lens' PublisherProFileAPIProto (Maybe Bool)-ppfapIsParent-  = lens _ppfapIsParent-      (\ s a -> s{_ppfapIsParent = a})---- | Seller of the publisher profile.-ppfapSeller :: Lens' PublisherProFileAPIProto (Maybe Seller)-ppfapSeller-  = lens _ppfapSeller (\ s a -> s{_ppfapSeller = a})--ppfapName :: Lens' PublisherProFileAPIProto (Maybe Text)-ppfapName-  = lens _ppfapName (\ s a -> s{_ppfapName = a})---- | A pitch statement for the buyer-ppfapBuyerPitchStatement :: Lens' PublisherProFileAPIProto (Maybe Text)-ppfapBuyerPitchStatement-  = lens _ppfapBuyerPitchStatement-      (\ s a -> s{_ppfapBuyerPitchStatement = a})---- | Publisher provided forecasting information.-ppfapPublisherProvidedForecast :: Lens' PublisherProFileAPIProto (Maybe PublisherProvidedForecast)-ppfapPublisherProvidedForecast-  = lens _ppfapPublisherProvidedForecast-      (\ s a -> s{_ppfapPublisherProvidedForecast = a})---- | True, if this profile is published. Deprecated for state.-ppfapIsPublished :: Lens' PublisherProFileAPIProto (Maybe Bool)-ppfapIsPublished-  = lens _ppfapIsPublished-      (\ s a -> s{_ppfapIsPublished = a})---- | The list of domains represented in this publisher profile. Empty if this--- is a parent profile.-ppfapPublisherDomains :: Lens' PublisherProFileAPIProto [Text]-ppfapPublisherDomains-  = lens _ppfapPublisherDomains-      (\ s a -> s{_ppfapPublisherDomains = a})-      . _Default-      . _Coerce---- | Unique Id for publisher profile.-ppfapPublisherProFileId :: Lens' PublisherProFileAPIProto (Maybe Text)-ppfapPublisherProFileId-  = lens _ppfapPublisherProFileId-      (\ s a -> s{_ppfapPublisherProFileId = a})---- | Link to publisher rate card-ppfapRateCardInfoLink :: Lens' PublisherProFileAPIProto (Maybe Text)-ppfapRateCardInfoLink-  = lens _ppfapRateCardInfoLink-      (\ s a -> s{_ppfapRateCardInfoLink = a})---- | Publisher provided key metrics and rankings.-ppfapTopHeadlines :: Lens' PublisherProFileAPIProto [Text]-ppfapTopHeadlines-  = lens _ppfapTopHeadlines-      (\ s a -> s{_ppfapTopHeadlines = a})-      . _Default-      . _Coerce---- | Programmatic contact for the publisher profile.-ppfapProgrammaticContact :: Lens' PublisherProFileAPIProto (Maybe Text)-ppfapProgrammaticContact-  = lens _ppfapProgrammaticContact-      (\ s a -> s{_ppfapProgrammaticContact = a})--instance FromJSON PublisherProFileAPIProto where-        parseJSON-          = withObject "PublisherProFileAPIProto"-              (\ o ->-                 PublisherProFileAPIProto' <$>-                   (o .:? "audience") <*> (o .:? "state") <*>-                     (o .:? "mediaKitLink")-                     <*> (o .:? "directContact")-                     <*> (o .:? "samplePageLink")-                     <*> (o .:? "logoUrl")-                     <*>-                     (o .:? "kind" .!=-                        "adexchangebuyer#publisherProfileApiProto")-                     <*> (o .:? "exchange")-                     <*> (o .:? "overview")-                     <*> (o .:? "googlePlusLink")-                     <*> (o .:? "profileId")-                     <*> (o .:? "isParent")-                     <*> (o .:? "seller")-                     <*> (o .:? "name")-                     <*> (o .:? "buyerPitchStatement")-                     <*> (o .:? "publisherProvidedForecast")-                     <*> (o .:? "isPublished")-                     <*> (o .:? "publisherDomains" .!= mempty)-                     <*> (o .:? "publisherProfileId")-                     <*> (o .:? "rateCardInfoLink")-                     <*> (o .:? "topHeadlines" .!= mempty)-                     <*> (o .:? "programmaticContact"))--instance ToJSON PublisherProFileAPIProto where-        toJSON PublisherProFileAPIProto'{..}-          = object-              (catMaybes-                 [("audience" .=) <$> _ppfapAudience,-                  ("state" .=) <$> _ppfapState,-                  ("mediaKitLink" .=) <$> _ppfapMediaKitLink,-                  ("directContact" .=) <$> _ppfapDirectContact,-                  ("samplePageLink" .=) <$> _ppfapSamplePageLink,-                  ("logoUrl" .=) <$> _ppfapLogoURL,-                  Just ("kind" .= _ppfapKind),-                  ("exchange" .=) <$> _ppfapExchange,-                  ("overview" .=) <$> _ppfapOverview,-                  ("googlePlusLink" .=) <$> _ppfapGooglePlusLink,-                  ("profileId" .=) <$> _ppfapProFileId,-                  ("isParent" .=) <$> _ppfapIsParent,-                  ("seller" .=) <$> _ppfapSeller,-                  ("name" .=) <$> _ppfapName,-                  ("buyerPitchStatement" .=) <$>-                    _ppfapBuyerPitchStatement,-                  ("publisherProvidedForecast" .=) <$>-                    _ppfapPublisherProvidedForecast,-                  ("isPublished" .=) <$> _ppfapIsPublished,-                  ("publisherDomains" .=) <$> _ppfapPublisherDomains,-                  ("publisherProfileId" .=) <$>-                    _ppfapPublisherProFileId,-                  ("rateCardInfoLink" .=) <$> _ppfapRateCardInfoLink,-                  ("topHeadlines" .=) <$> _ppfapTopHeadlines,-                  ("programmaticContact" .=) <$>-                    _ppfapProgrammaticContact])---- | A proposal can contain multiple deals. A deal contains the terms and--- targeting information that is used for serving.------ /See:/ 'marketplaceDeal' smart constructor.-data MarketplaceDeal =-  MarketplaceDeal'-    { _mdExternalDealId                 :: !(Maybe Text)-    , _mdBuyerPrivateData               :: !(Maybe PrivateData)-    , _mdIsSetupComplete                :: !(Maybe Bool)-    , _mdWebPropertyCode                :: !(Maybe Text)-    , _mdCreationTimeMs                 :: !(Maybe (Textual Int64))-    , _mdTerms                          :: !(Maybe DealTerms)-    , _mdLastUpdateTimeMs               :: !(Maybe (Textual Int64))-    , _mdKind                           :: !Text-    , _mdDeliveryControl                :: !(Maybe DeliveryControl)-    , _mdDealServingMetadata            :: !(Maybe DealServingMetadata)-    , _mdFlightStartTimeMs              :: !(Maybe (Textual Int64))-    , _mdSharedTargetings               :: !(Maybe [SharedTargeting])-    , _mdIsRfpTemplate                  :: !(Maybe Bool)-    , _mdProposalId                     :: !(Maybe Text)-    , _mdDealId                         :: !(Maybe Text)-    , _mdInventoryDescription           :: !(Maybe Text)-    , _mdSyndicationProduct             :: !(Maybe Text)-    , _mdFlightEndTimeMs                :: !(Maybe (Textual Int64))-    , _mdName                           :: !(Maybe Text)-    , _mdSellerContacts                 :: !(Maybe [ContactInformation])-    , _mdProgrammaticCreativeSource     :: !(Maybe Text)-    , _mdCreativePreApprovalPolicy      :: !(Maybe Text)-    , _mdProductRevisionNumber          :: !(Maybe (Textual Int64))-    , _mdProductId                      :: !(Maybe Text)-    , _mdCreativeSafeFrameCompatibility :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'MarketplaceDeal' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mdExternalDealId'------ * 'mdBuyerPrivateData'------ * 'mdIsSetupComplete'------ * 'mdWebPropertyCode'------ * 'mdCreationTimeMs'------ * 'mdTerms'------ * 'mdLastUpdateTimeMs'------ * 'mdKind'------ * 'mdDeliveryControl'------ * 'mdDealServingMetadata'------ * 'mdFlightStartTimeMs'------ * 'mdSharedTargetings'------ * 'mdIsRfpTemplate'------ * 'mdProposalId'------ * 'mdDealId'------ * 'mdInventoryDescription'------ * 'mdSyndicationProduct'------ * 'mdFlightEndTimeMs'------ * 'mdName'------ * 'mdSellerContacts'------ * 'mdProgrammaticCreativeSource'------ * 'mdCreativePreApprovalPolicy'------ * 'mdProductRevisionNumber'------ * 'mdProductId'------ * 'mdCreativeSafeFrameCompatibility'-marketplaceDeal-    :: MarketplaceDeal-marketplaceDeal =-  MarketplaceDeal'-    { _mdExternalDealId = Nothing-    , _mdBuyerPrivateData = Nothing-    , _mdIsSetupComplete = Nothing-    , _mdWebPropertyCode = Nothing-    , _mdCreationTimeMs = Nothing-    , _mdTerms = Nothing-    , _mdLastUpdateTimeMs = Nothing-    , _mdKind = "adexchangebuyer#marketplaceDeal"-    , _mdDeliveryControl = Nothing-    , _mdDealServingMetadata = Nothing-    , _mdFlightStartTimeMs = Nothing-    , _mdSharedTargetings = Nothing-    , _mdIsRfpTemplate = Nothing-    , _mdProposalId = Nothing-    , _mdDealId = Nothing-    , _mdInventoryDescription = Nothing-    , _mdSyndicationProduct = Nothing-    , _mdFlightEndTimeMs = Nothing-    , _mdName = Nothing-    , _mdSellerContacts = Nothing-    , _mdProgrammaticCreativeSource = Nothing-    , _mdCreativePreApprovalPolicy = Nothing-    , _mdProductRevisionNumber = Nothing-    , _mdProductId = Nothing-    , _mdCreativeSafeFrameCompatibility = Nothing-    }----- | The external deal id assigned to this deal once the deal is finalized.--- This is the deal-id that shows up in serving\/reporting etc. (readonly)-mdExternalDealId :: Lens' MarketplaceDeal (Maybe Text)-mdExternalDealId-  = lens _mdExternalDealId-      (\ s a -> s{_mdExternalDealId = a})---- | Buyer private data (hidden from seller).-mdBuyerPrivateData :: Lens' MarketplaceDeal (Maybe PrivateData)-mdBuyerPrivateData-  = lens _mdBuyerPrivateData-      (\ s a -> s{_mdBuyerPrivateData = a})---- | True, if the buyside inventory setup is complete for this deal.--- (readonly, except via OrderSetupCompleted action)-mdIsSetupComplete :: Lens' MarketplaceDeal (Maybe Bool)-mdIsSetupComplete-  = lens _mdIsSetupComplete-      (\ s a -> s{_mdIsSetupComplete = a})--mdWebPropertyCode :: Lens' MarketplaceDeal (Maybe Text)-mdWebPropertyCode-  = lens _mdWebPropertyCode-      (\ s a -> s{_mdWebPropertyCode = a})---- | The time (ms since epoch) of the deal creation. (readonly)-mdCreationTimeMs :: Lens' MarketplaceDeal (Maybe Int64)-mdCreationTimeMs-  = lens _mdCreationTimeMs-      (\ s a -> s{_mdCreationTimeMs = a})-      . mapping _Coerce---- | The negotiable terms of the deal. (updatable)-mdTerms :: Lens' MarketplaceDeal (Maybe DealTerms)-mdTerms = lens _mdTerms (\ s a -> s{_mdTerms = a})---- | The time (ms since epoch) when the deal was last updated. (readonly)-mdLastUpdateTimeMs :: Lens' MarketplaceDeal (Maybe Int64)-mdLastUpdateTimeMs-  = lens _mdLastUpdateTimeMs-      (\ s a -> s{_mdLastUpdateTimeMs = a})-      . mapping _Coerce---- | Identifies what kind of resource this is. Value: the fixed string--- \"adexchangebuyer#marketplaceDeal\".-mdKind :: Lens' MarketplaceDeal Text-mdKind = lens _mdKind (\ s a -> s{_mdKind = a})---- | The set of fields around delivery control that are interesting for a--- buyer to see but are non-negotiable. These are set by the publisher.--- This message is assigned an id of 100 since some day we would want to--- model this as a protobuf extension.-mdDeliveryControl :: Lens' MarketplaceDeal (Maybe DeliveryControl)-mdDeliveryControl-  = lens _mdDeliveryControl-      (\ s a -> s{_mdDeliveryControl = a})---- | Metadata about the serving status of this deal (readonly, writes via--- custom actions)-mdDealServingMetadata :: Lens' MarketplaceDeal (Maybe DealServingMetadata)-mdDealServingMetadata-  = lens _mdDealServingMetadata-      (\ s a -> s{_mdDealServingMetadata = a})---- | Proposed flight start time of the deal (ms since epoch) This will--- generally be stored in a granularity of a second. (updatable)-mdFlightStartTimeMs :: Lens' MarketplaceDeal (Maybe Int64)-mdFlightStartTimeMs-  = lens _mdFlightStartTimeMs-      (\ s a -> s{_mdFlightStartTimeMs = a})-      . mapping _Coerce---- | The shared targeting visible to buyers and sellers. Each shared--- targeting entity is AND\'d together. (updatable)-mdSharedTargetings :: Lens' MarketplaceDeal [SharedTargeting]-mdSharedTargetings-  = lens _mdSharedTargetings-      (\ s a -> s{_mdSharedTargetings = a})-      . _Default-      . _Coerce---- | Indicates whether the current deal is a RFP template. RFP template is--- created by buyer and not based on seller created products.-mdIsRfpTemplate :: Lens' MarketplaceDeal (Maybe Bool)-mdIsRfpTemplate-  = lens _mdIsRfpTemplate-      (\ s a -> s{_mdIsRfpTemplate = a})--mdProposalId :: Lens' MarketplaceDeal (Maybe Text)-mdProposalId-  = lens _mdProposalId (\ s a -> s{_mdProposalId = a})---- | A unique deal-id for the deal (readonly).-mdDealId :: Lens' MarketplaceDeal (Maybe Text)-mdDealId = lens _mdDealId (\ s a -> s{_mdDealId = a})---- | Description for the deal terms. (buyer-readonly)-mdInventoryDescription :: Lens' MarketplaceDeal (Maybe Text)-mdInventoryDescription-  = lens _mdInventoryDescription-      (\ s a -> s{_mdInventoryDescription = a})---- | The syndication product associated with the deal. (readonly, except on--- create)-mdSyndicationProduct :: Lens' MarketplaceDeal (Maybe Text)-mdSyndicationProduct-  = lens _mdSyndicationProduct-      (\ s a -> s{_mdSyndicationProduct = a})---- | Proposed flight end time of the deal (ms since epoch) This will--- generally be stored in a granularity of a second. (updatable)-mdFlightEndTimeMs :: Lens' MarketplaceDeal (Maybe Int64)-mdFlightEndTimeMs-  = lens _mdFlightEndTimeMs-      (\ s a -> s{_mdFlightEndTimeMs = a})-      . mapping _Coerce---- | The name of the deal. (updatable)-mdName :: Lens' MarketplaceDeal (Maybe Text)-mdName = lens _mdName (\ s a -> s{_mdName = a})---- | Optional Seller contact information for the deal (buyer-readonly)-mdSellerContacts :: Lens' MarketplaceDeal [ContactInformation]-mdSellerContacts-  = lens _mdSellerContacts-      (\ s a -> s{_mdSellerContacts = a})-      . _Default-      . _Coerce---- | Specifies the creative source for programmatic deals, PUBLISHER means--- creative is provided by seller and ADVERTISR means creative is provided--- by buyer. (buyer-readonly)-mdProgrammaticCreativeSource :: Lens' MarketplaceDeal (Maybe Text)-mdProgrammaticCreativeSource-  = lens _mdProgrammaticCreativeSource-      (\ s a -> s{_mdProgrammaticCreativeSource = a})---- | Specifies the creative pre-approval policy (buyer-readonly)-mdCreativePreApprovalPolicy :: Lens' MarketplaceDeal (Maybe Text)-mdCreativePreApprovalPolicy-  = lens _mdCreativePreApprovalPolicy-      (\ s a -> s{_mdCreativePreApprovalPolicy = a})---- | The revision number of the product that the deal was created from--- (readonly, except on create)-mdProductRevisionNumber :: Lens' MarketplaceDeal (Maybe Int64)-mdProductRevisionNumber-  = lens _mdProductRevisionNumber-      (\ s a -> s{_mdProductRevisionNumber = a})-      . mapping _Coerce---- | The product-id from which this deal was created. (readonly, except on--- create)-mdProductId :: Lens' MarketplaceDeal (Maybe Text)-mdProductId-  = lens _mdProductId (\ s a -> s{_mdProductId = a})---- | Specifies whether the creative is safeFrame compatible (buyer-readonly)-mdCreativeSafeFrameCompatibility :: Lens' MarketplaceDeal (Maybe Text)-mdCreativeSafeFrameCompatibility-  = lens _mdCreativeSafeFrameCompatibility-      (\ s a -> s{_mdCreativeSafeFrameCompatibility = a})--instance FromJSON MarketplaceDeal where-        parseJSON-          = withObject "MarketplaceDeal"-              (\ o ->-                 MarketplaceDeal' <$>-                   (o .:? "externalDealId") <*>-                     (o .:? "buyerPrivateData")-                     <*> (o .:? "isSetupComplete")-                     <*> (o .:? "webPropertyCode")-                     <*> (o .:? "creationTimeMs")-                     <*> (o .:? "terms")-                     <*> (o .:? "lastUpdateTimeMs")-                     <*>-                     (o .:? "kind" .!= "adexchangebuyer#marketplaceDeal")-                     <*> (o .:? "deliveryControl")-                     <*> (o .:? "dealServingMetadata")-                     <*> (o .:? "flightStartTimeMs")-                     <*> (o .:? "sharedTargetings" .!= mempty)-                     <*> (o .:? "isRfpTemplate")-                     <*> (o .:? "proposalId")-                     <*> (o .:? "dealId")-                     <*> (o .:? "inventoryDescription")-                     <*> (o .:? "syndicationProduct")-                     <*> (o .:? "flightEndTimeMs")-                     <*> (o .:? "name")-                     <*> (o .:? "sellerContacts" .!= mempty)-                     <*> (o .:? "programmaticCreativeSource")-                     <*> (o .:? "creativePreApprovalPolicy")-                     <*> (o .:? "productRevisionNumber")-                     <*> (o .:? "productId")-                     <*> (o .:? "creativeSafeFrameCompatibility"))--instance ToJSON MarketplaceDeal where-        toJSON MarketplaceDeal'{..}-          = object-              (catMaybes-                 [("externalDealId" .=) <$> _mdExternalDealId,-                  ("buyerPrivateData" .=) <$> _mdBuyerPrivateData,-                  ("isSetupComplete" .=) <$> _mdIsSetupComplete,-                  ("webPropertyCode" .=) <$> _mdWebPropertyCode,-                  ("creationTimeMs" .=) <$> _mdCreationTimeMs,-                  ("terms" .=) <$> _mdTerms,-                  ("lastUpdateTimeMs" .=) <$> _mdLastUpdateTimeMs,-                  Just ("kind" .= _mdKind),-                  ("deliveryControl" .=) <$> _mdDeliveryControl,-                  ("dealServingMetadata" .=) <$>-                    _mdDealServingMetadata,-                  ("flightStartTimeMs" .=) <$> _mdFlightStartTimeMs,-                  ("sharedTargetings" .=) <$> _mdSharedTargetings,-                  ("isRfpTemplate" .=) <$> _mdIsRfpTemplate,-                  ("proposalId" .=) <$> _mdProposalId,-                  ("dealId" .=) <$> _mdDealId,-                  ("inventoryDescription" .=) <$>-                    _mdInventoryDescription,-                  ("syndicationProduct" .=) <$> _mdSyndicationProduct,-                  ("flightEndTimeMs" .=) <$> _mdFlightEndTimeMs,-                  ("name" .=) <$> _mdName,-                  ("sellerContacts" .=) <$> _mdSellerContacts,-                  ("programmaticCreativeSource" .=) <$>-                    _mdProgrammaticCreativeSource,-                  ("creativePreApprovalPolicy" .=) <$>-                    _mdCreativePreApprovalPolicy,-                  ("productRevisionNumber" .=) <$>-                    _mdProductRevisionNumber,-                  ("productId" .=) <$> _mdProductId,-                  ("creativeSafeFrameCompatibility" .=) <$>-                    _mdCreativeSafeFrameCompatibility])------- /See:/ 'getOffersResponse' smart constructor.-newtype GetOffersResponse =-  GetOffersResponse'-    { _gorProducts :: Maybe [Product]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GetOffersResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gorProducts'-getOffersResponse-    :: GetOffersResponse-getOffersResponse = GetOffersResponse' {_gorProducts = Nothing}----- | The returned list of products.-gorProducts :: Lens' GetOffersResponse [Product]-gorProducts-  = lens _gorProducts (\ s a -> s{_gorProducts = a}) .-      _Default-      . _Coerce--instance FromJSON GetOffersResponse where-        parseJSON-          = withObject "GetOffersResponse"-              (\ o ->-                 GetOffersResponse' <$> (o .:? "products" .!= mempty))--instance ToJSON GetOffersResponse where-        toJSON GetOffersResponse'{..}-          = object-              (catMaybes [("products" .=) <$> _gorProducts])------- /See:/ 'dealTermsNonGuaranteedAuctionTerms' smart constructor.-data DealTermsNonGuaranteedAuctionTerms =-  DealTermsNonGuaranteedAuctionTerms'-    { _dtngatReservePricePerBuyers      :: !(Maybe [PricePerBuyer])-    , _dtngatAutoOptimizePrivateAuction :: !(Maybe Bool)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DealTermsNonGuaranteedAuctionTerms' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dtngatReservePricePerBuyers'------ * 'dtngatAutoOptimizePrivateAuction'-dealTermsNonGuaranteedAuctionTerms-    :: DealTermsNonGuaranteedAuctionTerms-dealTermsNonGuaranteedAuctionTerms =-  DealTermsNonGuaranteedAuctionTerms'-    { _dtngatReservePricePerBuyers = Nothing-    , _dtngatAutoOptimizePrivateAuction = Nothing-    }----- | Reserve price for the specified buyer.-dtngatReservePricePerBuyers :: Lens' DealTermsNonGuaranteedAuctionTerms [PricePerBuyer]-dtngatReservePricePerBuyers-  = lens _dtngatReservePricePerBuyers-      (\ s a -> s{_dtngatReservePricePerBuyers = a})-      . _Default-      . _Coerce---- | True if open auction buyers are allowed to compete with invited buyers--- in this private auction (buyer-readonly).-dtngatAutoOptimizePrivateAuction :: Lens' DealTermsNonGuaranteedAuctionTerms (Maybe Bool)-dtngatAutoOptimizePrivateAuction-  = lens _dtngatAutoOptimizePrivateAuction-      (\ s a -> s{_dtngatAutoOptimizePrivateAuction = a})--instance FromJSON DealTermsNonGuaranteedAuctionTerms-         where-        parseJSON-          = withObject "DealTermsNonGuaranteedAuctionTerms"-              (\ o ->-                 DealTermsNonGuaranteedAuctionTerms' <$>-                   (o .:? "reservePricePerBuyers" .!= mempty) <*>-                     (o .:? "autoOptimizePrivateAuction"))--instance ToJSON DealTermsNonGuaranteedAuctionTerms-         where-        toJSON DealTermsNonGuaranteedAuctionTerms'{..}-          = object-              (catMaybes-                 [("reservePricePerBuyers" .=) <$>-                    _dtngatReservePricePerBuyers,-                  ("autoOptimizePrivateAuction" .=) <$>-                    _dtngatAutoOptimizePrivateAuction])------- /See:/ 'creativeFilteringReasonsReasonsItem' smart constructor.-data CreativeFilteringReasonsReasonsItem =-  CreativeFilteringReasonsReasonsItem'-    { _cfrriFilteringStatus :: !(Maybe (Textual Int32))-    , _cfrriFilteringCount  :: !(Maybe (Textual Int64))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CreativeFilteringReasonsReasonsItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cfrriFilteringStatus'------ * 'cfrriFilteringCount'-creativeFilteringReasonsReasonsItem-    :: CreativeFilteringReasonsReasonsItem-creativeFilteringReasonsReasonsItem =-  CreativeFilteringReasonsReasonsItem'-    {_cfrriFilteringStatus = Nothing, _cfrriFilteringCount = Nothing}----- | The filtering status code as defined in creative-status-codes.txt.-cfrriFilteringStatus :: Lens' CreativeFilteringReasonsReasonsItem (Maybe Int32)-cfrriFilteringStatus-  = lens _cfrriFilteringStatus-      (\ s a -> s{_cfrriFilteringStatus = a})-      . mapping _Coerce---- | The number of times the creative was filtered for the status. The count--- is aggregated across all publishers on the exchange.-cfrriFilteringCount :: Lens' CreativeFilteringReasonsReasonsItem (Maybe Int64)-cfrriFilteringCount-  = lens _cfrriFilteringCount-      (\ s a -> s{_cfrriFilteringCount = a})-      . mapping _Coerce--instance FromJSON CreativeFilteringReasonsReasonsItem-         where-        parseJSON-          = withObject "CreativeFilteringReasonsReasonsItem"-              (\ o ->-                 CreativeFilteringReasonsReasonsItem' <$>-                   (o .:? "filteringStatus") <*>-                     (o .:? "filteringCount"))--instance ToJSON CreativeFilteringReasonsReasonsItem-         where-        toJSON CreativeFilteringReasonsReasonsItem'{..}-          = object-              (catMaybes-                 [("filteringStatus" .=) <$> _cfrriFilteringStatus,-                  ("filteringCount" .=) <$> _cfrriFilteringCount])------- /See:/ 'dealTerms' smart constructor.-data DealTerms =-  DealTerms'-    { _dtEstimatedGrossSpend           :: !(Maybe Price)-    , _dtNonGuaranteedFixedPriceTerms  :: !(Maybe DealTermsNonGuaranteedFixedPriceTerms)-    , _dtNonGuaranteedAuctionTerms     :: !(Maybe DealTermsNonGuaranteedAuctionTerms)-    , _dtRubiconNonGuaranteedTerms     :: !(Maybe DealTermsRubiconNonGuaranteedTerms)-    , _dtBrandingType                  :: !(Maybe Text)-    , _dtCrossListedExternalDealIdType :: !(Maybe Text)-    , _dtEstimatedImpressionsPerDay    :: !(Maybe (Textual Int64))-    , _dtSellerTimeZone                :: !(Maybe Text)-    , _dtGuaranteedFixedPriceTerms     :: !(Maybe DealTermsGuaranteedFixedPriceTerms)-    , _dtDescription                   :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DealTerms' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dtEstimatedGrossSpend'------ * 'dtNonGuaranteedFixedPriceTerms'------ * 'dtNonGuaranteedAuctionTerms'------ * 'dtRubiconNonGuaranteedTerms'------ * 'dtBrandingType'------ * 'dtCrossListedExternalDealIdType'------ * 'dtEstimatedImpressionsPerDay'------ * 'dtSellerTimeZone'------ * 'dtGuaranteedFixedPriceTerms'------ * 'dtDescription'-dealTerms-    :: DealTerms-dealTerms =-  DealTerms'-    { _dtEstimatedGrossSpend = Nothing-    , _dtNonGuaranteedFixedPriceTerms = Nothing-    , _dtNonGuaranteedAuctionTerms = Nothing-    , _dtRubiconNonGuaranteedTerms = Nothing-    , _dtBrandingType = Nothing-    , _dtCrossListedExternalDealIdType = Nothing-    , _dtEstimatedImpressionsPerDay = Nothing-    , _dtSellerTimeZone = Nothing-    , _dtGuaranteedFixedPriceTerms = Nothing-    , _dtDescription = Nothing-    }----- | Non-binding estimate of the estimated gross spend for this deal Can be--- set by buyer or seller.-dtEstimatedGrossSpend :: Lens' DealTerms (Maybe Price)-dtEstimatedGrossSpend-  = lens _dtEstimatedGrossSpend-      (\ s a -> s{_dtEstimatedGrossSpend = a})---- | The terms for non-guaranteed fixed price deals.-dtNonGuaranteedFixedPriceTerms :: Lens' DealTerms (Maybe DealTermsNonGuaranteedFixedPriceTerms)-dtNonGuaranteedFixedPriceTerms-  = lens _dtNonGuaranteedFixedPriceTerms-      (\ s a -> s{_dtNonGuaranteedFixedPriceTerms = a})---- | The terms for non-guaranteed auction deals.-dtNonGuaranteedAuctionTerms :: Lens' DealTerms (Maybe DealTermsNonGuaranteedAuctionTerms)-dtNonGuaranteedAuctionTerms-  = lens _dtNonGuaranteedAuctionTerms-      (\ s a -> s{_dtNonGuaranteedAuctionTerms = a})---- | The terms for rubicon non-guaranteed deals.-dtRubiconNonGuaranteedTerms :: Lens' DealTerms (Maybe DealTermsRubiconNonGuaranteedTerms)-dtRubiconNonGuaranteedTerms-  = lens _dtRubiconNonGuaranteedTerms-      (\ s a -> s{_dtRubiconNonGuaranteedTerms = a})---- | Visibilty of the URL in bid requests.-dtBrandingType :: Lens' DealTerms (Maybe Text)-dtBrandingType-  = lens _dtBrandingType-      (\ s a -> s{_dtBrandingType = a})---- | Indicates that this ExternalDealId exists under at least two different--- AdxInventoryDeals. Currently, the only case that the same ExternalDealId--- will exist is programmatic cross sell case.-dtCrossListedExternalDealIdType :: Lens' DealTerms (Maybe Text)-dtCrossListedExternalDealIdType-  = lens _dtCrossListedExternalDealIdType-      (\ s a -> s{_dtCrossListedExternalDealIdType = a})---- | Non-binding estimate of the impressions served per day Can be set by--- buyer or seller.-dtEstimatedImpressionsPerDay :: Lens' DealTerms (Maybe Int64)-dtEstimatedImpressionsPerDay-  = lens _dtEstimatedImpressionsPerDay-      (\ s a -> s{_dtEstimatedImpressionsPerDay = a})-      . mapping _Coerce---- | For deals with Cost Per Day billing, defines the timezone used to mark--- the boundaries of a day (buyer-readonly)-dtSellerTimeZone :: Lens' DealTerms (Maybe Text)-dtSellerTimeZone-  = lens _dtSellerTimeZone-      (\ s a -> s{_dtSellerTimeZone = a})---- | The terms for guaranteed fixed price deals.-dtGuaranteedFixedPriceTerms :: Lens' DealTerms (Maybe DealTermsGuaranteedFixedPriceTerms)-dtGuaranteedFixedPriceTerms-  = lens _dtGuaranteedFixedPriceTerms-      (\ s a -> s{_dtGuaranteedFixedPriceTerms = a})---- | Description for the proposed terms of the deal.-dtDescription :: Lens' DealTerms (Maybe Text)-dtDescription-  = lens _dtDescription-      (\ s a -> s{_dtDescription = a})--instance FromJSON DealTerms where-        parseJSON-          = withObject "DealTerms"-              (\ o ->-                 DealTerms' <$>-                   (o .:? "estimatedGrossSpend") <*>-                     (o .:? "nonGuaranteedFixedPriceTerms")-                     <*> (o .:? "nonGuaranteedAuctionTerms")-                     <*> (o .:? "rubiconNonGuaranteedTerms")-                     <*> (o .:? "brandingType")-                     <*> (o .:? "crossListedExternalDealIdType")-                     <*> (o .:? "estimatedImpressionsPerDay")-                     <*> (o .:? "sellerTimeZone")-                     <*> (o .:? "guaranteedFixedPriceTerms")-                     <*> (o .:? "description"))--instance ToJSON DealTerms where-        toJSON DealTerms'{..}-          = object-              (catMaybes-                 [("estimatedGrossSpend" .=) <$>-                    _dtEstimatedGrossSpend,-                  ("nonGuaranteedFixedPriceTerms" .=) <$>-                    _dtNonGuaranteedFixedPriceTerms,-                  ("nonGuaranteedAuctionTerms" .=) <$>-                    _dtNonGuaranteedAuctionTerms,-                  ("rubiconNonGuaranteedTerms" .=) <$>-                    _dtRubiconNonGuaranteedTerms,-                  ("brandingType" .=) <$> _dtBrandingType,-                  ("crossListedExternalDealIdType" .=) <$>-                    _dtCrossListedExternalDealIdType,-                  ("estimatedImpressionsPerDay" .=) <$>-                    _dtEstimatedImpressionsPerDay,-                  ("sellerTimeZone" .=) <$> _dtSellerTimeZone,-                  ("guaranteedFixedPriceTerms" .=) <$>-                    _dtGuaranteedFixedPriceTerms,-                  ("description" .=) <$> _dtDescription])---- | The external deal ids associated with a creative.------ /See:/ 'creativeDealIds' smart constructor.-data CreativeDealIds =-  CreativeDealIds'-    { _cdiKind         :: !Text-    , _cdiDealStatuses :: !(Maybe [CreativeDealIdsDealStatusesItem])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CreativeDealIds' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cdiKind'------ * 'cdiDealStatuses'-creativeDealIds-    :: CreativeDealIds-creativeDealIds =-  CreativeDealIds'-    {_cdiKind = "adexchangebuyer#creativeDealIds", _cdiDealStatuses = Nothing}----- | Resource type.-cdiKind :: Lens' CreativeDealIds Text-cdiKind = lens _cdiKind (\ s a -> s{_cdiKind = a})---- | A list of external deal ids and ARC approval status.-cdiDealStatuses :: Lens' CreativeDealIds [CreativeDealIdsDealStatusesItem]-cdiDealStatuses-  = lens _cdiDealStatuses-      (\ s a -> s{_cdiDealStatuses = a})-      . _Default-      . _Coerce--instance FromJSON CreativeDealIds where-        parseJSON-          = withObject "CreativeDealIds"-              (\ o ->-                 CreativeDealIds' <$>-                   (o .:? "kind" .!= "adexchangebuyer#creativeDealIds")-                     <*> (o .:? "dealStatuses" .!= mempty))--instance ToJSON CreativeDealIds where-        toJSON CreativeDealIds'{..}-          = object-              (catMaybes-                 [Just ("kind" .= _cdiKind),-                  ("dealStatuses" .=) <$> _cdiDealStatuses])------- /See:/ 'marketplaceLabel' smart constructor.-data MarketplaceLabel =-  MarketplaceLabel'-    { _mlDeprecatedMarketplaceDealParty :: !(Maybe MarketplaceDealParty)-    , _mlAccountId                      :: !(Maybe Text)-    , _mlCreateTimeMs                   :: !(Maybe (Textual Int64))-    , _mlLabel                          :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'MarketplaceLabel' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mlDeprecatedMarketplaceDealParty'------ * 'mlAccountId'------ * 'mlCreateTimeMs'------ * 'mlLabel'-marketplaceLabel-    :: MarketplaceLabel-marketplaceLabel =-  MarketplaceLabel'-    { _mlDeprecatedMarketplaceDealParty = Nothing-    , _mlAccountId = Nothing-    , _mlCreateTimeMs = Nothing-    , _mlLabel = Nothing-    }----- | Information about the party that created the label.-mlDeprecatedMarketplaceDealParty :: Lens' MarketplaceLabel (Maybe MarketplaceDealParty)-mlDeprecatedMarketplaceDealParty-  = lens _mlDeprecatedMarketplaceDealParty-      (\ s a -> s{_mlDeprecatedMarketplaceDealParty = a})---- | The accountId of the party that created the label.-mlAccountId :: Lens' MarketplaceLabel (Maybe Text)-mlAccountId-  = lens _mlAccountId (\ s a -> s{_mlAccountId = a})---- | The creation time (in ms since epoch) for the label.-mlCreateTimeMs :: Lens' MarketplaceLabel (Maybe Int64)-mlCreateTimeMs-  = lens _mlCreateTimeMs-      (\ s a -> s{_mlCreateTimeMs = a})-      . mapping _Coerce---- | The label to use.-mlLabel :: Lens' MarketplaceLabel (Maybe Text)-mlLabel = lens _mlLabel (\ s a -> s{_mlLabel = a})--instance FromJSON MarketplaceLabel where-        parseJSON-          = withObject "MarketplaceLabel"-              (\ o ->-                 MarketplaceLabel' <$>-                   (o .:? "deprecatedMarketplaceDealParty") <*>-                     (o .:? "accountId")-                     <*> (o .:? "createTimeMs")-                     <*> (o .:? "label"))--instance ToJSON MarketplaceLabel where-        toJSON MarketplaceLabel'{..}-          = object-              (catMaybes-                 [("deprecatedMarketplaceDealParty" .=) <$>-                    _mlDeprecatedMarketplaceDealParty,-                  ("accountId" .=) <$> _mlAccountId,-                  ("createTimeMs" .=) <$> _mlCreateTimeMs,-                  ("label" .=) <$> _mlLabel])------- /See:/ 'buyer' smart constructor.-newtype Buyer =-  Buyer'-    { _buyAccountId :: Maybe Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Buyer' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'buyAccountId'-buyer-    :: Buyer-buyer = Buyer' {_buyAccountId = Nothing}----- | Adx account id of the buyer.-buyAccountId :: Lens' Buyer (Maybe Text)-buyAccountId-  = lens _buyAccountId (\ s a -> s{_buyAccountId = a})--instance FromJSON Buyer where-        parseJSON-          = withObject "Buyer"-              (\ o -> Buyer' <$> (o .:? "accountId"))--instance ToJSON Buyer where-        toJSON Buyer'{..}-          = object-              (catMaybes [("accountId" .=) <$> _buyAccountId])------- /See:/ 'addOrderDealsRequest' smart constructor.-data AddOrderDealsRequest =-  AddOrderDealsRequest'-    { _aUpdateAction           :: !(Maybe Text)-    , _aDeals                  :: !(Maybe [MarketplaceDeal])-    , _aProposalRevisionNumber :: !(Maybe (Textual Int64))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'AddOrderDealsRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'aUpdateAction'------ * 'aDeals'------ * 'aProposalRevisionNumber'-addOrderDealsRequest-    :: AddOrderDealsRequest-addOrderDealsRequest =-  AddOrderDealsRequest'-    { _aUpdateAction = Nothing-    , _aDeals = Nothing-    , _aProposalRevisionNumber = Nothing-    }----- | Indicates an optional action to take on the proposal-aUpdateAction :: Lens' AddOrderDealsRequest (Maybe Text)-aUpdateAction-  = lens _aUpdateAction-      (\ s a -> s{_aUpdateAction = a})---- | The list of deals to add-aDeals :: Lens' AddOrderDealsRequest [MarketplaceDeal]-aDeals-  = lens _aDeals (\ s a -> s{_aDeals = a}) . _Default .-      _Coerce---- | The last known proposal revision number.-aProposalRevisionNumber :: Lens' AddOrderDealsRequest (Maybe Int64)-aProposalRevisionNumber-  = lens _aProposalRevisionNumber-      (\ s a -> s{_aProposalRevisionNumber = a})-      . mapping _Coerce--instance FromJSON AddOrderDealsRequest where-        parseJSON-          = withObject "AddOrderDealsRequest"-              (\ o ->-                 AddOrderDealsRequest' <$>-                   (o .:? "updateAction") <*> (o .:? "deals" .!= mempty)-                     <*> (o .:? "proposalRevisionNumber"))--instance ToJSON AddOrderDealsRequest where-        toJSON AddOrderDealsRequest'{..}-          = object-              (catMaybes-                 [("updateAction" .=) <$> _aUpdateAction,-                  ("deals" .=) <$> _aDeals,-                  ("proposalRevisionNumber" .=) <$>-                    _aProposalRevisionNumber])---- | Tracks which parties (if any) have paused a deal. The deal is considered--- paused if has_buyer_paused || has_seller_paused. Each of the--- has_buyer_paused or the has_seller_paused bits can be set independently.------ /See:/ 'dealServingMetadataDealPauseStatus' smart constructor.-data DealServingMetadataDealPauseStatus =-  DealServingMetadataDealPauseStatus'-    { _dsmdpsFirstPausedBy     :: !(Maybe Text)-    , _dsmdpsBuyerPauseReason  :: !(Maybe Text)-    , _dsmdpsHasBuyerPaused    :: !(Maybe Bool)-    , _dsmdpsSellerPauseReason :: !(Maybe Text)-    , _dsmdpsHasSellerPaused   :: !(Maybe Bool)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DealServingMetadataDealPauseStatus' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dsmdpsFirstPausedBy'------ * 'dsmdpsBuyerPauseReason'------ * 'dsmdpsHasBuyerPaused'------ * 'dsmdpsSellerPauseReason'------ * 'dsmdpsHasSellerPaused'-dealServingMetadataDealPauseStatus-    :: DealServingMetadataDealPauseStatus-dealServingMetadataDealPauseStatus =-  DealServingMetadataDealPauseStatus'-    { _dsmdpsFirstPausedBy = Nothing-    , _dsmdpsBuyerPauseReason = Nothing-    , _dsmdpsHasBuyerPaused = Nothing-    , _dsmdpsSellerPauseReason = Nothing-    , _dsmdpsHasSellerPaused = Nothing-    }----- | If the deal is paused, records which party paused the deal first.-dsmdpsFirstPausedBy :: Lens' DealServingMetadataDealPauseStatus (Maybe Text)-dsmdpsFirstPausedBy-  = lens _dsmdpsFirstPausedBy-      (\ s a -> s{_dsmdpsFirstPausedBy = a})--dsmdpsBuyerPauseReason :: Lens' DealServingMetadataDealPauseStatus (Maybe Text)-dsmdpsBuyerPauseReason-  = lens _dsmdpsBuyerPauseReason-      (\ s a -> s{_dsmdpsBuyerPauseReason = a})--dsmdpsHasBuyerPaused :: Lens' DealServingMetadataDealPauseStatus (Maybe Bool)-dsmdpsHasBuyerPaused-  = lens _dsmdpsHasBuyerPaused-      (\ s a -> s{_dsmdpsHasBuyerPaused = a})--dsmdpsSellerPauseReason :: Lens' DealServingMetadataDealPauseStatus (Maybe Text)-dsmdpsSellerPauseReason-  = lens _dsmdpsSellerPauseReason-      (\ s a -> s{_dsmdpsSellerPauseReason = a})--dsmdpsHasSellerPaused :: Lens' DealServingMetadataDealPauseStatus (Maybe Bool)-dsmdpsHasSellerPaused-  = lens _dsmdpsHasSellerPaused-      (\ s a -> s{_dsmdpsHasSellerPaused = a})--instance FromJSON DealServingMetadataDealPauseStatus-         where-        parseJSON-          = withObject "DealServingMetadataDealPauseStatus"-              (\ o ->-                 DealServingMetadataDealPauseStatus' <$>-                   (o .:? "firstPausedBy") <*>-                     (o .:? "buyerPauseReason")-                     <*> (o .:? "hasBuyerPaused")-                     <*> (o .:? "sellerPauseReason")-                     <*> (o .:? "hasSellerPaused"))--instance ToJSON DealServingMetadataDealPauseStatus-         where-        toJSON DealServingMetadataDealPauseStatus'{..}-          = object-              (catMaybes-                 [("firstPausedBy" .=) <$> _dsmdpsFirstPausedBy,-                  ("buyerPauseReason" .=) <$> _dsmdpsBuyerPauseReason,-                  ("hasBuyerPaused" .=) <$> _dsmdpsHasBuyerPaused,-                  ("sellerPauseReason" .=) <$>-                    _dsmdpsSellerPauseReason,-                  ("hasSellerPaused" .=) <$> _dsmdpsHasSellerPaused])------- /See:/ 'dealTermsGuaranteedFixedPriceTerms' smart constructor.-data DealTermsGuaranteedFixedPriceTerms =-  DealTermsGuaranteedFixedPriceTerms'-    { _dtgfptGuaranteedLooks       :: !(Maybe (Textual Int64))-    , _dtgfptGuaranteedImpressions :: !(Maybe (Textual Int64))-    , _dtgfptBillingInfo           :: !(Maybe DealTermsGuaranteedFixedPriceTermsBillingInfo)-    , _dtgfptFixedPrices           :: !(Maybe [PricePerBuyer])-    , _dtgfptMinimumDailyLooks     :: !(Maybe (Textual Int64))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DealTermsGuaranteedFixedPriceTerms' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dtgfptGuaranteedLooks'------ * 'dtgfptGuaranteedImpressions'------ * 'dtgfptBillingInfo'------ * 'dtgfptFixedPrices'------ * 'dtgfptMinimumDailyLooks'-dealTermsGuaranteedFixedPriceTerms-    :: DealTermsGuaranteedFixedPriceTerms-dealTermsGuaranteedFixedPriceTerms =-  DealTermsGuaranteedFixedPriceTerms'-    { _dtgfptGuaranteedLooks = Nothing-    , _dtgfptGuaranteedImpressions = Nothing-    , _dtgfptBillingInfo = Nothing-    , _dtgfptFixedPrices = Nothing-    , _dtgfptMinimumDailyLooks = Nothing-    }----- | Count of guaranteed looks. Required for deal, optional for product. For--- CPD deals, buyer changes to guaranteed_looks will be ignored.-dtgfptGuaranteedLooks :: Lens' DealTermsGuaranteedFixedPriceTerms (Maybe Int64)-dtgfptGuaranteedLooks-  = lens _dtgfptGuaranteedLooks-      (\ s a -> s{_dtgfptGuaranteedLooks = a})-      . mapping _Coerce---- | Guaranteed impressions as a percentage. This is the percentage of--- guaranteed looks that the buyer is guaranteeing to buy.-dtgfptGuaranteedImpressions :: Lens' DealTermsGuaranteedFixedPriceTerms (Maybe Int64)-dtgfptGuaranteedImpressions-  = lens _dtgfptGuaranteedImpressions-      (\ s a -> s{_dtgfptGuaranteedImpressions = a})-      . mapping _Coerce---- | External billing info for this Deal. This field is relevant when--- external billing info such as price has a different currency code than--- DFP\/AdX.-dtgfptBillingInfo :: Lens' DealTermsGuaranteedFixedPriceTerms (Maybe DealTermsGuaranteedFixedPriceTermsBillingInfo)-dtgfptBillingInfo-  = lens _dtgfptBillingInfo-      (\ s a -> s{_dtgfptBillingInfo = a})---- | Fixed price for the specified buyer.-dtgfptFixedPrices :: Lens' DealTermsGuaranteedFixedPriceTerms [PricePerBuyer]-dtgfptFixedPrices-  = lens _dtgfptFixedPrices-      (\ s a -> s{_dtgfptFixedPrices = a})-      . _Default-      . _Coerce---- | Count of minimum daily looks for a CPD deal. For CPD deals, buyer should--- negotiate on this field instead of guaranteed_looks.-dtgfptMinimumDailyLooks :: Lens' DealTermsGuaranteedFixedPriceTerms (Maybe Int64)-dtgfptMinimumDailyLooks-  = lens _dtgfptMinimumDailyLooks-      (\ s a -> s{_dtgfptMinimumDailyLooks = a})-      . mapping _Coerce--instance FromJSON DealTermsGuaranteedFixedPriceTerms-         where-        parseJSON-          = withObject "DealTermsGuaranteedFixedPriceTerms"-              (\ o ->-                 DealTermsGuaranteedFixedPriceTerms' <$>-                   (o .:? "guaranteedLooks") <*>-                     (o .:? "guaranteedImpressions")-                     <*> (o .:? "billingInfo")-                     <*> (o .:? "fixedPrices" .!= mempty)-                     <*> (o .:? "minimumDailyLooks"))--instance ToJSON DealTermsGuaranteedFixedPriceTerms-         where-        toJSON DealTermsGuaranteedFixedPriceTerms'{..}-          = object-              (catMaybes-                 [("guaranteedLooks" .=) <$> _dtgfptGuaranteedLooks,-                  ("guaranteedImpressions" .=) <$>-                    _dtgfptGuaranteedImpressions,-                  ("billingInfo" .=) <$> _dtgfptBillingInfo,-                  ("fixedPrices" .=) <$> _dtgfptFixedPrices,-                  ("minimumDailyLooks" .=) <$>-                    _dtgfptMinimumDailyLooks])
− gen/Network/Google/AdExchangeBuyer/Types/Sum.hs
@@ -1,188 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE LambdaCase         #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}---- |--- Module      : Network.Google.AdExchangeBuyer.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.AdExchangeBuyer.Types.Sum where--import           Network.Google.Prelude hiding (Bytes)---- | When specified, only creatives having the given open auction status are--- returned.-data CreativesListOpenAuctionStatusFilter-    = Approved-      -- ^ @approved@-      -- Creatives which have been approved for serving on the open auction.-    | ConditionallyApproved-      -- ^ @conditionally_approved@-      -- Creatives which have been conditionally approved for serving on the open-      -- auction.-    | DisApproved-      -- ^ @disapproved@-      -- Creatives which have been disapproved for serving on the open auction.-    | NotChecked-      -- ^ @not_checked@-      -- Creatives whose open auction status is not yet checked.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable CreativesListOpenAuctionStatusFilter--instance FromHttpApiData CreativesListOpenAuctionStatusFilter where-    parseQueryParam = \case-        "approved" -> Right Approved-        "conditionally_approved" -> Right ConditionallyApproved-        "disapproved" -> Right DisApproved-        "not_checked" -> Right NotChecked-        x -> Left ("Unable to parse CreativesListOpenAuctionStatusFilter from: " <> x)--instance ToHttpApiData CreativesListOpenAuctionStatusFilter where-    toQueryParam = \case-        Approved -> "approved"-        ConditionallyApproved -> "conditionally_approved"-        DisApproved -> "disapproved"-        NotChecked -> "not_checked"--instance FromJSON CreativesListOpenAuctionStatusFilter where-    parseJSON = parseJSONText "CreativesListOpenAuctionStatusFilter"--instance ToJSON CreativesListOpenAuctionStatusFilter where-    toJSON = toJSONText---- | The proposed action to take on the proposal. This field is required and--- it must be set when updating a proposal.-data ProposalsPatchUpdateAction-    = Accept-      -- ^ @accept@-    | Cancel-      -- ^ @cancel@-    | Propose-      -- ^ @propose@-    | ProposeAndAccept-      -- ^ @proposeAndAccept@-    | UnknownAction-      -- ^ @unknownAction@-    | UpdateNonTerms-      -- ^ @updateNonTerms@-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable ProposalsPatchUpdateAction--instance FromHttpApiData ProposalsPatchUpdateAction where-    parseQueryParam = \case-        "accept" -> Right Accept-        "cancel" -> Right Cancel-        "propose" -> Right Propose-        "proposeAndAccept" -> Right ProposeAndAccept-        "unknownAction" -> Right UnknownAction-        "updateNonTerms" -> Right UpdateNonTerms-        x -> Left ("Unable to parse ProposalsPatchUpdateAction from: " <> x)--instance ToHttpApiData ProposalsPatchUpdateAction where-    toQueryParam = \case-        Accept -> "accept"-        Cancel -> "cancel"-        Propose -> "propose"-        ProposeAndAccept -> "proposeAndAccept"-        UnknownAction -> "unknownAction"-        UpdateNonTerms -> "updateNonTerms"--instance FromJSON ProposalsPatchUpdateAction where-    parseJSON = parseJSONText "ProposalsPatchUpdateAction"--instance ToJSON ProposalsPatchUpdateAction where-    toJSON = toJSONText---- | When specified, only creatives having the given deals status are--- returned.-data CreativesListDealsStatusFilter-    = CLDSFApproved-      -- ^ @approved@-      -- Creatives which have been approved for serving on deals.-    | CLDSFConditionallyApproved-      -- ^ @conditionally_approved@-      -- Creatives which have been conditionally approved for serving on deals.-    | CLDSFDisApproved-      -- ^ @disapproved@-      -- Creatives which have been disapproved for serving on deals.-    | CLDSFNotChecked-      -- ^ @not_checked@-      -- Creatives whose deals status is not yet checked.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable CreativesListDealsStatusFilter--instance FromHttpApiData CreativesListDealsStatusFilter where-    parseQueryParam = \case-        "approved" -> Right CLDSFApproved-        "conditionally_approved" -> Right CLDSFConditionallyApproved-        "disapproved" -> Right CLDSFDisApproved-        "not_checked" -> Right CLDSFNotChecked-        x -> Left ("Unable to parse CreativesListDealsStatusFilter from: " <> x)--instance ToHttpApiData CreativesListDealsStatusFilter where-    toQueryParam = \case-        CLDSFApproved -> "approved"-        CLDSFConditionallyApproved -> "conditionally_approved"-        CLDSFDisApproved -> "disapproved"-        CLDSFNotChecked -> "not_checked"--instance FromJSON CreativesListDealsStatusFilter where-    parseJSON = parseJSONText "CreativesListDealsStatusFilter"--instance ToJSON CreativesListDealsStatusFilter where-    toJSON = toJSONText---- | The proposed action to take on the proposal. This field is required and--- it must be set when updating a proposal.-data ProposalsUpdateUpdateAction-    = PUUAAccept-      -- ^ @accept@-    | PUUACancel-      -- ^ @cancel@-    | PUUAPropose-      -- ^ @propose@-    | PUUAProposeAndAccept-      -- ^ @proposeAndAccept@-    | PUUAUnknownAction-      -- ^ @unknownAction@-    | PUUAUpdateNonTerms-      -- ^ @updateNonTerms@-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable ProposalsUpdateUpdateAction--instance FromHttpApiData ProposalsUpdateUpdateAction where-    parseQueryParam = \case-        "accept" -> Right PUUAAccept-        "cancel" -> Right PUUACancel-        "propose" -> Right PUUAPropose-        "proposeAndAccept" -> Right PUUAProposeAndAccept-        "unknownAction" -> Right PUUAUnknownAction-        "updateNonTerms" -> Right PUUAUpdateNonTerms-        x -> Left ("Unable to parse ProposalsUpdateUpdateAction from: " <> x)--instance ToHttpApiData ProposalsUpdateUpdateAction where-    toQueryParam = \case-        PUUAAccept -> "accept"-        PUUACancel -> "cancel"-        PUUAPropose -> "propose"-        PUUAProposeAndAccept -> "proposeAndAccept"-        PUUAUnknownAction -> "unknownAction"-        PUUAUpdateNonTerms -> "updateNonTerms"--instance FromJSON ProposalsUpdateUpdateAction where-    parseJSON = parseJSONText "ProposalsUpdateUpdateAction"--instance ToJSON ProposalsUpdateUpdateAction where-    toJSON = toJSONText
− gen/Network/Google/Resource/AdExchangeBuyer/Accounts/Get.hs
@@ -1,84 +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.AdExchangeBuyer.Accounts.Get--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Gets one account by ID.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.accounts.get@.-module Network.Google.Resource.AdExchangeBuyer.Accounts.Get-    (-    -- * REST Resource-      AccountsGetResource--    -- * Creating a Request-    , accountsGet-    , AccountsGet--    -- * Request Lenses-    , agId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.accounts.get@ method which the--- 'AccountsGet' request conforms to.-type AccountsGetResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "accounts" :>-           Capture "id" (Textual Int32) :>-             QueryParam "alt" AltJSON :> Get '[JSON] Account---- | Gets one account by ID.------ /See:/ 'accountsGet' smart constructor.-newtype AccountsGet =-  AccountsGet'-    { _agId :: Textual Int32-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'AccountsGet' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'agId'-accountsGet-    :: Int32 -- ^ 'agId'-    -> AccountsGet-accountsGet pAgId_ = AccountsGet' {_agId = _Coerce # pAgId_}----- | The account id-agId :: Lens' AccountsGet Int32-agId = lens _agId (\ s a -> s{_agId = a}) . _Coerce--instance GoogleRequest AccountsGet where-        type Rs AccountsGet = Account-        type Scopes AccountsGet =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient AccountsGet'{..}-          = go _agId (Just AltJSON) adExchangeBuyerService-          where go-                  = buildClient (Proxy :: Proxy AccountsGetResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/Accounts/List.hs
@@ -1,71 +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.AdExchangeBuyer.Accounts.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)------ Retrieves the authenticated user\'s list of accounts.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.accounts.list@.-module Network.Google.Resource.AdExchangeBuyer.Accounts.List-    (-    -- * REST Resource-      AccountsListResource--    -- * Creating a Request-    , accountsList'-    , AccountsList'--    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.accounts.list@ method which the--- 'AccountsList'' request conforms to.-type AccountsListResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "accounts" :>-           QueryParam "alt" AltJSON :> Get '[JSON] AccountsList---- | Retrieves the authenticated user\'s list of accounts.------ /See:/ 'accountsList'' smart constructor.-data AccountsList' =-  AccountsList''-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'AccountsList'' with the minimum fields required to make a request.----accountsList'-    :: AccountsList'-accountsList' = AccountsList''---instance GoogleRequest AccountsList' where-        type Rs AccountsList' = AccountsList-        type Scopes AccountsList' =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient AccountsList''{}-          = go (Just AltJSON) adExchangeBuyerService-          where go-                  = buildClient (Proxy :: Proxy AccountsListResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/Accounts/Patch.hs
@@ -1,114 +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.AdExchangeBuyer.Accounts.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)------ Updates an existing account. This method supports patch semantics.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.accounts.patch@.-module Network.Google.Resource.AdExchangeBuyer.Accounts.Patch-    (-    -- * REST Resource-      AccountsPatchResource--    -- * Creating a Request-    , accountsPatch-    , AccountsPatch--    -- * Request Lenses-    , apPayload-    , apConfirmUnsafeAccountChange-    , apId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.accounts.patch@ method which the--- 'AccountsPatch' request conforms to.-type AccountsPatchResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "accounts" :>-           Capture "id" (Textual Int32) :>-             QueryParam "confirmUnsafeAccountChange" Bool :>-               QueryParam "alt" AltJSON :>-                 ReqBody '[JSON] Account :> Patch '[JSON] Account---- | Updates an existing account. This method supports patch semantics.------ /See:/ 'accountsPatch' smart constructor.-data AccountsPatch =-  AccountsPatch'-    { _apPayload                    :: !Account-    , _apConfirmUnsafeAccountChange :: !(Maybe Bool)-    , _apId                         :: !(Textual Int32)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'AccountsPatch' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'apPayload'------ * 'apConfirmUnsafeAccountChange'------ * 'apId'-accountsPatch-    :: Account -- ^ 'apPayload'-    -> Int32 -- ^ 'apId'-    -> AccountsPatch-accountsPatch pApPayload_ pApId_ =-  AccountsPatch'-    { _apPayload = pApPayload_-    , _apConfirmUnsafeAccountChange = Nothing-    , _apId = _Coerce # pApId_-    }----- | Multipart request metadata.-apPayload :: Lens' AccountsPatch Account-apPayload-  = lens _apPayload (\ s a -> s{_apPayload = a})---- | Confirmation for erasing bidder and cookie matching urls.-apConfirmUnsafeAccountChange :: Lens' AccountsPatch (Maybe Bool)-apConfirmUnsafeAccountChange-  = lens _apConfirmUnsafeAccountChange-      (\ s a -> s{_apConfirmUnsafeAccountChange = a})---- | The account id-apId :: Lens' AccountsPatch Int32-apId = lens _apId (\ s a -> s{_apId = a}) . _Coerce--instance GoogleRequest AccountsPatch where-        type Rs AccountsPatch = Account-        type Scopes AccountsPatch =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient AccountsPatch'{..}-          = go _apId _apConfirmUnsafeAccountChange-              (Just AltJSON)-              _apPayload-              adExchangeBuyerService-          where go-                  = buildClient (Proxy :: Proxy AccountsPatchResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/Accounts/Update.hs
@@ -1,114 +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.AdExchangeBuyer.Accounts.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)------ Updates an existing account.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.accounts.update@.-module Network.Google.Resource.AdExchangeBuyer.Accounts.Update-    (-    -- * REST Resource-      AccountsUpdateResource--    -- * Creating a Request-    , accountsUpdate-    , AccountsUpdate--    -- * Request Lenses-    , auPayload-    , auConfirmUnsafeAccountChange-    , auId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.accounts.update@ method which the--- 'AccountsUpdate' request conforms to.-type AccountsUpdateResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "accounts" :>-           Capture "id" (Textual Int32) :>-             QueryParam "confirmUnsafeAccountChange" Bool :>-               QueryParam "alt" AltJSON :>-                 ReqBody '[JSON] Account :> Put '[JSON] Account---- | Updates an existing account.------ /See:/ 'accountsUpdate' smart constructor.-data AccountsUpdate =-  AccountsUpdate'-    { _auPayload                    :: !Account-    , _auConfirmUnsafeAccountChange :: !(Maybe Bool)-    , _auId                         :: !(Textual Int32)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'AccountsUpdate' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'auPayload'------ * 'auConfirmUnsafeAccountChange'------ * 'auId'-accountsUpdate-    :: Account -- ^ 'auPayload'-    -> Int32 -- ^ 'auId'-    -> AccountsUpdate-accountsUpdate pAuPayload_ pAuId_ =-  AccountsUpdate'-    { _auPayload = pAuPayload_-    , _auConfirmUnsafeAccountChange = Nothing-    , _auId = _Coerce # pAuId_-    }----- | Multipart request metadata.-auPayload :: Lens' AccountsUpdate Account-auPayload-  = lens _auPayload (\ s a -> s{_auPayload = a})---- | Confirmation for erasing bidder and cookie matching urls.-auConfirmUnsafeAccountChange :: Lens' AccountsUpdate (Maybe Bool)-auConfirmUnsafeAccountChange-  = lens _auConfirmUnsafeAccountChange-      (\ s a -> s{_auConfirmUnsafeAccountChange = a})---- | The account id-auId :: Lens' AccountsUpdate Int32-auId = lens _auId (\ s a -> s{_auId = a}) . _Coerce--instance GoogleRequest AccountsUpdate where-        type Rs AccountsUpdate = Account-        type Scopes AccountsUpdate =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient AccountsUpdate'{..}-          = go _auId _auConfirmUnsafeAccountChange-              (Just AltJSON)-              _auPayload-              adExchangeBuyerService-          where go-                  = buildClient (Proxy :: Proxy AccountsUpdateResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/BillingInfo/Get.hs
@@ -1,88 +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.AdExchangeBuyer.BillingInfo.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)------ Returns the billing information for one account specified by account ID.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.billingInfo.get@.-module Network.Google.Resource.AdExchangeBuyer.BillingInfo.Get-    (-    -- * REST Resource-      BillingInfoGetResource--    -- * Creating a Request-    , billingInfoGet-    , BillingInfoGet--    -- * Request Lenses-    , bigAccountId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.billingInfo.get@ method which the--- 'BillingInfoGet' request conforms to.-type BillingInfoGetResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "billinginfo" :>-           Capture "accountId" (Textual Int32) :>-             QueryParam "alt" AltJSON :> Get '[JSON] BillingInfo---- | Returns the billing information for one account specified by account ID.------ /See:/ 'billingInfoGet' smart constructor.-newtype BillingInfoGet =-  BillingInfoGet'-    { _bigAccountId :: Textual Int32-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'BillingInfoGet' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'bigAccountId'-billingInfoGet-    :: Int32 -- ^ 'bigAccountId'-    -> BillingInfoGet-billingInfoGet pBigAccountId_ =-  BillingInfoGet' {_bigAccountId = _Coerce # pBigAccountId_}----- | The account id.-bigAccountId :: Lens' BillingInfoGet Int32-bigAccountId-  = lens _bigAccountId (\ s a -> s{_bigAccountId = a})-      . _Coerce--instance GoogleRequest BillingInfoGet where-        type Rs BillingInfoGet = BillingInfo-        type Scopes BillingInfoGet =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient BillingInfoGet'{..}-          = go _bigAccountId (Just AltJSON)-              adExchangeBuyerService-          where go-                  = buildClient (Proxy :: Proxy BillingInfoGetResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/BillingInfo/List.hs
@@ -1,75 +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.AdExchangeBuyer.BillingInfo.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)------ Retrieves a list of billing information for all accounts of the--- authenticated user.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.billingInfo.list@.-module Network.Google.Resource.AdExchangeBuyer.BillingInfo.List-    (-    -- * REST Resource-      BillingInfoListResource--    -- * Creating a Request-    , billingInfoList'-    , BillingInfoList'--    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.billingInfo.list@ method which the--- 'BillingInfoList'' request conforms to.-type BillingInfoListResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "billinginfo" :>-           QueryParam "alt" AltJSON :>-             Get '[JSON] BillingInfoList---- | Retrieves a list of billing information for all accounts of the--- authenticated user.------ /See:/ 'billingInfoList'' smart constructor.-data BillingInfoList' =-  BillingInfoList''-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'BillingInfoList'' with the minimum fields required to make a request.----billingInfoList'-    :: BillingInfoList'-billingInfoList' = BillingInfoList''---instance GoogleRequest BillingInfoList' where-        type Rs BillingInfoList' = BillingInfoList-        type Scopes BillingInfoList' =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient BillingInfoList''{}-          = go (Just AltJSON) adExchangeBuyerService-          where go-                  = buildClient-                      (Proxy :: Proxy BillingInfoListResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/Budget/Get.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.AdExchangeBuyer.Budget.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)------ Returns the budget information for the adgroup specified by the--- accountId and billingId.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.budget.get@.-module Network.Google.Resource.AdExchangeBuyer.Budget.Get-    (-    -- * REST Resource-      BudgetGetResource--    -- * Creating a Request-    , budgetGet-    , BudgetGet--    -- * Request Lenses-    , bgAccountId-    , bgBillingId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.budget.get@ method which the--- 'BudgetGet' request conforms to.-type BudgetGetResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "billinginfo" :>-           Capture "accountId" (Textual Int64) :>-             Capture "billingId" (Textual Int64) :>-               QueryParam "alt" AltJSON :> Get '[JSON] Budget---- | Returns the budget information for the adgroup specified by the--- accountId and billingId.------ /See:/ 'budgetGet' smart constructor.-data BudgetGet =-  BudgetGet'-    { _bgAccountId :: !(Textual Int64)-    , _bgBillingId :: !(Textual Int64)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'BudgetGet' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'bgAccountId'------ * 'bgBillingId'-budgetGet-    :: Int64 -- ^ 'bgAccountId'-    -> Int64 -- ^ 'bgBillingId'-    -> BudgetGet-budgetGet pBgAccountId_ pBgBillingId_ =-  BudgetGet'-    { _bgAccountId = _Coerce # pBgAccountId_-    , _bgBillingId = _Coerce # pBgBillingId_-    }----- | The account id to get the budget information for.-bgAccountId :: Lens' BudgetGet Int64-bgAccountId-  = lens _bgAccountId (\ s a -> s{_bgAccountId = a}) .-      _Coerce---- | The billing id to get the budget information for.-bgBillingId :: Lens' BudgetGet Int64-bgBillingId-  = lens _bgBillingId (\ s a -> s{_bgBillingId = a}) .-      _Coerce--instance GoogleRequest BudgetGet where-        type Rs BudgetGet = Budget-        type Scopes BudgetGet =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient BudgetGet'{..}-          = go _bgAccountId _bgBillingId (Just AltJSON)-              adExchangeBuyerService-          where go-                  = buildClient (Proxy :: Proxy BudgetGetResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/Budget/Patch.hs
@@ -1,120 +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.AdExchangeBuyer.Budget.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)------ Updates the budget amount for the budget of the adgroup specified by the--- accountId and billingId, with the budget amount in the request. This--- method supports patch semantics.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.budget.patch@.-module Network.Google.Resource.AdExchangeBuyer.Budget.Patch-    (-    -- * REST Resource-      BudgetPatchResource--    -- * Creating a Request-    , budgetPatch-    , BudgetPatch--    -- * Request Lenses-    , bpPayload-    , bpAccountId-    , bpBillingId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.budget.patch@ method which the--- 'BudgetPatch' request conforms to.-type BudgetPatchResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "billinginfo" :>-           Capture "accountId" (Textual Int64) :>-             Capture "billingId" (Textual Int64) :>-               QueryParam "alt" AltJSON :>-                 ReqBody '[JSON] Budget :> Patch '[JSON] Budget---- | Updates the budget amount for the budget of the adgroup specified by the--- accountId and billingId, with the budget amount in the request. This--- method supports patch semantics.------ /See:/ 'budgetPatch' smart constructor.-data BudgetPatch =-  BudgetPatch'-    { _bpPayload   :: !Budget-    , _bpAccountId :: !(Textual Int64)-    , _bpBillingId :: !(Textual Int64)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'BudgetPatch' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'bpPayload'------ * 'bpAccountId'------ * 'bpBillingId'-budgetPatch-    :: Budget -- ^ 'bpPayload'-    -> Int64 -- ^ 'bpAccountId'-    -> Int64 -- ^ 'bpBillingId'-    -> BudgetPatch-budgetPatch pBpPayload_ pBpAccountId_ pBpBillingId_ =-  BudgetPatch'-    { _bpPayload = pBpPayload_-    , _bpAccountId = _Coerce # pBpAccountId_-    , _bpBillingId = _Coerce # pBpBillingId_-    }----- | Multipart request metadata.-bpPayload :: Lens' BudgetPatch Budget-bpPayload-  = lens _bpPayload (\ s a -> s{_bpPayload = a})---- | The account id associated with the budget being updated.-bpAccountId :: Lens' BudgetPatch Int64-bpAccountId-  = lens _bpAccountId (\ s a -> s{_bpAccountId = a}) .-      _Coerce---- | The billing id associated with the budget being updated.-bpBillingId :: Lens' BudgetPatch Int64-bpBillingId-  = lens _bpBillingId (\ s a -> s{_bpBillingId = a}) .-      _Coerce--instance GoogleRequest BudgetPatch where-        type Rs BudgetPatch = Budget-        type Scopes BudgetPatch =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient BudgetPatch'{..}-          = go _bpAccountId _bpBillingId (Just AltJSON)-              _bpPayload-              adExchangeBuyerService-          where go-                  = buildClient (Proxy :: Proxy BudgetPatchResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/Budget/Update.hs
@@ -1,118 +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.AdExchangeBuyer.Budget.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)------ Updates the budget amount for the budget of the adgroup specified by the--- accountId and billingId, with the budget amount in the request.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.budget.update@.-module Network.Google.Resource.AdExchangeBuyer.Budget.Update-    (-    -- * REST Resource-      BudgetUpdateResource--    -- * Creating a Request-    , budgetUpdate-    , BudgetUpdate--    -- * Request Lenses-    , buPayload-    , buAccountId-    , buBillingId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.budget.update@ method which the--- 'BudgetUpdate' request conforms to.-type BudgetUpdateResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "billinginfo" :>-           Capture "accountId" (Textual Int64) :>-             Capture "billingId" (Textual Int64) :>-               QueryParam "alt" AltJSON :>-                 ReqBody '[JSON] Budget :> Put '[JSON] Budget---- | Updates the budget amount for the budget of the adgroup specified by the--- accountId and billingId, with the budget amount in the request.------ /See:/ 'budgetUpdate' smart constructor.-data BudgetUpdate =-  BudgetUpdate'-    { _buPayload   :: !Budget-    , _buAccountId :: !(Textual Int64)-    , _buBillingId :: !(Textual Int64)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'BudgetUpdate' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'buPayload'------ * 'buAccountId'------ * 'buBillingId'-budgetUpdate-    :: Budget -- ^ 'buPayload'-    -> Int64 -- ^ 'buAccountId'-    -> Int64 -- ^ 'buBillingId'-    -> BudgetUpdate-budgetUpdate pBuPayload_ pBuAccountId_ pBuBillingId_ =-  BudgetUpdate'-    { _buPayload = pBuPayload_-    , _buAccountId = _Coerce # pBuAccountId_-    , _buBillingId = _Coerce # pBuBillingId_-    }----- | Multipart request metadata.-buPayload :: Lens' BudgetUpdate Budget-buPayload-  = lens _buPayload (\ s a -> s{_buPayload = a})---- | The account id associated with the budget being updated.-buAccountId :: Lens' BudgetUpdate Int64-buAccountId-  = lens _buAccountId (\ s a -> s{_buAccountId = a}) .-      _Coerce---- | The billing id associated with the budget being updated.-buBillingId :: Lens' BudgetUpdate Int64-buBillingId-  = lens _buBillingId (\ s a -> s{_buBillingId = a}) .-      _Coerce--instance GoogleRequest BudgetUpdate where-        type Rs BudgetUpdate = Budget-        type Scopes BudgetUpdate =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient BudgetUpdate'{..}-          = go _buAccountId _buBillingId (Just AltJSON)-              _buPayload-              adExchangeBuyerService-          where go-                  = buildClient (Proxy :: Proxy BudgetUpdateResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/Creatives/AddDeal.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.AdExchangeBuyer.Creatives.AddDeal--- 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)------ Add a deal id association for the creative.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.creatives.addDeal@.-module Network.Google.Resource.AdExchangeBuyer.Creatives.AddDeal-    (-    -- * REST Resource-      CreativesAddDealResource--    -- * Creating a Request-    , creativesAddDeal-    , CreativesAddDeal--    -- * Request Lenses-    , cadBuyerCreativeId-    , cadDealId-    , cadAccountId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.creatives.addDeal@ method which the--- 'CreativesAddDeal' request conforms to.-type CreativesAddDealResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "creatives" :>-           Capture "accountId" (Textual Int32) :>-             Capture "buyerCreativeId" Text :>-               "addDeal" :>-                 Capture "dealId" (Textual Int64) :>-                   QueryParam "alt" AltJSON :> Post '[JSON] ()---- | Add a deal id association for the creative.------ /See:/ 'creativesAddDeal' smart constructor.-data CreativesAddDeal =-  CreativesAddDeal'-    { _cadBuyerCreativeId :: !Text-    , _cadDealId          :: !(Textual Int64)-    , _cadAccountId       :: !(Textual Int32)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CreativesAddDeal' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cadBuyerCreativeId'------ * 'cadDealId'------ * 'cadAccountId'-creativesAddDeal-    :: Text -- ^ 'cadBuyerCreativeId'-    -> Int64 -- ^ 'cadDealId'-    -> Int32 -- ^ 'cadAccountId'-    -> CreativesAddDeal-creativesAddDeal pCadBuyerCreativeId_ pCadDealId_ pCadAccountId_ =-  CreativesAddDeal'-    { _cadBuyerCreativeId = pCadBuyerCreativeId_-    , _cadDealId = _Coerce # pCadDealId_-    , _cadAccountId = _Coerce # pCadAccountId_-    }----- | The buyer-specific id for this creative.-cadBuyerCreativeId :: Lens' CreativesAddDeal Text-cadBuyerCreativeId-  = lens _cadBuyerCreativeId-      (\ s a -> s{_cadBuyerCreativeId = a})---- | The id of the deal id to associate with this creative.-cadDealId :: Lens' CreativesAddDeal Int64-cadDealId-  = lens _cadDealId (\ s a -> s{_cadDealId = a}) .-      _Coerce---- | The id for the account that will serve this creative.-cadAccountId :: Lens' CreativesAddDeal Int32-cadAccountId-  = lens _cadAccountId (\ s a -> s{_cadAccountId = a})-      . _Coerce--instance GoogleRequest CreativesAddDeal where-        type Rs CreativesAddDeal = ()-        type Scopes CreativesAddDeal =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient CreativesAddDeal'{..}-          = go _cadAccountId _cadBuyerCreativeId _cadDealId-              (Just AltJSON)-              adExchangeBuyerService-          where go-                  = buildClient-                      (Proxy :: Proxy CreativesAddDealResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/Creatives/Get.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.AdExchangeBuyer.Creatives.Get--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Gets the status for a single creative. A creative will be available--- 30-40 minutes after submission.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.creatives.get@.-module Network.Google.Resource.AdExchangeBuyer.Creatives.Get-    (-    -- * REST Resource-      CreativesGetResource--    -- * Creating a Request-    , creativesGet-    , CreativesGet--    -- * Request Lenses-    , cgBuyerCreativeId-    , cgAccountId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.creatives.get@ method which the--- 'CreativesGet' request conforms to.-type CreativesGetResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "creatives" :>-           Capture "accountId" (Textual Int32) :>-             Capture "buyerCreativeId" Text :>-               QueryParam "alt" AltJSON :> Get '[JSON] Creative---- | Gets the status for a single creative. A creative will be available--- 30-40 minutes after submission.------ /See:/ 'creativesGet' smart constructor.-data CreativesGet =-  CreativesGet'-    { _cgBuyerCreativeId :: !Text-    , _cgAccountId       :: !(Textual Int32)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CreativesGet' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cgBuyerCreativeId'------ * 'cgAccountId'-creativesGet-    :: Text -- ^ 'cgBuyerCreativeId'-    -> Int32 -- ^ 'cgAccountId'-    -> CreativesGet-creativesGet pCgBuyerCreativeId_ pCgAccountId_ =-  CreativesGet'-    { _cgBuyerCreativeId = pCgBuyerCreativeId_-    , _cgAccountId = _Coerce # pCgAccountId_-    }----- | The buyer-specific id for this creative.-cgBuyerCreativeId :: Lens' CreativesGet Text-cgBuyerCreativeId-  = lens _cgBuyerCreativeId-      (\ s a -> s{_cgBuyerCreativeId = a})---- | The id for the account that will serve this creative.-cgAccountId :: Lens' CreativesGet Int32-cgAccountId-  = lens _cgAccountId (\ s a -> s{_cgAccountId = a}) .-      _Coerce--instance GoogleRequest CreativesGet where-        type Rs CreativesGet = Creative-        type Scopes CreativesGet =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient CreativesGet'{..}-          = go _cgAccountId _cgBuyerCreativeId (Just AltJSON)-              adExchangeBuyerService-          where go-                  = buildClient (Proxy :: Proxy CreativesGetResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/Creatives/Insert.hs
@@ -1,86 +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.AdExchangeBuyer.Creatives.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)------ Submit a new creative.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.creatives.insert@.-module Network.Google.Resource.AdExchangeBuyer.Creatives.Insert-    (-    -- * REST Resource-      CreativesInsertResource--    -- * Creating a Request-    , creativesInsert-    , CreativesInsert--    -- * Request Lenses-    , ciPayload-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.creatives.insert@ method which the--- 'CreativesInsert' request conforms to.-type CreativesInsertResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "creatives" :>-           QueryParam "alt" AltJSON :>-             ReqBody '[JSON] Creative :> Post '[JSON] Creative---- | Submit a new creative.------ /See:/ 'creativesInsert' smart constructor.-newtype CreativesInsert =-  CreativesInsert'-    { _ciPayload :: Creative-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CreativesInsert' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ciPayload'-creativesInsert-    :: Creative -- ^ 'ciPayload'-    -> CreativesInsert-creativesInsert pCiPayload_ = CreativesInsert' {_ciPayload = pCiPayload_}----- | Multipart request metadata.-ciPayload :: Lens' CreativesInsert Creative-ciPayload-  = lens _ciPayload (\ s a -> s{_ciPayload = a})--instance GoogleRequest CreativesInsert where-        type Rs CreativesInsert = Creative-        type Scopes CreativesInsert =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient CreativesInsert'{..}-          = go (Just AltJSON) _ciPayload adExchangeBuyerService-          where go-                  = buildClient-                      (Proxy :: Proxy CreativesInsertResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/Creatives/List.hs
@@ -1,169 +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.AdExchangeBuyer.Creatives.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)------ Retrieves a list of the authenticated user\'s active creatives. A--- creative will be available 30-40 minutes after submission.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.creatives.list@.-module Network.Google.Resource.AdExchangeBuyer.Creatives.List-    (-    -- * REST Resource-      CreativesListResource--    -- * Creating a Request-    , creativesList'-    , CreativesList'--    -- * Request Lenses-    , clBuyerCreativeId-    , clOpenAuctionStatusFilter-    , clAccountId-    , clPageToken-    , clDealsStatusFilter-    , clMaxResults-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.creatives.list@ method which the--- 'CreativesList'' request conforms to.-type CreativesListResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "creatives" :>-           QueryParams "buyerCreativeId" Text :>-             QueryParam "openAuctionStatusFilter"-               CreativesListOpenAuctionStatusFilter-               :>-               QueryParams "accountId" (Textual Int32) :>-                 QueryParam "pageToken" Text :>-                   QueryParam "dealsStatusFilter"-                     CreativesListDealsStatusFilter-                     :>-                     QueryParam "maxResults" (Textual Word32) :>-                       QueryParam "alt" AltJSON :> Get '[JSON] CreativesList---- | Retrieves a list of the authenticated user\'s active creatives. A--- creative will be available 30-40 minutes after submission.------ /See:/ 'creativesList'' smart constructor.-data CreativesList' =-  CreativesList''-    { _clBuyerCreativeId         :: !(Maybe [Text])-    , _clOpenAuctionStatusFilter :: !(Maybe CreativesListOpenAuctionStatusFilter)-    , _clAccountId               :: !(Maybe [Textual Int32])-    , _clPageToken               :: !(Maybe Text)-    , _clDealsStatusFilter       :: !(Maybe CreativesListDealsStatusFilter)-    , _clMaxResults              :: !(Maybe (Textual Word32))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CreativesList'' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'clBuyerCreativeId'------ * 'clOpenAuctionStatusFilter'------ * 'clAccountId'------ * 'clPageToken'------ * 'clDealsStatusFilter'------ * 'clMaxResults'-creativesList'-    :: CreativesList'-creativesList' =-  CreativesList''-    { _clBuyerCreativeId = Nothing-    , _clOpenAuctionStatusFilter = Nothing-    , _clAccountId = Nothing-    , _clPageToken = Nothing-    , _clDealsStatusFilter = Nothing-    , _clMaxResults = Nothing-    }----- | When specified, only creatives for the given buyer creative ids are--- returned.-clBuyerCreativeId :: Lens' CreativesList' [Text]-clBuyerCreativeId-  = lens _clBuyerCreativeId-      (\ s a -> s{_clBuyerCreativeId = a})-      . _Default-      . _Coerce---- | When specified, only creatives having the given open auction status are--- returned.-clOpenAuctionStatusFilter :: Lens' CreativesList' (Maybe CreativesListOpenAuctionStatusFilter)-clOpenAuctionStatusFilter-  = lens _clOpenAuctionStatusFilter-      (\ s a -> s{_clOpenAuctionStatusFilter = a})---- | When specified, only creatives for the given account ids are returned.-clAccountId :: Lens' CreativesList' [Int32]-clAccountId-  = lens _clAccountId (\ s a -> s{_clAccountId = a}) .-      _Default-      . _Coerce---- | A continuation token, used to page through ad clients. To retrieve the--- next page, set this parameter to the value of \"nextPageToken\" from the--- previous response. Optional.-clPageToken :: Lens' CreativesList' (Maybe Text)-clPageToken-  = lens _clPageToken (\ s a -> s{_clPageToken = a})---- | When specified, only creatives having the given deals status are--- returned.-clDealsStatusFilter :: Lens' CreativesList' (Maybe CreativesListDealsStatusFilter)-clDealsStatusFilter-  = lens _clDealsStatusFilter-      (\ s a -> s{_clDealsStatusFilter = a})---- | Maximum number of entries returned on one result page. If not set, the--- default is 100. Optional.-clMaxResults :: Lens' CreativesList' (Maybe Word32)-clMaxResults-  = lens _clMaxResults (\ s a -> s{_clMaxResults = a})-      . mapping _Coerce--instance GoogleRequest CreativesList' where-        type Rs CreativesList' = CreativesList-        type Scopes CreativesList' =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient CreativesList''{..}-          = go (_clBuyerCreativeId ^. _Default)-              _clOpenAuctionStatusFilter-              (_clAccountId ^. _Default)-              _clPageToken-              _clDealsStatusFilter-              _clMaxResults-              (Just AltJSON)-              adExchangeBuyerService-          where go-                  = buildClient (Proxy :: Proxy CreativesListResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/Creatives/ListDeals.hs
@@ -1,106 +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.AdExchangeBuyer.Creatives.ListDeals--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Lists the external deal ids associated with the creative.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.creatives.listDeals@.-module Network.Google.Resource.AdExchangeBuyer.Creatives.ListDeals-    (-    -- * REST Resource-      CreativesListDealsResource--    -- * Creating a Request-    , creativesListDeals-    , CreativesListDeals--    -- * Request Lenses-    , cldBuyerCreativeId-    , cldAccountId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.creatives.listDeals@ method which the--- 'CreativesListDeals' request conforms to.-type CreativesListDealsResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "creatives" :>-           Capture "accountId" (Textual Int32) :>-             Capture "buyerCreativeId" Text :>-               "listDeals" :>-                 QueryParam "alt" AltJSON :>-                   Get '[JSON] CreativeDealIds---- | Lists the external deal ids associated with the creative.------ /See:/ 'creativesListDeals' smart constructor.-data CreativesListDeals =-  CreativesListDeals'-    { _cldBuyerCreativeId :: !Text-    , _cldAccountId       :: !(Textual Int32)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CreativesListDeals' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cldBuyerCreativeId'------ * 'cldAccountId'-creativesListDeals-    :: Text -- ^ 'cldBuyerCreativeId'-    -> Int32 -- ^ 'cldAccountId'-    -> CreativesListDeals-creativesListDeals pCldBuyerCreativeId_ pCldAccountId_ =-  CreativesListDeals'-    { _cldBuyerCreativeId = pCldBuyerCreativeId_-    , _cldAccountId = _Coerce # pCldAccountId_-    }----- | The buyer-specific id for this creative.-cldBuyerCreativeId :: Lens' CreativesListDeals Text-cldBuyerCreativeId-  = lens _cldBuyerCreativeId-      (\ s a -> s{_cldBuyerCreativeId = a})---- | The id for the account that will serve this creative.-cldAccountId :: Lens' CreativesListDeals Int32-cldAccountId-  = lens _cldAccountId (\ s a -> s{_cldAccountId = a})-      . _Coerce--instance GoogleRequest CreativesListDeals where-        type Rs CreativesListDeals = CreativeDealIds-        type Scopes CreativesListDeals =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient CreativesListDeals'{..}-          = go _cldAccountId _cldBuyerCreativeId (Just AltJSON)-              adExchangeBuyerService-          where go-                  = buildClient-                      (Proxy :: Proxy CreativesListDealsResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/Creatives/RemoveDeal.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.AdExchangeBuyer.Creatives.RemoveDeal--- 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)------ Remove a deal id associated with the creative.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.creatives.removeDeal@.-module Network.Google.Resource.AdExchangeBuyer.Creatives.RemoveDeal-    (-    -- * REST Resource-      CreativesRemoveDealResource--    -- * Creating a Request-    , creativesRemoveDeal-    , CreativesRemoveDeal--    -- * Request Lenses-    , crdBuyerCreativeId-    , crdDealId-    , crdAccountId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.creatives.removeDeal@ method which the--- 'CreativesRemoveDeal' request conforms to.-type CreativesRemoveDealResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "creatives" :>-           Capture "accountId" (Textual Int32) :>-             Capture "buyerCreativeId" Text :>-               "removeDeal" :>-                 Capture "dealId" (Textual Int64) :>-                   QueryParam "alt" AltJSON :> Post '[JSON] ()---- | Remove a deal id associated with the creative.------ /See:/ 'creativesRemoveDeal' smart constructor.-data CreativesRemoveDeal =-  CreativesRemoveDeal'-    { _crdBuyerCreativeId :: !Text-    , _crdDealId          :: !(Textual Int64)-    , _crdAccountId       :: !(Textual Int32)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CreativesRemoveDeal' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'crdBuyerCreativeId'------ * 'crdDealId'------ * 'crdAccountId'-creativesRemoveDeal-    :: Text -- ^ 'crdBuyerCreativeId'-    -> Int64 -- ^ 'crdDealId'-    -> Int32 -- ^ 'crdAccountId'-    -> CreativesRemoveDeal-creativesRemoveDeal pCrdBuyerCreativeId_ pCrdDealId_ pCrdAccountId_ =-  CreativesRemoveDeal'-    { _crdBuyerCreativeId = pCrdBuyerCreativeId_-    , _crdDealId = _Coerce # pCrdDealId_-    , _crdAccountId = _Coerce # pCrdAccountId_-    }----- | The buyer-specific id for this creative.-crdBuyerCreativeId :: Lens' CreativesRemoveDeal Text-crdBuyerCreativeId-  = lens _crdBuyerCreativeId-      (\ s a -> s{_crdBuyerCreativeId = a})---- | The id of the deal id to disassociate with this creative.-crdDealId :: Lens' CreativesRemoveDeal Int64-crdDealId-  = lens _crdDealId (\ s a -> s{_crdDealId = a}) .-      _Coerce---- | The id for the account that will serve this creative.-crdAccountId :: Lens' CreativesRemoveDeal Int32-crdAccountId-  = lens _crdAccountId (\ s a -> s{_crdAccountId = a})-      . _Coerce--instance GoogleRequest CreativesRemoveDeal where-        type Rs CreativesRemoveDeal = ()-        type Scopes CreativesRemoveDeal =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient CreativesRemoveDeal'{..}-          = go _crdAccountId _crdBuyerCreativeId _crdDealId-              (Just AltJSON)-              adExchangeBuyerService-          where go-                  = buildClient-                      (Proxy :: Proxy CreativesRemoveDealResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/Delete.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.AdExchangeBuyer.MarketplaceDeals.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)------ Delete the specified deals from the proposal------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.marketplacedeals.delete@.-module Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.Delete-    (-    -- * REST Resource-      MarketplaceDealsDeleteResource--    -- * Creating a Request-    , marketplaceDealsDelete-    , MarketplaceDealsDelete--    -- * Request Lenses-    , mddPayload-    , mddProposalId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.marketplacedeals.delete@ method which the--- 'MarketplaceDealsDelete' request conforms to.-type MarketplaceDealsDeleteResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "proposals" :>-           Capture "proposalId" Text :>-             "deals" :>-               "delete" :>-                 QueryParam "alt" AltJSON :>-                   ReqBody '[JSON] DeleteOrderDealsRequest :>-                     Post '[JSON] DeleteOrderDealsResponse---- | Delete the specified deals from the proposal------ /See:/ 'marketplaceDealsDelete' smart constructor.-data MarketplaceDealsDelete =-  MarketplaceDealsDelete'-    { _mddPayload    :: !DeleteOrderDealsRequest-    , _mddProposalId :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'MarketplaceDealsDelete' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mddPayload'------ * 'mddProposalId'-marketplaceDealsDelete-    :: DeleteOrderDealsRequest -- ^ 'mddPayload'-    -> Text -- ^ 'mddProposalId'-    -> MarketplaceDealsDelete-marketplaceDealsDelete pMddPayload_ pMddProposalId_ =-  MarketplaceDealsDelete'-    {_mddPayload = pMddPayload_, _mddProposalId = pMddProposalId_}----- | Multipart request metadata.-mddPayload :: Lens' MarketplaceDealsDelete DeleteOrderDealsRequest-mddPayload-  = lens _mddPayload (\ s a -> s{_mddPayload = a})---- | The proposalId to delete deals from.-mddProposalId :: Lens' MarketplaceDealsDelete Text-mddProposalId-  = lens _mddProposalId-      (\ s a -> s{_mddProposalId = a})--instance GoogleRequest MarketplaceDealsDelete where-        type Rs MarketplaceDealsDelete =-             DeleteOrderDealsResponse-        type Scopes MarketplaceDealsDelete =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient MarketplaceDealsDelete'{..}-          = go _mddProposalId (Just AltJSON) _mddPayload-              adExchangeBuyerService-          where go-                  = buildClient-                      (Proxy :: Proxy MarketplaceDealsDeleteResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/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.AdExchangeBuyer.MarketplaceDeals.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)------ Add new deals for the specified proposal------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.marketplacedeals.insert@.-module Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.Insert-    (-    -- * REST Resource-      MarketplaceDealsInsertResource--    -- * Creating a Request-    , marketplaceDealsInsert-    , MarketplaceDealsInsert--    -- * Request Lenses-    , mdiPayload-    , mdiProposalId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.marketplacedeals.insert@ method which the--- 'MarketplaceDealsInsert' request conforms to.-type MarketplaceDealsInsertResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "proposals" :>-           Capture "proposalId" Text :>-             "deals" :>-               "insert" :>-                 QueryParam "alt" AltJSON :>-                   ReqBody '[JSON] AddOrderDealsRequest :>-                     Post '[JSON] AddOrderDealsResponse---- | Add new deals for the specified proposal------ /See:/ 'marketplaceDealsInsert' smart constructor.-data MarketplaceDealsInsert =-  MarketplaceDealsInsert'-    { _mdiPayload    :: !AddOrderDealsRequest-    , _mdiProposalId :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'MarketplaceDealsInsert' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mdiPayload'------ * 'mdiProposalId'-marketplaceDealsInsert-    :: AddOrderDealsRequest -- ^ 'mdiPayload'-    -> Text -- ^ 'mdiProposalId'-    -> MarketplaceDealsInsert-marketplaceDealsInsert pMdiPayload_ pMdiProposalId_ =-  MarketplaceDealsInsert'-    {_mdiPayload = pMdiPayload_, _mdiProposalId = pMdiProposalId_}----- | Multipart request metadata.-mdiPayload :: Lens' MarketplaceDealsInsert AddOrderDealsRequest-mdiPayload-  = lens _mdiPayload (\ s a -> s{_mdiPayload = a})---- | proposalId for which deals need to be added.-mdiProposalId :: Lens' MarketplaceDealsInsert Text-mdiProposalId-  = lens _mdiProposalId-      (\ s a -> s{_mdiProposalId = a})--instance GoogleRequest MarketplaceDealsInsert where-        type Rs MarketplaceDealsInsert =-             AddOrderDealsResponse-        type Scopes MarketplaceDealsInsert =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient MarketplaceDealsInsert'{..}-          = go _mdiProposalId (Just AltJSON) _mdiPayload-              adExchangeBuyerService-          where go-                  = buildClient-                      (Proxy :: Proxy MarketplaceDealsInsertResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/List.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.AdExchangeBuyer.MarketplaceDeals.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 all the deals for a given proposal------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.marketplacedeals.list@.-module Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.List-    (-    -- * REST Resource-      MarketplaceDealsListResource--    -- * Creating a Request-    , marketplaceDealsList-    , MarketplaceDealsList--    -- * Request Lenses-    , mdlProposalId-    , mdlPqlQuery-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.marketplacedeals.list@ method which the--- 'MarketplaceDealsList' request conforms to.-type MarketplaceDealsListResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "proposals" :>-           Capture "proposalId" Text :>-             "deals" :>-               QueryParam "pqlQuery" Text :>-                 QueryParam "alt" AltJSON :>-                   Get '[JSON] GetOrderDealsResponse---- | List all the deals for a given proposal------ /See:/ 'marketplaceDealsList' smart constructor.-data MarketplaceDealsList =-  MarketplaceDealsList'-    { _mdlProposalId :: !Text-    , _mdlPqlQuery   :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'MarketplaceDealsList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mdlProposalId'------ * 'mdlPqlQuery'-marketplaceDealsList-    :: Text -- ^ 'mdlProposalId'-    -> MarketplaceDealsList-marketplaceDealsList pMdlProposalId_ =-  MarketplaceDealsList'-    {_mdlProposalId = pMdlProposalId_, _mdlPqlQuery = Nothing}----- | The proposalId to get deals for. To search across all proposals specify--- order_id = \'-\' as part of the URL.-mdlProposalId :: Lens' MarketplaceDealsList Text-mdlProposalId-  = lens _mdlProposalId-      (\ s a -> s{_mdlProposalId = a})---- | Query string to retrieve specific deals.-mdlPqlQuery :: Lens' MarketplaceDealsList (Maybe Text)-mdlPqlQuery-  = lens _mdlPqlQuery (\ s a -> s{_mdlPqlQuery = a})--instance GoogleRequest MarketplaceDealsList where-        type Rs MarketplaceDealsList = GetOrderDealsResponse-        type Scopes MarketplaceDealsList =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient MarketplaceDealsList'{..}-          = go _mdlProposalId _mdlPqlQuery (Just AltJSON)-              adExchangeBuyerService-          where go-                  = buildClient-                      (Proxy :: Proxy MarketplaceDealsListResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/Update.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.AdExchangeBuyer.MarketplaceDeals.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)------ Replaces all the deals in the proposal with the passed in deals------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.marketplacedeals.update@.-module Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.Update-    (-    -- * REST Resource-      MarketplaceDealsUpdateResource--    -- * Creating a Request-    , marketplaceDealsUpdate-    , MarketplaceDealsUpdate--    -- * Request Lenses-    , mduPayload-    , mduProposalId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.marketplacedeals.update@ method which the--- 'MarketplaceDealsUpdate' request conforms to.-type MarketplaceDealsUpdateResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "proposals" :>-           Capture "proposalId" Text :>-             "deals" :>-               "update" :>-                 QueryParam "alt" AltJSON :>-                   ReqBody '[JSON] EditAllOrderDealsRequest :>-                     Post '[JSON] EditAllOrderDealsResponse---- | Replaces all the deals in the proposal with the passed in deals------ /See:/ 'marketplaceDealsUpdate' smart constructor.-data MarketplaceDealsUpdate =-  MarketplaceDealsUpdate'-    { _mduPayload    :: !EditAllOrderDealsRequest-    , _mduProposalId :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'MarketplaceDealsUpdate' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mduPayload'------ * 'mduProposalId'-marketplaceDealsUpdate-    :: EditAllOrderDealsRequest -- ^ 'mduPayload'-    -> Text -- ^ 'mduProposalId'-    -> MarketplaceDealsUpdate-marketplaceDealsUpdate pMduPayload_ pMduProposalId_ =-  MarketplaceDealsUpdate'-    {_mduPayload = pMduPayload_, _mduProposalId = pMduProposalId_}----- | Multipart request metadata.-mduPayload :: Lens' MarketplaceDealsUpdate EditAllOrderDealsRequest-mduPayload-  = lens _mduPayload (\ s a -> s{_mduPayload = a})---- | The proposalId to edit deals on.-mduProposalId :: Lens' MarketplaceDealsUpdate Text-mduProposalId-  = lens _mduProposalId-      (\ s a -> s{_mduProposalId = a})--instance GoogleRequest MarketplaceDealsUpdate where-        type Rs MarketplaceDealsUpdate =-             EditAllOrderDealsResponse-        type Scopes MarketplaceDealsUpdate =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient MarketplaceDealsUpdate'{..}-          = go _mduProposalId (Just AltJSON) _mduPayload-              adExchangeBuyerService-          where go-                  = buildClient-                      (Proxy :: Proxy MarketplaceDealsUpdateResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceNotes/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.AdExchangeBuyer.MarketplaceNotes.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)------ Add notes to the proposal------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.marketplacenotes.insert@.-module Network.Google.Resource.AdExchangeBuyer.MarketplaceNotes.Insert-    (-    -- * REST Resource-      MarketplaceNotesInsertResource--    -- * Creating a Request-    , marketplaceNotesInsert-    , MarketplaceNotesInsert--    -- * Request Lenses-    , mniPayload-    , mniProposalId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.marketplacenotes.insert@ method which the--- 'MarketplaceNotesInsert' request conforms to.-type MarketplaceNotesInsertResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "proposals" :>-           Capture "proposalId" Text :>-             "notes" :>-               "insert" :>-                 QueryParam "alt" AltJSON :>-                   ReqBody '[JSON] AddOrderNotesRequest :>-                     Post '[JSON] AddOrderNotesResponse---- | Add notes to the proposal------ /See:/ 'marketplaceNotesInsert' smart constructor.-data MarketplaceNotesInsert =-  MarketplaceNotesInsert'-    { _mniPayload    :: !AddOrderNotesRequest-    , _mniProposalId :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'MarketplaceNotesInsert' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mniPayload'------ * 'mniProposalId'-marketplaceNotesInsert-    :: AddOrderNotesRequest -- ^ 'mniPayload'-    -> Text -- ^ 'mniProposalId'-    -> MarketplaceNotesInsert-marketplaceNotesInsert pMniPayload_ pMniProposalId_ =-  MarketplaceNotesInsert'-    {_mniPayload = pMniPayload_, _mniProposalId = pMniProposalId_}----- | Multipart request metadata.-mniPayload :: Lens' MarketplaceNotesInsert AddOrderNotesRequest-mniPayload-  = lens _mniPayload (\ s a -> s{_mniPayload = a})---- | The proposalId to add notes for.-mniProposalId :: Lens' MarketplaceNotesInsert Text-mniProposalId-  = lens _mniProposalId-      (\ s a -> s{_mniProposalId = a})--instance GoogleRequest MarketplaceNotesInsert where-        type Rs MarketplaceNotesInsert =-             AddOrderNotesResponse-        type Scopes MarketplaceNotesInsert =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient MarketplaceNotesInsert'{..}-          = go _mniProposalId (Just AltJSON) _mniPayload-              adExchangeBuyerService-          where go-                  = buildClient-                      (Proxy :: Proxy MarketplaceNotesInsertResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceNotes/List.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.AdExchangeBuyer.MarketplaceNotes.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)------ Get all the notes associated with a proposal------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.marketplacenotes.list@.-module Network.Google.Resource.AdExchangeBuyer.MarketplaceNotes.List-    (-    -- * REST Resource-      MarketplaceNotesListResource--    -- * Creating a Request-    , marketplaceNotesList-    , MarketplaceNotesList--    -- * Request Lenses-    , mnlProposalId-    , mnlPqlQuery-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.marketplacenotes.list@ method which the--- 'MarketplaceNotesList' request conforms to.-type MarketplaceNotesListResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "proposals" :>-           Capture "proposalId" Text :>-             "notes" :>-               QueryParam "pqlQuery" Text :>-                 QueryParam "alt" AltJSON :>-                   Get '[JSON] GetOrderNotesResponse---- | Get all the notes associated with a proposal------ /See:/ 'marketplaceNotesList' smart constructor.-data MarketplaceNotesList =-  MarketplaceNotesList'-    { _mnlProposalId :: !Text-    , _mnlPqlQuery   :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'MarketplaceNotesList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mnlProposalId'------ * 'mnlPqlQuery'-marketplaceNotesList-    :: Text -- ^ 'mnlProposalId'-    -> MarketplaceNotesList-marketplaceNotesList pMnlProposalId_ =-  MarketplaceNotesList'-    {_mnlProposalId = pMnlProposalId_, _mnlPqlQuery = Nothing}----- | The proposalId to get notes for. To search across all proposals specify--- order_id = \'-\' as part of the URL.-mnlProposalId :: Lens' MarketplaceNotesList Text-mnlProposalId-  = lens _mnlProposalId-      (\ s a -> s{_mnlProposalId = a})---- | Query string to retrieve specific notes. To search the text contents of--- notes, please use syntax like \"WHERE note.note = \"foo\" or \"WHERE--- note.note LIKE \"%bar%\"-mnlPqlQuery :: Lens' MarketplaceNotesList (Maybe Text)-mnlPqlQuery-  = lens _mnlPqlQuery (\ s a -> s{_mnlPqlQuery = a})--instance GoogleRequest MarketplaceNotesList where-        type Rs MarketplaceNotesList = GetOrderNotesResponse-        type Scopes MarketplaceNotesList =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient MarketplaceNotesList'{..}-          = go _mnlProposalId _mnlPqlQuery (Just AltJSON)-              adExchangeBuyerService-          where go-                  = buildClient-                      (Proxy :: Proxy MarketplaceNotesListResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/Marketplaceprivateauction/Updateproposal.hs
@@ -1,109 +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.AdExchangeBuyer.Marketplaceprivateauction.Updateproposal--- 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 given private auction proposal------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.marketplaceprivateauction.updateproposal@.-module Network.Google.Resource.AdExchangeBuyer.Marketplaceprivateauction.Updateproposal-    (-    -- * REST Resource-      MarketplaceprivateauctionUpdateproposalResource--    -- * Creating a Request-    , marketplaceprivateauctionUpdateproposal-    , MarketplaceprivateauctionUpdateproposal--    -- * Request Lenses-    , muPrivateAuctionId-    , muPayload-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.marketplaceprivateauction.updateproposal@ method which the--- 'MarketplaceprivateauctionUpdateproposal' request conforms to.-type MarketplaceprivateauctionUpdateproposalResource-     =-     "adexchangebuyer" :>-       "v1.4" :>-         "privateauction" :>-           Capture "privateAuctionId" Text :>-             "updateproposal" :>-               QueryParam "alt" AltJSON :>-                 ReqBody '[JSON] UpdatePrivateAuctionProposalRequest-                   :> Post '[JSON] ()---- | Update a given private auction proposal------ /See:/ 'marketplaceprivateauctionUpdateproposal' smart constructor.-data MarketplaceprivateauctionUpdateproposal =-  MarketplaceprivateauctionUpdateproposal'-    { _muPrivateAuctionId :: !Text-    , _muPayload          :: !UpdatePrivateAuctionProposalRequest-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'MarketplaceprivateauctionUpdateproposal' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'muPrivateAuctionId'------ * 'muPayload'-marketplaceprivateauctionUpdateproposal-    :: Text -- ^ 'muPrivateAuctionId'-    -> UpdatePrivateAuctionProposalRequest -- ^ 'muPayload'-    -> MarketplaceprivateauctionUpdateproposal-marketplaceprivateauctionUpdateproposal pMuPrivateAuctionId_ pMuPayload_ =-  MarketplaceprivateauctionUpdateproposal'-    {_muPrivateAuctionId = pMuPrivateAuctionId_, _muPayload = pMuPayload_}----- | The private auction id to be updated.-muPrivateAuctionId :: Lens' MarketplaceprivateauctionUpdateproposal Text-muPrivateAuctionId-  = lens _muPrivateAuctionId-      (\ s a -> s{_muPrivateAuctionId = a})---- | Multipart request metadata.-muPayload :: Lens' MarketplaceprivateauctionUpdateproposal UpdatePrivateAuctionProposalRequest-muPayload-  = lens _muPayload (\ s a -> s{_muPayload = a})--instance GoogleRequest-           MarketplaceprivateauctionUpdateproposal-         where-        type Rs MarketplaceprivateauctionUpdateproposal = ()-        type Scopes MarketplaceprivateauctionUpdateproposal =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient-          MarketplaceprivateauctionUpdateproposal'{..}-          = go _muPrivateAuctionId (Just AltJSON) _muPayload-              adExchangeBuyerService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy-                           MarketplaceprivateauctionUpdateproposalResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/PerformanceReport/List.hs
@@ -1,150 +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.AdExchangeBuyer.PerformanceReport.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)------ Retrieves the authenticated user\'s list of performance metrics.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.performanceReport.list@.-module Network.Google.Resource.AdExchangeBuyer.PerformanceReport.List-    (-    -- * REST Resource-      PerformanceReportListResource--    -- * Creating a Request-    , performanceReportList'-    , PerformanceReportList'--    -- * Request Lenses-    , prlAccountId-    , prlPageToken-    , prlEndDateTime-    , prlMaxResults-    , prlStartDateTime-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.performanceReport.list@ method which the--- 'PerformanceReportList'' request conforms to.-type PerformanceReportListResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "performancereport" :>-           QueryParam "accountId" (Textual Int64) :>-             QueryParam "endDateTime" Text :>-               QueryParam "startDateTime" Text :>-                 QueryParam "pageToken" Text :>-                   QueryParam "maxResults" (Textual Word32) :>-                     QueryParam "alt" AltJSON :>-                       Get '[JSON] PerformanceReportList---- | Retrieves the authenticated user\'s list of performance metrics.------ /See:/ 'performanceReportList'' smart constructor.-data PerformanceReportList' =-  PerformanceReportList''-    { _prlAccountId     :: !(Textual Int64)-    , _prlPageToken     :: !(Maybe Text)-    , _prlEndDateTime   :: !Text-    , _prlMaxResults    :: !(Maybe (Textual Word32))-    , _prlStartDateTime :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PerformanceReportList'' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'prlAccountId'------ * 'prlPageToken'------ * 'prlEndDateTime'------ * 'prlMaxResults'------ * 'prlStartDateTime'-performanceReportList'-    :: Int64 -- ^ 'prlAccountId'-    -> Text -- ^ 'prlEndDateTime'-    -> Text -- ^ 'prlStartDateTime'-    -> PerformanceReportList'-performanceReportList' pPrlAccountId_ pPrlEndDateTime_ pPrlStartDateTime_ =-  PerformanceReportList''-    { _prlAccountId = _Coerce # pPrlAccountId_-    , _prlPageToken = Nothing-    , _prlEndDateTime = pPrlEndDateTime_-    , _prlMaxResults = Nothing-    , _prlStartDateTime = pPrlStartDateTime_-    }----- | The account id to get the reports.-prlAccountId :: Lens' PerformanceReportList' Int64-prlAccountId-  = lens _prlAccountId (\ s a -> s{_prlAccountId = a})-      . _Coerce---- | A continuation token, used to page through performance reports. To--- retrieve the next page, set this parameter to the value of--- \"nextPageToken\" from the previous response. Optional.-prlPageToken :: Lens' PerformanceReportList' (Maybe Text)-prlPageToken-  = lens _prlPageToken (\ s a -> s{_prlPageToken = a})---- | The end time of the report in ISO 8601 timestamp format using UTC.-prlEndDateTime :: Lens' PerformanceReportList' Text-prlEndDateTime-  = lens _prlEndDateTime-      (\ s a -> s{_prlEndDateTime = a})---- | Maximum number of entries returned on one result page. If not set, the--- default is 100. Optional.-prlMaxResults :: Lens' PerformanceReportList' (Maybe Word32)-prlMaxResults-  = lens _prlMaxResults-      (\ s a -> s{_prlMaxResults = a})-      . mapping _Coerce---- | The start time of the report in ISO 8601 timestamp format using UTC.-prlStartDateTime :: Lens' PerformanceReportList' Text-prlStartDateTime-  = lens _prlStartDateTime-      (\ s a -> s{_prlStartDateTime = a})--instance GoogleRequest PerformanceReportList' where-        type Rs PerformanceReportList' =-             PerformanceReportList-        type Scopes PerformanceReportList' =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient PerformanceReportList''{..}-          = go (Just _prlAccountId) (Just _prlEndDateTime)-              (Just _prlStartDateTime)-              _prlPageToken-              _prlMaxResults-              (Just AltJSON)-              adExchangeBuyerService-          where go-                  = buildClient-                      (Proxy :: Proxy PerformanceReportListResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Delete.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.AdExchangeBuyer.PretargetingConfig.Delete--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Deletes an existing pretargeting config.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.pretargetingConfig.delete@.-module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Delete-    (-    -- * REST Resource-      PretargetingConfigDeleteResource--    -- * Creating a Request-    , pretargetingConfigDelete-    , PretargetingConfigDelete--    -- * Request Lenses-    , pcdAccountId-    , pcdConfigId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.pretargetingConfig.delete@ method which the--- 'PretargetingConfigDelete' request conforms to.-type PretargetingConfigDeleteResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "pretargetingconfigs" :>-           Capture "accountId" (Textual Int64) :>-             Capture "configId" (Textual Int64) :>-               QueryParam "alt" AltJSON :> Delete '[JSON] ()---- | Deletes an existing pretargeting config.------ /See:/ 'pretargetingConfigDelete' smart constructor.-data PretargetingConfigDelete =-  PretargetingConfigDelete'-    { _pcdAccountId :: !(Textual Int64)-    , _pcdConfigId  :: !(Textual Int64)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PretargetingConfigDelete' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pcdAccountId'------ * 'pcdConfigId'-pretargetingConfigDelete-    :: Int64 -- ^ 'pcdAccountId'-    -> Int64 -- ^ 'pcdConfigId'-    -> PretargetingConfigDelete-pretargetingConfigDelete pPcdAccountId_ pPcdConfigId_ =-  PretargetingConfigDelete'-    { _pcdAccountId = _Coerce # pPcdAccountId_-    , _pcdConfigId = _Coerce # pPcdConfigId_-    }----- | The account id to delete the pretargeting config for.-pcdAccountId :: Lens' PretargetingConfigDelete Int64-pcdAccountId-  = lens _pcdAccountId (\ s a -> s{_pcdAccountId = a})-      . _Coerce---- | The specific id of the configuration to delete.-pcdConfigId :: Lens' PretargetingConfigDelete Int64-pcdConfigId-  = lens _pcdConfigId (\ s a -> s{_pcdConfigId = a}) .-      _Coerce--instance GoogleRequest PretargetingConfigDelete where-        type Rs PretargetingConfigDelete = ()-        type Scopes PretargetingConfigDelete =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient PretargetingConfigDelete'{..}-          = go _pcdAccountId _pcdConfigId (Just AltJSON)-              adExchangeBuyerService-          where go-                  = buildClient-                      (Proxy :: Proxy PretargetingConfigDeleteResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Get.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.AdExchangeBuyer.PretargetingConfig.Get--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Gets a specific pretargeting configuration------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.pretargetingConfig.get@.-module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Get-    (-    -- * REST Resource-      PretargetingConfigGetResource--    -- * Creating a Request-    , pretargetingConfigGet-    , PretargetingConfigGet--    -- * Request Lenses-    , pcgAccountId-    , pcgConfigId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.pretargetingConfig.get@ method which the--- 'PretargetingConfigGet' request conforms to.-type PretargetingConfigGetResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "pretargetingconfigs" :>-           Capture "accountId" (Textual Int64) :>-             Capture "configId" (Textual Int64) :>-               QueryParam "alt" AltJSON :>-                 Get '[JSON] PretargetingConfig---- | Gets a specific pretargeting configuration------ /See:/ 'pretargetingConfigGet' smart constructor.-data PretargetingConfigGet =-  PretargetingConfigGet'-    { _pcgAccountId :: !(Textual Int64)-    , _pcgConfigId  :: !(Textual Int64)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PretargetingConfigGet' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pcgAccountId'------ * 'pcgConfigId'-pretargetingConfigGet-    :: Int64 -- ^ 'pcgAccountId'-    -> Int64 -- ^ 'pcgConfigId'-    -> PretargetingConfigGet-pretargetingConfigGet pPcgAccountId_ pPcgConfigId_ =-  PretargetingConfigGet'-    { _pcgAccountId = _Coerce # pPcgAccountId_-    , _pcgConfigId = _Coerce # pPcgConfigId_-    }----- | The account id to get the pretargeting config for.-pcgAccountId :: Lens' PretargetingConfigGet Int64-pcgAccountId-  = lens _pcgAccountId (\ s a -> s{_pcgAccountId = a})-      . _Coerce---- | The specific id of the configuration to retrieve.-pcgConfigId :: Lens' PretargetingConfigGet Int64-pcgConfigId-  = lens _pcgConfigId (\ s a -> s{_pcgConfigId = a}) .-      _Coerce--instance GoogleRequest PretargetingConfigGet where-        type Rs PretargetingConfigGet = PretargetingConfig-        type Scopes PretargetingConfigGet =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient PretargetingConfigGet'{..}-          = go _pcgAccountId _pcgConfigId (Just AltJSON)-              adExchangeBuyerService-          where go-                  = buildClient-                      (Proxy :: Proxy PretargetingConfigGetResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Insert.hs
@@ -1,102 +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.AdExchangeBuyer.PretargetingConfig.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)------ Inserts a new pretargeting configuration.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.pretargetingConfig.insert@.-module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Insert-    (-    -- * REST Resource-      PretargetingConfigInsertResource--    -- * Creating a Request-    , pretargetingConfigInsert-    , PretargetingConfigInsert--    -- * Request Lenses-    , pciPayload-    , pciAccountId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.pretargetingConfig.insert@ method which the--- 'PretargetingConfigInsert' request conforms to.-type PretargetingConfigInsertResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "pretargetingconfigs" :>-           Capture "accountId" (Textual Int64) :>-             QueryParam "alt" AltJSON :>-               ReqBody '[JSON] PretargetingConfig :>-                 Post '[JSON] PretargetingConfig---- | Inserts a new pretargeting configuration.------ /See:/ 'pretargetingConfigInsert' smart constructor.-data PretargetingConfigInsert =-  PretargetingConfigInsert'-    { _pciPayload   :: !PretargetingConfig-    , _pciAccountId :: !(Textual Int64)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PretargetingConfigInsert' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pciPayload'------ * 'pciAccountId'-pretargetingConfigInsert-    :: PretargetingConfig -- ^ 'pciPayload'-    -> Int64 -- ^ 'pciAccountId'-    -> PretargetingConfigInsert-pretargetingConfigInsert pPciPayload_ pPciAccountId_ =-  PretargetingConfigInsert'-    {_pciPayload = pPciPayload_, _pciAccountId = _Coerce # pPciAccountId_}----- | Multipart request metadata.-pciPayload :: Lens' PretargetingConfigInsert PretargetingConfig-pciPayload-  = lens _pciPayload (\ s a -> s{_pciPayload = a})---- | The account id to insert the pretargeting config for.-pciAccountId :: Lens' PretargetingConfigInsert Int64-pciAccountId-  = lens _pciAccountId (\ s a -> s{_pciAccountId = a})-      . _Coerce--instance GoogleRequest PretargetingConfigInsert where-        type Rs PretargetingConfigInsert = PretargetingConfig-        type Scopes PretargetingConfigInsert =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient PretargetingConfigInsert'{..}-          = go _pciAccountId (Just AltJSON) _pciPayload-              adExchangeBuyerService-          where go-                  = buildClient-                      (Proxy :: Proxy PretargetingConfigInsertResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/List.hs
@@ -1,93 +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.AdExchangeBuyer.PretargetingConfig.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)------ Retrieves a list of the authenticated user\'s pretargeting--- configurations.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.pretargetingConfig.list@.-module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.List-    (-    -- * REST Resource-      PretargetingConfigListResource--    -- * Creating a Request-    , pretargetingConfigList'-    , PretargetingConfigList'--    -- * Request Lenses-    , pclAccountId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.pretargetingConfig.list@ method which the--- 'PretargetingConfigList'' request conforms to.-type PretargetingConfigListResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "pretargetingconfigs" :>-           Capture "accountId" (Textual Int64) :>-             QueryParam "alt" AltJSON :>-               Get '[JSON] PretargetingConfigList---- | Retrieves a list of the authenticated user\'s pretargeting--- configurations.------ /See:/ 'pretargetingConfigList'' smart constructor.-newtype PretargetingConfigList' =-  PretargetingConfigList''-    { _pclAccountId :: Textual Int64-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PretargetingConfigList'' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pclAccountId'-pretargetingConfigList'-    :: Int64 -- ^ 'pclAccountId'-    -> PretargetingConfigList'-pretargetingConfigList' pPclAccountId_ =-  PretargetingConfigList'' {_pclAccountId = _Coerce # pPclAccountId_}----- | The account id to get the pretargeting configs for.-pclAccountId :: Lens' PretargetingConfigList' Int64-pclAccountId-  = lens _pclAccountId (\ s a -> s{_pclAccountId = a})-      . _Coerce--instance GoogleRequest PretargetingConfigList' where-        type Rs PretargetingConfigList' =-             PretargetingConfigList-        type Scopes PretargetingConfigList' =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient PretargetingConfigList''{..}-          = go _pclAccountId (Just AltJSON)-              adExchangeBuyerService-          where go-                  = buildClient-                      (Proxy :: Proxy PretargetingConfigListResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Patch.hs
@@ -1,120 +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.AdExchangeBuyer.PretargetingConfig.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)------ Updates an existing pretargeting config. This method supports patch--- semantics.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.pretargetingConfig.patch@.-module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Patch-    (-    -- * REST Resource-      PretargetingConfigPatchResource--    -- * Creating a Request-    , pretargetingConfigPatch-    , PretargetingConfigPatch--    -- * Request Lenses-    , pcpPayload-    , pcpAccountId-    , pcpConfigId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.pretargetingConfig.patch@ method which the--- 'PretargetingConfigPatch' request conforms to.-type PretargetingConfigPatchResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "pretargetingconfigs" :>-           Capture "accountId" (Textual Int64) :>-             Capture "configId" (Textual Int64) :>-               QueryParam "alt" AltJSON :>-                 ReqBody '[JSON] PretargetingConfig :>-                   Patch '[JSON] PretargetingConfig---- | Updates an existing pretargeting config. This method supports patch--- semantics.------ /See:/ 'pretargetingConfigPatch' smart constructor.-data PretargetingConfigPatch =-  PretargetingConfigPatch'-    { _pcpPayload   :: !PretargetingConfig-    , _pcpAccountId :: !(Textual Int64)-    , _pcpConfigId  :: !(Textual Int64)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PretargetingConfigPatch' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pcpPayload'------ * 'pcpAccountId'------ * 'pcpConfigId'-pretargetingConfigPatch-    :: PretargetingConfig -- ^ 'pcpPayload'-    -> Int64 -- ^ 'pcpAccountId'-    -> Int64 -- ^ 'pcpConfigId'-    -> PretargetingConfigPatch-pretargetingConfigPatch pPcpPayload_ pPcpAccountId_ pPcpConfigId_ =-  PretargetingConfigPatch'-    { _pcpPayload = pPcpPayload_-    , _pcpAccountId = _Coerce # pPcpAccountId_-    , _pcpConfigId = _Coerce # pPcpConfigId_-    }----- | Multipart request metadata.-pcpPayload :: Lens' PretargetingConfigPatch PretargetingConfig-pcpPayload-  = lens _pcpPayload (\ s a -> s{_pcpPayload = a})---- | The account id to update the pretargeting config for.-pcpAccountId :: Lens' PretargetingConfigPatch Int64-pcpAccountId-  = lens _pcpAccountId (\ s a -> s{_pcpAccountId = a})-      . _Coerce---- | The specific id of the configuration to update.-pcpConfigId :: Lens' PretargetingConfigPatch Int64-pcpConfigId-  = lens _pcpConfigId (\ s a -> s{_pcpConfigId = a}) .-      _Coerce--instance GoogleRequest PretargetingConfigPatch where-        type Rs PretargetingConfigPatch = PretargetingConfig-        type Scopes PretargetingConfigPatch =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient PretargetingConfigPatch'{..}-          = go _pcpAccountId _pcpConfigId (Just AltJSON)-              _pcpPayload-              adExchangeBuyerService-          where go-                  = buildClient-                      (Proxy :: Proxy PretargetingConfigPatchResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Update.hs
@@ -1,118 +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.AdExchangeBuyer.PretargetingConfig.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)------ Updates an existing pretargeting config.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.pretargetingConfig.update@.-module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Update-    (-    -- * REST Resource-      PretargetingConfigUpdateResource--    -- * Creating a Request-    , pretargetingConfigUpdate-    , PretargetingConfigUpdate--    -- * Request Lenses-    , pcuPayload-    , pcuAccountId-    , pcuConfigId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.pretargetingConfig.update@ method which the--- 'PretargetingConfigUpdate' request conforms to.-type PretargetingConfigUpdateResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "pretargetingconfigs" :>-           Capture "accountId" (Textual Int64) :>-             Capture "configId" (Textual Int64) :>-               QueryParam "alt" AltJSON :>-                 ReqBody '[JSON] PretargetingConfig :>-                   Put '[JSON] PretargetingConfig---- | Updates an existing pretargeting config.------ /See:/ 'pretargetingConfigUpdate' smart constructor.-data PretargetingConfigUpdate =-  PretargetingConfigUpdate'-    { _pcuPayload   :: !PretargetingConfig-    , _pcuAccountId :: !(Textual Int64)-    , _pcuConfigId  :: !(Textual Int64)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PretargetingConfigUpdate' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pcuPayload'------ * 'pcuAccountId'------ * 'pcuConfigId'-pretargetingConfigUpdate-    :: PretargetingConfig -- ^ 'pcuPayload'-    -> Int64 -- ^ 'pcuAccountId'-    -> Int64 -- ^ 'pcuConfigId'-    -> PretargetingConfigUpdate-pretargetingConfigUpdate pPcuPayload_ pPcuAccountId_ pPcuConfigId_ =-  PretargetingConfigUpdate'-    { _pcuPayload = pPcuPayload_-    , _pcuAccountId = _Coerce # pPcuAccountId_-    , _pcuConfigId = _Coerce # pPcuConfigId_-    }----- | Multipart request metadata.-pcuPayload :: Lens' PretargetingConfigUpdate PretargetingConfig-pcuPayload-  = lens _pcuPayload (\ s a -> s{_pcuPayload = a})---- | The account id to update the pretargeting config for.-pcuAccountId :: Lens' PretargetingConfigUpdate Int64-pcuAccountId-  = lens _pcuAccountId (\ s a -> s{_pcuAccountId = a})-      . _Coerce---- | The specific id of the configuration to update.-pcuConfigId :: Lens' PretargetingConfigUpdate Int64-pcuConfigId-  = lens _pcuConfigId (\ s a -> s{_pcuConfigId = a}) .-      _Coerce--instance GoogleRequest PretargetingConfigUpdate where-        type Rs PretargetingConfigUpdate = PretargetingConfig-        type Scopes PretargetingConfigUpdate =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient PretargetingConfigUpdate'{..}-          = go _pcuAccountId _pcuConfigId (Just AltJSON)-              _pcuPayload-              adExchangeBuyerService-          where go-                  = buildClient-                      (Proxy :: Proxy PretargetingConfigUpdateResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/Products/Get.hs
@@ -1,86 +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.AdExchangeBuyer.Products.Get--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Gets the requested product by id.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.products.get@.-module Network.Google.Resource.AdExchangeBuyer.Products.Get-    (-    -- * REST Resource-      ProductsGetResource--    -- * Creating a Request-    , productsGet-    , ProductsGet--    -- * Request Lenses-    , pgProductId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.products.get@ method which the--- 'ProductsGet' request conforms to.-type ProductsGetResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "products" :>-           Capture "productId" Text :>-             QueryParam "alt" AltJSON :> Get '[JSON] Product---- | Gets the requested product by id.------ /See:/ 'productsGet' smart constructor.-newtype ProductsGet =-  ProductsGet'-    { _pgProductId :: Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProductsGet' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pgProductId'-productsGet-    :: Text -- ^ 'pgProductId'-    -> ProductsGet-productsGet pPgProductId_ = ProductsGet' {_pgProductId = pPgProductId_}----- | The id for the product to get the head revision for.-pgProductId :: Lens' ProductsGet Text-pgProductId-  = lens _pgProductId (\ s a -> s{_pgProductId = a})--instance GoogleRequest ProductsGet where-        type Rs ProductsGet = Product-        type Scopes ProductsGet =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient ProductsGet'{..}-          = go _pgProductId (Just AltJSON)-              adExchangeBuyerService-          where go-                  = buildClient (Proxy :: Proxy ProductsGetResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/Products/Search.hs
@@ -1,87 +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.AdExchangeBuyer.Products.Search--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Gets the requested product.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.products.search@.-module Network.Google.Resource.AdExchangeBuyer.Products.Search-    (-    -- * REST Resource-      ProductsSearchResource--    -- * Creating a Request-    , productsSearch-    , ProductsSearch--    -- * Request Lenses-    , psPqlQuery-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.products.search@ method which the--- 'ProductsSearch' request conforms to.-type ProductsSearchResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "products" :>-           "search" :>-             QueryParam "pqlQuery" Text :>-               QueryParam "alt" AltJSON :>-                 Get '[JSON] GetOffersResponse---- | Gets the requested product.------ /See:/ 'productsSearch' smart constructor.-newtype ProductsSearch =-  ProductsSearch'-    { _psPqlQuery :: Maybe Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProductsSearch' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'psPqlQuery'-productsSearch-    :: ProductsSearch-productsSearch = ProductsSearch' {_psPqlQuery = Nothing}----- | The pql query used to query for products.-psPqlQuery :: Lens' ProductsSearch (Maybe Text)-psPqlQuery-  = lens _psPqlQuery (\ s a -> s{_psPqlQuery = a})--instance GoogleRequest ProductsSearch where-        type Rs ProductsSearch = GetOffersResponse-        type Scopes ProductsSearch =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient ProductsSearch'{..}-          = go _psPqlQuery (Just AltJSON)-              adExchangeBuyerService-          where go-                  = buildClient (Proxy :: Proxy ProductsSearchResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Get.hs
@@ -1,86 +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.AdExchangeBuyer.Proposals.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 proposal given its id------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.proposals.get@.-module Network.Google.Resource.AdExchangeBuyer.Proposals.Get-    (-    -- * REST Resource-      ProposalsGetResource--    -- * Creating a Request-    , proposalsGet-    , ProposalsGet--    -- * Request Lenses-    , pgProposalId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.proposals.get@ method which the--- 'ProposalsGet' request conforms to.-type ProposalsGetResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "proposals" :>-           Capture "proposalId" Text :>-             QueryParam "alt" AltJSON :> Get '[JSON] Proposal---- | Get a proposal given its id------ /See:/ 'proposalsGet' smart constructor.-newtype ProposalsGet =-  ProposalsGet'-    { _pgProposalId :: Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProposalsGet' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pgProposalId'-proposalsGet-    :: Text -- ^ 'pgProposalId'-    -> ProposalsGet-proposalsGet pPgProposalId_ = ProposalsGet' {_pgProposalId = pPgProposalId_}----- | Id of the proposal to retrieve.-pgProposalId :: Lens' ProposalsGet Text-pgProposalId-  = lens _pgProposalId (\ s a -> s{_pgProposalId = a})--instance GoogleRequest ProposalsGet where-        type Rs ProposalsGet = Proposal-        type Scopes ProposalsGet =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient ProposalsGet'{..}-          = go _pgProposalId (Just AltJSON)-              adExchangeBuyerService-          where go-                  = buildClient (Proxy :: Proxy ProposalsGetResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Insert.hs
@@ -1,88 +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.AdExchangeBuyer.Proposals.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 the given list of proposals------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.proposals.insert@.-module Network.Google.Resource.AdExchangeBuyer.Proposals.Insert-    (-    -- * REST Resource-      ProposalsInsertResource--    -- * Creating a Request-    , proposalsInsert-    , ProposalsInsert--    -- * Request Lenses-    , piPayload-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.proposals.insert@ method which the--- 'ProposalsInsert' request conforms to.-type ProposalsInsertResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "proposals" :>-           "insert" :>-             QueryParam "alt" AltJSON :>-               ReqBody '[JSON] CreateOrdersRequest :>-                 Post '[JSON] CreateOrdersResponse---- | Create the given list of proposals------ /See:/ 'proposalsInsert' smart constructor.-newtype ProposalsInsert =-  ProposalsInsert'-    { _piPayload :: CreateOrdersRequest-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProposalsInsert' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'piPayload'-proposalsInsert-    :: CreateOrdersRequest -- ^ 'piPayload'-    -> ProposalsInsert-proposalsInsert pPiPayload_ = ProposalsInsert' {_piPayload = pPiPayload_}----- | Multipart request metadata.-piPayload :: Lens' ProposalsInsert CreateOrdersRequest-piPayload-  = lens _piPayload (\ s a -> s{_piPayload = a})--instance GoogleRequest ProposalsInsert where-        type Rs ProposalsInsert = CreateOrdersResponse-        type Scopes ProposalsInsert =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient ProposalsInsert'{..}-          = go (Just AltJSON) _piPayload adExchangeBuyerService-          where go-                  = buildClient-                      (Proxy :: Proxy ProposalsInsertResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Patch.hs
@@ -1,134 +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.AdExchangeBuyer.Proposals.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 the given proposal. This method supports patch semantics.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.proposals.patch@.-module Network.Google.Resource.AdExchangeBuyer.Proposals.Patch-    (-    -- * REST Resource-      ProposalsPatchResource--    -- * Creating a Request-    , proposalsPatch-    , ProposalsPatch--    -- * Request Lenses-    , ppUpdateAction-    , ppRevisionNumber-    , ppPayload-    , ppProposalId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.proposals.patch@ method which the--- 'ProposalsPatch' request conforms to.-type ProposalsPatchResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "proposals" :>-           Capture "proposalId" Text :>-             Capture "revisionNumber" (Textual Int64) :>-               Capture "updateAction" ProposalsPatchUpdateAction :>-                 QueryParam "alt" AltJSON :>-                   ReqBody '[JSON] Proposal :> Patch '[JSON] Proposal---- | Update the given proposal. This method supports patch semantics.------ /See:/ 'proposalsPatch' smart constructor.-data ProposalsPatch =-  ProposalsPatch'-    { _ppUpdateAction   :: !ProposalsPatchUpdateAction-    , _ppRevisionNumber :: !(Textual Int64)-    , _ppPayload        :: !Proposal-    , _ppProposalId     :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProposalsPatch' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ppUpdateAction'------ * 'ppRevisionNumber'------ * 'ppPayload'------ * 'ppProposalId'-proposalsPatch-    :: ProposalsPatchUpdateAction -- ^ 'ppUpdateAction'-    -> Int64 -- ^ 'ppRevisionNumber'-    -> Proposal -- ^ 'ppPayload'-    -> Text -- ^ 'ppProposalId'-    -> ProposalsPatch-proposalsPatch pPpUpdateAction_ pPpRevisionNumber_ pPpPayload_ pPpProposalId_ =-  ProposalsPatch'-    { _ppUpdateAction = pPpUpdateAction_-    , _ppRevisionNumber = _Coerce # pPpRevisionNumber_-    , _ppPayload = pPpPayload_-    , _ppProposalId = pPpProposalId_-    }----- | The proposed action to take on the proposal. This field is required and--- it must be set when updating a proposal.-ppUpdateAction :: Lens' ProposalsPatch ProposalsPatchUpdateAction-ppUpdateAction-  = lens _ppUpdateAction-      (\ s a -> s{_ppUpdateAction = a})---- | The last known revision number to update. If the head revision in the--- marketplace database has since changed, an error will be thrown. The--- caller should then fetch the latest proposal at head revision and retry--- the update at that revision.-ppRevisionNumber :: Lens' ProposalsPatch Int64-ppRevisionNumber-  = lens _ppRevisionNumber-      (\ s a -> s{_ppRevisionNumber = a})-      . _Coerce---- | Multipart request metadata.-ppPayload :: Lens' ProposalsPatch Proposal-ppPayload-  = lens _ppPayload (\ s a -> s{_ppPayload = a})---- | The proposal id to update.-ppProposalId :: Lens' ProposalsPatch Text-ppProposalId-  = lens _ppProposalId (\ s a -> s{_ppProposalId = a})--instance GoogleRequest ProposalsPatch where-        type Rs ProposalsPatch = Proposal-        type Scopes ProposalsPatch =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient ProposalsPatch'{..}-          = go _ppProposalId _ppRevisionNumber _ppUpdateAction-              (Just AltJSON)-              _ppPayload-              adExchangeBuyerService-          where go-                  = buildClient (Proxy :: Proxy ProposalsPatchResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Search.hs
@@ -1,87 +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.AdExchangeBuyer.Proposals.Search--- 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)------ Search for proposals using pql query------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.proposals.search@.-module Network.Google.Resource.AdExchangeBuyer.Proposals.Search-    (-    -- * REST Resource-      ProposalsSearchResource--    -- * Creating a Request-    , proposalsSearch-    , ProposalsSearch--    -- * Request Lenses-    , pPqlQuery-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.proposals.search@ method which the--- 'ProposalsSearch' request conforms to.-type ProposalsSearchResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "proposals" :>-           "search" :>-             QueryParam "pqlQuery" Text :>-               QueryParam "alt" AltJSON :>-                 Get '[JSON] GetOrdersResponse---- | Search for proposals using pql query------ /See:/ 'proposalsSearch' smart constructor.-newtype ProposalsSearch =-  ProposalsSearch'-    { _pPqlQuery :: Maybe Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProposalsSearch' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pPqlQuery'-proposalsSearch-    :: ProposalsSearch-proposalsSearch = ProposalsSearch' {_pPqlQuery = Nothing}----- | Query string to retrieve specific proposals.-pPqlQuery :: Lens' ProposalsSearch (Maybe Text)-pPqlQuery-  = lens _pPqlQuery (\ s a -> s{_pPqlQuery = a})--instance GoogleRequest ProposalsSearch where-        type Rs ProposalsSearch = GetOrdersResponse-        type Scopes ProposalsSearch =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient ProposalsSearch'{..}-          = go _pPqlQuery (Just AltJSON) adExchangeBuyerService-          where go-                  = buildClient-                      (Proxy :: Proxy ProposalsSearchResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Setupcomplete.hs
@@ -1,89 +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.AdExchangeBuyer.Proposals.Setupcomplete--- 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 the given proposal to indicate that setup has been completed.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.proposals.setupcomplete@.-module Network.Google.Resource.AdExchangeBuyer.Proposals.Setupcomplete-    (-    -- * REST Resource-      ProposalsSetupcompleteResource--    -- * Creating a Request-    , proposalsSetupcomplete-    , ProposalsSetupcomplete--    -- * Request Lenses-    , psProposalId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.proposals.setupcomplete@ method which the--- 'ProposalsSetupcomplete' request conforms to.-type ProposalsSetupcompleteResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "proposals" :>-           Capture "proposalId" Text :>-             "setupcomplete" :>-               QueryParam "alt" AltJSON :> Post '[JSON] ()---- | Update the given proposal to indicate that setup has been completed.------ /See:/ 'proposalsSetupcomplete' smart constructor.-newtype ProposalsSetupcomplete =-  ProposalsSetupcomplete'-    { _psProposalId :: Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProposalsSetupcomplete' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'psProposalId'-proposalsSetupcomplete-    :: Text -- ^ 'psProposalId'-    -> ProposalsSetupcomplete-proposalsSetupcomplete pPsProposalId_ =-  ProposalsSetupcomplete' {_psProposalId = pPsProposalId_}----- | The proposal id for which the setup is complete-psProposalId :: Lens' ProposalsSetupcomplete Text-psProposalId-  = lens _psProposalId (\ s a -> s{_psProposalId = a})--instance GoogleRequest ProposalsSetupcomplete where-        type Rs ProposalsSetupcomplete = ()-        type Scopes ProposalsSetupcomplete =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient ProposalsSetupcomplete'{..}-          = go _psProposalId (Just AltJSON)-              adExchangeBuyerService-          where go-                  = buildClient-                      (Proxy :: Proxy ProposalsSetupcompleteResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Update.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.AdExchangeBuyer.Proposals.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 the given proposal------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.proposals.update@.-module Network.Google.Resource.AdExchangeBuyer.Proposals.Update-    (-    -- * REST Resource-      ProposalsUpdateResource--    -- * Creating a Request-    , proposalsUpdate-    , ProposalsUpdate--    -- * Request Lenses-    , puUpdateAction-    , puRevisionNumber-    , puPayload-    , puProposalId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.proposals.update@ method which the--- 'ProposalsUpdate' request conforms to.-type ProposalsUpdateResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "proposals" :>-           Capture "proposalId" Text :>-             Capture "revisionNumber" (Textual Int64) :>-               Capture "updateAction" ProposalsUpdateUpdateAction :>-                 QueryParam "alt" AltJSON :>-                   ReqBody '[JSON] Proposal :> Put '[JSON] Proposal---- | Update the given proposal------ /See:/ 'proposalsUpdate' smart constructor.-data ProposalsUpdate =-  ProposalsUpdate'-    { _puUpdateAction   :: !ProposalsUpdateUpdateAction-    , _puRevisionNumber :: !(Textual Int64)-    , _puPayload        :: !Proposal-    , _puProposalId     :: !Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProposalsUpdate' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'puUpdateAction'------ * 'puRevisionNumber'------ * 'puPayload'------ * 'puProposalId'-proposalsUpdate-    :: ProposalsUpdateUpdateAction -- ^ 'puUpdateAction'-    -> Int64 -- ^ 'puRevisionNumber'-    -> Proposal -- ^ 'puPayload'-    -> Text -- ^ 'puProposalId'-    -> ProposalsUpdate-proposalsUpdate pPuUpdateAction_ pPuRevisionNumber_ pPuPayload_ pPuProposalId_ =-  ProposalsUpdate'-    { _puUpdateAction = pPuUpdateAction_-    , _puRevisionNumber = _Coerce # pPuRevisionNumber_-    , _puPayload = pPuPayload_-    , _puProposalId = pPuProposalId_-    }----- | The proposed action to take on the proposal. This field is required and--- it must be set when updating a proposal.-puUpdateAction :: Lens' ProposalsUpdate ProposalsUpdateUpdateAction-puUpdateAction-  = lens _puUpdateAction-      (\ s a -> s{_puUpdateAction = a})---- | The last known revision number to update. If the head revision in the--- marketplace database has since changed, an error will be thrown. The--- caller should then fetch the latest proposal at head revision and retry--- the update at that revision.-puRevisionNumber :: Lens' ProposalsUpdate Int64-puRevisionNumber-  = lens _puRevisionNumber-      (\ s a -> s{_puRevisionNumber = a})-      . _Coerce---- | Multipart request metadata.-puPayload :: Lens' ProposalsUpdate Proposal-puPayload-  = lens _puPayload (\ s a -> s{_puPayload = a})---- | The proposal id to update.-puProposalId :: Lens' ProposalsUpdate Text-puProposalId-  = lens _puProposalId (\ s a -> s{_puProposalId = a})--instance GoogleRequest ProposalsUpdate where-        type Rs ProposalsUpdate = Proposal-        type Scopes ProposalsUpdate =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient ProposalsUpdate'{..}-          = go _puProposalId _puRevisionNumber _puUpdateAction-              (Just AltJSON)-              _puPayload-              adExchangeBuyerService-          where go-                  = buildClient-                      (Proxy :: Proxy ProposalsUpdateResource)-                      mempty
− gen/Network/Google/Resource/AdExchangeBuyer/PubproFiles/List.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.AdExchangeBuyer.PubproFiles.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)------ Gets the requested publisher profile(s) by publisher accountId.------ /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @adexchangebuyer.pubprofiles.list@.-module Network.Google.Resource.AdExchangeBuyer.PubproFiles.List-    (-    -- * REST Resource-      PubproFilesListResource--    -- * Creating a Request-    , pubproFilesList-    , PubproFilesList--    -- * Request Lenses-    , pflAccountId-    ) where--import           Network.Google.AdExchangeBuyer.Types-import           Network.Google.Prelude---- | A resource alias for @adexchangebuyer.pubprofiles.list@ method which the--- 'PubproFilesList' request conforms to.-type PubproFilesListResource =-     "adexchangebuyer" :>-       "v1.4" :>-         "publisher" :>-           Capture "accountId" (Textual Int32) :>-             "profiles" :>-               QueryParam "alt" AltJSON :>-                 Get '[JSON] GetPublisherProFilesByAccountIdResponse---- | Gets the requested publisher profile(s) by publisher accountId.------ /See:/ 'pubproFilesList' smart constructor.-newtype PubproFilesList =-  PubproFilesList'-    { _pflAccountId :: Textual Int32-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PubproFilesList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pflAccountId'-pubproFilesList-    :: Int32 -- ^ 'pflAccountId'-    -> PubproFilesList-pubproFilesList pPflAccountId_ =-  PubproFilesList' {_pflAccountId = _Coerce # pPflAccountId_}----- | The accountId of the publisher to get profiles for.-pflAccountId :: Lens' PubproFilesList Int32-pflAccountId-  = lens _pflAccountId (\ s a -> s{_pflAccountId = a})-      . _Coerce--instance GoogleRequest PubproFilesList where-        type Rs PubproFilesList =-             GetPublisherProFilesByAccountIdResponse-        type Scopes PubproFilesList =-             '["https://www.googleapis.com/auth/adexchange.buyer"]-        requestClient PubproFilesList'{..}-          = go _pflAccountId (Just AltJSON)-              adExchangeBuyerService-          where go-                  = buildClient-                      (Proxy :: Proxy PubproFilesListResource)-                      mempty
gogol-adexchange-buyer.cabal view
@@ -1,85 +1,98 @@-name:                  gogol-adexchange-buyer-version:               0.5.0-synopsis:              Google Ad Exchange Buyer 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-adexchange-buyer+version:            1.0.0+synopsis:           Google Ad Exchange Buyer SDK.+homepage:           https://github.com/brendanhay/gogol+bug-reports:        https://github.com/brendanhay/gogol/issues+license:            MPL-2.0+license-file:       LICENSE+author:             Brendan Hay+maintainer:+  Brendan Hay <brendan.g.hay+gogol@gmail.com>, Toni Cebrián <toni@tonicebrian.com> +copyright:          Copyright (c) 2015-2025 Brendan Hay+category:           Google+build-type:         Simple+extra-source-files:+  README.md+  src/.gitkeep+ description:-    Accesses your bidding-account information, submits creatives for-    validation, finds available direct deals, and retrieves performance-    reports.-    .-    /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.4@-    of the API.+  Accesses your bidding-account information, submits creatives for validation, finds available direct deals, and retrieves performance reports.+  .+  /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.4@+  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-adexchange-buyer +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.AdExchangeBuyer-        , Network.Google.AdExchangeBuyer.Types-        , Network.Google.Resource.AdExchangeBuyer.Accounts.Get-        , Network.Google.Resource.AdExchangeBuyer.Accounts.List-        , Network.Google.Resource.AdExchangeBuyer.Accounts.Patch-        , Network.Google.Resource.AdExchangeBuyer.Accounts.Update-        , Network.Google.Resource.AdExchangeBuyer.BillingInfo.Get-        , Network.Google.Resource.AdExchangeBuyer.BillingInfo.List-        , Network.Google.Resource.AdExchangeBuyer.Budget.Get-        , Network.Google.Resource.AdExchangeBuyer.Budget.Patch-        , Network.Google.Resource.AdExchangeBuyer.Budget.Update-        , Network.Google.Resource.AdExchangeBuyer.Creatives.AddDeal-        , Network.Google.Resource.AdExchangeBuyer.Creatives.Get-        , Network.Google.Resource.AdExchangeBuyer.Creatives.Insert-        , Network.Google.Resource.AdExchangeBuyer.Creatives.List-        , Network.Google.Resource.AdExchangeBuyer.Creatives.ListDeals-        , Network.Google.Resource.AdExchangeBuyer.Creatives.RemoveDeal-        , Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.Delete-        , Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.Insert-        , Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.List-        , Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.Update-        , Network.Google.Resource.AdExchangeBuyer.MarketplaceNotes.Insert-        , Network.Google.Resource.AdExchangeBuyer.MarketplaceNotes.List-        , Network.Google.Resource.AdExchangeBuyer.Marketplaceprivateauction.Updateproposal-        , Network.Google.Resource.AdExchangeBuyer.PerformanceReport.List-        , Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Delete-        , Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Get-        , Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Insert-        , Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.List-        , Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Patch-        , Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Update-        , Network.Google.Resource.AdExchangeBuyer.Products.Get-        , Network.Google.Resource.AdExchangeBuyer.Products.Search-        , Network.Google.Resource.AdExchangeBuyer.Proposals.Get-        , Network.Google.Resource.AdExchangeBuyer.Proposals.Insert-        , Network.Google.Resource.AdExchangeBuyer.Proposals.Patch-        , Network.Google.Resource.AdExchangeBuyer.Proposals.Search-        , Network.Google.Resource.AdExchangeBuyer.Proposals.Setupcomplete-        , Network.Google.Resource.AdExchangeBuyer.Proposals.Update-        , Network.Google.Resource.AdExchangeBuyer.PubproFiles.List+  exposed-modules:+    Gogol.AdExchangeBuyer+    Gogol.AdExchangeBuyer.Accounts.Get+    Gogol.AdExchangeBuyer.Accounts.List+    Gogol.AdExchangeBuyer.Accounts.Patch+    Gogol.AdExchangeBuyer.Accounts.Update+    Gogol.AdExchangeBuyer.BillingInfo.Get+    Gogol.AdExchangeBuyer.BillingInfo.List+    Gogol.AdExchangeBuyer.Budget.Get+    Gogol.AdExchangeBuyer.Budget.Patch+    Gogol.AdExchangeBuyer.Budget.Update+    Gogol.AdExchangeBuyer.Creatives.AddDeal+    Gogol.AdExchangeBuyer.Creatives.Get+    Gogol.AdExchangeBuyer.Creatives.Insert+    Gogol.AdExchangeBuyer.Creatives.List+    Gogol.AdExchangeBuyer.Creatives.ListDeals+    Gogol.AdExchangeBuyer.Creatives.RemoveDeal+    Gogol.AdExchangeBuyer.Marketplacedeals.Delete+    Gogol.AdExchangeBuyer.Marketplacedeals.Insert+    Gogol.AdExchangeBuyer.Marketplacedeals.List+    Gogol.AdExchangeBuyer.Marketplacedeals.Update+    Gogol.AdExchangeBuyer.Marketplacenotes.Insert+    Gogol.AdExchangeBuyer.Marketplacenotes.List+    Gogol.AdExchangeBuyer.Marketplaceprivateauction.Updateproposal+    Gogol.AdExchangeBuyer.PerformanceReport.List+    Gogol.AdExchangeBuyer.PretargetingConfig.Delete+    Gogol.AdExchangeBuyer.PretargetingConfig.Get+    Gogol.AdExchangeBuyer.PretargetingConfig.Insert+    Gogol.AdExchangeBuyer.PretargetingConfig.List+    Gogol.AdExchangeBuyer.PretargetingConfig.Patch+    Gogol.AdExchangeBuyer.PretargetingConfig.Update+    Gogol.AdExchangeBuyer.Products.Get+    Gogol.AdExchangeBuyer.Products.Search+    Gogol.AdExchangeBuyer.Proposals.Get+    Gogol.AdExchangeBuyer.Proposals.Insert+    Gogol.AdExchangeBuyer.Proposals.Patch+    Gogol.AdExchangeBuyer.Proposals.Search+    Gogol.AdExchangeBuyer.Proposals.Setupcomplete+    Gogol.AdExchangeBuyer.Proposals.Update+    Gogol.AdExchangeBuyer.Pubprofiles.List+    Gogol.AdExchangeBuyer.Types -    other-modules:-          Network.Google.AdExchangeBuyer.Types.Product-        , Network.Google.AdExchangeBuyer.Types.Sum+  other-modules:+    Gogol.AdExchangeBuyer.Internal.Product+    Gogol.AdExchangeBuyer.Internal.Sum -    build-depends:-          gogol-core == 0.5.0.*-        , base       >= 4.7 && < 5+  build-depends:    gogol-core ^>=1.0.0